ABAP Select data from SAP table REIS_CN_DP_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_CN_DP_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_CN_DP_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_CN_DP_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_CN_DP_L TYPE STANDARD TABLE OF REIS_CN_DP_L,
      WA_REIS_CN_DP_L TYPE REIS_CN_DP_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_CN_DP_L> TYPE REIS_CN_DP_L.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM REIS_CN_DP_L
*  INTO TABLE @DATA(IT_REIS_CN_DP_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_CN_DP_L INDEX 1 INTO DATA(WA_REIS_CN_DP_L2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<REIS_CN_DP_L>-GEN_OBJTYPE = 1.
<REIS_CN_DP_L>-GEN_OBJNR = 1.
<REIS_CN_DP_L>-GEN_CONTRACT = 1.
<REIS_CN_DP_L>-GEN_PARTNER1 = 1.
<REIS_CN_DP_L>-GEN_PARTNER2 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_REIS_CN_DP_L-ALVROWS, sy-vline,
  WA_REIS_CN_DP_L-DPBUKRS, sy-vline,
  WA_REIS_CN_DP_L-DPNO, sy-vline,
  WA_REIS_CN_DP_L-DPSECBUKRS, sy-vline,
  WA_REIS_CN_DP_L-DPSECNO, sy-vline,
  WA_REIS_CN_DP_L-DPBEG, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_REIS_CN_DP_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_CN_DP_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_CN_DP_L INTO WA_REIS_CN_DP_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 ALPHA, internal->external for field GEN_PARTNER1
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CN_DP_L-GEN_PARTNER1
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CN_DP_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_CN_DP_L-GEN_PARTNER2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CN_DP_L-GEN_PARTNER2.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit REDAT, internal->external for field DPACTUALRETODATEADP
CALL FUNCTION 'CONVERSION_EXIT_REDAT_OUTPUT'
  EXPORTING
    input =                      WA_REIS_CN_DP_L-DPACTUALRETODATEADP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REIS_CN_DP_L-DPACTUALRETODATEADP.
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_CN_DP_L_STR, 
GEN_OBJTYPE TYPE STRING,
GEN_OBJNR TYPE STRING,
GEN_CONTRACT TYPE STRING,
GEN_PARTNER1 TYPE STRING,
GEN_PARTNER2 TYPE STRING,
ALVROWS TYPE STRING,
DPBUKRS TYPE STRING,
DPNO TYPE STRING,
DPSECBUKRS TYPE STRING,
DPSECNO TYPE STRING,
DPBEG TYPE STRING,
DPEND TYPE STRING,
DPTARGETTYPE TYPE STRING,
DPTARGETBEG TYPE STRING,
DPTARGETEND TYPE STRING,
DPCALCUVALUE TYPE STRING,
DPAGREEVALUE TYPE STRING,
DPCALCUCURR TYPE STRING,
DPAGREECURR TYPE STRING,
DPDIFFVALUE TYPE STRING,
DPDIFFCURR TYPE STRING,
DPACTUALVALUE TYPE STRING,
DPACTUALCURR TYPE STRING,
XDPTARGETTYPE TYPE STRING,
DPTXT TYPE STRING,
DPSECTXT TYPE STRING,
DPSTATUS TYPE STRING,
XDPACTUALTYPE TYPE STRING,
RECISVALIDFROM TYPE STRING,
RECISVALIDTO TYPE STRING,
DPRETOUREDCURR TYPE STRING,
DPRETOUREDVALUE TYPE STRING,
DPRETAINEDCURR TYPE STRING,
DPRETAINEDVALUE TYPE STRING,
DPLCURRKEY TYPE STRING,
DPAGREELVALUE TYPE STRING,
DPAGREELCURR TYPE STRING,
DPCALCULVALUE TYPE STRING,
DPCALCULCURR TYPE STRING,
DPACTUALLVALUE TYPE STRING,
DPACTUALLCURR TYPE STRING,
DPRETOUREDLVALUE TYPE STRING,
DPRETOUREDLCURR TYPE STRING,
DPRETOUREDLICON TYPE STRING,
DPRETAINEDLVALUE TYPE STRING,
DPRETAINEDLCURR TYPE STRING,
DPRETAINEDLICON TYPE STRING,
DPDIFFLVALUE TYPE STRING,
DPDIFFLCURR TYPE STRING,
DPAGREELICON TYPE STRING,
DPCALCLICON TYPE STRING,
DPACTUALLICON TYPE STRING,
DPTRANSDATE TYPE STRING,
DPTOLOCALCURR TYPE STRING,
DPTOFOREIGNCURR TYPE STRING,
DPRETAINEDICON TYPE STRING,
DPRETOUREDICON TYPE STRING,
DPACTUALICON TYPE STRING,
DPPARTNERROLE1 TYPE STRING,
DPPARTNERXROLE1 TYPE STRING,
DPPARTNER1 TYPE STRING,
XDPPARTNER1 TYPE STRING,
DPPARTNERTELNUMBERLONG1 TYPE STRING,
DPPARTNERFAXNUMBERLONG1 TYPE STRING,
DPPARTNERSMTPADDR1 TYPE STRING,
XDPPARTNERNAME1 TYPE STRING,
DPPARTNERSTREET1 TYPE STRING,
DPPARTNERHOUSENUM11 TYPE STRING,
DPPARTNERPOSTCODE11 TYPE STRING,
DPPARTNERCITY11 TYPE STRING,
DPPARTNERCITY21 TYPE STRING,
DPPARTNERREGION1 TYPE STRING,
DPPARTNERPOBOX1 TYPE STRING,
DPPARTNERPOSTCODE21 TYPE STRING,
DPPARTNERROLE2 TYPE STRING,
DPPARTNERXROLE2 TYPE STRING,
DPPARTNER2 TYPE STRING,
XDPPARTNER2 TYPE STRING,
DPPARTNERTELNUMBERLONG2 TYPE STRING,
DPPARTNERFAXNUMBERLONG2 TYPE STRING,
DPPARTNERSMTPADDR2 TYPE STRING,
XDPPARTNERNAME2 TYPE STRING,
DPPARTNERSTREET2 TYPE STRING,
DPPARTNERHOUSENUM12 TYPE STRING,
DPPARTNERPOSTCODE12 TYPE STRING,
DPPARTNERCITY12 TYPE STRING,
DPPARTNERCITY22 TYPE STRING,
DPPARTNERREGION2 TYPE STRING,
DPPARTNERPOBOX2 TYPE STRING,
DPPARTNERPOSTCODE22 TYPE STRING,
DPSECPARTNERROLE1 TYPE STRING,
DPSECPARTNERXROLE1 TYPE STRING,
DPSECPARTNER1 TYPE STRING,
XDPSECPARTNER1 TYPE STRING,
DPSECPARTNERTELNUMBERLONG1 TYPE STRING,
DPSECPARTNERFAXNUMBERLONG1 TYPE STRING,
DPSECPARTNERSMTPADDR1 TYPE STRING,
XDPSECPARTNERNAME1 TYPE STRING,
DPSECPARTNERSTREET1 TYPE STRING,
DPSECPARTNERHOUSENUM11 TYPE STRING,
DPSECPARTNERPOSTCODE11 TYPE STRING,
DPSECPARTNERCITY11 TYPE STRING,
DPSECPARTNERCITY21 TYPE STRING,
DPSECPARTNERREGION1 TYPE STRING,
DPSECPARTNERPOBOX1 TYPE STRING,
DPSECPARTNERPOSTCODE21 TYPE STRING,
DPSECPARTNERROLE2 TYPE STRING,
DPSECPARTNERXROLE2 TYPE STRING,
DPSECPARTNER2 TYPE STRING,
XDPSECPARTNER2 TYPE STRING,
DPSECPARTNERTELNUMBERLONG2 TYPE STRING,
DPSECPARTNERFAXNUMBERLONG2 TYPE STRING,
DPSECPARTNERSMTPADDR2 TYPE STRING,
XDPSECPARTNERNAME2 TYPE STRING,
DPSECPARTNERSTREET2 TYPE STRING,
DPSECPARTNERHOUSENUM12 TYPE STRING,
DPSECPARTNERPOSTCODE12 TYPE STRING,
DPSECPARTNERCITY12 TYPE STRING,
DPSECPARTNERCITY22 TYPE STRING,
DPSECPARTNERREGION2 TYPE STRING,
DPSECPARTNERPOBOX2 TYPE STRING,
DPSECPARTNERPOSTCODE22 TYPE STRING,
DPACTUALPARTNERROLE TYPE STRING,
DPACTUALPARTNERXROLE TYPE STRING,
XDPACTUALPARTNER TYPE STRING,
DPACTUALPARTNERTELNUMBERLONG TYPE STRING,
DPACTUALPARTNERFAXNUMBERLONG TYPE STRING,
DPACTUALPARTNERSMTPADDR TYPE STRING,
XDPACTUALPARTNERNAME TYPE STRING,
DPACTUALPARTNERSTREET TYPE STRING,
DPACTUALPARTNERHOUSENUM1 TYPE STRING,
DPACTUALPARTNERPOSTCODE1 TYPE STRING,
DPACTUALPARTNERCITY1 TYPE STRING,
DPACTUALPARTNERCITY2 TYPE STRING,
DPACTUALPARTNERREGION TYPE STRING,
DPACTUALPARTNERPOBOX TYPE STRING,
DPACTUALPARTNERPOSTCODE2 TYPE STRING,
DPACTUALFROMADP TYPE STRING,
DPACTUALTYPEADP TYPE STRING,
DPACTUALINFONUMADP TYPE STRING,
DPACTUALPLACEADP TYPE STRING,
DPACTUALPARTNERADP TYPE STRING,
DPACPARTNERROLEADP TYPE STRING,
DPACTUALTOADP TYPE STRING,
DPACTUALCOMPLADP TYPE STRING,
DPACTUALRECEIVEDADP TYPE STRING,
DPACTUALRETOUREDADP TYPE STRING,
DPACTUALRETODATEADP TYPE STRING,
DPACTUALRETAINEDADP TYPE STRING,
DPACTUALCURRADP TYPE STRING,END OF T_EKKO_STR.
DATA: WA_REIS_CN_DP_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_CN_DP_L_STR-GEN_OBJTYPE sy-vline 
WA_REIS_CN_DP_L_STR-GEN_OBJNR sy-vline 
WA_REIS_CN_DP_L_STR-GEN_CONTRACT sy-vline 
WA_REIS_CN_DP_L_STR-GEN_PARTNER1 sy-vline 
WA_REIS_CN_DP_L_STR-GEN_PARTNER2 sy-vline 
WA_REIS_CN_DP_L_STR-ALVROWS sy-vline 
WA_REIS_CN_DP_L_STR-DPBUKRS sy-vline 
WA_REIS_CN_DP_L_STR-DPNO sy-vline 
WA_REIS_CN_DP_L_STR-DPSECBUKRS sy-vline 
WA_REIS_CN_DP_L_STR-DPSECNO sy-vline 
WA_REIS_CN_DP_L_STR-DPBEG sy-vline 
WA_REIS_CN_DP_L_STR-DPEND sy-vline 
WA_REIS_CN_DP_L_STR-DPTARGETTYPE sy-vline 
WA_REIS_CN_DP_L_STR-DPTARGETBEG sy-vline 
WA_REIS_CN_DP_L_STR-DPTARGETEND sy-vline 
WA_REIS_CN_DP_L_STR-DPCALCUVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPAGREEVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPCALCUCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPAGREECURR sy-vline 
WA_REIS_CN_DP_L_STR-DPDIFFVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPDIFFCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALCURR sy-vline 
WA_REIS_CN_DP_L_STR-XDPTARGETTYPE sy-vline 
WA_REIS_CN_DP_L_STR-DPTXT sy-vline 
WA_REIS_CN_DP_L_STR-DPSECTXT sy-vline 
WA_REIS_CN_DP_L_STR-DPSTATUS sy-vline 
WA_REIS_CN_DP_L_STR-XDPACTUALTYPE sy-vline 
WA_REIS_CN_DP_L_STR-RECISVALIDFROM sy-vline 
WA_REIS_CN_DP_L_STR-RECISVALIDTO sy-vline 
WA_REIS_CN_DP_L_STR-DPRETOUREDCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPRETOUREDVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPRETAINEDCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPRETAINEDVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPLCURRKEY sy-vline 
WA_REIS_CN_DP_L_STR-DPAGREELVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPAGREELCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPCALCULVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPCALCULCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALLVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALLCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPRETOUREDLVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPRETOUREDLCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPRETOUREDLICON sy-vline 
WA_REIS_CN_DP_L_STR-DPRETAINEDLVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPRETAINEDLCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPRETAINEDLICON sy-vline 
WA_REIS_CN_DP_L_STR-DPDIFFLVALUE sy-vline 
WA_REIS_CN_DP_L_STR-DPDIFFLCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPAGREELICON sy-vline 
WA_REIS_CN_DP_L_STR-DPCALCLICON sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALLICON sy-vline 
WA_REIS_CN_DP_L_STR-DPTRANSDATE sy-vline 
WA_REIS_CN_DP_L_STR-DPTOLOCALCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPTOFOREIGNCURR sy-vline 
WA_REIS_CN_DP_L_STR-DPRETAINEDICON sy-vline 
WA_REIS_CN_DP_L_STR-DPRETOUREDICON sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALICON sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERROLE1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERXROLE1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNER1 sy-vline 
WA_REIS_CN_DP_L_STR-XDPPARTNER1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERTELNUMBERLONG1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERFAXNUMBERLONG1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERSMTPADDR1 sy-vline 
WA_REIS_CN_DP_L_STR-XDPPARTNERNAME1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERSTREET1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERHOUSENUM11 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERPOSTCODE11 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERCITY11 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERCITY21 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERREGION1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERPOBOX1 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERPOSTCODE21 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERROLE2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERXROLE2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNER2 sy-vline 
WA_REIS_CN_DP_L_STR-XDPPARTNER2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERTELNUMBERLONG2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERFAXNUMBERLONG2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERSMTPADDR2 sy-vline 
WA_REIS_CN_DP_L_STR-XDPPARTNERNAME2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERSTREET2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERHOUSENUM12 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERPOSTCODE12 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERCITY12 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERCITY22 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERREGION2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERPOBOX2 sy-vline 
WA_REIS_CN_DP_L_STR-DPPARTNERPOSTCODE22 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERROLE1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERXROLE1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNER1 sy-vline 
WA_REIS_CN_DP_L_STR-XDPSECPARTNER1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERTELNUMBERLONG1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERFAXNUMBERLONG1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERSMTPADDR1 sy-vline 
WA_REIS_CN_DP_L_STR-XDPSECPARTNERNAME1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERSTREET1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERHOUSENUM11 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERPOSTCODE11 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERCITY11 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERCITY21 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERREGION1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERPOBOX1 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERPOSTCODE21 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERROLE2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERXROLE2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNER2 sy-vline 
WA_REIS_CN_DP_L_STR-XDPSECPARTNER2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERTELNUMBERLONG2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERFAXNUMBERLONG2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERSMTPADDR2 sy-vline 
WA_REIS_CN_DP_L_STR-XDPSECPARTNERNAME2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERSTREET2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERHOUSENUM12 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERPOSTCODE12 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERCITY12 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERCITY22 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERREGION2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERPOBOX2 sy-vline 
WA_REIS_CN_DP_L_STR-DPSECPARTNERPOSTCODE22 sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERROLE sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERXROLE sy-vline 
WA_REIS_CN_DP_L_STR-XDPACTUALPARTNER sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERTELNUMBERLONG sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERFAXNUMBERLONG sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERSMTPADDR sy-vline 
WA_REIS_CN_DP_L_STR-XDPACTUALPARTNERNAME sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERSTREET sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERHOUSENUM1 sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERPOSTCODE1 sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERCITY1 sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERCITY2 sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERREGION sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERPOBOX sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERPOSTCODE2 sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALFROMADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALTYPEADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALINFONUMADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPLACEADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALPARTNERADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACPARTNERROLEADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALTOADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALCOMPLADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALRECEIVEDADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALRETOUREDADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALRETODATEADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALRETAINEDADP sy-vline 
WA_REIS_CN_DP_L_STR-DPACTUALCURRADP sy-vline      INTO ld_text SEPARATED BY SPACE.

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