ABAP Select data from SAP table PPOITEMPAI4 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 PPOITEMPAI4 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 PPOITEMPAI4. 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 PPOITEMPAI4 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_PPOITEMPAI4 TYPE STANDARD TABLE OF PPOITEMPAI4,
      WA_PPOITEMPAI4 TYPE PPOITEMPAI4,
      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: <PPOITEMPAI4> TYPE PPOITEMPAI4.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PPOITEMPAI4
*  INTO TABLE @DATA(IT_PPOITEMPAI42).
*--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_PPOITEMPAI4 INDEX 1 INTO DATA(WA_PPOITEMPAI42).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PPOITEMPAI4>-MANDT = 1.
<PPOITEMPAI4>-PURCHASEORDER = 1.
<PPOITEMPAI4>-PURCHASEORDERITEM = 1.
<PPOITEMPAI4>-PURCHASECONTRACTITEM = 1.
<PPOITEMPAI4>-PURCHASECONTRACT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PPOITEMPAI4-PURCHASEORDERITEMCONCAT, sy-vline,
  WA_PPOITEMPAI4-CONT_LEN, sy-vline,
  WA_PPOITEMPAI4-CONT_DAYS_LEFT, sy-vline,
  WA_PPOITEMPAI4-RUNNING_TOTAL, sy-vline,
  WA_PPOITEMPAI4-RUNNING_PERCENTAGE, sy-vline,
  WA_PPOITEMPAI4-PODATE_MONTH, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PPOITEMPAI4 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_PPOITEMPAI4 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_PPOITEMPAI4 INTO WA_PPOITEMPAI4.


*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_PPOITEMPAI4-PURCHASEORDER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PPOITEMPAI4-PURCHASEORDER.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit EXCRT, internal->external for field EXCHANGERATE
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_PPOITEMPAI4-EXCHANGERATE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PPOITEMPAI4-EXCHANGERATE.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ISOLA, internal->external for field LANGUAGE
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_PPOITEMPAI4-LANGUAGE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PPOITEMPAI4-LANGUAGE.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field VOLUMEUNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_PPOITEMPAI4-VOLUMEUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PPOITEMPAI4-VOLUMEUNIT.
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_PPOITEMPAI4_STR, 
MANDT TYPE STRING,
PURCHASEORDER TYPE STRING,
PURCHASEORDERITEM TYPE STRING,
PURCHASECONTRACTITEM TYPE STRING,
PURCHASECONTRACT TYPE STRING,
PURCHASEORDERITEMCONCAT TYPE STRING,
CONT_LEN TYPE STRING,
CONT_DAYS_LEFT TYPE STRING,
RUNNING_TOTAL TYPE STRING,
RUNNING_PERCENTAGE TYPE STRING,
PODATE_MONTH TYPE STRING,
PODATE_WEEKDAY TYPE STRING,
PODATE_WEEK TYPE STRING,
CONSUMEDQTY TYPE STRING,
PO_ITEMS_NUM TYPE STRING,
DAYS_INTERVAL TYPE STRING,
AVG_PO_AMT TYPE STRING,
AVG_PO_DAYS TYPE STRING,
ACCOUNTASSIGNMENTCATEGORY TYPE STRING,
BASEUNIT TYPE STRING,
COMMODITYCODE TYPE STRING,
COMPANYCODE TYPE STRING,
CUSTOMER TYPE STRING,
DOCUMENTCURRENCY TYPE STRING,
EARMARKEDFUNDS TYPE STRING,
EARMARKEDFUNDSITEM TYPE STRING,
EFFECTIVEAMOUNT TYPE STRING,
EVALDRCPTSETTLMTISALLOWED TYPE STRING,
EXPECTEDOVERALLLIMITAMOUNT TYPE STRING,
GOODSRECEIPTISEXPECTED TYPE STRING,
GOODSRECEIPTISNONVALUATED TYPE STRING,
INCOTERMSCLASSIFICATION TYPE STRING,
INCOTERMSLOCATION1 TYPE STRING,
INCOTERMSLOCATION2 TYPE STRING,
INCOTERMSTRANSFERLOCATION TYPE STRING,
INTERNATIONALARTICLENUMBER TYPE STRING,
INTRASTATSERVICECODE TYPE STRING,
INVOICEISEXPECTED TYPE STRING,
INVOICEISGOODSRECEIPTBASED TYPE STRING,
ISCOMPLETELYDELIVERED TYPE STRING,
ISFINALLYINVOICED TYPE STRING,
ISRETURNSITEM TYPE STRING,
ISSTATISTICALITEM TYPE STRING,
ITEMNETWEIGHT TYPE STRING,
ITEMVOLUME TYPE STRING,
ITEMVOLUMEUNIT TYPE STRING,
ITEMWEIGHTUNIT TYPE STRING,
MANUALDELIVERYADDRESSID TYPE STRING,
MANUFACTURER TYPE STRING,
MANUFACTURERMATERIAL TYPE STRING,
MANUFACTURERPARTNMBR TYPE STRING,
MATERIAL TYPE STRING,
MATERIALGROUP TYPE STRING,
MATERIALTYPE TYPE STRING,
MULTIPLEACCTASSGMTDISTRIBUTION TYPE STRING,
NETAMOUNT TYPE STRING,
NETPRICEAMOUNT TYPE STRING,
NETPRICEQUANTITY TYPE STRING,
ORDPRICEUNITTOORDERUNITDNMNTR TYPE STRING,
ORDERITEMQTYTOBASEQTYDNMNTR TYPE STRING,
ORDERITEMQTYTOBASEQTYNMRTR TYPE STRING,
ORDERPRICEUNIT TYPE STRING,
ORDERPRICEUNITTOORDERUNITNMRTR TYPE STRING,
ORDERQUANTITY TYPE STRING,
OVERALLLIMITAMOUNT TYPE STRING,
OVERDELIVTOLRTDLMTRATIOINPCT TYPE STRING,
PARTIALINVOICEDISTRIBUTION TYPE STRING,
PLANT TYPE STRING,
PRICEISTOBEPRINTED TYPE STRING,
PRICINGDATECONTROL TYPE STRING,
PRODUCTTYPE TYPE STRING,
PROFITCENTER TYPE STRING,
PURCHASEORDERCATEGORY TYPE STRING,
PURCHASEORDERITEMCATEGORY TYPE STRING,
PURCHASEORDERITEMTEXT TYPE STRING,
PURCHASEORDERQUANTITYUNIT TYPE STRING,
PURCHASEREQUISITION TYPE STRING,
PURCHASEREQUISITIONITEM TYPE STRING,
PURCHASINGDOCUMENTDELETIONCODE TYPE STRING,
PURCHASINGINFORECORD TYPE STRING,
REFERENCEDELIVERYADDRESSID TYPE STRING,
REQUISITIONERNAME TYPE STRING,
SERVICEPACKAGE TYPE STRING,
SERVICEPERFORMER TYPE STRING,
STORAGELOCATION TYPE STRING,
SUPPLIERCONFIRMATIONCONTROLKEY TYPE STRING,
SUPPLIERMATERIALNUMBER TYPE STRING,
SUPPLIERSUBRANGE TYPE STRING,
TAXCODE TYPE STRING,
TAXJURISDICTION TYPE STRING,
UNDERDELIVTOLRTDLMTRATIOINPCT TYPE STRING,
UNLIMITEDOVERDELIVERYISALLOWED TYPE STRING,
VALUATIONTYPE TYPE STRING,
CASHDISCOUNT1DAYS TYPE STRING,
CASHDISCOUNT1PERCENT TYPE STRING,
CASHDISCOUNT2DAYS TYPE STRING,
CASHDISCOUNT2PERCENT TYPE STRING,
CREATEDBYUSER TYPE STRING,
CREATIONDATE TYPE STRING,
EXCHANGERATE TYPE STRING,
INCOTERMSVERSION TYPE STRING,
INVOICINGPARTY TYPE STRING,
ISINTRASTATREPORTINGEXCLUDED TYPE STRING,
ISINTRASTATREPORTINGRELEVANT TYPE STRING,
LANGUAGE TYPE STRING,
LASTCHANGEDATETIME TYPE STRING,
MANUALSUPPLIERADDRESSID TYPE STRING,
NETPAYMENTDAYS TYPE STRING,
PAYMENTTERMS TYPE STRING,
PRICINGPROCEDURE TYPE STRING,
PURCHASEORDERDATE TYPE STRING,
PURCHASEORDERSUBTYPE TYPE STRING,
PURCHASEORDERTYPE TYPE STRING,
PURCHASINGCOMPLETENESSSTATUS TYPE STRING,
PURCHASINGDOCUMENTCONDITION TYPE STRING,
PURCHASINGDOCUMENTISAGED TYPE STRING,
PURCHASINGDOCUMENTORIGIN TYPE STRING,
PURCHASINGGROUP TYPE STRING,
PURCHASINGORGANIZATION TYPE STRING,
PURCHASINGPROCESSINGSTATUS TYPE STRING,
RELEASEISNOTCOMPLETED TYPE STRING,
SUPPLIER TYPE STRING,
SUPPLIERADDRESSID TYPE STRING,
SUPPLIERPHONENUMBER TYPE STRING,
SUPPLIERQUOTATIONEXTERNALID TYPE STRING,
SUPPLIERRESPSALESPERSONNAME TYPE STRING,
SUPPLYINGPLANT TYPE STRING,
SUPPLYINGSUPPLIER TYPE STRING,
PURCHASEORDERVALIDITYENDDATE TYPE STRING,
PURCHASEORDERVALIDITYSTARTDATE TYPE STRING,
CORRESPNCEXTERNALREFERENCE TYPE STRING,
CORRESPNCINTERNALREFERENCE TYPE STRING,
CONTRACTCREATEBYUSER TYPE STRING,
CONTRACTCREATIONDATE TYPE STRING,
CONTRACTLASTCHANGEDATETIME TYPE STRING,
CONTRACTNETPAYMENTDAYS TYPE STRING,
CONTRACTPAYMENTTERMS TYPE STRING,
PURCHASECONTRACTTARGETAMOUNT TYPE STRING,
PURCHASECONTRACTTYPE TYPE STRING,
PURCHASINGDOCUMENTCATEGORY TYPE STRING,
PURCHASINGDOCUMENTNAME TYPE STRING,
QUOTATIONSUBMISSIONDATE TYPE STRING,
RELEASECODE TYPE STRING,
SUPPLIERQUOTATION TYPE STRING,
VALIDITYENDDATE TYPE STRING,
VALIDITYSTARTDATE TYPE STRING,
CONFIRMATIONCONTROL TYPE STRING,
CONTRACTNETPRICEAMOUNT TYPE STRING,
DELIVERYADDRESSID TYPE STRING,
ISINFOATREGISTRATION TYPE STRING,
ISINFORECORDUPDATED TYPE STRING,
ISORDERACKNRQD TYPE STRING,
NODAYSREMINDER1 TYPE STRING,
NODAYSREMINDER2 TYPE STRING,
NODAYSREMINDER3 TYPE STRING,
ORDERQUANTITYUNIT TYPE STRING,
PURCHASECONTRACTITEMTEXT TYPE STRING,
PURCHASINGCATEGORY TYPE STRING,
PURCHASINGCONTRACTDELETIONCODE TYPE STRING,
PURCHASINGDOCUMENTITEMCATEGORY TYPE STRING,
PURGCATNAME TYPE STRING,
PURGDOCESTIMATEDPRICE TYPE STRING,
PURGDOCORDERACKNNUMBER TYPE STRING,
PURGDOCPRICEDATE TYPE STRING,
PURGDOCRELEASEORDERQUANTITY TYPE STRING,
REQUIREMENTTRACKING TYPE STRING,
SHIPPINGINSTRUCTION TYPE STRING,
STOCKTYPE TYPE STRING,
SUBCONTRACTOR TYPE STRING,
TARGETAMOUNT TYPE STRING,
TARGETQUANTITY TYPE STRING,
VOLUMEUNIT TYPE STRING,
DAYS2GO_QUANT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PPOITEMPAI4_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_PPOITEMPAI4_STR-MANDT sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDER sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERITEM sy-vline 
WA_PPOITEMPAI4_STR-PURCHASECONTRACTITEM sy-vline 
WA_PPOITEMPAI4_STR-PURCHASECONTRACT sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERITEMCONCAT sy-vline 
WA_PPOITEMPAI4_STR-CONT_LEN sy-vline 
WA_PPOITEMPAI4_STR-CONT_DAYS_LEFT sy-vline 
WA_PPOITEMPAI4_STR-RUNNING_TOTAL sy-vline 
WA_PPOITEMPAI4_STR-RUNNING_PERCENTAGE sy-vline 
WA_PPOITEMPAI4_STR-PODATE_MONTH sy-vline 
WA_PPOITEMPAI4_STR-PODATE_WEEKDAY sy-vline 
WA_PPOITEMPAI4_STR-PODATE_WEEK sy-vline 
WA_PPOITEMPAI4_STR-CONSUMEDQTY sy-vline 
WA_PPOITEMPAI4_STR-PO_ITEMS_NUM sy-vline 
WA_PPOITEMPAI4_STR-DAYS_INTERVAL sy-vline 
WA_PPOITEMPAI4_STR-AVG_PO_AMT sy-vline 
WA_PPOITEMPAI4_STR-AVG_PO_DAYS sy-vline 
WA_PPOITEMPAI4_STR-ACCOUNTASSIGNMENTCATEGORY sy-vline 
WA_PPOITEMPAI4_STR-BASEUNIT sy-vline 
WA_PPOITEMPAI4_STR-COMMODITYCODE sy-vline 
WA_PPOITEMPAI4_STR-COMPANYCODE sy-vline 
WA_PPOITEMPAI4_STR-CUSTOMER sy-vline 
WA_PPOITEMPAI4_STR-DOCUMENTCURRENCY sy-vline 
WA_PPOITEMPAI4_STR-EARMARKEDFUNDS sy-vline 
WA_PPOITEMPAI4_STR-EARMARKEDFUNDSITEM sy-vline 
WA_PPOITEMPAI4_STR-EFFECTIVEAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-EVALDRCPTSETTLMTISALLOWED sy-vline 
WA_PPOITEMPAI4_STR-EXPECTEDOVERALLLIMITAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-GOODSRECEIPTISEXPECTED sy-vline 
WA_PPOITEMPAI4_STR-GOODSRECEIPTISNONVALUATED sy-vline 
WA_PPOITEMPAI4_STR-INCOTERMSCLASSIFICATION sy-vline 
WA_PPOITEMPAI4_STR-INCOTERMSLOCATION1 sy-vline 
WA_PPOITEMPAI4_STR-INCOTERMSLOCATION2 sy-vline 
WA_PPOITEMPAI4_STR-INCOTERMSTRANSFERLOCATION sy-vline 
WA_PPOITEMPAI4_STR-INTERNATIONALARTICLENUMBER sy-vline 
WA_PPOITEMPAI4_STR-INTRASTATSERVICECODE sy-vline 
WA_PPOITEMPAI4_STR-INVOICEISEXPECTED sy-vline 
WA_PPOITEMPAI4_STR-INVOICEISGOODSRECEIPTBASED sy-vline 
WA_PPOITEMPAI4_STR-ISCOMPLETELYDELIVERED sy-vline 
WA_PPOITEMPAI4_STR-ISFINALLYINVOICED sy-vline 
WA_PPOITEMPAI4_STR-ISRETURNSITEM sy-vline 
WA_PPOITEMPAI4_STR-ISSTATISTICALITEM sy-vline 
WA_PPOITEMPAI4_STR-ITEMNETWEIGHT sy-vline 
WA_PPOITEMPAI4_STR-ITEMVOLUME sy-vline 
WA_PPOITEMPAI4_STR-ITEMVOLUMEUNIT sy-vline 
WA_PPOITEMPAI4_STR-ITEMWEIGHTUNIT sy-vline 
WA_PPOITEMPAI4_STR-MANUALDELIVERYADDRESSID sy-vline 
WA_PPOITEMPAI4_STR-MANUFACTURER sy-vline 
WA_PPOITEMPAI4_STR-MANUFACTURERMATERIAL sy-vline 
WA_PPOITEMPAI4_STR-MANUFACTURERPARTNMBR sy-vline 
WA_PPOITEMPAI4_STR-MATERIAL sy-vline 
WA_PPOITEMPAI4_STR-MATERIALGROUP sy-vline 
WA_PPOITEMPAI4_STR-MATERIALTYPE sy-vline 
WA_PPOITEMPAI4_STR-MULTIPLEACCTASSGMTDISTRIBUTION sy-vline 
WA_PPOITEMPAI4_STR-NETAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-NETPRICEAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-NETPRICEQUANTITY sy-vline 
WA_PPOITEMPAI4_STR-ORDPRICEUNITTOORDERUNITDNMNTR sy-vline 
WA_PPOITEMPAI4_STR-ORDERITEMQTYTOBASEQTYDNMNTR sy-vline 
WA_PPOITEMPAI4_STR-ORDERITEMQTYTOBASEQTYNMRTR sy-vline 
WA_PPOITEMPAI4_STR-ORDERPRICEUNIT sy-vline 
WA_PPOITEMPAI4_STR-ORDERPRICEUNITTOORDERUNITNMRTR sy-vline 
WA_PPOITEMPAI4_STR-ORDERQUANTITY sy-vline 
WA_PPOITEMPAI4_STR-OVERALLLIMITAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-OVERDELIVTOLRTDLMTRATIOINPCT sy-vline 
WA_PPOITEMPAI4_STR-PARTIALINVOICEDISTRIBUTION sy-vline 
WA_PPOITEMPAI4_STR-PLANT sy-vline 
WA_PPOITEMPAI4_STR-PRICEISTOBEPRINTED sy-vline 
WA_PPOITEMPAI4_STR-PRICINGDATECONTROL sy-vline 
WA_PPOITEMPAI4_STR-PRODUCTTYPE sy-vline 
WA_PPOITEMPAI4_STR-PROFITCENTER sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERCATEGORY sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERITEMCATEGORY sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERITEMTEXT sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERQUANTITYUNIT sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEREQUISITION sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEREQUISITIONITEM sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGDOCUMENTDELETIONCODE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGINFORECORD sy-vline 
WA_PPOITEMPAI4_STR-REFERENCEDELIVERYADDRESSID sy-vline 
WA_PPOITEMPAI4_STR-REQUISITIONERNAME sy-vline 
WA_PPOITEMPAI4_STR-SERVICEPACKAGE sy-vline 
WA_PPOITEMPAI4_STR-SERVICEPERFORMER sy-vline 
WA_PPOITEMPAI4_STR-STORAGELOCATION sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERCONFIRMATIONCONTROLKEY sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERMATERIALNUMBER sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERSUBRANGE sy-vline 
WA_PPOITEMPAI4_STR-TAXCODE sy-vline 
WA_PPOITEMPAI4_STR-TAXJURISDICTION sy-vline 
WA_PPOITEMPAI4_STR-UNDERDELIVTOLRTDLMTRATIOINPCT sy-vline 
WA_PPOITEMPAI4_STR-UNLIMITEDOVERDELIVERYISALLOWED sy-vline 
WA_PPOITEMPAI4_STR-VALUATIONTYPE sy-vline 
WA_PPOITEMPAI4_STR-CASHDISCOUNT1DAYS sy-vline 
WA_PPOITEMPAI4_STR-CASHDISCOUNT1PERCENT sy-vline 
WA_PPOITEMPAI4_STR-CASHDISCOUNT2DAYS sy-vline 
WA_PPOITEMPAI4_STR-CASHDISCOUNT2PERCENT sy-vline 
WA_PPOITEMPAI4_STR-CREATEDBYUSER sy-vline 
WA_PPOITEMPAI4_STR-CREATIONDATE sy-vline 
WA_PPOITEMPAI4_STR-EXCHANGERATE sy-vline 
WA_PPOITEMPAI4_STR-INCOTERMSVERSION sy-vline 
WA_PPOITEMPAI4_STR-INVOICINGPARTY sy-vline 
WA_PPOITEMPAI4_STR-ISINTRASTATREPORTINGEXCLUDED sy-vline 
WA_PPOITEMPAI4_STR-ISINTRASTATREPORTINGRELEVANT sy-vline 
WA_PPOITEMPAI4_STR-LANGUAGE sy-vline 
WA_PPOITEMPAI4_STR-LASTCHANGEDATETIME sy-vline 
WA_PPOITEMPAI4_STR-MANUALSUPPLIERADDRESSID sy-vline 
WA_PPOITEMPAI4_STR-NETPAYMENTDAYS sy-vline 
WA_PPOITEMPAI4_STR-PAYMENTTERMS sy-vline 
WA_PPOITEMPAI4_STR-PRICINGPROCEDURE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERDATE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERSUBTYPE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERTYPE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGCOMPLETENESSSTATUS sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGDOCUMENTCONDITION sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGDOCUMENTISAGED sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGDOCUMENTORIGIN sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGGROUP sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGORGANIZATION sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGPROCESSINGSTATUS sy-vline 
WA_PPOITEMPAI4_STR-RELEASEISNOTCOMPLETED sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIER sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERADDRESSID sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERPHONENUMBER sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERQUOTATIONEXTERNALID sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERRESPSALESPERSONNAME sy-vline 
WA_PPOITEMPAI4_STR-SUPPLYINGPLANT sy-vline 
WA_PPOITEMPAI4_STR-SUPPLYINGSUPPLIER sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERVALIDITYENDDATE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASEORDERVALIDITYSTARTDATE sy-vline 
WA_PPOITEMPAI4_STR-CORRESPNCEXTERNALREFERENCE sy-vline 
WA_PPOITEMPAI4_STR-CORRESPNCINTERNALREFERENCE sy-vline 
WA_PPOITEMPAI4_STR-CONTRACTCREATEBYUSER sy-vline 
WA_PPOITEMPAI4_STR-CONTRACTCREATIONDATE sy-vline 
WA_PPOITEMPAI4_STR-CONTRACTLASTCHANGEDATETIME sy-vline 
WA_PPOITEMPAI4_STR-CONTRACTNETPAYMENTDAYS sy-vline 
WA_PPOITEMPAI4_STR-CONTRACTPAYMENTTERMS sy-vline 
WA_PPOITEMPAI4_STR-PURCHASECONTRACTTARGETAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-PURCHASECONTRACTTYPE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGDOCUMENTCATEGORY sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGDOCUMENTNAME sy-vline 
WA_PPOITEMPAI4_STR-QUOTATIONSUBMISSIONDATE sy-vline 
WA_PPOITEMPAI4_STR-RELEASECODE sy-vline 
WA_PPOITEMPAI4_STR-SUPPLIERQUOTATION sy-vline 
WA_PPOITEMPAI4_STR-VALIDITYENDDATE sy-vline 
WA_PPOITEMPAI4_STR-VALIDITYSTARTDATE sy-vline 
WA_PPOITEMPAI4_STR-CONFIRMATIONCONTROL sy-vline 
WA_PPOITEMPAI4_STR-CONTRACTNETPRICEAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-DELIVERYADDRESSID sy-vline 
WA_PPOITEMPAI4_STR-ISINFOATREGISTRATION sy-vline 
WA_PPOITEMPAI4_STR-ISINFORECORDUPDATED sy-vline 
WA_PPOITEMPAI4_STR-ISORDERACKNRQD sy-vline 
WA_PPOITEMPAI4_STR-NODAYSREMINDER1 sy-vline 
WA_PPOITEMPAI4_STR-NODAYSREMINDER2 sy-vline 
WA_PPOITEMPAI4_STR-NODAYSREMINDER3 sy-vline 
WA_PPOITEMPAI4_STR-ORDERQUANTITYUNIT sy-vline 
WA_PPOITEMPAI4_STR-PURCHASECONTRACTITEMTEXT sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGCATEGORY sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGCONTRACTDELETIONCODE sy-vline 
WA_PPOITEMPAI4_STR-PURCHASINGDOCUMENTITEMCATEGORY sy-vline 
WA_PPOITEMPAI4_STR-PURGCATNAME sy-vline 
WA_PPOITEMPAI4_STR-PURGDOCESTIMATEDPRICE sy-vline 
WA_PPOITEMPAI4_STR-PURGDOCORDERACKNNUMBER sy-vline 
WA_PPOITEMPAI4_STR-PURGDOCPRICEDATE sy-vline 
WA_PPOITEMPAI4_STR-PURGDOCRELEASEORDERQUANTITY sy-vline 
WA_PPOITEMPAI4_STR-REQUIREMENTTRACKING sy-vline 
WA_PPOITEMPAI4_STR-SHIPPINGINSTRUCTION sy-vline 
WA_PPOITEMPAI4_STR-STOCKTYPE sy-vline 
WA_PPOITEMPAI4_STR-SUBCONTRACTOR sy-vline 
WA_PPOITEMPAI4_STR-TARGETAMOUNT sy-vline 
WA_PPOITEMPAI4_STR-TARGETQUANTITY sy-vline 
WA_PPOITEMPAI4_STR-VOLUMEUNIT sy-vline 
WA_PPOITEMPAI4_STR-DAYS2GO_QUANT sy-vline      INTO ld_text SEPARATED BY SPACE.

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