1 CALL FUNCTION 'ME_INFORECORD_MAINTAIN'
2 EXPORTING
3 I_EINA = LS_EINA
4 I_EINAX = LS_EINAX
5 I_EINE = LS_EINE
6 I_EINEX = LS_EINEX
7 * TESTRUN =
8 * IMPORTING
9 * E_EINA =
10 * E_EINE =
11 TABLES
12 * TXT_LINES =
13 COND_VALIDITY = LT_CONV
14 CONDITION = LT_COND
15 * COND_SCALE_VALUE =
16 COND_SCALE_QUAN = LT_CONQ
17 RETURN = LT_RETURN.
* 供应商主数据
LS_DATA-PARTNER = LS_PARTNER.
LS_DATA-VENDOR = LS_VENDOR.
APPEND LS_DATA TO LT_DATA.
CLEAR LS_DATA.
CALL FUNCTION 'CVI_EI_INBOUND_MAIN'
EXPORTING
I_DATA = LT_DATA
* I_EXT_DATA =
IMPORTING
E_RETURN = LT_RETURN.CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = ABAP_TRUE.