ABAP Select data from SAP table OIB_A01 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 OIB_A01 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 OIB_A01. 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 OIB_A01 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_OIB_A01 TYPE STANDARD TABLE OF OIB_A01,
      WA_OIB_A01 TYPE OIB_A01,
      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: <OIB_A01> TYPE OIB_A01.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM OIB_A01
*  INTO TABLE @DATA(IT_OIB_A012).
*--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_OIB_A01 INDEX 1 INTO DATA(WA_OIB_A012).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<OIB_A01>-HYDRO = 1.
<OIB_A01>-MCF = 1.
<OIB_A01>-BSWCN = 1.
<OIB_A01>-BSWCNEH = 1.
<OIB_A01>-HVCLS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_OIB_A01-HVCLS_TO, sy-vline,
  WA_OIB_A01-TDICH, sy-vline,
  WA_OIB_A01-TSTMPCALEH, sy-vline,
  WA_OIB_A01-TSTMPCAL, sy-vline,
  WA_OIB_A01-TSTMP, sy-vline,
  WA_OIB_A01-TSTEH, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_OIB_A01 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_OIB_A01 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_OIB_A01 INTO WA_OIB_A01.


*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 CUNIT, internal->external for field BSWCNEH
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_OIB_A01-BSWCNEH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_OIB_A01-BSWCNEH.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field BSHVEH
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_OIB_A01-BSHVEH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_OIB_A01-BSHVEH.
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_OIB_A01_STR, 
HYDRO TYPE STRING,
MCF TYPE STRING,
BSWCN TYPE STRING,
BSWCNEH TYPE STRING,
HVCLS TYPE STRING,
HVCLS_TO TYPE STRING,
TDICH TYPE STRING,
TSTMPCALEH TYPE STRING,
TSTMPCAL TYPE STRING,
TSTMP TYPE STRING,
TSTEH TYPE STRING,
MTTMP TYPE STRING,
MTTEH TYPE STRING,
COEFF TYPE STRING,
TDICHEH TYPE STRING,
MTPRES TYPE STRING,
MTPRESEH TYPE STRING,
TPREDCALEH TYPE STRING,
TPREDCAL TYPE STRING,
TPRED TYPE STRING,
TPREDEH TYPE STRING,
TTMPHV TYPE STRING,
TTMPHVEH TYPE STRING,
TPRHV TYPE STRING,
TPRHVEH TYPE STRING,
ATPRES TYPE STRING,
ATPRESEH TYPE STRING,
VAPRES TYPE STRING,
VAPRESEH TYPE STRING,
THVAL TYPE STRING,
THVALEH TYPE STRING,
MTCOMBTMP TYPE STRING,
MTCOMBTEH TYPE STRING,
MTCOMBPRES TYPE STRING,
MTCOMBPRESEH TYPE STRING,
CH4RATIO TYPE STRING,
N2RATIO TYPE STRING,
CO2RATIO TYPE STRING,
C2H6RATIO TYPE STRING,
C3H8RATIO TYPE STRING,
H2ORATIO TYPE STRING,
H2SRATIO TYPE STRING,
H2RATIO TYPE STRING,
CORATIO TYPE STRING,
O2RATIO TYPE STRING,
ISOC4H10RATIO TYPE STRING,
NC4H10RATIO TYPE STRING,
ISOC5H12RATIO TYPE STRING,
NC5H12RATIO TYPE STRING,
C6H14RATIO TYPE STRING,
C7H16RATIO TYPE STRING,
C8H18RATIO TYPE STRING,
C9H20RATIO TYPE STRING,
C10H22RATIO TYPE STRING,
HERATIO TYPE STRING,
ARRATIO TYPE STRING,
GASCOMPRATEH TYPE STRING,
MOLDEN TYPE STRING,
MOLDENEH TYPE STRING,
MOLWEIGHT TYPE STRING,
HYDROCARBMOLFRAC TYPE STRING,
MOLWEIGHTEH TYPE STRING,
CUSTPARCHAR1 TYPE STRING,
CUSTPARFLOAT1 TYPE STRING,
CUSTEH1 TYPE STRING,
CUSTPARCHAR2 TYPE STRING,
CUSTPARFLOAT2 TYPE STRING,
CUSTEH2 TYPE STRING,
CUSTPARCHAR3 TYPE STRING,
CUSTPARFLOAT3 TYPE STRING,
CUSTEH3 TYPE STRING,
MANDT TYPE STRING,
UMRSL TYPE STRING,
PDTYP TYPE STRING,
BSTMP TYPE STRING,
BSTEH TYPE STRING,
WQTYL TYPE STRING,
WQTYH TYPE STRING,
EQTYL TYPE STRING,
EQTYH TYPE STRING,
DNTYP TYPE STRING,
VCFLN TYPE STRING,
MCFI TYPE STRING,
PDCL TYPE STRING,
HVTYP TYPE STRING,
BPRESH TYPE STRING,
BPRESHEH TYPE STRING,
BSTMPH TYPE STRING,
BSTMPHEH TYPE STRING,
EXT_PROG_VERSION TYPE STRING,
BPRESV TYPE STRING,
BPRESVEH TYPE STRING,
BTMPVP TYPE STRING,
BTMPVPEH TYPE STRING,
CHGS TYPE STRING,
CHLQ TYPE STRING,
EXTDNUNIT TYPE STRING,
EXTHVUNIT TYPE STRING,
EXTIND TYPE STRING,
VCFLN_LPG TYPE STRING,
BSDNEH TYPE STRING,
BSHVEH TYPE STRING,
TDTHV TYPE STRING,
BDBHV TYPE STRING,
AROMATICS TYPE STRING,
BHVCLS TYPE STRING,
IDGAS TYPE STRING,
RFC_RELEASE TYPE STRING,END OF T_EKKO_STR.
DATA: WA_OIB_A01_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_OIB_A01_STR-HYDRO sy-vline 
WA_OIB_A01_STR-MCF sy-vline 
WA_OIB_A01_STR-BSWCN sy-vline 
WA_OIB_A01_STR-BSWCNEH sy-vline 
WA_OIB_A01_STR-HVCLS sy-vline 
WA_OIB_A01_STR-HVCLS_TO sy-vline 
WA_OIB_A01_STR-TDICH sy-vline 
WA_OIB_A01_STR-TSTMPCALEH sy-vline 
WA_OIB_A01_STR-TSTMPCAL sy-vline 
WA_OIB_A01_STR-TSTMP sy-vline 
WA_OIB_A01_STR-TSTEH sy-vline 
WA_OIB_A01_STR-MTTMP sy-vline 
WA_OIB_A01_STR-MTTEH sy-vline 
WA_OIB_A01_STR-COEFF sy-vline 
WA_OIB_A01_STR-TDICHEH sy-vline 
WA_OIB_A01_STR-MTPRES sy-vline 
WA_OIB_A01_STR-MTPRESEH sy-vline 
WA_OIB_A01_STR-TPREDCALEH sy-vline 
WA_OIB_A01_STR-TPREDCAL sy-vline 
WA_OIB_A01_STR-TPRED sy-vline 
WA_OIB_A01_STR-TPREDEH sy-vline 
WA_OIB_A01_STR-TTMPHV sy-vline 
WA_OIB_A01_STR-TTMPHVEH sy-vline 
WA_OIB_A01_STR-TPRHV sy-vline 
WA_OIB_A01_STR-TPRHVEH sy-vline 
WA_OIB_A01_STR-ATPRES sy-vline 
WA_OIB_A01_STR-ATPRESEH sy-vline 
WA_OIB_A01_STR-VAPRES sy-vline 
WA_OIB_A01_STR-VAPRESEH sy-vline 
WA_OIB_A01_STR-THVAL sy-vline 
WA_OIB_A01_STR-THVALEH sy-vline 
WA_OIB_A01_STR-MTCOMBTMP sy-vline 
WA_OIB_A01_STR-MTCOMBTEH sy-vline 
WA_OIB_A01_STR-MTCOMBPRES sy-vline 
WA_OIB_A01_STR-MTCOMBPRESEH sy-vline 
WA_OIB_A01_STR-CH4RATIO sy-vline 
WA_OIB_A01_STR-N2RATIO sy-vline 
WA_OIB_A01_STR-CO2RATIO sy-vline 
WA_OIB_A01_STR-C2H6RATIO sy-vline 
WA_OIB_A01_STR-C3H8RATIO sy-vline 
WA_OIB_A01_STR-H2ORATIO sy-vline 
WA_OIB_A01_STR-H2SRATIO sy-vline 
WA_OIB_A01_STR-H2RATIO sy-vline 
WA_OIB_A01_STR-CORATIO sy-vline 
WA_OIB_A01_STR-O2RATIO sy-vline 
WA_OIB_A01_STR-ISOC4H10RATIO sy-vline 
WA_OIB_A01_STR-NC4H10RATIO sy-vline 
WA_OIB_A01_STR-ISOC5H12RATIO sy-vline 
WA_OIB_A01_STR-NC5H12RATIO sy-vline 
WA_OIB_A01_STR-C6H14RATIO sy-vline 
WA_OIB_A01_STR-C7H16RATIO sy-vline 
WA_OIB_A01_STR-C8H18RATIO sy-vline 
WA_OIB_A01_STR-C9H20RATIO sy-vline 
WA_OIB_A01_STR-C10H22RATIO sy-vline 
WA_OIB_A01_STR-HERATIO sy-vline 
WA_OIB_A01_STR-ARRATIO sy-vline 
WA_OIB_A01_STR-GASCOMPRATEH sy-vline 
WA_OIB_A01_STR-MOLDEN sy-vline 
WA_OIB_A01_STR-MOLDENEH sy-vline 
WA_OIB_A01_STR-MOLWEIGHT sy-vline 
WA_OIB_A01_STR-HYDROCARBMOLFRAC sy-vline 
WA_OIB_A01_STR-MOLWEIGHTEH sy-vline 
WA_OIB_A01_STR-CUSTPARCHAR1 sy-vline 
WA_OIB_A01_STR-CUSTPARFLOAT1 sy-vline 
WA_OIB_A01_STR-CUSTEH1 sy-vline 
WA_OIB_A01_STR-CUSTPARCHAR2 sy-vline 
WA_OIB_A01_STR-CUSTPARFLOAT2 sy-vline 
WA_OIB_A01_STR-CUSTEH2 sy-vline 
WA_OIB_A01_STR-CUSTPARCHAR3 sy-vline 
WA_OIB_A01_STR-CUSTPARFLOAT3 sy-vline 
WA_OIB_A01_STR-CUSTEH3 sy-vline 
WA_OIB_A01_STR-MANDT sy-vline 
WA_OIB_A01_STR-UMRSL sy-vline 
WA_OIB_A01_STR-PDTYP sy-vline 
WA_OIB_A01_STR-BSTMP sy-vline 
WA_OIB_A01_STR-BSTEH sy-vline 
WA_OIB_A01_STR-WQTYL sy-vline 
WA_OIB_A01_STR-WQTYH sy-vline 
WA_OIB_A01_STR-EQTYL sy-vline 
WA_OIB_A01_STR-EQTYH sy-vline 
WA_OIB_A01_STR-DNTYP sy-vline 
WA_OIB_A01_STR-VCFLN sy-vline 
WA_OIB_A01_STR-MCFI sy-vline 
WA_OIB_A01_STR-PDCL sy-vline 
WA_OIB_A01_STR-HVTYP sy-vline 
WA_OIB_A01_STR-BPRESH sy-vline 
WA_OIB_A01_STR-BPRESHEH sy-vline 
WA_OIB_A01_STR-BSTMPH sy-vline 
WA_OIB_A01_STR-BSTMPHEH sy-vline 
WA_OIB_A01_STR-EXT_PROG_VERSION sy-vline 
WA_OIB_A01_STR-BPRESV sy-vline 
WA_OIB_A01_STR-BPRESVEH sy-vline 
WA_OIB_A01_STR-BTMPVP sy-vline 
WA_OIB_A01_STR-BTMPVPEH sy-vline 
WA_OIB_A01_STR-CHGS sy-vline 
WA_OIB_A01_STR-CHLQ sy-vline 
WA_OIB_A01_STR-EXTDNUNIT sy-vline 
WA_OIB_A01_STR-EXTHVUNIT sy-vline 
WA_OIB_A01_STR-EXTIND sy-vline 
WA_OIB_A01_STR-VCFLN_LPG sy-vline 
WA_OIB_A01_STR-BSDNEH sy-vline 
WA_OIB_A01_STR-BSHVEH sy-vline 
WA_OIB_A01_STR-TDTHV sy-vline 
WA_OIB_A01_STR-BDBHV sy-vline 
WA_OIB_A01_STR-AROMATICS sy-vline 
WA_OIB_A01_STR-BHVCLS sy-vline 
WA_OIB_A01_STR-IDGAS sy-vline 
WA_OIB_A01_STR-RFC_RELEASE sy-vline      INTO ld_text SEPARATED BY SPACE.

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