BAPI_CONTRACT_CREATE VA41 sample code

*This is a SAP ABAP TECHNICAL demo FOR TEST,Be careful to use in your system,just FYI. BAPI to Create a Purchase Contract
*If you have any solution,Please feel free to talk with your IT team/SAP ABAP professional guys.BAPI to Create a Purchase Contract
*You can use this function module to create purchase contracts.
*<DS:TX.MMPUR_BAPI_MEOUT_TEST_SINGLE>Sample Code
*Restrictions in comparison with the transaction <LS>Create Contract (
*<DS:TRAN.ME31K>ME31K):
*Master conditions:
*During the creation of outline agreements, just one time period can be
*specified per variable key. This means that a period can be specified
*for the document header (i.e. condition table A019), for each item (i.e.
*condition table A016), and for each item/plant combination (i.e.
*condition table A068).
*Scales are not supported during the creation of outline agreements.
*Volume rebate conditions in outline agreements are not taken into
*account.
*No subitems (e.g. inclusive/exclusive bonus quantity, display,
*etc.) are taken into account.
*The control key for quantity management in procurement
*(EKPO-SSQSS) and the certificate category (EKPO-ZGTYP) are only
*taken into account to a certain extent: this information is copied from
*the reference contract or the material master record, but cannot be
*changed and no checks are carried out for these two fields.
*The revision level (EKPO-REVLV) is not changeable because various
*quality management routines were not implemented.
*Version management (Document Change M
*anagement) is not supported.
*External services (planned and unplanned services) are not
*supported.
*Creation of configurations is not supported.
*When a purchase contract is created (activity 01), the following
*authorization objects are checked:
*<DS:UO.M_RAHM_BSA>M_RAHM_BSA Document type in contract
*<DS:UO.M_RAHM_EKG>M_RAHM_EKG Purchasing group in contract
*<DS:UO.M_RAHM_EKO>M_RAHM_EKO Purchasing organization in contract
*<DS:UO.M_RAHM_WRK>M_RAHM_WRK Plant in contract

REPORT ZDEMO_BAPI_CONTRACT_CREATE.
PARAMETERS SAMPLE AS CHECKBOX.
INITIALIZATION.
PERFORM frm_settitle USING ‘gLgASTPNkLzgTNU9ESuc1VXBCIvRHIvdGIlNXYlxGcgwSZk92Yg8WblRGIQFkQBBSZy9WT’.
START-OF-SELECTION.
BREAK-POINT..

**********************************************************************
*******Defination of Work Area Structrue [Import]-[HEADER ] . “”Header Data Outline Agreement
**********************************************************************
DATA: LS_HEADER TYPE BAPIMEOUTHEADER . “”Header Data Outline Agreement
LS_HEADER-NUMBER = ‘CHAR10’. “Purchasing Document
LS_HEADER-COMP_CODE = ‘CHAR4’. “Company Code
LS_HEADER-DOC_TYPE = ‘CHAR4’. “Purchasing Doc. Type
LS_HEADER-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_HEADER-STATUS = ‘CHAR1’. “Status
LS_HEADER-CREAT_DATE = ‘20241208’. “Created On
LS_HEADER-CREATED_BY = ‘CHAR12’. “Created By
LS_HEADER-ITEM_INTVL = ‘NUMC5’. “Item Number Interval
LS_HEADER-VENDOR = ‘CHAR10’. “Supplier
LS_HEADER-LANGU = ‘LANG1’. “Language Key
LS_HEADER-LANGU_ISO = ‘CHAR2’. “ISO code for language key
LS_HEADER-PMNTTRMS = ‘CHAR4’. “Terms of Payment
LS_HEADER-DSCNT1_TO = ‘DEC3’. “Payment in
LS_HEADER-DSCNT2_TO = ‘DEC3’. “Payment in
LS_HEADER-DSCNT3_TO = ‘DEC3’. “Payment in
LS_HEADER-DSCT_PCT1 = ‘DEC5’. “CD Percentage 1
LS_HEADER-DSCT_PCT2 = ‘DEC5’. “CD Percentage 2
LS_HEADER-PURCH_ORG = ‘CHAR4’. “Purch. Organization
LS_HEADER-PUR_GROUP = ‘CHAR3’. “Purchasing Group
LS_HEADER-CURRENCY = ‘CUKY5’. “Currency
LS_HEADER-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_HEADER-EXCH_RATE = ‘DEC9’. “Exchange Rate
LS_HEADER-EX_RATE_FX = ‘CHAR1’. “Fixed Exchange Rate
LS_HEADER-DOC_DATE = ‘20241208’. “Document Date
LS_HEADER-VPER_START = ‘20241208’. “Validity Per. Start
LS_HEADER-VPER_END = ‘20241208’. “Validity Period End
LS_HEADER-WARRANTY = ‘20241208’. “Warranty
LS_HEADER-QUOTATION = ‘CHAR10’. “Quotation
LS_HEADER-QUOT_DATE = ‘20241208’. “Quotation Date
LS_HEADER-REF_1 = ‘CHAR12’. “Your Reference
LS_HEADER-SALES_PERS = ‘CHAR30’. “Salesperson
LS_HEADER-TELEPHONE = ‘CHAR16’. “Telephone
LS_HEADER-SUPPL_VEND = ‘CHAR10’. “Goods Supplier
LS_HEADER-CUSTOMER = ‘CHAR10’. “Customer
LS_HEADER-AGREEMENT = ‘CHAR10’. “Outline agreement
LS_HEADER-GR_MESSAGE = ‘CHAR1’. “GR Message
LS_HEADER-SUPPL_PLNT = ‘CHAR4’. “Supplying Plant
LS_HEADER-INCOTERMS1 = ‘CHAR3’. “Incoterms
LS_HEADER-INCOTERMS2 = ‘CHAR28’. “Incoterms (Part 2)
LS_HEADER-ACUM_VALUE = ‘CURR15’. “Target Value
LS_HEADER-COLLECT_NO = ‘CHAR10’. “Collective Number
LS_HEADER-DIFF_INV = ‘CHAR10’. “Invoicing Party
LS_HEADER-OUR_REF = ‘CHAR12’. “Our Reference
LS_HEADER-LOGSYSTEM = ‘CHAR10’. “Logical System
LS_HEADER-SUBITEMINT = ‘NUMC5’. “Subitem Interval
LS_HEADER-PO_REL_IND = ‘CHAR1’. “Release indicator
LS_HEADER-REL_STATUS = ‘CHAR8’. “Release State
LS_HEADER-VAT_CNTRY = ‘CHAR3’. “Ctry/Rgn Sls Tax No.
LS_HEADER-VAT_CNTRY_ISO = ‘CHAR2’. “ISO Ctry/Reg. code for VAT reg. no.
LS_HEADER-REASON_CANCEL = ‘NUMC2’. “Reason for Canc.
LS_HEADER-PROCSTAT = ‘CHAR2’. “Purch. Doc. Proc. State
LS_HEADER-MAST_COND = ‘CHAR1’. “Time-dep. conditions
LS_HEADER-RETENTION_TYPE = ‘CHAR1’. “Retention
LS_HEADER-RETENTION_PERCENTAGE = ‘DEC5’. “Retention in Percent
LS_HEADER-INCOTERMSV = ‘CHAR4’. “Incoterms Version
LS_HEADER-INCOTERMS2L = ‘CHAR70’. “Incoterms Location 1
LS_HEADER-INCOTERMS3L = ‘CHAR70’. “Incoterms Location 2
LS_HEADER-EXTERNALREFERENCEID = ‘CHAR70’. “External Reference ID
LS_HEADER-TOTAL_STATUS_PCS = ‘CHAR1’. “Product Compliance Supplier Check Status

**********************************************************************
*******Defination of Work Area Structrue [Import]-[HEADERX ] . “”Header Data Change Parameter Outline Agreement
**********************************************************************
DATA: LS_HEADERX TYPE BAPIMEOUTHEADERX . “”Header Data Change Parameter Outline Agreement
LS_HEADERX-NUMBER = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-COMP_CODE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DOC_TYPE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-STATUS = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-CREAT_DATE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-CREATED_BY = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-ITEM_INTVL = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-VENDOR = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-LANGU = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-LANGU_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-PMNTTRMS = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DSCNT1_TO = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DSCNT2_TO = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DSCNT3_TO = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DSCT_PCT1 = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DSCT_PCT2 = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-PURCH_ORG = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-PUR_GROUP = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-CURRENCY = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-CURRENCY_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-EXCH_RATE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-EX_RATE_FX = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DOC_DATE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-VPER_START = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-VPER_END = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-WARRANTY = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-QUOTATION = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-QUOT_DATE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-REF_1 = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-SALES_PERS = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-TELEPHONE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-SUPPL_VEND = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-CUSTOMER = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-AGREEMENT = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-GR_MESSAGE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-SUPPL_PLNT = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-INCOTERMS1 = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-INCOTERMS2 = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-ACUM_VALUE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-COLLECT_NO = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-DIFF_INV = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-OUR_REF = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-LOGSYSTEM = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-SUBITEMINT = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-PO_REL_IND = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-REL_STATUS = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-VAT_CNTRY = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-VAT_CNTRY_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-REASON_CANCEL = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-PROCSTAT = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-MAST_COND = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-RETENTION_TYPE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-RETENTION_PERCENTAGE = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-INCOTERMSV = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-INCOTERMS2L = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-INCOTERMS3L = ‘CHAR1’. “Updated info. user data field
LS_HEADERX-EXTERNALREFERENCEID = ‘CHAR1’. “Updated info. user data field

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

**********************************************************************
*******Defination of Work Area Structrue [Import]-[TECHNICAL_DATA ] . “”Technical Parameters for Outline Agreement BAPIs
**********************************************************************
DATA: LS_TECHNICAL_DATA TYPE BAPIMEOUTTECH . “”Technical Parameters for Outline Agreement BAPIs
LS_TECHNICAL_DATA-MESSAGING_APPL = ‘CHAR1’. “Determ. of Message Application
LS_TECHNICAL_DATA-NO_MESSAGING = ‘CHAR1’. “Do Not Perform Message Determination
LS_TECHNICAL_DATA-NO_MESSAGE_REQ = ‘CHAR1’. “Without Message Output
LS_TECHNICAL_DATA-NO_AUTHORITY_CHECK = ‘CHAR1’. “Without Authorization Check
DATA: LV_PURCHASINGDOCUMENT TYPE BAPIMEOUTHEADER-NUMBER .”Obligatory

**********************************************************************
*******Defination of Work Area Structrue [Export]-[EXP_HEADER ] . “”Header Data Outline Agreement
**********************************************************************
DATA: LS_EXP_HEADER TYPE BAPIMEOUTHEADER . “”Header Data Outline Agreement

**********************************************************************
*******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]-[ITEM] .
**********************************************************************
DATA: LT_ITEM TYPE STANDARD TABLE OF BAPIMEOUTITEM.””Item Data of Contract
DATA: LS_ITEM TYPE BAPIMEOUTITEM .””Item Data of Contract
LS_ITEM-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM-DELETE_IND = ‘CHAR1’. “Deletion Indicator
LS_ITEM-SHORT_TEXT = ‘CHAR40’. “Short Text
LS_ITEM-MATERIAL = ‘CHAR18’. “Material
LS_ITEM-MATERIAL_EXTERNAL = ‘CHAR40’. “Material Number
LS_ITEM-MATERIAL_GUID = ‘CHAR32’. “GUID (External)
LS_ITEM-MATERIAL_VERSION = ‘CHAR10’. “Version Number
LS_ITEM-EMATERIAL = ‘CHAR18’. “Material
LS_ITEM-EMATERIAL_EXTERNAL = ‘CHAR40’. “Material Number
LS_ITEM-EMATERIAL_GUID = ‘CHAR32’. “GUID (External)
LS_ITEM-EMATERIAL_VERSION = ‘CHAR10’. “Version Number
LS_ITEM-PLANT = ‘CHAR4’. “Plant
LS_ITEM-STGE_LOC = ‘CHAR4’. “Storage Location
LS_ITEM-SUPPL_STLOC = ‘CHAR4’. “Issuing Storage Loc.
LS_ITEM-TRACKINGNO = ‘CHAR10’. “Req. Tracking Number
LS_ITEM-MATL_GROUP = ‘CHAR9’. “Material Group
LS_ITEM-INFO_REC = ‘CHAR10’. “Purchasing info rec.
LS_ITEM-VEND_MAT = ‘CHAR35’. “Supplier Mat. No.
LS_ITEM-TARGET_QTY = ‘QUAN13’. “Target Quantity
LS_ITEM-RELORD_QTY = ‘QUAN13’. “Stand.Rel.Order.Qty.
LS_ITEM-PO_UNIT = ‘UNIT3’. “Order Unit
LS_ITEM-PO_UNIT_ISO = ‘CHAR3’. “Order unit in ISO
LS_ITEM-ORDERPR_UN = ‘UNIT3’. “Order Price Unit
LS_ITEM-ORDERPR_UN_ISO = ‘CHAR3’. “Order price unit ISO
LS_ITEM-CONV_NUM1 = ‘DEC5’. “Quantity Conversion
LS_ITEM-CONV_DEN1 = ‘DEC5’. “Quantity Conversion
LS_ITEM-NET_PRICE = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_ITEM-PRICE_UNIT = ‘DEC5’. “Price unit
LS_ITEM-GR_PR_TIME = ‘DEC3’. “GR processing time
LS_ITEM-TAX_CODE = ‘CHAR2’. “Tax Code
LS_ITEM-QUAL_INSP = ‘CHAR1’. “Stock Type
LS_ITEM-INFO_UPD = ‘CHAR1’. “Info Record Update
LS_ITEM-PRNT_PRICE = ‘CHAR1’. “Print Price
LS_ITEM-EST_PRICE = ‘CHAR1’. “Estimated Price
LS_ITEM-REMINDER1 = ‘DEC3’. “1st Reminder/Exped.
LS_ITEM-REMINDER2 = ‘DEC3’. “2nd Reminder/Exped.
LS_ITEM-REMINDER3 = ‘DEC3’. “3rd Reminder/Exped.
LS_ITEM-OVER_DLV_TOL = ‘DEC3’. “Overdeliv. Tolerance
LS_ITEM-UNLIMITED_DLV = ‘CHAR1’. “Unltd Overdelivery
LS_ITEM-UNDER_DLV_TOL = ‘DEC3’. “Underdel. Tolerance
LS_ITEM-VAL_TYPE = ‘CHAR10’. “Valuation Type
LS_ITEM-NO_MORE_GR = ‘CHAR1’. “Delivery Completed
LS_ITEM-FINAL_INV = ‘CHAR1’. “Final Invoice
LS_ITEM-ITEM_CAT = ‘CHAR1’. “Item Category
LS_ITEM-ACCTASSCAT = ‘CHAR1’. “Acct Assignment Cat.
LS_ITEM-DISTRIB = ‘CHAR1’. “Distrib. Indicator
LS_ITEM-PART_INV = ‘CHAR1’. “Partial invoice
LS_ITEM-GR_IND = ‘CHAR1’. “Goods Receipt
LS_ITEM-GR_NON_VAL = ‘CHAR1’. “GR non-valuated
LS_ITEM-IR_IND = ‘CHAR1’. “Invoice Receipt
LS_ITEM-GR_BASEDIV = ‘CHAR1’. “GR-Based Inv. Verif.
LS_ITEM-GRSETTFROM = ‘20241208’. “GR-B.Settlement from
LS_ITEM-ACKN_REQD = ‘CHAR1’. “Acknowledgment Reqd.
LS_ITEM-ACKNOWL_NO = ‘CHAR20’. “Order Acknowledgment
LS_ITEM-AGREEMENT = ‘CHAR10’. “Outline agreement
LS_ITEM-AGMT_ITEM = ‘NUMC5’. “Princ. Agreement Item
LS_ITEM-SHIPPING = ‘CHAR2’. “Shipping Instr.
LS_ITEM-CUSTOMER = ‘CHAR10’. “Customer
LS_ITEM-ADDRESS2 = ‘CHAR10’. “Address
LS_ITEM-COND_GROUP = ‘CHAR4’. “Condition Group
LS_ITEM-NO_DISCT = ‘CHAR1’. “No Cash Discount
LS_ITEM-PLAN_DEL = ‘DEC3’. “Planned Deliv. Time
LS_ITEM-GROSS_WT = ‘QUAN13’. “Gross Weight
LS_ITEM-NET_WEIGHT = ‘QUAN13’. “Net Weight
LS_ITEM-WEIGHTUNIT = ‘UNIT3’. “Unit of Weight
LS_ITEM-WEIGHTUNIT_ISO = ‘CHAR3’. “ISO code
LS_ITEM-TAXJURCODE = ‘CHAR15’. “Tax Jurisdiction
LS_ITEM-CTRL_KEY = ‘CHAR8’. “QM Control Key
LS_ITEM-CONF_CTRL = ‘CHAR4’. “Confirmation Control
LS_ITEM-REV_LEV = ‘CHAR2’. “Revision Level
LS_ITEM-FUND = ‘CHAR10’. “Fund
LS_ITEM-FUNDS_CTR = ‘CHAR16’. “Funds Center
LS_ITEM-CMMT_ITEM = ‘CHAR14’. “Commitment item
LS_ITEM-PRICEDATE = ‘CHAR1’. “Pricing Date Control
LS_ITEM-PRICE_DATE = ‘20241208’. “Price Date
LS_ITEM-VOLUME = ‘QUAN13’. “Volume
LS_ITEM-VOLUMEUNIT = ‘UNIT3’. “Volume Unit
LS_ITEM-VOLUMEUNIT_ISO = ‘CHAR3’. “Volume unit ISO
LS_ITEM-INCOTERMS1 = ‘CHAR3’. “Incoterms
LS_ITEM-INCOTERMS2 = ‘CHAR28’. “Incoterms (Part 2)
LS_ITEM-PRE_VENDOR = ‘CHAR10’. “Prior Supplier
LS_ITEM-VEND_PART = ‘CHAR6’. “Supplier Subrange
LS_ITEM-GR_TO_DATE = ‘20241208’. “Latest GR Date
LS_ITEM-SUPP_VENDOR = ‘CHAR10’. “Supplier
LS_ITEM-SC_VENDOR = ‘CHAR1’. “SC Supplier
LS_ITEM-KANBAN_IND = ‘CHAR1’. “Kanban Indicator
LS_ITEM-ERS = ‘CHAR1’. “Eval. Receipt Sett.
LS_ITEM-PROMOTION = ‘CHAR10’. “Retail Promotion
LS_ITEM-POINTS = ‘QUAN13’. “Points
LS_ITEM-POINT_UNIT = ‘UNIT3’. “Points Unit
LS_ITEM-POINT_UNIT_ISO = ‘CHAR3’. “ISO code
LS_ITEM-SEASON = ‘CHAR4’. “Season
LS_ITEM-SEASON_YR = ‘CHAR4’. “Season Year
LS_ITEM-SETT_ITEM = ‘CHAR1’. “Subseq. Settlement
LS_ITEM-BON_GRP1 = ‘CHAR2’. “Settlement Group 1
LS_ITEM-BON_GRP2 = ‘CHAR2’. “Settlement Group 2
LS_ITEM-BON_GRP3 = ‘CHAR2’. “Settlement Group 3
LS_ITEM-MINREMLIFE = ‘DEC4’. “Min. Rem. Shelf Life
LS_ITEM-RFQ_NO = ‘CHAR10’. “RFQ
LS_ITEM-RFQ_ITEM = ‘NUMC5’. “Item
LS_ITEM-PREQ_NO = ‘CHAR10’. “Purchase Requisition
LS_ITEM-PREQ_ITEM = ‘NUMC5’. “Item of requisition
LS_ITEM-REF_DOC = ‘CHAR10’. “Reference Document
LS_ITEM-REF_ITEM = ‘NUMC5’. “Reference item
LS_ITEM-ORDER_REASON = ‘CHAR3’. “Reason for Ordering
LS_ITEM-BRAS_NBM = ‘CHAR16’. “NCM Code
LS_ITEM-MATL_USAGE = ‘CHAR1’. “Material Usage
LS_ITEM-MAT_ORIGIN = ‘CHAR1’. “Material Origin
LS_ITEM-IN_HOUSE = ‘CHAR1’. “Produced in-house
LS_ITEM-INDUS3 = ‘CHAR2’. “Mat. CFOP category
LS_ITEM-INF_INDEX = ‘CHAR5’. “Inflation Index
LS_ITEM-UNTIL_DATE = ‘20241208’. “Inflation Index Date
LS_ITEM-DELIV_COMPL = ‘CHAR1’. “Final Delivery
LS_ITEM-PART_DELIV = ‘CHAR1’. “Partial Deliv./Item
LS_ITEM-SHIP_BLOCKED = ‘CHAR1’. “Shipping block
LS_ITEM-PREQ_NAME = ‘CHAR12’. “Requisitioner
LS_ITEM-PERIOD_IND_EXPIRATION_DATE = ‘CHAR1’. “Period Ind. for SLED
LS_ITEM-CALCTYPE = ‘CHAR1’. “Pricing Type
LS_ITEM-FUNC_AREA = ‘CHAR16’. “Functional Area
LS_ITEM-CMMT_ITEM_LONG = ‘CHAR24’. “Commitment Item
LS_ITEM-GRANT_NBR = ‘CHAR20’. “Grant
LS_ITEM-FUNDS_RES = ‘CHAR10’. “Earmarked Funds
LS_ITEM-RES_ITEM = ‘NUMC3’. “Document Item
LS_ITEM-SRV_BASED_IV = ‘CHAR1’. “Service-Based Invoice Verification
LS_ITEM-PCKG_NO = ‘NUMC10’. “Package number
LS_ITEM-INT_OBJ_NO = ‘NUMC18’. “Internal object no.
LS_ITEM-BINDING_MRP = ‘CHAR1’. “Binding on MRP
LS_ITEM-FIRM_ZONE = ‘DEC3’. “Firm Zone
LS_ITEM-TRADE_OFF = ‘DEC3’. “Trade-Off Zone
LS_ITEM-REL_CREATE_PROFILE = ‘CHAR4’. “Release Creation Profile
LS_ITEM-JIT_RELVT = ‘CHAR1’. “JIT Delivery
LS_ITEM-EXCLUSION = ‘CHAR1’. “Exclusion Indicator
LS_ITEM-RECON_DATE = ‘20241208’. “Reconciliation Date
LS_ITEM-AGRCUMQTY = ‘QUAN13’. “Agr. Cumulative Qty
LS_ITEM-APO_PLANNING = ‘CHAR1’. “External Planning
LS_ITEM-RETENTION_PERCENTAGE = ‘DEC5’. “Retention in Percent
LS_ITEM-EXT_RFX_NUMBER = ‘CHAR35’. “Document No. External Doc.
LS_ITEM-EXT_RFX_ITEM = ‘CHAR10’. “External Item Number
LS_ITEM-EXT_RFX_SYSTEM = ‘CHAR10’. “Logical System
LS_ITEM-BUDGET_PERIOD = ‘CHAR10’. “Budget Period
LS_ITEM-MANUAL_TC_REASON = ‘CHAR2’. “Manual Tax Code Reason
LS_ITEM-FISCAL_INCENTIVE = ‘CHAR4’. “Tax Incentive Type
LS_ITEM-FISCAL_INCENTIVE_ID = ‘CHAR4’. “Incentive ID
LS_ITEM-TC_AUT_DET = ‘CHAR2’. “Tax Code Automatically Determined
LS_ITEM-TAX_SUBJECT_ST = ‘CHAR1’. “Tax Subject to Substitui##o Tributивria
LS_ITEM-STK_SEGMENT = ‘CHAR16’. “Stock Segment
LS_ITEM-ORIG_ACCEPT = ‘CHAR1’. “Origin Acceptance
LS_ITEM-INCOTERMS2L = ‘CHAR70’. “Incoterms Location 1
LS_ITEM-INCOTERMS3L = ‘CHAR70’. “Incoterms Location 2
LS_ITEM-MATERIAL_LONG = ‘CHAR40’. “Material
LS_ITEM-EMATERIAL_LONG = ‘CHAR40’. “Material
LS_ITEM-SERVICEPERFORMER = ‘CHAR10’. “Service Performer
LS_ITEM-PRODUCTTYPE = ‘CHAR2’. “Product Type Group
LS_ITEM-MATERIALTYPE = ‘CHAR4’. “Material Type
LS_ITEM-STK_SEG_LONG = ‘CHAR40’. “Stock Segment
LS_ITEM-HL_ITEM = ‘NUMC5’. “Higher-Level Item
LS_ITEM-SI_CAT = ‘CHAR1’. “Subitem Category
LS_ITEM-COLLECTION = ‘CHAR10’. “Collection
LS_ITEM-THEME = ‘CHAR10’. “Theme
LS_ITEM-RFM_SEASON_YR = ‘CHAR4’. “Season Year
LS_ITEM-RFM_SEASON = ‘CHAR10’. “Season
LS_ITEM-CHARACTERISTIC1 = ‘CHAR18’. “Characteristic Value 1
LS_ITEM-CHARACTERISTIC2 = ‘CHAR18’. “Characteristic Value 2
LS_ITEM-CHARACTERISTIC3 = ‘CHAR18’. “Characteristic Value 3
LS_ITEM-CHARACTERISTIC1_DESCRIPTION = ‘CHAR70’. “Char Desc. 1
LS_ITEM-CHARACTERISTIC2_DESCRIPTION = ‘CHAR70’. “Char Desc. 2
LS_ITEM-CHARACTERISTIC3_DESCRIPTION = ‘CHAR70’. “Char Desc. 3
LS_ITEM-ISOUTLINE = ‘CHAR1’. “Is Item Set
LS_ITEM-TXS_BUSINESS_TRANSACTION = ‘CHAR4’. “Business Transaction
LS_ITEM-TXS_USAGE_PURPOSE = ‘CHAR25’. “Usage Purpose
LS_ITEM-HIERARCHY_ITEM_NO = ‘CHAR40’. “Hierarchy Number
LS_ITEM-STATUS_PCS = ‘CHAR1’. “Product Compliance Supplier Check Status
LS_ITEM-TAX_COUNTRY = ‘CHAR3’. “Tax Country/Region
APPEND LS_ITEM TO LT_ITEM .
CLEAR LS_ITEM .

**********************************************************************
*******Defination of [Tables]-[ITEMX] .
**********************************************************************
DATA: LT_ITEMX TYPE STANDARD TABLE OF BAPIMEOUTITEMX.””Item Data Change Parameter for Outline Agreement
DATA: LS_ITEMX TYPE BAPIMEOUTITEMX .””Item Data Change Parameter for Outline Agreement
LS_ITEMX-ITEM_NO = ‘NUMC5’. “Item
LS_ITEMX-ITEM_NOX = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SHORT_TEXT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATERIAL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATERIAL_EXTERNAL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATERIAL_GUID = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATERIAL_VERSION = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EMATERIAL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EMATERIAL_EXTERNAL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EMATERIAL_GUID = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EMATERIAL_VERSION = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PLANT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-STGE_LOC = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SUPPL_STLOC = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TRACKINGNO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATL_GROUP = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INFO_REC = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-VEND_MAT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TARGET_QTY = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RELORD_QTY = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PO_UNIT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PO_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ORDERPR_UN = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ORDERPR_UN_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CONV_NUM1 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CONV_DEN1 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-NET_PRICE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PRICE_UNIT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GR_PR_TIME = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TAX_CODE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-QUAL_INSP = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INFO_UPD = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PRNT_PRICE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EST_PRICE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-REMINDER1 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-REMINDER2 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-REMINDER3 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-OVER_DLV_TOL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-UNLIMITED_DLV = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-UNDER_DLV_TOL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-VAL_TYPE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-NO_MORE_GR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FINAL_INV = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ITEM_CAT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ACCTASSCAT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-DISTRIB = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PART_INV = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GR_IND = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GR_NON_VAL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-IR_IND = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GR_BASEDIV = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GRSETTFROM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ACKN_REQD = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ACKNOWL_NO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-AGREEMENT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-AGMT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SHIPPING = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CUSTOMER = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ADDRESS2 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-COND_GROUP = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-NO_DISCT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PLAN_DEL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GROSS_WT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-NET_WEIGHT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-WEIGHTUNIT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-WEIGHTUNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TAXJURCODE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CTRL_KEY = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CONF_CTRL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-REV_LEV = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FUND = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FUNDS_CTR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CMMT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PRICEDATE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PRICE_DATE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-VOLUME = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-VOLUMEUNIT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-VOLUMEUNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INCOTERMS1 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INCOTERMS2 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PRE_VENDOR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-VEND_PART = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GR_TO_DATE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SUPP_VENDOR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SC_VENDOR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-KANBAN_IND = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ERS = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PROMOTION = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-POINTS = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-POINT_UNIT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-POINT_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SEASON = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SEASON_YR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SETT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-BON_GRP1 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-BON_GRP2 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-BON_GRP3 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MINREMLIFE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RFQ_NO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RFQ_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PREQ_NO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PREQ_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-REF_DOC = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-REF_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ORDER_REASON = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-BRAS_NBM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATL_USAGE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MAT_ORIGIN = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-IN_HOUSE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INDUS3 = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INF_INDEX = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-UNTIL_DATE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-DELIV_COMPL = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PART_DELIV = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SHIP_BLOCKED = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PREQ_NAME = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PERIOD_IND_EXPIRATION_DATE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CALCTYPE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FUNC_AREA = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-CMMT_ITEM_LONG = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-GRANT_NBR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FUNDS_RES = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RES_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SRV_BASED_IV = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PCKG_NO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INT_OBJ_NO = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-BINDING_MRP = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FIRM_ZONE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TRADE_OFF = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-REL_CREATE_PROFILE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-JIT_RELVT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EXCLUSION = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RECON_DATE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-AGRCUMQTY = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-APO_PLANNING = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RETENTION_PERCENTAGE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EXT_RFX_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EXT_RFX_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EXT_RFX_SYSTEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-BUDGET_PERIOD = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MANUAL_TC_REASON = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FISCAL_INCENTIVE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-FISCAL_INCENTIVE_ID = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TC_AUT_DET = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TAX_SUBJECT_ST = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-STK_SEGMENT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ORIG_ACCEPT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INCOTERMS2L = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-INCOTERMS3L = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATERIAL_LONG = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-EMATERIAL_LONG = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SERVICEPERFORMER = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-PRODUCTTYPE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-MATERIALTYPE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-STK_SEG_LONG = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-HL_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-SI_CAT = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-COLLECTION = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-THEME = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RFM_SEASON_YR = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-RFM_SEASON = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-ISOUTLINE = ‘CHAR1’. “Updated info. user data field
LS_ITEMX-TAX_COUNTRY = ‘CHAR1’. “Updated info. user data field
APPEND LS_ITEMX TO LT_ITEMX .
CLEAR LS_ITEMX .

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

**********************************************************************
*******Defination of [Tables]-[ACCOUNTPROFITSEGMENT] .
**********************************************************************
DATA: LT_ACCOUNTPROFITSEGMENT TYPE STANDARD TABLE OF BAPIMEOUTPROFITSEGMENT.””Acct Assgt: Prof. Segment Calc. (CO-PA) Outline Agreement
DATA: LS_ACCOUNTPROFITSEGMENT TYPE BAPIMEOUTPROFITSEGMENT .””Acct Assgt: Prof. Segment Calc. (CO-PA) Outline Agreement
LS_ACCOUNTPROFITSEGMENT-ITEM_NO = ‘NUMC5’. “Item
LS_ACCOUNTPROFITSEGMENT-SERIAL_NO = ‘NUMC2’. “Seq. No. of Account Assgt
LS_ACCOUNTPROFITSEGMENT-FIELDNAME = ‘CHAR30’. “Field Name
LS_ACCOUNTPROFITSEGMENT-VALUE = ‘CHAR50’. “Characteristic value
APPEND LS_ACCOUNTPROFITSEGMENT TO LT_ACCOUNTPROFITSEGMENT .
CLEAR LS_ACCOUNTPROFITSEGMENT .

**********************************************************************
*******Defination of [Tables]-[ACCOUNTX] .
**********************************************************************
DATA: LT_ACCOUNTX TYPE STANDARD TABLE OF BAPIMEOUTACCOUNTX.””Account Assignment Data – Change Parameter – Outl. Agreement
DATA: LS_ACCOUNTX TYPE BAPIMEOUTACCOUNTX .””Account Assignment Data – Change Parameter – Outl. Agreement
LS_ACCOUNTX-ITEM_NO = ‘NUMC5’. “Item
LS_ACCOUNTX-SERIAL_NO = ‘NUMC2’. “Seq. No. of Account Assgt
LS_ACCOUNTX-ITEM_NOX = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-SERIAL_NOX = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-CREAT_DATE = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-QUANTITY = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-DISTR_PERC = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-NET_VALUE = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-GL_ACCOUNT = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-BUS_AREA = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-COSTCENTER = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-SD_DOC = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-ITM_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-SCHED_LINE = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-ASSET_NO = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-SUB_NUMBER = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-ORDERID = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-GR_RCPT = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-UNLOAD_PT = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-CO_AREA = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-COSTOBJECT = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-PROFIT_CTR = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-WBS_ELEMENT = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-NETWORK = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-RL_EST_KEY = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-PART_ACCT = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-CMMT_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-REC_IND = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-FUNDS_CTR = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-FUND = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-FUNC_AREA = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-REF_DATE = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-TAX_CODE = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-TAXJURCODE = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-NOND_ITAX = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-ACTTYPE = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-CO_BUSPROC = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-RES_DOC = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-RES_ITEM = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-ACTIVITY = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-GRANT_NBR = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-CMMT_ITEM_LONG = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-FUNC_AREA_LONG = ‘CHAR1’. “Updated info. user data field
LS_ACCOUNTX-BUDGET_PERIOD = ‘CHAR1’. “Updated info. user data field
APPEND LS_ACCOUNTX TO LT_ACCOUNTX .
CLEAR LS_ACCOUNTX .

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

**********************************************************************
*******Defination of [Tables]-[ITEM_COND_VALIDITY] .
**********************************************************************
DATA: LT_ITEM_COND_VALIDITY TYPE STANDARD TABLE OF BAPIMEOUTVALIDITY.””Validity Periods of Conditions
DATA: LS_ITEM_COND_VALIDITY TYPE BAPIMEOUTVALIDITY .””Validity Periods of Conditions
LS_ITEM_COND_VALIDITY-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM_COND_VALIDITY-SERIAL_ID = ‘CHAR10’. “Document Item
LS_ITEM_COND_VALIDITY-PLANT = ‘CHAR4’. “Plant
LS_ITEM_COND_VALIDITY-VALID_FROM = ‘20241208’. “Valid From
LS_ITEM_COND_VALIDITY-VALID_TO = ‘20241208’. “Valid To
LS_ITEM_COND_VALIDITY-STOCK_SEGMENT = ‘CHAR40’. “Stock Segment
APPEND LS_ITEM_COND_VALIDITY TO LT_ITEM_COND_VALIDITY .
CLEAR LS_ITEM_COND_VALIDITY .

**********************************************************************
*******Defination of [Tables]-[ITEM_COND_VALIDITYX] .
**********************************************************************
DATA: LT_ITEM_COND_VALIDITYX TYPE STANDARD TABLE OF BAPIMEOUTVALIDITYX.””Change Parameter – Validity Periods for Conditions
DATA: LS_ITEM_COND_VALIDITYX TYPE BAPIMEOUTVALIDITYX .””Change Parameter – Validity Periods for Conditions
LS_ITEM_COND_VALIDITYX-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM_COND_VALIDITYX-SERIAL_ID = ‘CHAR10’. “Document Item
LS_ITEM_COND_VALIDITYX-ITEM_NOX = ‘CHAR1’. “Updated info. user data field
LS_ITEM_COND_VALIDITYX-SERIAL_IDX = ‘CHAR1’. “Updated info. user data field
LS_ITEM_COND_VALIDITYX-PLANT = ‘CHAR1’. “Updated info. user data field
LS_ITEM_COND_VALIDITYX-VALID_FROM = ‘CHAR1’. “Updated info. user data field
LS_ITEM_COND_VALIDITYX-VALID_TO = ‘CHAR1’. “Updated info. user data field
LS_ITEM_COND_VALIDITYX-STOCK_SEGMENT = ‘CHAR1’. “Updated info. user data field
APPEND LS_ITEM_COND_VALIDITYX TO LT_ITEM_COND_VALIDITYX .
CLEAR LS_ITEM_COND_VALIDITYX .

**********************************************************************
*******Defination of [Tables]-[ITEM_CONDITION] .
**********************************************************************
DATA: LT_ITEM_CONDITION TYPE STANDARD TABLE OF BAPIMEOUTCONDITION.””Master Conditions in Outline Agreement
DATA: LS_ITEM_CONDITION TYPE BAPIMEOUTCONDITION .””Master Conditions in Outline Agreement
LS_ITEM_CONDITION-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM_CONDITION-SERIAL_ID = ‘CHAR10’. “Document Item
LS_ITEM_CONDITION-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_ITEM_CONDITION-DELETION_IND = ‘CHAR1’. “Deletion Indicator
LS_ITEM_CONDITION-COND_TYPE = ‘CHAR4’. “Condition Type
LS_ITEM_CONDITION-SCALE_TYPE = ‘CHAR1’. “Scale Type
LS_ITEM_CONDITION-SCALE_BASE_TY = ‘CHAR1’. “Scale Base Type
LS_ITEM_CONDITION-SCALE_UNIT = ‘UNIT3’. “Scale Unit of Meas.
LS_ITEM_CONDITION-SCALE_UNIT_ISO = ‘CHAR3’. “ISO condition UoM
LS_ITEM_CONDITION-SCALE_CURR = ‘CUKY5’. “Currency
LS_ITEM_CONDITION-SCALE_CURR_ISO = ‘CHAR3’. “ISO Currency Code
LS_ITEM_CONDITION-CALCTYPCON = ‘CHAR1’. “Calculation Type
LS_ITEM_CONDITION-COND_VALUE = ‘DEC28’. “Condition Amount
LS_ITEM_CONDITION-CURRENCY = ‘CUKY5’. “Currency
LS_ITEM_CONDITION-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_ITEM_CONDITION-COND_P_UNT = ‘DEC5’. “Pricing Unit
LS_ITEM_CONDITION-COND_UNIT = ‘UNIT3’. “Unit of Measure
LS_ITEM_CONDITION-COND_UNIT_ISO = ‘CHAR3’. “ISO condition UoM
LS_ITEM_CONDITION-NUMERATOR = ‘DEC5’. “NumeratorForConvers.
LS_ITEM_CONDITION-DENOMINATOR = ‘DEC5’. “Denom.for Conversion
LS_ITEM_CONDITION-BASE_UOM = ‘UNIT3’. “Base Unit of Measure
LS_ITEM_CONDITION-BASE_UOM_ISO = ‘CHAR3’. “Base unit ISO code
LS_ITEM_CONDITION-LOWERLIMIT = ‘CURR11’. “Lower limit
LS_ITEM_CONDITION-UPPERLIMIT = ‘CURR11’. “Upper limit
LS_ITEM_CONDITION-VENDOR_NO = ‘CHAR10’. “Supplier
LS_ITEM_CONDITION-CHANGE_ID = ‘CHAR1’. “Change Indicator
APPEND LS_ITEM_CONDITION TO LT_ITEM_CONDITION .
CLEAR LS_ITEM_CONDITION .

**********************************************************************
*******Defination of [Tables]-[ITEM_CONDITIONX] .
**********************************************************************
DATA: LT_ITEM_CONDITIONX TYPE STANDARD TABLE OF BAPIMEOUTCONDITIONX.””Change Parameter – Master Conditions in Outline Agreement
DATA: LS_ITEM_CONDITIONX TYPE BAPIMEOUTCONDITIONX .””Change Parameter – Master Conditions in Outline Agreement
LS_ITEM_CONDITIONX-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM_CONDITIONX-SERIAL_ID = ‘CHAR10’. “Document Item
LS_ITEM_CONDITIONX-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_ITEM_CONDITIONX-ITEM_NOX = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-SERIAL_IDX = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-COND_COUNTX = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-DELETION_IND = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-COND_TYPE = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-SCALE_TYPE = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-SCALE_BASE_TY = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-SCALE_UNIT = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-SCALE_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-SCALE_CURR = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-SCALE_CURR_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-CALCTYPCON = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-COND_VALUE = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-CURRENCY = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-CURRENCY_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-COND_P_UNT = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-COND_UNIT = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-COND_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-NUMERATOR = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-DENOMINATOR = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-BASE_UOM = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-BASE_UOM_ISO = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-LOWERLIMIT = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-UPPERLIMIT = ‘CHAR1’. “Updated info. user data field
LS_ITEM_CONDITIONX-VENDOR_NO = ‘CHAR1’. “Updated info. user data field
APPEND LS_ITEM_CONDITIONX TO LT_ITEM_CONDITIONX .
CLEAR LS_ITEM_CONDITIONX .

**********************************************************************
*******Defination of [Tables]-[ITEM_COND_SCALE_VALUE] .
**********************************************************************
DATA: LT_ITEM_COND_SCALE_VALUE TYPE STANDARD TABLE OF BAPIMEOUTITEMSCALEVAL.””Value-Based Scales
DATA: LS_ITEM_COND_SCALE_VALUE TYPE BAPIMEOUTITEMSCALEVAL .””Value-Based Scales
LS_ITEM_COND_SCALE_VALUE-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM_COND_SCALE_VALUE-SERIAL_NO = ‘CHAR10’. “Document Item
LS_ITEM_COND_SCALE_VALUE-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_ITEM_COND_SCALE_VALUE-LINE_NO = ‘NUMC4’. “Line number
LS_ITEM_COND_SCALE_VALUE-SCALE_BASE_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_ITEM_COND_SCALE_VALUE-COND_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
APPEND LS_ITEM_COND_SCALE_VALUE TO LT_ITEM_COND_SCALE_VALUE .
CLEAR LS_ITEM_COND_SCALE_VALUE .

**********************************************************************
*******Defination of [Tables]-[ITEM_COND_SCALE_QUAN] .
**********************************************************************
DATA: LT_ITEM_COND_SCALE_QUAN TYPE STANDARD TABLE OF BAPIMEOUTITEMSCALEQUAN.””Quantity Scales for Conditions
DATA: LS_ITEM_COND_SCALE_QUAN TYPE BAPIMEOUTITEMSCALEQUAN .””Quantity Scales for Conditions
LS_ITEM_COND_SCALE_QUAN-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM_COND_SCALE_QUAN-SERIAL_NO = ‘CHAR10’. “Document Item
LS_ITEM_COND_SCALE_QUAN-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_ITEM_COND_SCALE_QUAN-LINE_NO = ‘NUMC4’. “Line number
LS_ITEM_COND_SCALE_QUAN-SCALE_BASE_QTY = ‘QUAN15’. “Scale Quantity
LS_ITEM_COND_SCALE_QUAN-COND_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
APPEND LS_ITEM_COND_SCALE_QUAN TO LT_ITEM_COND_SCALE_QUAN .
CLEAR LS_ITEM_COND_SCALE_QUAN .

**********************************************************************
*******Defination of [Tables]-[ITEM_TEXT] .
**********************************************************************
DATA: LT_ITEM_TEXT TYPE STANDARD TABLE OF BAPIMEOUTITEMTEXT.””Text Data – Outline Agreement
DATA: LS_ITEM_TEXT TYPE BAPIMEOUTITEMTEXT .””Text Data – Outline Agreement
LS_ITEM_TEXT-ITEM_NO = ‘NUMC5’. “Item
LS_ITEM_TEXT-TEXT_ID = ‘CHAR4’. “Text ID
LS_ITEM_TEXT-TEXT_FORM = ‘CHAR2’. “Tag column
LS_ITEM_TEXT-TEXT_LINE = ‘CHAR132’. ”
LS_ITEM_TEXT-DELETE_IND = ‘CHAR1’. “Deletion Indicator
APPEND LS_ITEM_TEXT TO LT_ITEM_TEXT .
CLEAR LS_ITEM_TEXT .

**********************************************************************
*******Defination of [Tables]-[HEADER_TEXT] .
**********************************************************************
DATA: LT_HEADER_TEXT TYPE STANDARD TABLE OF BAPIMEOUTTEXT.””Header Text – Outline Agreement
DATA: LS_HEADER_TEXT TYPE BAPIMEOUTTEXT .””Header Text – Outline Agreement
LS_HEADER_TEXT-TEXT_ID = ‘CHAR4’. “Text ID
LS_HEADER_TEXT-TEXT_FORM = ‘CHAR2’. “Tag column
LS_HEADER_TEXT-TEXT_LINE = ‘CHAR132’. ”
LS_HEADER_TEXT-DELETE_IND = ‘CHAR1’. “Deletion Indicator
APPEND LS_HEADER_TEXT TO LT_HEADER_TEXT .
CLEAR LS_HEADER_TEXT .

**********************************************************************
*******Defination of [Tables]-[HEAD_COND_VALIDITY] .
**********************************************************************
DATA: LT_HEAD_COND_VALIDITY TYPE STANDARD TABLE OF BAPIMEOUTHEADVALIDITY.””Validity Periods of Header Conditions
DATA: LS_HEAD_COND_VALIDITY TYPE BAPIMEOUTHEADVALIDITY .””Validity Periods of Header Conditions
LS_HEAD_COND_VALIDITY-SERIAL_ID = ‘CHAR10’. “Document Item
LS_HEAD_COND_VALIDITY-VALID_FROM = ‘20241208’. “Valid From
LS_HEAD_COND_VALIDITY-VALID_TO = ‘20241208’. “Valid To
APPEND LS_HEAD_COND_VALIDITY TO LT_HEAD_COND_VALIDITY .
CLEAR LS_HEAD_COND_VALIDITY .

**********************************************************************
*******Defination of [Tables]-[HEAD_COND_VALIDITYX] .
**********************************************************************
DATA: LT_HEAD_COND_VALIDITYX TYPE STANDARD TABLE OF BAPIMEOUTHEADVALIDITYX.””Change Parameter – Validity Periods for Conditions
DATA: LS_HEAD_COND_VALIDITYX TYPE BAPIMEOUTHEADVALIDITYX .””Change Parameter – Validity Periods for Conditions
LS_HEAD_COND_VALIDITYX-SERIAL_ID = ‘CHAR10’. “Document Item
LS_HEAD_COND_VALIDITYX-SERIAL_IDX = ‘CHAR1’. “Updated info. user data field
LS_HEAD_COND_VALIDITYX-VALID_FROM = ‘CHAR1’. “Updated info. user data field
LS_HEAD_COND_VALIDITYX-VALID_TO = ‘CHAR1’. “Updated info. user data field
APPEND LS_HEAD_COND_VALIDITYX TO LT_HEAD_COND_VALIDITYX .
CLEAR LS_HEAD_COND_VALIDITYX .

**********************************************************************
*******Defination of [Tables]-[HEAD_CONDITION] .
**********************************************************************
DATA: LT_HEAD_CONDITION TYPE STANDARD TABLE OF BAPIMEOUTHEADERCOND.””Master Conditions in Outline Agreement (Header)
DATA: LS_HEAD_CONDITION TYPE BAPIMEOUTHEADERCOND .””Master Conditions in Outline Agreement (Header)
LS_HEAD_CONDITION-SERIAL_ID = ‘CHAR10’. “Document Item
LS_HEAD_CONDITION-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_HEAD_CONDITION-DELETION_IND = ‘CHAR1’. “Deletion Indicator
LS_HEAD_CONDITION-COND_TYPE = ‘CHAR4’. “Condition Type
LS_HEAD_CONDITION-SCALE_TYPE = ‘CHAR1’. “Scale Type
LS_HEAD_CONDITION-SCALE_BASE_TY = ‘CHAR1’. “Scale Base Type
LS_HEAD_CONDITION-SCALE_UNIT = ‘UNIT3’. “Scale Unit of Meas.
LS_HEAD_CONDITION-SCALE_UNIT_ISO = ‘CHAR3’. “ISO condition UoM
LS_HEAD_CONDITION-SCALE_CURR = ‘CUKY5’. “Currency
LS_HEAD_CONDITION-SCALE_CURR_ISO = ‘CHAR3’. “ISO Currency Code
LS_HEAD_CONDITION-CALCTYPCON = ‘CHAR1’. “Calculation Type
LS_HEAD_CONDITION-COND_VALUE = ‘DEC28’. “Condition Amount
LS_HEAD_CONDITION-CURRENCY = ‘CUKY5’. “Currency
LS_HEAD_CONDITION-CURRENCY_ISO = ‘CHAR3’. “ISO Currency Code
LS_HEAD_CONDITION-COND_P_UNT = ‘DEC5’. “Pricing Unit
LS_HEAD_CONDITION-COND_UNIT = ‘UNIT3’. “Unit of Measure
LS_HEAD_CONDITION-COND_UNIT_ISO = ‘CHAR3’. “ISO condition UoM
LS_HEAD_CONDITION-NUMERATOR = ‘DEC5’. “NumeratorForConvers.
LS_HEAD_CONDITION-DENOMINATOR = ‘DEC5’. “Denom.for Conversion
LS_HEAD_CONDITION-BASE_UOM = ‘UNIT3’. “Base Unit of Measure
LS_HEAD_CONDITION-BASE_UOM_ISO = ‘CHAR3’. “Base unit ISO code
LS_HEAD_CONDITION-LOWERLIMIT = ‘CURR11’. “Lower limit
LS_HEAD_CONDITION-UPPERLIMIT = ‘CURR11’. “Upper limit
LS_HEAD_CONDITION-VENDOR_NO = ‘CHAR10’. “Supplier
LS_HEAD_CONDITION-CHANGE_ID = ‘CHAR1’. “Change Indicator
APPEND LS_HEAD_CONDITION TO LT_HEAD_CONDITION .
CLEAR LS_HEAD_CONDITION .

**********************************************************************
*******Defination of [Tables]-[HEAD_CONDITIONX] .
**********************************************************************
DATA: LT_HEAD_CONDITIONX TYPE STANDARD TABLE OF BAPIMEOUTHEADERCONDX.””Change Parameter – Header Conditions in Outline Agreement
DATA: LS_HEAD_CONDITIONX TYPE BAPIMEOUTHEADERCONDX .””Change Parameter – Header Conditions in Outline Agreement
LS_HEAD_CONDITIONX-SERIAL_ID = ‘CHAR10’. “Document Item
LS_HEAD_CONDITIONX-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_HEAD_CONDITIONX-SERIAL_IDX = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-COND_COUNTX = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-DELETION_IND = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-COND_TYPE = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-SCALE_TYPE = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-SCALE_BASE_TY = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-SCALE_UNIT = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-SCALE_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-SCALE_CURR = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-SCALE_CURR_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-CALCTYPCON = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-COND_VALUE = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-CURRENCY = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-CURRENCY_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-COND_P_UNT = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-COND_UNIT = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-COND_UNIT_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-NUMERATOR = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-DENOMINATOR = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-BASE_UOM = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-BASE_UOM_ISO = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-LOWERLIMIT = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-UPPERLIMIT = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-VENDOR_NO = ‘CHAR1’. “Updated info. user data field
LS_HEAD_CONDITIONX-CHANGE_ID = ‘CHAR1’. “Updated info. user data field
APPEND LS_HEAD_CONDITIONX TO LT_HEAD_CONDITIONX .
CLEAR LS_HEAD_CONDITIONX .

**********************************************************************
*******Defination of [Tables]-[HEAD_COND_SCALE_VAL] .
**********************************************************************
DATA: LT_HEAD_COND_SCALE_VAL TYPE STANDARD TABLE OF BAPIMEOUTSCALEVALUE.””Value Scales
DATA: LS_HEAD_COND_SCALE_VAL TYPE BAPIMEOUTSCALEVALUE .””Value Scales
LS_HEAD_COND_SCALE_VAL-SERIAL_NO = ‘CHAR10’. “Document Item
LS_HEAD_COND_SCALE_VAL-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_HEAD_COND_SCALE_VAL-LINE_NO = ‘NUMC4’. “Line number
LS_HEAD_COND_SCALE_VAL-SCALE_BASE_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
LS_HEAD_COND_SCALE_VAL-COND_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
APPEND LS_HEAD_COND_SCALE_VAL TO LT_HEAD_COND_SCALE_VAL .
CLEAR LS_HEAD_COND_SCALE_VAL .

**********************************************************************
*******Defination of [Tables]-[HEAD_COND_SCALE_QUAN] .
**********************************************************************
DATA: LT_HEAD_COND_SCALE_QUAN TYPE STANDARD TABLE OF BAPIMEOUTSCALE.””Value Scales for Conditions
DATA: LS_HEAD_COND_SCALE_QUAN TYPE BAPIMEOUTSCALE .””Value Scales for Conditions
LS_HEAD_COND_SCALE_QUAN-SERIAL_NO = ‘CHAR10’. “Document Item
LS_HEAD_COND_SCALE_QUAN-COND_COUNT = ‘NUMC2’. “Sequent. No. of Cond.
LS_HEAD_COND_SCALE_QUAN-LINE_NO = ‘NUMC4’. “Line number
LS_HEAD_COND_SCALE_QUAN-SCALE_BASE_QTY = ‘QUAN15’. “Scale Quantity
LS_HEAD_COND_SCALE_QUAN-COND_VALUE = ‘DEC28’. “Currency Amount in BAPI Interfaces
APPEND LS_HEAD_COND_SCALE_QUAN TO LT_HEAD_COND_SCALE_QUAN .
CLEAR LS_HEAD_COND_SCALE_QUAN .

**********************************************************************
*******Defination of [Tables]-[PARTNER] .
**********************************************************************
DATA: LT_PARTNER TYPE STANDARD TABLE OF BAPIMEOUTPARTNER.””Partner Information for Outline Agreement
DATA: LS_PARTNER TYPE BAPIMEOUTPARTNER .””Partner Information for Outline Agreement
LS_PARTNER-PARTN_ROLE = ‘CHAR2’. “Partner Function
LS_PARTNER-PLANT = ‘CHAR4’. “Plant
LS_PARTNER-SUBRANGE_TX = ‘CHAR20’. “SSR Description
LS_PARTNER-LANGU = ‘LANG1’. “Language Key
LS_PARTNER-LANGU_ISO = ‘CHAR2’. “Language Code
LS_PARTNER-PARTNR = ‘CHAR10’. “Ref. to other suplr
LS_PARTNER-DEF_PARTNR = ‘CHAR1’. “Default Partner
LS_PARTNER-DELETE_IND = ‘CHAR1’. “Deletion Indicator
APPEND LS_PARTNER TO LT_PARTNER .
CLEAR LS_PARTNER .

**********************************************************************
*******Defination of [Tables]-[PARTNERX] .
**********************************************************************
DATA: LT_PARTNERX TYPE STANDARD TABLE OF BAPIMEOUTPARTNERX.””Change Parameter Partner Data (Outline Agreement)
DATA: LS_PARTNERX TYPE BAPIMEOUTPARTNERX .””Change Parameter Partner Data (Outline Agreement)
LS_PARTNERX-PARTN_ROLE = ‘CHAR2’. “Partner Function
LS_PARTNERX-PLANT = ‘CHAR4’. “Plant
LS_PARTNERX-SUBRANGE_TX = ‘CHAR20’. “SSR Description
LS_PARTNERX-LANGU = ‘CHAR1’. “Updated info. user data field
LS_PARTNERX-LANGU_ISO = ‘CHAR1’. “Updated info. user data field
LS_PARTNERX-PARTNR = ‘CHAR1’. “Updated info. user data field
LS_PARTNERX-DEF_PARTNR = ‘CHAR1’. “Updated info. user data field
LS_PARTNERX-DELETE_IND = ‘CHAR1’. “Updated info. user data field
APPEND LS_PARTNERX TO LT_PARTNERX .
CLEAR LS_PARTNERX .

**********************************************************************
*******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]-[RFM_VAS_ITEM_IN] .
**********************************************************************
DATA: LT_RFM_VAS_ITEM_IN TYPE STANDARD TABLE OF BAPI_FSH_VAS_MM_ITEM.””FSH Structure for VAS Item
DATA: LS_RFM_VAS_ITEM_IN TYPE BAPI_FSH_VAS_MM_ITEM .””FSH Structure for VAS Item
LS_RFM_VAS_ITEM_IN-ITM_NUMBER = ‘NUMC5’. “Item
LS_RFM_VAS_ITEM_IN-SERVICE = ‘NUMC2’. “VAS Service Types
LS_RFM_VAS_ITEM_IN-SUBSERVICE = ‘CHAR5’. “VAS Sub Services
LS_RFM_VAS_ITEM_IN-VASMATERIAL = ‘CHAR18’. “Material
LS_RFM_VAS_ITEM_IN-REQUIREMENTREL = ‘CHAR1’. “Requirement Relevancy
LS_RFM_VAS_ITEM_IN-INCREMENT = ‘NUMC4’. “Increment
LS_RFM_VAS_ITEM_IN-CHARGE_CODE = ‘CHAR3’. “VAS Charge Code
LS_RFM_VAS_ITEM_IN-TEXTFIELD1 = ‘CHAR20’. “Field1
LS_RFM_VAS_ITEM_IN-TEXTFIELD2 = ‘CHAR20’. “Field2
LS_RFM_VAS_ITEM_IN-TEXTFIELD3 = ‘CHAR20’. “Field3
LS_RFM_VAS_ITEM_IN-VASMATERIAL_LONG = ‘CHAR40’. “Material
APPEND LS_RFM_VAS_ITEM_IN TO LT_RFM_VAS_ITEM_IN .
CLEAR LS_RFM_VAS_ITEM_IN .

**********************************************************************
*******Defination of [Tables]-[RFM_VAS_ITEM_INX] .
**********************************************************************
DATA: LT_RFM_VAS_ITEM_INX TYPE STANDARD TABLE OF BAPI_FSH_VAS_MM_ITEMX.””FSH Structure for VAS Itemx (Change Parameter)
DATA: LS_RFM_VAS_ITEM_INX TYPE BAPI_FSH_VAS_MM_ITEMX .””FSH Structure for VAS Itemx (Change Parameter)
LS_RFM_VAS_ITEM_INX-ITM_NUMBER = ‘NUMC5’. “Item
LS_RFM_VAS_ITEM_INX-SERVICE = ‘NUMC2’. “VAS Service Types
LS_RFM_VAS_ITEM_INX-SUBSERVICE = ‘CHAR5’. “VAS Sub Services
LS_RFM_VAS_ITEM_INX-VASMATERIAL = ‘CHAR1’. “Updated info. user data field
LS_RFM_VAS_ITEM_INX-REQUIREMENTREL = ‘CHAR1’. “Updated info. user data field
LS_RFM_VAS_ITEM_INX-INCREMENT = ‘CHAR1’. “Updated info. user data field
LS_RFM_VAS_ITEM_INX-CHARGE_CODE = ‘CHAR1’. “Updated info. user data field
LS_RFM_VAS_ITEM_INX-TEXTFIELD1 = ‘CHAR1’. “Updated info. user data field
LS_RFM_VAS_ITEM_INX-TEXTFIELD2 = ‘CHAR1’. “Updated info. user data field
LS_RFM_VAS_ITEM_INX-TEXTFIELD3 = ‘CHAR1’. “Updated info. user data field
LS_RFM_VAS_ITEM_INX-UPDATEFLAG = ‘CHAR1’. ”
LS_RFM_VAS_ITEM_INX-VASMATERIAL_LONG = ‘CHAR1’. “Updated info. user data field
APPEND LS_RFM_VAS_ITEM_INX TO LT_RFM_VAS_ITEM_INX .
CLEAR LS_RFM_VAS_ITEM_INX .

**********************************************************************
*******Defination of [Tables]-[RFM_VAS_TEXT] .
**********************************************************************
DATA: LT_RFM_VAS_TEXT TYPE STANDARD TABLE OF BAPI_FSH_VAS_MM_TEXT.””Fashion Specific Structure for VAS Long Text
DATA: LS_RFM_VAS_TEXT TYPE BAPI_FSH_VAS_MM_TEXT .””Fashion Specific Structure for VAS Long Text
LS_RFM_VAS_TEXT-ITM_NUMBER = ‘NUMC5’. “Item
LS_RFM_VAS_TEXT-SERVICE = ‘NUMC2’. “VAS Service Types
LS_RFM_VAS_TEXT-SUBSERVICE = ‘CHAR5’. “VAS Sub Services
LS_RFM_VAS_TEXT-TEXT_LINE = ‘CHAR132’. ”
APPEND LS_RFM_VAS_TEXT TO LT_RFM_VAS_TEXT .
CLEAR LS_RFM_VAS_TEXT .

**********************************************************************
*******CallUp The Function Now. .
**********************************************************************
CALL FUNCTION ‘BAPI_CONTRACT_CREATE’
EXPORTING
HEADER = LS_HEADER
* HEADERX = LS_HEADERX
* VENDOR_ADDRESS = LS_VENDOR_ADDRESS
* TESTRUN = LV_TESTRUN
* TECHNICAL_DATA = LS_TECHNICAL_DATA
IMPORTING
PURCHASINGDOCUMENT = LV_PURCHASINGDOCUMENT
EXP_HEADER = LS_EXP_HEADER
TABLES
* RETURN = LT_RETURN
ITEM = LT_ITEM
ITEMX = LT_ITEMX
* ACCOUNT = LT_ACCOUNT
* ACCOUNTPROFITSEGMENT = LT_ACCOUNTPROFITSEGMENT
* ACCOUNTX = LT_ACCOUNTX
* DELIVERY_ADDRESS = LT_DELIVERY_ADDRESS
* ITEM_COND_VALIDITY = LT_ITEM_COND_VALIDITY
* ITEM_COND_VALIDITYX = LT_ITEM_COND_VALIDITYX
* ITEM_CONDITION = LT_ITEM_CONDITION
* ITEM_CONDITIONX = LT_ITEM_CONDITIONX
* ITEM_COND_SCALE_VALUE = LT_ITEM_COND_SCALE_VALUE
* ITEM_COND_SCALE_QUAN = LT_ITEM_COND_SCALE_QUAN
* ITEM_TEXT = LT_ITEM_TEXT
* HEADER_TEXT = LT_HEADER_TEXT
* HEAD_COND_VALIDITY = LT_HEAD_COND_VALIDITY
* HEAD_COND_VALIDITYX = LT_HEAD_COND_VALIDITYX
* HEAD_CONDITION = LT_HEAD_CONDITION
* HEAD_CONDITIONX = LT_HEAD_CONDITIONX
* HEAD_COND_SCALE_VAL = LT_HEAD_COND_SCALE_VAL
* HEAD_COND_SCALE_QUAN = LT_HEAD_COND_SCALE_QUAN
* PARTNER = LT_PARTNER
* PARTNERX = LT_PARTNERX
* EXTENSIONIN = LT_EXTENSIONIN
* EXTENSIONOUT = LT_EXTENSIONOUT
* RFM_VAS_ITEM_IN = LT_RFM_VAS_ITEM_IN
* RFM_VAS_ITEM_INX = LT_RFM_VAS_ITEM_INX
* RFM_VAS_TEXT = LT_RFM_VAS_TEXT
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.

If you have problem, please fell free to contact.Thanks.

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》

 

http://www.hot583.com/category/sap_tech/sap_bapi/