All About Programming

  REPORT  ZPOST_INVOICE . DATA  :   I_BELNR       TYPE  RBKP_V - BELNR ,   I_GJAHR       TYPE  RBKP_V - GJAHR ,   E_RBKPV       TYPE  MRM_RBKPV ,   I_RBKPV       TYPE  MRM_RBKPV ,   T_DRSEG       TYPE  MMCR_TDRSEG ,   TI_DRSEG      TYPE  MMCR_TDRSEG ,   I_EDITOR      TYPE  REF  TO  C_TEXTEDIT_CONTROL ,   I_DO_PRICING  TYPE  BOOLE - BOOLE ,   I_BOPF_CALL   TYPE  BOOLE - BOOLE . DATA :   EX_OBJECT_CX_ROOT  TYPE  REF  TO  CX_ROOT ,   EX_TEXT            TYPE  STRING ,   EX_TEXT_LONG       TYPE  STRING . I_BELNR  =  '5105603952' . I_GJAHR  =  '2021' . CALL  FUNCTION  'MRM_INVOICE_READ'    EXPORTING     I_BELNR  =  I_BELNR     I_GJAHR  =  I_GJAHR *   I_XSELK = ' ' *   I_BUFFER_ON            = X *   I_LOCK  = ' ' *   I_DISPL = ' '    IMPORTING     E_RBKPV  =  E_RBKPV *   T_RBSELCONTRACT        = *   T_RBSELTRANSPMNG       = *   T_RBSELTM              =    TABLES     T_DRSEG  =  T_DRSEG *   T_KONV  = *   T_RBSELBEST            = *   T_RBSELLIFS  

  REPORT  ZPARK_INVOICE . DATA  :   HEADERDATA        TYPE  BAPI_INCINV_CREATE_HEADER ,   ITEMDATA          TYPE  TABLE  OF  BAPI_INCINV_CREATE_ITEM ,   LSEMDATA          TYPE  BAPI_INCINV_CREATE_ITEM ,   ACCOUNTINGDATA    TYPE  TABLE  OF  BAPI_INCINV_CREATE_ACCOUNT ,   GLACCOUNTDATA      TYPE  TABLE  OF  BAPI_INCINV_CREATE_GL_ACCOUNT ,   LSACCOUNTDATA      TYPE  BAPI_INCINV_CREATE_GL_ACCOUNT ,   ITRETURN          TYPE  TABLE  OF  BAPIRET2 ,   INVOICEDOCNUMBER  TYPE  BAPI_INCINV_FLD - INV_DOC_NO ,   FISCALYEAR        TYPE  BAPI_INCINV_FLD - FISC_YEAR . CLEAR  HEADERDATA . HEADERDATA - INVOICE_IND  =  'X' . HEADERDATA - DOC_TYPE  =  'KR' . HEADERDATA - DOC_DATE    =  SY - DATUM . HEADERDATA - PSTNG_DATE  =  SY - DATUM . HEADERDATA - BLINE_DATE  =  SY - DATUM . HEADERDATA - REF_DOC_NO  =  'IV/PO000000001' . HEADERDATA - COMP_CODE   =  '1000' . HEADERDATA - CURRENCY    =  'IDR' . HEADERDATA - GROSS_AMOUNT  =  '2000000' . HEADERDATA - HEADER_