ABAP Select data from SAP table HRVPV6A 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 HRVPV6A 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 HRVPV6A. 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 HRVPV6A 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_HRVPV6A TYPE STANDARD TABLE OF HRVPV6A,
      WA_HRVPV6A TYPE HRVPV6A,
      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: <HRVPV6A> TYPE HRVPV6A.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HRVPV6A
*  INTO TABLE @DATA(IT_HRVPV6A2).
*--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_HRVPV6A INDEX 1 INTO DATA(WA_HRVPV6A2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<HRVPV6A>-MANDT = 1.
<HRVPV6A>-FCODE = 1.
<HRVPV6A>-FMODE = 1.
<HRVPV6A>-PLVAR = 1.
<HRVPV6A>-LANGU = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_HRVPV6A-TIMECODE, sy-vline,
  WA_HRVPV6A-ISTAT, sy-vline,
  WA_HRVPV6A-ISTAT_TXT, sy-vline,
  WA_HRVPV6A-EVENT_777M, sy-vline,
  WA_HRVPV6A-VALID_ISTAT, sy-vline,
  WA_HRVPV6A-OTYPE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_HRVPV6A 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_HRVPV6A 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_HRVPV6A INTO WA_HRVPV6A.


*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 ISOLA, internal->external for field LANGU
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_HRVPV6A-LANGU
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRVPV6A-LANGU.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit SXIDN, internal->external for field MAILEMAIL
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_HRVPV6A-MAILEMAIL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRVPV6A-MAILEMAIL.
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_HRVPV6A_STR, 
MANDT TYPE STRING,
FCODE TYPE STRING,
FMODE TYPE STRING,
PLVAR TYPE STRING,
LANGU TYPE STRING,
TIMECODE TYPE STRING,
ISTAT TYPE STRING,
ISTAT_TXT TYPE STRING,
EVENT_777M TYPE STRING,
VALID_ISTAT TYPE STRING,
OTYPE TYPE STRING,
OTEXT TYPE STRING,
OBJID TYPE STRING,
OBEG TYPE STRING,
OEND TYPE STRING,
SRKBEGDA TYPE STRING,
SRKENDDA TYPE STRING,
SHORT TYPE STRING,
SHORT_OLD TYPE STRING,
STEXT TYPE STRING,
HISTO TYPE STRING,
TEMPLOBJID TYPE STRING,
TEMPLSHORT TYPE STRING,
TEMPLSTEXT TYPE STRING,
CTPAROTYPE TYPE STRING,
CTPAROBJID TYPE STRING,
CTPARRELAT TYPE STRING,
CTPARAUTHR TYPE STRING,
CTPAROBEG TYPE STRING,
CTPAROEND TYPE STRING,
CTPARRTEXT TYPE STRING,
CTPAROTEXT TYPE STRING,
CTPARSHORT TYPE STRING,
CTPARSTEXT TYPE STRING,
CTFASTENTRY TYPE STRING,
RELSUBTY TYPE STRING,
RELOTYPE TYPE STRING,
RELOBJSRK TYPE STRING,
RELOBJSHRT TYPE STRING,
RELOBJPRIO TYPE STRING,
RELOBJBUTN TYPE STRING,
RELINDEX TYPE STRING,
RELCOUNT TYPE STRING,
FREVGSRK TYPE STRING,
FRISTAT TYPE STRING,
FRRELAT TYPE STRING,
FRDESCR TYPE STRING,
FRTEMPL TYPE STRING,
EDITBTN1 TYPE STRING,
EDITBTN2 TYPE STRING,
EDITBTN3 TYPE STRING,
RELSCROLL1 TYPE STRING,
RELSCROLL2 TYPE STRING,
RELSCROLL3 TYPE STRING,
RELSCROLL4 TYPE STRING,
INFTYBTN1 TYPE STRING,
INFTYBTN2 TYPE STRING,
INFTYBTN3 TYPE STRING,
INFTYBTN4 TYPE STRING,
INFTYBTN5 TYPE STRING,
STATUSBTN1 TYPE STRING,
STATUSBTN2 TYPE STRING,
RTEXT TYPE STRING,
INKBR TYPE STRING,
KONGX TYPE STRING,
EVATY TYPE STRING,
EVATX TYPE STRING,
EVATYPA TYPE STRING,
EVATYPX TYPE STRING,
NO_INT_INST TYPE STRING,
NO_INT_PART TYPE STRING,
DAYS_OFF_INST TYPE STRING,
DAYS_OFF_PART TYPE STRING,
MINPRESENCE TYPE STRING,
NOESSX TYPE STRING,
NOWEBX TYPE STRING,
NYEARS TYPE STRING,
NMONTHS TYPE STRING,
IKOST TYPE STRING,
IWAER TYPE STRING,
EKOST TYPE STRING,
EWAER TYPE STRING,
KAPZ1 TYPE STRING,
KAPZ2 TYPE STRING,
KAPZ3 TYPE STRING,
CNAME TYPE STRING,
STRAS TYPE STRING,
ORT01 TYPE STRING,
PSTLZ TYPE STRING,
LAND1 TYPE STRING,
LANDX TYPE STRING,
ENTKM TYPE STRING,
BUILD TYPE STRING,
BUILD_OLD TYPE STRING,
BUILDNAME TYPE STRING,
ROOM1 TYPE STRING,
ADRNR TYPE STRING,
TELNR TYPE STRING,
FAXNR TYPE STRING,
REGIO TYPE STRING,
STRS2 TYPE STRING,
HAUSN TYPE STRING,
CALID TYPE STRING,
WAERS TYPE STRING,
EVENTLANGU TYPE STRING,
ANRED TYPE STRING,
ANREX TYPE STRING,
TITELSRK TYPE STRING,
TITEL TYPE STRING,
VORSWSRK TYPE STRING,
VORSW TYPE STRING,
NAMZUSRK TYPE STRING,
NAMZU TYPE STRING,
INSLANGU TYPE STRING,
NATIO TYPE STRING,
MAILSUBTY TYPE STRING,
MAILUSER TYPE STRING,
MAILOWNER TYPE STRING,
MAILEMAIL TYPE STRING,
DISPOPRIOY TYPE STRING,
DISPOAMOUNT TYPE STRING,
DISPOMANZL TYPE STRING,
DISPOXTYPE TYPE STRING,
DISPORSIGN TYPE STRING,
DISPORELAT TYPE STRING,
DISPOSCLAS TYPE STRING,
DISPOORTAB TYPE STRING,
DISPOSHORT TYPE STRING,
DISPOPRO TYPE STRING,
DISPOEINHEIT TYPE STRING,
DISPOXOTEXT TYPE STRING,
DISPOVTEXT TYPE STRING,
DISPOOTEXT TYPE STRING,
DISPOSEMIN TYPE STRING,
DISPOTEILN TYPE STRING,
DISPOEKNAP TYPE STRING,
DISPOMKNAP TYPE STRING,
DISPOAKNAP TYPE STRING,
DISPORAUMX TYPE STRING,
DISPOINSTX TYPE STRING,
DISPOMATRX TYPE STRING,
DISPOORESX TYPE STRING,
DELIMIT_DATE TYPE STRING,
DELIMIT_HISTO TYPE STRING,
EVGSRK TYPE STRING,
EVGTMPLSRK TYPE STRING,
EVGDESCRIP TYPE STRING,
ETYSRK TYPE STRING,
ETYTMPLSRK TYPE STRING,
RTYSRK TYPE STRING,
RTYTMPLSRK TYPE STRING,
RESSRK TYPE STRING,
RESTMPLSRK TYPE STRING,
RERSRK TYPE STRING,
RERTMPLSRK TYPE STRING,
LOCSRK TYPE STRING,
LOCTMPLSRK TYPE STRING,
INSSRK TYPE STRING,
INSTMPLSRK TYPE STRING,
INSVORNAME TYPE STRING,
INSNACHNAM TYPE STRING,
INSVOR_OLD TYPE STRING,
INSNAC_OLD TYPE STRING,
KATGX TYPE STRING,
EPSSRK TYPE STRING,
EPSTMPLSRK TYPE STRING,
FIRSRK TYPE STRING,
FIRTMPLSRK TYPE STRING,
APLSRK TYPE STRING,
APLTMPLSRK TYPE STRING,
VSESRK TYPE STRING,
VSETMPLSRK TYPE STRING,
JOBSRK TYPE STRING,
JOBTMPLSRK TYPE STRING,
POSSRK TYPE STRING,
POSTMPLSRK TYPE STRING,
GENERSRK TYPE STRING,
GENERTMPLSRK TYPE STRING,
CUBOE TYPE STRING,
CUBOD TYPE STRING,END OF T_EKKO_STR.
DATA: WA_HRVPV6A_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_HRVPV6A_STR-MANDT sy-vline 
WA_HRVPV6A_STR-FCODE sy-vline 
WA_HRVPV6A_STR-FMODE sy-vline 
WA_HRVPV6A_STR-PLVAR sy-vline 
WA_HRVPV6A_STR-LANGU sy-vline 
WA_HRVPV6A_STR-TIMECODE sy-vline 
WA_HRVPV6A_STR-ISTAT sy-vline 
WA_HRVPV6A_STR-ISTAT_TXT sy-vline 
WA_HRVPV6A_STR-EVENT_777M sy-vline 
WA_HRVPV6A_STR-VALID_ISTAT sy-vline 
WA_HRVPV6A_STR-OTYPE sy-vline 
WA_HRVPV6A_STR-OTEXT sy-vline 
WA_HRVPV6A_STR-OBJID sy-vline 
WA_HRVPV6A_STR-OBEG sy-vline 
WA_HRVPV6A_STR-OEND sy-vline 
WA_HRVPV6A_STR-SRKBEGDA sy-vline 
WA_HRVPV6A_STR-SRKENDDA sy-vline 
WA_HRVPV6A_STR-SHORT sy-vline 
WA_HRVPV6A_STR-SHORT_OLD sy-vline 
WA_HRVPV6A_STR-STEXT sy-vline 
WA_HRVPV6A_STR-HISTO sy-vline 
WA_HRVPV6A_STR-TEMPLOBJID sy-vline 
WA_HRVPV6A_STR-TEMPLSHORT sy-vline 
WA_HRVPV6A_STR-TEMPLSTEXT sy-vline 
WA_HRVPV6A_STR-CTPAROTYPE sy-vline 
WA_HRVPV6A_STR-CTPAROBJID sy-vline 
WA_HRVPV6A_STR-CTPARRELAT sy-vline 
WA_HRVPV6A_STR-CTPARAUTHR sy-vline 
WA_HRVPV6A_STR-CTPAROBEG sy-vline 
WA_HRVPV6A_STR-CTPAROEND sy-vline 
WA_HRVPV6A_STR-CTPARRTEXT sy-vline 
WA_HRVPV6A_STR-CTPAROTEXT sy-vline 
WA_HRVPV6A_STR-CTPARSHORT sy-vline 
WA_HRVPV6A_STR-CTPARSTEXT sy-vline 
WA_HRVPV6A_STR-CTFASTENTRY sy-vline 
WA_HRVPV6A_STR-RELSUBTY sy-vline 
WA_HRVPV6A_STR-RELOTYPE sy-vline 
WA_HRVPV6A_STR-RELOBJSRK sy-vline 
WA_HRVPV6A_STR-RELOBJSHRT sy-vline 
WA_HRVPV6A_STR-RELOBJPRIO sy-vline 
WA_HRVPV6A_STR-RELOBJBUTN sy-vline 
WA_HRVPV6A_STR-RELINDEX sy-vline 
WA_HRVPV6A_STR-RELCOUNT sy-vline 
WA_HRVPV6A_STR-FREVGSRK sy-vline 
WA_HRVPV6A_STR-FRISTAT sy-vline 
WA_HRVPV6A_STR-FRRELAT sy-vline 
WA_HRVPV6A_STR-FRDESCR sy-vline 
WA_HRVPV6A_STR-FRTEMPL sy-vline 
WA_HRVPV6A_STR-EDITBTN1 sy-vline 
WA_HRVPV6A_STR-EDITBTN2 sy-vline 
WA_HRVPV6A_STR-EDITBTN3 sy-vline 
WA_HRVPV6A_STR-RELSCROLL1 sy-vline 
WA_HRVPV6A_STR-RELSCROLL2 sy-vline 
WA_HRVPV6A_STR-RELSCROLL3 sy-vline 
WA_HRVPV6A_STR-RELSCROLL4 sy-vline 
WA_HRVPV6A_STR-INFTYBTN1 sy-vline 
WA_HRVPV6A_STR-INFTYBTN2 sy-vline 
WA_HRVPV6A_STR-INFTYBTN3 sy-vline 
WA_HRVPV6A_STR-INFTYBTN4 sy-vline 
WA_HRVPV6A_STR-INFTYBTN5 sy-vline 
WA_HRVPV6A_STR-STATUSBTN1 sy-vline 
WA_HRVPV6A_STR-STATUSBTN2 sy-vline 
WA_HRVPV6A_STR-RTEXT sy-vline 
WA_HRVPV6A_STR-INKBR sy-vline 
WA_HRVPV6A_STR-KONGX sy-vline 
WA_HRVPV6A_STR-EVATY sy-vline 
WA_HRVPV6A_STR-EVATX sy-vline 
WA_HRVPV6A_STR-EVATYPA sy-vline 
WA_HRVPV6A_STR-EVATYPX sy-vline 
WA_HRVPV6A_STR-NO_INT_INST sy-vline 
WA_HRVPV6A_STR-NO_INT_PART sy-vline 
WA_HRVPV6A_STR-DAYS_OFF_INST sy-vline 
WA_HRVPV6A_STR-DAYS_OFF_PART sy-vline 
WA_HRVPV6A_STR-MINPRESENCE sy-vline 
WA_HRVPV6A_STR-NOESSX sy-vline 
WA_HRVPV6A_STR-NOWEBX sy-vline 
WA_HRVPV6A_STR-NYEARS sy-vline 
WA_HRVPV6A_STR-NMONTHS sy-vline 
WA_HRVPV6A_STR-IKOST sy-vline 
WA_HRVPV6A_STR-IWAER sy-vline 
WA_HRVPV6A_STR-EKOST sy-vline 
WA_HRVPV6A_STR-EWAER sy-vline 
WA_HRVPV6A_STR-KAPZ1 sy-vline 
WA_HRVPV6A_STR-KAPZ2 sy-vline 
WA_HRVPV6A_STR-KAPZ3 sy-vline 
WA_HRVPV6A_STR-CNAME sy-vline 
WA_HRVPV6A_STR-STRAS sy-vline 
WA_HRVPV6A_STR-ORT01 sy-vline 
WA_HRVPV6A_STR-PSTLZ sy-vline 
WA_HRVPV6A_STR-LAND1 sy-vline 
WA_HRVPV6A_STR-LANDX sy-vline 
WA_HRVPV6A_STR-ENTKM sy-vline 
WA_HRVPV6A_STR-BUILD sy-vline 
WA_HRVPV6A_STR-BUILD_OLD sy-vline 
WA_HRVPV6A_STR-BUILDNAME sy-vline 
WA_HRVPV6A_STR-ROOM1 sy-vline 
WA_HRVPV6A_STR-ADRNR sy-vline 
WA_HRVPV6A_STR-TELNR sy-vline 
WA_HRVPV6A_STR-FAXNR sy-vline 
WA_HRVPV6A_STR-REGIO sy-vline 
WA_HRVPV6A_STR-STRS2 sy-vline 
WA_HRVPV6A_STR-HAUSN sy-vline 
WA_HRVPV6A_STR-CALID sy-vline 
WA_HRVPV6A_STR-WAERS sy-vline 
WA_HRVPV6A_STR-EVENTLANGU sy-vline 
WA_HRVPV6A_STR-ANRED sy-vline 
WA_HRVPV6A_STR-ANREX sy-vline 
WA_HRVPV6A_STR-TITELSRK sy-vline 
WA_HRVPV6A_STR-TITEL sy-vline 
WA_HRVPV6A_STR-VORSWSRK sy-vline 
WA_HRVPV6A_STR-VORSW sy-vline 
WA_HRVPV6A_STR-NAMZUSRK sy-vline 
WA_HRVPV6A_STR-NAMZU sy-vline 
WA_HRVPV6A_STR-INSLANGU sy-vline 
WA_HRVPV6A_STR-NATIO sy-vline 
WA_HRVPV6A_STR-MAILSUBTY sy-vline 
WA_HRVPV6A_STR-MAILUSER sy-vline 
WA_HRVPV6A_STR-MAILOWNER sy-vline 
WA_HRVPV6A_STR-MAILEMAIL sy-vline 
WA_HRVPV6A_STR-DISPOPRIOY sy-vline 
WA_HRVPV6A_STR-DISPOAMOUNT sy-vline 
WA_HRVPV6A_STR-DISPOMANZL sy-vline 
WA_HRVPV6A_STR-DISPOXTYPE sy-vline 
WA_HRVPV6A_STR-DISPORSIGN sy-vline 
WA_HRVPV6A_STR-DISPORELAT sy-vline 
WA_HRVPV6A_STR-DISPOSCLAS sy-vline 
WA_HRVPV6A_STR-DISPOORTAB sy-vline 
WA_HRVPV6A_STR-DISPOSHORT sy-vline 
WA_HRVPV6A_STR-DISPOPRO sy-vline 
WA_HRVPV6A_STR-DISPOEINHEIT sy-vline 
WA_HRVPV6A_STR-DISPOXOTEXT sy-vline 
WA_HRVPV6A_STR-DISPOVTEXT sy-vline 
WA_HRVPV6A_STR-DISPOOTEXT sy-vline 
WA_HRVPV6A_STR-DISPOSEMIN sy-vline 
WA_HRVPV6A_STR-DISPOTEILN sy-vline 
WA_HRVPV6A_STR-DISPOEKNAP sy-vline 
WA_HRVPV6A_STR-DISPOMKNAP sy-vline 
WA_HRVPV6A_STR-DISPOAKNAP sy-vline 
WA_HRVPV6A_STR-DISPORAUMX sy-vline 
WA_HRVPV6A_STR-DISPOINSTX sy-vline 
WA_HRVPV6A_STR-DISPOMATRX sy-vline 
WA_HRVPV6A_STR-DISPOORESX sy-vline 
WA_HRVPV6A_STR-DELIMIT_DATE sy-vline 
WA_HRVPV6A_STR-DELIMIT_HISTO sy-vline 
WA_HRVPV6A_STR-EVGSRK sy-vline 
WA_HRVPV6A_STR-EVGTMPLSRK sy-vline 
WA_HRVPV6A_STR-EVGDESCRIP sy-vline 
WA_HRVPV6A_STR-ETYSRK sy-vline 
WA_HRVPV6A_STR-ETYTMPLSRK sy-vline 
WA_HRVPV6A_STR-RTYSRK sy-vline 
WA_HRVPV6A_STR-RTYTMPLSRK sy-vline 
WA_HRVPV6A_STR-RESSRK sy-vline 
WA_HRVPV6A_STR-RESTMPLSRK sy-vline 
WA_HRVPV6A_STR-RERSRK sy-vline 
WA_HRVPV6A_STR-RERTMPLSRK sy-vline 
WA_HRVPV6A_STR-LOCSRK sy-vline 
WA_HRVPV6A_STR-LOCTMPLSRK sy-vline 
WA_HRVPV6A_STR-INSSRK sy-vline 
WA_HRVPV6A_STR-INSTMPLSRK sy-vline 
WA_HRVPV6A_STR-INSVORNAME sy-vline 
WA_HRVPV6A_STR-INSNACHNAM sy-vline 
WA_HRVPV6A_STR-INSVOR_OLD sy-vline 
WA_HRVPV6A_STR-INSNAC_OLD sy-vline 
WA_HRVPV6A_STR-KATGX sy-vline 
WA_HRVPV6A_STR-EPSSRK sy-vline 
WA_HRVPV6A_STR-EPSTMPLSRK sy-vline 
WA_HRVPV6A_STR-FIRSRK sy-vline 
WA_HRVPV6A_STR-FIRTMPLSRK sy-vline 
WA_HRVPV6A_STR-APLSRK sy-vline 
WA_HRVPV6A_STR-APLTMPLSRK sy-vline 
WA_HRVPV6A_STR-VSESRK sy-vline 
WA_HRVPV6A_STR-VSETMPLSRK sy-vline 
WA_HRVPV6A_STR-JOBSRK sy-vline 
WA_HRVPV6A_STR-JOBTMPLSRK sy-vline 
WA_HRVPV6A_STR-POSSRK sy-vline 
WA_HRVPV6A_STR-POSTMPLSRK sy-vline 
WA_HRVPV6A_STR-GENERSRK sy-vline 
WA_HRVPV6A_STR-GENERTMPLSRK sy-vline 
WA_HRVPV6A_STR-CUBOE sy-vline 
WA_HRVPV6A_STR-CUBOD sy-vline      INTO ld_text SEPARATED BY SPACE.

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