SMARTFORMS 连续打印

DATA:l_controlpara TYPE ssfctrlop,

      l_compop TYPE ssfcompop,

      l_cresop TYPE ssfcresop,

      l_setting.

l_setting = space.

     l_compop-tddest = l_cresop-tddest. " Spool: Output device

     l_compop-tdimmed = 'X'.       " Print Immediately (Print Parameters)

     l_compop-tddelete = 'X'.     " Delete After Printing

     l_controlpara-no_open = 'X'. "打印请求

    AT FIRST.

       l_setting = 'X'.

       l_controlpara-no_open = space. "出现打印请求

       l_controlpara-no_close = 'X'. "不添加打印请求

    ENDAT.

    AT LAST.

      IF l_line NE 1.

         l_controlpara-no_open = 'X'. "不出现打印请求

      ENDIF.

       l_controlpara-no_close = space. "添加打印请求

    ENDAT.

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/7180389/viewspace-624633/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/7180389/viewspace-624633/