Sap uses VMD_EI_API => MAINTAIN to create supplier master data, sapvmd_ei_api
FRM_VENDOR_CREATE.
DATA: LV_FLG.
DATA: LS_MAIN TYPE VMDS_EI_MAIN,
LS_MESG TYPE CVIS_MESSAGE,
LT_MSG TYPE BAPIRET2_T,
LWA_MSG TYPE BAPIRET2,
LT_VEND TYPE VMDS_EI_EXTERN_T,
LWA_VEND TYPE VMDS_EI_EXTERN,
LT_COMPANY TYPE VMDS_EI_COMPANY_T,
LWA_COMPANY TYPE VMDS_EI_COMPANY,
LT_BANKDETAILS TYPE CVIS_EI_BANKDETAIL_T,
LWA_BANKDETAILS TYPE CVIS_EI_CVI_BANKDETAIL, "CVIS_EI_BANKDETAIL.
LT_PURCHASING TYPE VMDS_EI_PURCHASING_T,
LWA_PURCHASING TYPE VMDS_EI_PURCHASING,
LT_FUNCTIONS TYPE VMDS_EI_FUNCTIONS_T,
LWA_FUNCTIONS TYPE VMDS_EI_FUNCTIONS.
* Primary Data
LWA_VEND-HEADER-OBJECT_TASK = 'I '.
* LWA_VEND-HEADER-OBJECT_INSTANCE-LIFNR = 'a20101241 '.
LWA_VEND-CENTRAL_DATA-CENTRAL-DATA-KTOKK = 'z002 '.
LWA_VEND-CENTRAL_DATA-CENTRAL-DATAX-KTOKK = 'x '.
* Address data
LWA_VEND-CENTRAL_DATA-ADDRESS-TASK = 'I '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-TITLE = '000000 '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-NAME = 'lsi Logic Storage System, Inc '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-LANGU = SY-LANGU.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-COUNTRY = 'cn '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-SORT1 = 'lsi '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-SORT2 = 'lsi '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-STREET = '2014 Barber Lane Milpitas ,'.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-HOUSE_NO = 'california '.
* LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-POSTL_COD1 = '000000 '.
* LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-CITY = 'qingdao '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-COUNTRY = 'us '.
* LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATA-REGION = '000000 '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-TITLE = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-NAME = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-LANGU = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-COUNTRY = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-SORT1 = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-SORT2 = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-STREET = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-HOUSE_NO = 'x '.
* LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-POSTL_COD1 = 'x '.
* LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-CITY = 'x '.
LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-COUNTRY = 'x '.
* LWA_VEND-CENTRAL_DATA-ADDRESS-POSTAL-DATAX-REGION = 'x '.
* Bank Data
* ** LWA_BANKDETAILS-TASK = 'I '.
* ** LWA_BANKDETAILS-DATA_KEY-BANKL = 'khyh '.
* ** LWA_BANKDETAILS-DATA_KEY-BANKN = '000000 '.
***
* ** APPEND LWA_BANKDETAILS TO LT_BANKDETAILS.
* ** LWA_VEND-CENTRAL_DATA-BANKDETAIL-BANKDETAILS = LT_BANKDETAILS.
* Company code data
* LWA_VEND-COMPANY_DATA-CURRENT_STATE = 'x '.
LWA_COMPANY-TASK = 'I '.
LWA_COMPANY-DATA_KEY-BUKRS = '000000 '.
LWA_COMPANY-DATA-AKONT = '000000 '.
LWA_COMPANY-DATA-ZTERM = 'z008 '.
LWA_COMPANY-DATA-ZWELS = 'E '.
LWA_COMPANY-DATA-TOGRR = 'z001 '.
LWA_COMPANY-DATA-REPRF = 'x '.
LWA_COMPANY-DATA-ZSABE = 'z (090324 turn positive )'.
LWA_COMPANY-DATA-INTAD = '2017. 2009 temporary turn official '.
LWA_COMPANY-DATA-KVERM = 'original '.
LWA_COMPANY-DATAX-AKONT = 'x '.
LWA_COMPANY-DATAX-ZTERM = 'x '.
LWA_COMPANY-DATAX-ZWELS = 'x '.
LWA_COMPANY-DATAX-TOGRR = 'x '.
LWA_COMPANY-DATAX-REPRF = 'x '.
LWA_COMPANY-DATAX-ZSABE = 'x '.
LWA_COMPANY-DATAX-INTAD = 'x '.
LWA_COMPANY-DATAX-KVERM = 'x '.
APPEND LWA_COMPANY TO LT_COMPANY.
A LWA_VEND-COMPANY_DATA-COMPANY = LT_COMPANY.
* Purchase data
LWA_PURCHASING-TASK = 'I '.
LWA_PURCHASING-DATA_KEY-EKORG = '000000'. "purchasing organization
LWA_PURCHASING-DATA-WAERS = 'usd '.
LWA_PURCHASING-DATA-ZTERM = 'z008 '.
* ** LWA_PURCHASING-DATA-INCO1 = ''.
LWA_PURCHASING-DATA-KALSK = 'z1 '.
LWA_PURCHASING-DATA-VERKF = 'penalty gang '.
LWA_PURCHASING-DATA-TELF1 = '000000 '.
LWA_PURCHASING-DATA-WEBRE = 'x '.
LWA_PURCHASING-DATA-KZABS = 'x '.
LWA_PURCHASING-DATA-KZAUT = 'x '.
LWA_PURCHASING-DATA-BSTAE = 'z001 '.
***
LWA_PURCHASING-DATAX-WAERS = 'x '.
LWA_PURCHASING-DATAX-ZTERM = 'x '.
* ** LWA_PURCHASING-DATAX-INCO1 = 'x '.
LWA_PURCHASING-DATAX-KALSK = 'x '.
LWA_PURCHASING-DATAX-VERKF = 'x '.
LWA_PURCHASING-DATAX-TELF1 = 'x '.
LWA_PURCHASING-DATAX-WEBRE = 'x '.
LWA_PURCHASING-DATAX-KZABS = 'x '.
LWA_PURCHASING-DATAX-KZAUT = 'x '.
LWA_PURCHASING-DATAX-BSTAE = 'x '.
LWA_FUNCTIONS-TASK = 'I '.
LWA_FUNCTIONS-DATA_KEY-PARVW = 'ba '.
APPEND LWA_FUNCTIONS TO LT_FUNCTIONS.
LWA_FUNCTIONS-TASK = 'I '.
LWA_FUNCTIONS-DATA_KEY-PARVW = 'lf '.
APPEND LWA_FUNCTIONS TO LT_FUNCTIONS.
LWA_FUNCTIONS-TASK = 'I '.
LWA_FUNCTIONS-DATA_KEY-PARVW = 'rs '.
APPEND LWA_FUNCTIONS TO LT_FUNCTIONS.
LWA_PURCHASING-FUNCTIONS-FUNCTIONS = LT_FUNCTIONS.
APPEND LWA_PURCHASING TO LT_PURCHASING.
LWA_VEND-PURCHASING_DATA-PURCHASING = LT_PURCHASING.
APPEND LWA_VEND TO LT_VEND.
A LS_MAIN-VENDORS = LT_VEND.
Call method VMD_EI_API => MAINTAIN
EXPORTING
* IV_TEST_RUN = SPACE
IS_MASTER_DATA = LS_MAIN
IMPORTING
ES_ERROR = LS_MESG.
LT_MSG = LS_MESG-MESSAGES.
Loop at LT_MSG INTO LWA_MSG.
WRITE:/LWA_MSG-TYPE, LWA_MSG-MESSAGE.
IF LWA_MSG-TYPE = 'E' OR LWA_MSG-TYPE = 'A '.
LV_FLG = 'x '.
ENDIF.
ENDLOOP.
IF LV_FLG is initial.
Commit work.
ELSE.
Rollback work.
ENDIF.
ENDFORM.
When sap abap uses pai_ei_api => maintain_bapi to create a Customer Master in the background
I have never used it, but I remember a sample code in my favorites about it.
But now I don't have my own notebook. I'll show it to you later.
Which of the following is the bapi that calls SAP to create customer master data in java?
You can use the following four methods to create, modify, delete, and display tags respectively.
BAPI_CUSTOMER_CREATE
BAPI_CUSTOMER_DELETE
BAPI_CUSTOMER_DISPLAY
BAPI_CUSTOMER_EDIT
The BAPI search method is actually very simple: first, you can search for BAPI through the transaction code BAPI; instead, you can search by BAPI * through SE37, because BAPI functions start with BAPI.