ABAP Select data from SAP table APURORDERITEM into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP APURORDERITEM table and store it within an internal table, including using the newer @DATA inline declaration methods. It also shows you various ways to process this data using ABAP work area, inline declaration or field symbols including executing all the relevant CONVERSION_EXIT routines specific to APURORDERITEM. See here for more generic Select statement tips.

Sometimes data within SAP is stored within the database table in a different format to what it is displayed to the user. These input/output conversation FM routines are what translates the data between the two formats.

There is also a full declaration of the APURORDERITEM table where each field has a char/string type for you to simply copy and paste. This allows you to use processing that is only available to these field types such as the CONCATENATE statement.

DATA: IT_APURORDERITEM TYPE STANDARD TABLE OF APURORDERITEM,
      WA_APURORDERITEM TYPE APURORDERITEM,
      GD_STR TYPE STRING.

DATA: lo_typedescr type REF TO cl_abap_typedescr.
DATA: lv_fieldname type fieldname.

FIELD-SYMBOLS: <FIELD> TYPE any.
FIELD-SYMBOLS: <APURORDERITEM> TYPE APURORDERITEM.

*Process all fields in table header/work area as string values
  PERFORM process_as_string_field_values CHANGING wa_APURORDERITEM.

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM APURORDERITEM
  INTO TABLE IT_APURORDERITEM.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM APURORDERITEM
*  INTO TABLE @DATA(IT_APURORDERITEM2).
*--Further methods of using ABAP code to  select data from SAP database tables

*You can also declare the header/work area using the in-line DATA declaration method
READ TABLE IT_APURORDERITEM INDEX 1 INTO DATA(WA_APURORDERITEM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_APURORDERITEM ASSIGNING <APURORDERITEM>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<APURORDERITEM>-MANDT = 1.
<APURORDERITEM>-PURCHASEORDER = 1.
<APURORDERITEM>-PURCHASEORDERITEM = 1.
<APURORDERITEM>-PURCHASINGDOCUMENTDELETIONCODE = 1.
<APURORDERITEM>-PURCHASEORDERITEMTEXT = 1.

ENDLOOP.

LOOP AT IT_APURORDERITEM INTO WA_APURORDERITEM.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_APURORDERITEM-PLANT, sy-vline,
  WA_APURORDERITEM-STORAGELOCATION, sy-vline,
  WA_APURORDERITEM-MATERIALGROUP, sy-vline,
  WA_APURORDERITEM-PURCHASINGINFORECORD, sy-vline,
  WA_APURORDERITEM-SUPPLIERMATERIALNUMBER, sy-vline,
  WA_APURORDERITEM-ORDERQUANTITY, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_APURORDERITEM you want to display...

  WRITE:/ sy-uline.
* Aternatively use generic code to Write field values (and NAME) to screen report
  DO.
    ASSIGN COMPONENT sy-index OF STRUCTURE wa_APURORDERITEM TO <field>.
    IF sy-subrc <> 0. EXIT. ENDIF.
    WRITE:/ 'Field Value', <field>, sy-vline.
    gd_str = <field> .
    lo_typedescr ?= CL_ABAP_DATADESCR=>DESCRIBE_BY_DATA( <field> ).
    lv_fieldname = lo_typedescr->GET_RELATIVE_NAME( ).
    WRITE:/ 'Field Name', lv_fieldname.
  ENDDO.

  
*Redo loop but convert all fields from internal to out value  
LOOP AT IT_APURORDERITEM INTO WA_APURORDERITEM.


*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Convert all fields to display/output versions using conversion routines
  PERFORM convert_all_field_values CHANGING wa_EKKO.
	 
ENDLOOP.

  
*&---------------------------------------------------------------------*
*& Form convert_all_field_values
*&---------------------------------------------------------------------*
FORM convert_all_field_values CHANGING p_EKKO LIKE wa_EKKO.
DATA: ld_input(1000) TYPE c, ld_output(1000) TYPE C.

*Conversion exit ALPHA, internal->external for field PURCHASEORDER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-PURCHASEORDER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-PURCHASEORDER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PURCHASINGINFORECORD
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-PURCHASINGINFORECORD
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-PURCHASINGINFORECORD.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field PURCHASEORDERQUANTITYUNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-PURCHASEORDERQUANTITYUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-PURCHASEORDERQUANTITYUNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field ORDERPRICEUNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-ORDERPRICEUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-ORDERPRICEUNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PURCHASECONTRACT
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-PURCHASECONTRACT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-PURCHASECONTRACT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field CUSTOMER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-CUSTOMER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-CUSTOMER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field SUBCONTRACTOR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-SUBCONTRACTOR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-SUBCONTRACTOR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field ITEMWEIGHTUNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-ITEMWEIGHTUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-ITEMWEIGHTUNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field ITEMVOLUMEUNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-ITEMVOLUMEUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-ITEMVOLUMEUNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PURCHASEREQUISITION
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-PURCHASEREQUISITION
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-PURCHASEREQUISITION.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field EARMARKEDFUNDS
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-EARMARKEDFUNDS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-EARMARKEDFUNDS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field EARMARKEDFUNDSDOCUMENT
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-EARMARKEDFUNDSDOCUMENT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-EARMARKEDFUNDSDOCUMENT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MATERIAL
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-MATERIAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-MATERIAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit EAN11, internal->external for field INTERNATIONALARTICLENUMBER
CALL FUNCTION 'CONVERSION_EXIT_EAN11_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-INTERNATIONALARTICLENUMBER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-INTERNATIONALARTICLENUMBER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MANUFACTURERMATERIAL
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-MANUFACTURERMATERIAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-MANUFACTURERMATERIAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field SERVICEPERFORMER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-SERVICEPERFORMER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-SERVICEPERFORMER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field PURCONTRACTFOROVERALLLIMIT
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-PURCONTRACTFOROVERALLLIMIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-PURCONTRACTFOROVERALLLIMIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field REFERENCEDELIVERYADDRESSID
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-REFERENCEDELIVERYADDRESSID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-REFERENCEDELIVERYADDRESSID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field DELIVERYADDRESSID
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-DELIVERYADDRESSID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-DELIVERYADDRESSID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field BR_CFOPCATEGORY
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-BR_CFOPCATEGORY
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-BR_CFOPCATEGORY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field CROSSPLANTCONFIGURABLEPRODUCT
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-CROSSPLANTCONFIGURABLEPRODUCT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-CROSSPLANTCONFIGURABLEPRODUCT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field REFERENCEDOCUMENTNUMBER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_APURORDERITEM-REFERENCEDOCUMENTNUMBER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_APURORDERITEM-REFERENCEDOCUMENTNUMBER.
WRITE:/ 'New Value:', ld_input.
ENDFORM. 

*&---------------------------------------------------------------------*
*& Form process_as_string_field_values
*&---------------------------------------------------------------------*
FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO.

TYPES: BEGIN OF T_APURORDERITEM_STR, 
MANDT TYPE STRING,
PURCHASEORDER TYPE STRING,
PURCHASEORDERITEM TYPE STRING,
PURCHASINGDOCUMENTDELETIONCODE TYPE STRING,
PURCHASEORDERITEMTEXT TYPE STRING,
PLANT TYPE STRING,
STORAGELOCATION TYPE STRING,
MATERIALGROUP TYPE STRING,
PURCHASINGINFORECORD TYPE STRING,
SUPPLIERMATERIALNUMBER TYPE STRING,
ORDERQUANTITY TYPE STRING,
PURCHASEORDERQUANTITYUNIT TYPE STRING,
ORDERPRICEUNIT TYPE STRING,
ORDERPRICEUNITTOORDERUNITNMRTR TYPE STRING,
ORDPRICEUNITTOORDERUNITDNMNTR TYPE STRING,
DOCUMENTCURRENCY TYPE STRING,
NETPRICEAMOUNT TYPE STRING,
NETPRICEQUANTITY TYPE STRING,
TAXCODE TYPE STRING,
TAXDETERMINATIONDATE TYPE STRING,
TAXCOUNTRY TYPE STRING,
PRICEISTOBEPRINTED TYPE STRING,
OVERDELIVTOLRTDLMTRATIOINPCT TYPE STRING,
UNLIMITEDOVERDELIVERYISALLOWED TYPE STRING,
UNDERDELIVTOLRTDLMTRATIOINPCT TYPE STRING,
VALUATIONTYPE TYPE STRING,
ISCOMPLETELYDELIVERED TYPE STRING,
ISFINALLYINVOICED TYPE STRING,
PURCHASEORDERITEMCATEGORY TYPE STRING,
ACCOUNTASSIGNMENTCATEGORY TYPE STRING,
MULTIPLEACCTASSGMTDISTRIBUTION TYPE STRING,
PARTIALINVOICEDISTRIBUTION TYPE STRING,
GOODSRECEIPTISEXPECTED TYPE STRING,
GOODSRECEIPTISNONVALUATED TYPE STRING,
INVOICEISEXPECTED TYPE STRING,
INVOICEISGOODSRECEIPTBASED TYPE STRING,
PURCHASECONTRACT TYPE STRING,
PURCHASECONTRACTITEM TYPE STRING,
CUSTOMER TYPE STRING,
SUBCONTRACTOR TYPE STRING,
SUPPLIERISSUBCONTRACTOR TYPE STRING,
ITEMNETWEIGHT TYPE STRING,
ITEMWEIGHTUNIT TYPE STRING,
TAXJURISDICTION TYPE STRING,
PRICINGDATECONTROL TYPE STRING,
ITEMVOLUME TYPE STRING,
ITEMVOLUMEUNIT TYPE STRING,
SUPPLIERCONFIRMATIONCONTROLKEY TYPE STRING,
INCOTERMSCLASSIFICATION TYPE STRING,
INCOTERMSTRANSFERLOCATION TYPE STRING,
EVALDRCPTSETTLMTISALLOWED TYPE STRING,
PURCHASEREQUISITION TYPE STRING,
PURCHASEREQUISITIONITEM TYPE STRING,
ISRETURNSITEM TYPE STRING,
REQUISITIONERNAME TYPE STRING,
SERVICEPACKAGE TYPE STRING,
EARMARKEDFUNDS TYPE STRING,
EARMARKEDFUNDSDOCUMENT TYPE STRING,
EARMARKEDFUNDSITEM TYPE STRING,
EARMARKEDFUNDSDOCUMENTITEM TYPE STRING,
INCOTERMSLOCATION1 TYPE STRING,
INCOTERMSLOCATION2 TYPE STRING,
MATERIAL TYPE STRING,
INTERNATIONALARTICLENUMBER TYPE STRING,
MANUFACTURERMATERIAL TYPE STRING,
SERVICEPERFORMER TYPE STRING,
PRODUCTTYPE TYPE STRING,
EXPECTEDOVERALLLIMITAMOUNT TYPE STRING,
OVERALLLIMITAMOUNT TYPE STRING,
PURCONTRACTFOROVERALLLIMIT TYPE STRING,
REFERENCEDELIVERYADDRESSID TYPE STRING,
DELIVERYADDRESSID TYPE STRING,
DELIVERYADDRESSNAME TYPE STRING,
DELIVERYADDRESSNAME2 TYPE STRING,
DELIVERYADDRESSFULLNAME TYPE STRING,
DELIVERYADDRESSSTREETNAME TYPE STRING,
DELIVERYADDRESSHOUSENUMBER TYPE STRING,
DELIVERYADDRESSCITYNAME TYPE STRING,
DELIVERYADDRESSPOSTALCODE TYPE STRING,
DELIVERYADDRESSREGION TYPE STRING,
DELIVERYADDRESSCOUNTRY TYPE STRING,
DOWNPAYMENTTYPE TYPE STRING,
DOWNPAYMENTPERCENTAGEOFTOTAMT TYPE STRING,
DOWNPAYMENTAMOUNT TYPE STRING,
DOWNPAYMENTDUEDATE TYPE STRING,
BR_MATERIALUSAGE TYPE STRING,
BR_MATERIALORIGIN TYPE STRING,
BR_CFOPCATEGORY TYPE STRING,
BR_ISPRODUCEDINHOUSE TYPE STRING,
CONSUMPTIONTAXCTRLCODE TYPE STRING,
PURGPRODCMPLNCSUPPLIERSTATUS TYPE STRING,
PURGPRODUCTMARKETABILITYSTATUS TYPE STRING,
PURGSAFETYDATASHEETSTATUS TYPE STRING,
PURGPRODCMPLNCDNGRSGOODSSTATUS TYPE STRING,
PRODUCTSEASONYEAR TYPE STRING,
PRODUCTSEASON TYPE STRING,
PRODUCTCOLLECTION TYPE STRING,
PRODUCTTHEME TYPE STRING,
SEASONCOMPLETENESSSTATUS TYPE STRING,
PRODUCTCHARACTERISTIC1 TYPE STRING,
PRODUCTCHARACTERISTIC2 TYPE STRING,
PRODUCTCHARACTERISTIC3 TYPE STRING,
PURCHASINGPARENTITEM TYPE STRING,
SUBITEMCATEGORY TYPE STRING,
CROSSPLANTCONFIGURABLEPRODUCT TYPE STRING,
DIVERSIONSTATUS TYPE STRING,
REFERENCEDOCUMENTNUMBER TYPE STRING,
REFERENCEDOCUMENTITEM TYPE STRING,
PURCHASEORDERREFERENCETYPE TYPE STRING,
REFERENCEDOCUMENTSCHEDULELINE TYPE STRING,
ARTICLECATEGORY TYPE STRING,
ITEMHASVALUEADDEDSERVICE TYPE STRING,
VALADDEDSRVCPARENTITMNUMBER TYPE STRING,
STOCKSEGMENT TYPE STRING,
REQUIREMENTSEGMENT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_APURORDERITEM_STR type T_EKKO_STR.

DATA: ld_text TYPE string.

LOOP AT IT_EKKO INTO WA_EKKO.
  MOVE-CORRESPONDING wa_EKKO TO WA_EKKO_STR.
  CONCATENATE: sy-vline
WA_APURORDERITEM_STR-MANDT sy-vline 
WA_APURORDERITEM_STR-PURCHASEORDER sy-vline 
WA_APURORDERITEM_STR-PURCHASEORDERITEM sy-vline 
WA_APURORDERITEM_STR-PURCHASINGDOCUMENTDELETIONCODE sy-vline 
WA_APURORDERITEM_STR-PURCHASEORDERITEMTEXT sy-vline 
WA_APURORDERITEM_STR-PLANT sy-vline 
WA_APURORDERITEM_STR-STORAGELOCATION sy-vline 
WA_APURORDERITEM_STR-MATERIALGROUP sy-vline 
WA_APURORDERITEM_STR-PURCHASINGINFORECORD sy-vline 
WA_APURORDERITEM_STR-SUPPLIERMATERIALNUMBER sy-vline 
WA_APURORDERITEM_STR-ORDERQUANTITY sy-vline 
WA_APURORDERITEM_STR-PURCHASEORDERQUANTITYUNIT sy-vline 
WA_APURORDERITEM_STR-ORDERPRICEUNIT sy-vline 
WA_APURORDERITEM_STR-ORDERPRICEUNITTOORDERUNITNMRTR sy-vline 
WA_APURORDERITEM_STR-ORDPRICEUNITTOORDERUNITDNMNTR sy-vline 
WA_APURORDERITEM_STR-DOCUMENTCURRENCY sy-vline 
WA_APURORDERITEM_STR-NETPRICEAMOUNT sy-vline 
WA_APURORDERITEM_STR-NETPRICEQUANTITY sy-vline 
WA_APURORDERITEM_STR-TAXCODE sy-vline 
WA_APURORDERITEM_STR-TAXDETERMINATIONDATE sy-vline 
WA_APURORDERITEM_STR-TAXCOUNTRY sy-vline 
WA_APURORDERITEM_STR-PRICEISTOBEPRINTED sy-vline 
WA_APURORDERITEM_STR-OVERDELIVTOLRTDLMTRATIOINPCT sy-vline 
WA_APURORDERITEM_STR-UNLIMITEDOVERDELIVERYISALLOWED sy-vline 
WA_APURORDERITEM_STR-UNDERDELIVTOLRTDLMTRATIOINPCT sy-vline 
WA_APURORDERITEM_STR-VALUATIONTYPE sy-vline 
WA_APURORDERITEM_STR-ISCOMPLETELYDELIVERED sy-vline 
WA_APURORDERITEM_STR-ISFINALLYINVOICED sy-vline 
WA_APURORDERITEM_STR-PURCHASEORDERITEMCATEGORY sy-vline 
WA_APURORDERITEM_STR-ACCOUNTASSIGNMENTCATEGORY sy-vline 
WA_APURORDERITEM_STR-MULTIPLEACCTASSGMTDISTRIBUTION sy-vline 
WA_APURORDERITEM_STR-PARTIALINVOICEDISTRIBUTION sy-vline 
WA_APURORDERITEM_STR-GOODSRECEIPTISEXPECTED sy-vline 
WA_APURORDERITEM_STR-GOODSRECEIPTISNONVALUATED sy-vline 
WA_APURORDERITEM_STR-INVOICEISEXPECTED sy-vline 
WA_APURORDERITEM_STR-INVOICEISGOODSRECEIPTBASED sy-vline 
WA_APURORDERITEM_STR-PURCHASECONTRACT sy-vline 
WA_APURORDERITEM_STR-PURCHASECONTRACTITEM sy-vline 
WA_APURORDERITEM_STR-CUSTOMER sy-vline 
WA_APURORDERITEM_STR-SUBCONTRACTOR sy-vline 
WA_APURORDERITEM_STR-SUPPLIERISSUBCONTRACTOR sy-vline 
WA_APURORDERITEM_STR-ITEMNETWEIGHT sy-vline 
WA_APURORDERITEM_STR-ITEMWEIGHTUNIT sy-vline 
WA_APURORDERITEM_STR-TAXJURISDICTION sy-vline 
WA_APURORDERITEM_STR-PRICINGDATECONTROL sy-vline 
WA_APURORDERITEM_STR-ITEMVOLUME sy-vline 
WA_APURORDERITEM_STR-ITEMVOLUMEUNIT sy-vline 
WA_APURORDERITEM_STR-SUPPLIERCONFIRMATIONCONTROLKEY sy-vline 
WA_APURORDERITEM_STR-INCOTERMSCLASSIFICATION sy-vline 
WA_APURORDERITEM_STR-INCOTERMSTRANSFERLOCATION sy-vline 
WA_APURORDERITEM_STR-EVALDRCPTSETTLMTISALLOWED sy-vline 
WA_APURORDERITEM_STR-PURCHASEREQUISITION sy-vline 
WA_APURORDERITEM_STR-PURCHASEREQUISITIONITEM sy-vline 
WA_APURORDERITEM_STR-ISRETURNSITEM sy-vline 
WA_APURORDERITEM_STR-REQUISITIONERNAME sy-vline 
WA_APURORDERITEM_STR-SERVICEPACKAGE sy-vline 
WA_APURORDERITEM_STR-EARMARKEDFUNDS sy-vline 
WA_APURORDERITEM_STR-EARMARKEDFUNDSDOCUMENT sy-vline 
WA_APURORDERITEM_STR-EARMARKEDFUNDSITEM sy-vline 
WA_APURORDERITEM_STR-EARMARKEDFUNDSDOCUMENTITEM sy-vline 
WA_APURORDERITEM_STR-INCOTERMSLOCATION1 sy-vline 
WA_APURORDERITEM_STR-INCOTERMSLOCATION2 sy-vline 
WA_APURORDERITEM_STR-MATERIAL sy-vline 
WA_APURORDERITEM_STR-INTERNATIONALARTICLENUMBER sy-vline 
WA_APURORDERITEM_STR-MANUFACTURERMATERIAL sy-vline 
WA_APURORDERITEM_STR-SERVICEPERFORMER sy-vline 
WA_APURORDERITEM_STR-PRODUCTTYPE sy-vline 
WA_APURORDERITEM_STR-EXPECTEDOVERALLLIMITAMOUNT sy-vline 
WA_APURORDERITEM_STR-OVERALLLIMITAMOUNT sy-vline 
WA_APURORDERITEM_STR-PURCONTRACTFOROVERALLLIMIT sy-vline 
WA_APURORDERITEM_STR-REFERENCEDELIVERYADDRESSID sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSID sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSNAME sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSNAME2 sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSFULLNAME sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSSTREETNAME sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSHOUSENUMBER sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSCITYNAME sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSPOSTALCODE sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSREGION sy-vline 
WA_APURORDERITEM_STR-DELIVERYADDRESSCOUNTRY sy-vline 
WA_APURORDERITEM_STR-DOWNPAYMENTTYPE sy-vline 
WA_APURORDERITEM_STR-DOWNPAYMENTPERCENTAGEOFTOTAMT sy-vline 
WA_APURORDERITEM_STR-DOWNPAYMENTAMOUNT sy-vline 
WA_APURORDERITEM_STR-DOWNPAYMENTDUEDATE sy-vline 
WA_APURORDERITEM_STR-BR_MATERIALUSAGE sy-vline 
WA_APURORDERITEM_STR-BR_MATERIALORIGIN sy-vline 
WA_APURORDERITEM_STR-BR_CFOPCATEGORY sy-vline 
WA_APURORDERITEM_STR-BR_ISPRODUCEDINHOUSE sy-vline 
WA_APURORDERITEM_STR-CONSUMPTIONTAXCTRLCODE sy-vline 
WA_APURORDERITEM_STR-PURGPRODCMPLNCSUPPLIERSTATUS sy-vline 
WA_APURORDERITEM_STR-PURGPRODUCTMARKETABILITYSTATUS sy-vline 
WA_APURORDERITEM_STR-PURGSAFETYDATASHEETSTATUS sy-vline 
WA_APURORDERITEM_STR-PURGPRODCMPLNCDNGRSGOODSSTATUS sy-vline 
WA_APURORDERITEM_STR-PRODUCTSEASONYEAR sy-vline 
WA_APURORDERITEM_STR-PRODUCTSEASON sy-vline 
WA_APURORDERITEM_STR-PRODUCTCOLLECTION sy-vline 
WA_APURORDERITEM_STR-PRODUCTTHEME sy-vline 
WA_APURORDERITEM_STR-SEASONCOMPLETENESSSTATUS sy-vline 
WA_APURORDERITEM_STR-PRODUCTCHARACTERISTIC1 sy-vline 
WA_APURORDERITEM_STR-PRODUCTCHARACTERISTIC2 sy-vline 
WA_APURORDERITEM_STR-PRODUCTCHARACTERISTIC3 sy-vline 
WA_APURORDERITEM_STR-PURCHASINGPARENTITEM sy-vline 
WA_APURORDERITEM_STR-SUBITEMCATEGORY sy-vline 
WA_APURORDERITEM_STR-CROSSPLANTCONFIGURABLEPRODUCT sy-vline 
WA_APURORDERITEM_STR-DIVERSIONSTATUS sy-vline 
WA_APURORDERITEM_STR-REFERENCEDOCUMENTNUMBER sy-vline 
WA_APURORDERITEM_STR-REFERENCEDOCUMENTITEM sy-vline 
WA_APURORDERITEM_STR-PURCHASEORDERREFERENCETYPE sy-vline 
WA_APURORDERITEM_STR-REFERENCEDOCUMENTSCHEDULELINE sy-vline 
WA_APURORDERITEM_STR-ARTICLECATEGORY sy-vline 
WA_APURORDERITEM_STR-ITEMHASVALUEADDEDSERVICE sy-vline 
WA_APURORDERITEM_STR-VALADDEDSRVCPARENTITMNUMBER sy-vline 
WA_APURORDERITEM_STR-STOCKSEGMENT sy-vline 
WA_APURORDERITEM_STR-REQUIREMENTSEGMENT sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.