ABAP Select data from SAP table RKPLN 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 RKPLN 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 RKPLN. 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 RKPLN 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_RKPLN TYPE STANDARD TABLE OF RKPLN,
      WA_RKPLN TYPE RKPLN,
      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: <RKPLN> TYPE RKPLN.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RKPLN
*  INTO TABLE @DATA(IT_RKPLN2).
*--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_RKPLN INDEX 1 INTO DATA(WA_RKPLN2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RKPLN>-KOKRS = 1.
<RKPLN>-BUKRS = 1.
<RKPLN>-VERSN = 1.
<RKPLN>-GJAHR = 1.
<RKPLN>-KOSTL = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RKPLN-KSGRU, sy-vline,
  WA_RKPLN-KOSTL_ONLY, sy-vline,
  WA_RKPLN-AUFNR, sy-vline,
  WA_RKPLN-AUFGR, sy-vline,
  WA_RKPLN-AUFNR_ONLY, sy-vline,
  WA_RKPLN-POSID, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RKPLN 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_RKPLN 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_RKPLN INTO WA_RKPLN.


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

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

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

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

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

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

*Conversion exit NUMCV, internal->external for field VORNR
CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-VORNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-VORNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field MEINH
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-MEINH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-MEINH.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field LEINH
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-LEINH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-LEINH.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field AUSEH
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-AUSEH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-AUSEH.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit AC132, internal->external for field PBG
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-PBG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-PBG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field PKG
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-PKG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-PKG.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit AC112, internal->external for field TKF
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-TKF
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-TKF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TKV
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-TKV
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-TKV.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TKG
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-TKG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-TKG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TOF
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-TOF
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-TOF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TOV
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-TOV
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-TOV.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC112, internal->external for field TOG
CALL FUNCTION 'CONVERSION_EXIT_AC112_OUTPUT'
  EXPORTING
    input =                      WA_RKPLN-TOG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKPLN-TOG.
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_RKPLN_STR, 
KOKRS TYPE STRING,
BUKRS TYPE STRING,
VERSN TYPE STRING,
GJAHR TYPE STRING,
KOSTL TYPE STRING,
KSGRU TYPE STRING,
KOSTL_ONLY TYPE STRING,
AUFNR TYPE STRING,
AUFGR TYPE STRING,
AUFNR_ONLY TYPE STRING,
POSID TYPE STRING,
POSIDGR TYPE STRING,
AUFNR_NW TYPE STRING,
VORNR TYPE STRING,
VORGR TYPE STRING,
VORNR_ONLY TYPE STRING,
SGENR TYPE STRING,
SGEGR TYPE STRING,
SGENR_ONLY TYPE STRING,
SGRNR TYPE STRING,
SGRGR TYPE STRING,
SGRNR_ONLY TYPE STRING,
SMENR TYPE STRING,
SMEGR TYPE STRING,
SMENR_ONLY TYPE STRING,
SMIVE TYPE STRING,
SMVGR TYPE STRING,
SMIVE_ONLY TYPE STRING,
SWENR TYPE STRING,
SWEGR TYPE STRING,
SWENR_ONLY TYPE STRING,
SVWNR TYPE STRING,
KONTY TYPE STRING,
RECNNR TYPE STRING,
RECNGR TYPE STRING,
RECNNR_ONLY TYPE STRING,
XTEXT TYPE STRING,
KSTAR TYPE STRING,
KAGRU TYPE STRING,
KSTAR_ONLY TYPE STRING,
RESRC TYPE STRING,
SFKBER TYPE STRING,
SFKGRU TYPE STRING,
FKBER TYPE STRING,
FKGRU TYPE STRING,
SGEBER TYPE STRING,
SGBGRU TYPE STRING,
GEBER TYPE STRING,
GBGRU TYPE STRING,
SGRANT_NBR TYPE STRING,
SGRANT_GRU TYPE STRING,
GRANT_NBR TYPE STRING,
GRANT_GRU TYPE STRING,
BUDGET_PD TYPE STRING,
SBUDGET_PD TYPE STRING,
BUDGET_PD_GRP TYPE STRING,
SBUDGET_PD_GRP TYPE STRING,
LSTAR TYPE STRING,
LAGRU TYPE STRING,
LSTAR_ONLY TYPE STRING,
STAGR TYPE STRING,
STGRU TYPE STRING,
STAGR_ONLY TYPE STRING,
SKOST TYPE STRING,
SKGRU TYPE STRING,
SKOST_ONLY TYPE STRING,
SLSTA TYPE STRING,
SLGRU TYPE STRING,
SLSTA_ONLY TYPE STRING,
PRZNR TYPE STRING,
PRGRU TYPE STRING,
PRZNR_ONLY TYPE STRING,
SEPRZ TYPE STRING,
SPGRU TYPE STRING,
KSTRG TYPE STRING,
KTGRU TYPE STRING,
KSTRG_ONLY TYPE STRING,
BELNR TYPE STRING,
MEINH TYPE STRING,
MGEFL TYPE STRING,
EIGEN TYPE STRING,
WSWTE TYPE STRING,
KALNR TYPE STRING,
DPLEX TYPE STRING,
DPLUP TYPE STRING,
ICOKA TYPE STRING,
TXFLG TYPE STRING,
TXTUP TYPE STRING,
LATYP TYPE STRING,
LEINH TYPE STRING,
AUSFK TYPE STRING,
AUSEH TYPE STRING,
VKSTA TYPE STRING,
AKSTA TYPE STRING,
TARKZ TYPE STRING,
YRATE TYPE STRING,
OBJNAME TYPE STRING,
OBJVALUE TYPE STRING,
OBJTEXT TYPE STRING,
PERBL TYPE STRING,
WKF TYPE STRING,
WKV TYPE STRING,
WKG TYPE STRING,
WOF TYPE STRING,
WOV TYPE STRING,
WOG TYPE STRING,
WTF TYPE STRING,
WTV TYPE STRING,
WTG TYPE STRING,
MEF TYPE STRING,
MEV TYPE STRING,
MEG TYPE STRING,
PBG TYPE STRING,
PKG TYPE STRING,
PBE TYPE STRING,
RKF TYPE STRING,
RKV TYPE STRING,
RKG TYPE STRING,
RKE TYPE STRING,
ROF TYPE STRING,
ROV TYPE STRING,
ROG TYPE STRING,
ROE TYPE STRING,
REF TYPE STRING,
REV TYPE STRING,
REG TYPE STRING,
REE TYPE STRING,
XEG TYPE STRING,
TKF TYPE STRING,
TKV TYPE STRING,
TKG TYPE STRING,
TKE TYPE STRING,
TOF TYPE STRING,
TOV TYPE STRING,
TOG TYPE STRING,
TOE TYPE STRING,
LST TYPE STRING,
KAP TYPE STRING,
AUS TYPE STRING,
DIS TYPE STRING,
AEQ TYPE STRING,
SME TYPE STRING,
SMA TYPE STRING,
PSTAT TYPE STRING,
NOREC TYPE STRING,
TWAER TYPE STRING,
OBJNR TYPE STRING,
TXTUPL TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RKPLN_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_RKPLN_STR-KOKRS sy-vline 
WA_RKPLN_STR-BUKRS sy-vline 
WA_RKPLN_STR-VERSN sy-vline 
WA_RKPLN_STR-GJAHR sy-vline 
WA_RKPLN_STR-KOSTL sy-vline 
WA_RKPLN_STR-KSGRU sy-vline 
WA_RKPLN_STR-KOSTL_ONLY sy-vline 
WA_RKPLN_STR-AUFNR sy-vline 
WA_RKPLN_STR-AUFGR sy-vline 
WA_RKPLN_STR-AUFNR_ONLY sy-vline 
WA_RKPLN_STR-POSID sy-vline 
WA_RKPLN_STR-POSIDGR sy-vline 
WA_RKPLN_STR-AUFNR_NW sy-vline 
WA_RKPLN_STR-VORNR sy-vline 
WA_RKPLN_STR-VORGR sy-vline 
WA_RKPLN_STR-VORNR_ONLY sy-vline 
WA_RKPLN_STR-SGENR sy-vline 
WA_RKPLN_STR-SGEGR sy-vline 
WA_RKPLN_STR-SGENR_ONLY sy-vline 
WA_RKPLN_STR-SGRNR sy-vline 
WA_RKPLN_STR-SGRGR sy-vline 
WA_RKPLN_STR-SGRNR_ONLY sy-vline 
WA_RKPLN_STR-SMENR sy-vline 
WA_RKPLN_STR-SMEGR sy-vline 
WA_RKPLN_STR-SMENR_ONLY sy-vline 
WA_RKPLN_STR-SMIVE sy-vline 
WA_RKPLN_STR-SMVGR sy-vline 
WA_RKPLN_STR-SMIVE_ONLY sy-vline 
WA_RKPLN_STR-SWENR sy-vline 
WA_RKPLN_STR-SWEGR sy-vline 
WA_RKPLN_STR-SWENR_ONLY sy-vline 
WA_RKPLN_STR-SVWNR sy-vline 
WA_RKPLN_STR-KONTY sy-vline 
WA_RKPLN_STR-RECNNR sy-vline 
WA_RKPLN_STR-RECNGR sy-vline 
WA_RKPLN_STR-RECNNR_ONLY sy-vline 
WA_RKPLN_STR-XTEXT sy-vline 
WA_RKPLN_STR-KSTAR sy-vline 
WA_RKPLN_STR-KAGRU sy-vline 
WA_RKPLN_STR-KSTAR_ONLY sy-vline 
WA_RKPLN_STR-RESRC sy-vline 
WA_RKPLN_STR-SFKBER sy-vline 
WA_RKPLN_STR-SFKGRU sy-vline 
WA_RKPLN_STR-FKBER sy-vline 
WA_RKPLN_STR-FKGRU sy-vline 
WA_RKPLN_STR-SGEBER sy-vline 
WA_RKPLN_STR-SGBGRU sy-vline 
WA_RKPLN_STR-GEBER sy-vline 
WA_RKPLN_STR-GBGRU sy-vline 
WA_RKPLN_STR-SGRANT_NBR sy-vline 
WA_RKPLN_STR-SGRANT_GRU sy-vline 
WA_RKPLN_STR-GRANT_NBR sy-vline 
WA_RKPLN_STR-GRANT_GRU sy-vline 
WA_RKPLN_STR-BUDGET_PD sy-vline 
WA_RKPLN_STR-SBUDGET_PD sy-vline 
WA_RKPLN_STR-BUDGET_PD_GRP sy-vline 
WA_RKPLN_STR-SBUDGET_PD_GRP sy-vline 
WA_RKPLN_STR-LSTAR sy-vline 
WA_RKPLN_STR-LAGRU sy-vline 
WA_RKPLN_STR-LSTAR_ONLY sy-vline 
WA_RKPLN_STR-STAGR sy-vline 
WA_RKPLN_STR-STGRU sy-vline 
WA_RKPLN_STR-STAGR_ONLY sy-vline 
WA_RKPLN_STR-SKOST sy-vline 
WA_RKPLN_STR-SKGRU sy-vline 
WA_RKPLN_STR-SKOST_ONLY sy-vline 
WA_RKPLN_STR-SLSTA sy-vline 
WA_RKPLN_STR-SLGRU sy-vline 
WA_RKPLN_STR-SLSTA_ONLY sy-vline 
WA_RKPLN_STR-PRZNR sy-vline 
WA_RKPLN_STR-PRGRU sy-vline 
WA_RKPLN_STR-PRZNR_ONLY sy-vline 
WA_RKPLN_STR-SEPRZ sy-vline 
WA_RKPLN_STR-SPGRU sy-vline 
WA_RKPLN_STR-KSTRG sy-vline 
WA_RKPLN_STR-KTGRU sy-vline 
WA_RKPLN_STR-KSTRG_ONLY sy-vline 
WA_RKPLN_STR-BELNR sy-vline 
WA_RKPLN_STR-MEINH sy-vline 
WA_RKPLN_STR-MGEFL sy-vline 
WA_RKPLN_STR-EIGEN sy-vline 
WA_RKPLN_STR-WSWTE sy-vline 
WA_RKPLN_STR-KALNR sy-vline 
WA_RKPLN_STR-DPLEX sy-vline 
WA_RKPLN_STR-DPLUP sy-vline 
WA_RKPLN_STR-ICOKA sy-vline 
WA_RKPLN_STR-TXFLG sy-vline 
WA_RKPLN_STR-TXTUP sy-vline 
WA_RKPLN_STR-LATYP sy-vline 
WA_RKPLN_STR-LEINH sy-vline 
WA_RKPLN_STR-AUSFK sy-vline 
WA_RKPLN_STR-AUSEH sy-vline 
WA_RKPLN_STR-VKSTA sy-vline 
WA_RKPLN_STR-AKSTA sy-vline 
WA_RKPLN_STR-TARKZ sy-vline 
WA_RKPLN_STR-YRATE sy-vline 
WA_RKPLN_STR-OBJNAME sy-vline 
WA_RKPLN_STR-OBJVALUE sy-vline 
WA_RKPLN_STR-OBJTEXT sy-vline 
WA_RKPLN_STR-PERBL sy-vline 
WA_RKPLN_STR-WKF sy-vline 
WA_RKPLN_STR-WKV sy-vline 
WA_RKPLN_STR-WKG sy-vline 
WA_RKPLN_STR-WOF sy-vline 
WA_RKPLN_STR-WOV sy-vline 
WA_RKPLN_STR-WOG sy-vline 
WA_RKPLN_STR-WTF sy-vline 
WA_RKPLN_STR-WTV sy-vline 
WA_RKPLN_STR-WTG sy-vline 
WA_RKPLN_STR-MEF sy-vline 
WA_RKPLN_STR-MEV sy-vline 
WA_RKPLN_STR-MEG sy-vline 
WA_RKPLN_STR-PBG sy-vline 
WA_RKPLN_STR-PKG sy-vline 
WA_RKPLN_STR-PBE sy-vline 
WA_RKPLN_STR-RKF sy-vline 
WA_RKPLN_STR-RKV sy-vline 
WA_RKPLN_STR-RKG sy-vline 
WA_RKPLN_STR-RKE sy-vline 
WA_RKPLN_STR-ROF sy-vline 
WA_RKPLN_STR-ROV sy-vline 
WA_RKPLN_STR-ROG sy-vline 
WA_RKPLN_STR-ROE sy-vline 
WA_RKPLN_STR-REF sy-vline 
WA_RKPLN_STR-REV sy-vline 
WA_RKPLN_STR-REG sy-vline 
WA_RKPLN_STR-REE sy-vline 
WA_RKPLN_STR-XEG sy-vline 
WA_RKPLN_STR-TKF sy-vline 
WA_RKPLN_STR-TKV sy-vline 
WA_RKPLN_STR-TKG sy-vline 
WA_RKPLN_STR-TKE sy-vline 
WA_RKPLN_STR-TOF sy-vline 
WA_RKPLN_STR-TOV sy-vline 
WA_RKPLN_STR-TOG sy-vline 
WA_RKPLN_STR-TOE sy-vline 
WA_RKPLN_STR-LST sy-vline 
WA_RKPLN_STR-KAP sy-vline 
WA_RKPLN_STR-AUS sy-vline 
WA_RKPLN_STR-DIS sy-vline 
WA_RKPLN_STR-AEQ sy-vline 
WA_RKPLN_STR-SME sy-vline 
WA_RKPLN_STR-SMA sy-vline 
WA_RKPLN_STR-PSTAT sy-vline 
WA_RKPLN_STR-NOREC sy-vline 
WA_RKPLN_STR-TWAER sy-vline 
WA_RKPLN_STR-OBJNR sy-vline 
WA_RKPLN_STR-TXTUPL sy-vline      INTO ld_text SEPARATED BY SPACE.

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