ABAP Select data from SAP table TF602 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 TF602 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 TF602. 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 TF602 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_TF602 TYPE STANDARD TABLE OF TF602,
      WA_TF602 TYPE TF602,
      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: <TF602> TYPE TF602.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM TF602
*  INTO TABLE @DATA(IT_TF6022).
*--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_TF602 INDEX 1 INTO DATA(WA_TF6022).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<TF602>-MANDT = 1.
<TF602>-DIMEN = 1.
<TF602>-ITCLG = 1.
<TF602>-COIMETH = 1.
<TF602>-ROLE_ID_GOODWILL_ACQ = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_TF602-ROLE_VAL_ID_GOODWILL_ACQ, sy-vline,
  WA_TF602-GWAAQDI, sy-vline,
  WA_TF602-GWAAQDT, sy-vline,
  WA_TF602-GWAAQDS, sy-vline,
  WA_TF602-GWAAQCTPYS, sy-vline,
  WA_TF602-GWAAQCTCYS, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_TF602 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_TF602 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_TF602 INTO WA_TF602.


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

*Conversion exit BFIMC, internal->external for field GWAOFFSDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWAOFFSDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWAOFFSDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWAAQCI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWAAQCI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWAAQCI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWAAMDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWAAMDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWAAMDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWAAMCI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWAAMCI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWAAMCI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWASTAT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWASTAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWASTAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWASTATCT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWASTATCT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWASTATCT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWASTATOFFS
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWASTATOFFS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWASTATOFFS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWRAQDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWRAQDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWRAQDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWROFFSDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWROFFSDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWROFFSDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWRAMDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWRAMDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWRAMDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWRAMCI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWRAMCI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWRAMCI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWRSTAT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWRSTAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWRSTAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWRSTATOFFS
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWRSTATOFFS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWRSTATOFFS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWDAQDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWDAQDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWDAQDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWDOFFSDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWDOFFSDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWDOFFSDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWDSTAT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWDSTAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWDSTAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field GWDSTATOFFS
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-GWDSTATOFFS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-GWDSTATOFFS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGAAQDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGAAQDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGAAQDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGAOFFSDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGAOFFSDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGAOFFSDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGAAQCI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGAAQCI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGAAQCI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGAAMDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGAAMDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGAAMDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGAAMCI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGAAMCI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGAAMCI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGASTAT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGASTAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGASTAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGASTATCT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGASTATCT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGASTATCT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGASTATOFFS
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGASTATOFFS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGASTATOFFS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGRAQDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGRAQDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGRAQDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGROFFSDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGROFFSDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGROFFSDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGRAMDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGRAMDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGRAMDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGRAMCI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGRAMCI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGRAMCI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGRSTAT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGRSTAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGRSTAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGRSTATOFFS
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGRSTATOFFS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGRSTATOFFS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGDAQCI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGDAQCI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGDAQCI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGDOFFSDI
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGDOFFSDI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGDOFFSDI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGDSTAT
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGDSTAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGDSTAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BFIMC, internal->external for field NGDSTATOFFS
CALL FUNCTION 'CONVERSION_EXIT_BFIMC_OUTPUT'
  EXPORTING
    input =                      WA_TF602-NGDSTATOFFS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_TF602-NGDSTATOFFS.
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_TF602_STR, 
MANDT TYPE STRING,
DIMEN TYPE STRING,
ITCLG TYPE STRING,
COIMETH TYPE STRING,
ROLE_ID_GOODWILL_ACQ TYPE STRING,
ROLE_VAL_ID_GOODWILL_ACQ TYPE STRING,
GWAAQDI TYPE STRING,
GWAAQDT TYPE STRING,
GWAAQDS TYPE STRING,
GWAAQCTPYS TYPE STRING,
GWAAQCTCYS TYPE STRING,
ROLE_ID_GOODWILL_OFA TYPE STRING,
ROLE_VAL_ID_GOODWILL_OFA TYPE STRING,
GWAOFFSDI TYPE STRING,
GWAOFFSDT TYPE STRING,
GWAOFFSDS TYPE STRING,
GWAOFFSCS TYPE STRING,
ROLE_ID_GOODWILL_DEP TYPE STRING,
ROLE_VAL_ID_GOODWILL_DEP TYPE STRING,
GWAAQCI TYPE STRING,
GWAAQCT TYPE STRING,
GWADPCS TYPE STRING,
GWADPDS TYPE STRING,
GWADPCTPYS TYPE STRING,
GWADPCTCYS TYPE STRING,
ROLE_ID_GOODWILL_PL TYPE STRING,
ROLE_VAL_ID_GOODWILL_PL TYPE STRING,
GWAAMDI TYPE STRING,
GWAAMDT TYPE STRING,
GWAAMDS TYPE STRING,
ROLE_ID_GOODWILL_WU TYPE STRING,
ROLE_VAL_ID_GOODWILL_WU TYPE STRING,
GWAAMCI TYPE STRING,
GWAAMCT TYPE STRING,
GWAAMCS TYPE STRING,
GWASTAT TYPE STRING,
GWASTATCT TYPE STRING,
GWASTATOFFS TYPE STRING,
GWRAQDI TYPE STRING,
GWRAQDT TYPE STRING,
GWRAQDS TYPE STRING,
GWRAQCS TYPE STRING,
GWROFFSDI TYPE STRING,
GWROFFSDT TYPE STRING,
GWROFFSDS TYPE STRING,
GWROFFSCS TYPE STRING,
GWRAMDI TYPE STRING,
GWRAMDT TYPE STRING,
GWRAMDS TYPE STRING,
GWRAMCI TYPE STRING,
GWRAMCT TYPE STRING,
GWRAMCS TYPE STRING,
GWRSTAT TYPE STRING,
GWRSTATOFFS TYPE STRING,
ROLE_ID_GOODWILL_ELI TYPE STRING,
ROLE_VAL_ID_GOODWILL_ELI TYPE STRING,
GWDAQDI TYPE STRING,
GWDAQDT TYPE STRING,
GWDAQDS TYPE STRING,
ROLE_ID_GOODWILL_OFE TYPE STRING,
ROLE_VAL_ID_GOODWILL_OFE TYPE STRING,
GWDOFFSDI TYPE STRING,
GWDOFFSDT TYPE STRING,
GWDOFFSDS TYPE STRING,
GWDOFFSCS TYPE STRING,
GWDSTAT TYPE STRING,
GWDSTATOFFS TYPE STRING,
ROLE_ID_BADWILL_ACQ TYPE STRING,
ROLE_VAL_ID_BADWILL_ACQ TYPE STRING,
NGAAQDI TYPE STRING,
NGAAQDT TYPE STRING,
NGAAQDS TYPE STRING,
NGAAMCTPYS TYPE STRING,
NGAAMCTCYS TYPE STRING,
ROLE_ID_BADWILL_OFA TYPE STRING,
ROLE_VAL_ID_BADWILL_OFA TYPE STRING,
NGAOFFSDI TYPE STRING,
NGAOFFSDT TYPE STRING,
NGAOFFSDS TYPE STRING,
NGAOFFSCS TYPE STRING,
ROLE_ID_BADWILL_DEP TYPE STRING,
ROLE_VAL_ID_BADWILL_DEP TYPE STRING,
NGAAQCI TYPE STRING,
NGAAQCT TYPE STRING,
NGADPCS TYPE STRING,
NGADPDS TYPE STRING,
NGADPCTPYS TYPE STRING,
NGADPCTCYS TYPE STRING,
ROLE_ID_BADWILL_PL TYPE STRING,
ROLE_VAL_ID_BADWILL_PL TYPE STRING,
NGAAMDI TYPE STRING,
NGAAMDT TYPE STRING,
NGAAMDS TYPE STRING,
ROLE_ID_BADWILL_WU TYPE STRING,
ROLE_VAL_ID_BADWILL_WU TYPE STRING,
NGAAMCI TYPE STRING,
NGAAMCT TYPE STRING,
NGAAMCS TYPE STRING,
NGASTAT TYPE STRING,
NGASTATCT TYPE STRING,
NGASTATOFFS TYPE STRING,
NGRAQDI TYPE STRING,
NGRAQDT TYPE STRING,
NGRAQDS TYPE STRING,
NGRAQCS TYPE STRING,
NGROFFSDI TYPE STRING,
NGROFFSDT TYPE STRING,
NGROFFSDS TYPE STRING,
NGROFFSCS TYPE STRING,
NGRAMDI TYPE STRING,
NGRAMDT TYPE STRING,
NGRAMDS TYPE STRING,
NGRAMCI TYPE STRING,
NGRAMCT TYPE STRING,
NGRAMCS TYPE STRING,
NGRSTAT TYPE STRING,
NGRSTATOFFS TYPE STRING,
ROLE_ID_BADWILL_ELI TYPE STRING,
ROLE_VAL_ID_BADWILL_ELI TYPE STRING,
NGDAQCI TYPE STRING,
NGDAQCT TYPE STRING,
NGDAQCS TYPE STRING,
ROLE_ID_BADWILL_OFE TYPE STRING,
ROLE_VAL_ID_BADWILL_OFE TYPE STRING,
NGDOFFSDI TYPE STRING,
NGDOFFSDT TYPE STRING,
NGDOFFSDS TYPE STRING,
NGDOFFSCS TYPE STRING,
NGDSTAT TYPE STRING,
NGDSTATOFFS TYPE STRING,END OF T_EKKO_STR.
DATA: WA_TF602_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_TF602_STR-MANDT sy-vline 
WA_TF602_STR-DIMEN sy-vline 
WA_TF602_STR-ITCLG sy-vline 
WA_TF602_STR-COIMETH sy-vline 
WA_TF602_STR-ROLE_ID_GOODWILL_ACQ sy-vline 
WA_TF602_STR-ROLE_VAL_ID_GOODWILL_ACQ sy-vline 
WA_TF602_STR-GWAAQDI sy-vline 
WA_TF602_STR-GWAAQDT sy-vline 
WA_TF602_STR-GWAAQDS sy-vline 
WA_TF602_STR-GWAAQCTPYS sy-vline 
WA_TF602_STR-GWAAQCTCYS sy-vline 
WA_TF602_STR-ROLE_ID_GOODWILL_OFA sy-vline 
WA_TF602_STR-ROLE_VAL_ID_GOODWILL_OFA sy-vline 
WA_TF602_STR-GWAOFFSDI sy-vline 
WA_TF602_STR-GWAOFFSDT sy-vline 
WA_TF602_STR-GWAOFFSDS sy-vline 
WA_TF602_STR-GWAOFFSCS sy-vline 
WA_TF602_STR-ROLE_ID_GOODWILL_DEP sy-vline 
WA_TF602_STR-ROLE_VAL_ID_GOODWILL_DEP sy-vline 
WA_TF602_STR-GWAAQCI sy-vline 
WA_TF602_STR-GWAAQCT sy-vline 
WA_TF602_STR-GWADPCS sy-vline 
WA_TF602_STR-GWADPDS sy-vline 
WA_TF602_STR-GWADPCTPYS sy-vline 
WA_TF602_STR-GWADPCTCYS sy-vline 
WA_TF602_STR-ROLE_ID_GOODWILL_PL sy-vline 
WA_TF602_STR-ROLE_VAL_ID_GOODWILL_PL sy-vline 
WA_TF602_STR-GWAAMDI sy-vline 
WA_TF602_STR-GWAAMDT sy-vline 
WA_TF602_STR-GWAAMDS sy-vline 
WA_TF602_STR-ROLE_ID_GOODWILL_WU sy-vline 
WA_TF602_STR-ROLE_VAL_ID_GOODWILL_WU sy-vline 
WA_TF602_STR-GWAAMCI sy-vline 
WA_TF602_STR-GWAAMCT sy-vline 
WA_TF602_STR-GWAAMCS sy-vline 
WA_TF602_STR-GWASTAT sy-vline 
WA_TF602_STR-GWASTATCT sy-vline 
WA_TF602_STR-GWASTATOFFS sy-vline 
WA_TF602_STR-GWRAQDI sy-vline 
WA_TF602_STR-GWRAQDT sy-vline 
WA_TF602_STR-GWRAQDS sy-vline 
WA_TF602_STR-GWRAQCS sy-vline 
WA_TF602_STR-GWROFFSDI sy-vline 
WA_TF602_STR-GWROFFSDT sy-vline 
WA_TF602_STR-GWROFFSDS sy-vline 
WA_TF602_STR-GWROFFSCS sy-vline 
WA_TF602_STR-GWRAMDI sy-vline 
WA_TF602_STR-GWRAMDT sy-vline 
WA_TF602_STR-GWRAMDS sy-vline 
WA_TF602_STR-GWRAMCI sy-vline 
WA_TF602_STR-GWRAMCT sy-vline 
WA_TF602_STR-GWRAMCS sy-vline 
WA_TF602_STR-GWRSTAT sy-vline 
WA_TF602_STR-GWRSTATOFFS sy-vline 
WA_TF602_STR-ROLE_ID_GOODWILL_ELI sy-vline 
WA_TF602_STR-ROLE_VAL_ID_GOODWILL_ELI sy-vline 
WA_TF602_STR-GWDAQDI sy-vline 
WA_TF602_STR-GWDAQDT sy-vline 
WA_TF602_STR-GWDAQDS sy-vline 
WA_TF602_STR-ROLE_ID_GOODWILL_OFE sy-vline 
WA_TF602_STR-ROLE_VAL_ID_GOODWILL_OFE sy-vline 
WA_TF602_STR-GWDOFFSDI sy-vline 
WA_TF602_STR-GWDOFFSDT sy-vline 
WA_TF602_STR-GWDOFFSDS sy-vline 
WA_TF602_STR-GWDOFFSCS sy-vline 
WA_TF602_STR-GWDSTAT sy-vline 
WA_TF602_STR-GWDSTATOFFS sy-vline 
WA_TF602_STR-ROLE_ID_BADWILL_ACQ sy-vline 
WA_TF602_STR-ROLE_VAL_ID_BADWILL_ACQ sy-vline 
WA_TF602_STR-NGAAQDI sy-vline 
WA_TF602_STR-NGAAQDT sy-vline 
WA_TF602_STR-NGAAQDS sy-vline 
WA_TF602_STR-NGAAMCTPYS sy-vline 
WA_TF602_STR-NGAAMCTCYS sy-vline 
WA_TF602_STR-ROLE_ID_BADWILL_OFA sy-vline 
WA_TF602_STR-ROLE_VAL_ID_BADWILL_OFA sy-vline 
WA_TF602_STR-NGAOFFSDI sy-vline 
WA_TF602_STR-NGAOFFSDT sy-vline 
WA_TF602_STR-NGAOFFSDS sy-vline 
WA_TF602_STR-NGAOFFSCS sy-vline 
WA_TF602_STR-ROLE_ID_BADWILL_DEP sy-vline 
WA_TF602_STR-ROLE_VAL_ID_BADWILL_DEP sy-vline 
WA_TF602_STR-NGAAQCI sy-vline 
WA_TF602_STR-NGAAQCT sy-vline 
WA_TF602_STR-NGADPCS sy-vline 
WA_TF602_STR-NGADPDS sy-vline 
WA_TF602_STR-NGADPCTPYS sy-vline 
WA_TF602_STR-NGADPCTCYS sy-vline 
WA_TF602_STR-ROLE_ID_BADWILL_PL sy-vline 
WA_TF602_STR-ROLE_VAL_ID_BADWILL_PL sy-vline 
WA_TF602_STR-NGAAMDI sy-vline 
WA_TF602_STR-NGAAMDT sy-vline 
WA_TF602_STR-NGAAMDS sy-vline 
WA_TF602_STR-ROLE_ID_BADWILL_WU sy-vline 
WA_TF602_STR-ROLE_VAL_ID_BADWILL_WU sy-vline 
WA_TF602_STR-NGAAMCI sy-vline 
WA_TF602_STR-NGAAMCT sy-vline 
WA_TF602_STR-NGAAMCS sy-vline 
WA_TF602_STR-NGASTAT sy-vline 
WA_TF602_STR-NGASTATCT sy-vline 
WA_TF602_STR-NGASTATOFFS sy-vline 
WA_TF602_STR-NGRAQDI sy-vline 
WA_TF602_STR-NGRAQDT sy-vline 
WA_TF602_STR-NGRAQDS sy-vline 
WA_TF602_STR-NGRAQCS sy-vline 
WA_TF602_STR-NGROFFSDI sy-vline 
WA_TF602_STR-NGROFFSDT sy-vline 
WA_TF602_STR-NGROFFSDS sy-vline 
WA_TF602_STR-NGROFFSCS sy-vline 
WA_TF602_STR-NGRAMDI sy-vline 
WA_TF602_STR-NGRAMDT sy-vline 
WA_TF602_STR-NGRAMDS sy-vline 
WA_TF602_STR-NGRAMCI sy-vline 
WA_TF602_STR-NGRAMCT sy-vline 
WA_TF602_STR-NGRAMCS sy-vline 
WA_TF602_STR-NGRSTAT sy-vline 
WA_TF602_STR-NGRSTATOFFS sy-vline 
WA_TF602_STR-ROLE_ID_BADWILL_ELI sy-vline 
WA_TF602_STR-ROLE_VAL_ID_BADWILL_ELI sy-vline 
WA_TF602_STR-NGDAQCI sy-vline 
WA_TF602_STR-NGDAQCT sy-vline 
WA_TF602_STR-NGDAQCS sy-vline 
WA_TF602_STR-ROLE_ID_BADWILL_OFE sy-vline 
WA_TF602_STR-ROLE_VAL_ID_BADWILL_OFE sy-vline 
WA_TF602_STR-NGDOFFSDI sy-vline 
WA_TF602_STR-NGDOFFSDT sy-vline 
WA_TF602_STR-NGDOFFSDS sy-vline 
WA_TF602_STR-NGDOFFSCS sy-vline 
WA_TF602_STR-NGDSTAT sy-vline 
WA_TF602_STR-NGDSTATOFFS sy-vline      INTO ld_text SEPARATED BY SPACE.

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