ABAP Select data from SAP table KOMGH 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 KOMGH 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 KOMGH. 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 KOMGH 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_KOMGH TYPE STANDARD TABLE OF KOMGH,
      WA_KOMGH TYPE KOMGH,
      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: <KOMGH> TYPE KOMGH.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM KOMGH
*  INTO TABLE @DATA(IT_KOMGH2).
*--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_KOMGH INDEX 1 INTO DATA(WA_KOMGH2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<KOMGH>-HIENR = 1.
<KOMGH>-MANDT = 1.
<KOMGH>-KNDNR = 1.
<KOMGH>-KNRZE = 1.
<KOMGH>-KUNRE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_KOMGH-KUNWE, sy-vline,
  WA_KOMGH-KUNNR, sy-vline,
  WA_KOMGH-SPDNR, sy-vline,
  WA_KOMGH-VRTNR, sy-vline,
  WA_KOMGH-LIFNR, sy-vline,
  WA_KOMGH-VBELN, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_KOMGH 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_KOMGH 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_KOMGH INTO WA_KOMGH.


*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 HIENR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_KOMGH-HIENR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KOMGH-HIENR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit ABPSP, internal->external for field PSPNR
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_KOMGH-PSPNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KOMGH-PSPNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit AUART, internal->external for field AUART_SD
CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT'
  EXPORTING
    input =                      WA_KOMGH-AUART_SD
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KOMGH-AUART_SD.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit MATN1, internal->external for field PMATN
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_KOMGH-PMATN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KOMGH-PMATN.
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_KOMGH_STR, 
HIENR TYPE STRING,
MANDT TYPE STRING,
KNDNR TYPE STRING,
KNRZE TYPE STRING,
KUNRE TYPE STRING,
KUNWE TYPE STRING,
KUNNR TYPE STRING,
SPDNR TYPE STRING,
VRTNR TYPE STRING,
LIFNR TYPE STRING,
VBELN TYPE STRING,
POSNR TYPE STRING,
PSPNR TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
EKORG TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,
KDGRP TYPE STRING,
BZIRK TYPE STRING,
ALAND TYPE STRING,
WKREG TYPE STRING,
WKCOU TYPE STRING,
WKCTY TYPE STRING,
INCO1 TYPE STRING,
INCO2 TYPE STRING,
LAND1 TYPE STRING,
REGIO TYPE STRING,
COUNC TYPE STRING,
CITYC TYPE STRING,
AUART TYPE STRING,
AUTYP TYPE STRING,
VSBED TYPE STRING,
HIENR01 TYPE STRING,
HIENR02 TYPE STRING,
HIENR03 TYPE STRING,
HIENR04 TYPE STRING,
HIENR05 TYPE STRING,
HIENR06 TYPE STRING,
HIENR07 TYPE STRING,
HIENR08 TYPE STRING,
HIENR09 TYPE STRING,
HIENR10 TYPE STRING,
HIENR11 TYPE STRING,
HIENR12 TYPE STRING,
HIENR13 TYPE STRING,
HIENR14 TYPE STRING,
HIENR15 TYPE STRING,
HIEBO01 TYPE STRING,
HIEBO02 TYPE STRING,
HIEBO03 TYPE STRING,
HIEBO04 TYPE STRING,
HIEBO05 TYPE STRING,
HIEBO06 TYPE STRING,
HIEBO07 TYPE STRING,
HIEBO08 TYPE STRING,
HIEBO09 TYPE STRING,
HIEBO10 TYPE STRING,
HIEBO11 TYPE STRING,
HIEBO12 TYPE STRING,
HIEBO13 TYPE STRING,
HIEBO14 TYPE STRING,
HIEBO15 TYPE STRING,
LGNUM TYPE STRING,
BWLVS TYPE STRING,
AUART_SD TYPE STRING,
AUFNR TYPE STRING,
KDUMMY TYPE STRING,
MATNR TYPE STRING,
WERKS TYPE STRING,
LGORT TYPE STRING,
VSTEL TYPE STRING,
EAN11 TYPE STRING,
WAGRP TYPE STRING,
KONDM TYPE STRING,
MATKL TYPE STRING,
WGRU1 TYPE STRING,
WGRU2 TYPE STRING,
PROD_HIER_NODE TYPE STRING,
PRODH TYPE STRING,
VKGRU TYPE STRING,
VKAUS TYPE STRING,
MTART TYPE STRING,
SHKZG TYPE STRING,
MBRSH TYPE STRING,
KZTLF TYPE STRING,
ROUTE TYPE STRING,
KVGR1 TYPE STRING,
KVGR2 TYPE STRING,
KVGR3 TYPE STRING,
KVGR4 TYPE STRING,
KVGR5 TYPE STRING,
MVGR1 TYPE STRING,
MVGR2 TYPE STRING,
MVGR3 TYPE STRING,
MVGR4 TYPE STRING,
MVGR5 TYPE STRING,
BWTTY TYPE STRING,
BWTEX TYPE STRING,
VLTYP TYPE STRING,
NLTYP TYPE STRING,
BESTQ TYPE STRING,
BWTAR TYPE STRING,
BWART TYPE STRING,
SOBKZ TYPE STRING,
ZUSTD TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
KDEIN TYPE STRING,
UMWRK TYPE STRING,
UMLGO TYPE STRING,
UMSOK TYPE STRING,
PMATN TYPE STRING,
PWERK TYPE STRING,
SPARP TYPE STRING,
BERID TYPE STRING,
PDUMMY TYPE STRING,
SGT_SCAT TYPE STRING,
SGT_RCAT TYPE STRING,
SGT_COVS TYPE STRING,END OF T_EKKO_STR.
DATA: WA_KOMGH_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_KOMGH_STR-HIENR sy-vline 
WA_KOMGH_STR-MANDT sy-vline 
WA_KOMGH_STR-KNDNR sy-vline 
WA_KOMGH_STR-KNRZE sy-vline 
WA_KOMGH_STR-KUNRE sy-vline 
WA_KOMGH_STR-KUNWE sy-vline 
WA_KOMGH_STR-KUNNR sy-vline 
WA_KOMGH_STR-SPDNR sy-vline 
WA_KOMGH_STR-VRTNR sy-vline 
WA_KOMGH_STR-LIFNR sy-vline 
WA_KOMGH_STR-VBELN sy-vline 
WA_KOMGH_STR-POSNR sy-vline 
WA_KOMGH_STR-PSPNR sy-vline 
WA_KOMGH_STR-VKORG sy-vline 
WA_KOMGH_STR-VTWEG sy-vline 
WA_KOMGH_STR-SPART sy-vline 
WA_KOMGH_STR-EKORG sy-vline 
WA_KOMGH_STR-VKBUR sy-vline 
WA_KOMGH_STR-VKGRP sy-vline 
WA_KOMGH_STR-KDGRP sy-vline 
WA_KOMGH_STR-BZIRK sy-vline 
WA_KOMGH_STR-ALAND sy-vline 
WA_KOMGH_STR-WKREG sy-vline 
WA_KOMGH_STR-WKCOU sy-vline 
WA_KOMGH_STR-WKCTY sy-vline 
WA_KOMGH_STR-INCO1 sy-vline 
WA_KOMGH_STR-INCO2 sy-vline 
WA_KOMGH_STR-LAND1 sy-vline 
WA_KOMGH_STR-REGIO sy-vline 
WA_KOMGH_STR-COUNC sy-vline 
WA_KOMGH_STR-CITYC sy-vline 
WA_KOMGH_STR-AUART sy-vline 
WA_KOMGH_STR-AUTYP sy-vline 
WA_KOMGH_STR-VSBED sy-vline 
WA_KOMGH_STR-HIENR01 sy-vline 
WA_KOMGH_STR-HIENR02 sy-vline 
WA_KOMGH_STR-HIENR03 sy-vline 
WA_KOMGH_STR-HIENR04 sy-vline 
WA_KOMGH_STR-HIENR05 sy-vline 
WA_KOMGH_STR-HIENR06 sy-vline 
WA_KOMGH_STR-HIENR07 sy-vline 
WA_KOMGH_STR-HIENR08 sy-vline 
WA_KOMGH_STR-HIENR09 sy-vline 
WA_KOMGH_STR-HIENR10 sy-vline 
WA_KOMGH_STR-HIENR11 sy-vline 
WA_KOMGH_STR-HIENR12 sy-vline 
WA_KOMGH_STR-HIENR13 sy-vline 
WA_KOMGH_STR-HIENR14 sy-vline 
WA_KOMGH_STR-HIENR15 sy-vline 
WA_KOMGH_STR-HIEBO01 sy-vline 
WA_KOMGH_STR-HIEBO02 sy-vline 
WA_KOMGH_STR-HIEBO03 sy-vline 
WA_KOMGH_STR-HIEBO04 sy-vline 
WA_KOMGH_STR-HIEBO05 sy-vline 
WA_KOMGH_STR-HIEBO06 sy-vline 
WA_KOMGH_STR-HIEBO07 sy-vline 
WA_KOMGH_STR-HIEBO08 sy-vline 
WA_KOMGH_STR-HIEBO09 sy-vline 
WA_KOMGH_STR-HIEBO10 sy-vline 
WA_KOMGH_STR-HIEBO11 sy-vline 
WA_KOMGH_STR-HIEBO12 sy-vline 
WA_KOMGH_STR-HIEBO13 sy-vline 
WA_KOMGH_STR-HIEBO14 sy-vline 
WA_KOMGH_STR-HIEBO15 sy-vline 
WA_KOMGH_STR-LGNUM sy-vline 
WA_KOMGH_STR-BWLVS sy-vline 
WA_KOMGH_STR-AUART_SD sy-vline 
WA_KOMGH_STR-AUFNR sy-vline 
WA_KOMGH_STR-KDUMMY sy-vline 
WA_KOMGH_STR-MATNR sy-vline 
WA_KOMGH_STR-WERKS sy-vline 
WA_KOMGH_STR-LGORT sy-vline 
WA_KOMGH_STR-VSTEL sy-vline 
WA_KOMGH_STR-EAN11 sy-vline 
WA_KOMGH_STR-WAGRP sy-vline 
WA_KOMGH_STR-KONDM sy-vline 
WA_KOMGH_STR-MATKL sy-vline 
WA_KOMGH_STR-WGRU1 sy-vline 
WA_KOMGH_STR-WGRU2 sy-vline 
WA_KOMGH_STR-PROD_HIER_NODE sy-vline 
WA_KOMGH_STR-PRODH sy-vline 
WA_KOMGH_STR-VKGRU sy-vline 
WA_KOMGH_STR-VKAUS sy-vline 
WA_KOMGH_STR-MTART sy-vline 
WA_KOMGH_STR-SHKZG sy-vline 
WA_KOMGH_STR-MBRSH sy-vline 
WA_KOMGH_STR-KZTLF sy-vline 
WA_KOMGH_STR-ROUTE sy-vline 
WA_KOMGH_STR-KVGR1 sy-vline 
WA_KOMGH_STR-KVGR2 sy-vline 
WA_KOMGH_STR-KVGR3 sy-vline 
WA_KOMGH_STR-KVGR4 sy-vline 
WA_KOMGH_STR-KVGR5 sy-vline 
WA_KOMGH_STR-MVGR1 sy-vline 
WA_KOMGH_STR-MVGR2 sy-vline 
WA_KOMGH_STR-MVGR3 sy-vline 
WA_KOMGH_STR-MVGR4 sy-vline 
WA_KOMGH_STR-MVGR5 sy-vline 
WA_KOMGH_STR-BWTTY sy-vline 
WA_KOMGH_STR-BWTEX sy-vline 
WA_KOMGH_STR-VLTYP sy-vline 
WA_KOMGH_STR-NLTYP sy-vline 
WA_KOMGH_STR-BESTQ sy-vline 
WA_KOMGH_STR-BWTAR sy-vline 
WA_KOMGH_STR-BWART sy-vline 
WA_KOMGH_STR-SOBKZ sy-vline 
WA_KOMGH_STR-ZUSTD sy-vline 
WA_KOMGH_STR-KDAUF sy-vline 
WA_KOMGH_STR-KDPOS sy-vline 
WA_KOMGH_STR-KDEIN sy-vline 
WA_KOMGH_STR-UMWRK sy-vline 
WA_KOMGH_STR-UMLGO sy-vline 
WA_KOMGH_STR-UMSOK sy-vline 
WA_KOMGH_STR-PMATN sy-vline 
WA_KOMGH_STR-PWERK sy-vline 
WA_KOMGH_STR-SPARP sy-vline 
WA_KOMGH_STR-BERID sy-vline 
WA_KOMGH_STR-PDUMMY sy-vline 
WA_KOMGH_STR-SGT_SCAT sy-vline 
WA_KOMGH_STR-SGT_RCAT sy-vline 
WA_KOMGH_STR-SGT_COVS sy-vline      INTO ld_text SEPARATED BY SPACE.

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