ABAP Select data from SAP table KONS_PARAM 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 KONS_PARAM 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 KONS_PARAM. 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 KONS_PARAM 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_KONS_PARAM TYPE STANDARD TABLE OF KONS_PARAM,
      WA_KONS_PARAM TYPE KONS_PARAM,
      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: <KONS_PARAM> TYPE KONS_PARAM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM KONS_PARAM
*  INTO TABLE @DATA(IT_KONS_PARAM2).
*--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_KONS_PARAM INDEX 1 INTO DATA(WA_KONS_PARAM2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<KONS_PARAM>-KONS_T1 = 1.
<KONS_PARAM>-KONS_T2 = 1.
<KONS_PARAM>-KONS_T3 = 1.
<KONS_PARAM>-KONS_T4 = 1.
<KONS_PARAM>-KONS_T5 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_KONS_PARAM-TX1, sy-vline,
  WA_KONS_PARAM-TX2, sy-vline,
  WA_KONS_PARAM-TX3, sy-vline,
  WA_KONS_PARAM-TX4, sy-vline,
  WA_KONS_PARAM-UX1, sy-vline,
  WA_KONS_PARAM-UX2, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_KONS_PARAM 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_KONS_PARAM 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_KONS_PARAM INTO WA_KONS_PARAM.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field D2_2
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_KONS_PARAM-D2_2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_KONS_PARAM-D2_2.
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_KONS_PARAM_STR, 
KONS_T1 TYPE STRING,
KONS_T2 TYPE STRING,
KONS_T3 TYPE STRING,
KONS_T4 TYPE STRING,
KONS_T5 TYPE STRING,
TX1 TYPE STRING,
TX2 TYPE STRING,
TX3 TYPE STRING,
TX4 TYPE STRING,
UX1 TYPE STRING,
UX2 TYPE STRING,
UX3 TYPE STRING,
UX4 TYPE STRING,
BX1 TYPE STRING,
BX2 TYPE STRING,
BX3 TYPE STRING,
VX1 TYPE STRING,
VX2 TYPE STRING,
VX3 TYPE STRING,
SX1 TYPE STRING,
SX2 TYPE STRING,
SX3 TYPE STRING,
SX4 TYPE STRING,
NBE1 TYPE STRING,
D3_1 TYPE STRING,
D4_1 TYPE STRING,
D4_2 TYPE STRING,
D4_3 TYPE STRING,
D4_4 TYPE STRING,
D4_5 TYPE STRING,
D4_6 TYPE STRING,
D4_7 TYPE STRING,
D4_8 TYPE STRING,
D4_9 TYPE STRING,
D4_10 TYPE STRING,
D4_11 TYPE STRING,
D4_12 TYPE STRING,
D4_13 TYPE STRING,
D4_14 TYPE STRING,
D4_15 TYPE STRING,
D4_16 TYPE STRING,
D4_17 TYPE STRING,
D4_18 TYPE STRING,
D4_19 TYPE STRING,
D4_20 TYPE STRING,
D4_21 TYPE STRING,
D4_22 TYPE STRING,
D4_23 TYPE STRING,
D4_24 TYPE STRING,
D5_0 TYPE STRING,
D5_1 TYPE STRING,
D5_2 TYPE STRING,
D5_3 TYPE STRING,
D5_4 TYPE STRING,
D5_5 TYPE STRING,
D5_6 TYPE STRING,
D5_7 TYPE STRING,
D5_8 TYPE STRING,
D7_0 TYPE STRING,
D7_1 TYPE STRING,
D7_2 TYPE STRING,
D7_3 TYPE STRING,
D7_4 TYPE STRING,
D7_5 TYPE STRING,
D7_6 TYPE STRING,
VERS TYPE STRING,
D2_1 TYPE STRING,
D2_2 TYPE STRING,
D1_TEXT5 TYPE STRING,
D1_TEXT6 TYPE STRING,
D1_TEXT7 TYPE STRING,
D1_TEXT8 TYPE STRING,
D1_TEXT9 TYPE STRING,
D1_TEXT10 TYPE STRING,
D1_TEXT11 TYPE STRING,
D1_TEXT14 TYPE STRING,
D1_TEXT15 TYPE STRING,
D1_TEXT16 TYPE STRING,
D1_TEXT17 TYPE STRING,
D1_TEXT18 TYPE STRING,
D1_TEXT19 TYPE STRING,
D1_TEXT20 TYPE STRING,
D1_TEXT21 TYPE STRING,
D1_TEXT24 TYPE STRING,
D1_TEXT25 TYPE STRING,
D1_TEXT26 TYPE STRING,
D1_TEXT27 TYPE STRING,
D1_TEXT28 TYPE STRING,
POP_1X TYPE STRING,
POP_2X TYPE STRING,
METHODE TYPE STRING,
D2_BWA TYPE STRING,END OF T_EKKO_STR.
DATA: WA_KONS_PARAM_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_KONS_PARAM_STR-KONS_T1 sy-vline 
WA_KONS_PARAM_STR-KONS_T2 sy-vline 
WA_KONS_PARAM_STR-KONS_T3 sy-vline 
WA_KONS_PARAM_STR-KONS_T4 sy-vline 
WA_KONS_PARAM_STR-KONS_T5 sy-vline 
WA_KONS_PARAM_STR-TX1 sy-vline 
WA_KONS_PARAM_STR-TX2 sy-vline 
WA_KONS_PARAM_STR-TX3 sy-vline 
WA_KONS_PARAM_STR-TX4 sy-vline 
WA_KONS_PARAM_STR-UX1 sy-vline 
WA_KONS_PARAM_STR-UX2 sy-vline 
WA_KONS_PARAM_STR-UX3 sy-vline 
WA_KONS_PARAM_STR-UX4 sy-vline 
WA_KONS_PARAM_STR-BX1 sy-vline 
WA_KONS_PARAM_STR-BX2 sy-vline 
WA_KONS_PARAM_STR-BX3 sy-vline 
WA_KONS_PARAM_STR-VX1 sy-vline 
WA_KONS_PARAM_STR-VX2 sy-vline 
WA_KONS_PARAM_STR-VX3 sy-vline 
WA_KONS_PARAM_STR-SX1 sy-vline 
WA_KONS_PARAM_STR-SX2 sy-vline 
WA_KONS_PARAM_STR-SX3 sy-vline 
WA_KONS_PARAM_STR-SX4 sy-vline 
WA_KONS_PARAM_STR-NBE1 sy-vline 
WA_KONS_PARAM_STR-D3_1 sy-vline 
WA_KONS_PARAM_STR-D4_1 sy-vline 
WA_KONS_PARAM_STR-D4_2 sy-vline 
WA_KONS_PARAM_STR-D4_3 sy-vline 
WA_KONS_PARAM_STR-D4_4 sy-vline 
WA_KONS_PARAM_STR-D4_5 sy-vline 
WA_KONS_PARAM_STR-D4_6 sy-vline 
WA_KONS_PARAM_STR-D4_7 sy-vline 
WA_KONS_PARAM_STR-D4_8 sy-vline 
WA_KONS_PARAM_STR-D4_9 sy-vline 
WA_KONS_PARAM_STR-D4_10 sy-vline 
WA_KONS_PARAM_STR-D4_11 sy-vline 
WA_KONS_PARAM_STR-D4_12 sy-vline 
WA_KONS_PARAM_STR-D4_13 sy-vline 
WA_KONS_PARAM_STR-D4_14 sy-vline 
WA_KONS_PARAM_STR-D4_15 sy-vline 
WA_KONS_PARAM_STR-D4_16 sy-vline 
WA_KONS_PARAM_STR-D4_17 sy-vline 
WA_KONS_PARAM_STR-D4_18 sy-vline 
WA_KONS_PARAM_STR-D4_19 sy-vline 
WA_KONS_PARAM_STR-D4_20 sy-vline 
WA_KONS_PARAM_STR-D4_21 sy-vline 
WA_KONS_PARAM_STR-D4_22 sy-vline 
WA_KONS_PARAM_STR-D4_23 sy-vline 
WA_KONS_PARAM_STR-D4_24 sy-vline 
WA_KONS_PARAM_STR-D5_0 sy-vline 
WA_KONS_PARAM_STR-D5_1 sy-vline 
WA_KONS_PARAM_STR-D5_2 sy-vline 
WA_KONS_PARAM_STR-D5_3 sy-vline 
WA_KONS_PARAM_STR-D5_4 sy-vline 
WA_KONS_PARAM_STR-D5_5 sy-vline 
WA_KONS_PARAM_STR-D5_6 sy-vline 
WA_KONS_PARAM_STR-D5_7 sy-vline 
WA_KONS_PARAM_STR-D5_8 sy-vline 
WA_KONS_PARAM_STR-D7_0 sy-vline 
WA_KONS_PARAM_STR-D7_1 sy-vline 
WA_KONS_PARAM_STR-D7_2 sy-vline 
WA_KONS_PARAM_STR-D7_3 sy-vline 
WA_KONS_PARAM_STR-D7_4 sy-vline 
WA_KONS_PARAM_STR-D7_5 sy-vline 
WA_KONS_PARAM_STR-D7_6 sy-vline 
WA_KONS_PARAM_STR-VERS sy-vline 
WA_KONS_PARAM_STR-D2_1 sy-vline 
WA_KONS_PARAM_STR-D2_2 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT5 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT6 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT7 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT8 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT9 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT10 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT11 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT14 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT15 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT16 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT17 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT18 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT19 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT20 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT21 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT24 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT25 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT26 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT27 sy-vline 
WA_KONS_PARAM_STR-D1_TEXT28 sy-vline 
WA_KONS_PARAM_STR-POP_1X sy-vline 
WA_KONS_PARAM_STR-POP_2X sy-vline 
WA_KONS_PARAM_STR-METHODE sy-vline 
WA_KONS_PARAM_STR-D2_BWA sy-vline      INTO ld_text SEPARATED BY SPACE.

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