ABAP Select data from SAP table RNEHC 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 RNEHC 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 RNEHC. 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 RNEHC 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_RNEHC TYPE STANDARD TABLE OF RNEHC,
      WA_RNEHC TYPE RNEHC,
      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: <RNEHC> TYPE RNEHC.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RNEHC
*  INTO TABLE @DATA(IT_RNEHC2).
*--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_RNEHC INDEX 1 INTO DATA(WA_RNEHC2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RNEHC>-MANDT = 1.
<RNEHC>-LNCRD = 1.
<RNEHC>-CRDTYPE = 1.
<RNEHC>-EXT_KEY1 = 1.
<RNEHC>-EXT_KEY2 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RNEHC-PATNR, sy-vline,
  WA_RNEHC-ERUSR, sy-vline,
  WA_RNEHC-ERDAT, sy-vline,
  WA_RNEHC-ERTIM, sy-vline,
  WA_RNEHC-UPUSR, sy-vline,
  WA_RNEHC-UPDAT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RNEHC 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_RNEHC 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_RNEHC INTO WA_RNEHC.


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

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

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

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

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

*Conversion exit NLJUS, internal->external for field PASSNR
CALL FUNCTION 'CONVERSION_EXIT_NLJUS_OUTPUT'
  EXPORTING
    input =                      WA_RNEHC-PASSNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RNEHC-PASSNR.
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_RNEHC_STR, 
MANDT TYPE STRING,
LNCRD TYPE STRING,
CRDTYPE TYPE STRING,
EXT_KEY1 TYPE STRING,
EXT_KEY2 TYPE STRING,
PATNR TYPE STRING,
ERUSR TYPE STRING,
ERDAT TYPE STRING,
ERTIM TYPE STRING,
UPUSR TYPE STRING,
UPDAT TYPE STRING,
UPTIM TYPE STRING,
STORN TYPE STRING,
DOCTYPE TYPE STRING,
MANUAL TYPE STRING,
READ_DATE TYPE STRING,
ONLINQOK TYPE STRING,
BEGDT TYPE STRING,
ENDDT TYPE STRING,
CARDVALID TYPE STRING,
CVUSR TYPE STRING,
CVDAT TYPE STRING,
CVTIM TYPE STRING,
EF_VERSION TYPE STRING,
CDATA TYPE STRING,
LNCRD_PAT TYPE STRING,
NAME_LAST TYPE STRING,
NAME_FIRST TYPE STRING,
BIRTHDT TYPE STRING,
GENDER TYPE STRING,
EXPDT TYPE STRING,
INSID TYPE STRING,
AD_PREFIX_TXT TYPE STRING,
AD_TITLES_TXT TYPE STRING,
AD_TITLE1_TXT TYPE STRING,
POST_CODE2 TYPE STRING,
PO_BOX_LOC TYPE STRING,
PO_BOX TYPE STRING,
PO_BOX_CTY TYPE STRING,
POST_CODE1 TYPE STRING,
CITY TYPE STRING,
COUNTRY TYPE STRING,
STREET TYPE STRING,
HOUSE_NUM TYPE STRING,
STREET_SUPPL TYPE STRING,
GBNAM TYPE STRING,
BIRTHRK TYPE STRING,
RVNUM TYPE STRING,
RVNUM_MIP TYPE STRING,
LNCRD_INS TYPE STRING,
INSURANCE_NAME TYPE STRING,
KOSTR_INSTN TYPE STRING,
KOSTR_LAND TYPE STRING,
STCODE TYPE STRING,
INSTNR TYPE STRING,
ACNYM TYPE STRING,
CARDNR TYPE STRING,
PERSID TYPE STRING,
CERTIF_BEGDT TYPE STRING,
CERTIF_ENDDT TYPE STRING,
CERTIF_ISSUEDT TYPE STRING,
CERTIF_ISSUEDBY TYPE STRING,
/ISHFR/A_HISCTYP TYPE STRING,
/ISHFR/A_HIFUND TYPE STRING,
/ISHFR/A_PROORG TYPE STRING,
MID_NNAME TYPE STRING,
MID_VNAME TYPE STRING,
INS_TYP TYPE STRING,
CTBCDE TYPE STRING,
CTBCDEL TYPE STRING,
PHYSGK TYPE STRING,
INS_BEGDT TYPE STRING,
INS_ENDDT TYPE STRING,
COV_TYP TYPE STRING,
COV_BEGDT TYPE STRING,
COV_ENDDT TYPE STRING,
EGK_CDM_PVSD TYPE STRING,
EGK_NAMEF TYPE STRING,
EGK_NAMEL TYPE STRING,
EGK_GSCHL TYPE STRING,
UNKNOWN_GBDAT TYPE STRING,
ABR_KOSTR_INSTN TYPE STRING,
EGK_CDM_AVSD TYPE STRING,
EGK_KOSTR_NAME TYPE STRING,
EGK_ABR_KOSTR_NA TYPE STRING,
EGK_RECHTSKREIS TYPE STRING,
EGK_VERS_ART TYPE STRING,
EGK_VERS_STAT_RS TYPE STRING,
EGK_KOSTENERST_A TYPE STRING,
EGK_KOSTENERST_S TYPE STRING,
EGK_WOP TYPE STRING,
EGK_PKV_VERB_TAR TYPE STRING,
EGK_PKV_BEIH_BER TYPE STRING,
EGK_STAT_WLU TYPE STRING,
EGK_WLU_PROZ TYPE STRING,
EGK_HS_WLU TYPE STRING,
EGK_STAT_WLA TYPE STRING,
EGK_STAT_WLA_PRO TYPE STRING,
EGK_PKV_CLINICCA TYPE STRING,
EGK_CDM_GVSD TYPE STRING,
EGK_ZUZA_STATUS TYPE STRING,
EGK_ZUZA_STATU_B TYPE STRING,
EGK_BES_PERS_GRU TYPE STRING,
EGK_DMP_KZ TYPE STRING,
EGK_EINL_DAT_MLG TYPE STRING,
EGK_VKZML TYPE STRING,
BSNNR TYPE STRING,
BSN_STAT TYPE STRING,
SOURCE TYPE STRING,
CRDNR TYPE STRING,
ID_STAT TYPE STRING,
ID_TYPE TYPE STRING,
LAST_UPD TYPE STRING,
PERSON TYPE STRING,
KOSTR TYPE STRING,
CTBCDEKZ TYPE STRING,
BAG TYPE STRING,
EANR TYPE STRING,
INSFORM TYPE STRING,
INSFORM_TEXT TYPE STRING,
CANTON TYPE STRING,
ACCIDENT TYPE STRING,
SERVDEF TYPE STRING,
VVG_EXIST TYPE STRING,
BASEINS TYPE STRING,
DESCRIPTION TYPE STRING,
PHONE TYPE STRING,
EMAIL TYPE STRING,
NAME1 TYPE STRING,
NAME2 TYPE STRING,
INS_POST_CODE TYPE STRING,
INS_CITY TYPE STRING,
INS_COUNTRY TYPE STRING,
INS_STREET TYPE STRING,
INS_HOUSE_NUM TYPE STRING,
INS_STREET_SUPPL TYPE STRING,
INS_LOCATION TYPE STRING,
INS_PO_BOX TYPE STRING,
INS_PO_BOX_TEXT TYPE STRING,
INS_POST_CODE3 TYPE STRING,
MDELAY TYPE STRING,
MEDHORS TYPE STRING,
UMEDHORS TYPE STRING,
MEDKOMP TYPE STRING,
UMEDKOMP TYPE STRING,
SPITABT TYPE STRING,
SPITMOD TYPE STRING,
USPITVERS TYPE STRING,
COVINT_DRUGS TYPE STRING,
COVINT_HOSP TYPE STRING,
DATEOFIMPORT TYPE STRING,
TIMEOFIMPORT TYPE STRING,
REMARK_KVG TYPE STRING,
REMARK_HOSP TYPE STRING,
PO_BOX_TEXT TYPE STRING,
LOCATION TYPE STRING,
POST_CODE3 TYPE STRING,
VERSID TYPE STRING,
VVG_UPDKZ TYPE STRING,
CARDVALID_ICON TYPE STRING,
SERVDEFTXT TYPE STRING,
COVINT_DRUGSTXT TYPE STRING,
COVINT_HOSPTXT TYPE STRING,
KVGPROD TYPE STRING,
VVGPROD TYPE STRING,
FROM_READER TYPE STRING,
INSREL_ASS TYPE STRING,
SAVE_VERSION TYPE STRING,
PO_BOX_CTYTXT TYPE STRING,
COUNTRYTXT TYPE STRING,
KOSTR_LANDTXT TYPE STRING,
GSCHLTXT TYPE STRING,
EXTNR TYPE STRING,
PASSNR TYPE STRING,
REGION TYPE STRING,
CITY2 TYPE STRING,
TEL_NUMBER TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RNEHC_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_RNEHC_STR-MANDT sy-vline 
WA_RNEHC_STR-LNCRD sy-vline 
WA_RNEHC_STR-CRDTYPE sy-vline 
WA_RNEHC_STR-EXT_KEY1 sy-vline 
WA_RNEHC_STR-EXT_KEY2 sy-vline 
WA_RNEHC_STR-PATNR sy-vline 
WA_RNEHC_STR-ERUSR sy-vline 
WA_RNEHC_STR-ERDAT sy-vline 
WA_RNEHC_STR-ERTIM sy-vline 
WA_RNEHC_STR-UPUSR sy-vline 
WA_RNEHC_STR-UPDAT sy-vline 
WA_RNEHC_STR-UPTIM sy-vline 
WA_RNEHC_STR-STORN sy-vline 
WA_RNEHC_STR-DOCTYPE sy-vline 
WA_RNEHC_STR-MANUAL sy-vline 
WA_RNEHC_STR-READ_DATE sy-vline 
WA_RNEHC_STR-ONLINQOK sy-vline 
WA_RNEHC_STR-BEGDT sy-vline 
WA_RNEHC_STR-ENDDT sy-vline 
WA_RNEHC_STR-CARDVALID sy-vline 
WA_RNEHC_STR-CVUSR sy-vline 
WA_RNEHC_STR-CVDAT sy-vline 
WA_RNEHC_STR-CVTIM sy-vline 
WA_RNEHC_STR-EF_VERSION sy-vline 
WA_RNEHC_STR-CDATA sy-vline 
WA_RNEHC_STR-LNCRD_PAT sy-vline 
WA_RNEHC_STR-NAME_LAST sy-vline 
WA_RNEHC_STR-NAME_FIRST sy-vline 
WA_RNEHC_STR-BIRTHDT sy-vline 
WA_RNEHC_STR-GENDER sy-vline 
WA_RNEHC_STR-EXPDT sy-vline 
WA_RNEHC_STR-INSID sy-vline 
WA_RNEHC_STR-AD_PREFIX_TXT sy-vline 
WA_RNEHC_STR-AD_TITLES_TXT sy-vline 
WA_RNEHC_STR-AD_TITLE1_TXT sy-vline 
WA_RNEHC_STR-POST_CODE2 sy-vline 
WA_RNEHC_STR-PO_BOX_LOC sy-vline 
WA_RNEHC_STR-PO_BOX sy-vline 
WA_RNEHC_STR-PO_BOX_CTY sy-vline 
WA_RNEHC_STR-POST_CODE1 sy-vline 
WA_RNEHC_STR-CITY sy-vline 
WA_RNEHC_STR-COUNTRY sy-vline 
WA_RNEHC_STR-STREET sy-vline 
WA_RNEHC_STR-HOUSE_NUM sy-vline 
WA_RNEHC_STR-STREET_SUPPL sy-vline 
WA_RNEHC_STR-GBNAM sy-vline 
WA_RNEHC_STR-BIRTHRK sy-vline 
WA_RNEHC_STR-RVNUM sy-vline 
WA_RNEHC_STR-RVNUM_MIP sy-vline 
WA_RNEHC_STR-LNCRD_INS sy-vline 
WA_RNEHC_STR-INSURANCE_NAME sy-vline 
WA_RNEHC_STR-KOSTR_INSTN sy-vline 
WA_RNEHC_STR-KOSTR_LAND sy-vline 
WA_RNEHC_STR-STCODE sy-vline 
WA_RNEHC_STR-INSTNR sy-vline 
WA_RNEHC_STR-ACNYM sy-vline 
WA_RNEHC_STR-CARDNR sy-vline 
WA_RNEHC_STR-PERSID sy-vline 
WA_RNEHC_STR-CERTIF_BEGDT sy-vline 
WA_RNEHC_STR-CERTIF_ENDDT sy-vline 
WA_RNEHC_STR-CERTIF_ISSUEDT sy-vline 
WA_RNEHC_STR-CERTIF_ISSUEDBY sy-vline 
WA_RNEHC_STR-/ISHFR/A_HISCTYP sy-vline 
WA_RNEHC_STR-/ISHFR/A_HIFUND sy-vline 
WA_RNEHC_STR-/ISHFR/A_PROORG sy-vline 
WA_RNEHC_STR-MID_NNAME sy-vline 
WA_RNEHC_STR-MID_VNAME sy-vline 
WA_RNEHC_STR-INS_TYP sy-vline 
WA_RNEHC_STR-CTBCDE sy-vline 
WA_RNEHC_STR-CTBCDEL sy-vline 
WA_RNEHC_STR-PHYSGK sy-vline 
WA_RNEHC_STR-INS_BEGDT sy-vline 
WA_RNEHC_STR-INS_ENDDT sy-vline 
WA_RNEHC_STR-COV_TYP sy-vline 
WA_RNEHC_STR-COV_BEGDT sy-vline 
WA_RNEHC_STR-COV_ENDDT sy-vline 
WA_RNEHC_STR-EGK_CDM_PVSD sy-vline 
WA_RNEHC_STR-EGK_NAMEF sy-vline 
WA_RNEHC_STR-EGK_NAMEL sy-vline 
WA_RNEHC_STR-EGK_GSCHL sy-vline 
WA_RNEHC_STR-UNKNOWN_GBDAT sy-vline 
WA_RNEHC_STR-ABR_KOSTR_INSTN sy-vline 
WA_RNEHC_STR-EGK_CDM_AVSD sy-vline 
WA_RNEHC_STR-EGK_KOSTR_NAME sy-vline 
WA_RNEHC_STR-EGK_ABR_KOSTR_NA sy-vline 
WA_RNEHC_STR-EGK_RECHTSKREIS sy-vline 
WA_RNEHC_STR-EGK_VERS_ART sy-vline 
WA_RNEHC_STR-EGK_VERS_STAT_RS sy-vline 
WA_RNEHC_STR-EGK_KOSTENERST_A sy-vline 
WA_RNEHC_STR-EGK_KOSTENERST_S sy-vline 
WA_RNEHC_STR-EGK_WOP sy-vline 
WA_RNEHC_STR-EGK_PKV_VERB_TAR sy-vline 
WA_RNEHC_STR-EGK_PKV_BEIH_BER sy-vline 
WA_RNEHC_STR-EGK_STAT_WLU sy-vline 
WA_RNEHC_STR-EGK_WLU_PROZ sy-vline 
WA_RNEHC_STR-EGK_HS_WLU sy-vline 
WA_RNEHC_STR-EGK_STAT_WLA sy-vline 
WA_RNEHC_STR-EGK_STAT_WLA_PRO sy-vline 
WA_RNEHC_STR-EGK_PKV_CLINICCA sy-vline 
WA_RNEHC_STR-EGK_CDM_GVSD sy-vline 
WA_RNEHC_STR-EGK_ZUZA_STATUS sy-vline 
WA_RNEHC_STR-EGK_ZUZA_STATU_B sy-vline 
WA_RNEHC_STR-EGK_BES_PERS_GRU sy-vline 
WA_RNEHC_STR-EGK_DMP_KZ sy-vline 
WA_RNEHC_STR-EGK_EINL_DAT_MLG sy-vline 
WA_RNEHC_STR-EGK_VKZML sy-vline 
WA_RNEHC_STR-BSNNR sy-vline 
WA_RNEHC_STR-BSN_STAT sy-vline 
WA_RNEHC_STR-SOURCE sy-vline 
WA_RNEHC_STR-CRDNR sy-vline 
WA_RNEHC_STR-ID_STAT sy-vline 
WA_RNEHC_STR-ID_TYPE sy-vline 
WA_RNEHC_STR-LAST_UPD sy-vline 
WA_RNEHC_STR-PERSON sy-vline 
WA_RNEHC_STR-KOSTR sy-vline 
WA_RNEHC_STR-CTBCDEKZ sy-vline 
WA_RNEHC_STR-BAG sy-vline 
WA_RNEHC_STR-EANR sy-vline 
WA_RNEHC_STR-INSFORM sy-vline 
WA_RNEHC_STR-INSFORM_TEXT sy-vline 
WA_RNEHC_STR-CANTON sy-vline 
WA_RNEHC_STR-ACCIDENT sy-vline 
WA_RNEHC_STR-SERVDEF sy-vline 
WA_RNEHC_STR-VVG_EXIST sy-vline 
WA_RNEHC_STR-BASEINS sy-vline 
WA_RNEHC_STR-DESCRIPTION sy-vline 
WA_RNEHC_STR-PHONE sy-vline 
WA_RNEHC_STR-EMAIL sy-vline 
WA_RNEHC_STR-NAME1 sy-vline 
WA_RNEHC_STR-NAME2 sy-vline 
WA_RNEHC_STR-INS_POST_CODE sy-vline 
WA_RNEHC_STR-INS_CITY sy-vline 
WA_RNEHC_STR-INS_COUNTRY sy-vline 
WA_RNEHC_STR-INS_STREET sy-vline 
WA_RNEHC_STR-INS_HOUSE_NUM sy-vline 
WA_RNEHC_STR-INS_STREET_SUPPL sy-vline 
WA_RNEHC_STR-INS_LOCATION sy-vline 
WA_RNEHC_STR-INS_PO_BOX sy-vline 
WA_RNEHC_STR-INS_PO_BOX_TEXT sy-vline 
WA_RNEHC_STR-INS_POST_CODE3 sy-vline 
WA_RNEHC_STR-MDELAY sy-vline 
WA_RNEHC_STR-MEDHORS sy-vline 
WA_RNEHC_STR-UMEDHORS sy-vline 
WA_RNEHC_STR-MEDKOMP sy-vline 
WA_RNEHC_STR-UMEDKOMP sy-vline 
WA_RNEHC_STR-SPITABT sy-vline 
WA_RNEHC_STR-SPITMOD sy-vline 
WA_RNEHC_STR-USPITVERS sy-vline 
WA_RNEHC_STR-COVINT_DRUGS sy-vline 
WA_RNEHC_STR-COVINT_HOSP sy-vline 
WA_RNEHC_STR-DATEOFIMPORT sy-vline 
WA_RNEHC_STR-TIMEOFIMPORT sy-vline 
WA_RNEHC_STR-REMARK_KVG sy-vline 
WA_RNEHC_STR-REMARK_HOSP sy-vline 
WA_RNEHC_STR-PO_BOX_TEXT sy-vline 
WA_RNEHC_STR-LOCATION sy-vline 
WA_RNEHC_STR-POST_CODE3 sy-vline 
WA_RNEHC_STR-VERSID sy-vline 
WA_RNEHC_STR-VVG_UPDKZ sy-vline 
WA_RNEHC_STR-CARDVALID_ICON sy-vline 
WA_RNEHC_STR-SERVDEFTXT sy-vline 
WA_RNEHC_STR-COVINT_DRUGSTXT sy-vline 
WA_RNEHC_STR-COVINT_HOSPTXT sy-vline 
WA_RNEHC_STR-KVGPROD sy-vline 
WA_RNEHC_STR-VVGPROD sy-vline 
WA_RNEHC_STR-FROM_READER sy-vline 
WA_RNEHC_STR-INSREL_ASS sy-vline 
WA_RNEHC_STR-SAVE_VERSION sy-vline 
WA_RNEHC_STR-PO_BOX_CTYTXT sy-vline 
WA_RNEHC_STR-COUNTRYTXT sy-vline 
WA_RNEHC_STR-KOSTR_LANDTXT sy-vline 
WA_RNEHC_STR-GSCHLTXT sy-vline 
WA_RNEHC_STR-EXTNR sy-vline 
WA_RNEHC_STR-PASSNR sy-vline 
WA_RNEHC_STR-REGION sy-vline 
WA_RNEHC_STR-CITY2 sy-vline 
WA_RNEHC_STR-TEL_NUMBER sy-vline      INTO ld_text SEPARATED BY SPACE.

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