zoukankan      html  css  js  c++  java
  • 判断有没有真正点击打印

    DATABEGIN OF lt_dycs OCCURS 0,"关联单号和打印次数存储表
              refid TYPE ztjsd_confirm_dy-refid,
               dycs TYPE ztjsd_confirm_dy-dycs,
          END OF lt_dycs.
    DATA: lt_dycs1 LIKE TABLE OF ztjsd_confirm_dy WITH HEADER LINE.
    DATA: ls_output_info TYPE ssfcrescl."Smart Forms: 表格打印结束时返回值

    DATA: lv_dycs TYPE ztjsd_confirm_dy-dycs.
     
    CALL FUNCTION 'SSF_CLOSE'
        IMPORTING
          job_output_info  = ls_output_info
        EXCEPTIONS
          formatting_error = 1
          internal_error   = 2
          send_error       = 3
          OTHERS           = 4.
      IF sy-subrc <> 0.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                    WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ELSE.
        IF ls_output_info-spoolids IS NOT INITIAL.
          LOOP AT gt_data_print.
            READ TABLE lt_dycs WITH KEY refid = gt_data_print-refid.
            IF sy-subrc = 0.
              CLEAR: lv_dycs.
              lv_dycs = lt_dycs-dycs + 1.
              UPDATE ztjsd_confirm_dy SET dycs = lv_dycs WHERE refid = gt_data_print-refid.
            ELSE.
              CLEAR: lt_dycs1,lt_dycs1[].
              lt_dycs1-refid = gt_data_print-refid.
              lt_dycs1-dycs = 1.
              APPEND lt_dycs1.
              INSERT ztjsd_confirm_dy FROM lt_dycs1.
            ENDIF.
          ENDLOOP.
      ENDIF.
  • 相关阅读:
    Redis代理与集群的总结报告
    redis代理对比,redis架构对比,redis predixy安装和功能测试
    kafka学习方向系列
    redis-cluster-proxy安装使用尝试
    redis6集群安装与运维管理
    kafka集群搭建(利用集成zk集群)
    vue-property-decorator用法介绍
    软件世界的基石:重要开源项目盘点
    ECMAScript 6 入门
    windows下快速删除node_modules
  • 原文地址:https://www.cnblogs.com/springzt/p/5625670.html
Copyright © 2011-2022 走看看