微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题DBASEⅢ宏代换巧用一例
栏目软件操作与技巧
作者西南铝加工厂 张建勇
发布1992-05-01
  设根据一个原始库,用sum求和计算某固定表格的纵栏数据,计算结果放一目标库中。它的每一栏都有特定的组合条件,如果简单地用sum语句计算,则每一个数据均须有一条sum语句才能求出结果,因而设计程序时所用语句非常累赘。倡,如果在目录库中增加一个字符型的条件字段,把求和所需条件放入此字段中,则只需用数句,即可完成所需求和条件的组合。
  设1区为计算结果库,2区为打开的原始数据库,1区中until字段为条件字段。设计如下程序段。
  select 1
  go top
  do while .not. eof()
  tempc=until &&
  select 2
  sum… to…for &tempc
  &&
  select 1
  rep1…with… &&
  skip
  enddo
  假设某栏统计“出口”(C1)的“型材”(C5),则只需在对应栏until字段中写“C1='出品'.and.C5='型材'。
  用此种方法设计程序非常精练实用。如要改变一个条件,只需改变until字段;如果要增减表栏,也丝毫不用修改程序,只需增减相应记录即可。