PROGRESS语言求助

kobexu00

情况是这样的，现在正二次开发一程序，用来打印公司的往来（客户，供应商，可以当做两个报表）三栏式明细账（我知道中国财务系统这个菜单中有这个功能，但是我们公司没买），这种账簿对格式的要求比较高，我在开发中遇到了一个问题不知道怎么解决，程序中我自己定义了两个FROM:page-top和page-bottom。
page-bottom没问题，在page-top中需要显示该客户的客户编码，现在问题出现了，如果我需要一次性选择多个客户的时候，它会只显示出第一个客户的编码，并且所有的明细账都是连着打印出来的，可能会发生几个客户的明细账出现在同一张上的悲剧。我想实现的功能是，当第一个客户的明细账显示完以后，则自动跳到下一页再开始打印第二个客户的明细账，并且这个page-top上客户编码的值也跟着一起变，请问如何做到，判断条件是什么？我知道跳到下一页可以用PAGE命令，有更好的推荐吗？
谢谢大家

5点前在线等，如果我描述的不清楚请跟帖提问

jhdandliai

选多个客户时，可使用如下方法，例如：
def var cust# as char .
...
cust# = "cust1,cust2,cust3..."
def var i as int .
def var cust-no# like 客户表的客户代码。
form
   head
     cust-no#  /*用个变量代替直接用客户表的客户代码字段*/
with frame head page-top.l
do i= 1 to num-entries(cust#):
  for each  销售明细表 where 客户代码 = entry(i,chst#):
    disp ...... with frame one .
  end.
  page.
end.

。。。。。。。