ABAP Select data from SAP table RN1_CORDER_CORDPOS 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 RN1_CORDER_CORDPOS 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 RN1_CORDER_CORDPOS. 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 RN1_CORDER_CORDPOS 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_RN1_CORDER_CORDPOS TYPE STANDARD TABLE OF RN1_CORDER_CORDPOS,
      WA_RN1_CORDER_CORDPOS TYPE RN1_CORDER_CORDPOS,
      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: <RN1_CORDER_CORDPOS> TYPE RN1_CORDER_CORDPOS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RN1_CORDER_CORDPOS
*  INTO TABLE @DATA(IT_RN1_CORDER_CORDPOS2).
*--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_RN1_CORDER_CORDPOS INDEX 1 INTO DATA(WA_RN1_CORDER_CORDPOS2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RN1_CORDER_CORDPOS>-CORDER = 1.
<RN1_CORDER_CORDPOS>-CORDPOS = 1.
<RN1_CORDER_CORDPOS>-N1CORDER = 1.
<RN1_CORDER_CORDPOS>-MANDT = 1.
<RN1_CORDER_CORDPOS>-CORDERID = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RN1_CORDER_CORDPOS-EINRI, sy-vline,
  WA_RN1_CORDER_CORDPOS-REFTYP, sy-vline,
  WA_RN1_CORDER_CORDPOS-PATNR, sy-vline,
  WA_RN1_CORDER_CORDPOS-PAPID, sy-vline,
  WA_RN1_CORDER_CORDPOS-ETRBY, sy-vline,
  WA_RN1_CORDER_CORDPOS-ETROE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RN1_CORDER_CORDPOS 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_RN1_CORDER_CORDPOS 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_RN1_CORDER_CORDPOS INTO WA_RN1_CORDER_CORDPOS.


*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_RN1_CORDER_CORDPOS-EINRI
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RN1_CORDER_CORDPOS-EINRI.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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