ABAP Select data from SAP table RN1_CHECK_LIST_CORD_CPOS 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 RN1_CHECK_LIST_CORD_CPOS 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_CHECK_LIST_CORD_CPOS. 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_CHECK_LIST_CORD_CPOS 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_CHECK_LIST_CORD_CPOS TYPE STANDARD TABLE OF RN1_CHECK_LIST_CORD_CPOS,
      WA_RN1_CHECK_LIST_CORD_CPOS TYPE RN1_CHECK_LIST_CORD_CPOS,
      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_CHECK_LIST_CORD_CPOS> TYPE RN1_CHECK_LIST_CORD_CPOS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RN1_CHECK_LIST_CORD_CPOS
*  INTO TABLE @DATA(IT_RN1_CHECK_LIST_CORD_CPOS2).
*--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_CHECK_LIST_CORD_CPOS INDEX 1 INTO DATA(WA_RN1_CHECK_LIST_CORD_CPOS2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RN1_CHECK_LIST_CORD_CPOS ASSIGNING <RN1_CHECK_LIST_CORD_CPOS>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RN1_CHECK_LIST_CORD_CPOS>-CORDTYP_TITLE = 1.
<RN1_CHECK_LIST_CORD_CPOS>-N1VKG = 1.
<RN1_CHECK_LIST_CORD_CPOS>-MANDT = 1.
<RN1_CHECK_LIST_CORD_CPOS>-VKGID = 1.
<RN1_CHECK_LIST_CORD_CPOS>-EINRI = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RN1_CHECK_LIST_CORD_CPOS-ORGID, sy-vline,
WA_RN1_CHECK_LIST_CORD_CPOS-ANFTY, sy-vline,
WA_RN1_CHECK_LIST_CORD_CPOS-ETRBY, sy-vline,
WA_RN1_CHECK_LIST_CORD_CPOS-ETROE, sy-vline,
WA_RN1_CHECK_LIST_CORD_CPOS-ETRGP, sy-vline,
WA_RN1_CHECK_LIST_CORD_CPOS-PATNR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RN1_CHECK_LIST_CORD_CPOS 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_CHECK_LIST_CORD_CPOS 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_CHECK_LIST_CORD_CPOS INTO WA_RN1_CHECK_LIST_CORD_CPOS. *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_CHECK_LIST_CORD_CPOS-EINRI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RN1_CHECK_LIST_CORD_CPOS-EINRI.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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