ABAP Select data from SAP table RN1WP_MEORDER_LIST 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 RN1WP_MEORDER_LIST 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 RN1WP_MEORDER_LIST. 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 RN1WP_MEORDER_LIST 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_RN1WP_MEORDER_LIST TYPE STANDARD TABLE OF RN1WP_MEORDER_LIST,
      WA_RN1WP_MEORDER_LIST TYPE RN1WP_MEORDER_LIST,
      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: <RN1WP_MEORDER_LIST> TYPE RN1WP_MEORDER_LIST.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RN1WP_MEORDER_LIST
*  INTO TABLE @DATA(IT_RN1WP_MEORDER_LIST2).
*--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_RN1WP_MEORDER_LIST INDEX 1 INTO DATA(WA_RN1WP_MEORDER_LIST2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RN1WP_MEORDER_LIST>-NNAME = 1.
<RN1WP_MEORDER_LIST>-VNAME = 1.
<RN1WP_MEORDER_LIST>-GSCHLE = 1.
<RN1WP_MEORDER_LIST>-AGEPAT = 1.
<RN1WP_MEORDER_LIST>-AGEUNIT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RN1WP_MEORDER_LIST-PNAMEC1, sy-vline,
  WA_RN1WP_MEORDER_LIST-GBDAT, sy-vline,
  WA_RN1WP_MEORDER_LIST-VIP, sy-vline,
  WA_RN1WP_MEORDER_LIST-RISKF, sy-vline,
  WA_RN1WP_MEORDER_LIST-MPRESNR, sy-vline,
  WA_RN1WP_MEORDER_LIST-EXPRESNR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RN1WP_MEORDER_LIST 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_RN1WP_MEORDER_LIST 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_RN1WP_MEORDER_LIST INTO WA_RN1WP_MEORDER_LIST.


*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_RN1WP_MEORDER_LIST-EINRI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN1WP_MEORDER_LIST-EINRI.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit MEQUA, internal->external for field NEXT_ADRATE
CALL FUNCTION 'CONVERSION_EXIT_MEQUA_OUTPUT'
  EXPORTING
    input =                      WA_RN1WP_MEORDER_LIST-NEXT_ADRATE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN1WP_MEORDER_LIST-NEXT_ADRATE.
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_RN1WP_MEORDER_LIST_STR, 
NNAME TYPE STRING,
VNAME TYPE STRING,
GSCHLE TYPE STRING,
AGEPAT TYPE STRING,
AGEUNIT TYPE STRING,
PNAMEC1 TYPE STRING,
GBDAT TYPE STRING,
VIP TYPE STRING,
RISKF TYPE STRING,
MPRESNR TYPE STRING,
EXPRESNR TYPE STRING,
EINRI TYPE STRING,
PATNR TYPE STRING,
MPRESD TYPE STRING,
MORESP1 TYPE STRING,
MORESP1_NAME TYPE STRING,
MEORDID TYPE STRING,
FALNR TYPE STRING,
FALAR TYPE STRING,
MOTX TYPE STRING,
MOSTX TYPE STRING,
MOLTX TYPE STRING,
ORGFA TYPE STRING,
ORGPF TYPE STRING,
MOTYP TYPE STRING,
USERST 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,
MEDGROUP TYPE STRING,
MORESP2 TYPE STRING,
CONSNAME TYPE STRING,
MOCONSOU TYPE STRING,
INSTX TYPE STRING,
INLTX TYPE STRING,
ABSG TYPE STRING,
MOPREXT TYPE STRING,
MEOEXT TYPE STRING,
MEOEXTCC 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,
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,
VFCOIND TYPE STRING,
ADOUTPAT TYPE STRING,
N1ID TYPE STRING,
ODESCR 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,
MEDOC TYPE STRING,
NEWRVER TYPE STRING,
MULTRAT TYPE STRING,
DRUGID TYPE STRING,
DRUGNAME TYPE STRING,
PDRUGDQ TYPE STRING,
DRUGU TYPE STRING,
DRUGASTR TYPE STRING,
DRUGASTRU TYPE STRING,
DOSE TYPE STRING,
DOSEU TYPE STRING,
RECAA TYPE STRING,
DOSDEF TYPE STRING,
RECU TYPE STRING,
DOSDEFU TYPE STRING,
RECAM TYPE STRING,
AGENTID TYPE STRING,
FSOURCE TYPE STRING,
PDUR TYPE STRING,
PDURU TYPE STRING,
RECQUAN TYPE STRING,
RECQUANU TYPE STRING,
BEGDT TYPE STRING,
ENDDT TYPE STRING,
CATID TYPE STRING,
RCDEACT TYPE STRING,
NOTE1 TYPE STRING,
NOTE2 TYPE STRING,
NOTE3 TYPE STRING,
AUTIDEM TYPE STRING,
CATIDBDC TYPE STRING,
EXTCATID TYPE STRING,
MATNR TYPE STRING,
NARCOTIC TYPE STRING,
PSYCHO TYPE STRING,
CONTR TYPE STRING,
SECWITNESS TYPE STRING,
NOCRUSH TYPE STRING,
PBDAD TYPE STRING,
PBTAD TYPE STRING,
FSOURCE_E TYPE STRING,
EVEXT TYPE STRING,
EVCNC TYPE STRING,
EVADM TYPE STRING,
PURPOSE TYPE STRING,
CT TYPE STRING,
ROOM TYPE STRING,
BED TYPE STRING,
CS TYPE STRING,
CELLSTYLE TYPE STRING,
SPECREQ TYPE STRING,
TREATDAY TYPE STRING,
ORDERDAY TYPE STRING,
ACTEXIST TYPE STRING,
ACTPDT TYPE STRING,
VERIFICAT TYPE STRING,
NOTE_GEN_BUT TYPE STRING,
ORDSEQ_STDAT TYPE STRING,
EMORD TYPE STRING,
CUR_ADRATE TYPE STRING,
CUR_ADRATEU TYPE STRING,
NEXT_DBRATE TYPE STRING,
NEXT_TBRATE TYPE STRING,
NEXT_RTYPE TYPE STRING,
NEXT_ADRATE TYPE STRING,
NEXT_ADRATEU TYPE STRING,
BAG_EMPTY_TIME TYPE STRING,
BAG_EMPTY TYPE STRING,
IVTYPE_ICON TYPE STRING,
NO_TC_ICON TYPE STRING,
ADPAT_STATE_ICON TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RN1WP_MEORDER_LIST_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_RN1WP_MEORDER_LIST_STR-NNAME sy-vline 
WA_RN1WP_MEORDER_LIST_STR-VNAME sy-vline 
WA_RN1WP_MEORDER_LIST_STR-GSCHLE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-AGEPAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-AGEUNIT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PNAMEC1 sy-vline 
WA_RN1WP_MEORDER_LIST_STR-GBDAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-VIP sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RISKF sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MPRESNR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EXPRESNR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EINRI sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PATNR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MPRESD sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MORESP1 sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MORESP1_NAME sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEORDID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-FALNR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-FALAR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOSTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOLTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ORGFA sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ORGPF sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOTYP sy-vline 
WA_RN1WP_MEORDER_LIST_STR-USERST sy-vline 
WA_RN1WP_MEORDER_LIST_STR-APDEV sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PHFORM sy-vline 
WA_RN1WP_MEORDER_LIST_STR-APROU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOVDF sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOVTF sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOVDT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOVTT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ORDUR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ORDURU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EXTD sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEDGRPID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEDGROUP sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MORESP2 sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CONSNAME sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOCONSOU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-INSTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-INLTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ABSG sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOPREXT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEOEXT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEOEXTCC sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEPSNR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEPSSTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEPSLTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ORIGIN sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MOPRN sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PRNCSTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PRNCLTX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-OLDIS sy-vline 
WA_RN1WP_MEORDER_LIST_STR-SLDOSE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-IVTYPE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PATWGT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PATWGTU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PATHGT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PATHGTU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CALCUD sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PCALOCK sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PCALOCKU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PCAMAX sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PCAPER sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PCAPERU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-COMPDOS sy-vline 
WA_RN1WP_MEORDER_LIST_STR-AL sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CHDVER sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RCUSE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-VFCOIND sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ADOUTPAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-N1ID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ODESCR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ERUSR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ERDAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ERTIM sy-vline 
WA_RN1WP_MEORDER_LIST_STR-UPUSR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-UPDAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-UPTIM sy-vline 
WA_RN1WP_MEORDER_LIST_STR-STORN sy-vline 
WA_RN1WP_MEORDER_LIST_STR-STUSR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-STDAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-STOID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MEDOC sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NEWRVER sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MULTRAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DRUGID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DRUGNAME sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PDRUGDQ sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DRUGU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DRUGASTR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DRUGASTRU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DOSE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DOSEU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RECAA sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DOSDEF sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RECU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-DOSDEFU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RECAM sy-vline 
WA_RN1WP_MEORDER_LIST_STR-AGENTID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-FSOURCE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PDUR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PDURU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RECQUAN sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RECQUANU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-BEGDT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ENDDT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CATID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-RCDEACT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NOTE1 sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NOTE2 sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NOTE3 sy-vline 
WA_RN1WP_MEORDER_LIST_STR-AUTIDEM sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CATIDBDC sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EXTCATID sy-vline 
WA_RN1WP_MEORDER_LIST_STR-MATNR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NARCOTIC sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PSYCHO sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CONTR sy-vline 
WA_RN1WP_MEORDER_LIST_STR-SECWITNESS sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NOCRUSH sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PBDAD sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PBTAD sy-vline 
WA_RN1WP_MEORDER_LIST_STR-FSOURCE_E sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EVEXT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EVCNC sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EVADM sy-vline 
WA_RN1WP_MEORDER_LIST_STR-PURPOSE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ROOM sy-vline 
WA_RN1WP_MEORDER_LIST_STR-BED sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CS sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CELLSTYLE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-SPECREQ sy-vline 
WA_RN1WP_MEORDER_LIST_STR-TREATDAY sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ORDERDAY sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ACTEXIST sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ACTPDT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-VERIFICAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NOTE_GEN_BUT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ORDSEQ_STDAT sy-vline 
WA_RN1WP_MEORDER_LIST_STR-EMORD sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CUR_ADRATE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-CUR_ADRATEU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NEXT_DBRATE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NEXT_TBRATE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NEXT_RTYPE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NEXT_ADRATE sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NEXT_ADRATEU sy-vline 
WA_RN1WP_MEORDER_LIST_STR-BAG_EMPTY_TIME sy-vline 
WA_RN1WP_MEORDER_LIST_STR-BAG_EMPTY sy-vline 
WA_RN1WP_MEORDER_LIST_STR-IVTYPE_ICON sy-vline 
WA_RN1WP_MEORDER_LIST_STR-NO_TC_ICON sy-vline 
WA_RN1WP_MEORDER_LIST_STR-ADPAT_STATE_ICON sy-vline      INTO ld_text SEPARATED BY SPACE.

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