ABAP Select data from SAP table FSH_BDBS_S 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 FSH_BDBS_S 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 FSH_BDBS_S. 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 FSH_BDBS_S 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_FSH_BDBS_S TYPE STANDARD TABLE OF FSH_BDBS_S,
      WA_FSH_BDBS_S TYPE FSH_BDBS_S,
      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: <FSH_BDBS_S> TYPE FSH_BDBS_S.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FSH_BDBS_S
*  INTO TABLE @DATA(IT_FSH_BDBS_S2).
*--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_FSH_BDBS_S INDEX 1 INTO DATA(WA_FSH_BDBS_S2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FSH_BDBS_S>-MANDT = 1.
<FSH_BDBS_S>-WERKS = 1.
<FSH_BDBS_S>-MATNR = 1.
<FSH_BDBS_S>-FSH_STAT = 1.
<FSH_BDBS_S>-AUFNR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FSH_BDBS_S-POSNR, sy-vline,
  WA_FSH_BDBS_S-ETENR, sy-vline,
  WA_FSH_BDBS_S-BDART, sy-vline,
  WA_FSH_BDBS_S-FSH_BSKZ, sy-vline,
  WA_FSH_BDBS_S-FSH_BSNR, sy-vline,
  WA_FSH_BDBS_S-FSH_HBSP, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FSH_BDBS_S 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_FSH_BDBS_S 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_FSH_BDBS_S INTO WA_FSH_BDBS_S.


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

*Conversion exit CUNIT, internal->external for field MEINS
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_FSH_BDBS_S-MEINS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FSH_BDBS_S-MEINS.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit NUMCV, internal->external for field STLNR
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_FSH_BDBS_S-STLNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FSH_BDBS_S-STLNR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ATINN, internal->external for field COLOR_ATINN
CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT'
  EXPORTING
    input =                      WA_FSH_BDBS_S-COLOR_ATINN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FSH_BDBS_S-COLOR_ATINN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ATINN, internal->external for field SIZE1_ATINN
CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT'
  EXPORTING
    input =                      WA_FSH_BDBS_S-SIZE1_ATINN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FSH_BDBS_S-SIZE1_ATINN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ATINN, internal->external for field SIZE2_ATINN
CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT'
  EXPORTING
    input =                      WA_FSH_BDBS_S-SIZE2_ATINN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FSH_BDBS_S-SIZE2_ATINN.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit ALPHA, internal->external for field FSH_SUBCON_PO
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_FSH_BDBS_S-FSH_SUBCON_PO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FSH_BDBS_S-FSH_SUBCON_PO.
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_FSH_BDBS_S_STR, 
MANDT TYPE STRING,
WERKS TYPE STRING,
MATNR TYPE STRING,
FSH_STAT TYPE STRING,
AUFNR TYPE STRING,
POSNR TYPE STRING,
ETENR TYPE STRING,
BDART TYPE STRING,
FSH_BSKZ TYPE STRING,
FSH_BSNR TYPE STRING,
FSH_HBSP TYPE STRING,
FSH_EBSP TYPE STRING,
LGONR TYPE STRING,
SOBKZ TYPE STRING,
FSH_SOBN TYPE STRING,
FSH_ALLOC_QTY TYPE STRING,
MEINS TYPE STRING,
VBTYP TYPE STRING,
EDATU_PO TYPE STRING,
EDATU_OR TYPE STRING,
ARNUM TYPE STRING,
KUNNR TYPE STRING,
ERDAT TYPE STRING,
SGT_SCAT TYPE STRING,
SGT_RCAT TYPE STRING,
TERMN TYPE STRING,
MARK TYPE STRING,
REFNR TYPE STRING,
LIGHT TYPE STRING,
VBUKZ TYPE STRING,
SEQUENCE TYPE STRING,
UEPOS TYPE STRING,
GRKOR TYPE STRING,
FSH_REREG TYPE STRING,
GROUI TYPE STRING,
GROUE TYPE STRING,
FSH_AR_STAT TYPE STRING,
FSH_AR_STAT_ITM TYPE STRING,
IMENGE TYPE STRING,
FSH_SEASON TYPE STRING,
FSH_SEASON_YEAR TYPE STRING,
FSH_COLLECTION TYPE STRING,
FSH_THEME TYPE STRING,
VBELN TYPE STRING,
PIR TYPE STRING,
STLNR TYPE STRING,
MSKU_CUST TYPE STRING,
DELTA_ALLOC_QTY TYPE STRING,
INITIAL_STAT TYPE STRING,
MENGE TYPE STRING,
FSH_OPEN_QTY TYPE STRING,
MAKTG TYPE STRING,
VAS_GROUP_ID TYPE STRING,
GROUP_ID TYPE STRING,
FSH_TRANSACTION TYPE STRING,
FSH_ITEM_GROUP TYPE STRING,
FSH_MG_AT1 TYPE STRING,
FSH_MG_AT2 TYPE STRING,
FSH_MG_AT3 TYPE STRING,
COLOR TYPE STRING,
SIZE1 TYPE STRING,
SIZE2 TYPE STRING,
COLOR_ATINN TYPE STRING,
SIZE1_ATINN TYPE STRING,
SIZE2_ATINN TYPE STRING,
CHARSTC1_TEXT TYPE STRING,
CHARSTC2_TEXT TYPE STRING,
CHARSTC3_TEXT TYPE STRING,
KUNWE TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
LPRIO TYPE STRING,
ABELN TYPE STRING,
ABELP TYPE STRING,
AEDAT TYPE STRING,
BEDAT TYPE STRING,
RESWK TYPE STRING,
BSART TYPE STRING,
MVGR1 TYPE STRING,
CUFLD_01 TYPE STRING,
CUFLD_02 TYPE STRING,
CUFLD_03 TYPE STRING,
CUFLD_04 TYPE STRING,
CUFLD_05 TYPE STRING,
CUFLD_06 TYPE STRING,
CUFLD_07 TYPE STRING,
CUFLD_08 TYPE STRING,
CUFLD_09 TYPE STRING,
CUFLD_10 TYPE STRING,
CSOFL_01 TYPE STRING,
CSOFL_02 TYPE STRING,
CSOFL_03 TYPE STRING,
CSOFL_04 TYPE STRING,
CSOFL_05 TYPE STRING,
CSOFL_06 TYPE STRING,
CSOFL_07 TYPE STRING,
CSOFL_08 TYPE STRING,
CSOFL_09 TYPE STRING,
CSOFL_10 TYPE STRING,
KVGR1 TYPE STRING,
KVGR2 TYPE STRING,
KVGR3 TYPE STRING,
KVGR4 TYPE STRING,
KVGR5 TYPE STRING,
FSH_KVGR6 TYPE STRING,
FSH_KVGR7 TYPE STRING,
FSH_KVGR8 TYPE STRING,
FSH_KVGR9 TYPE STRING,
FSH_KVGR10 TYPE STRING,
SATNR TYPE STRING,
FSH_OS_ID TYPE STRING,
FSH_SUBCON_PO TYPE STRING,
FSH_SUBCON_ITM TYPE STRING,
VFDAT TYPE STRING,
HSDAT TYPE STRING,
LWEDT TYPE STRING,
KDGRP TYPE STRING,
STK_SEG TYPE STRING,
ARUNID TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FSH_BDBS_S_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_FSH_BDBS_S_STR-MANDT sy-vline 
WA_FSH_BDBS_S_STR-WERKS sy-vline 
WA_FSH_BDBS_S_STR-MATNR sy-vline 
WA_FSH_BDBS_S_STR-FSH_STAT sy-vline 
WA_FSH_BDBS_S_STR-AUFNR sy-vline 
WA_FSH_BDBS_S_STR-POSNR sy-vline 
WA_FSH_BDBS_S_STR-ETENR sy-vline 
WA_FSH_BDBS_S_STR-BDART sy-vline 
WA_FSH_BDBS_S_STR-FSH_BSKZ sy-vline 
WA_FSH_BDBS_S_STR-FSH_BSNR sy-vline 
WA_FSH_BDBS_S_STR-FSH_HBSP sy-vline 
WA_FSH_BDBS_S_STR-FSH_EBSP sy-vline 
WA_FSH_BDBS_S_STR-LGONR sy-vline 
WA_FSH_BDBS_S_STR-SOBKZ sy-vline 
WA_FSH_BDBS_S_STR-FSH_SOBN sy-vline 
WA_FSH_BDBS_S_STR-FSH_ALLOC_QTY sy-vline 
WA_FSH_BDBS_S_STR-MEINS sy-vline 
WA_FSH_BDBS_S_STR-VBTYP sy-vline 
WA_FSH_BDBS_S_STR-EDATU_PO sy-vline 
WA_FSH_BDBS_S_STR-EDATU_OR sy-vline 
WA_FSH_BDBS_S_STR-ARNUM sy-vline 
WA_FSH_BDBS_S_STR-KUNNR sy-vline 
WA_FSH_BDBS_S_STR-ERDAT sy-vline 
WA_FSH_BDBS_S_STR-SGT_SCAT sy-vline 
WA_FSH_BDBS_S_STR-SGT_RCAT sy-vline 
WA_FSH_BDBS_S_STR-TERMN sy-vline 
WA_FSH_BDBS_S_STR-MARK sy-vline 
WA_FSH_BDBS_S_STR-REFNR sy-vline 
WA_FSH_BDBS_S_STR-LIGHT sy-vline 
WA_FSH_BDBS_S_STR-VBUKZ sy-vline 
WA_FSH_BDBS_S_STR-SEQUENCE sy-vline 
WA_FSH_BDBS_S_STR-UEPOS sy-vline 
WA_FSH_BDBS_S_STR-GRKOR sy-vline 
WA_FSH_BDBS_S_STR-FSH_REREG sy-vline 
WA_FSH_BDBS_S_STR-GROUI sy-vline 
WA_FSH_BDBS_S_STR-GROUE sy-vline 
WA_FSH_BDBS_S_STR-FSH_AR_STAT sy-vline 
WA_FSH_BDBS_S_STR-FSH_AR_STAT_ITM sy-vline 
WA_FSH_BDBS_S_STR-IMENGE sy-vline 
WA_FSH_BDBS_S_STR-FSH_SEASON sy-vline 
WA_FSH_BDBS_S_STR-FSH_SEASON_YEAR sy-vline 
WA_FSH_BDBS_S_STR-FSH_COLLECTION sy-vline 
WA_FSH_BDBS_S_STR-FSH_THEME sy-vline 
WA_FSH_BDBS_S_STR-VBELN sy-vline 
WA_FSH_BDBS_S_STR-PIR sy-vline 
WA_FSH_BDBS_S_STR-STLNR sy-vline 
WA_FSH_BDBS_S_STR-MSKU_CUST sy-vline 
WA_FSH_BDBS_S_STR-DELTA_ALLOC_QTY sy-vline 
WA_FSH_BDBS_S_STR-INITIAL_STAT sy-vline 
WA_FSH_BDBS_S_STR-MENGE sy-vline 
WA_FSH_BDBS_S_STR-FSH_OPEN_QTY sy-vline 
WA_FSH_BDBS_S_STR-MAKTG sy-vline 
WA_FSH_BDBS_S_STR-VAS_GROUP_ID sy-vline 
WA_FSH_BDBS_S_STR-GROUP_ID sy-vline 
WA_FSH_BDBS_S_STR-FSH_TRANSACTION sy-vline 
WA_FSH_BDBS_S_STR-FSH_ITEM_GROUP sy-vline 
WA_FSH_BDBS_S_STR-FSH_MG_AT1 sy-vline 
WA_FSH_BDBS_S_STR-FSH_MG_AT2 sy-vline 
WA_FSH_BDBS_S_STR-FSH_MG_AT3 sy-vline 
WA_FSH_BDBS_S_STR-COLOR sy-vline 
WA_FSH_BDBS_S_STR-SIZE1 sy-vline 
WA_FSH_BDBS_S_STR-SIZE2 sy-vline 
WA_FSH_BDBS_S_STR-COLOR_ATINN sy-vline 
WA_FSH_BDBS_S_STR-SIZE1_ATINN sy-vline 
WA_FSH_BDBS_S_STR-SIZE2_ATINN sy-vline 
WA_FSH_BDBS_S_STR-CHARSTC1_TEXT sy-vline 
WA_FSH_BDBS_S_STR-CHARSTC2_TEXT sy-vline 
WA_FSH_BDBS_S_STR-CHARSTC3_TEXT sy-vline 
WA_FSH_BDBS_S_STR-KUNWE sy-vline 
WA_FSH_BDBS_S_STR-VKORG sy-vline 
WA_FSH_BDBS_S_STR-VTWEG sy-vline 
WA_FSH_BDBS_S_STR-SPART sy-vline 
WA_FSH_BDBS_S_STR-LPRIO sy-vline 
WA_FSH_BDBS_S_STR-ABELN sy-vline 
WA_FSH_BDBS_S_STR-ABELP sy-vline 
WA_FSH_BDBS_S_STR-AEDAT sy-vline 
WA_FSH_BDBS_S_STR-BEDAT sy-vline 
WA_FSH_BDBS_S_STR-RESWK sy-vline 
WA_FSH_BDBS_S_STR-BSART sy-vline 
WA_FSH_BDBS_S_STR-MVGR1 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_01 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_02 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_03 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_04 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_05 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_06 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_07 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_08 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_09 sy-vline 
WA_FSH_BDBS_S_STR-CUFLD_10 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_01 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_02 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_03 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_04 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_05 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_06 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_07 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_08 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_09 sy-vline 
WA_FSH_BDBS_S_STR-CSOFL_10 sy-vline 
WA_FSH_BDBS_S_STR-KVGR1 sy-vline 
WA_FSH_BDBS_S_STR-KVGR2 sy-vline 
WA_FSH_BDBS_S_STR-KVGR3 sy-vline 
WA_FSH_BDBS_S_STR-KVGR4 sy-vline 
WA_FSH_BDBS_S_STR-KVGR5 sy-vline 
WA_FSH_BDBS_S_STR-FSH_KVGR6 sy-vline 
WA_FSH_BDBS_S_STR-FSH_KVGR7 sy-vline 
WA_FSH_BDBS_S_STR-FSH_KVGR8 sy-vline 
WA_FSH_BDBS_S_STR-FSH_KVGR9 sy-vline 
WA_FSH_BDBS_S_STR-FSH_KVGR10 sy-vline 
WA_FSH_BDBS_S_STR-SATNR sy-vline 
WA_FSH_BDBS_S_STR-FSH_OS_ID sy-vline 
WA_FSH_BDBS_S_STR-FSH_SUBCON_PO sy-vline 
WA_FSH_BDBS_S_STR-FSH_SUBCON_ITM sy-vline 
WA_FSH_BDBS_S_STR-VFDAT sy-vline 
WA_FSH_BDBS_S_STR-HSDAT sy-vline 
WA_FSH_BDBS_S_STR-LWEDT sy-vline 
WA_FSH_BDBS_S_STR-KDGRP sy-vline 
WA_FSH_BDBS_S_STR-STK_SEG sy-vline 
WA_FSH_BDBS_S_STR-ARUNID sy-vline      INTO ld_text SEPARATED BY SPACE.

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