ABAP Select data from SAP table PTDART_ITEMS 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 PTDART_ITEMS 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 PTDART_ITEMS. 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 PTDART_ITEMS 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_PTDART_ITEMS TYPE STANDARD TABLE OF PTDART_ITEMS,
      WA_PTDART_ITEMS TYPE PTDART_ITEMS,
      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: <PTDART_ITEMS> TYPE PTDART_ITEMS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PTDART_ITEMS
*  INTO TABLE @DATA(IT_PTDART_ITEMS2).
*--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_PTDART_ITEMS INDEX 1 INTO DATA(WA_PTDART_ITEMS2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PTDART_ITEMS>-FILE_VERSION = 1.
<PTDART_ITEMS>-COMPANY_ID = 1.
<PTDART_ITEMS>-BUKRS = 1.
<PTDART_ITEMS>-STCEG = 1.
<PTDART_ITEMS>-TAX_ACC_BASIS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PTDART_ITEMS-BUTXT, sy-vline,
  WA_PTDART_ITEMS-STRAS_GP, sy-vline,
  WA_PTDART_ITEMS-ORT01_GP, sy-vline,
  WA_PTDART_ITEMS-PSTLZ_BAS, sy-vline,
  WA_PTDART_ITEMS-LAND1, sy-vline,
  WA_PTDART_ITEMS-GJAHR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PTDART_ITEMS 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_PTDART_ITEMS 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_PTDART_ITEMS INTO WA_PTDART_ITEMS.


*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 GJAHR, internal->external for field GJAHR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-GJAHR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-GJAHR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AC152, internal->external for field OPEN_DEBIT_BAL
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-OPEN_DEBIT_BAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-OPEN_DEBIT_BAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field OPEN_CREDIT_BAL
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-OPEN_CREDIT_BAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-OPEN_CREDIT_BAL.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit SXIDN, internal->external for field CAD_SMTPADR
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-CAD_SMTPADR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-CAD_SMTPADR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit SXIDN, internal->external for field SAD_SMTPADR
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-SAD_SMTPADR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-SAD_SMTPADR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AU132, internal->external for field MD_TAX_AMOUNT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-MD_TAX_AMOUNT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-MD_TAX_AMOUNT.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AU132, internal->external for field GLDEBIT_AMT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-GLDEBIT_AMT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-GLDEBIT_AMT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field GLCREDIT_AMT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-GLCREDIT_AMT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-GLCREDIT_AMT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field SD_TOTAL_DEBIT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-SD_TOTAL_DEBIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-SD_TOTAL_DEBIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field SD_TOTAL_CREDIT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-SD_TOTAL_CREDIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-SD_TOTAL_CREDIT.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AC152, internal->external for field SD_DR_AMOUNT
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-SD_DR_AMOUNT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-SD_DR_AMOUNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field SD_CR_AMOUNT
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-SD_CR_AMOUNT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-SD_CR_AMOUNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field TXW_MWSBP
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-TXW_MWSBP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-TXW_MWSBP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DOC_TOTAL
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-DOC_TOTAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-DOC_TOTAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field NET_TOTAL
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-NET_TOTAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-NET_TOTAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field GROSS_TOTAL
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-GROSS_TOTAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-GROSS_TOTAL.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AC152, internal->external for field WTH_AMOUNT
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-WTH_AMOUNT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-WTH_AMOUNT.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AC152, internal->external for field CLOSE_DEBIT_BAL
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-CLOSE_DEBIT_BAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-CLOSE_DEBIT_BAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field CLOSE_CREDIT_BAL
CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-CLOSE_CREDIT_BAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-CLOSE_CREDIT_BAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field CVP_KUNNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PTDART_ITEMS-CVP_KUNNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PTDART_ITEMS-CVP_KUNNR.
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_PTDART_ITEMS_STR, 
FILE_VERSION TYPE STRING,
COMPANY_ID TYPE STRING,
BUKRS TYPE STRING,
STCEG TYPE STRING,
TAX_ACC_BASIS TYPE STRING,
BUTXT TYPE STRING,
STRAS_GP TYPE STRING,
ORT01_GP TYPE STRING,
PSTLZ_BAS TYPE STRING,
LAND1 TYPE STRING,
GJAHR TYPE STRING,
START_DATE TYPE STRING,
END_DATE TYPE STRING,
CURR_CODE TYPE STRING,
DATE_CREATED TYPE STRING,
PRODUCTCOMPANYTAXID TYPE STRING,
SOFTWARECERTIFICATENUMBER TYPE STRING,
COMPONENT TYPE STRING,
R3RELEASE TYPE STRING,
RACCT TYPE STRING,
WAERS TYPE STRING,
ACC_DESC TYPE STRING,
OPEN_DEBIT_BAL TYPE STRING,
OPEN_CREDIT_BAL TYPE STRING,
KUNNR TYPE STRING,
RECON_ACCT TYPE STRING,
CSTCEG TYPE STRING,
CNAME1_GP TYPE STRING,
CCONTACT TYPE STRING,
CNAME1 TYPE STRING,
CSTRAS TYPE STRING,
CORT01 TYPE STRING,
CPSTLZ TYPE STRING,
CLAND1 TYPE STRING,
CSHP_STRAS TYPE STRING,
CSHP_ORT01 TYPE STRING,
CSHP_PSTLZ TYPE STRING,
CSHP_LAND1 TYPE STRING,
CTELF1 TYPE STRING,
CTELFX TYPE STRING,
CAD_SMTPADR TYPE STRING,
CAD_URI TYPE STRING,
SELFBILLINGIND TYPE STRING,
LIFNR TYPE STRING,
SSTCEG TYPE STRING,
NAME1_GP TYPE STRING,
SKNVK TYPE STRING,
SSTRAS TYPE STRING,
SORT01 TYPE STRING,
SPSTLZ TYPE STRING,
SLAND1 TYPE STRING,
SSHP_STRAS TYPE STRING,
SSHP_ORT01 TYPE STRING,
SSHP_PSTLZ TYPE STRING,
SSHP_LAND1 TYPE STRING,
STELF1 TYPE STRING,
STELFX TYPE STRING,
SAD_SMTPADR TYPE STRING,
SAD_URI TYPE STRING,
MTREF TYPE STRING,
MATNR TYPE STRING,
MATKL TYPE STRING,
MAKTX TYPE STRING,
EAN11 TYPE STRING,
MD_TAX_TYPE TYPE STRING,
MD_TAX_DESC1 TYPE STRING,
TAX_CODE_DETAILS TYPE STRING,
MD_TAXCOUNTRYREGION TYPE STRING,
MD_TAX_CODE TYPE STRING,
MD_TAX_DESC2 TYPE STRING,
MD_TAX_PERCNTG TYPE STRING,
MD_TAX_AMOUNT TYPE STRING,
MD_TAX_EXEMPT_REASON TYPE STRING,
MD_TAX_EXP_DATE TYPE STRING,
NO_OF_ENTRIES TYPE STRING,
TOTAL_DEBIT TYPE STRING,
TOTAL_CREDIT TYPE STRING,
JOURNAL_ID TYPE STRING,
JR_DESC TYPE STRING,
GL_DESC TYPE STRING,
BELNR TYPE STRING,
MONAT TYPE STRING,
BLDAT TYPE STRING,
USNAM TYPE STRING,
SR_DESC TYPE STRING,
CPUDT TYPE STRING,
TRANS_TYPE TYPE STRING,
DOCARCHIVALNUMBER TYPE STRING,
GLLIFNR TYPE STRING,
GLSGTXT TYPE STRING,
GLVBELN TYPE STRING,
GLHKONT TYPE STRING,
GLBUZEI TYPE STRING,
GLSHKZG TYPE STRING,
GLKUNNR TYPE STRING,
GLTOTAL_LINES TYPE STRING,
GLDEBIT_AMT TYPE STRING,
GLCREDIT_AMT TYPE STRING,
GL_SYS_ENDAT TYPE STRING,
POST_DT TYPE STRING,
SD_NO_OF_ENTRIES TYPE STRING,
SD_TOTAL_DEBIT TYPE STRING,
SD_TOTAL_CREDIT TYPE STRING,
FKART TYPE STRING,
INV_NO TYPE STRING,
INV_STAT TYPE STRING,
INV_PERIOD TYPE STRING,
HASH TYPE STRING,
HASHCONTROL TYPE STRING,
FKDAT TYPE STRING,
INV_TYPE TYPE STRING,
ERDAT TYPE STRING,
FKSTO TYPE STRING,
PTTRANSID TYPE STRING,
KUNAG TYPE STRING,
ST_VBELN TYPE STRING,
ST_LFDAT TYPE STRING,
ST_STRAS TYPE STRING,
ST_ORT01 TYPE STRING,
ST_PSTLZ TYPE STRING,
ST_LAND1 TYPE STRING,
SF_VBELN TYPE STRING,
SF_LFDAT TYPE STRING,
SF_STRAS TYPE STRING,
SF_ORT01 TYPE STRING,
SF_PSTLZ TYPE STRING,
SF_LAND1 TYPE STRING,
LINE TYPE STRING,
POSNR TYPE STRING,
ORG_ON TYPE STRING,
AUDAT TYPE STRING,
SD_MATNR TYPE STRING,
SD_ARKTX TYPE STRING,
MEINS TYPE STRING,
FKIMG TYPE STRING,
VRKME TYPE STRING,
TXW_NETBTR TYPE STRING,
TAX_POINT_DATE TYPE STRING,
SD_DESC TYPE STRING,
SD_DR_AMOUNT TYPE STRING,
SD_CR_AMOUNT TYPE STRING,
TXW_MWSBP TYPE STRING,
EXTGRUNO TYPE STRING,
TAX_CODE TYPE STRING,
SDTAX_PERCENT TYPE STRING,
LIN_SET_AMOUNT TYPE STRING,
DOC_TOTAL TYPE STRING,
TAX_PAYABLE TYPE STRING,
NET_TOTAL TYPE STRING,
GROSS_TOTAL TYPE STRING,
CURRENCY TYPE STRING,
CURRENCY_CODE TYPE STRING,
CURR_CR_AMOUNT TYPE STRING,
CURR_DR_AMOUNT TYPE STRING,
TERM TYPE STRING,
SETTLE_DISCOUNT TYPE STRING,
SETTLE_AMOUNT TYPE STRING,
LSCH TYPE STRING,
SD_SETL_DATE TYPE STRING,
SD_PAY_MECH TYPE STRING,
SDRFE_CREDNOTE TYPE STRING,
SD_CREDREF TYPE STRING,
SDREF_REASON TYPE STRING,
KLAND_NAME TYPE STRING,
VLAND_NAME TYPE STRING,
POSTL_CODE TYPE STRING,
COUNTRY TYPE STRING,
SLAND_NAME TYPE STRING,
MOV_START_TIME TYPE STRING,
MOV_END_TIME TYPE STRING,
ATDOCCODEID TYPE STRING,
STATE_CHANGE_RSN TYPE STRING,
WTH_TAXTYPE TYPE STRING,
WTH_AMOUNT TYPE STRING,
WTH_DESC TYPE STRING,
EXCH_RATE TYPE STRING,
CLOSE_DEBIT_BAL TYPE STRING,
CLOSE_CREDIT_BAL TYPE STRING,
GRP_CODE TYPE STRING,
GRP_CATG TYPE STRING,
CVP_KUNNR TYPE STRING,
XEGCOS TYPE STRING,
STCEG_ORIG TYPE STRING,
XEGCOS_TEXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PTDART_ITEMS_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_PTDART_ITEMS_STR-FILE_VERSION sy-vline 
WA_PTDART_ITEMS_STR-COMPANY_ID sy-vline 
WA_PTDART_ITEMS_STR-BUKRS sy-vline 
WA_PTDART_ITEMS_STR-STCEG sy-vline 
WA_PTDART_ITEMS_STR-TAX_ACC_BASIS sy-vline 
WA_PTDART_ITEMS_STR-BUTXT sy-vline 
WA_PTDART_ITEMS_STR-STRAS_GP sy-vline 
WA_PTDART_ITEMS_STR-ORT01_GP sy-vline 
WA_PTDART_ITEMS_STR-PSTLZ_BAS sy-vline 
WA_PTDART_ITEMS_STR-LAND1 sy-vline 
WA_PTDART_ITEMS_STR-GJAHR sy-vline 
WA_PTDART_ITEMS_STR-START_DATE sy-vline 
WA_PTDART_ITEMS_STR-END_DATE sy-vline 
WA_PTDART_ITEMS_STR-CURR_CODE sy-vline 
WA_PTDART_ITEMS_STR-DATE_CREATED sy-vline 
WA_PTDART_ITEMS_STR-PRODUCTCOMPANYTAXID sy-vline 
WA_PTDART_ITEMS_STR-SOFTWARECERTIFICATENUMBER sy-vline 
WA_PTDART_ITEMS_STR-COMPONENT sy-vline 
WA_PTDART_ITEMS_STR-R3RELEASE sy-vline 
WA_PTDART_ITEMS_STR-RACCT sy-vline 
WA_PTDART_ITEMS_STR-WAERS sy-vline 
WA_PTDART_ITEMS_STR-ACC_DESC sy-vline 
WA_PTDART_ITEMS_STR-OPEN_DEBIT_BAL sy-vline 
WA_PTDART_ITEMS_STR-OPEN_CREDIT_BAL sy-vline 
WA_PTDART_ITEMS_STR-KUNNR sy-vline 
WA_PTDART_ITEMS_STR-RECON_ACCT sy-vline 
WA_PTDART_ITEMS_STR-CSTCEG sy-vline 
WA_PTDART_ITEMS_STR-CNAME1_GP sy-vline 
WA_PTDART_ITEMS_STR-CCONTACT sy-vline 
WA_PTDART_ITEMS_STR-CNAME1 sy-vline 
WA_PTDART_ITEMS_STR-CSTRAS sy-vline 
WA_PTDART_ITEMS_STR-CORT01 sy-vline 
WA_PTDART_ITEMS_STR-CPSTLZ sy-vline 
WA_PTDART_ITEMS_STR-CLAND1 sy-vline 
WA_PTDART_ITEMS_STR-CSHP_STRAS sy-vline 
WA_PTDART_ITEMS_STR-CSHP_ORT01 sy-vline 
WA_PTDART_ITEMS_STR-CSHP_PSTLZ sy-vline 
WA_PTDART_ITEMS_STR-CSHP_LAND1 sy-vline 
WA_PTDART_ITEMS_STR-CTELF1 sy-vline 
WA_PTDART_ITEMS_STR-CTELFX sy-vline 
WA_PTDART_ITEMS_STR-CAD_SMTPADR sy-vline 
WA_PTDART_ITEMS_STR-CAD_URI sy-vline 
WA_PTDART_ITEMS_STR-SELFBILLINGIND sy-vline 
WA_PTDART_ITEMS_STR-LIFNR sy-vline 
WA_PTDART_ITEMS_STR-SSTCEG sy-vline 
WA_PTDART_ITEMS_STR-NAME1_GP sy-vline 
WA_PTDART_ITEMS_STR-SKNVK sy-vline 
WA_PTDART_ITEMS_STR-SSTRAS sy-vline 
WA_PTDART_ITEMS_STR-SORT01 sy-vline 
WA_PTDART_ITEMS_STR-SPSTLZ sy-vline 
WA_PTDART_ITEMS_STR-SLAND1 sy-vline 
WA_PTDART_ITEMS_STR-SSHP_STRAS sy-vline 
WA_PTDART_ITEMS_STR-SSHP_ORT01 sy-vline 
WA_PTDART_ITEMS_STR-SSHP_PSTLZ sy-vline 
WA_PTDART_ITEMS_STR-SSHP_LAND1 sy-vline 
WA_PTDART_ITEMS_STR-STELF1 sy-vline 
WA_PTDART_ITEMS_STR-STELFX sy-vline 
WA_PTDART_ITEMS_STR-SAD_SMTPADR sy-vline 
WA_PTDART_ITEMS_STR-SAD_URI sy-vline 
WA_PTDART_ITEMS_STR-MTREF sy-vline 
WA_PTDART_ITEMS_STR-MATNR sy-vline 
WA_PTDART_ITEMS_STR-MATKL sy-vline 
WA_PTDART_ITEMS_STR-MAKTX sy-vline 
WA_PTDART_ITEMS_STR-EAN11 sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_TYPE sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_DESC1 sy-vline 
WA_PTDART_ITEMS_STR-TAX_CODE_DETAILS sy-vline 
WA_PTDART_ITEMS_STR-MD_TAXCOUNTRYREGION sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_CODE sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_DESC2 sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_PERCNTG sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_EXEMPT_REASON sy-vline 
WA_PTDART_ITEMS_STR-MD_TAX_EXP_DATE sy-vline 
WA_PTDART_ITEMS_STR-NO_OF_ENTRIES sy-vline 
WA_PTDART_ITEMS_STR-TOTAL_DEBIT sy-vline 
WA_PTDART_ITEMS_STR-TOTAL_CREDIT sy-vline 
WA_PTDART_ITEMS_STR-JOURNAL_ID sy-vline 
WA_PTDART_ITEMS_STR-JR_DESC sy-vline 
WA_PTDART_ITEMS_STR-GL_DESC sy-vline 
WA_PTDART_ITEMS_STR-BELNR sy-vline 
WA_PTDART_ITEMS_STR-MONAT sy-vline 
WA_PTDART_ITEMS_STR-BLDAT sy-vline 
WA_PTDART_ITEMS_STR-USNAM sy-vline 
WA_PTDART_ITEMS_STR-SR_DESC sy-vline 
WA_PTDART_ITEMS_STR-CPUDT sy-vline 
WA_PTDART_ITEMS_STR-TRANS_TYPE sy-vline 
WA_PTDART_ITEMS_STR-DOCARCHIVALNUMBER sy-vline 
WA_PTDART_ITEMS_STR-GLLIFNR sy-vline 
WA_PTDART_ITEMS_STR-GLSGTXT sy-vline 
WA_PTDART_ITEMS_STR-GLVBELN sy-vline 
WA_PTDART_ITEMS_STR-GLHKONT sy-vline 
WA_PTDART_ITEMS_STR-GLBUZEI sy-vline 
WA_PTDART_ITEMS_STR-GLSHKZG sy-vline 
WA_PTDART_ITEMS_STR-GLKUNNR sy-vline 
WA_PTDART_ITEMS_STR-GLTOTAL_LINES sy-vline 
WA_PTDART_ITEMS_STR-GLDEBIT_AMT sy-vline 
WA_PTDART_ITEMS_STR-GLCREDIT_AMT sy-vline 
WA_PTDART_ITEMS_STR-GL_SYS_ENDAT sy-vline 
WA_PTDART_ITEMS_STR-POST_DT sy-vline 
WA_PTDART_ITEMS_STR-SD_NO_OF_ENTRIES sy-vline 
WA_PTDART_ITEMS_STR-SD_TOTAL_DEBIT sy-vline 
WA_PTDART_ITEMS_STR-SD_TOTAL_CREDIT sy-vline 
WA_PTDART_ITEMS_STR-FKART sy-vline 
WA_PTDART_ITEMS_STR-INV_NO sy-vline 
WA_PTDART_ITEMS_STR-INV_STAT sy-vline 
WA_PTDART_ITEMS_STR-INV_PERIOD sy-vline 
WA_PTDART_ITEMS_STR-HASH sy-vline 
WA_PTDART_ITEMS_STR-HASHCONTROL sy-vline 
WA_PTDART_ITEMS_STR-FKDAT sy-vline 
WA_PTDART_ITEMS_STR-INV_TYPE sy-vline 
WA_PTDART_ITEMS_STR-ERDAT sy-vline 
WA_PTDART_ITEMS_STR-FKSTO sy-vline 
WA_PTDART_ITEMS_STR-PTTRANSID sy-vline 
WA_PTDART_ITEMS_STR-KUNAG sy-vline 
WA_PTDART_ITEMS_STR-ST_VBELN sy-vline 
WA_PTDART_ITEMS_STR-ST_LFDAT sy-vline 
WA_PTDART_ITEMS_STR-ST_STRAS sy-vline 
WA_PTDART_ITEMS_STR-ST_ORT01 sy-vline 
WA_PTDART_ITEMS_STR-ST_PSTLZ sy-vline 
WA_PTDART_ITEMS_STR-ST_LAND1 sy-vline 
WA_PTDART_ITEMS_STR-SF_VBELN sy-vline 
WA_PTDART_ITEMS_STR-SF_LFDAT sy-vline 
WA_PTDART_ITEMS_STR-SF_STRAS sy-vline 
WA_PTDART_ITEMS_STR-SF_ORT01 sy-vline 
WA_PTDART_ITEMS_STR-SF_PSTLZ sy-vline 
WA_PTDART_ITEMS_STR-SF_LAND1 sy-vline 
WA_PTDART_ITEMS_STR-LINE sy-vline 
WA_PTDART_ITEMS_STR-POSNR sy-vline 
WA_PTDART_ITEMS_STR-ORG_ON sy-vline 
WA_PTDART_ITEMS_STR-AUDAT sy-vline 
WA_PTDART_ITEMS_STR-SD_MATNR sy-vline 
WA_PTDART_ITEMS_STR-SD_ARKTX sy-vline 
WA_PTDART_ITEMS_STR-MEINS sy-vline 
WA_PTDART_ITEMS_STR-FKIMG sy-vline 
WA_PTDART_ITEMS_STR-VRKME sy-vline 
WA_PTDART_ITEMS_STR-TXW_NETBTR sy-vline 
WA_PTDART_ITEMS_STR-TAX_POINT_DATE sy-vline 
WA_PTDART_ITEMS_STR-SD_DESC sy-vline 
WA_PTDART_ITEMS_STR-SD_DR_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-SD_CR_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-TXW_MWSBP sy-vline 
WA_PTDART_ITEMS_STR-EXTGRUNO sy-vline 
WA_PTDART_ITEMS_STR-TAX_CODE sy-vline 
WA_PTDART_ITEMS_STR-SDTAX_PERCENT sy-vline 
WA_PTDART_ITEMS_STR-LIN_SET_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-DOC_TOTAL sy-vline 
WA_PTDART_ITEMS_STR-TAX_PAYABLE sy-vline 
WA_PTDART_ITEMS_STR-NET_TOTAL sy-vline 
WA_PTDART_ITEMS_STR-GROSS_TOTAL sy-vline 
WA_PTDART_ITEMS_STR-CURRENCY sy-vline 
WA_PTDART_ITEMS_STR-CURRENCY_CODE sy-vline 
WA_PTDART_ITEMS_STR-CURR_CR_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-CURR_DR_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-TERM sy-vline 
WA_PTDART_ITEMS_STR-SETTLE_DISCOUNT sy-vline 
WA_PTDART_ITEMS_STR-SETTLE_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-LSCH sy-vline 
WA_PTDART_ITEMS_STR-SD_SETL_DATE sy-vline 
WA_PTDART_ITEMS_STR-SD_PAY_MECH sy-vline 
WA_PTDART_ITEMS_STR-SDRFE_CREDNOTE sy-vline 
WA_PTDART_ITEMS_STR-SD_CREDREF sy-vline 
WA_PTDART_ITEMS_STR-SDREF_REASON sy-vline 
WA_PTDART_ITEMS_STR-KLAND_NAME sy-vline 
WA_PTDART_ITEMS_STR-VLAND_NAME sy-vline 
WA_PTDART_ITEMS_STR-POSTL_CODE sy-vline 
WA_PTDART_ITEMS_STR-COUNTRY sy-vline 
WA_PTDART_ITEMS_STR-SLAND_NAME sy-vline 
WA_PTDART_ITEMS_STR-MOV_START_TIME sy-vline 
WA_PTDART_ITEMS_STR-MOV_END_TIME sy-vline 
WA_PTDART_ITEMS_STR-ATDOCCODEID sy-vline 
WA_PTDART_ITEMS_STR-STATE_CHANGE_RSN sy-vline 
WA_PTDART_ITEMS_STR-WTH_TAXTYPE sy-vline 
WA_PTDART_ITEMS_STR-WTH_AMOUNT sy-vline 
WA_PTDART_ITEMS_STR-WTH_DESC sy-vline 
WA_PTDART_ITEMS_STR-EXCH_RATE sy-vline 
WA_PTDART_ITEMS_STR-CLOSE_DEBIT_BAL sy-vline 
WA_PTDART_ITEMS_STR-CLOSE_CREDIT_BAL sy-vline 
WA_PTDART_ITEMS_STR-GRP_CODE sy-vline 
WA_PTDART_ITEMS_STR-GRP_CATG sy-vline 
WA_PTDART_ITEMS_STR-CVP_KUNNR sy-vline 
WA_PTDART_ITEMS_STR-XEGCOS sy-vline 
WA_PTDART_ITEMS_STR-STCEG_ORIG sy-vline 
WA_PTDART_ITEMS_STR-XEGCOS_TEXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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