ABAP Select data from SAP table RN1PO_N1VKG_OP 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 RN1PO_N1VKG_OP 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 RN1PO_N1VKG_OP. 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 RN1PO_N1VKG_OP 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_RN1PO_N1VKG_OP TYPE STANDARD TABLE OF RN1PO_N1VKG_OP,
      WA_RN1PO_N1VKG_OP TYPE RN1PO_N1VKG_OP,
      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: <RN1PO_N1VKG_OP> TYPE RN1PO_N1VKG_OP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RN1PO_N1VKG_OP
*  INTO TABLE @DATA(IT_RN1PO_N1VKG_OP2).
*--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_RN1PO_N1VKG_OP INDEX 1 INTO DATA(WA_RN1PO_N1VKG_OP2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RN1PO_N1VKG_OP>-MANDT = 1.
<RN1PO_N1VKG_OP>-VKGID = 1.
<RN1PO_N1VKG_OP>-EINRI = 1.
<RN1PO_N1VKG_OP>-ORGID = 1.
<RN1PO_N1VKG_OP>-ANFTY = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RN1PO_N1VKG_OP-ETRBY, sy-vline,
  WA_RN1PO_N1VKG_OP-ETROE, sy-vline,
  WA_RN1PO_N1VKG_OP-ETRGP, sy-vline,
  WA_RN1PO_N1VKG_OP-PATNR, sy-vline,
  WA_RN1PO_N1VKG_OP-FALNR, sy-vline,
  WA_RN1PO_N1VKG_OP-KANAM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RN1PO_N1VKG_OP 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_RN1PO_N1VKG_OP 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_RN1PO_N1VKG_OP INTO WA_RN1PO_N1VKG_OP.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field TRTGP
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RN1PO_N1VKG_OP-TRTGP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN1PO_N1VKG_OP-TRTGP.
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_RN1PO_N1VKG_OP_STR, 
MANDT TYPE STRING,
VKGID TYPE STRING,
EINRI TYPE STRING,
ORGID TYPE STRING,
ANFTY TYPE STRING,
ETRBY TYPE STRING,
ETROE TYPE STRING,
ETRGP TYPE STRING,
PATNR TYPE STRING,
FALNR TYPE STRING,
KANAM TYPE STRING,
KALTX TYPE STRING,
DITXT TYPE STRING,
DILTX TYPE STRING,
EARNR TYPE STRING,
WUZPI TYPE STRING,
WUMNT TYPE STRING,
WUJHR TYPE STRING,
PBGDT TYPE STRING,
PBZT TYPE STRING,
BMVKG TYPE STRING,
BMLTX TYPE STRING,
AFNDT TYPE STRING,
AFNOE TYPE STRING,
WLPRI TYPE STRING,
PVPAT TYPE STRING,
WLTYP TYPE STRING,
WLREM TYPE STRING,
WLRDT TYPE STRING,
WLRRN TYPE STRING,
WLSTA TYPE STRING,
WLHSP TYPE STRING,
WLADT TYPE STRING,
ERDAT TYPE STRING,
ERUSR TYPE STRING,
UPDAT TYPE STRING,
UPUSR TYPE STRING,
STORN TYPE STRING,
STUSR TYPE STRING,
STDAT TYPE STRING,
STOID TYPE STRING,
FALAR TYPE STRING,
PAPID TYPE STRING,
EXTKH TYPE STRING,
UARNR TYPE STRING,
HARNR TYPE STRING,
ORGFA TYPE STRING,
BEWAR TYPE STRING,
BEKAT TYPE STRING,
AUFDS TYPE STRING,
RFSRC TYPE STRING,
AUSPR TYPE STRING,
PRTID TYPE STRING,
PRGNR TYPE STRING,
ICPMK TYPE STRING,
ICPML TYPE STRING,
TRDRN TYPE STRING,
TRDRNX TYPE STRING,
TROOM TYPE STRING,
TROOMX TYPE STRING,
USER1 TYPE STRING,
USER2 TYPE STRING,
USER3 TYPE STRING,
USER4 TYPE STRING,
USER5 TYPE STRING,
USER6 TYPE STRING,
USER7 TYPE STRING,
CORDERID TYPE STRING,
POSNR TYPE STRING,
APCNID TYPE STRING,
CORDTYPID TYPE STRING,
OBJNR TYPE STRING,
PREREG TYPE STRING,
TRTBY TYPE STRING,
TRTOE TYPE STRING,
TRTGP TYPE STRING,
BEKATX TYPE STRING,
TPAE TYPE STRING,
ERTIM TYPE STRING,
UPTIM TYPE STRING,
STTIM TYPE STRING,
REQCOMPID TYPE STRING,
REQCOMPNR TYPE STRING,
BEWTY TYPE STRING,
FATYP TYPE STRING,
CORDPTYPID TYPE STRING,
NOCORDPTYP TYPE STRING,
ISTAT TYPE STRING,
LFDNR TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RN1PO_N1VKG_OP_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_RN1PO_N1VKG_OP_STR-MANDT sy-vline 
WA_RN1PO_N1VKG_OP_STR-VKGID sy-vline 
WA_RN1PO_N1VKG_OP_STR-EINRI sy-vline 
WA_RN1PO_N1VKG_OP_STR-ORGID sy-vline 
WA_RN1PO_N1VKG_OP_STR-ANFTY sy-vline 
WA_RN1PO_N1VKG_OP_STR-ETRBY sy-vline 
WA_RN1PO_N1VKG_OP_STR-ETROE sy-vline 
WA_RN1PO_N1VKG_OP_STR-ETRGP sy-vline 
WA_RN1PO_N1VKG_OP_STR-PATNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-FALNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-KANAM sy-vline 
WA_RN1PO_N1VKG_OP_STR-KALTX sy-vline 
WA_RN1PO_N1VKG_OP_STR-DITXT sy-vline 
WA_RN1PO_N1VKG_OP_STR-DILTX sy-vline 
WA_RN1PO_N1VKG_OP_STR-EARNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-WUZPI sy-vline 
WA_RN1PO_N1VKG_OP_STR-WUMNT sy-vline 
WA_RN1PO_N1VKG_OP_STR-WUJHR sy-vline 
WA_RN1PO_N1VKG_OP_STR-PBGDT sy-vline 
WA_RN1PO_N1VKG_OP_STR-PBZT sy-vline 
WA_RN1PO_N1VKG_OP_STR-BMVKG sy-vline 
WA_RN1PO_N1VKG_OP_STR-BMLTX sy-vline 
WA_RN1PO_N1VKG_OP_STR-AFNDT sy-vline 
WA_RN1PO_N1VKG_OP_STR-AFNOE sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLPRI sy-vline 
WA_RN1PO_N1VKG_OP_STR-PVPAT sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLTYP sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLREM sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLRDT sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLRRN sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLSTA sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLHSP sy-vline 
WA_RN1PO_N1VKG_OP_STR-WLADT sy-vline 
WA_RN1PO_N1VKG_OP_STR-ERDAT sy-vline 
WA_RN1PO_N1VKG_OP_STR-ERUSR sy-vline 
WA_RN1PO_N1VKG_OP_STR-UPDAT sy-vline 
WA_RN1PO_N1VKG_OP_STR-UPUSR sy-vline 
WA_RN1PO_N1VKG_OP_STR-STORN sy-vline 
WA_RN1PO_N1VKG_OP_STR-STUSR sy-vline 
WA_RN1PO_N1VKG_OP_STR-STDAT sy-vline 
WA_RN1PO_N1VKG_OP_STR-STOID sy-vline 
WA_RN1PO_N1VKG_OP_STR-FALAR sy-vline 
WA_RN1PO_N1VKG_OP_STR-PAPID sy-vline 
WA_RN1PO_N1VKG_OP_STR-EXTKH sy-vline 
WA_RN1PO_N1VKG_OP_STR-UARNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-HARNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-ORGFA sy-vline 
WA_RN1PO_N1VKG_OP_STR-BEWAR sy-vline 
WA_RN1PO_N1VKG_OP_STR-BEKAT sy-vline 
WA_RN1PO_N1VKG_OP_STR-AUFDS sy-vline 
WA_RN1PO_N1VKG_OP_STR-RFSRC sy-vline 
WA_RN1PO_N1VKG_OP_STR-AUSPR sy-vline 
WA_RN1PO_N1VKG_OP_STR-PRTID sy-vline 
WA_RN1PO_N1VKG_OP_STR-PRGNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-ICPMK sy-vline 
WA_RN1PO_N1VKG_OP_STR-ICPML sy-vline 
WA_RN1PO_N1VKG_OP_STR-TRDRN sy-vline 
WA_RN1PO_N1VKG_OP_STR-TRDRNX sy-vline 
WA_RN1PO_N1VKG_OP_STR-TROOM sy-vline 
WA_RN1PO_N1VKG_OP_STR-TROOMX sy-vline 
WA_RN1PO_N1VKG_OP_STR-USER1 sy-vline 
WA_RN1PO_N1VKG_OP_STR-USER2 sy-vline 
WA_RN1PO_N1VKG_OP_STR-USER3 sy-vline 
WA_RN1PO_N1VKG_OP_STR-USER4 sy-vline 
WA_RN1PO_N1VKG_OP_STR-USER5 sy-vline 
WA_RN1PO_N1VKG_OP_STR-USER6 sy-vline 
WA_RN1PO_N1VKG_OP_STR-USER7 sy-vline 
WA_RN1PO_N1VKG_OP_STR-CORDERID sy-vline 
WA_RN1PO_N1VKG_OP_STR-POSNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-APCNID sy-vline 
WA_RN1PO_N1VKG_OP_STR-CORDTYPID sy-vline 
WA_RN1PO_N1VKG_OP_STR-OBJNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-PREREG sy-vline 
WA_RN1PO_N1VKG_OP_STR-TRTBY sy-vline 
WA_RN1PO_N1VKG_OP_STR-TRTOE sy-vline 
WA_RN1PO_N1VKG_OP_STR-TRTGP sy-vline 
WA_RN1PO_N1VKG_OP_STR-BEKATX sy-vline 
WA_RN1PO_N1VKG_OP_STR-TPAE sy-vline 
WA_RN1PO_N1VKG_OP_STR-ERTIM sy-vline 
WA_RN1PO_N1VKG_OP_STR-UPTIM sy-vline 
WA_RN1PO_N1VKG_OP_STR-STTIM sy-vline 
WA_RN1PO_N1VKG_OP_STR-REQCOMPID sy-vline 
WA_RN1PO_N1VKG_OP_STR-REQCOMPNR sy-vline 
WA_RN1PO_N1VKG_OP_STR-BEWTY sy-vline 
WA_RN1PO_N1VKG_OP_STR-FATYP sy-vline 
WA_RN1PO_N1VKG_OP_STR-CORDPTYPID sy-vline 
WA_RN1PO_N1VKG_OP_STR-NOCORDPTYP sy-vline 
WA_RN1PO_N1VKG_OP_STR-ISTAT sy-vline 
WA_RN1PO_N1VKG_OP_STR-LFDNR sy-vline      INTO ld_text SEPARATED BY SPACE.

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