ABAP Select data from SAP table RN2CLIO_MEORDER 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 RN2CLIO_MEORDER 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 RN2CLIO_MEORDER. 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 RN2CLIO_MEORDER 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_RN2CLIO_MEORDER TYPE STANDARD TABLE OF RN2CLIO_MEORDER,
      WA_RN2CLIO_MEORDER TYPE RN2CLIO_MEORDER,
      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: <RN2CLIO_MEORDER> TYPE RN2CLIO_MEORDER.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RN2CLIO_MEORDER
*  INTO TABLE @DATA(IT_RN2CLIO_MEORDER2).
*--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_RN2CLIO_MEORDER INDEX 1 INTO DATA(WA_RN2CLIO_MEORDER2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RN2CLIO_MEORDER>-MANDT = 1.
<RN2CLIO_MEORDER>-MEORDID = 1.
<RN2CLIO_MEORDER>-EINRI = 1.
<RN2CLIO_MEORDER>-PATNR = 1.
<RN2CLIO_MEORDER>-FALNR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RN2CLIO_MEORDER-MOTX, sy-vline,
  WA_RN2CLIO_MEORDER-MOSTX, sy-vline,
  WA_RN2CLIO_MEORDER-MOLTX, sy-vline,
  WA_RN2CLIO_MEORDER-ORGFA, sy-vline,
  WA_RN2CLIO_MEORDER-ORGPF, sy-vline,
  WA_RN2CLIO_MEORDER-MOTYPID, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RN2CLIO_MEORDER 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_RN2CLIO_MEORDER 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_RN2CLIO_MEORDER INTO WA_RN2CLIO_MEORDER.


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

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

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

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

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

*Conversion exit MEQUA, internal->external for field ORDUR
CALL FUNCTION 'CONVERSION_EXIT_MEQUA_OUTPUT'
  EXPORTING
    input =                      WA_RN2CLIO_MEORDER-ORDUR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN2CLIO_MEORDER-ORDUR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MEQUA, internal->external for field PATWGT
CALL FUNCTION 'CONVERSION_EXIT_MEQUA_OUTPUT'
  EXPORTING
    input =                      WA_RN2CLIO_MEORDER-PATWGT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN2CLIO_MEORDER-PATWGT.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MEQUA, internal->external for field PATHGT
CALL FUNCTION 'CONVERSION_EXIT_MEQUA_OUTPUT'
  EXPORTING
    input =                      WA_RN2CLIO_MEORDER-PATHGT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN2CLIO_MEORDER-PATHGT.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MEQUA, internal->external for field PCALOCK
CALL FUNCTION 'CONVERSION_EXIT_MEQUA_OUTPUT'
  EXPORTING
    input =                      WA_RN2CLIO_MEORDER-PCALOCK
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN2CLIO_MEORDER-PCALOCK.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MEQUA, internal->external for field PCAPER
CALL FUNCTION 'CONVERSION_EXIT_MEQUA_OUTPUT'
  EXPORTING
    input =                      WA_RN2CLIO_MEORDER-PCAPER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN2CLIO_MEORDER-PCAPER.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ME12D, internal->external for field DISPQUAN
CALL FUNCTION 'CONVERSION_EXIT_ME12D_OUTPUT'
  EXPORTING
    input =                      WA_RN2CLIO_MEORDER-DISPQUAN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN2CLIO_MEORDER-DISPQUAN.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MEQUA, internal->external for field PDUR
CALL FUNCTION 'CONVERSION_EXIT_MEQUA_OUTPUT'
  EXPORTING
    input =                      WA_RN2CLIO_MEORDER-PDUR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN2CLIO_MEORDER-PDUR.
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_RN2CLIO_MEORDER_STR, 
MANDT TYPE STRING,
MEORDID TYPE STRING,
EINRI TYPE STRING,
PATNR TYPE STRING,
FALNR TYPE STRING,
MOTX TYPE STRING,
MOSTX TYPE STRING,
MOLTX TYPE STRING,
ORGFA TYPE STRING,
ORGPF TYPE STRING,
MOTYPID TYPE STRING,
MOSID TYPE STRING,
APDEV TYPE STRING,
PHFORM TYPE STRING,
APROU TYPE STRING,
MOVDF TYPE STRING,
MOVTF TYPE STRING,
MOVDT TYPE STRING,
MOVTT TYPE STRING,
ORDUR TYPE STRING,
ORDURU TYPE STRING,
EXTD TYPE STRING,
MEDGRPID TYPE STRING,
MOSUBTY TYPE STRING,
MORESP1 TYPE STRING,
MORESP2 TYPE STRING,
MOCONSOU TYPE STRING,
INSTX TYPE STRING,
INLTX TYPE STRING,
ABSG TYPE STRING,
MOPRINT TYPE STRING,
MEOEXT TYPE STRING,
MEOEXTCC TYPE STRING,
EXT_DRUGID TYPE STRING,
MPRESNR TYPE STRING,
MEPSNR TYPE STRING,
MEPSSTX TYPE STRING,
MEPSLTX TYPE STRING,
ORIGIN TYPE STRING,
MOPRN TYPE STRING,
PRNCSTX TYPE STRING,
PRNCLTX TYPE STRING,
OLDIS TYPE STRING,
SLDOSE TYPE STRING,
IVTYPE TYPE STRING,
RECUP TYPE STRING,
STRGTHDOS TYPE STRING,
SELTYP TYPE STRING,
PATWGT TYPE STRING,
PATWGTU TYPE STRING,
PATHGT TYPE STRING,
PATHGTU TYPE STRING,
CALCUD TYPE STRING,
PCALOCK TYPE STRING,
PCALOCKU TYPE STRING,
PCAMAX TYPE STRING,
PCAPER TYPE STRING,
PCAPERU TYPE STRING,
COMPDOS TYPE STRING,
AL TYPE STRING,
CHDVER TYPE STRING,
RCUSE TYPE STRING,
DC_USED TYPE STRING,
VFCOIND TYPE STRING,
ADOUTPAT TYPE STRING,
OUPREP TYPE STRING,
FIXQUAN TYPE STRING,
MEFALAR TYPE STRING,
ERUSR TYPE STRING,
ERDAT TYPE STRING,
ERTIM TYPE STRING,
UPUSR TYPE STRING,
UPDAT TYPE STRING,
UPTIM TYPE STRING,
STORN TYPE STRING,
STUSR TYPE STRING,
STDAT TYPE STRING,
STOID TYPE STRING,
NMRF TYPE STRING,
INPAT_ALLOWED TYPE STRING,
DAYPAT_ALLOWED TYPE STRING,
OUTPAT_ALLOWED TYPE STRING,
IMDOSE TYPE STRING,
PURPOSE TYPE STRING,
DISPQUAN TYPE STRING,
DISPQUANU TYPE STRING,
TPID TYPE STRING,
DURMETH TYPE STRING,
VALTIME TYPE STRING,
VALVMA TYPE STRING,
ENDORIGIN TYPE STRING,
ORMOVDT TYPE STRING,
ORMOVTT TYPE STRING,
PDUR TYPE STRING,
PDURU TYPE STRING,
DOSDEF TYPE STRING,
DCM TYPE STRING,
DELAY TYPE STRING,
DELAYU TYPE STRING,
FIXEDDELAY TYPE STRING,
SPECREQ TYPE STRING,
AUTIDEM TYPE STRING,
EMORD TYPE STRING,
COUNTDAY TYPE STRING,
PDUR_MODE TYPE STRING,
FORMULARY_DESCR TYPE STRING,
DOSE_DESCR TYPE STRING,
VALIDITY TYPE STRING,
SPECIFICS TYPE STRING,
HISTORY TYPE STRING,
ADMIN_INFO TYPE STRING,
ADMIN_PROGRESS TYPE STRING,
SPECIFIC TYPE STRING,
EXT_STATUS_DESCR TYPE STRING,
INT_STATUS TYPE STRING,
PURPOSE_DESCR TYPE STRING,
T_ORD_HIST TYPE STRING,
LAST_ADMIN TYPE STRING,
NEXT_ADMIN TYPE STRING,
SUBST TYPE STRING,
SUSP TYPE STRING,
NO_ADMIN TYPE STRING,
ORGFAKB TYPE STRING,
ORGPFKB TYPE STRING,
ROUTEDESC TYPE STRING,
ROUTE TYPE STRING,
EINKB TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RN2CLIO_MEORDER_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_RN2CLIO_MEORDER_STR-MANDT sy-vline 
WA_RN2CLIO_MEORDER_STR-MEORDID sy-vline 
WA_RN2CLIO_MEORDER_STR-EINRI sy-vline 
WA_RN2CLIO_MEORDER_STR-PATNR sy-vline 
WA_RN2CLIO_MEORDER_STR-FALNR sy-vline 
WA_RN2CLIO_MEORDER_STR-MOTX sy-vline 
WA_RN2CLIO_MEORDER_STR-MOSTX sy-vline 
WA_RN2CLIO_MEORDER_STR-MOLTX sy-vline 
WA_RN2CLIO_MEORDER_STR-ORGFA sy-vline 
WA_RN2CLIO_MEORDER_STR-ORGPF sy-vline 
WA_RN2CLIO_MEORDER_STR-MOTYPID sy-vline 
WA_RN2CLIO_MEORDER_STR-MOSID sy-vline 
WA_RN2CLIO_MEORDER_STR-APDEV sy-vline 
WA_RN2CLIO_MEORDER_STR-PHFORM sy-vline 
WA_RN2CLIO_MEORDER_STR-APROU sy-vline 
WA_RN2CLIO_MEORDER_STR-MOVDF sy-vline 
WA_RN2CLIO_MEORDER_STR-MOVTF sy-vline 
WA_RN2CLIO_MEORDER_STR-MOVDT sy-vline 
WA_RN2CLIO_MEORDER_STR-MOVTT sy-vline 
WA_RN2CLIO_MEORDER_STR-ORDUR sy-vline 
WA_RN2CLIO_MEORDER_STR-ORDURU sy-vline 
WA_RN2CLIO_MEORDER_STR-EXTD sy-vline 
WA_RN2CLIO_MEORDER_STR-MEDGRPID sy-vline 
WA_RN2CLIO_MEORDER_STR-MOSUBTY sy-vline 
WA_RN2CLIO_MEORDER_STR-MORESP1 sy-vline 
WA_RN2CLIO_MEORDER_STR-MORESP2 sy-vline 
WA_RN2CLIO_MEORDER_STR-MOCONSOU sy-vline 
WA_RN2CLIO_MEORDER_STR-INSTX sy-vline 
WA_RN2CLIO_MEORDER_STR-INLTX sy-vline 
WA_RN2CLIO_MEORDER_STR-ABSG sy-vline 
WA_RN2CLIO_MEORDER_STR-MOPRINT sy-vline 
WA_RN2CLIO_MEORDER_STR-MEOEXT sy-vline 
WA_RN2CLIO_MEORDER_STR-MEOEXTCC sy-vline 
WA_RN2CLIO_MEORDER_STR-EXT_DRUGID sy-vline 
WA_RN2CLIO_MEORDER_STR-MPRESNR sy-vline 
WA_RN2CLIO_MEORDER_STR-MEPSNR sy-vline 
WA_RN2CLIO_MEORDER_STR-MEPSSTX sy-vline 
WA_RN2CLIO_MEORDER_STR-MEPSLTX sy-vline 
WA_RN2CLIO_MEORDER_STR-ORIGIN sy-vline 
WA_RN2CLIO_MEORDER_STR-MOPRN sy-vline 
WA_RN2CLIO_MEORDER_STR-PRNCSTX sy-vline 
WA_RN2CLIO_MEORDER_STR-PRNCLTX sy-vline 
WA_RN2CLIO_MEORDER_STR-OLDIS sy-vline 
WA_RN2CLIO_MEORDER_STR-SLDOSE sy-vline 
WA_RN2CLIO_MEORDER_STR-IVTYPE sy-vline 
WA_RN2CLIO_MEORDER_STR-RECUP sy-vline 
WA_RN2CLIO_MEORDER_STR-STRGTHDOS sy-vline 
WA_RN2CLIO_MEORDER_STR-SELTYP sy-vline 
WA_RN2CLIO_MEORDER_STR-PATWGT sy-vline 
WA_RN2CLIO_MEORDER_STR-PATWGTU sy-vline 
WA_RN2CLIO_MEORDER_STR-PATHGT sy-vline 
WA_RN2CLIO_MEORDER_STR-PATHGTU sy-vline 
WA_RN2CLIO_MEORDER_STR-CALCUD sy-vline 
WA_RN2CLIO_MEORDER_STR-PCALOCK sy-vline 
WA_RN2CLIO_MEORDER_STR-PCALOCKU sy-vline 
WA_RN2CLIO_MEORDER_STR-PCAMAX sy-vline 
WA_RN2CLIO_MEORDER_STR-PCAPER sy-vline 
WA_RN2CLIO_MEORDER_STR-PCAPERU sy-vline 
WA_RN2CLIO_MEORDER_STR-COMPDOS sy-vline 
WA_RN2CLIO_MEORDER_STR-AL sy-vline 
WA_RN2CLIO_MEORDER_STR-CHDVER sy-vline 
WA_RN2CLIO_MEORDER_STR-RCUSE sy-vline 
WA_RN2CLIO_MEORDER_STR-DC_USED sy-vline 
WA_RN2CLIO_MEORDER_STR-VFCOIND sy-vline 
WA_RN2CLIO_MEORDER_STR-ADOUTPAT sy-vline 
WA_RN2CLIO_MEORDER_STR-OUPREP sy-vline 
WA_RN2CLIO_MEORDER_STR-FIXQUAN sy-vline 
WA_RN2CLIO_MEORDER_STR-MEFALAR sy-vline 
WA_RN2CLIO_MEORDER_STR-ERUSR sy-vline 
WA_RN2CLIO_MEORDER_STR-ERDAT sy-vline 
WA_RN2CLIO_MEORDER_STR-ERTIM sy-vline 
WA_RN2CLIO_MEORDER_STR-UPUSR sy-vline 
WA_RN2CLIO_MEORDER_STR-UPDAT sy-vline 
WA_RN2CLIO_MEORDER_STR-UPTIM sy-vline 
WA_RN2CLIO_MEORDER_STR-STORN sy-vline 
WA_RN2CLIO_MEORDER_STR-STUSR sy-vline 
WA_RN2CLIO_MEORDER_STR-STDAT sy-vline 
WA_RN2CLIO_MEORDER_STR-STOID sy-vline 
WA_RN2CLIO_MEORDER_STR-NMRF sy-vline 
WA_RN2CLIO_MEORDER_STR-INPAT_ALLOWED sy-vline 
WA_RN2CLIO_MEORDER_STR-DAYPAT_ALLOWED sy-vline 
WA_RN2CLIO_MEORDER_STR-OUTPAT_ALLOWED sy-vline 
WA_RN2CLIO_MEORDER_STR-IMDOSE sy-vline 
WA_RN2CLIO_MEORDER_STR-PURPOSE sy-vline 
WA_RN2CLIO_MEORDER_STR-DISPQUAN sy-vline 
WA_RN2CLIO_MEORDER_STR-DISPQUANU sy-vline 
WA_RN2CLIO_MEORDER_STR-TPID sy-vline 
WA_RN2CLIO_MEORDER_STR-DURMETH sy-vline 
WA_RN2CLIO_MEORDER_STR-VALTIME sy-vline 
WA_RN2CLIO_MEORDER_STR-VALVMA sy-vline 
WA_RN2CLIO_MEORDER_STR-ENDORIGIN sy-vline 
WA_RN2CLIO_MEORDER_STR-ORMOVDT sy-vline 
WA_RN2CLIO_MEORDER_STR-ORMOVTT sy-vline 
WA_RN2CLIO_MEORDER_STR-PDUR sy-vline 
WA_RN2CLIO_MEORDER_STR-PDURU sy-vline 
WA_RN2CLIO_MEORDER_STR-DOSDEF sy-vline 
WA_RN2CLIO_MEORDER_STR-DCM sy-vline 
WA_RN2CLIO_MEORDER_STR-DELAY sy-vline 
WA_RN2CLIO_MEORDER_STR-DELAYU sy-vline 
WA_RN2CLIO_MEORDER_STR-FIXEDDELAY sy-vline 
WA_RN2CLIO_MEORDER_STR-SPECREQ sy-vline 
WA_RN2CLIO_MEORDER_STR-AUTIDEM sy-vline 
WA_RN2CLIO_MEORDER_STR-EMORD sy-vline 
WA_RN2CLIO_MEORDER_STR-COUNTDAY sy-vline 
WA_RN2CLIO_MEORDER_STR-PDUR_MODE sy-vline 
WA_RN2CLIO_MEORDER_STR-FORMULARY_DESCR sy-vline 
WA_RN2CLIO_MEORDER_STR-DOSE_DESCR sy-vline 
WA_RN2CLIO_MEORDER_STR-VALIDITY sy-vline 
WA_RN2CLIO_MEORDER_STR-SPECIFICS sy-vline 
WA_RN2CLIO_MEORDER_STR-HISTORY sy-vline 
WA_RN2CLIO_MEORDER_STR-ADMIN_INFO sy-vline 
WA_RN2CLIO_MEORDER_STR-ADMIN_PROGRESS sy-vline 
WA_RN2CLIO_MEORDER_STR-SPECIFIC sy-vline 
WA_RN2CLIO_MEORDER_STR-EXT_STATUS_DESCR sy-vline 
WA_RN2CLIO_MEORDER_STR-INT_STATUS sy-vline 
WA_RN2CLIO_MEORDER_STR-PURPOSE_DESCR sy-vline 
WA_RN2CLIO_MEORDER_STR-T_ORD_HIST sy-vline 
WA_RN2CLIO_MEORDER_STR-LAST_ADMIN sy-vline 
WA_RN2CLIO_MEORDER_STR-NEXT_ADMIN sy-vline 
WA_RN2CLIO_MEORDER_STR-SUBST sy-vline 
WA_RN2CLIO_MEORDER_STR-SUSP sy-vline 
WA_RN2CLIO_MEORDER_STR-NO_ADMIN sy-vline 
WA_RN2CLIO_MEORDER_STR-ORGFAKB sy-vline 
WA_RN2CLIO_MEORDER_STR-ORGPFKB sy-vline 
WA_RN2CLIO_MEORDER_STR-ROUTEDESC sy-vline 
WA_RN2CLIO_MEORDER_STR-ROUTE sy-vline 
WA_RN2CLIO_MEORDER_STR-EINKB sy-vline      INTO ld_text SEPARATED BY SPACE.

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