每更新一次表的记录，就打印一次表的记录。
问题来了：预览报表再打印，没问题。如直接打印，只能打印循环打印第一次更新记录的报表，后面更新的表都无法打印出来。我用for 循环打印。
是不是没有清除打印环境？谢谢！！

给相关文件看看

是不是依据A表控制循环，从B表里提取符合A表中的那些数据到C表（报表的数据源）进行打印。是这样吗？

如果是，不断地预览后点打印，循环是正常的。而不预览，想一次性全部打印完成，一不小心，就只打印符合A表首个条件的那些，就结束了。

这是因为：预览后点打印，A表循环是与打印同步的。不预览打印全部，A表循环的指针与打印不同步了，会快速走到表尾了，也就只是打印一份就结束了。

解决办法是：加一个指针定位的语句。

我在N年前遇到这个问题，在拜访了专家后得到解决，得到鱼和渔。所以今天能回答楼主的问题。

你今天发些数据和代码上来，有时间帮你解决。过了今天要年后上班了，凑时间帮你

以下代码很简单
SELECT 2
Set Printer To Getprinter()
FOR  n=VAL(qsyf) TO VAL(zzyf)   
  IF qsyf="1" or qsyf="3"  THEN  &&*******************
     replace pb.riqi29 with "29"
  ENDIF

  IF qsyf="4" or qsyf="6"  THEN  &&*******************
     replace pb.riqi30 with "30"  
  ENDIF
&&report form rp.frx Noconsole to printer Prompt Preview0
Report Form rp.frx Noconsole To PRINTER
 
ENDFOR

***********************************
问题如下：用Report Form rp.frx Noconsole To PRINTER语句，预览正常，但是一点打印按钮，无论如何循环，都是只能打印第一个页面信息。
         

报表的数据源是pb表