ABAP Select data from SAP table RFM_CBC_ARTICLE 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 RFM_CBC_ARTICLE 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 RFM_CBC_ARTICLE. 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 RFM_CBC_ARTICLE 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_RFM_CBC_ARTICLE TYPE STANDARD TABLE OF RFM_CBC_ARTICLE,
      WA_RFM_CBC_ARTICLE TYPE RFM_CBC_ARTICLE,
      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: <RFM_CBC_ARTICLE> TYPE RFM_CBC_ARTICLE.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RFM_CBC_ARTICLE
*  INTO TABLE @DATA(IT_RFM_CBC_ARTICLE2).
*--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_RFM_CBC_ARTICLE INDEX 1 INTO DATA(WA_RFM_CBC_ARTICLE2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RFM_CBC_ARTICLE>-I_MANDT = 1.
<RFM_CBC_ARTICLE>-I_MATNR = 1.
<RFM_CBC_ARTICLE>-I_ROW_NO = 1.
<RFM_CBC_ARTICLE>-I_ATTYP = 1.
<RFM_CBC_ARTICLE>-I_INFO_CHARAC = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RFM_CBC_ARTICLE-I_INFO_CHARACVAL, sy-vline,
  WA_RFM_CBC_ARTICLE-I_CLASS, sy-vline,
  WA_RFM_CBC_ARTICLE-I_KLART, sy-vline,
  WA_RFM_CBC_ARTICLE-I_SATNR, sy-vline,
  WA_RFM_CBC_ARTICLE-I_CHARAC_01, sy-vline,
  WA_RFM_CBC_ARTICLE-I_CHARACVAL_01, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RFM_CBC_ARTICLE 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_RFM_CBC_ARTICLE 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_RFM_CBC_ARTICLE INTO WA_RFM_CBC_ARTICLE.


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

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

*Conversion exit ISOLA, internal->external for field I_SPRAS_01
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_RFM_CBC_ARTICLE-I_SPRAS_01
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFM_CBC_ARTICLE-I_SPRAS_01.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field I_SPRAS_02
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_RFM_CBC_ARTICLE-I_SPRAS_02
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFM_CBC_ARTICLE-I_SPRAS_02.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit PERKZ, internal->external for field I_DATTP
CALL FUNCTION 'CONVERSION_EXIT_PERKZ_OUTPUT'
  EXPORTING
    input =                      WA_RFM_CBC_ARTICLE-I_DATTP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFM_CBC_ARTICLE-I_DATTP.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ISOLA, internal->external for field I_MAMT_SPRAS_01
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_RFM_CBC_ARTICLE-I_MAMT_SPRAS_01
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFM_CBC_ARTICLE-I_MAMT_SPRAS_01.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field I_MAMT_SPRAS_02
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_RFM_CBC_ARTICLE-I_MAMT_SPRAS_02
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFM_CBC_ARTICLE-I_MAMT_SPRAS_02.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit EAN11, internal->external for field I_MEAN_EAN11
CALL FUNCTION 'CONVERSION_EXIT_EAN11_OUTPUT'
  EXPORTING
    input =                      WA_RFM_CBC_ARTICLE-I_MEAN_EAN11
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFM_CBC_ARTICLE-I_MEAN_EAN11.
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_RFM_CBC_ARTICLE_STR, 
I_MANDT TYPE STRING,
I_MATNR TYPE STRING,
I_ROW_NO TYPE STRING,
I_ATTYP TYPE STRING,
I_INFO_CHARAC TYPE STRING,
I_INFO_CHARACVAL TYPE STRING,
I_CLASS TYPE STRING,
I_KLART TYPE STRING,
I_SATNR TYPE STRING,
I_CHARAC_01 TYPE STRING,
I_CHARACVAL_01 TYPE STRING,
I_CHARAC_02 TYPE STRING,
I_CHARACVAL_02 TYPE STRING,
I_MTART TYPE STRING,
I_MATKL TYPE STRING,
I_BISMT TYPE STRING,
I_ERSDA TYPE STRING,
I_MAKTX_01 TYPE STRING,
I_SPRAS_01 TYPE STRING,
I_MAKTX_02 TYPE STRING,
I_SPRAS_02 TYPE STRING,
I_MEINS TYPE STRING,
I_BSTME TYPE STRING,
I_VRKME TYPE STRING,
I_AUSME TYPE STRING,
I_NTGEW TYPE STRING,
I_TRAGR TYPE STRING,
I_LADGR TYPE STRING,
I_VABME TYPE STRING,
I_MAGRV TYPE STRING,
I_MTPOS_MARA TYPE STRING,
I_VHIART TYPE STRING,
I_SPROF TYPE STRING,
I_WPM_ALLOW TYPE STRING,
I_MHDRZ TYPE STRING,
I_MHDHB TYPE STRING,
I_DATTP TYPE STRING,
I_MAABC TYPE STRING,
I_HERKL TYPE STRING,
I_TAKLV TYPE STRING,
I_ALAND TYPE STRING,
I_SPART TYPE STRING,
I_WRF_BRAND_ID TYPE STRING,
I_MSTAE TYPE STRING,
I_MSTDE TYPE STRING,
I_MSTAV TYPE STRING,
I_MSTDV TYPE STRING,
I_BKLAS TYPE STRING,
I_INHAL TYPE STRING,
I_INHBR TYPE STRING,
I_INHME TYPE STRING,
I_VPREH TYPE STRING,
I_TAXIM1 TYPE STRING,
I_BWSCL TYPE STRING,
I_MLGUT TYPE STRING,
I_DATAB TYPE STRING,
I_LIQDT TYPE STRING,
I_MHDLP TYPE STRING,
I_RDMHD TYPE STRING,
I_PL_RMATP TYPE STRING,
I_VDVFL TYPE STRING,
I_VDVZL TYPE STRING,
I_VDBFL TYPE STRING,
I_VDBZL TYPE STRING,
I_PMATN TYPE STRING,
I_HERKR TYPE STRING,
I_PRODH TYPE STRING,
I_WERKS_01 TYPE STRING,
I_DISMM_01 TYPE STRING,
I_DISLS_01 TYPE STRING,
I_EISBE_01 TYPE STRING,
I_PERKZ TYPE STRING,
I_DISPO_01 TYPE STRING,
I_LFRHY_01 TYPE STRING,
I_MRPPP TYPE STRING,
I_PLIFZ_01 TYPE STRING,
I_MARC_BWSCL_01 TYPE STRING,
I_EKGRP TYPE STRING,
I_KAUTB TYPE STRING,
I_MTVFP TYPE STRING,
I_XMCNG_01 TYPE STRING,
I_FPRFM TYPE STRING,
I_MARC_LADGR TYPE STRING,
I_AUSME_01 TYPE STRING,
I_AUTRU TYPE STRING,
I_RDPRF_01 TYPE STRING,
I_BESKZ TYPE STRING,
I_EPRIO TYPE STRING,
I_LGFSB_01 TYPE STRING,
I_PRMOD TYPE STRING,
I_PRCTR TYPE STRING,
I_MARC_HERKL_01 TYPE STRING,
I_FHORI_01 TYPE STRING,
I_SBDKZ_01 TYPE STRING,
I_PERAN TYPE STRING,
I_ANZPR TYPE STRING,
I_KZINI TYPE STRING,
I_SIGGR TYPE STRING,
I_MODAV TYPE STRING,
I_WRF_CONS TYPE STRING,
I_WAERS_01 TYPE STRING,
I_VERPR_01 TYPE STRING,
I_WAERS_02 TYPE STRING,
I_VERPR_02 TYPE STRING,
I_PEINH TYPE STRING,
I_VPRSV TYPE STRING,
I_WERKS_02 TYPE STRING,
I_DISMM_02 TYPE STRING,
I_DISLS_02 TYPE STRING,
I_EISBE_02 TYPE STRING,
I_DISPO_02 TYPE STRING,
I_LFRHY_02 TYPE STRING,
I_PLIFZ_02 TYPE STRING,
I_MARC_BWSCL_02 TYPE STRING,
I_MARC_HERKL_02 TYPE STRING,
I_XMCNG_02 TYPE STRING,
I_AUSME_02 TYPE STRING,
I_LGFSB_02 TYPE STRING,
I_FHORI_02 TYPE STRING,
I_SBDKZ_02 TYPE STRING,
I_MRPPP_02 TYPE STRING,
I_TRCOV_02 TYPE STRING,
I_VKORG_01 TYPE STRING,
I_VTWEG_01 TYPE STRING,
I_MVKE_VRKME_01 TYPE STRING,
I_MTPOS TYPE STRING,
I_SKTOF TYPE STRING,
I_MVKE_VDVFL TYPE STRING,
I_MVKE_VDBFL TYPE STRING,
I_VKORG_02 TYPE STRING,
I_VTWEG_02 TYPE STRING,
I_MVKE_VRKME_02 TYPE STRING,
I_VKORG_03 TYPE STRING,
I_VTWEG_03 TYPE STRING,
I_MVKE_VRKME_03 TYPE STRING,
I_VKORG_04 TYPE STRING,
I_VTWEG_04 TYPE STRING,
I_MVKE_VRKME_04 TYPE STRING,
I_VKORG_05 TYPE STRING,
I_VTWEG_05 TYPE STRING,
I_MVKE_VRKME_05 TYPE STRING,
I_VKORG_06 TYPE STRING,
I_VTWEG_06 TYPE STRING,
I_MVKE_VRKME_06 TYPE STRING,
I_LAENG TYPE STRING,
I_BREIT TYPE STRING,
I_HOEHE TYPE STRING,
I_MEABM TYPE STRING,
I_BRGEW TYPE STRING,
I_GEWEI TYPE STRING,
I_VOLUM TYPE STRING,
I_VOLEH TYPE STRING,
I_EAN11 TYPE STRING,
I_NUMTP TYPE STRING,
I_MEINS_02 TYPE STRING,
I_UMREZ_02 TYPE STRING,
I_UMREN_02 TYPE STRING,
I_LAENG_02 TYPE STRING,
I_BREIT_02 TYPE STRING,
I_HOEHE_02 TYPE STRING,
I_MEABM_02 TYPE STRING,
I_MESUB_02 TYPE STRING,
I_BRGEW_02 TYPE STRING,
I_GEWEI_02 TYPE STRING,
I_VOLUM_02 TYPE STRING,
I_VOLEH_02 TYPE STRING,
I_EAN11_02 TYPE STRING,
I_NUMTP_02 TYPE STRING,
I_MEINS_03 TYPE STRING,
I_UMREZ_03 TYPE STRING,
I_UMREN_03 TYPE STRING,
I_LAENG_03 TYPE STRING,
I_BREIT_03 TYPE STRING,
I_HOEHE_03 TYPE STRING,
I_MEABM_03 TYPE STRING,
I_MESUB_03 TYPE STRING,
I_BRGEW_03 TYPE STRING,
I_GEWEI_03 TYPE STRING,
I_VOLUM_03 TYPE STRING,
I_VOLEH_03 TYPE STRING,
I_EAN11_03 TYPE STRING,
I_NUMTP_03 TYPE STRING,
I_MAMT_MAKTM_01 TYPE STRING,
I_MAMT_SPRAS_01 TYPE STRING,
I_MAMT_MAKTM_02 TYPE STRING,
I_MAMT_SPRAS_02 TYPE STRING,
I_MAMT_LRMEI TYPE STRING,
I_MAMT_MTXID TYPE STRING,
I_MEAN_MEINH TYPE STRING,
I_MEAN_EAN11 TYPE STRING,
I_MEAN_NUMTP TYPE STRING,
I_MEAN_HPEAN TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RFM_CBC_ARTICLE_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_RFM_CBC_ARTICLE_STR-I_MANDT sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MATNR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_ROW_NO sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_ATTYP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_INFO_CHARAC sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_INFO_CHARACVAL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_CLASS sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_KLART sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SATNR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_CHARAC_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_CHARACVAL_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_CHARAC_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_CHARACVAL_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MTART sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MATKL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BISMT sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_ERSDA sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAKTX_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SPRAS_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAKTX_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SPRAS_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEINS sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BSTME sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VRKME sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_AUSME sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_NTGEW sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_TRAGR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LADGR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VABME sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAGRV sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MTPOS_MARA sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VHIART sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SPROF sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_WPM_ALLOW sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MHDRZ sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MHDHB sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DATTP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAABC sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_HERKL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_TAKLV sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_ALAND sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SPART sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_WRF_BRAND_ID sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MSTAE sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MSTDE sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MSTAV sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MSTDV sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BKLAS sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_INHAL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_INHBR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_INHME sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VPREH sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_TAXIM1 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BWSCL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MLGUT sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DATAB sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LIQDT sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MHDLP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_RDMHD sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PL_RMATP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VDVFL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VDVZL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VDBFL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VDBZL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PMATN sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_HERKR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PRODH sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_WERKS_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DISMM_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DISLS_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_EISBE_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PERKZ sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DISPO_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LFRHY_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MRPPP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PLIFZ_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MARC_BWSCL_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_EKGRP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_KAUTB sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MTVFP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_XMCNG_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_FPRFM sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MARC_LADGR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_AUSME_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_AUTRU sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_RDPRF_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BESKZ sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_EPRIO sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LGFSB_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PRMOD sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PRCTR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MARC_HERKL_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_FHORI_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SBDKZ_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PERAN sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_ANZPR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_KZINI sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SIGGR sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MODAV sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_WRF_CONS sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_WAERS_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VERPR_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_WAERS_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VERPR_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PEINH sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VPRSV sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_WERKS_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DISMM_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DISLS_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_EISBE_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_DISPO_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LFRHY_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_PLIFZ_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MARC_BWSCL_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MARC_HERKL_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_XMCNG_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_AUSME_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LGFSB_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_FHORI_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SBDKZ_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MRPPP_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_TRCOV_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VKORG_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VTWEG_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VRKME_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MTPOS sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_SKTOF sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VDVFL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VDBFL sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VKORG_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VTWEG_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VRKME_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VKORG_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VTWEG_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VRKME_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VKORG_04 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VTWEG_04 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VRKME_04 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VKORG_05 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VTWEG_05 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VRKME_05 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VKORG_06 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VTWEG_06 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MVKE_VRKME_06 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LAENG sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BREIT sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_HOEHE sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEABM sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BRGEW sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_GEWEI sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VOLUM sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VOLEH sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_EAN11 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_NUMTP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEINS_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_UMREZ_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_UMREN_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LAENG_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BREIT_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_HOEHE_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEABM_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MESUB_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BRGEW_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_GEWEI_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VOLUM_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VOLEH_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_EAN11_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_NUMTP_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEINS_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_UMREZ_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_UMREN_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_LAENG_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BREIT_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_HOEHE_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEABM_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MESUB_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_BRGEW_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_GEWEI_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VOLUM_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_VOLEH_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_EAN11_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_NUMTP_03 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAMT_MAKTM_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAMT_SPRAS_01 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAMT_MAKTM_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAMT_SPRAS_02 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAMT_LRMEI sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MAMT_MTXID sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEAN_MEINH sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEAN_EAN11 sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEAN_NUMTP sy-vline 
WA_RFM_CBC_ARTICLE_STR-I_MEAN_HPEAN sy-vline      INTO ld_text SEPARATED BY SPACE.

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