*&---------------------------------------------------------------------*
*&  Include           ZXV50U03                                         *
*&---------------------------------------------------------------------*
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"       IMPORTING
*"             VALUE(I_DOCUMENT) LIKE  RL50E-K_FLAG DEFAULT '2'
*"             VALUE(I_BATCH_NUMBER) LIKE  LIPS-CHARG DEFAULT ' '
*"             VALUE(I_MAT_MASTER_VIEW) LIKE  MAEPV STRUCTURE  MAEPV
*"                             DEFAULT ' '
*"             VALUE(I_BATCHES) LIKE  MCHA STRUCTURE  MCHA
*"                             DEFAULT ' '
*"             VALUE(I_SALES_ORG) LIKE  LIKP-VKORG DEFAULT ' '
*"             VALUE(I_DISTR_CHANNEL) LIKE  VBRK-VTWEG DEFAULT ' '
*"             VALUE(I_COUNTRY) LIKE  T001W-LAND1 DEFAULT ' '
*"             VALUE(I_DELIVERY_ITEM) LIKE  LIPS STRUCTURE  LIPS
*"                             DEFAULT ' '
*"             VALUE(I_INVOICE_ITEM) LIKE  VBRP STRUCTURE  VBRP
*"                             DEFAULT ' '
*"       CHANGING
*"             VALUE(C_EXPORT_LINE_ITEM_DATA) LIKE  EIPO
*"                             STRUCTURE  EIPO DEFAULT ' '
*"             VALUE(C_STAWN) LIKE  EIPO-STAWN DEFAULT ' '
*"             VALUE(C_EXPRF) LIKE  EIPO-EXPRF DEFAULT ' '
*"             VALUE(C_EXART) LIKE  EIPO-EXART DEFAULT ' '
*"             VALUE(C_HERKL) LIKE  EIPO-HERKL DEFAULT ' '
*"             VALUE(C_HERKR) LIKE  EIPO-HERKR DEFAULT ' '
*"----------------------------------------------------------------------
 
C_EXART = 'A'.
C_EXPRF = '1'.
C_HERKL = 'ID'.
IF C_STAWN is initial.
C_STAWN = 'GENERAL'.
ENDIF.