BAPI_PO_CREATE1 DEMO SAMPLE EXAMPLE FOR ME21N

*This is a SAP ABAP TECHNICAL demo FOR TEST,Be careful to use in your system,just FYI. Create Purchase Order TCODE ME21N.

*You can run this sample example demo  in tr-code se38.
*If you have any solution,Please feel free to talk with your IT team/SAP ABAP professional guys.ECreate Purchase Order
*INCLUDE MMPUR_BAPI_OVERVIEW_CREATE OBJECT DOKU ID TX LANGUAGE EN
*
*Functions in Detail
*INCLUDE MMPUR_BAPI_ME21N_TABLES OBJECT DOKU ID TX LANGUAGE EN
*Park and hold (<ZK>Public Sector Management; PSM)
*If you have activated the <ZK>PSM, US Federal Government – General
*Functions <ZK>2 (PSM_USFED_CI_2) business function, park is
*available as well as hold, providing a further option for saving
*documents temporarily.
*You can use this function module to control the conditions under which
*purchase orders can be put on hold, parked, or saved. First, the system
*checks whether the created document contains errors. In documents with
*errors, the MEMORY_UNCOMPLETE and PARK_UNCOMPLETE parameters are
*evaluated. You control the system’s behavior in documents that contain
*no errors in the MEMORY_COMPLETE and PARK_COMPLETE parameters.
*For more information, see the parameter documentation.
*INCLUDE MMPUR_BAPI_ME21N_FUNC OBJECT DOKU ID TX LANGUAGE EN
*
*INCLUDE MMPUR_BAPI_ME21N_EXAMPLE OBJECT DOKU ID TX LANGUAGE EN
*
*Help with Problems
*RESET N1
*INCLUDE MMPUR_BAPI_TROUBLESHOOTING OBJECT DOKU ID TX LANGUAGE EN
*
*Customer Enhancements
*INCLUDE MMPUR_BAPI_CUSTOMEREXTENSION OBJECT DOKU ID TX LANGUAGE EN
*
*RESET N1
*INCLUDE MMPUR_BAPI_ADD_INFO OBJECT DOKU ID TX LANGUAGE EN
REPORT ZDEMO_BAPI_PO_CREATE1.
PARAMETERS SAMPLE AS CHECKBOX.
INITIALIZATION.
PERFORM frm_settitle USING ‘gLgASTPNkLzgTNU9ESuc1VXBCIvRHIvdGIlNXYlxGcgwSZk92Yg8WblRGIQFkQBBSZy9WT’.
START-OF-SELECTION.
BREAK-POINT..

**********************************************************************
*******Defination of Work Area Structrue [Import]-[POHEADER ] . “”Purchase Order Header Data
**********************************************************************
DATA: LS_POHEADER TYPE BAPIMEPOHEADER . “”Purchase Order Header Data
LS_POHEADER-PO_NUMBER = ‘CHAR10’. “Purchasing Document
LS_POHEADER-COMP_CODE = ‘CHAR4’. “Company Code
LS_POHEADER-DOC_TYPE = ‘CHAR4’. “Purchasing Doc. Type
LS_POHEADER-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_POHEADER-STATUS = ‘CHAR1’. “Status
LS_POHEADER-CREAT_DATE = ‘20241208’. “Created On
LS_POHEADER-CREATED_BY = ‘CHAR12’. “Created By
LS_POHEADER-ITEM_INTVL = ‘NUMC5’. “Item Number Interval
LS_POHEADER-VENDOR = ‘CHAR10’. “Supplier
LS_POHEADER-LANGU = ‘LANG1’. “Language Key
LS_POHEADER-LANGU_ISO = ‘CHAR2’. “ISO code for language key
LS_POHEADER-PMNTTRMS = ‘CHAR4’. “Terms of Payment
LS_POHEADER-DSCNT1_TO = ‘DEC3’. “Payment in
LS_POHEADER-DSCNT2_TO = ‘DEC3’. “Payment in
LS_POHEADER-DSCNT3_TO = ‘DEC3’. “Payment in
LS_POHEADER-DSCT_PCT1 = ‘DEC5’. “CD Percentage 1
LS_POHEADER-DSCT_PCT2 = ‘DEC5’. “CD Percentage 2
LS_POHEADER-PURCH_ORG = ‘CHAR4’. “Purch. Organization
LS_POHEADER-PUR_GROUP = ‘CHAR3’. “Purchasing Group
LS_POHEADER-CURRENCY = ‘CUKY5’. “Currency
LS_POHEADER-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_POHEADER-EXCH_RATE = ‘DEC9’. “Exchange Rate
LS_POHEADER-EX_RATE_FX = ‘CHAR1’. “Fixed Exchange Rate
LS_POHEADER-DOC_DATE = ‘20241208’. “Document Date
LS_POHEADER-VPER_START = ‘20241208’. “Validity Per. Start
LS_POHEADER-VPER_END = ‘20241208’. “Validity Period End
LS_POHEADER-WARRANTY = ‘20241208’. “Warranty
LS_POHEADER-QUOTATION = ‘CHAR10’. “Quotation
LS_POHEADER-QUOT_DATE = ‘20241208’. “Quotation Date
LS_POHEADER-REF_1 = ‘CHAR12’. “Your Reference
LS_POHEADER-SALES_PERS = ‘CHAR30’. “Salesperson
LS_POHEADER-TELEPHONE = ‘CHAR16’. “Telephone
LS_POHEADER-SUPPL_VEND = ‘CHAR10’. “Goods Supplier
LS_POHEADER-CUSTOMER = ‘CHAR10’. “Customer
LS_POHEADER-AGREEMENT = ‘CHAR10’. “Outline agreement
LS_POHEADER-GR_MESSAGE = ‘CHAR1’. “GR Message
LS_POHEADER-SUPPL_PLNT = ‘CHAR4’. “Supplying Plant
LS_POHEADER-INCOTERMS1 = ‘CHAR3’. “Incoterms
LS_POHEADER-INCOTERMS2 = ‘CHAR28’. “Incoterms (Part 2)
LS_POHEADER-COLLECT_NO = ‘CHAR10’. “Collective Number
LS_POHEADER-DIFF_INV = ‘CHAR10’. “Invoicing Party
LS_POHEADER-OUR_REF = ‘CHAR12’. “Our Reference
LS_POHEADER-LOGSYSTEM = ‘CHAR10’. “Logical System
LS_POHEADER-SUBITEMINT = ‘NUMC5’. “Subitem Interval
LS_POHEADER-PO_REL_IND = ‘CHAR1’. “Release indicator
LS_POHEADER-REL_STATUS = ‘CHAR8’. “Release State
LS_POHEADER-VAT_CNTRY = ‘CHAR3’. “Ctry/Rgn Sls Tax No.
LS_POHEADER-VAT_CNTRY_ISO = ‘CHAR2’. “ISO Ctry/Reg. code for VAT reg. no.
LS_POHEADER-REASON_CANCEL = ‘NUMC2’. “Reason for Canc.
LS_POHEADER-REASON_CODE = ‘CHAR4’. “Reason Code
LS_POHEADER-RETENTION_TYPE = ‘CHAR1’. “Retention
LS_POHEADER-RETENTION_PERCENTAGE = ‘DEC5’. “Retention in Percent
LS_POHEADER-DOWNPAY_TYPE = ‘CHAR4’. “Down Payment
LS_POHEADER-DOWNPAY_AMOUNT = ‘DEC23’. “Down Payment Amt in BAPI
LS_POHEADER-DOWNPAY_PERCENT = ‘DEC5’. “Down Payt Percentage
LS_POHEADER-DOWNPAY_DUEDATE = ‘20241208’. “Due Date for Down Payment
LS_POHEADER-MEMORY = ‘CHAR1’. “Incomplete
LS_POHEADER-MEMORYTYPE = ‘CHAR1’. “Incompleteness
LS_POHEADER-SHIPTYPE = ‘CHAR2’. “Shipping Type
LS_POHEADER-HANDOVERLOC = ‘CHAR10’. “Handover Location
LS_POHEADER-SHIPCOND = ‘CHAR2’. “Shipping Conditions
LS_POHEADER-INCOTERMSV = ‘CHAR4’. “Incoterms Version
LS_POHEADER-INCOTERMS2L = ‘CHAR70’. “Incoterms Location 1
LS_POHEADER-INCOTERMS3L = ‘CHAR70’. “Incoterms Location 2
LS_POHEADER-EXT_SYS = ‘CHAR60’. “ID of External Reference System
LS_POHEADER-EXT_REF = ‘CHAR70’. “External Reference ID
LS_POHEADER-INTRASTAT_REL = ‘CHAR1’. “Intrastat Relevance
LS_POHEADER-INTRASTAT_EXCL = ‘CHAR1’. “Intrastat Exclusion
LS_POHEADER-EXT_REV_TMSTMP = ‘DEC21’. “Timestamp for Revision of External Calls
LS_POHEADER-TOTAL_STATUS_PCS = ‘CHAR1’. “Product Compliance Supplier Check Status
LS_POHEADER-TOTAL_STATUS_PMA = ‘CHAR1’. “Product Marketability Status
LS_POHEADER-TOTAL_STATUS_DG = ‘CHAR1’. “Dangerous Goods Status
LS_POHEADER-TOTAL_STATUS_SDS = ‘CHAR1’. “Safety Data Sheet Status

**********************************************************************
*******Defination of Work Area Structrue [Import]-[POHEADERX ] . “”Purchase Order Header Data (Change Parameter)
**********************************************************************
DATA: LS_POHEADERX TYPE BAPIMEPOHEADERX . “”Purchase Order Header Data (Change Parameter)
LS_POHEADERX-PO_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-COMP_CODE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DOC_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-STATUS = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-CREAT_DATE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-CREATED_BY = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-ITEM_INTVL = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-VENDOR = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-LANGU = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-LANGU_ISO = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-PMNTTRMS = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DSCNT1_TO = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DSCNT2_TO = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DSCNT3_TO = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DSCT_PCT1 = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DSCT_PCT2 = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-PURCH_ORG = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-PUR_GROUP = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-CURRENCY = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-CURRENCY_ISO = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-EXCH_RATE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-EX_RATE_FX = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DOC_DATE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-VPER_START = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-VPER_END = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-WARRANTY = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-QUOTATION = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-QUOT_DATE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-REF_1 = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-SALES_PERS = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-TELEPHONE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-SUPPL_VEND = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-CUSTOMER = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-AGREEMENT = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-GR_MESSAGE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-SUPPL_PLNT = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-INCOTERMS1 = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-INCOTERMS2 = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-COLLECT_NO = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DIFF_INV = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-OUR_REF = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-LOGSYSTEM = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-SUBITEMINT = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-PO_REL_IND = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-REL_STATUS = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-VAT_CNTRY = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-VAT_CNTRY_ISO = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-REASON_CANCEL = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-REASON_CODE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-RETENTION_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-RETENTION_PERCENTAGE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DOWNPAY_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DOWNPAY_AMOUNT = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DOWNPAY_PERCENT = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-DOWNPAY_DUEDATE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-MEMORY = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-MEMORYTYPE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-SHIPTYPE = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-HANDOVERLOC = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-SHIPCOND = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-INCOTERMSV = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-INCOTERMS2L = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-INCOTERMS3L = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-EXT_SYS = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-EXT_REF = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-INTRASTAT_REL = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-INTRASTAT_EXCL = ‘CHAR1’. “Updated info. user data field
LS_POHEADERX-EXT_REV_TMSTMP = ‘CHAR1’. “Updated info. user data field

**********************************************************************
*******Defination of Work Area Structrue [Import]-[POADDRVENDOR ] . “”PO Header: Address Structure BAPIADDR1 for Supplier
**********************************************************************
DATA: LS_POADDRVENDOR TYPE BAPIMEPOADDRVENDOR . “”PO Header: Address Structure BAPIADDR1 for Supplier
LS_POADDRVENDOR-PO_NUMBER = ‘CHAR10’. “Purchasing Document
LS_POADDRVENDOR-ADDR_NO = ‘CHAR10’. “Address Number
LS_POADDRVENDOR-FORMOFADDR = ‘CHAR20’. “Form of address
LS_POADDRVENDOR-NAME = ‘CHAR40’. “Name
LS_POADDRVENDOR-NAME_2 = ‘CHAR40’. “Name 2
LS_POADDRVENDOR-NAME_3 = ‘CHAR40’. “Name 3
LS_POADDRVENDOR-NAME_4 = ‘CHAR40’. “Name 4
LS_POADDRVENDOR-C_O_NAME = ‘CHAR40’. “c/o
LS_POADDRVENDOR-CITY = ‘CHAR40’. “City
LS_POADDRVENDOR-DISTRICT = ‘CHAR40’. “District
LS_POADDRVENDOR-CITY_NO = ‘CHAR12’. “City Code
LS_POADDRVENDOR-POSTL_COD1 = ‘CHAR10’. “Postal Code
LS_POADDRVENDOR-POSTL_COD2 = ‘CHAR10’. “PO Box Postal Code
LS_POADDRVENDOR-POSTL_COD3 = ‘CHAR10’. “Company Postal Code
LS_POADDRVENDOR-PO_BOX = ‘CHAR10’. “PO Box
LS_POADDRVENDOR-PO_BOX_CIT = ‘CHAR40’. “PO Box City
LS_POADDRVENDOR-DELIV_DIS = ‘CHAR15’. “Delivery District
LS_POADDRVENDOR-STREET = ‘CHAR40’. “Street
LS_POADDRVENDOR-STREET_NO = ‘CHAR12’. “Street Code
LS_POADDRVENDOR-STR_ABBR = ‘CHAR2’. “Street Abbreviation
LS_POADDRVENDOR-HOUSE_NO = ‘CHAR10’. “House Number
LS_POADDRVENDOR-STR_SUPPL1 = ‘CHAR40’. “Street 2
LS_POADDRVENDOR-STR_SUPPL2 = ‘CHAR40’. “Street 3
LS_POADDRVENDOR-LOCATION = ‘CHAR40’. “Street 5
LS_POADDRVENDOR-BUILDING = ‘CHAR10’. “Building code
LS_POADDRVENDOR-FLOOR = ‘CHAR10’. “Floor
LS_POADDRVENDOR-ROOM_NO = ‘CHAR10’. “Room Number
LS_POADDRVENDOR-COUNTRY = ‘CHAR3’. “Country/Region Key
LS_POADDRVENDOR-LANGU = ‘LANG1’. “Language Key
LS_POADDRVENDOR-REGION = ‘CHAR3’. “Region
LS_POADDRVENDOR-SORT1 = ‘CHAR20’. “Search Term 1
LS_POADDRVENDOR-SORT2 = ‘CHAR20’. “Search Term 2
LS_POADDRVENDOR-TIME_ZONE = ‘CHAR6’. “Time Zone
LS_POADDRVENDOR-TAXJURCODE = ‘CHAR15’. “Tax Jurisdiction
LS_POADDRVENDOR-ADR_NOTES = ‘CHAR50’. “Notes
LS_POADDRVENDOR-COMM_TYPE = ‘CHAR3’. “Comm. Method
LS_POADDRVENDOR-TEL1_NUMBR = ‘CHAR30’. “Telephone
LS_POADDRVENDOR-TEL1_EXT = ‘CHAR10’. “Extension
LS_POADDRVENDOR-FAX_NUMBER = ‘CHAR30’. “Fax
LS_POADDRVENDOR-FAX_EXTENS = ‘CHAR10’. “Extension
LS_POADDRVENDOR-STREET_LNG = ‘CHAR60’. “Street
LS_POADDRVENDOR-DISTRCT_NO = ‘CHAR8’. “District
LS_POADDRVENDOR-CHCKSTATUS = ‘CHAR1’. “Test stat./City file
LS_POADDRVENDOR-PBOXCIT_NO = ‘CHAR12’. “City Code
LS_POADDRVENDOR-TRANSPZONE = ‘CHAR10’. “Transportation Zone
LS_POADDRVENDOR-HOUSE_NO2 = ‘CHAR10’. “Supplement
LS_POADDRVENDOR-E_MAIL = ‘CHAR241’. “E-Mail Address
LS_POADDRVENDOR-STR_SUPPL3 = ‘CHAR40’. “Street 4
LS_POADDRVENDOR-TITLE = ‘CHAR30’. “Title
LS_POADDRVENDOR-COUNTRYISO = ‘CHAR2’. “ISO Code
LS_POADDRVENDOR-LANGU_ISO = ‘CHAR2’. “Language Code
LS_POADDRVENDOR-BUILD_LONG = ‘CHAR20’. “Building Code
LS_POADDRVENDOR-REGIOGROUP = ‘CHAR8’. “Structure Group
DATA: LV_TESTRUN TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_MEMORY_UNCOMPLETE TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_MEMORY_COMPLETE TYPE BAPIFLAG-BAPIFLAG .”Obligatory

**********************************************************************
*******Defination of Work Area Structrue [Import]-[POEXPIMPHEADER ] . “”Foreign Trade: Export/Import: Header Data
**********************************************************************
DATA: LS_POEXPIMPHEADER TYPE BAPIEIKP . “”Foreign Trade: Export/Import: Header Data
LS_POEXPIMPHEADER-TRANSPORT_MODE = ‘CHAR1’. “Mode of Transport
LS_POEXPIMPHEADER-CUSTOMS = ‘CHAR6’. “Customs office

**********************************************************************
*******Defination of Work Area Structrue [Import]-[POEXPIMPHEADERX ] . “”Foreign Trade: Import/Export Header Data (Change Parameter)
**********************************************************************
DATA: LS_POEXPIMPHEADERX TYPE BAPIEIKPX . “”Foreign Trade: Import/Export Header Data (Change Parameter)
LS_POEXPIMPHEADERX-TRANSPORT_MODE = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPHEADERX-CUSTOMS = ‘CHAR1’. “Updated info. user data field

**********************************************************************
*******Defination of Work Area Structrue [Import]-[VERSIONS ] . “”Version Management
**********************************************************************
DATA: LS_VERSIONS TYPE BAPIMEDCM . “”Version Management
LS_VERSIONS-POST_DATE = ‘20241208’. “Posting date
LS_VERSIONS-COMPLETED = ‘CHAR1’. “Version completed
LS_VERSIONS-REASON = ‘CHAR4’. “Reason for change
LS_VERSIONS-DESCRIPTION = ‘CHAR60’. “Text
LS_VERSIONS-REQ_BY = ‘CHAR12’. “Requester
LS_VERSIONS-REQ_BY_EXT = ‘CHAR20’. “External change no.
LS_VERSIONS-ACTIVITY = ‘CHAR1’. ”
DATA: LV_NO_MESSAGING TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_NO_MESSAGE_REQ TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_NO_AUTHORITY TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_NO_PRICE_FROM_PO TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_PARK_COMPLETE TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_PARK_UNCOMPLETE TYPE BAPIFLAG-BAPIFLAG .”Obligatory
DATA: LV_EXPPURCHASEORDER TYPE BAPIMEPOHEADER-PO_NUMBER .”Obligatory

**********************************************************************
*******Defination of Work Area Structrue [Export]-[EXPHEADER ] . “”Purchase Order Header Data
**********************************************************************
DATA: LS_EXPHEADER TYPE BAPIMEPOHEADER . “”Purchase Order Header Data

**********************************************************************
*******Defination of Work Area Structrue [Export]-[EXPPOEXPIMPHEADER ] . “”Foreign Trade: Export/Import: Header Data
**********************************************************************
DATA: LS_EXPPOEXPIMPHEADER TYPE BAPIEIKP . “”Foreign Trade: Export/Import: Header Data

**********************************************************************
*******Defination of [Tables]-[RETURN] .
**********************************************************************
DATA: LT_RETURN TYPE STANDARD TABLE OF BAPIRET2.””Return Parameter
DATA: LS_RETURN TYPE BAPIRET2 .””Return Parameter
LS_RETURN-TYPE = ‘CHAR1’. “Message type
LS_RETURN-ID = ‘CHAR20’. “Message Class
LS_RETURN-NUMBER = ‘NUMC3’. “Message Number
LS_RETURN-MESSAGE = ‘CHAR220’. “Message Text
LS_RETURN-LOG_NO = ‘CHAR20’. “Log Number
LS_RETURN-LOG_MSG_NO = ‘NUMC6’. “Message Serial No.
LS_RETURN-MESSAGE_V1 = ‘CHAR50’. “Message Variable
LS_RETURN-MESSAGE_V2 = ‘CHAR50’. “Message Variable
LS_RETURN-MESSAGE_V3 = ‘CHAR50’. “Message Variable
LS_RETURN-MESSAGE_V4 = ‘CHAR50’. “Message Variable
LS_RETURN-PARAMETER = ‘CHAR32’. “Parameter Name
LS_RETURN-ROW = ‘INT410’. “Lines in parameter
LS_RETURN-FIELD = ‘CHAR30’. “Field name
LS_RETURN-SYSTEM = ‘CHAR10’. “Logical system (source of message)
APPEND LS_RETURN TO LT_RETURN .
CLEAR LS_RETURN .

**********************************************************************
*******Defination of [Tables]-[POITEM] .
**********************************************************************
DATA: LT_POITEM TYPE STANDARD TABLE OF BAPIMEPOITEM.””Purchase Order Item
DATA: LS_POITEM TYPE BAPIMEPOITEM .””Purchase Order Item
LS_POITEM-PO_ITEM = ‘NUMC5’. “Item
LS_POITEM-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_POITEM-SHORT_TEXT = ‘CHAR40’. “Short Text
LS_POITEM-MATERIAL = ‘CHAR18’. “Material
LS_POITEM-MATERIAL_EXTERNAL = ‘CHAR40’. “Material Number
LS_POITEM-MATERIAL_GUID = ‘CHAR32’. “GUID (External)
LS_POITEM-MATERIAL_VERSION = ‘CHAR10’. “Version Number
LS_POITEM-EMATERIAL = ‘CHAR18’. “Material
LS_POITEM-EMATERIAL_EXTERNAL = ‘CHAR40’. “Material Number
LS_POITEM-EMATERIAL_GUID = ‘CHAR32’. “GUID (External)
LS_POITEM-EMATERIAL_VERSION = ‘CHAR10’. “Version Number
LS_POITEM-PLANT = ‘CHAR4’. “Plant
LS_POITEM-STGE_LOC = ‘CHAR4’. “Storage Location
LS_POITEM-TRACKINGNO = ‘CHAR10’. “Req. Tracking Number
LS_POITEM-MATL_GROUP = ‘CHAR9’. “Material Group
LS_POITEM-INFO_REC = ‘CHAR10’. “Purchasing info rec.
LS_POITEM-VEND_MAT = ‘CHAR35’. “Supplier Mat. No.
LS_POITEM-QUANTITY = ‘QUAN13’. “Order Quantity
LS_POITEM-PO_UNIT = ‘UNIT3’. “Order Unit
LS_POITEM-PO_UNIT_ISO = ‘CHAR3’. “Order unit in ISO
LS_POITEM-ORDERPR_UN = ‘UNIT3’. “Order Price Unit
LS_POITEM-ORDERPR_UN_ISO = ‘CHAR3’. “Order price unit ISO
LS_POITEM-CONV_NUM1 = ‘DEC5’. “Quantity Conversion
LS_POITEM-CONV_DEN1 = ‘DEC5’. “Quantity Conversion
LS_POITEM-NET_PRICE = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_POITEM-PRICE_UNIT = ‘DEC5’. “Price unit
LS_POITEM-GR_PR_TIME = ‘DEC3’. “GR processing time
LS_POITEM-TAX_CODE = ‘CHAR2’. “Tax Code
LS_POITEM-BON_GRP1 = ‘CHAR2’. “Settlement Group 1
LS_POITEM-QUAL_INSP = ‘CHAR1’. “Stock Type
LS_POITEM-INFO_UPD = ‘CHAR1’. “Info Record Update
LS_POITEM-PRNT_PRICE = ‘CHAR1’. “Print Price
LS_POITEM-EST_PRICE = ‘CHAR1’. “Estimated Price
LS_POITEM-REMINDER1 = ‘DEC3’. “1st Reminder/Exped.
LS_POITEM-REMINDER2 = ‘DEC3’. “2nd Reminder/Exped.
LS_POITEM-REMINDER3 = ‘DEC3’. “3rd Reminder/Exped.
LS_POITEM-OVER_DLV_TOL = ‘DEC3’. “Overdeliv. Tolerance
LS_POITEM-UNLIMITED_DLV = ‘CHAR1’. “Unltd Overdelivery
LS_POITEM-UNDER_DLV_TOL = ‘DEC3’. “Underdel. Tolerance
LS_POITEM-VAL_TYPE = ‘CHAR10’. “Valuation Type
LS_POITEM-NO_MORE_GR = ‘CHAR1’. “Delivery Completed
LS_POITEM-FINAL_INV = ‘CHAR1’. “Final Invoice
LS_POITEM-ITEM_CAT = ‘CHAR1’. “Item Category
LS_POITEM-ACCTASSCAT = ‘CHAR1’. “Acct Assignment Cat.
LS_POITEM-DISTRIB = ‘CHAR1’. “Distrib. Indicator
LS_POITEM-PART_INV = ‘CHAR1’. “Partial invoice
LS_POITEM-GR_IND = ‘CHAR1’. “Goods Receipt
LS_POITEM-GR_NON_VAL = ‘CHAR1’. “GR non-valuated
LS_POITEM-IR_IND = ‘CHAR1’. “Invoice Receipt
LS_POITEM-FREE_ITEM = ‘CHAR1’. “Free of Charge
LS_POITEM-GR_BASEDIV = ‘CHAR1’. “GR-Based Inv. Verif.
LS_POITEM-ACKN_REQD = ‘CHAR1’. “Acknowledgment Reqd.
LS_POITEM-ACKNOWL_NO = ‘CHAR20’. “Order Acknowledgment
LS_POITEM-AGREEMENT = ‘CHAR10’. “Outline agreement
LS_POITEM-AGMT_ITEM = ‘NUMC5’. “Princ. Agreement Item
LS_POITEM-SHIPPING = ‘CHAR2’. “Shipping Instr.
LS_POITEM-CUSTOMER = ‘CHAR10’. “Customer
LS_POITEM-COND_GROUP = ‘CHAR4’. “Condition Group
LS_POITEM-NO_DISCT = ‘CHAR1’. “No Cash Discount
LS_POITEM-PLAN_DEL = ‘DEC3’. “Planned Deliv. Time
LS_POITEM-NET_WEIGHT = ‘QUAN13’. “Net Weight
LS_POITEM-WEIGHTUNIT = ‘UNIT3’. “Unit of Weight
LS_POITEM-WEIGHTUNIT_ISO = ‘CHAR3’. “ISO code
LS_POITEM-TAXJURCODE = ‘CHAR15’. “Tax Jurisdiction
LS_POITEM-CTRL_KEY = ‘CHAR8’. “QM Control Key
LS_POITEM-CONF_CTRL = ‘CHAR4’. “Confirmation Control
LS_POITEM-REV_LEV = ‘CHAR2’. “Revision Level
LS_POITEM-FUND = ‘CHAR10’. “Fund
LS_POITEM-FUNDS_CTR = ‘CHAR16’. “Funds Center
LS_POITEM-CMMT_ITEM = ‘CHAR14’. “Commitment item
LS_POITEM-PRICEDATE = ‘CHAR1’. “Pricing Date Control
LS_POITEM-PRICE_DATE = ‘20241208’. “Price Date
LS_POITEM-GROSS_WT = ‘QUAN13’. “Gross Weight
LS_POITEM-VOLUME = ‘QUAN13’. “Volume
LS_POITEM-VOLUMEUNIT = ‘UNIT3’. “Volume Unit
LS_POITEM-VOLUMEUNIT_ISO = ‘CHAR3’. “Volume unit ISO
LS_POITEM-INCOTERMS1 = ‘CHAR3’. “Incoterms
LS_POITEM-INCOTERMS2 = ‘CHAR28’. “Incoterms (Part 2)
LS_POITEM-PRE_VENDOR = ‘CHAR10’. “Prior Supplier
LS_POITEM-VEND_PART = ‘CHAR6’. “Supplier Subrange
LS_POITEM-HL_ITEM = ‘NUMC5’. “Higher-Level Item
LS_POITEM-GR_TO_DATE = ‘20241208’. “Latest GR Date
LS_POITEM-SUPP_VENDOR = ‘CHAR10’. “Supplier
LS_POITEM-SC_VENDOR = ‘CHAR1’. “SC Supplier
LS_POITEM-KANBAN_IND = ‘CHAR1’. “Kanban Indicator
LS_POITEM-ERS = ‘CHAR1’. “Eval. Receipt Sett.
LS_POITEM-R_PROMO = ‘CHAR10’. “Retail Promotion
LS_POITEM-POINTS = ‘QUAN13’. “Points
LS_POITEM-POINT_UNIT = ‘UNIT3’. “Points Unit
LS_POITEM-POINT_UNIT_ISO = ‘CHAR3’. “ISO code
LS_POITEM-SEASON = ‘CHAR4’. “Season
LS_POITEM-SEASON_YR = ‘CHAR4’. “Season Year
LS_POITEM-BON_GRP2 = ‘CHAR2’. “Settlement Group 2
LS_POITEM-BON_GRP3 = ‘CHAR2’. “Settlement Group 3
LS_POITEM-SETT_ITEM = ‘CHAR1’. “Subseq. Settlement
LS_POITEM-MINREMLIFE = ‘DEC4’. “Min. Rem. Shelf Life
LS_POITEM-RFQ_NO = ‘CHAR10’. “RFQ
LS_POITEM-RFQ_ITEM = ‘NUMC5’. “Item
LS_POITEM-PREQ_NO = ‘CHAR10’. “Purchase Requisition
LS_POITEM-PREQ_ITEM = ‘NUMC5’. “Item of requisition
LS_POITEM-REF_DOC = ‘CHAR10’. “Reference Document
LS_POITEM-REF_ITEM = ‘NUMC5’. “Reference item
LS_POITEM-SI_CAT = ‘CHAR1’. “Subitem Category
LS_POITEM-RET_ITEM = ‘CHAR1’. “Returns Item
LS_POITEM-AT_RELEV = ‘CHAR1’. “Alloc.-Tab.-Relevant
LS_POITEM-ORDER_REASON = ‘CHAR3’. “Reason for Ordering
LS_POITEM-BRAS_NBM = ‘CHAR16’. “NCM Code
LS_POITEM-MATL_USAGE = ‘CHAR1’. “Material Usage
LS_POITEM-MAT_ORIGIN = ‘CHAR1’. “Material Origin
LS_POITEM-IN_HOUSE = ‘CHAR1’. “Produced in-house
LS_POITEM-INDUS3 = ‘CHAR2’. “Mat. CFOP category
LS_POITEM-INF_INDEX = ‘CHAR5’. “Inflation Index
LS_POITEM-UNTIL_DATE = ‘20241208’. “Inflation Index Date
LS_POITEM-DELIV_COMPL = ‘CHAR1’. “Final Delivery
LS_POITEM-PART_DELIV = ‘CHAR1’. “Partial Deliv./Item
LS_POITEM-SHIP_BLOCKED = ‘CHAR1’. “Shipping block
LS_POITEM-PREQ_NAME = ‘CHAR12’. “Requisitioner
LS_POITEM-PERIOD_IND_EXPIRATION_DATE = ‘CHAR1’. “Period Ind. for SLED
LS_POITEM-INT_OBJ_NO = ‘NUMC18’. “Internal object no.
LS_POITEM-PCKG_NO = ‘NUMC10’. “Package number
LS_POITEM-BATCH = ‘CHAR10’. “Batch
LS_POITEM-VENDRBATCH = ‘CHAR15’. “Supplier Batch
LS_POITEM-CALCTYPE = ‘CHAR1’. “Pricing Type
LS_POITEM-GRANT_NBR = ‘CHAR20’. “Grant
LS_POITEM-CMMT_ITEM_LONG = ‘CHAR24’. “Commitment Item
LS_POITEM-FUNC_AREA_LONG = ‘CHAR16’. “Functional Area
LS_POITEM-NO_ROUNDING = ‘CHAR1’. “No Rounding
LS_POITEM-PO_PRICE = ‘CHAR1’. “Price Adoption
LS_POITEM-SUPPL_STLOC = ‘CHAR4’. “Issuing Storage Loc.
LS_POITEM-SRV_BASED_IV = ‘CHAR1’. “Service-Based Invoice Verification
LS_POITEM-FUNDS_RES = ‘CHAR10’. “Earmarked Funds
LS_POITEM-RES_ITEM = ‘NUMC3’. “Document Item
LS_POITEM-ORIG_ACCEPT = ‘CHAR1’. “Origin Acceptance
LS_POITEM-ALLOC_TBL = ‘CHAR10’. “Allocation Table
LS_POITEM-ALLOC_TBL_ITEM = ‘NUMC5’. “Item
LS_POITEM-SRC_STOCK_TYPE = ‘CHAR1’. “Source Stor. Loc. Stock Type
LS_POITEM-REASON_REJ = ‘CHAR2’. “Reason for rejection
LS_POITEM-CRM_SALES_ORDER_NO = ‘CHAR10’. “CRM Sales Order Number for TPOP Process
LS_POITEM-CRM_SALES_ORDER_ITEM_NO = ‘NUMC6’. “CRM Sales Order Item Number in TPOP Proc
LS_POITEM-CRM_REF_SALES_ORDER_NO = ‘CHAR35’. “CRM Ref Order Number for TPOP Process
LS_POITEM-CRM_REF_SO_ITEM_NO = ‘CHAR6’. “CRM Reference Item Number in TPOP Proc
LS_POITEM-PRIO_URGENCY = ‘NUMC2’. “Requirement Urgency
LS_POITEM-PRIO_REQUIREMENT = ‘NUMC3’. “Requirement Priority
LS_POITEM-REASON_CODE = ‘CHAR4’. “Reason Code
LS_POITEM-FUND_LONG = ‘CHAR20’. “Fund
LS_POITEM-LONG_ITEM_NUMBER = ‘CHAR40’. “Hierarchy Number
LS_POITEM-EXTERNAL_SORT_NUMBER = ‘NUMC5’. “External Sort Number
LS_POITEM-EXTERNAL_HIERARCHY_TYPE = ‘CHAR4’. “Ext.Hierarchy Category
LS_POITEM-RETENTION_PERCENTAGE = ‘DEC5’. “Retention in Percent
LS_POITEM-DOWNPAY_TYPE = ‘CHAR4’. “Down Payment
LS_POITEM-DOWNPAY_AMOUNT = ‘DEC23’. “Down Payment Amt in BAPI
LS_POITEM-DOWNPAY_PERCENT = ‘DEC5’. “Down Payt Percentage
LS_POITEM-DOWNPAY_DUEDATE = ‘20241208’. “Due Date for Down Payment
LS_POITEM-EXT_RFX_NUMBER = ‘CHAR35’. “Document No. External Doc.
LS_POITEM-EXT_RFX_ITEM = ‘CHAR10’. “External Item Number
LS_POITEM-EXT_RFX_SYSTEM = ‘CHAR10’. “Logical System
LS_POITEM-SRM_CONTRACT_ID = ‘CHAR10’. “Central Contract
LS_POITEM-SRM_CONTRACT_ITM = ‘NUMC10’. “Central Contract Item
LS_POITEM-BUDGET_PERIOD = ‘CHAR10’. “Budget Period
LS_POITEM-BLOCK_REASON_ID = ‘CHAR4’. “Blocking Reason – ID
LS_POITEM-BLOCK_REASON_TEXT = ‘CHAR40’. “Blocking Reason Text
LS_POITEM-SPE_CRM_FKREL = ‘CHAR1’. “Billing Relevance CRM
LS_POITEM-DATE_QTY_FIXED = ‘CHAR1’. “Fixed Date and Qty
LS_POITEM-GI_BASED_GR = ‘CHAR1’. “GI-based goods rcpt
LS_POITEM-SHIPTYPE = ‘CHAR2’. “Shipping Type
LS_POITEM-HANDOVERLOC = ‘CHAR10’. “Handover Location
LS_POITEM-TC_AUT_DET = ‘CHAR2’. “Tax Code Automatically Determined
LS_POITEM-MANUAL_TC_REASON = ‘CHAR2’. “Manual Tax Code Reason
LS_POITEM-FISCAL_INCENTIVE = ‘CHAR4’. “Tax Incentive Type
LS_POITEM-FISCAL_INCENTIVE_ID = ‘CHAR4’. “Incentive ID
LS_POITEM-TAX_SUBJECT_ST = ‘CHAR1’. “Tax Subject to Substitui##o Tributивria
LS_POITEM-REQ_SEGMENT = ‘CHAR16’. “Requirement Segment
LS_POITEM-STK_SEGMENT = ‘CHAR16’. “Stock Segment
LS_POITEM-SF_TXJCD = ‘CHAR15’. “Origin Jurisd. Code
LS_POITEM-INCOTERMS2L = ‘CHAR70’. “Incoterms Location 1
LS_POITEM-INCOTERMS3L = ‘CHAR70’. “Incoterms Location 2
LS_POITEM-MATERIAL_LONG = ‘CHAR40’. “Material
LS_POITEM-EMATERIAL_LONG = ‘CHAR40’. “Material
LS_POITEM-SERVICEPERFORMER = ‘CHAR10’. “Service Performer
LS_POITEM-PRODUCTTYPE = ‘CHAR2’. “Product Type Group
LS_POITEM-STARTDATE = ‘20241208’. “Start Date for Period of Performance
LS_POITEM-ENDDATE = ‘20241208’. “End Date for Period of Performance
LS_POITEM-REQ_SEG_LONG = ‘CHAR40’. “Requirement Segment
LS_POITEM-STK_SEG_LONG = ‘CHAR40’. “Stock Segment
LS_POITEM-EXPECTED_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_POITEM-LIMIT_AMOUNT = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_POITEM-EXT_REF = ‘CHAR70’. “External Reference ID
LS_POITEM-GL_ACCOUNT = ‘CHAR10’. “G/L Account
LS_POITEM-COSTCENTER = ‘CHAR10’. “Cost Center
LS_POITEM-WBS_ELEMENT = ‘CHAR24’. “WBS Element
LS_POITEM-COMMODITY_CODE = ‘CHAR30’. “Commodity Code
LS_POITEM-INTRASTAT_SERVICE_CODE = ‘CHAR30’. “Intrastat Service Code
LS_POITEM-CONTRACT_FOR_LIMIT = ‘CHAR10’. “Purchase Contract for Limit
LS_POITEM-TAXCALCDATE = ‘20241208’. “Tax Date
LS_POITEM-TAXCOUNTRY = ‘CHAR3’. “Tax Country/Region
LS_POITEM-STATUS_PCS = ‘CHAR1’. “Product Compliance Supplier Check Status
LS_POITEM-STATUS_PMA = ‘CHAR1’. “Product Marketability Status
LS_POITEM-STATUS_DG = ‘CHAR1’. “Dangerous Goods Status
LS_POITEM-STATUS_SDS = ‘CHAR1’. “Safety Data Sheet Status
LS_POITEM-TXS_BUSINESS_TRANSACTION = ‘CHAR4’. “Business Transaction
LS_POITEM-TXS_USAGE_PURPOSE = ‘CHAR25’. “Usage Purpose
APPEND LS_POITEM TO LT_POITEM .
CLEAR LS_POITEM .

**********************************************************************
*******Defination of [Tables]-[POITEMX] .
**********************************************************************
DATA: LT_POITEMX TYPE STANDARD TABLE OF BAPIMEPOITEMX.””Purchase Order Item Data (Change Parameter)
DATA: LS_POITEMX TYPE BAPIMEPOITEMX .””Purchase Order Item Data (Change Parameter)
LS_POITEMX-PO_ITEM = ‘NUMC5’. “Item
LS_POITEMX-PO_ITEMX = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SHORT_TEXT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MATERIAL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MATERIAL_EXTERNAL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MATERIAL_GUID = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MATERIAL_VERSION = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EMATERIAL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EMATERIAL_EXTERNAL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EMATERIAL_GUID = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EMATERIAL_VERSION = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PLANT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-STGE_LOC = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TRACKINGNO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MATL_GROUP = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INFO_REC = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-VEND_MAT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-QUANTITY = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PO_UNIT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PO_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ORDERPR_UN = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ORDERPR_UN_ISO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CONV_NUM1 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CONV_DEN1 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-NET_PRICE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRICE_UNIT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GR_PR_TIME = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TAX_CODE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BON_GRP1 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-QUAL_INSP = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INFO_UPD = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRNT_PRICE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EST_PRICE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REMINDER1 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REMINDER2 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REMINDER3 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-OVER_DLV_TOL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-UNLIMITED_DLV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-UNDER_DLV_TOL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-VAL_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-NO_MORE_GR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FINAL_INV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ITEM_CAT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ACCTASSCAT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DISTRIB = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PART_INV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GR_IND = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GR_NON_VAL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-IR_IND = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FREE_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GR_BASEDIV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ACKN_REQD = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ACKNOWL_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-AGREEMENT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-AGMT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SHIPPING = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CUSTOMER = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-COND_GROUP = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-NO_DISCT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PLAN_DEL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-NET_WEIGHT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-WEIGHTUNIT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-WEIGHTUNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TAXJURCODE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CTRL_KEY = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CONF_CTRL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REV_LEV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FUND = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FUNDS_CTR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CMMT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRICEDATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRICE_DATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GROSS_WT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-VOLUME = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-VOLUMEUNIT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-VOLUMEUNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INCOTERMS1 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INCOTERMS2 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRE_VENDOR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-VEND_PART = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-HL_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GR_TO_DATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SUPP_VENDOR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SC_VENDOR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-KANBAN_IND = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ERS = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-R_PROMO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-POINTS = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-POINT_UNIT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-POINT_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SEASON = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SEASON_YR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BON_GRP2 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BON_GRP3 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SETT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MINREMLIFE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-RFQ_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-RFQ_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PREQ_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PREQ_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REF_DOC = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REF_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SI_CAT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-RET_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-AT_RELEV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ORDER_REASON = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BRAS_NBM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MATL_USAGE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MAT_ORIGIN = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-IN_HOUSE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INDUS3 = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INF_INDEX = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-UNTIL_DATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DELIV_COMPL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PART_DELIV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SHIP_BLOCKED = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PREQ_NAME = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PERIOD_IND_EXPIRATION_DATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INT_OBJ_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PCKG_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BATCH = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-VENDRBATCH = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CALCTYPE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-NO_ROUNDING = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PO_PRICE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SUPPL_STLOC = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SRV_BASED_IV = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FUNDS_RES = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-RES_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GRANT_NBR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FUNC_AREA_LONG = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ORIG_ACCEPT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ALLOC_TBL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ALLOC_TBL_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SRC_STOCK_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REASON_REJ = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CRM_SALES_ORDER_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CRM_SALES_ORDER_ITEM_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CRM_REF_SALES_ORDER_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CRM_REF_SO_ITEM_NO = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRIO_URGENCY = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRIO_REQUIREMENT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REASON_CODE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-LONG_ITEM_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EXTERNAL_SORT_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EXTERNAL_HIERARCHY_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-RETENTION_PERCENTAGE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DOWNPAY_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DOWNPAY_AMOUNT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DOWNPAY_PERCENT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DOWNPAY_DUEDATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EXT_RFX_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EXT_RFX_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EXT_RFX_SYSTEM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SRM_CONTRACT_ID = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SRM_CONTRACT_ITM = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BUDGET_PERIOD = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BLOCK_REASON_ID = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-BLOCK_REASON_TEXT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SPE_CRM_FKREL = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-DATE_QTY_FIXED = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GI_BASED_GR = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SHIPTYPE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-HANDOVERLOC = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TC_AUT_DET = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MANUAL_TC_REASON = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FISCAL_INCENTIVE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-FISCAL_INCENTIVE_ID = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TAX_SUBJECT_ST = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REQ_SEGMENT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-STK_SEGMENT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SF_TXJCD = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INCOTERMS2L = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INCOTERMS3L = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-MATERIAL_LONG = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EMATERIAL_LONG = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-SERVICEPERFORMER = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-PRODUCTTYPE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-STARTDATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-ENDDATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-REQ_SEG_LONG = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-STK_SEG_LONG = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EXPECTED_VALUE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-LIMIT_AMOUNT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-EXT_REF = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-GL_ACCOUNT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-COSTCENTER = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-WBS_ELEMENT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-COMMODITY_CODE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-INTRASTAT_SERVICE_CODE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-CONTRACT_FOR_LIMIT = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TAXCALCDATE = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TAXCOUNTRY = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TXS_BUSINESS_TRANSACTION = ‘CHAR1’. “Updated info. user data field
LS_POITEMX-TXS_USAGE_PURPOSE = ‘CHAR1’. “Updated info. user data field
APPEND LS_POITEMX TO LT_POITEMX .
CLEAR LS_POITEMX .

**********************************************************************
*******Defination of [Tables]-[POADDRDELIVERY] .
**********************************************************************
DATA: LT_POADDRDELIVERY TYPE STANDARD TABLE OF BAPIMEPOADDRDELIVERY.””PO Item: Address Structure BAPIADDR1 for Inbound Delivery
DATA: LS_POADDRDELIVERY TYPE BAPIMEPOADDRDELIVERY .””PO Item: Address Structure BAPIADDR1 for Inbound Delivery
LS_POADDRDELIVERY-PO_ITEM = ‘NUMC5’. “Item
LS_POADDRDELIVERY-ADDR_NO = ‘CHAR10’. “Address Number
LS_POADDRDELIVERY-FORMOFADDR = ‘CHAR20’. “Form of address
LS_POADDRDELIVERY-NAME = ‘CHAR40’. “Name
LS_POADDRDELIVERY-NAME_2 = ‘CHAR40’. “Name 2
LS_POADDRDELIVERY-NAME_3 = ‘CHAR40’. “Name 3
LS_POADDRDELIVERY-NAME_4 = ‘CHAR40’. “Name 4
LS_POADDRDELIVERY-C_O_NAME = ‘CHAR40’. “c/o
LS_POADDRDELIVERY-CITY = ‘CHAR40’. “City
LS_POADDRDELIVERY-DISTRICT = ‘CHAR40’. “District
LS_POADDRDELIVERY-CITY_NO = ‘CHAR12’. “City Code
LS_POADDRDELIVERY-POSTL_COD1 = ‘CHAR10’. “Postal Code
LS_POADDRDELIVERY-POSTL_COD2 = ‘CHAR10’. “PO Box Postal Code
LS_POADDRDELIVERY-POSTL_COD3 = ‘CHAR10’. “Company Postal Code
LS_POADDRDELIVERY-PO_BOX = ‘CHAR10’. “PO Box
LS_POADDRDELIVERY-PO_BOX_CIT = ‘CHAR40’. “PO Box City
LS_POADDRDELIVERY-DELIV_DIS = ‘CHAR15’. “Delivery District
LS_POADDRDELIVERY-STREET = ‘CHAR60’. “Street
LS_POADDRDELIVERY-STREET_NO = ‘CHAR12’. “Street Code
LS_POADDRDELIVERY-STR_ABBR = ‘CHAR2’. “Street Abbreviation
LS_POADDRDELIVERY-HOUSE_NO = ‘CHAR10’. “House Number
LS_POADDRDELIVERY-STR_SUPPL1 = ‘CHAR40’. “Street 2
LS_POADDRDELIVERY-STR_SUPPL2 = ‘CHAR40’. “Street 3
LS_POADDRDELIVERY-LOCATION = ‘CHAR40’. “Street 5
LS_POADDRDELIVERY-BUILDING = ‘CHAR10’. “Building code
LS_POADDRDELIVERY-FLOOR = ‘CHAR10’. “Floor
LS_POADDRDELIVERY-ROOM_NO = ‘CHAR10’. “Room Number
LS_POADDRDELIVERY-COUNTRY = ‘CHAR3’. “Country/Region Key
LS_POADDRDELIVERY-LANGU = ‘LANG1’. “Language Key
LS_POADDRDELIVERY-REGION = ‘CHAR3’. “Region
LS_POADDRDELIVERY-SORT1 = ‘CHAR20’. “Search Term 1
LS_POADDRDELIVERY-SORT2 = ‘CHAR20’. “Search Term 2
LS_POADDRDELIVERY-TIME_ZONE = ‘CHAR6’. “Time Zone
LS_POADDRDELIVERY-TAXJURCODE = ‘CHAR15’. “Tax Jurisdiction
LS_POADDRDELIVERY-ADR_NOTES = ‘CHAR50’. “Notes
LS_POADDRDELIVERY-COMM_TYPE = ‘CHAR3’. “Comm. Method
LS_POADDRDELIVERY-TEL1_NUMBR = ‘CHAR30’. “Telephone
LS_POADDRDELIVERY-TEL1_EXT = ‘CHAR10’. “Extension
LS_POADDRDELIVERY-FAX_NUMBER = ‘CHAR30’. “Fax
LS_POADDRDELIVERY-FAX_EXTENS = ‘CHAR10’. “Extension
LS_POADDRDELIVERY-STREET_LNG = ‘CHAR60’. “Street
LS_POADDRDELIVERY-DISTRCT_NO = ‘CHAR8’. “District
LS_POADDRDELIVERY-CHCKSTATUS = ‘CHAR1’. “Test stat./City file
LS_POADDRDELIVERY-PBOXCIT_NO = ‘CHAR12’. “City Code
LS_POADDRDELIVERY-TRANSPZONE = ‘CHAR10’. “Transportation Zone
LS_POADDRDELIVERY-HOUSE_NO2 = ‘CHAR10’. “Supplement
LS_POADDRDELIVERY-E_MAIL = ‘CHAR241’. “E-Mail Address
LS_POADDRDELIVERY-STR_SUPPL3 = ‘CHAR40’. “Street 4
LS_POADDRDELIVERY-TITLE = ‘CHAR30’. “Title
LS_POADDRDELIVERY-COUNTRYISO = ‘CHAR2’. “ISO Code
LS_POADDRDELIVERY-LANGU_ISO = ‘CHAR2’. “Language Code
LS_POADDRDELIVERY-BUILD_LONG = ‘CHAR20’. “Building Code
LS_POADDRDELIVERY-REGIOGROUP = ‘CHAR8’. “Structure Group
LS_POADDRDELIVERY-SUPP_VENDOR = ‘CHAR10’. “Supplier
LS_POADDRDELIVERY-CUSTOMER = ‘CHAR10’. “Customer
LS_POADDRDELIVERY-SC_VENDOR = ‘CHAR1’. “SC Supplier
APPEND LS_POADDRDELIVERY TO LT_POADDRDELIVERY .
CLEAR LS_POADDRDELIVERY .

**********************************************************************
*******Defination of [Tables]-[POSCHEDULE] .
**********************************************************************
DATA: LT_POSCHEDULE TYPE STANDARD TABLE OF BAPIMEPOSCHEDULE.””Fields for Purchase Order Delivery Schedule Lines
DATA: LS_POSCHEDULE TYPE BAPIMEPOSCHEDULE .””Fields for Purchase Order Delivery Schedule Lines
LS_POSCHEDULE-PO_ITEM = ‘NUMC5’. “Item
LS_POSCHEDULE-SCHED_LINE = ‘NUMC4’. “Schedule Line Number
LS_POSCHEDULE-DEL_DATCAT_EXT = ‘CHAR1’. “Deliv. date category
LS_POSCHEDULE-DELIVERY_DATE = ‘CHAR10’. “Delivery Date
LS_POSCHEDULE-QUANTITY = ‘QUAN13’. “Scheduled Quantity
LS_POSCHEDULE-DELIV_TIME = ‘000510’. “Time
LS_POSCHEDULE-STAT_DATE = ‘20241208’. “Stat.-Rel. Del. Date
LS_POSCHEDULE-PREQ_NO = ‘CHAR10’. “Purchase Requisition
LS_POSCHEDULE-PREQ_ITEM = ‘NUMC5’. “Item of requisition
LS_POSCHEDULE-PO_DATE = ‘20241208’. “Purchase Order Date
LS_POSCHEDULE-ROUTESCHED = ‘CHAR10’. “Route Schedule
LS_POSCHEDULE-MS_DATE = ‘20241208’. “Material Avail. Date
LS_POSCHEDULE-MS_TIME = ‘000510’. “Matl Staging Time
LS_POSCHEDULE-LOAD_DATE = ‘20241208’. “Loading Date
LS_POSCHEDULE-LOAD_TIME = ‘000510’. “Loading Time
LS_POSCHEDULE-TP_DATE = ‘20241208’. “Transptn Plang Date
LS_POSCHEDULE-TP_TIME = ‘000510’. “Transp. Plan. Time
LS_POSCHEDULE-GI_DATE = ‘20241208’. “Goods Issue Date
LS_POSCHEDULE-GI_TIME = ‘000510’. “Goods Issue Time
LS_POSCHEDULE-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_POSCHEDULE-REQ_CLOSED = ‘CHAR1’. “Closed
LS_POSCHEDULE-GR_END_DATE = ‘20241208’. “Goods Receipt End Date
LS_POSCHEDULE-GR_END_TIME = ‘000510’. “Goods Receipt End Time
LS_POSCHEDULE-COM_QTY = ‘QUAN13’. “Committed Quantity
LS_POSCHEDULE-COM_DATE = ‘20241208’. “Committed date
LS_POSCHEDULE-GEO_ROUTE = ‘CHAR10’. “Geographical Route
LS_POSCHEDULE-HANDOVERDATE = ‘20241208’. “Handover Date
LS_POSCHEDULE-HANDOVERTIME = ‘000510’. “Handover Time
APPEND LS_POSCHEDULE TO LT_POSCHEDULE .
CLEAR LS_POSCHEDULE .

**********************************************************************
*******Defination of [Tables]-[POSCHEDULEX] .
**********************************************************************
DATA: LT_POSCHEDULEX TYPE STANDARD TABLE OF BAPIMEPOSCHEDULX.””Fields for Schedule Lines in Purchase Order (Change Toolbar)
DATA: LS_POSCHEDULEX TYPE BAPIMEPOSCHEDULX .””Fields for Schedule Lines in Purchase Order (Change Toolbar)
LS_POSCHEDULEX-PO_ITEM = ‘NUMC5’. “Item
LS_POSCHEDULEX-SCHED_LINE = ‘NUMC4’. “Schedule Line Number
LS_POSCHEDULEX-PO_ITEMX = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-SCHED_LINEX = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-DEL_DATCAT_EXT = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-DELIVERY_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-QUANTITY = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-DELIV_TIME = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-STAT_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-PREQ_NO = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-PREQ_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-PO_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-ROUTESCHED = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-MS_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-MS_TIME = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-LOAD_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-LOAD_TIME = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-TP_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-TP_TIME = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-GI_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-GI_TIME = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-REQ_CLOSED = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-GR_END_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-GR_END_TIME = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-COM_QTY = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-COM_DATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-GEO_ROUTE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-HANDOVERDATE = ‘CHAR1’. “Updated info. user data field
LS_POSCHEDULEX-HANDOVERTIME = ‘CHAR1’. “Updated info. user data field
APPEND LS_POSCHEDULEX TO LT_POSCHEDULEX .
CLEAR LS_POSCHEDULEX .

**********************************************************************
*******Defination of [Tables]-[POACCOUNT] .
**********************************************************************
DATA: LT_POACCOUNT TYPE STANDARD TABLE OF BAPIMEPOACCOUNT.””Account Assignment Fields for Purchase Order
DATA: LS_POACCOUNT TYPE BAPIMEPOACCOUNT .””Account Assignment Fields for Purchase Order
LS_POACCOUNT-PO_ITEM = ‘NUMC5’. “Item
LS_POACCOUNT-SERIAL_NO = ‘NUMC2’. “Seq. No. of Account Assgt
LS_POACCOUNT-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_POACCOUNT-CREAT_DATE = ‘20241208’. “Created On
LS_POACCOUNT-QUANTITY = ‘QUAN13’. “Quantity
LS_POACCOUNT-DISTR_PERC = ‘DEC3’. “Distribution (%)
LS_POACCOUNT-NET_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_POACCOUNT-GL_ACCOUNT = ‘CHAR10’. “G/L Account
LS_POACCOUNT-BUS_AREA = ‘CHAR4’. “Business Area
LS_POACCOUNT-COSTCENTER = ‘CHAR10’. “Cost Center
LS_POACCOUNT-SD_DOC = ‘CHAR10’. “SD Document
LS_POACCOUNT-ITM_NUMBER = ‘NUMC6’. “Sales Document Item
LS_POACCOUNT-SCHED_LINE = ‘NUMC4’. “Schedule Line Number
LS_POACCOUNT-ASSET_NO = ‘CHAR12’. “Asset
LS_POACCOUNT-SUB_NUMBER = ‘CHAR4’. “Sub-number
LS_POACCOUNT-ORDERID = ‘CHAR12’. “Order
LS_POACCOUNT-GR_RCPT = ‘CHAR12’. “Goods Recipient
LS_POACCOUNT-UNLOAD_PT = ‘CHAR25’. “Unloading Point
LS_POACCOUNT-CO_AREA = ‘CHAR4’. “Controlling Area
LS_POACCOUNT-COSTOBJECT = ‘CHAR12’. “Cost Object
LS_POACCOUNT-PROFIT_CTR = ‘CHAR10’. “Profit Center
LS_POACCOUNT-WBS_ELEMENT = ‘CHAR24’. “WBS Element
LS_POACCOUNT-NETWORK = ‘CHAR12’. “Network
LS_POACCOUNT-RL_EST_KEY = ‘CHAR8’. “Real Estate Key
LS_POACCOUNT-PART_ACCT = ‘CHAR10’. “Partner
LS_POACCOUNT-CMMT_ITEM = ‘CHAR14’. “Commitment item
LS_POACCOUNT-REC_IND = ‘CHAR2’. “Recovery Indicator
LS_POACCOUNT-FUNDS_CTR = ‘CHAR16’. “Funds Center
LS_POACCOUNT-FUND = ‘CHAR10’. “Fund
LS_POACCOUNT-FUNC_AREA = ‘CHAR4’. “Functional Area
LS_POACCOUNT-REF_DATE = ‘20241208’. “Reference date
LS_POACCOUNT-TAX_CODE = ‘CHAR2’. “Tax Code
LS_POACCOUNT-TAXJURCODE = ‘CHAR15’. “Tax Jurisdiction
LS_POACCOUNT-NOND_ITAX = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_POACCOUNT-ACTTYPE = ‘CHAR6’. “Activity Type
LS_POACCOUNT-CO_BUSPROC = ‘CHAR12’. “Business Process
LS_POACCOUNT-RES_DOC = ‘CHAR10’. “Earmarked Funds
LS_POACCOUNT-RES_ITEM = ‘NUMC3’. “Document Item
LS_POACCOUNT-ACTIVITY = ‘CHAR4’. “Activity
LS_POACCOUNT-GRANT_NBR = ‘CHAR20’. “Grant
LS_POACCOUNT-CMMT_ITEM_LONG = ‘CHAR24’. “Commitment Item
LS_POACCOUNT-FUNC_AREA_LONG = ‘CHAR16’. “Functional Area
LS_POACCOUNT-BUDGET_PERIOD = ‘CHAR10’. “Budget Period
LS_POACCOUNT-FINAL_IND = ‘CHAR1’. “Final AA
LS_POACCOUNT-FINAL_REASON = ‘CHAR2’. “Final AA Reason
LS_POACCOUNT-SERVICE_DOC = ‘CHAR10’. “Service Document
LS_POACCOUNT-SERVICE_ITEM = ‘NUMC6’. “Service Document Item
LS_POACCOUNT-SERVICE_DOC_TYPE = ‘CHAR4’. “Service Document Type
APPEND LS_POACCOUNT TO LT_POACCOUNT .
CLEAR LS_POACCOUNT .

**********************************************************************
*******Defination of [Tables]-[POACCOUNTPROFITSEGMENT] .
**********************************************************************
DATA: LT_POACCOUNTPROFITSEGMENT TYPE STANDARD TABLE OF BAPIMEPOACCOUNTPROFITSEGMENT.””Reservation Profitability Seg.: BAPI_PROFITABILITY_SEGMENT
DATA: LS_POACCOUNTPROFITSEGMENT TYPE BAPIMEPOACCOUNTPROFITSEGMENT .””Reservation Profitability Seg.: BAPI_PROFITABILITY_SEGMENT
LS_POACCOUNTPROFITSEGMENT-PO_ITEM = ‘NUMC5’. “Item
LS_POACCOUNTPROFITSEGMENT-SERIAL_NO = ‘NUMC2’. “Seq. No. of Account Assgt
LS_POACCOUNTPROFITSEGMENT-FIELDNAME = ‘CHAR30’. “Field Name
LS_POACCOUNTPROFITSEGMENT-VALUE = ‘CHAR50’. “Characteristic value
APPEND LS_POACCOUNTPROFITSEGMENT TO LT_POACCOUNTPROFITSEGMENT .
CLEAR LS_POACCOUNTPROFITSEGMENT .

**********************************************************************
*******Defination of [Tables]-[POACCOUNTX] .
**********************************************************************
DATA: LT_POACCOUNTX TYPE STANDARD TABLE OF BAPIMEPOACCOUNTX.””Account Assignment Fields in Purchase Order (Change Toolbar)
DATA: LS_POACCOUNTX TYPE BAPIMEPOACCOUNTX .””Account Assignment Fields in Purchase Order (Change Toolbar)
LS_POACCOUNTX-PO_ITEM = ‘NUMC5’. “Item
LS_POACCOUNTX-SERIAL_NO = ‘NUMC2’. “Seq. No. of Account Assgt
LS_POACCOUNTX-PO_ITEMX = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-SERIAL_NOX = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-CREAT_DATE = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-QUANTITY = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-DISTR_PERC = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-NET_VALUE = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-GL_ACCOUNT = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-BUS_AREA = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-COSTCENTER = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-SD_DOC = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-ITM_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-SCHED_LINE = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-ASSET_NO = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-SUB_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-ORDERID = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-GR_RCPT = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-UNLOAD_PT = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-CO_AREA = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-COSTOBJECT = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-PROFIT_CTR = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-WBS_ELEMENT = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-NETWORK = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-RL_EST_KEY = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-PART_ACCT = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-CMMT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-REC_IND = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-FUNDS_CTR = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-FUND = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-FUNC_AREA = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-REF_DATE = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-TAX_CODE = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-TAXJURCODE = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-NOND_ITAX = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-ACTTYPE = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-CO_BUSPROC = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-RES_DOC = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-RES_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-ACTIVITY = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-GRANT_NBR = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-BUDGET_PERIOD = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-FINAL_IND = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-FINAL_REASON = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-SERVICE_DOC = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-SERVICE_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POACCOUNTX-SERVICE_DOC_TYPE = ‘CHAR1’. “Updated info. user data field
APPEND LS_POACCOUNTX TO LT_POACCOUNTX .
CLEAR LS_POACCOUNTX .

**********************************************************************
*******Defination of [Tables]-[POCONDHEADER] .
**********************************************************************
DATA: LT_POCONDHEADER TYPE STANDARD TABLE OF BAPIMEPOCONDHEADER.””Conditions (Header)
DATA: LS_POCONDHEADER TYPE BAPIMEPOCONDHEADER .””Conditions (Header)
LS_POCONDHEADER-CONDITION_NO = ‘CHAR10’. “Doc. Condition No.
LS_POCONDHEADER-ITM_NUMBER = ‘NUMC6’. “Item
LS_POCONDHEADER-COND_ST_NO = ‘NUMC3’. “Step Number
LS_POCONDHEADER-COND_COUNT = ‘NUMC2’. “Counter
LS_POCONDHEADER-COND_TYPE = ‘CHAR4’. “Condition Type
LS_POCONDHEADER-COND_VALUE = ‘DEC28’. “Condition Amount
LS_POCONDHEADER-CURRENCY = ‘CUKY5’. “Currency
LS_POCONDHEADER-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_POCONDHEADER-COND_UNIT = ‘UNIT3’. “Unit of Measure
LS_POCONDHEADER-COND_UNIT_ISO = ‘CHAR3’. “ISO condition UoM
LS_POCONDHEADER-COND_P_UNT = ‘DEC5’. “Pricing Unit
LS_POCONDHEADER-APPLICATIO = ‘CHAR2’. “Application
LS_POCONDHEADER-CONPRICDAT = ‘20241208’. “Conditn Pricing Date
LS_POCONDHEADER-CALCTYPCON = ‘CHAR1’. “Calculation Type
LS_POCONDHEADER-CONBASEVAL = ‘DEC28’. “Condition base value
LS_POCONDHEADER-CONEXCHRAT = ‘DEC9’. “Cond.exchange rate
LS_POCONDHEADER-NUMCONVERT = ‘DEC5’. “NumeratorForConvers.
LS_POCONDHEADER-DENOMINATO = ‘DEC5’. “Denom.for Conversion
LS_POCONDHEADER-CONDTYPE = ‘CHAR1’. “Condition Category
LS_POCONDHEADER-STAT_CON = ‘CHAR1’. “Statistical
LS_POCONDHEADER-SCALETYPE = ‘CHAR1’. “Scale Type
LS_POCONDHEADER-ACCRUALS = ‘CHAR1’. “Accruals
LS_POCONDHEADER-CONINVOLST = ‘CHAR1’. “Invoice List Cond.
LS_POCONDHEADER-CONDORIGIN = ‘CHAR1’. “Condition Origin
LS_POCONDHEADER-GROUPCOND = ‘CHAR1’. “Group Condition
LS_POCONDHEADER-COND_UPDAT = ‘CHAR1’. “Condition Update
LS_POCONDHEADER-ACCESS_SEQ = ‘NUMC2’. “Access
LS_POCONDHEADER-CONDCOUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_POCONDHEADER-CONDCNTRL = ‘CHAR1’. “Condition Control
LS_POCONDHEADER-CONDISACTI = ‘CHAR1’. “Inactive Condition
LS_POCONDHEADER-CONDCLASS = ‘CHAR1’. “Condition Class
LS_POCONDHEADER-FACTBASVAL = ‘FLTP16’. “Condition Factor
LS_POCONDHEADER-SCALEBASIN = ‘CHAR1’. “Scale Base Type
LS_POCONDHEADER-SCALBASVAL = ‘DEC28’. “Scale base value
LS_POCONDHEADER-UNITMEASUR = ‘UNIT3’. “Scale Unit of Meas.
LS_POCONDHEADER-UNITMEASUR_ISO = ‘CHAR3’. “ISO Code
LS_POCONDHEADER-CURRENCKEY = ‘CUKY5’. “Scale Currency
LS_POCONDHEADER-CURRENCKEY_ISO = ‘CHAR3’. “ISO Currency Code
LS_POCONDHEADER-CONDINCOMP = ‘CHAR1’. “Intercomp.Billing
LS_POCONDHEADER-CONDCONFIG = ‘CHAR1’. “UsedforVariantConfig
LS_POCONDHEADER-CONDCHAMAN = ‘CHAR1’. “Changed Manually
LS_POCONDHEADER-COND_NO = ‘CHAR10’. “Condition Record No.
LS_POCONDHEADER-CHANGE_ID = ‘CHAR1’. “Change Indicator
LS_POCONDHEADER-VENDOR_NO = ‘CHAR10’. “Supplier
LS_POCONDHEADER-ACCESS_SEQ_LONG = ‘NUMC3’. “Access
LS_POCONDHEADER-COND_COUNT_LONG = ‘NUMC3’. “Counter
APPEND LS_POCONDHEADER TO LT_POCONDHEADER .
CLEAR LS_POCONDHEADER .

**********************************************************************
*******Defination of [Tables]-[POCONDHEADERX] .
**********************************************************************
DATA: LT_POCONDHEADERX TYPE STANDARD TABLE OF BAPIMEPOCONDHEADERX.””Conditions (Header, Change Bar)
DATA: LS_POCONDHEADERX TYPE BAPIMEPOCONDHEADERX .””Conditions (Header, Change Bar)
LS_POCONDHEADERX-CONDITION_NO = ‘CHAR10’. “Doc. Condition No.
LS_POCONDHEADERX-ITM_NUMBER = ‘NUMC6’. “Item
LS_POCONDHEADERX-COND_ST_NO = ‘NUMC3’. “Step Number
LS_POCONDHEADERX-CONDITION_NOX = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-ITM_NUMBERX = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_ST_NOX = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_COUNT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_VALUE = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CURRENCY = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CURRENCY_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_UNIT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_P_UNT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-APPLICATIO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONPRICDAT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CALCTYPCON = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONBASEVAL = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONEXCHRAT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-NUMCONVERT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-DENOMINATO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDTYPE = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-STAT_CON = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-SCALETYPE = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-ACCRUALS = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONINVOLST = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDORIGIN = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-GROUPCOND = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_UPDAT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-ACCESS_SEQ = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDCOUNT = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDCNTRL = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDISACTI = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDCLASS = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-FACTBASVAL = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-SCALEBASIN = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-SCALBASVAL = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-UNITMEASUR = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-UNITMEASUR_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CURRENCKEY = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CURRENCKEY_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDINCOMP = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDCONFIG = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CONDCHAMAN = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_NO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-CHANGE_ID = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-VENDOR_NO = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-ACCESS_SEQ_LONG = ‘CHAR1’. “Updated info. user data field
LS_POCONDHEADERX-COND_COUNT_LONG = ‘CHAR1’. “Updated info. user data field
APPEND LS_POCONDHEADERX TO LT_POCONDHEADERX .
CLEAR LS_POCONDHEADERX .

**********************************************************************
*******Defination of [Tables]-[POCOND] .
**********************************************************************
DATA: LT_POCOND TYPE STANDARD TABLE OF BAPIMEPOCOND.””Conditions in Purchase Order
DATA: LS_POCOND TYPE BAPIMEPOCOND .””Conditions in Purchase Order
LS_POCOND-CONDITION_NO = ‘CHAR10’. “Doc. Condition No.
LS_POCOND-ITM_NUMBER = ‘NUMC6’. “Item
LS_POCOND-COND_ST_NO = ‘NUMC3’. “Step Number
LS_POCOND-COND_COUNT = ‘NUMC2’. “Counter
LS_POCOND-COND_TYPE = ‘CHAR4’. “Condition Type
LS_POCOND-COND_VALUE = ‘DEC28’. “Condition Amount
LS_POCOND-CURRENCY = ‘CUKY5’. “Currency
LS_POCOND-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_POCOND-COND_UNIT = ‘UNIT3’. “Unit of Measure
LS_POCOND-COND_UNIT_ISO = ‘CHAR3’. “ISO condition UoM
LS_POCOND-COND_P_UNT = ‘DEC5’. “Pricing Unit
LS_POCOND-APPLICATIO = ‘CHAR2’. “Application
LS_POCOND-CONPRICDAT = ‘20241208’. “Conditn Pricing Date
LS_POCOND-CALCTYPCON = ‘CHAR1’. “Calculation Type
LS_POCOND-CONBASEVAL = ‘DEC28’. “Condition base value
LS_POCOND-CONEXCHRAT = ‘DEC9’. “Cond.exchange rate
LS_POCOND-NUMCONVERT = ‘DEC5’. “NumeratorForConvers.
LS_POCOND-DENOMINATO = ‘DEC5’. “Denom.for Conversion
LS_POCOND-CONDTYPE = ‘CHAR1’. “Condition Category
LS_POCOND-STAT_CON = ‘CHAR1’. “Statistical
LS_POCOND-SCALETYPE = ‘CHAR1’. “Scale Type
LS_POCOND-ACCRUALS = ‘CHAR1’. “Accruals
LS_POCOND-CONINVOLST = ‘CHAR1’. “Invoice List Cond.
LS_POCOND-CONDORIGIN = ‘CHAR1’. “Condition Origin
LS_POCOND-GROUPCOND = ‘CHAR1’. “Group Condition
LS_POCOND-COND_UPDAT = ‘CHAR1’. “Condition Update
LS_POCOND-ACCESS_SEQ = ‘NUMC2’. “Access
LS_POCOND-CONDCOUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_POCOND-CONDCNTRL = ‘CHAR1’. “Condition Control
LS_POCOND-CONDISACTI = ‘CHAR1’. “Inactive Condition
LS_POCOND-CONDCLASS = ‘CHAR1’. “Condition Class
LS_POCOND-FACTBASVAL = ‘FLTP16’. “Condition Factor
LS_POCOND-SCALEBASIN = ‘CHAR1’. “Scale Base Type
LS_POCOND-SCALBASVAL = ‘DEC28’. “Scale base value
LS_POCOND-UNITMEASUR = ‘UNIT3’. “Scale Unit of Meas.
LS_POCOND-UNITMEASUR_ISO = ‘CHAR3’. “ISO Code
LS_POCOND-CURRENCKEY = ‘CUKY5’. “Scale Currency
LS_POCOND-CURRENCKEY_ISO = ‘CHAR3’. “ISO Currency Code
LS_POCOND-CONDINCOMP = ‘CHAR1’. “Intercomp.Billing
LS_POCOND-CONDCONFIG = ‘CHAR1’. “UsedforVariantConfig
LS_POCOND-CONDCHAMAN = ‘CHAR1’. “Changed Manually
LS_POCOND-COND_NO = ‘CHAR10’. “Condition Record No.
LS_POCOND-CHANGE_ID = ‘CHAR1’. “Change Indicator
LS_POCOND-VENDOR_NO = ‘CHAR10’. “Supplier
LS_POCOND-ACCESS_SEQ_LONG = ‘NUMC3’. “Access
LS_POCOND-COND_COUNT_LONG = ‘NUMC3’. “Counter
APPEND LS_POCOND TO LT_POCOND .
CLEAR LS_POCOND .

**********************************************************************
*******Defination of [Tables]-[POCONDX] .
**********************************************************************
DATA: LT_POCONDX TYPE STANDARD TABLE OF BAPIMEPOCONDX.””Change Toolbar: Conditions in Purchase Order
DATA: LS_POCONDX TYPE BAPIMEPOCONDX .””Change Toolbar: Conditions in Purchase Order
LS_POCONDX-CONDITION_NO = ‘CHAR10’. “Doc. Condition No.
LS_POCONDX-ITM_NUMBER = ‘NUMC6’. “Item
LS_POCONDX-COND_ST_NO = ‘NUMC3’. “Step Number
LS_POCONDX-CONDITION_NOX = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-ITM_NUMBERX = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_ST_NOX = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_COUNT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_VALUE = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CURRENCY = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CURRENCY_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_UNIT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_P_UNT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-APPLICATIO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONPRICDAT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CALCTYPCON = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONBASEVAL = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONEXCHRAT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-NUMCONVERT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-DENOMINATO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDTYPE = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-STAT_CON = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-SCALETYPE = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-ACCRUALS = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONINVOLST = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDORIGIN = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-GROUPCOND = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_UPDAT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-ACCESS_SEQ = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDCOUNT = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDCNTRL = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDISACTI = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDCLASS = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-FACTBASVAL = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-SCALEBASIN = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-SCALBASVAL = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-UNITMEASUR = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-UNITMEASUR_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CURRENCKEY = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CURRENCKEY_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDINCOMP = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDCONFIG = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CONDCHAMAN = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_NO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-CHANGE_ID = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-VENDOR_NO = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-ACCESS_SEQ_LONG = ‘CHAR1’. “Updated info. user data field
LS_POCONDX-COND_COUNT_LONG = ‘CHAR1’. “Updated info. user data field
APPEND LS_POCONDX TO LT_POCONDX .
CLEAR LS_POCONDX .

**********************************************************************
*******Defination of [Tables]-[POLIMITS] .
**********************************************************************
DATA: LT_POLIMITS TYPE STANDARD TABLE OF BAPIESUHC.””Communication Structure: Limits
DATA: LS_POLIMITS TYPE BAPIESUHC .””Communication Structure: Limits
LS_POLIMITS-PCKG_NO = ‘NUMC10’. “Package number
LS_POLIMITS-LIMIT = ‘DEC23’. ”
LS_POLIMITS-NO_LIMIT = ‘CHAR1’. “No Limit
LS_POLIMITS-EXP_VALUE = ‘DEC23’. ”
LS_POLIMITS-SSC_EXIST = ‘CHAR1’. “Service types
LS_POLIMITS-CON_EXIST = ‘CHAR1’. “Contract items
LS_POLIMITS-TMP_EXIST = ‘CHAR1’. “Service packages
LS_POLIMITS-PRICE_CHG = ‘CHAR1’. “Price Change in Entry Sheet Allowed
LS_POLIMITS-FREE_LIMIT = ‘DEC23’. ”
LS_POLIMITS-NO_FRLIMIT = ‘CHAR1’. “No Limit
LS_POLIMITS-SERV_TYPE = ‘CHAR3’. “Service Type
LS_POLIMITS-EDITION = ‘NUMC4’. “Edition
LS_POLIMITS-SSC_LIMIT = ‘DEC23’. ”
LS_POLIMITS-SSC_NOLIM = ‘CHAR1’. “Unlimited
LS_POLIMITS-SSC_PRSCHG = ‘CHAR1’. “Price ch. in entry sh.
LS_POLIMITS-SSC_PERC = ‘DEC3’. ”
LS_POLIMITS-TMP_NUMBER = ‘CHAR10’. “Model Serv. Specifications
LS_POLIMITS-TMP_LIMIT = ‘DEC23’. ”
LS_POLIMITS-TMP_NOLIM = ‘CHAR1’. “Unlimited
LS_POLIMITS-TMP_PRSCHG = ‘CHAR1’. “Price Change in Entry Sheet Allowed
LS_POLIMITS-TMP_PERC = ‘DEC3’. “Percentage
LS_POLIMITS-CONT_PERC = ‘DEC3’. “Percentage
APPEND LS_POLIMITS TO LT_POLIMITS .
CLEAR LS_POLIMITS .

**********************************************************************
*******Defination of [Tables]-[POCONTRACTLIMITS] .
**********************************************************************
DATA: LT_POCONTRACTLIMITS TYPE STANDARD TABLE OF BAPIESUCC.””Communication Structure: Contract Limits
DATA: LS_POCONTRACTLIMITS TYPE BAPIESUCC .””Communication Structure: Contract Limits
LS_POCONTRACTLIMITS-PCKG_NO = ‘NUMC10’. “Package number
LS_POCONTRACTLIMITS-LINE_NO = ‘NUMC10’. “Internal line
LS_POCONTRACTLIMITS-CON_NUMBER = ‘CHAR10’. ”
LS_POCONTRACTLIMITS-CON_ITEM = ‘NUMC5’. ”
LS_POCONTRACTLIMITS-LIMIT = ‘DEC23’. ”
LS_POCONTRACTLIMITS-NO_LIMIT = ‘CHAR1’. “No Limit
LS_POCONTRACTLIMITS-PRICE_CHG = ‘CHAR1’. “Price Change in Entry Sheet Allowed
LS_POCONTRACTLIMITS-SHORT_TEXT = ‘CHAR40’. “Short Text 1
LS_POCONTRACTLIMITS-DELETE_IND = ‘CHAR1’. “Deletion Indicator
APPEND LS_POCONTRACTLIMITS TO LT_POCONTRACTLIMITS .
CLEAR LS_POCONTRACTLIMITS .

**********************************************************************
*******Defination of [Tables]-[POSERVICES] .
**********************************************************************
DATA: LT_POSERVICES TYPE STANDARD TABLE OF BAPIESLLC.””Communication Structure: Create Service Line
DATA: LS_POSERVICES TYPE BAPIESLLC .””Communication Structure: Create Service Line
LS_POSERVICES-PCKG_NO = ‘NUMC10’. “Package number
LS_POSERVICES-LINE_NO = ‘NUMC10’. “Internal line number
LS_POSERVICES-EXT_LINE = ‘NUMC10’. “Line Number
LS_POSERVICES-OUTL_LEVEL = ‘INT13’. “Hierarchy level
LS_POSERVICES-OUTL_NO = ‘CHAR8’. “Outline Level
LS_POSERVICES-OUTL_IND = ‘CHAR1’. “Indicator: outline
LS_POSERVICES-SUBPCKG_NO = ‘NUMC10’. “Package
LS_POSERVICES-SERVICE = ‘CHAR18’. “Activity number
LS_POSERVICES-SERV_TYPE = ‘CHAR3’. “Service Type
LS_POSERVICES-EDITION = ‘NUMC4’. “Edition
LS_POSERVICES-SSC_ITEM = ‘CHAR18’. “SSC Item
LS_POSERVICES-EXT_SERV = ‘CHAR18’. “External Service No.
LS_POSERVICES-QUANTITY = ‘QUAN13’. “Quantity
LS_POSERVICES-BASE_UOM = ‘UNIT3’. “Base Unit of Measure
LS_POSERVICES-UOM_ISO = ‘CHAR3’. “ISO Code
LS_POSERVICES-OVF_TOL = ‘DEC3’. “Overfulfillment Tol.
LS_POSERVICES-OVF_UNLIM = ‘CHAR1’. “Unlimited Overfulf.
LS_POSERVICES-PRICE_UNIT = ‘DEC5’. “Price unit
LS_POSERVICES-GR_PRICE = ‘DEC23’. ”
LS_POSERVICES-FROM_LINE = ‘CHAR6’. “Lower Limit
LS_POSERVICES-TO_LINE = ‘CHAR6’. “Upper Limit
LS_POSERVICES-SHORT_TEXT = ‘CHAR40’. “Short Text
LS_POSERVICES-DISTRIB = ‘CHAR1’. “Distrib. Indicator
LS_POSERVICES-PERS_NO = ‘NUMC8’. “Personnel Number
LS_POSERVICES-WAGETYPE = ‘CHAR4’. “Wage Type
LS_POSERVICES-PLN_PCKG = ‘NUMC10’. “P
LS_POSERVICES-PLN_LINE = ‘NUMC10’. “I
LS_POSERVICES-CON_PCKG = ‘NUMC10’. ”
LS_POSERVICES-CON_LINE = ‘NUMC10’. ”
LS_POSERVICES-TMP_PCKG = ‘NUMC10’. ”
LS_POSERVICES-TMP_LINE = ‘NUMC10’. ”
LS_POSERVICES-SSC_LIM = ‘CHAR1’. “SSC limits
LS_POSERVICES-LIMIT_LINE = ‘NUMC10’. ”
LS_POSERVICES-TARGET_VAL = ‘DEC23’. ”
LS_POSERVICES-BASLINE_NO = ‘NUMC10’. “Alternative
LS_POSERVICES-BASIC_LINE = ‘CHAR1’. “Basic Line
LS_POSERVICES-ALTERNAT = ‘CHAR1’. “Alternative Line
LS_POSERVICES-BIDDER = ‘CHAR1’. “Bidder’s Line
LS_POSERVICES-SUPP_LINE = ‘CHAR1’. “Supplementary Line
LS_POSERVICES-OPEN_QTY = ‘CHAR1’. “Line with Open Qty
LS_POSERVICES-INFORM = ‘CHAR1’. “Informatory Line
LS_POSERVICES-BLANKET = ‘CHAR1’. “Blanket Line
LS_POSERVICES-EVENTUAL = ‘CHAR1’. “Contingency Line
LS_POSERVICES-TAX_CODE = ‘CHAR2’. “Tax Code
LS_POSERVICES-TAXJURCODE = ‘CHAR15’. “Tax Jurisdiction
LS_POSERVICES-PRICE_CHG = ‘CHAR1’. “Price Change in Entry Sheet Allowed
LS_POSERVICES-MATL_GROUP = ‘CHAR9’. “Material Group
LS_POSERVICES-DATE = ‘20241208’. “Date
LS_POSERVICES-BEGINTIME = ‘000510’. “Start time
LS_POSERVICES-ENDTIME = ‘000510’. “End time
LS_POSERVICES-EXTPERS_NO = ‘CHAR40’. “Personnel Number
LS_POSERVICES-FORMULA = ‘CHAR10’. “Formula
LS_POSERVICES-FORM_VAL1 = ‘QUAN13’. “Formula Value
LS_POSERVICES-FORM_VAL2 = ‘QUAN13’. ”
LS_POSERVICES-FORM_VAL3 = ‘QUAN13’. ”
LS_POSERVICES-FORM_VAL4 = ‘QUAN13’. ”
LS_POSERVICES-FORM_VAL5 = ‘QUAN13’. ”
LS_POSERVICES-USERF1_NUM = ‘NUMC10’. “User Field
LS_POSERVICES-USERF2_NUM = ‘QUAN13’. “User Field
LS_POSERVICES-USERF1_TXT = ‘CHAR40’. “User Field
LS_POSERVICES-USERF2_TXT = ‘CHAR10’. “User Field
LS_POSERVICES-HI_LINE_NO = ‘NUMC10’. ”
LS_POSERVICES-EXTREFKEY = ‘CHAR40’. “External Reference Key for Service
LS_POSERVICES-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_POSERVICES-PER_SDATE = ‘20241208’. “PoP Start Date
LS_POSERVICES-PER_EDATE = ‘20241208’. “PoP End Date
LS_POSERVICES-EXTERNAL_ITEM_ID = ‘CHAR40’. “SRM Reference Key
LS_POSERVICES-SERVICE_ITEM_KEY = ‘NUMC10’. “Item ID
LS_POSERVICES-NET_VALUE = ‘DEC23’. ”
APPEND LS_POSERVICES TO LT_POSERVICES .
CLEAR LS_POSERVICES .

**********************************************************************
*******Defination of [Tables]-[POSRVACCESSVALUES] .
**********************************************************************
DATA: LT_POSRVACCESSVALUES TYPE STANDARD TABLE OF BAPIESKLC.””Create Comm. Structure: Acct Assgt Distr. for Service Line
DATA: LS_POSRVACCESSVALUES TYPE BAPIESKLC .””Create Comm. Structure: Acct Assgt Distr. for Service Line
LS_POSRVACCESSVALUES-PCKG_NO = ‘NUMC10’. “Package number
LS_POSRVACCESSVALUES-LINE_NO = ‘NUMC10’. “Line
LS_POSRVACCESSVALUES-SERNO_LINE = ‘NUMC2’. “Seq. No. Acc. Assgt
LS_POSRVACCESSVALUES-PERCENTAGE = ‘DEC4’. “Percentage
LS_POSRVACCESSVALUES-SERIAL_NO = ‘NUMC2’. “Seq. No. of Account Assgt
LS_POSRVACCESSVALUES-QUANTITY = ‘QUAN13’. “Quantity
LS_POSRVACCESSVALUES-NET_VALUE = ‘CURR11’. “Net Value
APPEND LS_POSRVACCESSVALUES TO LT_POSRVACCESSVALUES .
CLEAR LS_POSRVACCESSVALUES .

**********************************************************************
*******Defination of [Tables]-[POSERVICESTEXT] .
**********************************************************************
DATA: LT_POSERVICESTEXT TYPE STANDARD TABLE OF BAPIESLLTX.””BAPI Services Long Text
DATA: LS_POSERVICESTEXT TYPE BAPIESLLTX .””BAPI Services Long Text
LS_POSERVICESTEXT-PCKG_NO = ‘NUMC10’. “Package number
LS_POSERVICESTEXT-LINE_NO = ‘NUMC10’. “Internal line number
LS_POSERVICESTEXT-TEXT_ID = ‘CHAR4’. “Text ID
LS_POSERVICESTEXT-FORMAT_COL = ‘CHAR2’. “Tag column
LS_POSERVICESTEXT-TEXT_LINE = ‘CHAR132’. ”
APPEND LS_POSERVICESTEXT TO LT_POSERVICESTEXT .
CLEAR LS_POSERVICESTEXT .

**********************************************************************
*******Defination of [Tables]-[EXTENSIONIN] .
**********************************************************************
DATA: LT_EXTENSIONIN TYPE STANDARD TABLE OF BAPIPAREX.””Ref. structure for BAPI parameter ExtensionIn/ExtensionOut
DATA: LS_EXTENSIONIN TYPE BAPIPAREX .””Ref. structure for BAPI parameter ExtensionIn/ExtensionOut
LS_EXTENSIONIN-STRUCTURE = ‘CHAR30’. “BAPI table extension struct.
LS_EXTENSIONIN-VALUEPART1 = ‘CHAR240’. “Data
LS_EXTENSIONIN-VALUEPART2 = ‘CHAR240’. “Data
LS_EXTENSIONIN-VALUEPART3 = ‘CHAR240’. “Data
LS_EXTENSIONIN-VALUEPART4 = ‘CHAR240’. “Data
APPEND LS_EXTENSIONIN TO LT_EXTENSIONIN .
CLEAR LS_EXTENSIONIN .

**********************************************************************
*******Defination of [Tables]-[EXTENSIONOUT] .
**********************************************************************
DATA: LT_EXTENSIONOUT TYPE STANDARD TABLE OF BAPIPAREX.””Ref. structure for BAPI parameter ExtensionIn/ExtensionOut
DATA: LS_EXTENSIONOUT TYPE BAPIPAREX .””Ref. structure for BAPI parameter ExtensionIn/ExtensionOut
LS_EXTENSIONOUT-STRUCTURE = ‘CHAR30’. “BAPI table extension struct.
LS_EXTENSIONOUT-VALUEPART1 = ‘CHAR240’. “Data
LS_EXTENSIONOUT-VALUEPART2 = ‘CHAR240’. “Data
LS_EXTENSIONOUT-VALUEPART3 = ‘CHAR240’. “Data
LS_EXTENSIONOUT-VALUEPART4 = ‘CHAR240’. “Data
APPEND LS_EXTENSIONOUT TO LT_EXTENSIONOUT .
CLEAR LS_EXTENSIONOUT .

**********************************************************************
*******Defination of [Tables]-[POEXPIMPITEM] .
**********************************************************************
DATA: LT_POEXPIMPITEM TYPE STANDARD TABLE OF BAPIEIPO.””Foreign Trade: Export/Import: Item Data
DATA: LS_POEXPIMPITEM TYPE BAPIEIPO .””Foreign Trade: Export/Import: Item Data
LS_POEXPIMPITEM-PO_ITEM = ‘NUMC5’. “Item
LS_POEXPIMPITEM-BUSINESS_TRANSACTION_TYPE = ‘CHAR2’. “Business Trans. Type
LS_POEXPIMPITEM-EXPORT_IMPORT_PROCEDURE = ‘CHAR8’. “Procedure
LS_POEXPIMPITEM-COUNTRYORI = ‘CHAR3’. “Cntry/Reg of Origin
LS_POEXPIMPITEM-COUNTRYORI_ISO = ‘CHAR2’. “ISO Code
LS_POEXPIMPITEM-REGIONORIG = ‘CHAR3’. “Region of Origin
LS_POEXPIMPITEM-COMM_CODE = ‘CHAR17’. “Commodity Code
LS_POEXPIMPITEM-SHIPPING_COUNTRY = ‘CHAR3’. “Country of dispatch
LS_POEXPIMPITEM-SHIPPING_COUNTRY_ISO = ‘CHAR2’. “ISO Code
APPEND LS_POEXPIMPITEM TO LT_POEXPIMPITEM .
CLEAR LS_POEXPIMPITEM .

**********************************************************************
*******Defination of [Tables]-[POEXPIMPITEMX] .
**********************************************************************
DATA: LT_POEXPIMPITEMX TYPE STANDARD TABLE OF BAPIEIPOX.””Foreign Trade: Import/Export: Item Data (Change Parameter)
DATA: LS_POEXPIMPITEMX TYPE BAPIEIPOX .””Foreign Trade: Import/Export: Item Data (Change Parameter)
LS_POEXPIMPITEMX-PO_ITEM = ‘NUMC5’. “Item
LS_POEXPIMPITEMX-BUSINESS_TRANSACTION_TYPE = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPITEMX-EXPORT_IMPORT_PROCEDURE = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPITEMX-COUNTRYORI = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPITEMX-COUNTRYORI_ISO = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPITEMX-REGIONORIG = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPITEMX-COMM_CODE = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPITEMX-SHIPPING_COUNTRY = ‘CHAR1’. “Updated info. user data field
LS_POEXPIMPITEMX-SHIPPING_COUNTRY_ISO = ‘CHAR1’. “Updated info. user data field
APPEND LS_POEXPIMPITEMX TO LT_POEXPIMPITEMX .
CLEAR LS_POEXPIMPITEMX .

**********************************************************************
*******Defination of [Tables]-[POTEXTHEADER] .
**********************************************************************
DATA: LT_POTEXTHEADER TYPE STANDARD TABLE OF BAPIMEPOTEXTHEADER.””Header Texts
DATA: LS_POTEXTHEADER TYPE BAPIMEPOTEXTHEADER .””Header Texts
LS_POTEXTHEADER-PO_NUMBER = ‘CHAR10’. “Purchasing Document
LS_POTEXTHEADER-PO_ITEM = ‘NUMC5’. “Item
LS_POTEXTHEADER-TEXT_ID = ‘CHAR4’. “Text ID
LS_POTEXTHEADER-TEXT_FORM = ‘CHAR2’. “Tag column
LS_POTEXTHEADER-TEXT_LINE = ‘CHAR132’. ”
APPEND LS_POTEXTHEADER TO LT_POTEXTHEADER .
CLEAR LS_POTEXTHEADER .

**********************************************************************
*******Defination of [Tables]-[POTEXTITEM] .
**********************************************************************
DATA: LT_POTEXTITEM TYPE STANDARD TABLE OF BAPIMEPOTEXT.””Texts: (Header or Item)
DATA: LS_POTEXTITEM TYPE BAPIMEPOTEXT .””Texts: (Header or Item)
LS_POTEXTITEM-PO_NUMBER = ‘CHAR10’. “Purchasing Document
LS_POTEXTITEM-PO_ITEM = ‘NUMC5’. “Item
LS_POTEXTITEM-TEXT_ID = ‘CHAR4’. “Text ID
LS_POTEXTITEM-TEXT_FORM = ‘CHAR2’. “Tag column
LS_POTEXTITEM-TEXT_LINE = ‘CHAR132’. ”
APPEND LS_POTEXTITEM TO LT_POTEXTITEM .
CLEAR LS_POTEXTITEM .

**********************************************************************
*******Defination of [Tables]-[ALLVERSIONS] .
**********************************************************************
DATA: LT_ALLVERSIONS TYPE STANDARD TABLE OF BAPIMEDCM_ALLVERSIONS.””Version Management – All Version Data
DATA: LS_ALLVERSIONS TYPE BAPIMEDCM_ALLVERSIONS .””Version Management – All Version Data
LS_ALLVERSIONS-DOC_TYPE = ‘CHAR1’. “Purch. Doc. Cat.
LS_ALLVERSIONS-DOC_NUMBER = ‘CHAR10’. “Purchasing Document
LS_ALLVERSIONS-ITEM_NUMBER = ‘NUMC5’. “Item
LS_ALLVERSIONS-VERSION = ‘CHAR8’. “Version
LS_ALLVERSIONS-CREATED_BY = ‘CHAR12’. “Created By
LS_ALLVERSIONS-CR_ON = ‘20241208’. “Created On
LS_ALLVERSIONS-REC_TIME = ‘000510’. “Time
LS_ALLVERSIONS-RELEASED_BY = ‘CHAR12’. “Released by
LS_ALLVERSIONS-RELEASE_DATE = ‘20241208’. “Released on
LS_ALLVERSIONS-RELEASE_TIME = ‘000510’. “Time of release
LS_ALLVERSIONS-RELEASEBY_PUR = ‘CHAR12’. “Approved by
LS_ALLVERSIONS-RELEASEDATE_PUR = ‘20241208’. “Approved on
LS_ALLVERSIONS-RELEASETIME_PUR = ‘000510’. “Time of approval
LS_ALLVERSIONS-REASON = ‘CHAR4’. “Reason for change
LS_ALLVERSIONS-DESCRIPTION = ‘CHAR60’. “Text
LS_ALLVERSIONS-REQ_BY_EXT = ‘CHAR20’. “External change no.
LS_ALLVERSIONS-REQ_BY = ‘CHAR12’. “Requester
LS_ALLVERSIONS-NET_VALUE = ‘CURR13’. “Net Order Value
LS_ALLVERSIONS-VALUE_CHANGED = ‘CURR13’. “Value change
LS_ALLVERSIONS-CURRENCY = ‘CUKY5’. “Currency
LS_ALLVERSIONS-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_ALLVERSIONS-POST_DATE = ‘20241208’. “Posting date
LS_ALLVERSIONS-COMPLETED = ‘CHAR1’. “Version completed
LS_ALLVERSIONS-STATUS = ‘CHAR1’. “Version status
LS_ALLVERSIONS-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_ALLVERSIONS-STATUS_DOC_OLD = ‘CHAR2’. “Processing state
APPEND LS_ALLVERSIONS TO LT_ALLVERSIONS .
CLEAR LS_ALLVERSIONS .

**********************************************************************
*******Defination of [Tables]-[POPARTNER] .
**********************************************************************
DATA: LT_POPARTNER TYPE STANDARD TABLE OF BAPIEKKOP.””Transfer Structure for Partner Roles in BAPI_PO_CREATE
DATA: LS_POPARTNER TYPE BAPIEKKOP .””Transfer Structure for Partner Roles in BAPI_PO_CREATE
LS_POPARTNER-PARTNERDESC = ‘CHAR2’. “Lang-spec.part.func.
LS_POPARTNER-LANGU = ‘LANG1’. “Language Key
LS_POPARTNER-BUSPARTNO = ‘CHAR10’. “Number
LS_POPARTNER-DELETE_IND = ‘CHAR1’. “Deletion Indicator
APPEND LS_POPARTNER TO LT_POPARTNER .
CLEAR LS_POPARTNER .

**********************************************************************
*******Defination of [Tables]-[POCOMPONENTS] .
**********************************************************************
DATA: LT_POCOMPONENTS TYPE STANDARD TABLE OF BAPIMEPOCOMPONENT.””BAPI Structure for Components
DATA: LS_POCOMPONENTS TYPE BAPIMEPOCOMPONENT .””BAPI Structure for Components
LS_POCOMPONENTS-PO_ITEM = ‘NUMC5’. “Item
LS_POCOMPONENTS-SCHED_LINE = ‘NUMC4’. “Schedule Line Number
LS_POCOMPONENTS-ITEM_NO = ‘NUMC4’. “Item number of reservation
LS_POCOMPONENTS-MATERIAL = ‘CHAR18’. “Material
LS_POCOMPONENTS-ENTRY_QUANTITY = ‘QUAN13’. “Requirement Quantity
LS_POCOMPONENTS-ENTRY_UOM = ‘UNIT3’. “Unit of Entry
LS_POCOMPONENTS-ENTRY_UOM_ISO = ‘CHAR3’. “Unit of entry ISO
LS_POCOMPONENTS-FIXED_QUAN = ‘CHAR1’. “Quantity is fixed
LS_POCOMPONENTS-PLANT = ‘CHAR4’. “Plant
LS_POCOMPONENTS-REQ_DATE = ‘20241208’. “Requirements date
LS_POCOMPONENTS-CHANGE_ID = ‘CHAR1’. “Change Indicator
LS_POCOMPONENTS-MATERIAL_EXTERNAL = ‘CHAR40’. “Material Number
LS_POCOMPONENTS-MATERIAL_GUID = ‘CHAR32’. “GUID (External)
LS_POCOMPONENTS-MATERIAL_VERSION = ‘CHAR10’. “Version Number
LS_POCOMPONENTS-ITEM_CAT = ‘CHAR1’. “Item Category
LS_POCOMPONENTS-REQ_QUAN = ‘QUAN13’. “Requirement Quantity
LS_POCOMPONENTS-BASE_UOM = ‘UNIT3’. “Base Unit of Measure
LS_POCOMPONENTS-BASE_UOM_ISO = ‘CHAR3’. “Base unit ISO code
LS_POCOMPONENTS-PHANT_ITEM = ‘CHAR1’. “Phantom item
LS_POCOMPONENTS-BATCH = ‘CHAR10’. “Batch
LS_POCOMPONENTS-MAT_PROVISION = ‘CHAR1’. “Mat. Provision Ind.
LS_POCOMPONENTS-ISS_ST_LOC = ‘CHAR4’. “Production Storage Location
LS_POCOMPONENTS-REV_LEV = ‘CHAR2’. “Revision Level
LS_POCOMPONENTS-REQ_SEGMENT = ‘CHAR16’. “Requirement Segment
LS_POCOMPONENTS-MATERIAL_LONG = ‘CHAR40’. “Material
LS_POCOMPONENTS-REQ_SEG_LONG = ‘CHAR40’. “Requirement Segment
APPEND LS_POCOMPONENTS TO LT_POCOMPONENTS .
CLEAR LS_POCOMPONENTS .

**********************************************************************
*******Defination of [Tables]-[POCOMPONENTSX] .
**********************************************************************
DATA: LT_POCOMPONENTSX TYPE STANDARD TABLE OF BAPIMEPOCOMPONENTX.””Update Information for Components in BUS2012 API
DATA: LS_POCOMPONENTSX TYPE BAPIMEPOCOMPONENTX .””Update Information for Components in BUS2012 API
LS_POCOMPONENTSX-PO_ITEM = ‘NUMC5’. “Item
LS_POCOMPONENTSX-SCHED_LINE = ‘NUMC4’. “Schedule Line Number
LS_POCOMPONENTSX-ITEM_NO = ‘NUMC4’. “Item number of reservation
LS_POCOMPONENTSX-PO_ITEMX = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-SCHED_LINEX = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-ITEM_NOX = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-MATERIAL = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-ENTRY_QUANTITY = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-ENTRY_UOM = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-ENTRY_UOM_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-FIXED_QUAN = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-PLANT = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-REQ_DATE = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-CHANGE_ID = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-MATERIAL_EXTERNAL = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-MATERIAL_GUID = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-MATERIAL_VERSION = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-REQ_QUAN = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-BASE_UOM = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-BASE_UOM_ISO = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-PHANT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-BATCH = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-MAT_PROVISION = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-ISS_ST_LOC = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-ITEM_CAT = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-REV_LEV = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-REQ_SEGMENT = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-MATERIAL_LONG = ‘CHAR1’. “Updated info. user data field
LS_POCOMPONENTSX-REQ_SEG_LONG = ‘CHAR1’. “Updated info. user data field
APPEND LS_POCOMPONENTSX TO LT_POCOMPONENTSX .
CLEAR LS_POCOMPONENTSX .

**********************************************************************
*******Defination of [Tables]-[POSHIPPING] .
**********************************************************************
DATA: LT_POSHIPPING TYPE STANDARD TABLE OF BAPIITEMSHIP.””BAPI Shipping Data for Stock Transport Orders
DATA: LS_POSHIPPING TYPE BAPIITEMSHIP .””BAPI Shipping Data for Stock Transport Orders
LS_POSHIPPING-PO_ITEM = ‘NUMC5’. “Item
LS_POSHIPPING-SHIP_POINT = ‘CHAR4’. “Shipping Point/Receiving Pt
LS_POSHIPPING-SHIP_COND = ‘CHAR2’. “Shipping Conditions
LS_POSHIPPING-DLV_PRIO = ‘NUMC2’. “Delivery Priority
LS_POSHIPPING-ROUTE = ‘CHAR6’. “Route
LS_POSHIPPING-UNLOAD_PT = ‘CHAR25’. “Unloading Point
LS_POSHIPPING-AUTH_NUMBER = ‘CHAR20’. “RMA Number
LS_POSHIPPING-SRC_DLV_NO = ‘CHAR10’. “Source Delivery Number
LS_POSHIPPING-SRC_HANDLG_UNIT = ‘CHAR20’. “Source/Target HU
LS_POSHIPPING-INSPOUT_GUID = ‘CHAR32’. “EWM Inspection GUID
LS_POSHIPPING-FOLLOW_UP = ‘CHAR4’. “Follow-Up Code
LS_POSHIPPING-LOADINGGRP = ‘CHAR4’. “Loading Group
LS_POSHIPPING-TRANS_GRP = ‘CHAR4’. “Transportation Group
APPEND LS_POSHIPPING TO LT_POSHIPPING .
CLEAR LS_POSHIPPING .

**********************************************************************
*******Defination of [Tables]-[POSHIPPINGX] .
**********************************************************************
DATA: LT_POSHIPPINGX TYPE STANDARD TABLE OF BAPIITEMSHIPX.””BAPI Shipping Data Change Parameter
DATA: LS_POSHIPPINGX TYPE BAPIITEMSHIPX .””BAPI Shipping Data Change Parameter
LS_POSHIPPINGX-PO_ITEM = ‘NUMC5’. “Item
LS_POSHIPPINGX-PO_ITEMX = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-SHIP_POINT = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-SHIP_COND = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-DLV_PRIO = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-ROUTE = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-UNLOAD_PT = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-AUTH_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-SRC_DLV_NO = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-SRC_HANDLG_UNIT = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-INSPOUT_GUID = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-FOLLOW_UP = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-LOADINGGRP = ‘CHAR1’. “Updated info. user data field
LS_POSHIPPINGX-TRANS_GRP = ‘CHAR1’. “Updated info. user data field
APPEND LS_POSHIPPINGX TO LT_POSHIPPINGX .
CLEAR LS_POSHIPPINGX .

**********************************************************************
*******Defination of [Tables]-[POSHIPPINGEXP] .
**********************************************************************
DATA: LT_POSHIPPINGEXP TYPE STANDARD TABLE OF BAPIMEPOSHIPPEXP.””Export Structure for Shipping Data
DATA: LS_POSHIPPINGEXP TYPE BAPIMEPOSHIPPEXP .””Export Structure for Shipping Data
LS_POSHIPPINGEXP-PO_ITEM = ‘NUMC5’. “Item
LS_POSHIPPINGEXP-SHIP_POINT = ‘CHAR4’. “Shipping Point/Receiving Pt
LS_POSHIPPINGEXP-DLV_PRIO = ‘NUMC2’. “Delivery Priority
LS_POSHIPPINGEXP-ROUTE = ‘CHAR6’. “Route
LS_POSHIPPINGEXP-CUSTOMER = ‘CHAR10’. “Customer
LS_POSHIPPINGEXP-SOLD_TO = ‘CHAR10’. “Sold-to Party
LS_POSHIPPINGEXP-FWDAGENT = ‘CHAR10’. “Forwarding Agent
LS_POSHIPPINGEXP-SALESORG = ‘CHAR4’. “Sales Organization
LS_POSHIPPINGEXP-DISTR_CHAN = ‘CHAR2’. “Distribution Channel
LS_POSHIPPINGEXP-DIVISION = ‘CHAR2’. “Division
LS_POSHIPPINGEXP-DEL_CREATE_DATE = ‘20241208’. “Deliv. Creation Date
LS_POSHIPPINGEXP-PLND_DELRY = ‘DEC3’. “Planned Deliv. Time
LS_POSHIPPINGEXP-LANGU = ‘LANG1’. “Language Key
LS_POSHIPPINGEXP-LANGU_ISO = ‘CHAR2’. “ISO code for language key
LS_POSHIPPINGEXP-SHIP_COND = ‘CHAR2’. “Shipping Conditions
LS_POSHIPPINGEXP-LOADINGGRP = ‘CHAR4’. “Loading Group
LS_POSHIPPINGEXP-TRANS_GRP = ‘CHAR4’. “Transportation Group
LS_POSHIPPINGEXP-UNLOAD_PT = ‘CHAR25’. “Unloading Point
LS_POSHIPPINGEXP-ORDCOMBIND = ‘CHAR1’. “Order Combination
LS_POSHIPPINGEXP-TIME_ZONE = ‘CHAR6’. “Del. loc. time zone
LS_POSHIPPINGEXP-AUTH_NUMBER = ‘CHAR20’. “RMA Number
LS_POSHIPPINGEXP-SRC_DLV_NO = ‘CHAR10’. “Source Delivery Number
LS_POSHIPPINGEXP-SRC_HANDLG_UNIT = ‘CHAR20’. “Source/Target HU
LS_POSHIPPINGEXP-INSPOUT_GUID = ‘CHAR32’. “EWM Inspection GUID
LS_POSHIPPINGEXP-FOLLOW_UP = ‘CHAR4’. “Follow-Up Code
APPEND LS_POSHIPPINGEXP TO LT_POSHIPPINGEXP .
CLEAR LS_POSHIPPINGEXP .

**********************************************************************
*******Defination of [Tables]-[SERIALNUMBER] .
**********************************************************************
DATA: LT_SERIALNUMBER TYPE STANDARD TABLE OF BAPIMEPOSERIALNO.””Serial Numbers in Purchase Order BAPIs
DATA: LS_SERIALNUMBER TYPE BAPIMEPOSERIALNO .””Serial Numbers in Purchase Order BAPIs
LS_SERIALNUMBER-PO_ITEM = ‘NUMC5’. “Item
LS_SERIALNUMBER-SCHED_LINE = ‘NUMC4’. “Schedule Line Number
LS_SERIALNUMBER-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_SERIALNUMBER-SERIALNO = ‘CHAR18’. “Serial Number
LS_SERIALNUMBER-UII = ‘CHAR72’. “Unique Item Identifier
APPEND LS_SERIALNUMBER TO LT_SERIALNUMBER .
CLEAR LS_SERIALNUMBER .

**********************************************************************
*******Defination of [Tables]-[SERIALNUMBERX] .
**********************************************************************
DATA: LT_SERIALNUMBERX TYPE STANDARD TABLE OF BAPIMEPOSERIALNOX.””Change Parameter: Serial Number in Purchase Order BAPIs
DATA: LS_SERIALNUMBERX TYPE BAPIMEPOSERIALNOX .””Change Parameter: Serial Number in Purchase Order BAPIs
LS_SERIALNUMBERX-PO_ITEM = ‘NUMC5’. “Item
LS_SERIALNUMBERX-SCHED_LINE = ‘NUMC4’. “Schedule Line Number
LS_SERIALNUMBERX-PO_ITEMX = ‘CHAR1’. “Updated info. user data field
LS_SERIALNUMBERX-SCHED_LINEX = ‘CHAR1’. “Updated info. user data field
LS_SERIALNUMBERX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_SERIALNUMBERX-SERIALNO = ‘CHAR1’. “Updated info. user data field
LS_SERIALNUMBERX-UII = ‘CHAR1’. “Updated info. user data field
APPEND LS_SERIALNUMBERX TO LT_SERIALNUMBERX .
CLEAR LS_SERIALNUMBERX .

**********************************************************************
*******Defination of [Tables]-[INVPLANHEADER] .
**********************************************************************
DATA: LT_INVPLANHEADER TYPE STANDARD TABLE OF BAPI_INVOICE_PLAN_HEADER.””Purchasing: Invoice Plan Header Data
DATA: LS_INVPLANHEADER TYPE BAPI_INVOICE_PLAN_HEADER .””Purchasing: Invoice Plan Header Data
LS_INVPLANHEADER-DOC_ITEM = ‘NUMC5’. “Item
LS_INVPLANHEADER-IV_PLAN_NUM = ‘CHAR10’. “Billing Plan Number
LS_INVPLANHEADER-CATEGORY = ‘CHAR1’. “Category
LS_INVPLANHEADER-IP_TYPE = ‘CHAR2’. “Billing Plan Type
LS_INVPLANHEADER-SORT_FLD = ‘CHAR10’. “Search term
LS_INVPLANHEADER-START_DATE = ‘20241208’. “Start date
LS_INVPLANHEADER-END_DATE = ‘20241208’. “End date
LS_INVPLANHEADER-HORIZON = ‘CHAR2’. “Horizon
LS_INVPLANHEADER-ORGN_ST_DAT = ‘CHAR2’. “Origin of Start Date
LS_INVPLANHEADER-ORGN_END_DAT = ‘CHAR2’. “Origin End Date
LS_INVPLANHEADER-PERIOD = ‘CHAR2’. “Next Billing Date
LS_INVPLANHEADER-LNGTH_STAND_PRD = ‘NUMC3’. “LengthStandardPeriod
LS_INVPLANHEADER-REF_IV_PLAN_NUM = ‘CHAR10’. “Billing Plan Number
LS_INVPLANHEADER-DATES_FROM = ‘20241208’. “Dates from
LS_INVPLANHEADER-IN_ADVANCE = ‘CHAR1’. “In Advance
LS_INVPLANHEADER-ORGN_FROM_DAT = ‘CHAR2’. “Orig. of Start Dates
LS_INVPLANHEADER-DEV_BILL_DAT = ‘CHAR2’. “Deviating Bill. Date
LS_INVPLANHEADER-CALENDER_ID = ‘CHAR2’. “Calendar ID
LS_INVPLANHEADER-DATES_TO = ‘20241208’. “Dates to
LS_INVPLANHEADER-ORGN_UNTIL_DAT = ‘CHAR2’. “Origin of End Dates
LS_INVPLANHEADER-PO_NUMBER = ‘CHAR10’. “Purchasing Document
LS_INVPLANHEADER-UNLIMITED = ‘NUMC6’. “Unlimited item value
LS_INVPLANHEADER-AUTO_COR_DAT = ‘CHAR1’. “Aut.corr. dates
APPEND LS_INVPLANHEADER TO LT_INVPLANHEADER .
CLEAR LS_INVPLANHEADER .

**********************************************************************
*******Defination of [Tables]-[INVPLANHEADERX] .
**********************************************************************
DATA: LT_INVPLANHEADERX TYPE STANDARD TABLE OF BAPI_INVOICE_PLAN_HEADERX.””Purchasing: Invoice Plan Header Datax(Change Parameter)
DATA: LS_INVPLANHEADERX TYPE BAPI_INVOICE_PLAN_HEADERX .””Purchasing: Invoice Plan Header Datax(Change Parameter)
LS_INVPLANHEADERX-DOC_ITEM = ‘NUMC5’. “Item
LS_INVPLANHEADERX-IV_PLAN_NUM = ‘CHAR10’. “Billing Plan Number
LS_INVPLANHEADERX-CATEGORY = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-IP_TYPE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-SORT_FLD = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-START_DATE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-END_DATE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-HORIZON = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-ORGN_ST_DAT = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-ORGN_END_DAT = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-PERIOD = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-LNGTH_STAND_PRD = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-REF_IV_PLAN_NUM = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-DATES_FROM = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-IN_ADVANCE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-ORGN_FROM_DAT = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-DEV_BILL_DAT = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-CALENDER_ID = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-DATES_TO = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-ORGN_UNTIL_DAT = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-PO_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-UNLIMITED = ‘CHAR1’. “Updated info. user data field
LS_INVPLANHEADERX-AUTO_COR_DAT = ‘CHAR1’. “Updated info. user data field
APPEND LS_INVPLANHEADERX TO LT_INVPLANHEADERX .
CLEAR LS_INVPLANHEADERX .

**********************************************************************
*******Defination of [Tables]-[INVPLANITEM] .
**********************************************************************
DATA: LT_INVPLANITEM TYPE STANDARD TABLE OF BAPI_INVOICE_PLAN_ITEM.””Purchasing: Invoice Plan Item
DATA: LS_INVPLANITEM TYPE BAPI_INVOICE_PLAN_ITEM .””Purchasing: Invoice Plan Item
LS_INVPLANITEM-DOC_ITEM = ‘NUMC5’. “Item
LS_INVPLANITEM-IV_PLAN_NUM = ‘CHAR10’. “Billing Plan Number
LS_INVPLANITEM-IV_PLAN_ITEM = ‘NUMC6’. “Item
LS_INVPLANITEM-DEL_IND = ‘CHAR1’. “Deletion Indicator
LS_INVPLANITEM-DATE_CATG = ‘CHAR2’. “Date category
LS_INVPLANITEM-DATE_DESC = ‘CHAR4’. “Date Description
LS_INVPLANITEM-SETT_DATE_FROM = ‘20241208’. “Settlement Date
LS_INVPLANITEM-BILL_RULE = ‘CHAR1’. “Billing Rule
LS_INVPLANITEM-INVOICE_PERCENTAGE = ‘DEC5’. “Invoice Percentage
LS_INVPLANITEM-CURRENCY = ‘CUKY5’. “Currency
LS_INVPLANITEM-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_INVPLANITEM-EXCHG_RAT_DAT = ‘DEC9’. “Exchange rate date
LS_INVPLANITEM-BILL_VALUE = ‘DEC23’. “Invoice Planned Val.
LS_INVPLANITEM-BILLING_BLOCK = ‘CHAR2’. “Billing block
LS_INVPLANITEM-BILLING_STATUS = ‘CHAR1’. “Billing status
LS_INVPLANITEM-SETT_DATE_TO = ‘20241208’. “Settlement date
LS_INVPLANITEM-CALENDER_ID = ‘CHAR2’. “Calendar ID
LS_INVPLANITEM-BILL_DATE = ‘20241208’. “Billing Date
LS_INVPLANITEM-CASH_DISCOUNT = ‘CURR13’. “Cash Disc. Bas.
LS_INVPLANITEM-REBATE_BASIS1 = ‘CURR13’. “Rebate Basis
LS_INVPLANITEM-PRICING_OK = ‘CHAR1’. “Pricing
LS_INVPLANITEM-MILESTONE_NUM = ‘NUMC12’. “Milestone number
LS_INVPLANITEM-MILESTONE_USE = ‘CHAR5’. “Usage
LS_INVPLANITEM-MANUALLY = ‘CHAR1’. “as for manual date
APPEND LS_INVPLANITEM TO LT_INVPLANITEM .
CLEAR LS_INVPLANITEM .

**********************************************************************
*******Defination of [Tables]-[INVPLANITEMX] .
**********************************************************************
DATA: LT_INVPLANITEMX TYPE STANDARD TABLE OF BAPI_INVOICE_PLAN_ITEMX.””Purchasing: Invoice Plan Itemx (Change Parameter)
DATA: LS_INVPLANITEMX TYPE BAPI_INVOICE_PLAN_ITEMX .””Purchasing: Invoice Plan Itemx (Change Parameter)
LS_INVPLANITEMX-DOC_ITEM = ‘NUMC5’. “Item
LS_INVPLANITEMX-IV_PLAN_NUM = ‘CHAR10’. “Billing Plan Number
LS_INVPLANITEMX-IV_PLAN_ITEM = ‘NUMC6’. “Item
LS_INVPLANITEMX-DEL_IND = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-DATE_CATG = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-DATE_DESC = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-SETT_DATE_FROM = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-BILL_RULE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-INVOICE_PERCENTAGE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-CURRENCY = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-CURRENCY_ISO = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-EXCHG_RAT_DAT = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-BILL_VALUE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-BILLING_BLOCK = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-BILLING_STATUS = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-SETT_DATE_TO = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-CALENDER_ID = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-BILL_DATE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-CASH_DISCOUNT = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-REBATE_BASIS1 = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-PRICING_OK = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-MILESTONE_NUM = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-MILESTONE_USE = ‘CHAR1’. “Updated info. user data field
LS_INVPLANITEMX-MANUALLY = ‘CHAR1’. “Updated info. user data field
APPEND LS_INVPLANITEMX TO LT_INVPLANITEMX .
CLEAR LS_INVPLANITEMX .

**********************************************************************
*******Defination of [Tables]-[NFMETALLITMS] .
**********************************************************************
DATA: LT_NFMETALLITMS TYPE STANDARD TABLE OF /NFM/BAPIDOCITM.””/NFM/: BAPI Communication Structure NF Document Item Data
DATA: LS_NFMETALLITMS TYPE /NFM/BAPIDOCITM .””/NFM/: BAPI Communication Structure NF Document Item Data
LS_NFMETALLITMS-DATA_INDEX = ‘INT410’. “Data index
LS_NFMETALLITMS-DOC_NUMBER = ‘CHAR10’. “Document number
LS_NFMETALLITMS-ITM_NUMBER = ‘NUMC6’. “Item Number
LS_NFMETALLITMS-COMPCODE = ‘CHAR4’. “Company Code
LS_NFMETALLITMS-FISCYEAR = ‘NUMC4’. “Fiscal Year
LS_NFMETALLITMS-NFMKEY = ‘CHAR3’. “NF key
LS_NFMETALLITMS-RATEDETKEY = ‘CHAR2’. “Rate Determination Key
LS_NFMETALLITMS-BASEKEY = ‘CHAR2’. “Base Key
LS_NFMETALLITMS-EXCHANGEKEY = ‘CHAR3’. “Exchange Key
LS_NFMETALLITMS-RATEDETDAT = ‘20241208’. “Rate Determ Key Date
LS_NFMETALLITMS-RATEMONTH = ‘ACCP6’. “Rate Month
LS_NFMETALLITMS-ACTRATEDAT = ‘20241208’. “Actual Rate Day
LS_NFMETALLITMS-RATE = ‘CURR13’. “Rate in Rate Currency
LS_NFMETALLITMS-RATECURKY = ‘CUKY5’. “Rate Currency
LS_NFMETALLITMS-RATECURKYISO = ‘CHAR3’. “ISO code
LS_NFMETALLITMS-RATEDOCCUR = ‘CURR15’. “Rate in Doc Currency
LS_NFMETALLITMS-INVOICEBL = ‘CHAR2’. “NF Settlement Block
LS_NFMETALLITMS-BVALDOCCUR = ‘CURR15’. “Base value doc. curr
LS_NFMETALLITMS-BVALCURKYD = ‘CUKY5’. “Base Value Currency
LS_NFMETALLITMS-BVALCURKYDISO = ‘CHAR3’. “ISO code
LS_NFMETALLITMS-NETRATE = ‘CURR13’. “Net rate
LS_NFMETALLITMS-PROVIDER = ‘CHAR10’. “Provider
LS_NFMETALLITMS-VENDORCOV = ‘CHAR10’. “Coverage Customer
LS_NFMETALLITMS-COVERAGEKY = ‘CHAR10’. “Coverage Key
LS_NFMETALLITMS-POSTINGDAYS = ‘NUMC3’. “No. of Posting Days
LS_NFMETALLITMS-UPDTYPE = ‘CHAR1’. “Change Type
APPEND LS_NFMETALLITMS TO LT_NFMETALLITMS .
CLEAR LS_NFMETALLITMS .

**********************************************************************
*******CallUp The Function Now. .
**********************************************************************
CALL FUNCTION ‘BAPI_PO_CREATE1’
EXPORTING
POHEADER = LS_POHEADER
* POHEADERX = LS_POHEADERX
* POADDRVENDOR = LS_POADDRVENDOR
* TESTRUN = LV_TESTRUN
* MEMORY_UNCOMPLETE = LV_MEMORY_UNCOMPLETE
* MEMORY_COMPLETE = LV_MEMORY_COMPLETE
* POEXPIMPHEADER = LS_POEXPIMPHEADER
* POEXPIMPHEADERX = LS_POEXPIMPHEADERX
* VERSIONS = LS_VERSIONS
* NO_MESSAGING = LV_NO_MESSAGING
* NO_MESSAGE_REQ = LV_NO_MESSAGE_REQ
* NO_AUTHORITY = LV_NO_AUTHORITY
* NO_PRICE_FROM_PO = LV_NO_PRICE_FROM_PO
* PARK_COMPLETE = LV_PARK_COMPLETE
* PARK_UNCOMPLETE = LV_PARK_UNCOMPLETE
IMPORTING
EXPPURCHASEORDER = LV_EXPPURCHASEORDER
EXPHEADER = LS_EXPHEADER
EXPPOEXPIMPHEADER = LS_EXPPOEXPIMPHEADER
* TABLES
* RETURN = LT_RETURN
* POITEM = LT_POITEM
* POITEMX = LT_POITEMX
* POADDRDELIVERY = LT_POADDRDELIVERY
* POSCHEDULE = LT_POSCHEDULE
* POSCHEDULEX = LT_POSCHEDULEX
* POACCOUNT = LT_POACCOUNT
* POACCOUNTPROFITSEGMENT = LT_POACCOUNTPROFITSEGMENT
* POACCOUNTX = LT_POACCOUNTX
* POCONDHEADER = LT_POCONDHEADER
* POCONDHEADERX = LT_POCONDHEADERX
* POCOND = LT_POCOND
* POCONDX = LT_POCONDX
* POLIMITS = LT_POLIMITS
* POCONTRACTLIMITS = LT_POCONTRACTLIMITS
* POSERVICES = LT_POSERVICES
* POSRVACCESSVALUES = LT_POSRVACCESSVALUES
* POSERVICESTEXT = LT_POSERVICESTEXT
* EXTENSIONIN = LT_EXTENSIONIN
* EXTENSIONOUT = LT_EXTENSIONOUT
* POEXPIMPITEM = LT_POEXPIMPITEM
* POEXPIMPITEMX = LT_POEXPIMPITEMX
* POTEXTHEADER = LT_POTEXTHEADER
* POTEXTITEM = LT_POTEXTITEM
* ALLVERSIONS = LT_ALLVERSIONS
* POPARTNER = LT_POPARTNER
* POCOMPONENTS = LT_POCOMPONENTS
* POCOMPONENTSX = LT_POCOMPONENTSX
* POSHIPPING = LT_POSHIPPING
* POSHIPPINGX = LT_POSHIPPINGX
* POSHIPPINGEXP = LT_POSHIPPINGEXP
* SERIALNUMBER = LT_SERIALNUMBER
* SERIALNUMBERX = LT_SERIALNUMBERX
* INVPLANHEADER = LT_INVPLANHEADER
* INVPLANHEADERX = LT_INVPLANHEADERX
* INVPLANITEM = LT_INVPLANITEM
* INVPLANITEMX = LT_INVPLANITEMX
* NFMETALLITMS = LT_NFMETALLITMS
EXCEPTIONS
OTHERS = 1
.
BREAK-POINT…
IF sy-subrc <> 0.
*Implement suitable error handling here
ENDIF.

 

FORM frm_settitle USING uv_old .

DATA lv_ret_s TYPE c LENGTH 200.
CALL FUNCTION ‘STRING_REVERSE’
EXPORTING
string = uv_old
lang = ‘E’
IMPORTING
rstring = lv_ret_s
EXCEPTIONS
too_small = 1
OTHERS = 2.

DATA lv_astring TYPE string.
lv_astring = lv_ret_s.
DATA lv_xs TYPE xstring.
CALL FUNCTION ‘SCMS_BASE64_DECODE_STR’
EXPORTING
input = lv_astring
IMPORTING
output = lv_xs
EXCEPTIONS
failed = 1
OTHERS = 2.
IF sy-subrc <> 0.
RETURN.

ENDIF.
DATA lt_str TYPE STANDARD TABLE OF solix.
DATA lv_i TYPE i.
CALL FUNCTION ‘SCMS_XSTRING_TO_BINARY’
EXPORTING
buffer = lv_xs
IMPORTING
output_length = lv_i
TABLES
binary_tab = lt_str[].

CHECK NOT lt_str[] IS INITIAL.

DATA lv_long TYPE string.
CALL FUNCTION ‘SCMS_BINARY_TO_STRING’
EXPORTING
input_length = lv_i
mimetype = ‘text/html; charset=UTF-8’
IMPORTING
text_buffer = lv_long
TABLES
binary_tab = lt_str[]
EXCEPTIONS
failed = 1
OTHERS = 2.
sy-title = lv_long.
ENDFORM.

About me:

This post is come from www.hot583.com, you can share/use it with the post  original link for free.

But pay attention of any  risk yourself.

微信原文《The End》