ABAP Select data from SAP table OIJ05_S_NOM_HEADER into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP OIJ05_S_NOM_HEADER 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 OIJ05_S_NOM_HEADER. 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 OIJ05_S_NOM_HEADER 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_OIJ05_S_NOM_HEADER TYPE STANDARD TABLE OF OIJ05_S_NOM_HEADER,
      WA_OIJ05_S_NOM_HEADER TYPE OIJ05_S_NOM_HEADER,
      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: <OIJ05_S_NOM_HEADER> TYPE OIJ05_S_NOM_HEADER.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM OIJ05_S_NOM_HEADER
*  INTO TABLE @DATA(IT_OIJ05_S_NOM_HEADER2).
*--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_OIJ05_S_NOM_HEADER INDEX 1 INTO DATA(WA_OIJ05_S_NOM_HEADER2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_OIJ05_S_NOM_HEADER ASSIGNING <OIJ05_S_NOM_HEADER>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<OIJ05_S_NOM_HEADER>-MANDT = 1.
<OIJ05_S_NOM_HEADER>-NOMTK = 1.
<OIJ05_S_NOM_HEADER>-NOMCL = 1.
<OIJ05_S_NOM_HEADER>-NOMTYP = 1.
<OIJ05_S_NOM_HEADER>-BUSTYP = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_OIJ05_S_NOM_HEADER-NOMNR, sy-vline,
WA_OIJ05_S_NOM_HEADER-NOMST, sy-vline,
WA_OIJ05_S_NOM_HEADER-NMSHTYPE, sy-vline,
WA_OIJ05_S_NOM_HEADER-NMBALCH, sy-vline,
WA_OIJ05_S_NOM_HEADER-STAGES_ID, sy-vline,
WA_OIJ05_S_NOM_HEADER-WORKLIST, sy-vline.
ENDLOOP. *Add any further fields from structure WA_OIJ05_S_NOM_HEADER 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_OIJ05_S_NOM_HEADER 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_OIJ05_S_NOM_HEADER INTO WA_OIJ05_S_NOM_HEADER. *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 NOMTK CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OIJ05_S_NOM_HEADER-NOMTK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OIJ05_S_NOM_HEADER-NOMTK.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field FLTTNOMTK CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_OIJ05_S_NOM_HEADER-FLTTNOMTK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OIJ05_S_NOM_HEADER-FLTTNOMTK.
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_OIJ05_S_NOM_HEADER_STR,
MANDT TYPE STRING,
NOMTK TYPE STRING,
NOMCL TYPE STRING,
NOMTYP TYPE STRING,
BUSTYP TYPE STRING,
NOMNR TYPE STRING,
NOMST TYPE STRING,
NMSHTYPE TYPE STRING,
NMBALCH TYPE STRING,
STAGES_ID TYPE STRING,
WORKLIST TYPE STRING,
SENTDAT TYPE STRING,
SENTTIME TYPE STRING,
SENTNAM TYPE STRING,
ITEMS TYPE STRING,
COUNTER1 TYPE STRING,
COUNTER2 TYPE STRING,
COUNTER3 TYPE STRING,
COUNTER4 TYPE STRING,
COUNTER5 TYPE STRING,
COUNTER6 TYPE STRING,
APO_SHIPMENT_ID TYPE STRING,
APO_SHIPMENT_NUM TYPE STRING,
NMBLOCK TYPE STRING,
NOMTYPDESC TYPE STRING,
SHTYP TYPE STRING,
TKNUM TYPE STRING,
LOV_GL TYPE STRING,
NMSELECT TYPE STRING,
TSYST TYPE STRING,
NMSHIPPER TYPE STRING,
NMCARRIER TYPE STRING,
CYCLE TYPE STRING,
NMWERK TYPE STRING,
NMLGORT TYPE STRING,
NMVEHICLE TYPE STRING,
NMVESSEL TYPE STRING,
NMTPLST TYPE STRING,
ROUTE TYPE STRING,
BOOKTS TYPE STRING,
EV_GROUP TYPE STRING,
VKTRA TYPE STRING,
QTYIN TYPE STRING,
QTYOUT TYPE STRING,
UNIT TYPE STRING,
TST_FROM_MIN TYPE STRING,
TST_TO_MAX TYPE STRING,
BLOIND TYPE STRING,
DELIND TYPE STRING,
SHNUM TYPE STRING,
ERDAT TYPE STRING,
ERZEIT TYPE STRING,
ERNAM TYPE STRING,
AEDAT TYPE STRING,
AEZEIT TYPE STRING,
AENAM TYPE STRING,
EV_SEQ_UNI TYPE STRING,
VSART TYPE STRING,
SHTYPE TYPE STRING,
VEHID TYPE STRING,
TSSUOMV TYPE STRING,
TSSUOMM TYPE STRING,
CYCPERD TYPE STRING,
CYCPUOM TYPE STRING,
CARRIER TYPE STRING,
WERK TYPE STRING,
LGORT TYPE STRING,
NOMMSK TYPE STRING,
SHIPPER TYPE STRING,
CONLTM TYPE STRING,
CONLUOM TYPE STRING,
TPLST TYPE STRING,
UNLIMITED TYPE STRING,
BOTOL TYPE STRING,
BUTOL TYPE STRING,
BOTOLABS TYPE STRING,
BUTOLABS TYPE STRING,
BULTOLUOM TYPE STRING,
BALCH TYPE STRING,
FLTTNOMTK TYPE STRING,
EXTNOMNR TYPE STRING,
CHANGENR TYPE STRING,
NOMSTATUSRU TYPE STRING,
DISPATCHTYP TYPE STRING,
DISPATCHREC TYPE STRING,
CONNECTIONTYP TYPE STRING,
RAILCAROWN TYPE STRING,
TARIFFCOD TYPE STRING,
PAYERTYP TYPE STRING,
SENDCAT TYPE STRING,
SENDER TYPE STRING,
RECVCAT TYPE STRING,
RECEIVER TYPE STRING,
PYRCAT TYPE STRING,
PAYER TYPE STRING,
ROWNCAT TYPE STRING,
ROADOWNER TYPE STRING,
NOMNREGDATE TYPE STRING,
NOMNVALDFROM TYPE STRING,
NOMNVALDTO TYPE STRING,
_DATAAGING TYPE STRING,
DUMMY_NOMHDR_INCL_EEW_PS TYPE STRING,END OF T_EKKO_STR. DATA: WA_OIJ05_S_NOM_HEADER_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_OIJ05_S_NOM_HEADER_STR-MANDT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMTK sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMCL sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMTYP sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BUSTYP sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMNR sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMST sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMSHTYPE sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMBALCH sy-vline
WA_OIJ05_S_NOM_HEADER_STR-STAGES_ID sy-vline
WA_OIJ05_S_NOM_HEADER_STR-WORKLIST sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SENTDAT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SENTTIME sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SENTNAM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-ITEMS sy-vline
WA_OIJ05_S_NOM_HEADER_STR-COUNTER1 sy-vline
WA_OIJ05_S_NOM_HEADER_STR-COUNTER2 sy-vline
WA_OIJ05_S_NOM_HEADER_STR-COUNTER3 sy-vline
WA_OIJ05_S_NOM_HEADER_STR-COUNTER4 sy-vline
WA_OIJ05_S_NOM_HEADER_STR-COUNTER5 sy-vline
WA_OIJ05_S_NOM_HEADER_STR-COUNTER6 sy-vline
WA_OIJ05_S_NOM_HEADER_STR-APO_SHIPMENT_ID sy-vline
WA_OIJ05_S_NOM_HEADER_STR-APO_SHIPMENT_NUM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMBLOCK sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMTYPDESC sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SHTYP sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TKNUM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-LOV_GL sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMSELECT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TSYST sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMSHIPPER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMCARRIER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CYCLE sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMWERK sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMLGORT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMVEHICLE sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMVESSEL sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NMTPLST sy-vline
WA_OIJ05_S_NOM_HEADER_STR-ROUTE sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BOOKTS sy-vline
WA_OIJ05_S_NOM_HEADER_STR-EV_GROUP sy-vline
WA_OIJ05_S_NOM_HEADER_STR-VKTRA sy-vline
WA_OIJ05_S_NOM_HEADER_STR-QTYIN sy-vline
WA_OIJ05_S_NOM_HEADER_STR-QTYOUT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-UNIT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TST_FROM_MIN sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TST_TO_MAX sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BLOIND sy-vline
WA_OIJ05_S_NOM_HEADER_STR-DELIND sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SHNUM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-ERDAT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-ERZEIT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-ERNAM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-AEDAT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-AEZEIT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-AENAM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-EV_SEQ_UNI sy-vline
WA_OIJ05_S_NOM_HEADER_STR-VSART sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SHTYPE sy-vline
WA_OIJ05_S_NOM_HEADER_STR-VEHID sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TSSUOMV sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TSSUOMM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CYCPERD sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CYCPUOM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CARRIER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-WERK sy-vline
WA_OIJ05_S_NOM_HEADER_STR-LGORT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMMSK sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SHIPPER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CONLTM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CONLUOM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TPLST sy-vline
WA_OIJ05_S_NOM_HEADER_STR-UNLIMITED sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BOTOL sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BUTOL sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BOTOLABS sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BUTOLABS sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BULTOLUOM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-BALCH sy-vline
WA_OIJ05_S_NOM_HEADER_STR-FLTTNOMTK sy-vline
WA_OIJ05_S_NOM_HEADER_STR-EXTNOMNR sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CHANGENR sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMSTATUSRU sy-vline
WA_OIJ05_S_NOM_HEADER_STR-DISPATCHTYP sy-vline
WA_OIJ05_S_NOM_HEADER_STR-DISPATCHREC sy-vline
WA_OIJ05_S_NOM_HEADER_STR-CONNECTIONTYP sy-vline
WA_OIJ05_S_NOM_HEADER_STR-RAILCAROWN sy-vline
WA_OIJ05_S_NOM_HEADER_STR-TARIFFCOD sy-vline
WA_OIJ05_S_NOM_HEADER_STR-PAYERTYP sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SENDCAT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-SENDER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-RECVCAT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-RECEIVER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-PYRCAT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-PAYER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-ROWNCAT sy-vline
WA_OIJ05_S_NOM_HEADER_STR-ROADOWNER sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMNREGDATE sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMNVALDFROM sy-vline
WA_OIJ05_S_NOM_HEADER_STR-NOMNVALDTO sy-vline
WA_OIJ05_S_NOM_HEADER_STR-_DATAAGING sy-vline
WA_OIJ05_S_NOM_HEADER_STR-DUMMY_NOMHDR_INCL_EEW_PS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.