ABAP Select data from SAP table RKVEP 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 RKVEP 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 RKVEP. 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 RKVEP 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_RKVEP TYPE STANDARD TABLE OF RKVEP,
      WA_RKVEP TYPE RKVEP,
      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: <RKVEP> TYPE RKVEP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RKVEP
*  INTO TABLE @DATA(IT_RKVEP2).
*--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_RKVEP INDEX 1 INTO DATA(WA_RKVEP2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RKVEP ASSIGNING <RKVEP>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RKVEP>-MANDT = 1.
<RKVEP>-KOKRS = 1.
<RKVEP>-BELNR = 1.
<RKVEP>-GJAHR = 1.
<RKVEP>-VERSN = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RKVEP-VRGNG, sy-vline,
WA_RKVEP-TIMESTMP, sy-vline,
WA_RKVEP-PERAB, sy-vline,
WA_RKVEP-PERBI, sy-vline,
WA_RKVEP-BLDAT, sy-vline,
WA_RKVEP-BUDAT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RKVEP 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_RKVEP 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_RKVEP INTO WA_RKVEP. *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 BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RKVEP-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-BELNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit GJAHR, internal->external for field REFGJ CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_RKVEP-REFGJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-REFGJ.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit AC152, internal->external for field WTGBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-WTGBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-WTGBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field WOGBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-WOGBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-WOGBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field WKGBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-WKGBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-WKGBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field WKFBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-WKFBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-WKFBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field FTGBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-FTGBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-FTGBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field FOGBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-FOGBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-FOGBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field FKGBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-FKGBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-FKGBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC152, internal->external for field FKFBTR CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_RKVEP-FKFBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-FKFBTR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit OBART, internal->external for field OBJNR_ART CALL FUNCTION 'CONVERSION_EXIT_OBART_OUTPUT' EXPORTING input = WA_RKVEP-OBJNR_ART IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-OBJNR_ART.
WRITE:/ 'New Value:', ld_input.

*Conversion exit OBART, internal->external for field PAROB_ART CALL FUNCTION 'CONVERSION_EXIT_OBART_OUTPUT' EXPORTING input = WA_RKVEP-PAROB_ART IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-PAROB_ART.
WRITE:/ 'New Value:', ld_input.

*Conversion exit OBART, internal->external for field PAROB1_ART CALL FUNCTION 'CONVERSION_EXIT_OBART_OUTPUT' EXPORTING input = WA_RKVEP-PAROB1_ART IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-PAROB1_ART.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_RKVEP-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RKVEP-MATNR.
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_RKVEP_STR,
MANDT TYPE STRING,
KOKRS TYPE STRING,
BELNR TYPE STRING,
GJAHR TYPE STRING,
VERSN TYPE STRING,
VRGNG TYPE STRING,
TIMESTMP TYPE STRING,
PERAB TYPE STRING,
PERBI TYPE STRING,
BLDAT TYPE STRING,
BUDAT TYPE STRING,
CPUDT TYPE STRING,
USNAM TYPE STRING,
BLTXT TYPE STRING,
STFLG TYPE STRING,
STOKZ TYPE STRING,
REFBT TYPE STRING,
REFBN TYPE STRING,
REFBK TYPE STRING,
REFGJ TYPE STRING,
BLART TYPE STRING,
LDGRP TYPE STRING,
ORGVG TYPE STRING,
SUMBZ TYPE STRING,
DELBZ TYPE STRING,
WSDAT TYPE STRING,
KURST TYPE STRING,
VARNR TYPE STRING,
KWAER TYPE STRING,
CTYP1 TYPE STRING,
CTYP2 TYPE STRING,
CTYP3 TYPE STRING,
CTYP4 TYPE STRING,
AWTYP TYPE STRING,
AWORG TYPE STRING,
LOGSYSTEM TYPE STRING,
CPUTM TYPE STRING,
ALEBZ TYPE STRING,
ALEBN TYPE STRING,
AWSYS TYPE STRING,
AWREF_REV TYPE STRING,
AWORG_REV TYPE STRING,
AWKEY TYPE STRING,
VALDT TYPE STRING,
KOKRS_SENDER TYPE STRING,
BELNR_SENDER TYPE STRING,
LOGSYSTEM_SENDER TYPE STRING,
REPROCESSING_STATUS_CODE TYPE STRING,
BUZEI TYPE STRING,
LEDNR TYPE STRING,
OBJNR TYPE STRING,
PERIO TYPE STRING,
WTGBTR TYPE STRING,
WOGBTR TYPE STRING,
WKGBTR TYPE STRING,
WKFBTR TYPE STRING,
FTGBTR TYPE STRING,
FOGBTR TYPE STRING,
FKGBTR TYPE STRING,
FKFBTR TYPE STRING,
WRTTP TYPE STRING,
ABKAT TYPE STRING,
KSTAR TYPE STRING,
HRKFT TYPE STRING,
PAROB TYPE STRING,
PAROB1 TYPE STRING,
BEKNZ TYPE STRING,
AWKUS TYPE STRING,
TWAER TYPE STRING,
ZLNID TYPE STRING,
GSBER TYPE STRING,
KSTRG TYPE STRING,
KOSTL TYPE STRING,
AUFNR TYPE STRING,
LSTAR TYPE STRING,
PRTKO TYPE STRING,
PRTAU TYPE STRING,
PRTPS TYPE STRING,
PRTPO TYPE STRING,
PRTLS TYPE STRING,
PRTKO1 TYPE STRING,
PRTAU1 TYPE STRING,
PRTLS1 TYPE STRING,
OBJNR_ART TYPE STRING,
OBJNR_ED TYPE STRING,
PAROB_ART TYPE STRING,
PAROB_ED TYPE STRING,
PAROB1_ART TYPE STRING,
PAROB1_ED TYPE STRING,
WERKS TYPE STRING,
MATNR TYPE STRING,
OWAER TYPE STRING,
BWAER TYPE STRING,
ACTIV TYPE STRING,END OF T_EKKO_STR. DATA: WA_RKVEP_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_RKVEP_STR-MANDT sy-vline
WA_RKVEP_STR-KOKRS sy-vline
WA_RKVEP_STR-BELNR sy-vline
WA_RKVEP_STR-GJAHR sy-vline
WA_RKVEP_STR-VERSN sy-vline
WA_RKVEP_STR-VRGNG sy-vline
WA_RKVEP_STR-TIMESTMP sy-vline
WA_RKVEP_STR-PERAB sy-vline
WA_RKVEP_STR-PERBI sy-vline
WA_RKVEP_STR-BLDAT sy-vline
WA_RKVEP_STR-BUDAT sy-vline
WA_RKVEP_STR-CPUDT sy-vline
WA_RKVEP_STR-USNAM sy-vline
WA_RKVEP_STR-BLTXT sy-vline
WA_RKVEP_STR-STFLG sy-vline
WA_RKVEP_STR-STOKZ sy-vline
WA_RKVEP_STR-REFBT sy-vline
WA_RKVEP_STR-REFBN sy-vline
WA_RKVEP_STR-REFBK sy-vline
WA_RKVEP_STR-REFGJ sy-vline
WA_RKVEP_STR-BLART sy-vline
WA_RKVEP_STR-LDGRP sy-vline
WA_RKVEP_STR-ORGVG sy-vline
WA_RKVEP_STR-SUMBZ sy-vline
WA_RKVEP_STR-DELBZ sy-vline
WA_RKVEP_STR-WSDAT sy-vline
WA_RKVEP_STR-KURST sy-vline
WA_RKVEP_STR-VARNR sy-vline
WA_RKVEP_STR-KWAER sy-vline
WA_RKVEP_STR-CTYP1 sy-vline
WA_RKVEP_STR-CTYP2 sy-vline
WA_RKVEP_STR-CTYP3 sy-vline
WA_RKVEP_STR-CTYP4 sy-vline
WA_RKVEP_STR-AWTYP sy-vline
WA_RKVEP_STR-AWORG sy-vline
WA_RKVEP_STR-LOGSYSTEM sy-vline
WA_RKVEP_STR-CPUTM sy-vline
WA_RKVEP_STR-ALEBZ sy-vline
WA_RKVEP_STR-ALEBN sy-vline
WA_RKVEP_STR-AWSYS sy-vline
WA_RKVEP_STR-AWREF_REV sy-vline
WA_RKVEP_STR-AWORG_REV sy-vline
WA_RKVEP_STR-AWKEY sy-vline
WA_RKVEP_STR-VALDT sy-vline
WA_RKVEP_STR-KOKRS_SENDER sy-vline
WA_RKVEP_STR-BELNR_SENDER sy-vline
WA_RKVEP_STR-LOGSYSTEM_SENDER sy-vline
WA_RKVEP_STR-REPROCESSING_STATUS_CODE sy-vline
WA_RKVEP_STR-BUZEI sy-vline
WA_RKVEP_STR-LEDNR sy-vline
WA_RKVEP_STR-OBJNR sy-vline
WA_RKVEP_STR-PERIO sy-vline
WA_RKVEP_STR-WTGBTR sy-vline
WA_RKVEP_STR-WOGBTR sy-vline
WA_RKVEP_STR-WKGBTR sy-vline
WA_RKVEP_STR-WKFBTR sy-vline
WA_RKVEP_STR-FTGBTR sy-vline
WA_RKVEP_STR-FOGBTR sy-vline
WA_RKVEP_STR-FKGBTR sy-vline
WA_RKVEP_STR-FKFBTR sy-vline
WA_RKVEP_STR-WRTTP sy-vline
WA_RKVEP_STR-ABKAT sy-vline
WA_RKVEP_STR-KSTAR sy-vline
WA_RKVEP_STR-HRKFT sy-vline
WA_RKVEP_STR-PAROB sy-vline
WA_RKVEP_STR-PAROB1 sy-vline
WA_RKVEP_STR-BEKNZ sy-vline
WA_RKVEP_STR-AWKUS sy-vline
WA_RKVEP_STR-TWAER sy-vline
WA_RKVEP_STR-ZLNID sy-vline
WA_RKVEP_STR-GSBER sy-vline
WA_RKVEP_STR-KSTRG sy-vline
WA_RKVEP_STR-KOSTL sy-vline
WA_RKVEP_STR-AUFNR sy-vline
WA_RKVEP_STR-LSTAR sy-vline
WA_RKVEP_STR-PRTKO sy-vline
WA_RKVEP_STR-PRTAU sy-vline
WA_RKVEP_STR-PRTPS sy-vline
WA_RKVEP_STR-PRTPO sy-vline
WA_RKVEP_STR-PRTLS sy-vline
WA_RKVEP_STR-PRTKO1 sy-vline
WA_RKVEP_STR-PRTAU1 sy-vline
WA_RKVEP_STR-PRTLS1 sy-vline
WA_RKVEP_STR-OBJNR_ART sy-vline
WA_RKVEP_STR-OBJNR_ED sy-vline
WA_RKVEP_STR-PAROB_ART sy-vline
WA_RKVEP_STR-PAROB_ED sy-vline
WA_RKVEP_STR-PAROB1_ART sy-vline
WA_RKVEP_STR-PAROB1_ED sy-vline
WA_RKVEP_STR-WERKS sy-vline
WA_RKVEP_STR-MATNR sy-vline
WA_RKVEP_STR-OWAER sy-vline
WA_RKVEP_STR-BWAER sy-vline
WA_RKVEP_STR-ACTIV sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.