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

以下代码很简单
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表