ABAP Select data from SAP table REIS_CD_L 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 REIS_CD_L 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 REIS_CD_L. 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 REIS_CD_L 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_REIS_CD_L TYPE STANDARD TABLE OF REIS_CD_L,
      WA_REIS_CD_L TYPE REIS_CD_L,
      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: <REIS_CD_L> TYPE REIS_CD_L.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM REIS_CD_L
*  INTO TABLE @DATA(IT_REIS_CD_L2).
*--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_REIS_CD_L INDEX 1 INTO DATA(WA_REIS_CD_L2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<REIS_CD_L>-BUKRS = 1.
<REIS_CD_L>-SWENR = 1.
<REIS_CD_L>-SGENR = 1.
<REIS_CD_L>-SGRNR = 1.
<REIS_CD_L>-NORUPS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_REIS_CD_L-NORS, sy-vline,
  WA_REIS_CD_L-RECNNR, sy-vline,
  WA_REIS_CD_L-OBJECTID, sy-vline,
  WA_REIS_CD_L-OBJECTTEXT, sy-vline,
  WA_REIS_CD_L-OBJECTICON, sy-vline,
  WA_REIS_CD_L-OBJECT_VALIDFROM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_REIS_CD_L 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_REIS_CD_L 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_REIS_CD_L INTO WA_REIS_CD_L.


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

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

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

*Conversion exit SMENR, internal->external for field NORUPS
CALL FUNCTION 'CONVERSION_EXIT_SMENR_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CD_L-NORUPS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CD_L-NORUPS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SMENR, internal->external for field NORS
CALL FUNCTION 'CONVERSION_EXIT_SMENR_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CD_L-NORS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CD_L-NORS.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit REDAT, internal->external for field OBJECT_VALIDTO
CALL FUNCTION 'CONVERSION_EXIT_REDAT_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CD_L-OBJECT_VALIDTO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CD_L-OBJECT_VALIDTO.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit REDAT, internal->external for field CONDVALIDTO
CALL FUNCTION 'CONVERSION_EXIT_REDAT_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CD_L-CONDVALIDTO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CD_L-CONDVALIDTO.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit REDAT, internal->external for field REL_VALIDTO
CALL FUNCTION 'CONVERSION_EXIT_REDAT_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CD_L-REL_VALIDTO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CD_L-REL_VALIDTO.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit SWENR, internal->external for field BENOCN
CALL FUNCTION 'CONVERSION_EXIT_SWENR_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CD_L-BENOCN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CD_L-BENOCN.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ABPSP, internal->external for field PSPNR
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CD_L-PSPNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CD_L-PSPNR.
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_REIS_CD_L_STR, 
BUKRS TYPE STRING,
SWENR TYPE STRING,
SGENR TYPE STRING,
SGRNR TYPE STRING,
NORUPS TYPE STRING,
NORS TYPE STRING,
RECNNR TYPE STRING,
OBJECTID TYPE STRING,
OBJECTTEXT TYPE STRING,
OBJECTICON TYPE STRING,
OBJECT_VALIDFROM TYPE STRING,
OBJECT_VALIDTO TYPE STRING,
OBJECT_POSSDATEFROM TYPE STRING,
OBJECT_POSSDATETO TYPE STRING,
CONDTYPE TYPE STRING,
CONDVALIDFROM TYPE STRING,
CONDVALIDTO TYPE STRING,
UNIQUECOND TYPE STRING,
INFOCOND TYPE STRING,
UNITPRICE TYPE STRING,
CALCRULE TYPE STRING,
CALCRULEPARA1 TYPE STRING,
CALCRULEPARA2 TYPE STRING,
DISTRULE TYPE STRING,
DISTRULEPARA1 TYPE STRING,
DISTRULEPARA2 TYPE STRING,
OBJTYPEDISTDIST TYPE STRING,
OBJTYPEDISTPOST TYPE STRING,
CONDPURPOSEEXT TYPE STRING,
CHGREASON TYPE STRING,
OBJNRCALCPARA TYPE STRING,
OBJNRDISTPARA TYPE STRING,
XMCALCRULE TYPE STRING,
XMDISTRULE TYPE STRING,
CALCVALUEUNIT TYPE STRING,
UNITPRICEUNIT TYPE STRING,
OBJTXTCALC TYPE STRING,
OBJIDCALC TYPE STRING,
OBJIDENTCALC TYPE STRING,
OBJTYPECALC TYPE STRING,
CALCRULEPARA1DES TYPE STRING,
CALCRULEPARA2DES TYPE STRING,
CALCRULEPARA1INF TYPE STRING,
CALCRULEPARA2INF TYPE STRING,
OBJTXTDIST TYPE STRING,
OBJIDDIST TYPE STRING,
OBJIDENTDIST TYPE STRING,
OBJTYPEDIST TYPE STRING,
DISTRULEPARA1DES TYPE STRING,
DISTRULEPARA2DES TYPE STRING,
DISTRULEPARA1INF TYPE STRING,
DISTRULEPARA2INF TYPE STRING,
CONDNUMBER TYPE STRING,
XCONDITION TYPE STRING,
XMCONDPURPOSEEXT TYPE STRING,
XCONDCURR TYPE STRING,
XTERMTYPEPY TYPE STRING,
XTERMPY TYPE STRING,
XTERMTYPERH TYPE STRING,
XTERMRH TYPE STRING,
XTERMTYPEAJ TYPE STRING,
XTERMAJ TYPE STRING,
XTERMTYPEOA TYPE STRING,
XTERMOA TYPE STRING,
XTERMTYPESR TYPE STRING,
XTERMSR TYPE STRING,
XTERMTYPEMR TYPE STRING,
XTERMMR TYPE STRING,
XTERMTYPEWT TYPE STRING,
XTERMWT TYPE STRING,
XTERMTYPEPYSCS TYPE STRING,
XTERMPYSCS TYPE STRING,
XTAXTYPE TYPE STRING,
XTAXGROUP TYPE STRING,
COMPARENRCALC TYPE STRING,
COMPARENRDIST TYPE STRING,
ADVANCEPAYMENT TYPE STRING,
SCSRELATED TYPE STRING,
FLATRATE TYPE STRING,
BOOKFROM_PAY TYPE STRING,
BOOKTO_PAY TYPE STRING,
BOOKED_PAY TYPE STRING,
BOOKFROM_OBJ TYPE STRING,
BOOKTO_OBJ TYPE STRING,
BOOKED_OBJ TYPE STRING,
PARTNER TYPE STRING,
PARTNEROBJNR TYPE STRING,
TAXTYPE TYPE STRING,
TAXGROUP TYPE STRING,
TAXCOUNTRY TYPE STRING,
ISGROSS TYPE STRING,
TXJCD TYPE STRING,
FREQUENCY TYPE STRING,
FREQUENCYUNIT TYPE STRING,
WEEKFROM TYPE STRING,
MONTHFROM TYPE STRING,
CONDVALUEREFER TYPE STRING,
CONDVALUEREFDIF TYPE STRING,
PRORATE TYPE STRING,
CALCMETHPER TYPE STRING,
PAYMENTFORM TYPE STRING,
ORDERDISPLAY TYPE STRING,
CONDVALIDFROMFIRST TYPE STRING,
XCHGREASON TYPE STRING,
CALCDUEDATEUC TYPE STRING,
CALCRULEINT TYPE STRING,
ISCASHFLOWRELEVANT TYPE STRING,
CONDABSENDDATE TYPE STRING,
CONDABSBEGDATE TYPE STRING,
FLEXIBLEFROM TYPE STRING,
FLEXIBLETO TYPE STRING,
ISFLEXIBLE TYPE STRING,
FIXPER TYPE STRING,
ROLE_BP1 TYPE STRING,
XROLE_BP1 TYPE STRING,
PARTNER_BP1 TYPE STRING,
XPARTNER_BP1 TYPE STRING,
TEL_NUMBER_LONG_BP1 TYPE STRING,
FAX_NUMBER_LONG_BP1 TYPE STRING,
SMTP_ADDR_BP1 TYPE STRING,
XNAME_BP1 TYPE STRING,
STREET_BP1 TYPE STRING,
HOUSE_NUM1_BP1 TYPE STRING,
POST_CODE1_BP1 TYPE STRING,
CITY1_BP1 TYPE STRING,
CITY2_BP1 TYPE STRING,
REGION_BP1 TYPE STRING,
PO_BOX_BP1 TYPE STRING,
POST_CODE2_BP1 TYPE STRING,
ROLECAT_BP1 TYPE STRING,
ADDRTYPE_BP1 TYPE STRING,
HOUSE_NUM2_BP1 TYPE STRING,
ROLE_BP2 TYPE STRING,
XROLE_BP2 TYPE STRING,
PARTNER_BP2 TYPE STRING,
XPARTNER_BP2 TYPE STRING,
TEL_NUMBER_LONG_BP2 TYPE STRING,
FAX_NUMBER_LONG_BP2 TYPE STRING,
SMTP_ADDR_BP2 TYPE STRING,
XNAME_BP2 TYPE STRING,
STREET_BP2 TYPE STRING,
HOUSE_NUM1_BP2 TYPE STRING,
POST_CODE1_BP2 TYPE STRING,
CITY1_BP2 TYPE STRING,
CITY2_BP2 TYPE STRING,
REGION_BP2 TYPE STRING,
PO_BOX_BP2 TYPE STRING,
POST_CODE2_BP2 TYPE STRING,
ROLECAT_BP2 TYPE STRING,
ADDRTYPE_BP2 TYPE STRING,
HOUSE_NUM2_BP2 TYPE STRING,
CONDVALUE TYPE STRING,
CALCVALUE TYPE STRING,
CONDCURR TYPE STRING,
OBJNRCALC TYPE STRING,
OBJNRDIST TYPE STRING,
REL_VALIDFROM TYPE STRING,
REL_VALIDTO TYPE STRING,
FREQUENCYUNITTXT TYPE STRING,
CONDVALUEMONTH TYPE STRING,
TAXVALUEMONTH TYPE STRING,
CONDVALUEYEAR TYPE STRING,
TAXVALUEYEAR TYPE STRING,
CTLCCONDVALUE TYPE STRING,
CTLCCONDVALUEMONTH TYPE STRING,
CTLCTAXVALUEMONTH TYPE STRING,
CTLCCONDVALUEYEAR TYPE STRING,
CTLCTAXVALUEYEAR TYPE STRING,
CTLCCURRKEY TYPE STRING,
XPAYMENTFORMRH TYPE STRING,
RECNDPO TYPE STRING,
RECISVALIDFROM TYPE STRING,
RECISVALIDTO TYPE STRING,
GEN_OBJTYPE TYPE STRING,
GEN_OBJNR TYPE STRING,
GEN_CONTRACT TYPE STRING,
GEN_PARTNER1 TYPE STRING,
GEN_PARTNER2 TYPE STRING,
ALVROWS TYPE STRING,
GROSSVALUEMONTH TYPE STRING,
GROSSVALUEYEAR TYPE STRING,
XPARTNER TYPE STRING,
TERMNOPY TYPE STRING,
TERMNORH TYPE STRING,
TERMNOAJ TYPE STRING,
TERMNOOA TYPE STRING,
TERMNOSR TYPE STRING,
TERMNOMR TYPE STRING,
TERMNOWT TYPE STRING,
CONDGUID TYPE STRING,
OIACCOUNTTYPE TYPE STRING,
OIACCOUNT TYPE STRING,
BENOCN TYPE STRING,
TAXCODE TYPE STRING,
KOSTL TYPE STRING,
KOSTLX TYPE STRING,
AUFNR TYPE STRING,
AUFNRX TYPE STRING,
PSPNR TYPE STRING,
PSPNRX TYPE STRING,END OF T_EKKO_STR.
DATA: WA_REIS_CD_L_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_REIS_CD_L_STR-BUKRS sy-vline 
WA_REIS_CD_L_STR-SWENR sy-vline 
WA_REIS_CD_L_STR-SGENR sy-vline 
WA_REIS_CD_L_STR-SGRNR sy-vline 
WA_REIS_CD_L_STR-NORUPS sy-vline 
WA_REIS_CD_L_STR-NORS sy-vline 
WA_REIS_CD_L_STR-RECNNR sy-vline 
WA_REIS_CD_L_STR-OBJECTID sy-vline 
WA_REIS_CD_L_STR-OBJECTTEXT sy-vline 
WA_REIS_CD_L_STR-OBJECTICON sy-vline 
WA_REIS_CD_L_STR-OBJECT_VALIDFROM sy-vline 
WA_REIS_CD_L_STR-OBJECT_VALIDTO sy-vline 
WA_REIS_CD_L_STR-OBJECT_POSSDATEFROM sy-vline 
WA_REIS_CD_L_STR-OBJECT_POSSDATETO sy-vline 
WA_REIS_CD_L_STR-CONDTYPE sy-vline 
WA_REIS_CD_L_STR-CONDVALIDFROM sy-vline 
WA_REIS_CD_L_STR-CONDVALIDTO sy-vline 
WA_REIS_CD_L_STR-UNIQUECOND sy-vline 
WA_REIS_CD_L_STR-INFOCOND sy-vline 
WA_REIS_CD_L_STR-UNITPRICE sy-vline 
WA_REIS_CD_L_STR-CALCRULE sy-vline 
WA_REIS_CD_L_STR-CALCRULEPARA1 sy-vline 
WA_REIS_CD_L_STR-CALCRULEPARA2 sy-vline 
WA_REIS_CD_L_STR-DISTRULE sy-vline 
WA_REIS_CD_L_STR-DISTRULEPARA1 sy-vline 
WA_REIS_CD_L_STR-DISTRULEPARA2 sy-vline 
WA_REIS_CD_L_STR-OBJTYPEDISTDIST sy-vline 
WA_REIS_CD_L_STR-OBJTYPEDISTPOST sy-vline 
WA_REIS_CD_L_STR-CONDPURPOSEEXT sy-vline 
WA_REIS_CD_L_STR-CHGREASON sy-vline 
WA_REIS_CD_L_STR-OBJNRCALCPARA sy-vline 
WA_REIS_CD_L_STR-OBJNRDISTPARA sy-vline 
WA_REIS_CD_L_STR-XMCALCRULE sy-vline 
WA_REIS_CD_L_STR-XMDISTRULE sy-vline 
WA_REIS_CD_L_STR-CALCVALUEUNIT sy-vline 
WA_REIS_CD_L_STR-UNITPRICEUNIT sy-vline 
WA_REIS_CD_L_STR-OBJTXTCALC sy-vline 
WA_REIS_CD_L_STR-OBJIDCALC sy-vline 
WA_REIS_CD_L_STR-OBJIDENTCALC sy-vline 
WA_REIS_CD_L_STR-OBJTYPECALC sy-vline 
WA_REIS_CD_L_STR-CALCRULEPARA1DES sy-vline 
WA_REIS_CD_L_STR-CALCRULEPARA2DES sy-vline 
WA_REIS_CD_L_STR-CALCRULEPARA1INF sy-vline 
WA_REIS_CD_L_STR-CALCRULEPARA2INF sy-vline 
WA_REIS_CD_L_STR-OBJTXTDIST sy-vline 
WA_REIS_CD_L_STR-OBJIDDIST sy-vline 
WA_REIS_CD_L_STR-OBJIDENTDIST sy-vline 
WA_REIS_CD_L_STR-OBJTYPEDIST sy-vline 
WA_REIS_CD_L_STR-DISTRULEPARA1DES sy-vline 
WA_REIS_CD_L_STR-DISTRULEPARA2DES sy-vline 
WA_REIS_CD_L_STR-DISTRULEPARA1INF sy-vline 
WA_REIS_CD_L_STR-DISTRULEPARA2INF sy-vline 
WA_REIS_CD_L_STR-CONDNUMBER sy-vline 
WA_REIS_CD_L_STR-XCONDITION sy-vline 
WA_REIS_CD_L_STR-XMCONDPURPOSEEXT sy-vline 
WA_REIS_CD_L_STR-XCONDCURR sy-vline 
WA_REIS_CD_L_STR-XTERMTYPEPY sy-vline 
WA_REIS_CD_L_STR-XTERMPY sy-vline 
WA_REIS_CD_L_STR-XTERMTYPERH sy-vline 
WA_REIS_CD_L_STR-XTERMRH sy-vline 
WA_REIS_CD_L_STR-XTERMTYPEAJ sy-vline 
WA_REIS_CD_L_STR-XTERMAJ sy-vline 
WA_REIS_CD_L_STR-XTERMTYPEOA sy-vline 
WA_REIS_CD_L_STR-XTERMOA sy-vline 
WA_REIS_CD_L_STR-XTERMTYPESR sy-vline 
WA_REIS_CD_L_STR-XTERMSR sy-vline 
WA_REIS_CD_L_STR-XTERMTYPEMR sy-vline 
WA_REIS_CD_L_STR-XTERMMR sy-vline 
WA_REIS_CD_L_STR-XTERMTYPEWT sy-vline 
WA_REIS_CD_L_STR-XTERMWT sy-vline 
WA_REIS_CD_L_STR-XTERMTYPEPYSCS sy-vline 
WA_REIS_CD_L_STR-XTERMPYSCS sy-vline 
WA_REIS_CD_L_STR-XTAXTYPE sy-vline 
WA_REIS_CD_L_STR-XTAXGROUP sy-vline 
WA_REIS_CD_L_STR-COMPARENRCALC sy-vline 
WA_REIS_CD_L_STR-COMPARENRDIST sy-vline 
WA_REIS_CD_L_STR-ADVANCEPAYMENT sy-vline 
WA_REIS_CD_L_STR-SCSRELATED sy-vline 
WA_REIS_CD_L_STR-FLATRATE sy-vline 
WA_REIS_CD_L_STR-BOOKFROM_PAY sy-vline 
WA_REIS_CD_L_STR-BOOKTO_PAY sy-vline 
WA_REIS_CD_L_STR-BOOKED_PAY sy-vline 
WA_REIS_CD_L_STR-BOOKFROM_OBJ sy-vline 
WA_REIS_CD_L_STR-BOOKTO_OBJ sy-vline 
WA_REIS_CD_L_STR-BOOKED_OBJ sy-vline 
WA_REIS_CD_L_STR-PARTNER sy-vline 
WA_REIS_CD_L_STR-PARTNEROBJNR sy-vline 
WA_REIS_CD_L_STR-TAXTYPE sy-vline 
WA_REIS_CD_L_STR-TAXGROUP sy-vline 
WA_REIS_CD_L_STR-TAXCOUNTRY sy-vline 
WA_REIS_CD_L_STR-ISGROSS sy-vline 
WA_REIS_CD_L_STR-TXJCD sy-vline 
WA_REIS_CD_L_STR-FREQUENCY sy-vline 
WA_REIS_CD_L_STR-FREQUENCYUNIT sy-vline 
WA_REIS_CD_L_STR-WEEKFROM sy-vline 
WA_REIS_CD_L_STR-MONTHFROM sy-vline 
WA_REIS_CD_L_STR-CONDVALUEREFER sy-vline 
WA_REIS_CD_L_STR-CONDVALUEREFDIF sy-vline 
WA_REIS_CD_L_STR-PRORATE sy-vline 
WA_REIS_CD_L_STR-CALCMETHPER sy-vline 
WA_REIS_CD_L_STR-PAYMENTFORM sy-vline 
WA_REIS_CD_L_STR-ORDERDISPLAY sy-vline 
WA_REIS_CD_L_STR-CONDVALIDFROMFIRST sy-vline 
WA_REIS_CD_L_STR-XCHGREASON sy-vline 
WA_REIS_CD_L_STR-CALCDUEDATEUC sy-vline 
WA_REIS_CD_L_STR-CALCRULEINT sy-vline 
WA_REIS_CD_L_STR-ISCASHFLOWRELEVANT sy-vline 
WA_REIS_CD_L_STR-CONDABSENDDATE sy-vline 
WA_REIS_CD_L_STR-CONDABSBEGDATE sy-vline 
WA_REIS_CD_L_STR-FLEXIBLEFROM sy-vline 
WA_REIS_CD_L_STR-FLEXIBLETO sy-vline 
WA_REIS_CD_L_STR-ISFLEXIBLE sy-vline 
WA_REIS_CD_L_STR-FIXPER sy-vline 
WA_REIS_CD_L_STR-ROLE_BP1 sy-vline 
WA_REIS_CD_L_STR-XROLE_BP1 sy-vline 
WA_REIS_CD_L_STR-PARTNER_BP1 sy-vline 
WA_REIS_CD_L_STR-XPARTNER_BP1 sy-vline 
WA_REIS_CD_L_STR-TEL_NUMBER_LONG_BP1 sy-vline 
WA_REIS_CD_L_STR-FAX_NUMBER_LONG_BP1 sy-vline 
WA_REIS_CD_L_STR-SMTP_ADDR_BP1 sy-vline 
WA_REIS_CD_L_STR-XNAME_BP1 sy-vline 
WA_REIS_CD_L_STR-STREET_BP1 sy-vline 
WA_REIS_CD_L_STR-HOUSE_NUM1_BP1 sy-vline 
WA_REIS_CD_L_STR-POST_CODE1_BP1 sy-vline 
WA_REIS_CD_L_STR-CITY1_BP1 sy-vline 
WA_REIS_CD_L_STR-CITY2_BP1 sy-vline 
WA_REIS_CD_L_STR-REGION_BP1 sy-vline 
WA_REIS_CD_L_STR-PO_BOX_BP1 sy-vline 
WA_REIS_CD_L_STR-POST_CODE2_BP1 sy-vline 
WA_REIS_CD_L_STR-ROLECAT_BP1 sy-vline 
WA_REIS_CD_L_STR-ADDRTYPE_BP1 sy-vline 
WA_REIS_CD_L_STR-HOUSE_NUM2_BP1 sy-vline 
WA_REIS_CD_L_STR-ROLE_BP2 sy-vline 
WA_REIS_CD_L_STR-XROLE_BP2 sy-vline 
WA_REIS_CD_L_STR-PARTNER_BP2 sy-vline 
WA_REIS_CD_L_STR-XPARTNER_BP2 sy-vline 
WA_REIS_CD_L_STR-TEL_NUMBER_LONG_BP2 sy-vline 
WA_REIS_CD_L_STR-FAX_NUMBER_LONG_BP2 sy-vline 
WA_REIS_CD_L_STR-SMTP_ADDR_BP2 sy-vline 
WA_REIS_CD_L_STR-XNAME_BP2 sy-vline 
WA_REIS_CD_L_STR-STREET_BP2 sy-vline 
WA_REIS_CD_L_STR-HOUSE_NUM1_BP2 sy-vline 
WA_REIS_CD_L_STR-POST_CODE1_BP2 sy-vline 
WA_REIS_CD_L_STR-CITY1_BP2 sy-vline 
WA_REIS_CD_L_STR-CITY2_BP2 sy-vline 
WA_REIS_CD_L_STR-REGION_BP2 sy-vline 
WA_REIS_CD_L_STR-PO_BOX_BP2 sy-vline 
WA_REIS_CD_L_STR-POST_CODE2_BP2 sy-vline 
WA_REIS_CD_L_STR-ROLECAT_BP2 sy-vline 
WA_REIS_CD_L_STR-ADDRTYPE_BP2 sy-vline 
WA_REIS_CD_L_STR-HOUSE_NUM2_BP2 sy-vline 
WA_REIS_CD_L_STR-CONDVALUE sy-vline 
WA_REIS_CD_L_STR-CALCVALUE sy-vline 
WA_REIS_CD_L_STR-CONDCURR sy-vline 
WA_REIS_CD_L_STR-OBJNRCALC sy-vline 
WA_REIS_CD_L_STR-OBJNRDIST sy-vline 
WA_REIS_CD_L_STR-REL_VALIDFROM sy-vline 
WA_REIS_CD_L_STR-REL_VALIDTO sy-vline 
WA_REIS_CD_L_STR-FREQUENCYUNITTXT sy-vline 
WA_REIS_CD_L_STR-CONDVALUEMONTH sy-vline 
WA_REIS_CD_L_STR-TAXVALUEMONTH sy-vline 
WA_REIS_CD_L_STR-CONDVALUEYEAR sy-vline 
WA_REIS_CD_L_STR-TAXVALUEYEAR sy-vline 
WA_REIS_CD_L_STR-CTLCCONDVALUE sy-vline 
WA_REIS_CD_L_STR-CTLCCONDVALUEMONTH sy-vline 
WA_REIS_CD_L_STR-CTLCTAXVALUEMONTH sy-vline 
WA_REIS_CD_L_STR-CTLCCONDVALUEYEAR sy-vline 
WA_REIS_CD_L_STR-CTLCTAXVALUEYEAR sy-vline 
WA_REIS_CD_L_STR-CTLCCURRKEY sy-vline 
WA_REIS_CD_L_STR-XPAYMENTFORMRH sy-vline 
WA_REIS_CD_L_STR-RECNDPO sy-vline 
WA_REIS_CD_L_STR-RECISVALIDFROM sy-vline 
WA_REIS_CD_L_STR-RECISVALIDTO sy-vline 
WA_REIS_CD_L_STR-GEN_OBJTYPE sy-vline 
WA_REIS_CD_L_STR-GEN_OBJNR sy-vline 
WA_REIS_CD_L_STR-GEN_CONTRACT sy-vline 
WA_REIS_CD_L_STR-GEN_PARTNER1 sy-vline 
WA_REIS_CD_L_STR-GEN_PARTNER2 sy-vline 
WA_REIS_CD_L_STR-ALVROWS sy-vline 
WA_REIS_CD_L_STR-GROSSVALUEMONTH sy-vline 
WA_REIS_CD_L_STR-GROSSVALUEYEAR sy-vline 
WA_REIS_CD_L_STR-XPARTNER sy-vline 
WA_REIS_CD_L_STR-TERMNOPY sy-vline 
WA_REIS_CD_L_STR-TERMNORH sy-vline 
WA_REIS_CD_L_STR-TERMNOAJ sy-vline 
WA_REIS_CD_L_STR-TERMNOOA sy-vline 
WA_REIS_CD_L_STR-TERMNOSR sy-vline 
WA_REIS_CD_L_STR-TERMNOMR sy-vline 
WA_REIS_CD_L_STR-TERMNOWT sy-vline 
WA_REIS_CD_L_STR-CONDGUID sy-vline 
WA_REIS_CD_L_STR-OIACCOUNTTYPE sy-vline 
WA_REIS_CD_L_STR-OIACCOUNT sy-vline 
WA_REIS_CD_L_STR-BENOCN sy-vline 
WA_REIS_CD_L_STR-TAXCODE sy-vline 
WA_REIS_CD_L_STR-KOSTL sy-vline 
WA_REIS_CD_L_STR-KOSTLX sy-vline 
WA_REIS_CD_L_STR-AUFNR sy-vline 
WA_REIS_CD_L_STR-AUFNRX sy-vline 
WA_REIS_CD_L_STR-PSPNR sy-vline 
WA_REIS_CD_L_STR-PSPNRX sy-vline      INTO ld_text SEPARATED BY SPACE.

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