ABAP Select data from SAP table J_3RFF4EDIT 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 J_3RFF4EDIT 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 J_3RFF4EDIT. 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 J_3RFF4EDIT 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_J_3RFF4EDIT TYPE STANDARD TABLE OF J_3RFF4EDIT,
      WA_J_3RFF4EDIT TYPE J_3RFF4EDIT,
      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: <J_3RFF4EDIT> TYPE J_3RFF4EDIT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3RFF4EDIT
*  INTO TABLE @DATA(IT_J_3RFF4EDIT2).
*--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_J_3RFF4EDIT INDEX 1 INTO DATA(WA_J_3RFF4EDIT2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3RFF4EDIT>-VERSN = 1.
<J_3RFF4EDIT>-STROW = 1.
<J_3RFF4EDIT>-OLD_STROW = 1.
<J_3RFF4EDIT>-STROW5 = 1.
<J_3RFF4EDIT>-OLD_STROW5 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_3RFF4EDIT-STEXT, sy-vline,
  WA_J_3RFF4EDIT-TEXT1, sy-vline,
  WA_J_3RFF4EDIT-TEXT2, sy-vline,
  WA_J_3RFF4EDIT-TEXT3, sy-vline,
  WA_J_3RFF4EDIT-TEXT4, sy-vline,
  WA_J_3RFF4EDIT-SIGNC, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J_3RFF4EDIT 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_J_3RFF4EDIT 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_J_3RFF4EDIT INTO WA_J_3RFF4EDIT.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit AU132, internal->external for field DMBTR1
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR1
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR2
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR3
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR4
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR4
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR4.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR5
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR5
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR5.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR6
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR6
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR6.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR7
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR7
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR7.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR8
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR8
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR8.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR9
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR9
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR9.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBTR10
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-DMBTR10
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-DMBTR10.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field TOTAL
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_J_3RFF4EDIT-TOTAL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3RFF4EDIT-TOTAL.
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_J_3RFF4EDIT_STR, 
VERSN TYPE STRING,
STROW TYPE STRING,
OLD_STROW TYPE STRING,
STROW5 TYPE STRING,
OLD_STROW5 TYPE STRING,
STEXT TYPE STRING,
TEXT1 TYPE STRING,
TEXT2 TYPE STRING,
TEXT3 TYPE STRING,
TEXT4 TYPE STRING,
SIGNC TYPE STRING,
HIDE TYPE STRING,
ID TYPE STRING,
PARENT_ID TYPE STRING,
MACCFR1 TYPE STRING,
MACCTO1 TYPE STRING,
CACCFR1 TYPE STRING,
CACCTO1 TYPE STRING,
IACCFR1 TYPE STRING,
IACCTO1 TYPE STRING,
CALCT TYPE STRING,
BEGBAL TYPE STRING,
ENDBAL TYPE STRING,
PERTOT TYPE STRING,
DEBTRN TYPE STRING,
CRDTRN TYPE STRING,
DEBIT TYPE STRING,
CREDIT TYPE STRING,
PAGEP TYPE STRING,
PAGEN TYPE STRING,
FILTER TYPE STRING,
CHAPT TYPE STRING,
RADIO1 TYPE STRING,
RADIO2 TYPE STRING,
RADIO3 TYPE STRING,
RADIO4 TYPE STRING,
RADIO5 TYPE STRING,
BUKRS TYPE STRING,
BELNR TYPE STRING,
GJAHR TYPE STRING,
HKONT1 TYPE STRING,
HKONT2 TYPE STRING,
HKONT3 TYPE STRING,
HKONT4 TYPE STRING,
HKONT5 TYPE STRING,
HKONT6 TYPE STRING,
HKONT7 TYPE STRING,
HKONT8 TYPE STRING,
HKONT9 TYPE STRING,
HKONT10 TYPE STRING,
CHKONT1 TYPE STRING,
CHKONT2 TYPE STRING,
CHKONT3 TYPE STRING,
CHKONT4 TYPE STRING,
CHKONT5 TYPE STRING,
CHKONT6 TYPE STRING,
CHKONT7 TYPE STRING,
CHKONT8 TYPE STRING,
CHKONT9 TYPE STRING,
CHKONT10 TYPE STRING,
DMBTR1 TYPE STRING,
DMBTR2 TYPE STRING,
DMBTR3 TYPE STRING,
DMBTR4 TYPE STRING,
DMBTR5 TYPE STRING,
DMBTR6 TYPE STRING,
DMBTR7 TYPE STRING,
DMBTR8 TYPE STRING,
DMBTR9 TYPE STRING,
DMBTR10 TYPE STRING,
TOTAL TYPE STRING,
MEXCL1 TYPE STRING,
CEXCL1 TYPE STRING,
IEXCL1 TYPE STRING,
RATDF TYPE STRING,
OPTION TYPE STRING,
HIDEROWNUM TYPE STRING,
SEPARATEDC TYPE STRING,
SIGNC2 TYPE STRING,
DEBITB TYPE STRING,
CREDITB TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_3RFF4EDIT_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_J_3RFF4EDIT_STR-VERSN sy-vline 
WA_J_3RFF4EDIT_STR-STROW sy-vline 
WA_J_3RFF4EDIT_STR-OLD_STROW sy-vline 
WA_J_3RFF4EDIT_STR-STROW5 sy-vline 
WA_J_3RFF4EDIT_STR-OLD_STROW5 sy-vline 
WA_J_3RFF4EDIT_STR-STEXT sy-vline 
WA_J_3RFF4EDIT_STR-TEXT1 sy-vline 
WA_J_3RFF4EDIT_STR-TEXT2 sy-vline 
WA_J_3RFF4EDIT_STR-TEXT3 sy-vline 
WA_J_3RFF4EDIT_STR-TEXT4 sy-vline 
WA_J_3RFF4EDIT_STR-SIGNC sy-vline 
WA_J_3RFF4EDIT_STR-HIDE sy-vline 
WA_J_3RFF4EDIT_STR-ID sy-vline 
WA_J_3RFF4EDIT_STR-PARENT_ID sy-vline 
WA_J_3RFF4EDIT_STR-MACCFR1 sy-vline 
WA_J_3RFF4EDIT_STR-MACCTO1 sy-vline 
WA_J_3RFF4EDIT_STR-CACCFR1 sy-vline 
WA_J_3RFF4EDIT_STR-CACCTO1 sy-vline 
WA_J_3RFF4EDIT_STR-IACCFR1 sy-vline 
WA_J_3RFF4EDIT_STR-IACCTO1 sy-vline 
WA_J_3RFF4EDIT_STR-CALCT sy-vline 
WA_J_3RFF4EDIT_STR-BEGBAL sy-vline 
WA_J_3RFF4EDIT_STR-ENDBAL sy-vline 
WA_J_3RFF4EDIT_STR-PERTOT sy-vline 
WA_J_3RFF4EDIT_STR-DEBTRN sy-vline 
WA_J_3RFF4EDIT_STR-CRDTRN sy-vline 
WA_J_3RFF4EDIT_STR-DEBIT sy-vline 
WA_J_3RFF4EDIT_STR-CREDIT sy-vline 
WA_J_3RFF4EDIT_STR-PAGEP sy-vline 
WA_J_3RFF4EDIT_STR-PAGEN sy-vline 
WA_J_3RFF4EDIT_STR-FILTER sy-vline 
WA_J_3RFF4EDIT_STR-CHAPT sy-vline 
WA_J_3RFF4EDIT_STR-RADIO1 sy-vline 
WA_J_3RFF4EDIT_STR-RADIO2 sy-vline 
WA_J_3RFF4EDIT_STR-RADIO3 sy-vline 
WA_J_3RFF4EDIT_STR-RADIO4 sy-vline 
WA_J_3RFF4EDIT_STR-RADIO5 sy-vline 
WA_J_3RFF4EDIT_STR-BUKRS sy-vline 
WA_J_3RFF4EDIT_STR-BELNR sy-vline 
WA_J_3RFF4EDIT_STR-GJAHR sy-vline 
WA_J_3RFF4EDIT_STR-HKONT1 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT2 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT3 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT4 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT5 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT6 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT7 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT8 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT9 sy-vline 
WA_J_3RFF4EDIT_STR-HKONT10 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT1 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT2 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT3 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT4 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT5 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT6 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT7 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT8 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT9 sy-vline 
WA_J_3RFF4EDIT_STR-CHKONT10 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR1 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR2 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR3 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR4 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR5 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR6 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR7 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR8 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR9 sy-vline 
WA_J_3RFF4EDIT_STR-DMBTR10 sy-vline 
WA_J_3RFF4EDIT_STR-TOTAL sy-vline 
WA_J_3RFF4EDIT_STR-MEXCL1 sy-vline 
WA_J_3RFF4EDIT_STR-CEXCL1 sy-vline 
WA_J_3RFF4EDIT_STR-IEXCL1 sy-vline 
WA_J_3RFF4EDIT_STR-RATDF sy-vline 
WA_J_3RFF4EDIT_STR-OPTION sy-vline 
WA_J_3RFF4EDIT_STR-HIDEROWNUM sy-vline 
WA_J_3RFF4EDIT_STR-SEPARATEDC sy-vline 
WA_J_3RFF4EDIT_STR-SIGNC2 sy-vline 
WA_J_3RFF4EDIT_STR-DEBITB sy-vline 
WA_J_3RFF4EDIT_STR-CREDITB sy-vline      INTO ld_text SEPARATED BY SPACE.

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