ABAP Select data from SAP table RM07M 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 RM07M 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 RM07M. 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 RM07M 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_RM07M TYPE STANDARD TABLE OF RM07M,
      WA_RM07M TYPE RM07M,
      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: <RM07M> TYPE RM07M.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RM07M
*  INTO TABLE @DATA(IT_RM07M2).
*--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_RM07M INDEX 1 INTO DATA(WA_RM07M2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RM07M>-MBLNR = 1.
<RM07M>-MJAHR = 1.
<RM07M>-ZEILE = 1.
<RM07M>-ZEILB = 1.
<RM07M>-KZBEW = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RM07M-MTSNR, sy-vline,
  WA_RM07M-LFSNR, sy-vline,
  WA_RM07M-BWART, sy-vline,
  WA_RM07M-BWARTWA, sy-vline,
  WA_RM07M-BWARTWE, sy-vline,
  WA_RM07M-MATNR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RM07M 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_RM07M 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_RM07M INTO WA_RM07M.


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

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

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

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

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

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

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

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

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

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

*Conversion exit ABPSP, internal->external for field PROJN
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_RM07M-PROJN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RM07M-PROJN.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit SPDEV, internal->external for field LDEST
CALL FUNCTION 'CONVERSION_EXIT_SPDEV_OUTPUT'
  EXPORTING
    input =                      WA_RM07M-LDEST
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RM07M-LDEST.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field PABNUM
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RM07M-PABNUM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RM07M-PABNUM.
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_RM07M_STR, 
MBLNR TYPE STRING,
MJAHR TYPE STRING,
ZEILE TYPE STRING,
ZEILB TYPE STRING,
KZBEW TYPE STRING,
MTSNR TYPE STRING,
LFSNR TYPE STRING,
BWART TYPE STRING,
BWARTWA TYPE STRING,
BWARTWE TYPE STRING,
MATNR TYPE STRING,
RSNUM TYPE STRING,
RSPOS TYPE STRING,
RSART TYPE STRING,
RSPOB TYPE STRING,
UMWRK TYPE STRING,
UMLGO TYPE STRING,
RSDAT TYPE STRING,
BDTER TYPE STRING,
XCALE TYPE STRING,
KZEAR TYPE STRING,
WERKS TYPE STRING,
LGORT TYPE STRING,
CHARG TYPE STRING,
ZUSCH TYPE STRING,
CHAKZ TYPE STRING,
XINFO TYPE STRING,
SOBKZ TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
AUFNR TYPE STRING,
AUFPS TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
LIFNR TYPE STRING,
XMEHR TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
KDEIN TYPE STRING,
KOSTL TYPE STRING,
PROJN TYPE STRING,
WEMPF TYPE STRING,
MEINS TYPE STRING,
BSMNG TYPE STRING,
MEIN1 TYPE STRING,
WERTU TYPE STRING,
MENGU TYPE STRING,
KZZUG TYPE STRING,
SUMME_H TYPE STRING,
SUMME_S TYPE STRING,
SALDO TYPE STRING,
XHELL TYPE STRING,
XSELK TYPE STRING,
ZEILI TYPE STRING,
IBLNR TYPE STRING,
VBELN TYPE STRING,
ERFMG TYPE STRING,
ERFME TYPE STRING,
POSNR TYPE STRING,
POSNM TYPE STRING,
SOLMG TYPE STRING,
ISTMG TYPE STRING,
XAUSW TYPE STRING,
LGNUM TYPE STRING,
TBFKZ TYPE STRING,
BSSKZ TYPE STRING,
LDEST TYPE STRING,
WEVER TYPE STRING,
SLASH TYPE STRING,
WVERS1 TYPE STRING,
WVERS2 TYPE STRING,
WVERS3 TYPE STRING,
XKONT TYPE STRING,
BUKRS TYPE STRING,
CAPID TYPE STRING,
SMENG TYPE STRING,
STALT TYPE STRING,
STUFE TYPE STRING,
WEGXX TYPE STRING,
XNAPR TYPE STRING,
KZNEB TYPE STRING,
EQUNR TYPE STRING,
BREMS TYPE STRING,
POSIT TYPE STRING,
LFDNR TYPE STRING,
NPLNR TYPE STRING,
VORNR TYPE STRING,
TUMAT TYPE STRING,
TUWRK TYPE STRING,
TULGO TYPE STRING,
TUCHA TYPE STRING,
XABLN TYPE STRING,
VLIEF TYPE STRING,
VBELP TYPE STRING,
EINDB TYPE STRING,
EINDT TYPE STRING,
IDNLF TYPE STRING,
TRAID TYPE STRING,
EAN11 TYPE STRING,
TRATY TYPE STRING,
SCHGT TYPE STRING,
STLAL TYPE STRING,
ELIKZ TYPE STRING,
DUMMY_INCL_EEW_COBL TYPE STRING,
LGORS TYPE STRING,
BEIKZ TYPE STRING,
BTEXT TYPE STRING,
OPTION_MB TYPE STRING,
GWELF TYPE STRING,
GWELS TYPE STRING,
FKBER TYPE STRING,
EXIDV TYPE STRING,
XVERS TYPE STRING,
IMKEY TYPE STRING,
DABRZ TYPE STRING,
WEMPF_VOR TYPE STRING,
XNUVO TYPE STRING,
XNUVR TYPE STRING,
KZVRA TYPE STRING,
GRUND TYPE STRING,
LFBNR TYPE STRING,
LFPOS TYPE STRING,
LFBJA TYPE STRING,
TKNUM TYPE STRING,
PABNUM TYPE STRING,
XDELIV TYPE STRING,
SOBKZS TYPE STRING,
XSBDL TYPE STRING,
MENGM TYPE STRING,
SGT_SCAT TYPE STRING,
FSH_SEASON_YEAR TYPE STRING,
FSH_SEASON TYPE STRING,
FSH_COLLECTION TYPE STRING,
FSH_THEME TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RM07M_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_RM07M_STR-MBLNR sy-vline 
WA_RM07M_STR-MJAHR sy-vline 
WA_RM07M_STR-ZEILE sy-vline 
WA_RM07M_STR-ZEILB sy-vline 
WA_RM07M_STR-KZBEW sy-vline 
WA_RM07M_STR-MTSNR sy-vline 
WA_RM07M_STR-LFSNR sy-vline 
WA_RM07M_STR-BWART sy-vline 
WA_RM07M_STR-BWARTWA sy-vline 
WA_RM07M_STR-BWARTWE sy-vline 
WA_RM07M_STR-MATNR sy-vline 
WA_RM07M_STR-RSNUM sy-vline 
WA_RM07M_STR-RSPOS sy-vline 
WA_RM07M_STR-RSART sy-vline 
WA_RM07M_STR-RSPOB sy-vline 
WA_RM07M_STR-UMWRK sy-vline 
WA_RM07M_STR-UMLGO sy-vline 
WA_RM07M_STR-RSDAT sy-vline 
WA_RM07M_STR-BDTER sy-vline 
WA_RM07M_STR-XCALE sy-vline 
WA_RM07M_STR-KZEAR sy-vline 
WA_RM07M_STR-WERKS sy-vline 
WA_RM07M_STR-LGORT sy-vline 
WA_RM07M_STR-CHARG sy-vline 
WA_RM07M_STR-ZUSCH sy-vline 
WA_RM07M_STR-CHAKZ sy-vline 
WA_RM07M_STR-XINFO sy-vline 
WA_RM07M_STR-SOBKZ sy-vline 
WA_RM07M_STR-ANLN1 sy-vline 
WA_RM07M_STR-ANLN2 sy-vline 
WA_RM07M_STR-AUFNR sy-vline 
WA_RM07M_STR-AUFPS sy-vline 
WA_RM07M_STR-EBELN sy-vline 
WA_RM07M_STR-EBELP sy-vline 
WA_RM07M_STR-LIFNR sy-vline 
WA_RM07M_STR-XMEHR sy-vline 
WA_RM07M_STR-KDAUF sy-vline 
WA_RM07M_STR-KDPOS sy-vline 
WA_RM07M_STR-KDEIN sy-vline 
WA_RM07M_STR-KOSTL sy-vline 
WA_RM07M_STR-PROJN sy-vline 
WA_RM07M_STR-WEMPF sy-vline 
WA_RM07M_STR-MEINS sy-vline 
WA_RM07M_STR-BSMNG sy-vline 
WA_RM07M_STR-MEIN1 sy-vline 
WA_RM07M_STR-WERTU sy-vline 
WA_RM07M_STR-MENGU sy-vline 
WA_RM07M_STR-KZZUG sy-vline 
WA_RM07M_STR-SUMME_H sy-vline 
WA_RM07M_STR-SUMME_S sy-vline 
WA_RM07M_STR-SALDO sy-vline 
WA_RM07M_STR-XHELL sy-vline 
WA_RM07M_STR-XSELK sy-vline 
WA_RM07M_STR-ZEILI sy-vline 
WA_RM07M_STR-IBLNR sy-vline 
WA_RM07M_STR-VBELN sy-vline 
WA_RM07M_STR-ERFMG sy-vline 
WA_RM07M_STR-ERFME sy-vline 
WA_RM07M_STR-POSNR sy-vline 
WA_RM07M_STR-POSNM sy-vline 
WA_RM07M_STR-SOLMG sy-vline 
WA_RM07M_STR-ISTMG sy-vline 
WA_RM07M_STR-XAUSW sy-vline 
WA_RM07M_STR-LGNUM sy-vline 
WA_RM07M_STR-TBFKZ sy-vline 
WA_RM07M_STR-BSSKZ sy-vline 
WA_RM07M_STR-LDEST sy-vline 
WA_RM07M_STR-WEVER sy-vline 
WA_RM07M_STR-SLASH sy-vline 
WA_RM07M_STR-WVERS1 sy-vline 
WA_RM07M_STR-WVERS2 sy-vline 
WA_RM07M_STR-WVERS3 sy-vline 
WA_RM07M_STR-XKONT sy-vline 
WA_RM07M_STR-BUKRS sy-vline 
WA_RM07M_STR-CAPID sy-vline 
WA_RM07M_STR-SMENG sy-vline 
WA_RM07M_STR-STALT sy-vline 
WA_RM07M_STR-STUFE sy-vline 
WA_RM07M_STR-WEGXX sy-vline 
WA_RM07M_STR-XNAPR sy-vline 
WA_RM07M_STR-KZNEB sy-vline 
WA_RM07M_STR-EQUNR sy-vline 
WA_RM07M_STR-BREMS sy-vline 
WA_RM07M_STR-POSIT sy-vline 
WA_RM07M_STR-LFDNR sy-vline 
WA_RM07M_STR-NPLNR sy-vline 
WA_RM07M_STR-VORNR sy-vline 
WA_RM07M_STR-TUMAT sy-vline 
WA_RM07M_STR-TUWRK sy-vline 
WA_RM07M_STR-TULGO sy-vline 
WA_RM07M_STR-TUCHA sy-vline 
WA_RM07M_STR-XABLN sy-vline 
WA_RM07M_STR-VLIEF sy-vline 
WA_RM07M_STR-VBELP sy-vline 
WA_RM07M_STR-EINDB sy-vline 
WA_RM07M_STR-EINDT sy-vline 
WA_RM07M_STR-IDNLF sy-vline 
WA_RM07M_STR-TRAID sy-vline 
WA_RM07M_STR-EAN11 sy-vline 
WA_RM07M_STR-TRATY sy-vline 
WA_RM07M_STR-SCHGT sy-vline 
WA_RM07M_STR-STLAL sy-vline 
WA_RM07M_STR-ELIKZ sy-vline 
WA_RM07M_STR-DUMMY_INCL_EEW_COBL sy-vline 
WA_RM07M_STR-LGORS sy-vline 
WA_RM07M_STR-BEIKZ sy-vline 
WA_RM07M_STR-BTEXT sy-vline 
WA_RM07M_STR-OPTION_MB sy-vline 
WA_RM07M_STR-GWELF sy-vline 
WA_RM07M_STR-GWELS sy-vline 
WA_RM07M_STR-FKBER sy-vline 
WA_RM07M_STR-EXIDV sy-vline 
WA_RM07M_STR-XVERS sy-vline 
WA_RM07M_STR-IMKEY sy-vline 
WA_RM07M_STR-DABRZ sy-vline 
WA_RM07M_STR-WEMPF_VOR sy-vline 
WA_RM07M_STR-XNUVO sy-vline 
WA_RM07M_STR-XNUVR sy-vline 
WA_RM07M_STR-KZVRA sy-vline 
WA_RM07M_STR-GRUND sy-vline 
WA_RM07M_STR-LFBNR sy-vline 
WA_RM07M_STR-LFPOS sy-vline 
WA_RM07M_STR-LFBJA sy-vline 
WA_RM07M_STR-TKNUM sy-vline 
WA_RM07M_STR-PABNUM sy-vline 
WA_RM07M_STR-XDELIV sy-vline 
WA_RM07M_STR-SOBKZS sy-vline 
WA_RM07M_STR-XSBDL sy-vline 
WA_RM07M_STR-MENGM sy-vline 
WA_RM07M_STR-SGT_SCAT sy-vline 
WA_RM07M_STR-FSH_SEASON_YEAR sy-vline 
WA_RM07M_STR-FSH_SEASON sy-vline 
WA_RM07M_STR-FSH_COLLECTION sy-vline 
WA_RM07M_STR-FSH_THEME sy-vline      INTO ld_text SEPARATED BY SPACE.

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