ABAP Select data from SAP table OILKOMP 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 OILKOMP 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 OILKOMP. 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 OILKOMP 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_OILKOMP TYPE STANDARD TABLE OF OILKOMP,
      WA_OILKOMP TYPE OILKOMP,
      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: <OILKOMP> TYPE OILKOMP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM OILKOMP
*  INTO TABLE @DATA(IT_OILKOMP2).
*--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_OILKOMP INDEX 1 INTO DATA(WA_OILKOMP2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_OILKOMP ASSIGNING <OILKOMP>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<OILKOMP>-CMETH = 1.
<OILKOMP>-OIC_DRCTRY = 1.
<OILKOMP>-OIC_DRCREG = 1.
<OILKOMP>-OIMETIND = 1.
<OILKOMP>-OIWAP = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_OILKOMP-OISLF, sy-vline,
WA_OILKOMP-OIPSDRC, sy-vline,
WA_OILKOMP-OIFEETOT, sy-vline,
WA_OILKOMP-OIMATPST, sy-vline,
WA_OILKOMP-OIFEEPST, sy-vline,
WA_OILKOMP-OIFEEDT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_OILKOMP 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_OILKOMP 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_OILKOMP INTO WA_OILKOMP. *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 NUMCV, internal->external for field OIMETIND CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_OILKOMP-OIMETIND IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIMETIND.
WRITE:/ 'New Value:', ld_input.

*Conversion exit NUMCV, internal->external for field OIWAP CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_OILKOMP-OIWAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIWAP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit NUMCV, internal->external for field OISLF CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_OILKOMP-OISLF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OISLF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit NUMCV, internal->external for field OIPSDRC CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_OILKOMP-OIPSDRC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIPSDRC.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit PARVW, internal->external for field OIPFLIC CALL FUNCTION 'CONVERSION_EXIT_PARVW_OUTPUT' EXPORTING input = WA_OILKOMP-OIPFLIC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIPFLIC.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit TSTRG, internal->external for field OIG_GESZTD CALL FUNCTION 'CONVERSION_EXIT_TSTRG_OUTPUT' EXPORTING input = WA_OILKOMP-OIG_GESZTD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIG_GESZTD.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTRN, internal->external for field OIG_FAHZTD CALL FUNCTION 'CONVERSION_EXIT_TSTRN_OUTPUT' EXPORTING input = WA_OILKOMP-OIG_FAHZTD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIG_FAHZTD.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTRG, internal->external for field OIGGESZTDA CALL FUNCTION 'CONVERSION_EXIT_TSTRG_OUTPUT' EXPORTING input = WA_OILKOMP-OIGGESZTDA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIGGESZTDA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTRN, internal->external for field OIGFAHZTDA CALL FUNCTION 'CONVERSION_EXIT_TSTRN_OUTPUT' EXPORTING input = WA_OILKOMP-OIGFAHZTDA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_OILKOMP-OIGFAHZTDA.
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_OILKOMP_STR,
CMETH TYPE STRING,
OIC_DRCTRY TYPE STRING,
OIC_DRCREG TYPE STRING,
OIMETIND TYPE STRING,
OIWAP TYPE STRING,
OISLF TYPE STRING,
OIPSDRC TYPE STRING,
OIFEETOT TYPE STRING,
OIMATPST TYPE STRING,
OIFEEPST TYPE STRING,
OIFEEDT TYPE STRING,
OIFEEOK TYPE STRING,
OIFEEMSG TYPE STRING,
OIFEERCI TYPE STRING,
OIRULECI TYPE STRING,
OIGPKNUM TYPE STRING,
OITAXGRP TYPE STRING,
OIHANTYP TYPE STRING,
OITAXTO TYPE STRING,
OIINEX TYPE STRING,
OIPRICIE TYPE STRING,
OIOILCON TYPE STRING,
OITAXFROM TYPE STRING,
OIH_LICTP TYPE STRING,
OIH_LICIN TYPE STRING,
OIH_LCFOL TYPE STRING,
OIH_FOLQTY TYPE STRING,
OIEBELN TYPE STRING,
OIEBELP TYPE STRING,
OIVGBEL TYPE STRING,
OIVGPOS TYPE STRING,
OIDATFM1 TYPE STRING,
OIDATTO1 TYPE STRING,
OICONTNR TYPE STRING,
OIPIPEVAL TYPE STRING,
OIC_LIFNR TYPE STRING,
OIC_DCITYC TYPE STRING,
OIC_DCOUNC TYPE STRING,
OIC_DREGIO TYPE STRING,
OIC_DLAND1 TYPE STRING,
OIC_OCITYC TYPE STRING,
OIC_OCOUNC TYPE STRING,
OIC_OREGIO TYPE STRING,
OIC_OLAND1 TYPE STRING,
OIC_PORGIN TYPE STRING,
OIC_PDESTN TYPE STRING,
OIC_PTRIP TYPE STRING,
OIC_PBATCH TYPE STRING,
OIC_MOT TYPE STRING,
OIC_AORGIN TYPE STRING,
OIC_ADESTN TYPE STRING,
OIC_TRUCKN TYPE STRING,
OIA_BASELO TYPE STRING,
OIC_KMPOS TYPE STRING,
GZOLX TYPE STRING,
OIGNRULE TYPE STRING,
OIVATBASE TYPE STRING,
OIBASPROD TYPE STRING,
OIA_IPMVAT TYPE STRING,
OIINVCYC1 TYPE STRING,
OIINVCYC2 TYPE STRING,
OIINVCYC3 TYPE STRING,
OIINVCYC4 TYPE STRING,
OIINVCYC5 TYPE STRING,
OIINVCYC6 TYPE STRING,
OIINVCYC7 TYPE STRING,
OIINVCYC8 TYPE STRING,
OIINVCYC9 TYPE STRING,
OINETWRAC TYPE STRING,
OIMWSBPAC TYPE STRING,
OIINVCYACT TYPE STRING,
OIFPBL TYPE STRING,
OIFWE TYPE STRING,
OIFBPR TYPE STRING,
OIINVCST1 TYPE STRING,
OIINVCST2 TYPE STRING,
OIINVCST3 TYPE STRING,
OIINVCST4 TYPE STRING,
OIINVCST5 TYPE STRING,
OIINVCST6 TYPE STRING,
OIINVCST7 TYPE STRING,
OIINVCST8 TYPE STRING,
OIINVCST9 TYPE STRING,
OIC_FCODE TYPE STRING,
DDATTO TYPE STRING,
OIPFLIC TYPE STRING,
OIFORMUPD TYPE STRING,
OIRI_FEE TYPE STRING,
OIGVEHICLE TYPE STRING,
OIGVEH_TYP TYPE STRING,
OIGVEHMODE TYPE STRING,
OIGROUTEV TYPE STRING,
OIGGROUP TYPE STRING,
OIGKNOTL TYPE STRING,
OIGKNOTD TYPE STRING,
OIGSHNUMBE TYPE STRING,
OIGMAT_ITM TYPE STRING,
OIGVOLUMA TYPE STRING,
OIGVOLEHA TYPE STRING,
OIG_GESZTD TYPE STRING,
OIG_FAHZTD TYPE STRING,
OIGGESZTDA TYPE STRING,
OIGFAHZTDA TYPE STRING,
OIC_POQTY TYPE STRING,
OISTYP TYPE STRING,
OIRE_SRCDTF TYPE STRING,
OIRI_FEEBASE_V TYPE STRING,
OIRI_FEEBASE_Q TYPE STRING,
OIR_ENTERABLE TYPE STRING,
OIRNBT TYPE STRING,
OIRIAGGPTR TYPE STRING,
OIRI_COMMREV TYPE STRING,
OIRELPCGROUP TYPE STRING,
OIRCMETREV TYPE STRING,
OIHMTXGRP TYPE STRING,
OIHCGROUP TYPE STRING,
OIHVGROUP TYPE STRING,
OIH_ETAX_GROUP TYPE STRING,END OF T_EKKO_STR. DATA: WA_OILKOMP_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_OILKOMP_STR-CMETH sy-vline
WA_OILKOMP_STR-OIC_DRCTRY sy-vline
WA_OILKOMP_STR-OIC_DRCREG sy-vline
WA_OILKOMP_STR-OIMETIND sy-vline
WA_OILKOMP_STR-OIWAP sy-vline
WA_OILKOMP_STR-OISLF sy-vline
WA_OILKOMP_STR-OIPSDRC sy-vline
WA_OILKOMP_STR-OIFEETOT sy-vline
WA_OILKOMP_STR-OIMATPST sy-vline
WA_OILKOMP_STR-OIFEEPST sy-vline
WA_OILKOMP_STR-OIFEEDT sy-vline
WA_OILKOMP_STR-OIFEEOK sy-vline
WA_OILKOMP_STR-OIFEEMSG sy-vline
WA_OILKOMP_STR-OIFEERCI sy-vline
WA_OILKOMP_STR-OIRULECI sy-vline
WA_OILKOMP_STR-OIGPKNUM sy-vline
WA_OILKOMP_STR-OITAXGRP sy-vline
WA_OILKOMP_STR-OIHANTYP sy-vline
WA_OILKOMP_STR-OITAXTO sy-vline
WA_OILKOMP_STR-OIINEX sy-vline
WA_OILKOMP_STR-OIPRICIE sy-vline
WA_OILKOMP_STR-OIOILCON sy-vline
WA_OILKOMP_STR-OITAXFROM sy-vline
WA_OILKOMP_STR-OIH_LICTP sy-vline
WA_OILKOMP_STR-OIH_LICIN sy-vline
WA_OILKOMP_STR-OIH_LCFOL sy-vline
WA_OILKOMP_STR-OIH_FOLQTY sy-vline
WA_OILKOMP_STR-OIEBELN sy-vline
WA_OILKOMP_STR-OIEBELP sy-vline
WA_OILKOMP_STR-OIVGBEL sy-vline
WA_OILKOMP_STR-OIVGPOS sy-vline
WA_OILKOMP_STR-OIDATFM1 sy-vline
WA_OILKOMP_STR-OIDATTO1 sy-vline
WA_OILKOMP_STR-OICONTNR sy-vline
WA_OILKOMP_STR-OIPIPEVAL sy-vline
WA_OILKOMP_STR-OIC_LIFNR sy-vline
WA_OILKOMP_STR-OIC_DCITYC sy-vline
WA_OILKOMP_STR-OIC_DCOUNC sy-vline
WA_OILKOMP_STR-OIC_DREGIO sy-vline
WA_OILKOMP_STR-OIC_DLAND1 sy-vline
WA_OILKOMP_STR-OIC_OCITYC sy-vline
WA_OILKOMP_STR-OIC_OCOUNC sy-vline
WA_OILKOMP_STR-OIC_OREGIO sy-vline
WA_OILKOMP_STR-OIC_OLAND1 sy-vline
WA_OILKOMP_STR-OIC_PORGIN sy-vline
WA_OILKOMP_STR-OIC_PDESTN sy-vline
WA_OILKOMP_STR-OIC_PTRIP sy-vline
WA_OILKOMP_STR-OIC_PBATCH sy-vline
WA_OILKOMP_STR-OIC_MOT sy-vline
WA_OILKOMP_STR-OIC_AORGIN sy-vline
WA_OILKOMP_STR-OIC_ADESTN sy-vline
WA_OILKOMP_STR-OIC_TRUCKN sy-vline
WA_OILKOMP_STR-OIA_BASELO sy-vline
WA_OILKOMP_STR-OIC_KMPOS sy-vline
WA_OILKOMP_STR-GZOLX sy-vline
WA_OILKOMP_STR-OIGNRULE sy-vline
WA_OILKOMP_STR-OIVATBASE sy-vline
WA_OILKOMP_STR-OIBASPROD sy-vline
WA_OILKOMP_STR-OIA_IPMVAT sy-vline
WA_OILKOMP_STR-OIINVCYC1 sy-vline
WA_OILKOMP_STR-OIINVCYC2 sy-vline
WA_OILKOMP_STR-OIINVCYC3 sy-vline
WA_OILKOMP_STR-OIINVCYC4 sy-vline
WA_OILKOMP_STR-OIINVCYC5 sy-vline
WA_OILKOMP_STR-OIINVCYC6 sy-vline
WA_OILKOMP_STR-OIINVCYC7 sy-vline
WA_OILKOMP_STR-OIINVCYC8 sy-vline
WA_OILKOMP_STR-OIINVCYC9 sy-vline
WA_OILKOMP_STR-OINETWRAC sy-vline
WA_OILKOMP_STR-OIMWSBPAC sy-vline
WA_OILKOMP_STR-OIINVCYACT sy-vline
WA_OILKOMP_STR-OIFPBL sy-vline
WA_OILKOMP_STR-OIFWE sy-vline
WA_OILKOMP_STR-OIFBPR sy-vline
WA_OILKOMP_STR-OIINVCST1 sy-vline
WA_OILKOMP_STR-OIINVCST2 sy-vline
WA_OILKOMP_STR-OIINVCST3 sy-vline
WA_OILKOMP_STR-OIINVCST4 sy-vline
WA_OILKOMP_STR-OIINVCST5 sy-vline
WA_OILKOMP_STR-OIINVCST6 sy-vline
WA_OILKOMP_STR-OIINVCST7 sy-vline
WA_OILKOMP_STR-OIINVCST8 sy-vline
WA_OILKOMP_STR-OIINVCST9 sy-vline
WA_OILKOMP_STR-OIC_FCODE sy-vline
WA_OILKOMP_STR-DDATTO sy-vline
WA_OILKOMP_STR-OIPFLIC sy-vline
WA_OILKOMP_STR-OIFORMUPD sy-vline
WA_OILKOMP_STR-OIRI_FEE sy-vline
WA_OILKOMP_STR-OIGVEHICLE sy-vline
WA_OILKOMP_STR-OIGVEH_TYP sy-vline
WA_OILKOMP_STR-OIGVEHMODE sy-vline
WA_OILKOMP_STR-OIGROUTEV sy-vline
WA_OILKOMP_STR-OIGGROUP sy-vline
WA_OILKOMP_STR-OIGKNOTL sy-vline
WA_OILKOMP_STR-OIGKNOTD sy-vline
WA_OILKOMP_STR-OIGSHNUMBE sy-vline
WA_OILKOMP_STR-OIGMAT_ITM sy-vline
WA_OILKOMP_STR-OIGVOLUMA sy-vline
WA_OILKOMP_STR-OIGVOLEHA sy-vline
WA_OILKOMP_STR-OIG_GESZTD sy-vline
WA_OILKOMP_STR-OIG_FAHZTD sy-vline
WA_OILKOMP_STR-OIGGESZTDA sy-vline
WA_OILKOMP_STR-OIGFAHZTDA sy-vline
WA_OILKOMP_STR-OIC_POQTY sy-vline
WA_OILKOMP_STR-OISTYP sy-vline
WA_OILKOMP_STR-OIRE_SRCDTF sy-vline
WA_OILKOMP_STR-OIRI_FEEBASE_V sy-vline
WA_OILKOMP_STR-OIRI_FEEBASE_Q sy-vline
WA_OILKOMP_STR-OIR_ENTERABLE sy-vline
WA_OILKOMP_STR-OIRNBT sy-vline
WA_OILKOMP_STR-OIRIAGGPTR sy-vline
WA_OILKOMP_STR-OIRI_COMMREV sy-vline
WA_OILKOMP_STR-OIRELPCGROUP sy-vline
WA_OILKOMP_STR-OIRCMETREV sy-vline
WA_OILKOMP_STR-OIHMTXGRP sy-vline
WA_OILKOMP_STR-OIHCGROUP sy-vline
WA_OILKOMP_STR-OIHVGROUP sy-vline
WA_OILKOMP_STR-OIH_ETAX_GROUP sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.