SAP ABAP – BDC Template

bismillah..

**********************************************************************
*  D E F I N E   V A R I A B L E
**********************************************************************
  DATA : it_bdcdata    TYPE TABLE OF bdcdata,
         ls_bdcdata    TYPE bdcdata,
         lv_mode       TYPE char1 VALUE 'N',
         it_bdcmsgcoll TYPE TABLE OF bdcmsgcoll.

**********************************************************************
*  M A C R O
**********************************************************************
  DEFINE _bdc_field.
    CLEAR  ls_bdcdata.
    ls_bdcdata-fnam = &1.
    ls_bdcdata-fval = &2.
    APPEND ls_bdcdata TO it_bdcdata.
  END-OF-DEFINITION.

  DEFINE _bdc_dynpro.
    CLEAR  ls_bdcdata.
    ls_bdcdata-program = &1.
    ls_bdcdata-dynpro = &2.
    ls_bdcdata-dynbegin = 'X'. "NEW SCREEN
    APPEND ls_bdcdata TO it_bdcdata.
  END-OF-DEFINITION.


**********************************************************************
*  S T A R T   B D C
**********************************************************************
  _bdc_field 'SAPXXXXX' '9999'.
  _bdc_dynpro 'FIELD' 'VALUE'.

  CALL TRANSACTION 'VL01NO' USING it_bdcdata MODE lv_mode MESSAGES INTO it_bdcmsgcoll.  " A - DISPLAY ALL SCREENS