当前位置:操作系统 > Unix/Linux >>

MB_CHANGE_DOCUMENT使用方法

MB_CHANGE_DOCUMENT使用方法
 
            REFRESH IT_MSEG.
            CLEAR IT_MSEG.

            SELECT * INTO CORRESPONDING FIELDS OF TABLE IT_MSEG
                     FROM MSEG WHERE MBLNR = TITAB-MBLNR
                                 AND MJAHR = TITAB-MJAHR
                                 AND ZEILE = TITAB-ZEILE.
            LOOP AT IT_MSEG.
                  IF IT_MSEG-SGTXT = ''.
                     IT_MSEG-SGTXT = '1'.
                  ELSE.
                     IT_MSEG-SGTXT = IT_MSEG-SGTXT + 1.
                  ENDIF.
                  MODIFY IT_MSEG.
                  CLEAR IT_MSEG.
            ENDLOOP.

            CALL FUNCTION 'MB_CHANGE_DOCUMENT'
              TABLES
                ZMKPF         = IT_MKPF
                ZMSEG         = IT_MSEG.
            IF SY-SUBRC = 0.
                 CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
                 EXPORTING
                   WAIT          = 'X'.
            ELSE.
                 CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
            ENDIF.

 


CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,