ABAP Select data from SAP table ORPRINT 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 ORPRINT 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 ORPRINT. 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 ORPRINT 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_ORPRINT TYPE STANDARD TABLE OF ORPRINT,
      WA_ORPRINT TYPE ORPRINT,
      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: <ORPRINT> TYPE ORPRINT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ORPRINT
*  INTO TABLE @DATA(IT_ORPRINT2).
*--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_ORPRINT INDEX 1 INTO DATA(WA_ORPRINT2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<ORPRINT>-AUFNR = 1.
<ORPRINT>-FG_AUFNR = 1.
<ORPRINT>-FORMULAR = 1.
<ORPRINT>-OBJNR = 1.
<ORPRINT>-LAYOUT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ORPRINT-AUART, sy-vline,
  WA_ORPRINT-TX_AUART, sy-vline,
  WA_ORPRINT-FG_AUART, sy-vline,
  WA_ORPRINT-AUTYP, sy-vline,
  WA_ORPRINT-TX_AUTYP, sy-vline,
  WA_ORPRINT-FG_AUTYP, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_ORPRINT 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_ORPRINT 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_ORPRINT INTO WA_ORPRINT.


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

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

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

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

*Conversion exit SCOPE, internal->external for field SCOPE
CALL FUNCTION 'CONVERSION_EXIT_SCOPE_OUTPUT'
  EXPORTING
    input =                      WA_ORPRINT-SCOPE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ORPRINT-SCOPE.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ABPSN, internal->external for field POSID
CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT'
  EXPORTING
    input =                      WA_ORPRINT-POSID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ORPRINT-POSID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field OTYPE
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_ORPRINT-OTYPE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ORPRINT-OTYPE.
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_ORPRINT_STR, 
AUFNR TYPE STRING,
FG_AUFNR TYPE STRING,
FORMULAR TYPE STRING,
OBJNR TYPE STRING,
LAYOUT TYPE STRING,
AUART TYPE STRING,
TX_AUART TYPE STRING,
FG_AUART TYPE STRING,
AUTYP TYPE STRING,
TX_AUTYP TYPE STRING,
FG_AUTYP TYPE STRING,
MATNR TYPE STRING,
TX_MATNR TYPE STRING,
FG_MATNR TYPE STRING,
REFNR TYPE STRING,
FG_REFNR TYPE STRING,
ANFAUFNR TYPE STRING,
TX_ANFAUFNR TYPE STRING,
FG_ANFAUFNR TYPE STRING,
ERNAM TYPE STRING,
FG_ERNAM TYPE STRING,
ERDAT TYPE STRING,
FG_ERDAT TYPE STRING,
AENAM TYPE STRING,
FG_AENAM TYPE STRING,
AEDAT TYPE STRING,
FG_AEDAT TYPE STRING,
KTEXT TYPE STRING,
FG_KTEXT TYPE STRING,
LTEXT TYPE STRING,
LTXTID TYPE STRING,
FG_LTEXT TYPE STRING,
KOKRS TYPE STRING,
TX_KOKRS TYPE STRING,
FG_KOKRS TYPE STRING,
BUKRS TYPE STRING,
TX_BUKRS TYPE STRING,
FG_BUKRS TYPE STRING,
TXJCD TYPE STRING,
TX_TXJCD TYPE STRING,
FG_TXJCD TYPE STRING,
GSBER TYPE STRING,
TX_GSBER TYPE STRING,
FG_GSBER TYPE STRING,
FUNC_AREA TYPE STRING,
TX_FUNC_AREA TYPE STRING,
FG_FUNC_AREA TYPE STRING,
WERKS TYPE STRING,
TX_WERKS TYPE STRING,
FG_WERKS TYPE STRING,
SCOPE TYPE STRING,
SCOPE5 TYPE STRING,
TX_SCOPE TYPE STRING,
FG_SCOPE TYPE STRING,
PRCTR TYPE STRING,
TX_PRCTR TYPE STRING,
FG_PRCTR TYPE STRING,
KOSTV TYPE STRING,
TX_KOSTV TYPE STRING,
FG_KOSTV TYPE STRING,
POSID TYPE STRING,
TX_POSID TYPE STRING,
FG_POSID TYPE STRING,
AKSTL TYPE STRING,
TX_AKSTL TYPE STRING,
FG_AKSTL TYPE STRING,
ABUKR TYPE STRING,
TX_ABUKR TYPE STRING,
FG_ABUKR TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
TX_KDAUF TYPE STRING,
FG_KDAUF TYPE STRING,
STORT TYPE STRING,
TX_STORT TYPE STRING,
FG_STORT TYPE STRING,
SOWRK TYPE STRING,
TX_SOWRK TYPE STRING,
FG_SOWRK TYPE STRING,
AUFEX TYPE STRING,
FG_AUFEX TYPE STRING,
SYSST TYPE STRING,
FG_SYSST TYPE STRING,
ANWST TYPE STRING,
FG_ANWST TYPE STRING,
ASTNR TYPE STRING,
TX_ASTNR TYPE STRING,
VOGRP TYPE STRING,
TX_VOGRP TYPE STRING,
FG_OLDST TYPE STRING,
WAERS TYPE STRING,
TX_WAERS TYPE STRING,
FG_WAERS TYPE STRING,
STDAT TYPE STRING,
FG_STDAT TYPE STRING,
PHAS0 TYPE STRING,
FG_PHAS0 TYPE STRING,
PHAS1 TYPE STRING,
FG_PHAS1 TYPE STRING,
PHAS2 TYPE STRING,
FG_PHAS2 TYPE STRING,
PHAS3 TYPE STRING,
FG_PHAS3 TYPE STRING,
PDAT1 TYPE STRING,
PDAT2 TYPE STRING,
PDAT3 TYPE STRING,
IDAT1 TYPE STRING,
IDAT2 TYPE STRING,
IDAT3 TYPE STRING,
ASTKZ TYPE STRING,
FG_ASTKZ TYPE STRING,
ERLOESE TYPE STRING,
PLINT TYPE STRING,
FG_PLINT TYPE STRING,
OBLIGO TYPE STRING,
PLGKZ TYPE STRING,
FG_PLGKZ TYPE STRING,
CYCLE TYPE STRING,
TX_CYCLE TYPE STRING,
FG_CYCLE TYPE STRING,
ABGSL TYPE STRING,
TX_ABGSL TYPE STRING,
FG_ABGSL TYPE STRING,
AWSLS TYPE STRING,
TX_AWSLS TYPE STRING,
FG_AWSLS TYPE STRING,
KALSM TYPE STRING,
KVEWE TYPE STRING,
KAPPL TYPE STRING,
TX_KALSM TYPE STRING,
FG_KALSM TYPE STRING,
ZSCHL TYPE STRING,
TX_ZSCHL TYPE STRING,
FG_ZSCHL TYPE STRING,
ZSCHM TYPE STRING,
TX_ZSCHM TYPE STRING,
FG_ZSCHM TYPE STRING,
KSTAR TYPE STRING,
TX_KSTAR TYPE STRING,
FG_KSTAR TYPE STRING,
KOSTL TYPE STRING,
TX_KOSTL TYPE STRING,
FG_KOSTL TYPE STRING,
SAKNR TYPE STRING,
TX_SAKNR TYPE STRING,
FG_SAKNR TYPE STRING,
USER0 TYPE STRING,
FG_USER0 TYPE STRING,
USER1 TYPE STRING,
FG_USER1 TYPE STRING,
USER2 TYPE STRING,
FG_USER2 TYPE STRING,
USER3 TYPE STRING,
FG_USER3 TYPE STRING,
USER4 TYPE STRING,
FG_USER4 TYPE STRING,
USER5 TYPE STRING,
FG_USER5 TYPE STRING,
USER6 TYPE STRING,
FG_USER6 TYPE STRING,
USER7 TYPE STRING,
FG_USER7 TYPE STRING,
USER8 TYPE STRING,
FG_USER8 TYPE STRING,
USER9 TYPE STRING,
FG_USER9 TYPE STRING,
ABKRS TYPE STRING,
TX_ABKRS TYPE STRING,
FG_ABKRS TYPE STRING,
IVPRO TYPE STRING,
TX_IVPRO TYPE STRING,
FG_IVPRO TYPE STRING,
SIZECL TYPE STRING,
TX_SIZECL TYPE STRING,
FG_SIZECL TYPE STRING,
IZWEK TYPE STRING,
TX_IZWEK TYPE STRING,
FG_IZWEK TYPE STRING,
UMWKZ TYPE STRING,
TX_UMWKZ TYPE STRING,
FG_UMWKZ TYPE STRING,
BRGKTEXT TYPE STRING,
APROF TYPE STRING,
TX_APROF TYPE STRING,
ABSCH TYPE STRING,
TX_ABSCH TYPE STRING,
ERSCH TYPE STRING,
TX_ERSCH TYPE STRING,
URSCH TYPE STRING,
TX_URSCH TYPE STRING,
HIENR TYPE STRING,
BZDAT TYPE STRING,
VERAA_USER TYPE STRING,
TX_VERAA_USER TYPE STRING,
FG_VERAA_USER TYPE STRING,
VNAME TYPE STRING,
RECID TYPE STRING,
ETYPE TYPE STRING,
OTYPE TYPE STRING,
JV_JIBCL TYPE STRING,
JV_JIBSA TYPE STRING,
JV_OCO TYPE STRING,END OF T_EKKO_STR.
DATA: WA_ORPRINT_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_ORPRINT_STR-AUFNR sy-vline 
WA_ORPRINT_STR-FG_AUFNR sy-vline 
WA_ORPRINT_STR-FORMULAR sy-vline 
WA_ORPRINT_STR-OBJNR sy-vline 
WA_ORPRINT_STR-LAYOUT sy-vline 
WA_ORPRINT_STR-AUART sy-vline 
WA_ORPRINT_STR-TX_AUART sy-vline 
WA_ORPRINT_STR-FG_AUART sy-vline 
WA_ORPRINT_STR-AUTYP sy-vline 
WA_ORPRINT_STR-TX_AUTYP sy-vline 
WA_ORPRINT_STR-FG_AUTYP sy-vline 
WA_ORPRINT_STR-MATNR sy-vline 
WA_ORPRINT_STR-TX_MATNR sy-vline 
WA_ORPRINT_STR-FG_MATNR sy-vline 
WA_ORPRINT_STR-REFNR sy-vline 
WA_ORPRINT_STR-FG_REFNR sy-vline 
WA_ORPRINT_STR-ANFAUFNR sy-vline 
WA_ORPRINT_STR-TX_ANFAUFNR sy-vline 
WA_ORPRINT_STR-FG_ANFAUFNR sy-vline 
WA_ORPRINT_STR-ERNAM sy-vline 
WA_ORPRINT_STR-FG_ERNAM sy-vline 
WA_ORPRINT_STR-ERDAT sy-vline 
WA_ORPRINT_STR-FG_ERDAT sy-vline 
WA_ORPRINT_STR-AENAM sy-vline 
WA_ORPRINT_STR-FG_AENAM sy-vline 
WA_ORPRINT_STR-AEDAT sy-vline 
WA_ORPRINT_STR-FG_AEDAT sy-vline 
WA_ORPRINT_STR-KTEXT sy-vline 
WA_ORPRINT_STR-FG_KTEXT sy-vline 
WA_ORPRINT_STR-LTEXT sy-vline 
WA_ORPRINT_STR-LTXTID sy-vline 
WA_ORPRINT_STR-FG_LTEXT sy-vline 
WA_ORPRINT_STR-KOKRS sy-vline 
WA_ORPRINT_STR-TX_KOKRS sy-vline 
WA_ORPRINT_STR-FG_KOKRS sy-vline 
WA_ORPRINT_STR-BUKRS sy-vline 
WA_ORPRINT_STR-TX_BUKRS sy-vline 
WA_ORPRINT_STR-FG_BUKRS sy-vline 
WA_ORPRINT_STR-TXJCD sy-vline 
WA_ORPRINT_STR-TX_TXJCD sy-vline 
WA_ORPRINT_STR-FG_TXJCD sy-vline 
WA_ORPRINT_STR-GSBER sy-vline 
WA_ORPRINT_STR-TX_GSBER sy-vline 
WA_ORPRINT_STR-FG_GSBER sy-vline 
WA_ORPRINT_STR-FUNC_AREA sy-vline 
WA_ORPRINT_STR-TX_FUNC_AREA sy-vline 
WA_ORPRINT_STR-FG_FUNC_AREA sy-vline 
WA_ORPRINT_STR-WERKS sy-vline 
WA_ORPRINT_STR-TX_WERKS sy-vline 
WA_ORPRINT_STR-FG_WERKS sy-vline 
WA_ORPRINT_STR-SCOPE sy-vline 
WA_ORPRINT_STR-SCOPE5 sy-vline 
WA_ORPRINT_STR-TX_SCOPE sy-vline 
WA_ORPRINT_STR-FG_SCOPE sy-vline 
WA_ORPRINT_STR-PRCTR sy-vline 
WA_ORPRINT_STR-TX_PRCTR sy-vline 
WA_ORPRINT_STR-FG_PRCTR sy-vline 
WA_ORPRINT_STR-KOSTV sy-vline 
WA_ORPRINT_STR-TX_KOSTV sy-vline 
WA_ORPRINT_STR-FG_KOSTV sy-vline 
WA_ORPRINT_STR-POSID sy-vline 
WA_ORPRINT_STR-TX_POSID sy-vline 
WA_ORPRINT_STR-FG_POSID sy-vline 
WA_ORPRINT_STR-AKSTL sy-vline 
WA_ORPRINT_STR-TX_AKSTL sy-vline 
WA_ORPRINT_STR-FG_AKSTL sy-vline 
WA_ORPRINT_STR-ABUKR sy-vline 
WA_ORPRINT_STR-TX_ABUKR sy-vline 
WA_ORPRINT_STR-FG_ABUKR sy-vline 
WA_ORPRINT_STR-KDAUF sy-vline 
WA_ORPRINT_STR-KDPOS sy-vline 
WA_ORPRINT_STR-TX_KDAUF sy-vline 
WA_ORPRINT_STR-FG_KDAUF sy-vline 
WA_ORPRINT_STR-STORT sy-vline 
WA_ORPRINT_STR-TX_STORT sy-vline 
WA_ORPRINT_STR-FG_STORT sy-vline 
WA_ORPRINT_STR-SOWRK sy-vline 
WA_ORPRINT_STR-TX_SOWRK sy-vline 
WA_ORPRINT_STR-FG_SOWRK sy-vline 
WA_ORPRINT_STR-AUFEX sy-vline 
WA_ORPRINT_STR-FG_AUFEX sy-vline 
WA_ORPRINT_STR-SYSST sy-vline 
WA_ORPRINT_STR-FG_SYSST sy-vline 
WA_ORPRINT_STR-ANWST sy-vline 
WA_ORPRINT_STR-FG_ANWST sy-vline 
WA_ORPRINT_STR-ASTNR sy-vline 
WA_ORPRINT_STR-TX_ASTNR sy-vline 
WA_ORPRINT_STR-VOGRP sy-vline 
WA_ORPRINT_STR-TX_VOGRP sy-vline 
WA_ORPRINT_STR-FG_OLDST sy-vline 
WA_ORPRINT_STR-WAERS sy-vline 
WA_ORPRINT_STR-TX_WAERS sy-vline 
WA_ORPRINT_STR-FG_WAERS sy-vline 
WA_ORPRINT_STR-STDAT sy-vline 
WA_ORPRINT_STR-FG_STDAT sy-vline 
WA_ORPRINT_STR-PHAS0 sy-vline 
WA_ORPRINT_STR-FG_PHAS0 sy-vline 
WA_ORPRINT_STR-PHAS1 sy-vline 
WA_ORPRINT_STR-FG_PHAS1 sy-vline 
WA_ORPRINT_STR-PHAS2 sy-vline 
WA_ORPRINT_STR-FG_PHAS2 sy-vline 
WA_ORPRINT_STR-PHAS3 sy-vline 
WA_ORPRINT_STR-FG_PHAS3 sy-vline 
WA_ORPRINT_STR-PDAT1 sy-vline 
WA_ORPRINT_STR-PDAT2 sy-vline 
WA_ORPRINT_STR-PDAT3 sy-vline 
WA_ORPRINT_STR-IDAT1 sy-vline 
WA_ORPRINT_STR-IDAT2 sy-vline 
WA_ORPRINT_STR-IDAT3 sy-vline 
WA_ORPRINT_STR-ASTKZ sy-vline 
WA_ORPRINT_STR-FG_ASTKZ sy-vline 
WA_ORPRINT_STR-ERLOESE sy-vline 
WA_ORPRINT_STR-PLINT sy-vline 
WA_ORPRINT_STR-FG_PLINT sy-vline 
WA_ORPRINT_STR-OBLIGO sy-vline 
WA_ORPRINT_STR-PLGKZ sy-vline 
WA_ORPRINT_STR-FG_PLGKZ sy-vline 
WA_ORPRINT_STR-CYCLE sy-vline 
WA_ORPRINT_STR-TX_CYCLE sy-vline 
WA_ORPRINT_STR-FG_CYCLE sy-vline 
WA_ORPRINT_STR-ABGSL sy-vline 
WA_ORPRINT_STR-TX_ABGSL sy-vline 
WA_ORPRINT_STR-FG_ABGSL sy-vline 
WA_ORPRINT_STR-AWSLS sy-vline 
WA_ORPRINT_STR-TX_AWSLS sy-vline 
WA_ORPRINT_STR-FG_AWSLS sy-vline 
WA_ORPRINT_STR-KALSM sy-vline 
WA_ORPRINT_STR-KVEWE sy-vline 
WA_ORPRINT_STR-KAPPL sy-vline 
WA_ORPRINT_STR-TX_KALSM sy-vline 
WA_ORPRINT_STR-FG_KALSM sy-vline 
WA_ORPRINT_STR-ZSCHL sy-vline 
WA_ORPRINT_STR-TX_ZSCHL sy-vline 
WA_ORPRINT_STR-FG_ZSCHL sy-vline 
WA_ORPRINT_STR-ZSCHM sy-vline 
WA_ORPRINT_STR-TX_ZSCHM sy-vline 
WA_ORPRINT_STR-FG_ZSCHM sy-vline 
WA_ORPRINT_STR-KSTAR sy-vline 
WA_ORPRINT_STR-TX_KSTAR sy-vline 
WA_ORPRINT_STR-FG_KSTAR sy-vline 
WA_ORPRINT_STR-KOSTL sy-vline 
WA_ORPRINT_STR-TX_KOSTL sy-vline 
WA_ORPRINT_STR-FG_KOSTL sy-vline 
WA_ORPRINT_STR-SAKNR sy-vline 
WA_ORPRINT_STR-TX_SAKNR sy-vline 
WA_ORPRINT_STR-FG_SAKNR sy-vline 
WA_ORPRINT_STR-USER0 sy-vline 
WA_ORPRINT_STR-FG_USER0 sy-vline 
WA_ORPRINT_STR-USER1 sy-vline 
WA_ORPRINT_STR-FG_USER1 sy-vline 
WA_ORPRINT_STR-USER2 sy-vline 
WA_ORPRINT_STR-FG_USER2 sy-vline 
WA_ORPRINT_STR-USER3 sy-vline 
WA_ORPRINT_STR-FG_USER3 sy-vline 
WA_ORPRINT_STR-USER4 sy-vline 
WA_ORPRINT_STR-FG_USER4 sy-vline 
WA_ORPRINT_STR-USER5 sy-vline 
WA_ORPRINT_STR-FG_USER5 sy-vline 
WA_ORPRINT_STR-USER6 sy-vline 
WA_ORPRINT_STR-FG_USER6 sy-vline 
WA_ORPRINT_STR-USER7 sy-vline 
WA_ORPRINT_STR-FG_USER7 sy-vline 
WA_ORPRINT_STR-USER8 sy-vline 
WA_ORPRINT_STR-FG_USER8 sy-vline 
WA_ORPRINT_STR-USER9 sy-vline 
WA_ORPRINT_STR-FG_USER9 sy-vline 
WA_ORPRINT_STR-ABKRS sy-vline 
WA_ORPRINT_STR-TX_ABKRS sy-vline 
WA_ORPRINT_STR-FG_ABKRS sy-vline 
WA_ORPRINT_STR-IVPRO sy-vline 
WA_ORPRINT_STR-TX_IVPRO sy-vline 
WA_ORPRINT_STR-FG_IVPRO sy-vline 
WA_ORPRINT_STR-SIZECL sy-vline 
WA_ORPRINT_STR-TX_SIZECL sy-vline 
WA_ORPRINT_STR-FG_SIZECL sy-vline 
WA_ORPRINT_STR-IZWEK sy-vline 
WA_ORPRINT_STR-TX_IZWEK sy-vline 
WA_ORPRINT_STR-FG_IZWEK sy-vline 
WA_ORPRINT_STR-UMWKZ sy-vline 
WA_ORPRINT_STR-TX_UMWKZ sy-vline 
WA_ORPRINT_STR-FG_UMWKZ sy-vline 
WA_ORPRINT_STR-BRGKTEXT sy-vline 
WA_ORPRINT_STR-APROF sy-vline 
WA_ORPRINT_STR-TX_APROF sy-vline 
WA_ORPRINT_STR-ABSCH sy-vline 
WA_ORPRINT_STR-TX_ABSCH sy-vline 
WA_ORPRINT_STR-ERSCH sy-vline 
WA_ORPRINT_STR-TX_ERSCH sy-vline 
WA_ORPRINT_STR-URSCH sy-vline 
WA_ORPRINT_STR-TX_URSCH sy-vline 
WA_ORPRINT_STR-HIENR sy-vline 
WA_ORPRINT_STR-BZDAT sy-vline 
WA_ORPRINT_STR-VERAA_USER sy-vline 
WA_ORPRINT_STR-TX_VERAA_USER sy-vline 
WA_ORPRINT_STR-FG_VERAA_USER sy-vline 
WA_ORPRINT_STR-VNAME sy-vline 
WA_ORPRINT_STR-RECID sy-vline 
WA_ORPRINT_STR-ETYPE sy-vline 
WA_ORPRINT_STR-OTYPE sy-vline 
WA_ORPRINT_STR-JV_JIBCL sy-vline 
WA_ORPRINT_STR-JV_JIBSA sy-vline 
WA_ORPRINT_STR-JV_OCO sy-vline      INTO ld_text SEPARATED BY SPACE.

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