ABAP Select data from SAP table RNSE_ENC_INT_IN 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 RNSE_ENC_INT_IN 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 RNSE_ENC_INT_IN. 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 RNSE_ENC_INT_IN 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_RNSE_ENC_INT_IN TYPE STANDARD TABLE OF RNSE_ENC_INT_IN,
      WA_RNSE_ENC_INT_IN TYPE RNSE_ENC_INT_IN,
      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: <RNSE_ENC_INT_IN> TYPE RNSE_ENC_INT_IN.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RNSE_ENC_INT_IN
*  INTO TABLE @DATA(IT_RNSE_ENC_INT_IN2).
*--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_RNSE_ENC_INT_IN INDEX 1 INTO DATA(WA_RNSE_ENC_INT_IN2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RNSE_ENC_INT_IN>-INSTITUTION = 1.
<RNSE_ENC_INT_IN>-CASENUM = 1.
<RNSE_ENC_INT_IN>-CASEDATA = 1.
<RNSE_ENC_INT_IN>-FALAR = 1.
<RNSE_ENC_INT_IN>-FALAR_X = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RNSE_ENC_INT_IN-BEKAT, sy-vline,
  WA_RNSE_ENC_INT_IN-BEKAT_X, sy-vline,
  WA_RNSE_ENC_INT_IN-ABRKZ, sy-vline,
  WA_RNSE_ENC_INT_IN-ABRKZ_X, sy-vline,
  WA_RNSE_ENC_INT_IN-SICHV, sy-vline,
  WA_RNSE_ENC_INT_IN-SICHV_X, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RNSE_ENC_INT_IN 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_RNSE_ENC_INT_IN 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_RNSE_ENC_INT_IN INTO WA_RNSE_ENC_INT_IN.


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

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

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

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

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

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

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

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

*Conversion exit NLJUS, internal->external for field DOCNR
CALL FUNCTION 'CONVERSION_EXIT_NLJUS_OUTPUT'
  EXPORTING
    input =                      WA_RNSE_ENC_INT_IN-DOCNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RNSE_ENC_INT_IN-DOCNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit ALPHA, internal->external for field PATIENTNUM
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RNSE_ENC_INT_IN-PATIENTNUM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RNSE_ENC_INT_IN-PATIENTNUM.
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_RNSE_ENC_INT_IN_STR, 
INSTITUTION TYPE STRING,
CASENUM TYPE STRING,
CASEDATA TYPE STRING,
FALAR TYPE STRING,
FALAR_X TYPE STRING,
BEKAT TYPE STRING,
BEKAT_X TYPE STRING,
ABRKZ TYPE STRING,
ABRKZ_X TYPE STRING,
SICHV TYPE STRING,
SICHV_X TYPE STRING,
EINZG TYPE STRING,
EINZG_X TYPE STRING,
KZTXT TYPE STRING,
KZTXT_X TYPE STRING,
KUALF TYPE STRING,
KUALF_X TYPE STRING,
BEWLF TYPE STRING,
BEWLF_X TYPE STRING,
DGNLF TYPE STRING,
DGNLF_X TYPE STRING,
PGRLF TYPE STRING,
PGRLF_X TYPE STRING,
INFKZ TYPE STRING,
INFKZ_X TYPE STRING,
STATU TYPE STRING,
STATU_X TYPE STRING,
FZIFF TYPE STRING,
FZIFF_X TYPE STRING,
NOTAN TYPE STRING,
NOTAN_X TYPE STRING,
KRZAN TYPE STRING,
KRZAN_X TYPE STRING,
ENDAT TYPE STRING,
ENDAT_X TYPE STRING,
ENTIM TYPE STRING,
ENTIM_X TYPE STRING,
FGTYP TYPE STRING,
FGTYP_X TYPE STRING,
KZKOM TYPE STRING,
KZKOM_X TYPE STRING,
KOMTX TYPE STRING,
KOMTX_X TYPE STRING,
KOLTX TYPE STRING,
KOLTX_X TYPE STRING,
ARBUN TYPE STRING,
ARBUN_X TYPE STRING,
ENDDT TYPE STRING,
ENDDT_X TYPE STRING,
FSPER TYPE STRING,
FSPER_X TYPE STRING,
VORPT TYPE STRING,
VORPT_X TYPE STRING,
BEGDT TYPE STRING,
BEGDT_X TYPE STRING,
STASP TYPE STRING,
STASP_X TYPE STRING,
KV_KZ TYPE STRING,
KV_KZ_X TYPE STRING,
EAUFN TYPE STRING,
EAUFN_X TYPE STRING,
KVUEB TYPE STRING,
KVUEB_X TYPE STRING,
VORGR TYPE STRING,
VORGR_X TYPE STRING,
OBJNR TYPE STRING,
OBJNR_X TYPE STRING,
RESID TYPE STRING,
RESID_X TYPE STRING,
CHILD TYPE STRING,
CHILD_X TYPE STRING,
FOREI TYPE STRING,
FOREI_X TYPE STRING,
FATYP TYPE STRING,
FATYP_X TYPE STRING,
EMTYP TYPE STRING,
EMTYP_X TYPE STRING,
KTTAR TYPE STRING,
KTTAR_X TYPE STRING,
KTABK TYPE STRING,
KTABK_X TYPE STRING,
GSTA1 TYPE STRING,
GSTA1_X TYPE STRING,
GSTA2 TYPE STRING,
GSTA2_X TYPE STRING,
ANZSC TYPE STRING,
ANZSC_X TYPE STRING,
ANZTD TYPE STRING,
ANZTD_X TYPE STRING,
ANZAB TYPE STRING,
ANZAB_X TYPE STRING,
LGBIS TYPE STRING,
LGBIS_X TYPE STRING,
FPEDT TYPE STRING,
FPEDT_X TYPE STRING,
APSTATE TYPE STRING,
APSTATE_X TYPE STRING,
FACHR TYPE STRING,
FACHR_X TYPE STRING,
ENDTYP TYPE STRING,
ENDTYP_X TYPE STRING,
DOCTY TYPE STRING,
DOCTY_X TYPE STRING,
DOCNR TYPE STRING,
DOCNR_X TYPE STRING,
WKAT TYPE STRING,
WKAT_X TYPE STRING,
DOCW TYPE STRING,
DOCW_X TYPE STRING,
PATW TYPE STRING,
PATW_X TYPE STRING,
PATGEW TYPE STRING,
PATGEW_X TYPE STRING,
GWEIN TYPE STRING,
GWEIN_X TYPE STRING,
PATGRO TYPE STRING,
PATGRO_X TYPE STRING,
GREIN TYPE STRING,
GREIN_X TYPE STRING,
RESPI TYPE STRING,
RESPI_X TYPE STRING,
FEXNR TYPE STRING,
FEXNR_X TYPE STRING,
TIMESTAMP TYPE STRING,
TIMESTAMP_X TYPE STRING,
TOB TYPE STRING,
TOB_X TYPE STRING,
ENTBINDTXT TYPE STRING,
ENTBINDTXT_X TYPE STRING,
PATIENTNUM TYPE STRING,
MOVEMENTS TYPE STRING,
CHANGESTATEID TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RNSE_ENC_INT_IN_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_RNSE_ENC_INT_IN_STR-INSTITUTION sy-vline 
WA_RNSE_ENC_INT_IN_STR-CASENUM sy-vline 
WA_RNSE_ENC_INT_IN_STR-CASEDATA sy-vline 
WA_RNSE_ENC_INT_IN_STR-FALAR sy-vline 
WA_RNSE_ENC_INT_IN_STR-FALAR_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-BEKAT sy-vline 
WA_RNSE_ENC_INT_IN_STR-BEKAT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ABRKZ sy-vline 
WA_RNSE_ENC_INT_IN_STR-ABRKZ_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-SICHV sy-vline 
WA_RNSE_ENC_INT_IN_STR-SICHV_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-EINZG sy-vline 
WA_RNSE_ENC_INT_IN_STR-EINZG_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KZTXT sy-vline 
WA_RNSE_ENC_INT_IN_STR-KZTXT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KUALF sy-vline 
WA_RNSE_ENC_INT_IN_STR-KUALF_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-BEWLF sy-vline 
WA_RNSE_ENC_INT_IN_STR-BEWLF_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-DGNLF sy-vline 
WA_RNSE_ENC_INT_IN_STR-DGNLF_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-PGRLF sy-vline 
WA_RNSE_ENC_INT_IN_STR-PGRLF_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-INFKZ sy-vline 
WA_RNSE_ENC_INT_IN_STR-INFKZ_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-STATU sy-vline 
WA_RNSE_ENC_INT_IN_STR-STATU_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FZIFF sy-vline 
WA_RNSE_ENC_INT_IN_STR-FZIFF_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-NOTAN sy-vline 
WA_RNSE_ENC_INT_IN_STR-NOTAN_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KRZAN sy-vline 
WA_RNSE_ENC_INT_IN_STR-KRZAN_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENDAT sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENDAT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENTIM sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENTIM_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FGTYP sy-vline 
WA_RNSE_ENC_INT_IN_STR-FGTYP_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KZKOM sy-vline 
WA_RNSE_ENC_INT_IN_STR-KZKOM_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KOMTX sy-vline 
WA_RNSE_ENC_INT_IN_STR-KOMTX_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KOLTX sy-vline 
WA_RNSE_ENC_INT_IN_STR-KOLTX_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ARBUN sy-vline 
WA_RNSE_ENC_INT_IN_STR-ARBUN_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENDDT sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENDDT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FSPER sy-vline 
WA_RNSE_ENC_INT_IN_STR-FSPER_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-VORPT sy-vline 
WA_RNSE_ENC_INT_IN_STR-VORPT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-BEGDT sy-vline 
WA_RNSE_ENC_INT_IN_STR-BEGDT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-STASP sy-vline 
WA_RNSE_ENC_INT_IN_STR-STASP_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KV_KZ sy-vline 
WA_RNSE_ENC_INT_IN_STR-KV_KZ_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-EAUFN sy-vline 
WA_RNSE_ENC_INT_IN_STR-EAUFN_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KVUEB sy-vline 
WA_RNSE_ENC_INT_IN_STR-KVUEB_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-VORGR sy-vline 
WA_RNSE_ENC_INT_IN_STR-VORGR_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-OBJNR sy-vline 
WA_RNSE_ENC_INT_IN_STR-OBJNR_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-RESID sy-vline 
WA_RNSE_ENC_INT_IN_STR-RESID_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-CHILD sy-vline 
WA_RNSE_ENC_INT_IN_STR-CHILD_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FOREI sy-vline 
WA_RNSE_ENC_INT_IN_STR-FOREI_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FATYP sy-vline 
WA_RNSE_ENC_INT_IN_STR-FATYP_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-EMTYP sy-vline 
WA_RNSE_ENC_INT_IN_STR-EMTYP_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KTTAR sy-vline 
WA_RNSE_ENC_INT_IN_STR-KTTAR_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-KTABK sy-vline 
WA_RNSE_ENC_INT_IN_STR-KTABK_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-GSTA1 sy-vline 
WA_RNSE_ENC_INT_IN_STR-GSTA1_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-GSTA2 sy-vline 
WA_RNSE_ENC_INT_IN_STR-GSTA2_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ANZSC sy-vline 
WA_RNSE_ENC_INT_IN_STR-ANZSC_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ANZTD sy-vline 
WA_RNSE_ENC_INT_IN_STR-ANZTD_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ANZAB sy-vline 
WA_RNSE_ENC_INT_IN_STR-ANZAB_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-LGBIS sy-vline 
WA_RNSE_ENC_INT_IN_STR-LGBIS_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FPEDT sy-vline 
WA_RNSE_ENC_INT_IN_STR-FPEDT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-APSTATE sy-vline 
WA_RNSE_ENC_INT_IN_STR-APSTATE_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FACHR sy-vline 
WA_RNSE_ENC_INT_IN_STR-FACHR_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENDTYP sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENDTYP_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-DOCTY sy-vline 
WA_RNSE_ENC_INT_IN_STR-DOCTY_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-DOCNR sy-vline 
WA_RNSE_ENC_INT_IN_STR-DOCNR_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-WKAT sy-vline 
WA_RNSE_ENC_INT_IN_STR-WKAT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-DOCW sy-vline 
WA_RNSE_ENC_INT_IN_STR-DOCW_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-PATW sy-vline 
WA_RNSE_ENC_INT_IN_STR-PATW_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-PATGEW sy-vline 
WA_RNSE_ENC_INT_IN_STR-PATGEW_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-GWEIN sy-vline 
WA_RNSE_ENC_INT_IN_STR-GWEIN_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-PATGRO sy-vline 
WA_RNSE_ENC_INT_IN_STR-PATGRO_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-GREIN sy-vline 
WA_RNSE_ENC_INT_IN_STR-GREIN_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-RESPI sy-vline 
WA_RNSE_ENC_INT_IN_STR-RESPI_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-FEXNR sy-vline 
WA_RNSE_ENC_INT_IN_STR-FEXNR_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-TIMESTAMP sy-vline 
WA_RNSE_ENC_INT_IN_STR-TIMESTAMP_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-TOB sy-vline 
WA_RNSE_ENC_INT_IN_STR-TOB_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENTBINDTXT sy-vline 
WA_RNSE_ENC_INT_IN_STR-ENTBINDTXT_X sy-vline 
WA_RNSE_ENC_INT_IN_STR-PATIENTNUM sy-vline 
WA_RNSE_ENC_INT_IN_STR-MOVEMENTS sy-vline 
WA_RNSE_ENC_INT_IN_STR-CHANGESTATEID sy-vline      INTO ld_text SEPARATED BY SPACE.

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