在新窗口调用Tcode[ABAP4_CALL_TRANSACTION]

实现弹出调用事务代码的新窗口

image.png

          DATA : WA_SPA   TYPE RFC_SPAGPA,
                 ITAB_SPA TYPE TABLE OF RFC_SPAGPA.
          WA_SPA-PARID = 'AUN'.
          WA_SPA-PARVAL = RS_SELFIELD-VALUE.
          APPEND WA_SPA TO ITAB_SPA.
          CALL FUNCTION 'ABAP4_CALL_TRANSACTION'
            STARTING NEW TASK 'VA02'
            DESTINATION 'NONE'
            EXPORTING
              TCODE                 = 'VA02'
              SKIP_SCREEN           = 'X'
            TABLES
              SPAGPA_TAB            = ITAB_SPA
            EXCEPTIONS
              COMMUNICATION_FAILURE = 1
              SYSTEM_FAILURE        = 2.


关键词: ABAP

网友评论

发表评论