7 Aralık 2011 Çarşamba

SAP/ABAP: ABAP4_CALL_TRANSACTION FM

REPORT  ZABAP_ABAP4_CALL_TRANSACTION_F                              .

DATA GS_BDCDATA TYPE BDCDATA.
DATA GT_BDCDATA TYPE TABLE OF BDCDATA.

GS_BDCDATA-PROGRAM = 'SAPLSD_ENTRY'.
GS_BDCDATA-DYNPRO = '1000'.
GS_BDCDATA-DYNBEGIN = 'X'.
APPEND GS_BDCDATA TO GT_BDCDATA.

CLEAR GS_BDCDATA.
GS_BDCDATA-FNAM = 'RSRD1-TBMA_VAL'.
GS_BDCDATA-FVAL = 'SFLIGHT'.
APPEND GS_BDCDATA TO GT_BDCDATA.

CALL FUNCTION 'ABAP4_CALL_TRANSACTION'
  EXPORTING
    TCODE                         = 'SE11'
*   SKIP_SCREEN                   = ' '
*   MODE_VAL                      = 'A'
*   UPDATE_VAL                    = 'A'
* IMPORTING
*   SUBRC                         =
  TABLES
    USING_TAB                     = GT_BDCDATA
*   SPAGPA_TAB                    =
*   MESS_TAB                      =
  EXCEPTIONS
    CALL_TRANSACTION_DENIED       = 1
    TCODE_INVALID                 = 2
    OTHERS                        = 3
          .
IF SY-SUBRC gt 0.
  MESSAGE 'bir sikinti var!' TYPE 'E'.
ENDIF.

Hiç yorum yok:

Yorum Gönder

İnsdroid

Sabahtan beri çatada çutada çatada çutada… Bitmedi yine de… Neyse, yolumuz uzun, toparlıyorum çantamı, adaptörü falan tıkıştırıyorum bir şe...