ABAP Select data from SAP table WCB_S_COND_KEY_FIELDS 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 WCB_S_COND_KEY_FIELDS 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 WCB_S_COND_KEY_FIELDS. 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 WCB_S_COND_KEY_FIELDS 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_WCB_S_COND_KEY_FIELDS TYPE STANDARD TABLE OF WCB_S_COND_KEY_FIELDS,
      WA_WCB_S_COND_KEY_FIELDS TYPE WCB_S_COND_KEY_FIELDS,
      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: <WCB_S_COND_KEY_FIELDS> TYPE WCB_S_COND_KEY_FIELDS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM WCB_S_COND_KEY_FIELDS
*  INTO TABLE @DATA(IT_WCB_S_COND_KEY_FIELDS2).
*--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_WCB_S_COND_KEY_FIELDS INDEX 1 INTO DATA(WA_WCB_S_COND_KEY_FIELDS2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<WCB_S_COND_KEY_FIELDS>-ALAND = 1.
<WCB_S_COND_KEY_FIELDS>-AUART = 1.
<WCB_S_COND_KEY_FIELDS>-AUART_SD = 1.
<WCB_S_COND_KEY_FIELDS>-BONUS = 1.
<WCB_S_COND_KEY_FIELDS>-BRSCH = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_WCB_S_COND_KEY_FIELDS-BUKRS, sy-vline,
  WA_WCB_S_COND_KEY_FIELDS-BWTAR, sy-vline,
  WA_WCB_S_COND_KEY_FIELDS-BZIRK, sy-vline,
  WA_WCB_S_COND_KEY_FIELDS-CHARG, sy-vline,
  WA_WCB_S_COND_KEY_FIELDS-COCO_NUM, sy-vline,
  WA_WCB_S_COND_KEY_FIELDS-DATBI, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_WCB_S_COND_KEY_FIELDS 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_WCB_S_COND_KEY_FIELDS 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_WCB_S_COND_KEY_FIELDS INTO WA_WCB_S_COND_KEY_FIELDS.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field KOSTL
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_WCB_S_COND_KEY_FIELDS-KOSTL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_WCB_S_COND_KEY_FIELDS-KOSTL.
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_WCB_S_COND_KEY_FIELDS_STR, 
ALAND TYPE STRING,
AUART TYPE STRING,
AUART_SD TYPE STRING,
BONUS TYPE STRING,
BRSCH TYPE STRING,
BUKRS TYPE STRING,
BWTAR TYPE STRING,
BZIRK TYPE STRING,
CHARG TYPE STRING,
COCO_NUM TYPE STRING,
DATBI TYPE STRING,
EKKOL TYPE STRING,
EKORG TYPE STRING,
ESOKZ TYPE STRING,
EVRTN TYPE STRING,
EVRTP TYPE STRING,
FKART TYPE STRING,
HIENR TYPE STRING,
INCO1 TYPE STRING,
INFNR TYPE STRING,
KAPPL TYPE STRING,
KDGRP TYPE STRING,
KOKRS TYPE STRING,
KOLIF TYPE STRING,
KONDA TYPE STRING,
KONDM TYPE STRING,
KSCHL TYPE STRING,
KUNAG TYPE STRING,
KUNNR TYPE STRING,
KUNRE TYPE STRING,
KUNRG TYPE STRING,
KUNWE TYPE STRING,
LAND1 TYPE STRING,
LAND1A TYPE STRING,
LAND1Z TYPE STRING,
LHIENR TYPE STRING,
LIFNR TYPE STRING,
LIFRE TYPE STRING,
LLAND TYPE STRING,
LLIEF TYPE STRING,
LTSNR TYPE STRING,
MANDT TYPE STRING,
MATKL TYPE STRING,
MATNR TYPE STRING,
MTART TYPE STRING,
PLTYP TYPE STRING,
POSNR TYPE STRING,
PPRCTR TYPE STRING,
PRCTR TYPE STRING,
PRODH TYPE STRING,
PROVG TYPE STRING,
REGIO TYPE STRING,
RESWK TYPE STRING,
SPART TYPE STRING,
SRVPOS TYPE STRING,
TAXIK TYPE STRING,
TAXIM TYPE STRING,
TAXIW TYPE STRING,
TAXK1 TYPE STRING,
TAXM1 TYPE STRING,
TDLNR TYPE STRING,
UPMAT TYPE STRING,
VBELN TYPE STRING,
VKORG TYPE STRING,
VKORGAU TYPE STRING,
VTWEG TYPE STRING,
WAERK TYPE STRING,
WERKS TYPE STRING,
WERKV TYPE STRING,
WGHIE TYPE STRING,
WKREG TYPE STRING,
PRODH1 TYPE STRING,
PRODH2 TYPE STRING,
PRODH3 TYPE STRING,
MVGR1 TYPE STRING,
MVGR2 TYPE STRING,
MVGR3 TYPE STRING,
MVGR4 TYPE STRING,
MVGR5 TYPE STRING,
INCOV TYPE STRING,
KOSTL TYPE STRING,
VARCOND TYPE STRING,END OF T_EKKO_STR.
DATA: WA_WCB_S_COND_KEY_FIELDS_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_WCB_S_COND_KEY_FIELDS_STR-ALAND sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-AUART sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-AUART_SD sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-BONUS sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-BRSCH sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-BUKRS sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-BWTAR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-BZIRK sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-CHARG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-COCO_NUM sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-DATBI sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-EKKOL sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-EKORG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-ESOKZ sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-EVRTN sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-EVRTP sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-FKART sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-HIENR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-INCO1 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-INFNR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KAPPL sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KDGRP sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KOKRS sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KOLIF sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KONDA sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KONDM sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KSCHL sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KUNAG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KUNNR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KUNRE sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KUNRG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KUNWE sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LAND1 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LAND1A sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LAND1Z sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LHIENR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LIFNR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LIFRE sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LLAND sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LLIEF sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-LTSNR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MANDT sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MATKL sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MATNR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MTART sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PLTYP sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-POSNR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PPRCTR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PRCTR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PRODH sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PROVG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-REGIO sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-RESWK sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-SPART sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-SRVPOS sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-TAXIK sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-TAXIM sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-TAXIW sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-TAXK1 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-TAXM1 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-TDLNR sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-UPMAT sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-VBELN sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-VKORG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-VKORGAU sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-VTWEG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-WAERK sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-WERKS sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-WERKV sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-WGHIE sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-WKREG sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PRODH1 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PRODH2 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-PRODH3 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MVGR1 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MVGR2 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MVGR3 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MVGR4 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-MVGR5 sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-INCOV sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-KOSTL sy-vline 
WA_WCB_S_COND_KEY_FIELDS_STR-VARCOND sy-vline      INTO ld_text SEPARATED BY SPACE.

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