ABAP Select data from SAP table DBERDZ 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 DBERDZ 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 DBERDZ. 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 DBERDZ 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_DBERDZ TYPE STANDARD TABLE OF DBERDZ,
      WA_DBERDZ TYPE DBERDZ,
      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: <DBERDZ> TYPE DBERDZ.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM DBERDZ
*  INTO TABLE @DATA(IT_DBERDZ2).
*--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_DBERDZ INDEX 1 INTO DATA(WA_DBERDZ2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<DBERDZ>-MANDT = 1.
<DBERDZ>-OPBEL = 1.
<DBERDZ>-BELZEILE = 1.
<DBERDZ>-BUKRS = 1.
<DBERDZ>-KTOSL = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_DBERDZ-HKONT, sy-vline,
  WA_DBERDZ-STPRZ, sy-vline,
  WA_DBERDZ-SBASW, sy-vline,
  WA_DBERDZ-SBETW, sy-vline,
  WA_DBERDZ-TXJCD, sy-vline,
  WA_DBERDZ-HVORG, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_DBERDZ 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_DBERDZ 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_DBERDZ INTO WA_DBERDZ.


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

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

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

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

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

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

*Conversion exit GERNR, internal->external for field GERAET
CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT'
  EXPORTING
    input =                      WA_DBERDZ-GERAET
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBERDZ-GERAET.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit HH_MM, internal->external for field ATIM
CALL FUNCTION 'CONVERSION_EXIT_HH_MM_OUTPUT'
  EXPORTING
    input =                      WA_DBERDZ-ATIM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBERDZ-ATIM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit HH_MM, internal->external for field ATIMVA
CALL FUNCTION 'CONVERSION_EXIT_HH_MM_OUTPUT'
  EXPORTING
    input =                      WA_DBERDZ-ATIMVA
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBERDZ-ATIMVA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit HH_MM, internal->external for field ATIMMAX
CALL FUNCTION 'CONVERSION_EXIT_HH_MM_OUTPUT'
  EXPORTING
    input =                      WA_DBERDZ-ATIMMAX
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBERDZ-ATIMMAX.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field REFBILLDOCNO
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_DBERDZ-REFBILLDOCNO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_DBERDZ-REFBILLDOCNO.
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_DBERDZ_STR, 
MANDT TYPE STRING,
OPBEL TYPE STRING,
BELZEILE TYPE STRING,
BUKRS TYPE STRING,
KTOSL TYPE STRING,
HKONT TYPE STRING,
STPRZ TYPE STRING,
SBASW TYPE STRING,
SBETW TYPE STRING,
TXJCD TYPE STRING,
HVORG TYPE STRING,
SHKZG TYPE STRING,
BLDAT TYPE STRING,
BUDAT TYPE STRING,
FAEDN TYPE STRING,
BETRW TYPE STRING,
AUGBW TYPE STRING,
FAEDS TYPE STRING,
SKTOW TYPE STRING,
ASKTW TYPE STRING,
SKTPZ TYPE STRING,
VERTRAG TYPE STRING,
ABPOPBEL TYPE STRING,
SPARTE TYPE STRING,
XTOTAL_AMNT TYPE STRING,
AWTYP TYPE STRING,
AWKEY TYPE STRING,
CA_OPBEL TYPE STRING,
TAXRATE_INTERNAL TYPE STRING,
CSNO TYPE STRING,
BELZART TYPE STRING,
ABSLKZ TYPE STRING,
DIFFKZ TYPE STRING,
BUCHREL TYPE STRING,
MENGESTREL TYPE STRING,
BETRSTREL TYPE STRING,
STGRQNT TYPE STRING,
STGRAMT TYPE STRING,
PRINTREL TYPE STRING,
BRUTTOZEILE TYPE STRING,
AKLASSE TYPE STRING,
BRANCHE TYPE STRING,
TVORG TYPE STRING,
GEGEN_TVORG TYPE STRING,
LINESORT TYPE STRING,
AB TYPE STRING,
BIS TYPE STRING,
ZEITANT TYPE STRING,
TIMTYPZA TYPE STRING,
SCHEMANR TYPE STRING,
SNO TYPE STRING,
PROGRAMM TYPE STRING,
EQUNR TYPE STRING,
GERAET TYPE STRING,
MATNR TYPE STRING,
ZWNUMMER TYPE STRING,
INDEXNR TYPE STRING,
MASSBILL TYPE STRING,
MWSKZ TYPE STRING,
ERMWSKZ TYPE STRING,
NETTOBTR TYPE STRING,
TWAERS TYPE STRING,
SAISON TYPE STRING,
PREISTUF TYPE STRING,
PREISTYP TYPE STRING,
PREIS TYPE STRING,
PREISZUS TYPE STRING,
VONZONE TYPE STRING,
BISZONE TYPE STRING,
ZONENNR TYPE STRING,
PREISBTR TYPE STRING,
MNGBASIS TYPE STRING,
TIMBASIS TYPE STRING,
TIMTYP TYPE STRING,
PREIGKL TYPE STRING,
URPREIS TYPE STRING,
PREIADD TYPE STRING,
PREIFAKT TYPE STRING,
OPMULT TYPE STRING,
FRAN_TYPE TYPE STRING,
KONZIGR TYPE STRING,
ABLESGR TYPE STRING,
ABLESGRV TYPE STRING,
ATIM TYPE STRING,
ATIMVA TYPE STRING,
ADATMAX TYPE STRING,
ATIMMAX TYPE STRING,
TARIFTYP TYPE STRING,
TARIFNR TYPE STRING,
KONDIGR TYPE STRING,
STTARIF TYPE STRING,
GEWKEY TYPE STRING,
GEWANTZ TYPE STRING,
GEWANTN TYPE STRING,
LEUCHTNR TYPE STRING,
BETRART TYPE STRING,
WDHFAKT TYPE STRING,
TEMP_AREA TYPE STRING,
DRCKSTUF TYPE STRING,
THGDATUM TYPE STRING,
ZUORDDAT TYPE STRING,
SPGRUND TYPE STRING,
ABGGRND1 TYPE STRING,
ABGGRND2 TYPE STRING,
ABGGRND3 TYPE STRING,
ABGGRND4 TYPE STRING,
ABGGRND5 TYPE STRING,
ABGGRND6 TYPE STRING,
ABGGRND7 TYPE STRING,
ABGGRND8 TYPE STRING,
ABGGRND9 TYPE STRING,
ABGGRND10 TYPE STRING,
EIN01 TYPE STRING,
EIN02 TYPE STRING,
EIN03 TYPE STRING,
EIN04 TYPE STRING,
EIN05 TYPE STRING,
EIN06 TYPE STRING,
EIN07 TYPE STRING,
EIN08 TYPE STRING,
EIN09 TYPE STRING,
EIN10 TYPE STRING,
AUS01 TYPE STRING,
AUS02 TYPE STRING,
AUS03 TYPE STRING,
AUS04 TYPE STRING,
AUS05 TYPE STRING,
MASS1 TYPE STRING,
MASS2 TYPE STRING,
MASS3 TYPE STRING,
MASS4 TYPE STRING,
MASS5 TYPE STRING,
MASS6 TYPE STRING,
DATUM1 TYPE STRING,
DATUM2 TYPE STRING,
TEXTNR TYPE STRING,
TEXTSP TYPE STRING,
RABZUS TYPE STRING,
BACKCANC01 TYPE STRING,
BACKCANC02 TYPE STRING,
BACKCANC03 TYPE STRING,
BACKCANC04 TYPE STRING,
BACKCANC05 TYPE STRING,
BACKCANC TYPE STRING,
BACKEXEC TYPE STRING,
BACKDOCNO TYPE STRING,
BACKDOCLINE TYPE STRING,
LRATESTEP TYPE STRING,
TXDAT_KK TYPE STRING,
REGRELSORT TYPE STRING,
SC_BELNR TYPE STRING,
PEB TYPE STRING,
OPLFDNR TYPE STRING,
STAFO TYPE STRING,
ARTMENGE TYPE STRING,
STATTART TYPE STRING,
PRCTR TYPE STRING,
KOSTL TYPE STRING,
PS_PSP_PNR TYPE STRING,
AUFNR TYPE STRING,
PAOBJNR TYPE STRING,
PAOBJNR_S TYPE STRING,
GSBER TYPE STRING,
APERIODIC TYPE STRING,
ABLBELNR TYPE STRING,
LOGIKZW TYPE STRING,
ISTABLART TYPE STRING,
ISTABLARTVA TYPE STRING,
EXTPKZ TYPE STRING,
BEGPROG TYPE STRING,
ENDEPROG TYPE STRING,
REFBELZEILE TYPE STRING,
SPERRUNG TYPE STRING,
TIMECONTRL TYPE STRING,
TCNUMTOR TYPE STRING,
TCDENOMTOR TYPE STRING,
TIMTYPQUOT TYPE STRING,
NETTOFRMD TYPE STRING,
WAERSF TYPE STRING,
UMRECHDAT TYPE STRING,
UMRECHKURS TYPE STRING,
AKTIV TYPE STRING,
REFBELZONE TYPE STRING,
ABLHINW TYPE STRING,
KONZVER TYPE STRING,
REFBILLDOCNO TYPE STRING,
PERTYP TYPE STRING,
V_ZWSTAND TYPE STRING,
N_ZWSTAND TYPE STRING,
V_ZWSTNDAB TYPE STRING,
N_ZWSTNDAB TYPE STRING,
V_ZWSTVOR TYPE STRING,
N_ZWSTVOR TYPE STRING,
V_ABRMENGE TYPE STRING,
N_ABRMENGE TYPE STRING,
V_ZAHL1 TYPE STRING,
N_ZAHL1 TYPE STRING,
V_ZAHL2 TYPE STRING,
N_ZAHL2 TYPE STRING,
V_ZAHL3 TYPE STRING,
N_ZAHL3 TYPE STRING,
V_ZAHL4 TYPE STRING,
N_ZAHL4 TYPE STRING,
V_ZAHL5 TYPE STRING,
N_ZAHL5 TYPE STRING,
V_ZAHL6 TYPE STRING,
N_ZAHL6 TYPE STRING,
V_ZWSTDIFF TYPE STRING,
N_ZWSTDIFF TYPE STRING,
COLOGRP_BP_L TYPE STRING,END OF T_EKKO_STR.
DATA: WA_DBERDZ_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_DBERDZ_STR-MANDT sy-vline 
WA_DBERDZ_STR-OPBEL sy-vline 
WA_DBERDZ_STR-BELZEILE sy-vline 
WA_DBERDZ_STR-BUKRS sy-vline 
WA_DBERDZ_STR-KTOSL sy-vline 
WA_DBERDZ_STR-HKONT sy-vline 
WA_DBERDZ_STR-STPRZ sy-vline 
WA_DBERDZ_STR-SBASW sy-vline 
WA_DBERDZ_STR-SBETW sy-vline 
WA_DBERDZ_STR-TXJCD sy-vline 
WA_DBERDZ_STR-HVORG sy-vline 
WA_DBERDZ_STR-SHKZG sy-vline 
WA_DBERDZ_STR-BLDAT sy-vline 
WA_DBERDZ_STR-BUDAT sy-vline 
WA_DBERDZ_STR-FAEDN sy-vline 
WA_DBERDZ_STR-BETRW sy-vline 
WA_DBERDZ_STR-AUGBW sy-vline 
WA_DBERDZ_STR-FAEDS sy-vline 
WA_DBERDZ_STR-SKTOW sy-vline 
WA_DBERDZ_STR-ASKTW sy-vline 
WA_DBERDZ_STR-SKTPZ sy-vline 
WA_DBERDZ_STR-VERTRAG sy-vline 
WA_DBERDZ_STR-ABPOPBEL sy-vline 
WA_DBERDZ_STR-SPARTE sy-vline 
WA_DBERDZ_STR-XTOTAL_AMNT sy-vline 
WA_DBERDZ_STR-AWTYP sy-vline 
WA_DBERDZ_STR-AWKEY sy-vline 
WA_DBERDZ_STR-CA_OPBEL sy-vline 
WA_DBERDZ_STR-TAXRATE_INTERNAL sy-vline 
WA_DBERDZ_STR-CSNO sy-vline 
WA_DBERDZ_STR-BELZART sy-vline 
WA_DBERDZ_STR-ABSLKZ sy-vline 
WA_DBERDZ_STR-DIFFKZ sy-vline 
WA_DBERDZ_STR-BUCHREL sy-vline 
WA_DBERDZ_STR-MENGESTREL sy-vline 
WA_DBERDZ_STR-BETRSTREL sy-vline 
WA_DBERDZ_STR-STGRQNT sy-vline 
WA_DBERDZ_STR-STGRAMT sy-vline 
WA_DBERDZ_STR-PRINTREL sy-vline 
WA_DBERDZ_STR-BRUTTOZEILE sy-vline 
WA_DBERDZ_STR-AKLASSE sy-vline 
WA_DBERDZ_STR-BRANCHE sy-vline 
WA_DBERDZ_STR-TVORG sy-vline 
WA_DBERDZ_STR-GEGEN_TVORG sy-vline 
WA_DBERDZ_STR-LINESORT sy-vline 
WA_DBERDZ_STR-AB sy-vline 
WA_DBERDZ_STR-BIS sy-vline 
WA_DBERDZ_STR-ZEITANT sy-vline 
WA_DBERDZ_STR-TIMTYPZA sy-vline 
WA_DBERDZ_STR-SCHEMANR sy-vline 
WA_DBERDZ_STR-SNO sy-vline 
WA_DBERDZ_STR-PROGRAMM sy-vline 
WA_DBERDZ_STR-EQUNR sy-vline 
WA_DBERDZ_STR-GERAET sy-vline 
WA_DBERDZ_STR-MATNR sy-vline 
WA_DBERDZ_STR-ZWNUMMER sy-vline 
WA_DBERDZ_STR-INDEXNR sy-vline 
WA_DBERDZ_STR-MASSBILL sy-vline 
WA_DBERDZ_STR-MWSKZ sy-vline 
WA_DBERDZ_STR-ERMWSKZ sy-vline 
WA_DBERDZ_STR-NETTOBTR sy-vline 
WA_DBERDZ_STR-TWAERS sy-vline 
WA_DBERDZ_STR-SAISON sy-vline 
WA_DBERDZ_STR-PREISTUF sy-vline 
WA_DBERDZ_STR-PREISTYP sy-vline 
WA_DBERDZ_STR-PREIS sy-vline 
WA_DBERDZ_STR-PREISZUS sy-vline 
WA_DBERDZ_STR-VONZONE sy-vline 
WA_DBERDZ_STR-BISZONE sy-vline 
WA_DBERDZ_STR-ZONENNR sy-vline 
WA_DBERDZ_STR-PREISBTR sy-vline 
WA_DBERDZ_STR-MNGBASIS sy-vline 
WA_DBERDZ_STR-TIMBASIS sy-vline 
WA_DBERDZ_STR-TIMTYP sy-vline 
WA_DBERDZ_STR-PREIGKL sy-vline 
WA_DBERDZ_STR-URPREIS sy-vline 
WA_DBERDZ_STR-PREIADD sy-vline 
WA_DBERDZ_STR-PREIFAKT sy-vline 
WA_DBERDZ_STR-OPMULT sy-vline 
WA_DBERDZ_STR-FRAN_TYPE sy-vline 
WA_DBERDZ_STR-KONZIGR sy-vline 
WA_DBERDZ_STR-ABLESGR sy-vline 
WA_DBERDZ_STR-ABLESGRV sy-vline 
WA_DBERDZ_STR-ATIM sy-vline 
WA_DBERDZ_STR-ATIMVA sy-vline 
WA_DBERDZ_STR-ADATMAX sy-vline 
WA_DBERDZ_STR-ATIMMAX sy-vline 
WA_DBERDZ_STR-TARIFTYP sy-vline 
WA_DBERDZ_STR-TARIFNR sy-vline 
WA_DBERDZ_STR-KONDIGR sy-vline 
WA_DBERDZ_STR-STTARIF sy-vline 
WA_DBERDZ_STR-GEWKEY sy-vline 
WA_DBERDZ_STR-GEWANTZ sy-vline 
WA_DBERDZ_STR-GEWANTN sy-vline 
WA_DBERDZ_STR-LEUCHTNR sy-vline 
WA_DBERDZ_STR-BETRART sy-vline 
WA_DBERDZ_STR-WDHFAKT sy-vline 
WA_DBERDZ_STR-TEMP_AREA sy-vline 
WA_DBERDZ_STR-DRCKSTUF sy-vline 
WA_DBERDZ_STR-THGDATUM sy-vline 
WA_DBERDZ_STR-ZUORDDAT sy-vline 
WA_DBERDZ_STR-SPGRUND sy-vline 
WA_DBERDZ_STR-ABGGRND1 sy-vline 
WA_DBERDZ_STR-ABGGRND2 sy-vline 
WA_DBERDZ_STR-ABGGRND3 sy-vline 
WA_DBERDZ_STR-ABGGRND4 sy-vline 
WA_DBERDZ_STR-ABGGRND5 sy-vline 
WA_DBERDZ_STR-ABGGRND6 sy-vline 
WA_DBERDZ_STR-ABGGRND7 sy-vline 
WA_DBERDZ_STR-ABGGRND8 sy-vline 
WA_DBERDZ_STR-ABGGRND9 sy-vline 
WA_DBERDZ_STR-ABGGRND10 sy-vline 
WA_DBERDZ_STR-EIN01 sy-vline 
WA_DBERDZ_STR-EIN02 sy-vline 
WA_DBERDZ_STR-EIN03 sy-vline 
WA_DBERDZ_STR-EIN04 sy-vline 
WA_DBERDZ_STR-EIN05 sy-vline 
WA_DBERDZ_STR-EIN06 sy-vline 
WA_DBERDZ_STR-EIN07 sy-vline 
WA_DBERDZ_STR-EIN08 sy-vline 
WA_DBERDZ_STR-EIN09 sy-vline 
WA_DBERDZ_STR-EIN10 sy-vline 
WA_DBERDZ_STR-AUS01 sy-vline 
WA_DBERDZ_STR-AUS02 sy-vline 
WA_DBERDZ_STR-AUS03 sy-vline 
WA_DBERDZ_STR-AUS04 sy-vline 
WA_DBERDZ_STR-AUS05 sy-vline 
WA_DBERDZ_STR-MASS1 sy-vline 
WA_DBERDZ_STR-MASS2 sy-vline 
WA_DBERDZ_STR-MASS3 sy-vline 
WA_DBERDZ_STR-MASS4 sy-vline 
WA_DBERDZ_STR-MASS5 sy-vline 
WA_DBERDZ_STR-MASS6 sy-vline 
WA_DBERDZ_STR-DATUM1 sy-vline 
WA_DBERDZ_STR-DATUM2 sy-vline 
WA_DBERDZ_STR-TEXTNR sy-vline 
WA_DBERDZ_STR-TEXTSP sy-vline 
WA_DBERDZ_STR-RABZUS sy-vline 
WA_DBERDZ_STR-BACKCANC01 sy-vline 
WA_DBERDZ_STR-BACKCANC02 sy-vline 
WA_DBERDZ_STR-BACKCANC03 sy-vline 
WA_DBERDZ_STR-BACKCANC04 sy-vline 
WA_DBERDZ_STR-BACKCANC05 sy-vline 
WA_DBERDZ_STR-BACKCANC sy-vline 
WA_DBERDZ_STR-BACKEXEC sy-vline 
WA_DBERDZ_STR-BACKDOCNO sy-vline 
WA_DBERDZ_STR-BACKDOCLINE sy-vline 
WA_DBERDZ_STR-LRATESTEP sy-vline 
WA_DBERDZ_STR-TXDAT_KK sy-vline 
WA_DBERDZ_STR-REGRELSORT sy-vline 
WA_DBERDZ_STR-SC_BELNR sy-vline 
WA_DBERDZ_STR-PEB sy-vline 
WA_DBERDZ_STR-OPLFDNR sy-vline 
WA_DBERDZ_STR-STAFO sy-vline 
WA_DBERDZ_STR-ARTMENGE sy-vline 
WA_DBERDZ_STR-STATTART sy-vline 
WA_DBERDZ_STR-PRCTR sy-vline 
WA_DBERDZ_STR-KOSTL sy-vline 
WA_DBERDZ_STR-PS_PSP_PNR sy-vline 
WA_DBERDZ_STR-AUFNR sy-vline 
WA_DBERDZ_STR-PAOBJNR sy-vline 
WA_DBERDZ_STR-PAOBJNR_S sy-vline 
WA_DBERDZ_STR-GSBER sy-vline 
WA_DBERDZ_STR-APERIODIC sy-vline 
WA_DBERDZ_STR-ABLBELNR sy-vline 
WA_DBERDZ_STR-LOGIKZW sy-vline 
WA_DBERDZ_STR-ISTABLART sy-vline 
WA_DBERDZ_STR-ISTABLARTVA sy-vline 
WA_DBERDZ_STR-EXTPKZ sy-vline 
WA_DBERDZ_STR-BEGPROG sy-vline 
WA_DBERDZ_STR-ENDEPROG sy-vline 
WA_DBERDZ_STR-REFBELZEILE sy-vline 
WA_DBERDZ_STR-SPERRUNG sy-vline 
WA_DBERDZ_STR-TIMECONTRL sy-vline 
WA_DBERDZ_STR-TCNUMTOR sy-vline 
WA_DBERDZ_STR-TCDENOMTOR sy-vline 
WA_DBERDZ_STR-TIMTYPQUOT sy-vline 
WA_DBERDZ_STR-NETTOFRMD sy-vline 
WA_DBERDZ_STR-WAERSF sy-vline 
WA_DBERDZ_STR-UMRECHDAT sy-vline 
WA_DBERDZ_STR-UMRECHKURS sy-vline 
WA_DBERDZ_STR-AKTIV sy-vline 
WA_DBERDZ_STR-REFBELZONE sy-vline 
WA_DBERDZ_STR-ABLHINW sy-vline 
WA_DBERDZ_STR-KONZVER sy-vline 
WA_DBERDZ_STR-REFBILLDOCNO sy-vline 
WA_DBERDZ_STR-PERTYP sy-vline 
WA_DBERDZ_STR-V_ZWSTAND sy-vline 
WA_DBERDZ_STR-N_ZWSTAND sy-vline 
WA_DBERDZ_STR-V_ZWSTNDAB sy-vline 
WA_DBERDZ_STR-N_ZWSTNDAB sy-vline 
WA_DBERDZ_STR-V_ZWSTVOR sy-vline 
WA_DBERDZ_STR-N_ZWSTVOR sy-vline 
WA_DBERDZ_STR-V_ABRMENGE sy-vline 
WA_DBERDZ_STR-N_ABRMENGE sy-vline 
WA_DBERDZ_STR-V_ZAHL1 sy-vline 
WA_DBERDZ_STR-N_ZAHL1 sy-vline 
WA_DBERDZ_STR-V_ZAHL2 sy-vline 
WA_DBERDZ_STR-N_ZAHL2 sy-vline 
WA_DBERDZ_STR-V_ZAHL3 sy-vline 
WA_DBERDZ_STR-N_ZAHL3 sy-vline 
WA_DBERDZ_STR-V_ZAHL4 sy-vline 
WA_DBERDZ_STR-N_ZAHL4 sy-vline 
WA_DBERDZ_STR-V_ZAHL5 sy-vline 
WA_DBERDZ_STR-N_ZAHL5 sy-vline 
WA_DBERDZ_STR-V_ZAHL6 sy-vline 
WA_DBERDZ_STR-N_ZAHL6 sy-vline 
WA_DBERDZ_STR-V_ZWSTDIFF sy-vline 
WA_DBERDZ_STR-N_ZWSTDIFF sy-vline 
WA_DBERDZ_STR-COLOGRP_BP_L sy-vline      INTO ld_text SEPARATED BY SPACE.

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