ABAP Select data from SAP table RKU01JA_CS 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 RKU01JA_CS 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 RKU01JA_CS. 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 RKU01JA_CS 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_RKU01JA_CS TYPE STANDARD TABLE OF RKU01JA_CS,
      WA_RKU01JA_CS TYPE RKU01JA_CS,
      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: <RKU01JA_CS> TYPE RKU01JA_CS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RKU01JA_CS
*  INTO TABLE @DATA(IT_RKU01JA_CS2).
*--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_RKU01JA_CS INDEX 1 INTO DATA(WA_RKU01JA_CS2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RKU01JA_CS>-VRGNG = 1.
<RKU01JA_CS>-LEDNR = 1.
<RKU01JA_CS>-KOKRS = 1.
<RKU01JA_CS>-KOSTL = 1.
<RKU01JA_CS>-LSTAR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RKU01JA_CS-AUFNR, sy-vline,
  WA_RKU01JA_CS-POSID, sy-vline,
  WA_RKU01JA_CS-AOTYP, sy-vline,
  WA_RKU01JA_CS-AO_OBJNR, sy-vline,
  WA_RKU01JA_CS-GJAHR, sy-vline,
  WA_RKU01JA_CS-PERAB, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RKU01JA_CS 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_RKU01JA_CS 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_RKU01JA_CS INTO WA_RKU01JA_CS.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field PGRANT_NBR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RKU01JA_CS-PGRANT_NBR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RKU01JA_CS-PGRANT_NBR.
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_RKU01JA_CS_STR, 
VRGNG TYPE STRING,
LEDNR TYPE STRING,
KOKRS TYPE STRING,
KOSTL TYPE STRING,
LSTAR TYPE STRING,
AUFNR TYPE STRING,
POSID TYPE STRING,
AOTYP TYPE STRING,
AO_OBJNR TYPE STRING,
GJAHR TYPE STRING,
PERAB TYPE STRING,
PERBI TYPE STRING,
VERSN TYPE STRING,
KSTAR TYPE STRING,
HRKFT TYPE STRING,
P_KOSTL TYPE STRING,
P_LSTAR TYPE STRING,
P_AUFNR TYPE STRING,
P1_KOSTL TYPE STRING,
P1_LSTAR TYPE STRING,
P1_AUFNR TYPE STRING,
UP_KOSTL TYPE STRING,
UP_LSTAR TYPE STRING,
UP_AUFNR TYPE STRING,
VBUND TYPE STRING,
PARGB TYPE STRING,
WTG001 TYPE STRING,
WTG002 TYPE STRING,
WTG003 TYPE STRING,
WTG004 TYPE STRING,
WTG005 TYPE STRING,
WTG006 TYPE STRING,
WTG007 TYPE STRING,
WTG008 TYPE STRING,
WTG009 TYPE STRING,
WTG010 TYPE STRING,
WTG011 TYPE STRING,
WTG012 TYPE STRING,
WTG013 TYPE STRING,
WTG014 TYPE STRING,
WTG015 TYPE STRING,
WTG016 TYPE STRING,
WTF001 TYPE STRING,
WTF002 TYPE STRING,
WTF003 TYPE STRING,
WTF004 TYPE STRING,
WTF005 TYPE STRING,
WTF006 TYPE STRING,
WTF007 TYPE STRING,
WTF008 TYPE STRING,
WTF009 TYPE STRING,
WTF010 TYPE STRING,
WTF011 TYPE STRING,
WTF012 TYPE STRING,
WTF013 TYPE STRING,
WTF014 TYPE STRING,
WTF015 TYPE STRING,
WTF016 TYPE STRING,
WOG001 TYPE STRING,
WOG002 TYPE STRING,
WOG003 TYPE STRING,
WOG004 TYPE STRING,
WOG005 TYPE STRING,
WOG006 TYPE STRING,
WOG007 TYPE STRING,
WOG008 TYPE STRING,
WOG009 TYPE STRING,
WOG010 TYPE STRING,
WOG011 TYPE STRING,
WOG012 TYPE STRING,
WOG013 TYPE STRING,
WOG014 TYPE STRING,
WOG015 TYPE STRING,
WOG016 TYPE STRING,
WOF001 TYPE STRING,
WOF002 TYPE STRING,
WOF003 TYPE STRING,
WOF004 TYPE STRING,
WOF005 TYPE STRING,
WOF006 TYPE STRING,
WOF007 TYPE STRING,
WOF008 TYPE STRING,
WOF009 TYPE STRING,
WOF010 TYPE STRING,
WOF011 TYPE STRING,
WOF012 TYPE STRING,
WOF013 TYPE STRING,
WOF014 TYPE STRING,
WOF015 TYPE STRING,
WOF016 TYPE STRING,
WKG001 TYPE STRING,
WKG002 TYPE STRING,
WKG003 TYPE STRING,
WKG004 TYPE STRING,
WKG005 TYPE STRING,
WKG006 TYPE STRING,
WKG007 TYPE STRING,
WKG008 TYPE STRING,
WKG009 TYPE STRING,
WKG010 TYPE STRING,
WKG011 TYPE STRING,
WKG012 TYPE STRING,
WKG013 TYPE STRING,
WKG014 TYPE STRING,
WKG015 TYPE STRING,
WKG016 TYPE STRING,
WKF001 TYPE STRING,
WKF002 TYPE STRING,
WKF003 TYPE STRING,
WKF004 TYPE STRING,
WKF005 TYPE STRING,
WKF006 TYPE STRING,
WKF007 TYPE STRING,
WKF008 TYPE STRING,
WKF009 TYPE STRING,
WKF010 TYPE STRING,
WKF011 TYPE STRING,
WKF012 TYPE STRING,
WKF013 TYPE STRING,
WKF014 TYPE STRING,
WKF015 TYPE STRING,
WKF016 TYPE STRING,
MEG001 TYPE STRING,
MEG002 TYPE STRING,
MEG003 TYPE STRING,
MEG004 TYPE STRING,
MEG005 TYPE STRING,
MEG006 TYPE STRING,
MEG007 TYPE STRING,
MEG008 TYPE STRING,
MEG009 TYPE STRING,
MEG010 TYPE STRING,
MEG011 TYPE STRING,
MEG012 TYPE STRING,
MEG013 TYPE STRING,
MEG014 TYPE STRING,
MEG015 TYPE STRING,
MEG016 TYPE STRING,
MEF001 TYPE STRING,
MEF002 TYPE STRING,
MEF003 TYPE STRING,
MEF004 TYPE STRING,
MEF005 TYPE STRING,
MEF006 TYPE STRING,
MEF007 TYPE STRING,
MEF008 TYPE STRING,
MEF009 TYPE STRING,
MEF010 TYPE STRING,
MEF011 TYPE STRING,
MEF012 TYPE STRING,
MEF013 TYPE STRING,
MEF014 TYPE STRING,
MEF015 TYPE STRING,
MEF016 TYPE STRING,
MBG001 TYPE STRING,
MBG002 TYPE STRING,
MBG003 TYPE STRING,
MBG004 TYPE STRING,
MBG005 TYPE STRING,
MBG006 TYPE STRING,
MBG007 TYPE STRING,
MBG008 TYPE STRING,
MBG009 TYPE STRING,
MBG010 TYPE STRING,
MBG011 TYPE STRING,
MBG012 TYPE STRING,
MBG013 TYPE STRING,
MBG014 TYPE STRING,
MBG015 TYPE STRING,
MBG016 TYPE STRING,
MBF001 TYPE STRING,
MBF002 TYPE STRING,
MBF003 TYPE STRING,
MBF004 TYPE STRING,
MBF005 TYPE STRING,
MBF006 TYPE STRING,
MBF007 TYPE STRING,
MBF008 TYPE STRING,
MBF009 TYPE STRING,
MBF010 TYPE STRING,
MBF011 TYPE STRING,
MBF012 TYPE STRING,
MBF013 TYPE STRING,
MBF014 TYPE STRING,
MBF015 TYPE STRING,
MBF016 TYPE STRING,
BEKNZ TYPE STRING,
TWAER TYPE STRING,
MEINH TYPE STRING,
MEINB TYPE STRING,
MGEFL TYPE STRING,
EIGEN TYPE STRING,
REFBZ TYPE STRING,
KALNR TYPE STRING,
TXFLG TYPE STRING,
OWAER TYPE STRING,
FCWKF TYPE STRING,
FCWKV TYPE STRING,
FCWKG TYPE STRING,
FCMEF TYPE STRING,
FCMEV TYPE STRING,
FCMEG TYPE STRING,
PRZNR TYPE STRING,
P_PRZNR TYPE STRING,
P1_PRZNR TYPE STRING,
UP_PRZNR TYPE STRING,
RESRC TYPE STRING,
NPLNR TYPE STRING,
VORNR TYPE STRING,
KSTRG TYPE STRING,
R_INDEX TYPE STRING,
FCWOG TYPE STRING,
FCWOF TYPE STRING,
FCWOV TYPE STRING,
FCWTG TYPE STRING,
FCWTF TYPE STRING,
FCWTV TYPE STRING,
PAROB_PS TYPE STRING,
USPOB_PS TYPE STRING,
BUKRS_RE TYPE STRING,
RECNNR TYPE STRING,
SGENR TYPE STRING,
SGRNR TYPE STRING,
SMENR TYPE STRING,
SMIVE TYPE STRING,
SVWNR TYPE STRING,
SWENR TYPE STRING,
SNKSL TYPE STRING,
SEMPSL TYPE STRING,
DABRBZ TYPE STRING,
ROW_ID TYPE STRING,
FKBER TYPE STRING,
PFKBER TYPE STRING,
GEBER TYPE STRING,
PGEBER TYPE STRING,
GRANT_NBR TYPE STRING,
PGRANT_NBR TYPE STRING,
BUDGET_PD TYPE STRING,
PBUDGET_PD TYPE STRING,
STFLG TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RKU01JA_CS_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_RKU01JA_CS_STR-VRGNG sy-vline 
WA_RKU01JA_CS_STR-LEDNR sy-vline 
WA_RKU01JA_CS_STR-KOKRS sy-vline 
WA_RKU01JA_CS_STR-KOSTL sy-vline 
WA_RKU01JA_CS_STR-LSTAR sy-vline 
WA_RKU01JA_CS_STR-AUFNR sy-vline 
WA_RKU01JA_CS_STR-POSID sy-vline 
WA_RKU01JA_CS_STR-AOTYP sy-vline 
WA_RKU01JA_CS_STR-AO_OBJNR sy-vline 
WA_RKU01JA_CS_STR-GJAHR sy-vline 
WA_RKU01JA_CS_STR-PERAB sy-vline 
WA_RKU01JA_CS_STR-PERBI sy-vline 
WA_RKU01JA_CS_STR-VERSN sy-vline 
WA_RKU01JA_CS_STR-KSTAR sy-vline 
WA_RKU01JA_CS_STR-HRKFT sy-vline 
WA_RKU01JA_CS_STR-P_KOSTL sy-vline 
WA_RKU01JA_CS_STR-P_LSTAR sy-vline 
WA_RKU01JA_CS_STR-P_AUFNR sy-vline 
WA_RKU01JA_CS_STR-P1_KOSTL sy-vline 
WA_RKU01JA_CS_STR-P1_LSTAR sy-vline 
WA_RKU01JA_CS_STR-P1_AUFNR sy-vline 
WA_RKU01JA_CS_STR-UP_KOSTL sy-vline 
WA_RKU01JA_CS_STR-UP_LSTAR sy-vline 
WA_RKU01JA_CS_STR-UP_AUFNR sy-vline 
WA_RKU01JA_CS_STR-VBUND sy-vline 
WA_RKU01JA_CS_STR-PARGB sy-vline 
WA_RKU01JA_CS_STR-WTG001 sy-vline 
WA_RKU01JA_CS_STR-WTG002 sy-vline 
WA_RKU01JA_CS_STR-WTG003 sy-vline 
WA_RKU01JA_CS_STR-WTG004 sy-vline 
WA_RKU01JA_CS_STR-WTG005 sy-vline 
WA_RKU01JA_CS_STR-WTG006 sy-vline 
WA_RKU01JA_CS_STR-WTG007 sy-vline 
WA_RKU01JA_CS_STR-WTG008 sy-vline 
WA_RKU01JA_CS_STR-WTG009 sy-vline 
WA_RKU01JA_CS_STR-WTG010 sy-vline 
WA_RKU01JA_CS_STR-WTG011 sy-vline 
WA_RKU01JA_CS_STR-WTG012 sy-vline 
WA_RKU01JA_CS_STR-WTG013 sy-vline 
WA_RKU01JA_CS_STR-WTG014 sy-vline 
WA_RKU01JA_CS_STR-WTG015 sy-vline 
WA_RKU01JA_CS_STR-WTG016 sy-vline 
WA_RKU01JA_CS_STR-WTF001 sy-vline 
WA_RKU01JA_CS_STR-WTF002 sy-vline 
WA_RKU01JA_CS_STR-WTF003 sy-vline 
WA_RKU01JA_CS_STR-WTF004 sy-vline 
WA_RKU01JA_CS_STR-WTF005 sy-vline 
WA_RKU01JA_CS_STR-WTF006 sy-vline 
WA_RKU01JA_CS_STR-WTF007 sy-vline 
WA_RKU01JA_CS_STR-WTF008 sy-vline 
WA_RKU01JA_CS_STR-WTF009 sy-vline 
WA_RKU01JA_CS_STR-WTF010 sy-vline 
WA_RKU01JA_CS_STR-WTF011 sy-vline 
WA_RKU01JA_CS_STR-WTF012 sy-vline 
WA_RKU01JA_CS_STR-WTF013 sy-vline 
WA_RKU01JA_CS_STR-WTF014 sy-vline 
WA_RKU01JA_CS_STR-WTF015 sy-vline 
WA_RKU01JA_CS_STR-WTF016 sy-vline 
WA_RKU01JA_CS_STR-WOG001 sy-vline 
WA_RKU01JA_CS_STR-WOG002 sy-vline 
WA_RKU01JA_CS_STR-WOG003 sy-vline 
WA_RKU01JA_CS_STR-WOG004 sy-vline 
WA_RKU01JA_CS_STR-WOG005 sy-vline 
WA_RKU01JA_CS_STR-WOG006 sy-vline 
WA_RKU01JA_CS_STR-WOG007 sy-vline 
WA_RKU01JA_CS_STR-WOG008 sy-vline 
WA_RKU01JA_CS_STR-WOG009 sy-vline 
WA_RKU01JA_CS_STR-WOG010 sy-vline 
WA_RKU01JA_CS_STR-WOG011 sy-vline 
WA_RKU01JA_CS_STR-WOG012 sy-vline 
WA_RKU01JA_CS_STR-WOG013 sy-vline 
WA_RKU01JA_CS_STR-WOG014 sy-vline 
WA_RKU01JA_CS_STR-WOG015 sy-vline 
WA_RKU01JA_CS_STR-WOG016 sy-vline 
WA_RKU01JA_CS_STR-WOF001 sy-vline 
WA_RKU01JA_CS_STR-WOF002 sy-vline 
WA_RKU01JA_CS_STR-WOF003 sy-vline 
WA_RKU01JA_CS_STR-WOF004 sy-vline 
WA_RKU01JA_CS_STR-WOF005 sy-vline 
WA_RKU01JA_CS_STR-WOF006 sy-vline 
WA_RKU01JA_CS_STR-WOF007 sy-vline 
WA_RKU01JA_CS_STR-WOF008 sy-vline 
WA_RKU01JA_CS_STR-WOF009 sy-vline 
WA_RKU01JA_CS_STR-WOF010 sy-vline 
WA_RKU01JA_CS_STR-WOF011 sy-vline 
WA_RKU01JA_CS_STR-WOF012 sy-vline 
WA_RKU01JA_CS_STR-WOF013 sy-vline 
WA_RKU01JA_CS_STR-WOF014 sy-vline 
WA_RKU01JA_CS_STR-WOF015 sy-vline 
WA_RKU01JA_CS_STR-WOF016 sy-vline 
WA_RKU01JA_CS_STR-WKG001 sy-vline 
WA_RKU01JA_CS_STR-WKG002 sy-vline 
WA_RKU01JA_CS_STR-WKG003 sy-vline 
WA_RKU01JA_CS_STR-WKG004 sy-vline 
WA_RKU01JA_CS_STR-WKG005 sy-vline 
WA_RKU01JA_CS_STR-WKG006 sy-vline 
WA_RKU01JA_CS_STR-WKG007 sy-vline 
WA_RKU01JA_CS_STR-WKG008 sy-vline 
WA_RKU01JA_CS_STR-WKG009 sy-vline 
WA_RKU01JA_CS_STR-WKG010 sy-vline 
WA_RKU01JA_CS_STR-WKG011 sy-vline 
WA_RKU01JA_CS_STR-WKG012 sy-vline 
WA_RKU01JA_CS_STR-WKG013 sy-vline 
WA_RKU01JA_CS_STR-WKG014 sy-vline 
WA_RKU01JA_CS_STR-WKG015 sy-vline 
WA_RKU01JA_CS_STR-WKG016 sy-vline 
WA_RKU01JA_CS_STR-WKF001 sy-vline 
WA_RKU01JA_CS_STR-WKF002 sy-vline 
WA_RKU01JA_CS_STR-WKF003 sy-vline 
WA_RKU01JA_CS_STR-WKF004 sy-vline 
WA_RKU01JA_CS_STR-WKF005 sy-vline 
WA_RKU01JA_CS_STR-WKF006 sy-vline 
WA_RKU01JA_CS_STR-WKF007 sy-vline 
WA_RKU01JA_CS_STR-WKF008 sy-vline 
WA_RKU01JA_CS_STR-WKF009 sy-vline 
WA_RKU01JA_CS_STR-WKF010 sy-vline 
WA_RKU01JA_CS_STR-WKF011 sy-vline 
WA_RKU01JA_CS_STR-WKF012 sy-vline 
WA_RKU01JA_CS_STR-WKF013 sy-vline 
WA_RKU01JA_CS_STR-WKF014 sy-vline 
WA_RKU01JA_CS_STR-WKF015 sy-vline 
WA_RKU01JA_CS_STR-WKF016 sy-vline 
WA_RKU01JA_CS_STR-MEG001 sy-vline 
WA_RKU01JA_CS_STR-MEG002 sy-vline 
WA_RKU01JA_CS_STR-MEG003 sy-vline 
WA_RKU01JA_CS_STR-MEG004 sy-vline 
WA_RKU01JA_CS_STR-MEG005 sy-vline 
WA_RKU01JA_CS_STR-MEG006 sy-vline 
WA_RKU01JA_CS_STR-MEG007 sy-vline 
WA_RKU01JA_CS_STR-MEG008 sy-vline 
WA_RKU01JA_CS_STR-MEG009 sy-vline 
WA_RKU01JA_CS_STR-MEG010 sy-vline 
WA_RKU01JA_CS_STR-MEG011 sy-vline 
WA_RKU01JA_CS_STR-MEG012 sy-vline 
WA_RKU01JA_CS_STR-MEG013 sy-vline 
WA_RKU01JA_CS_STR-MEG014 sy-vline 
WA_RKU01JA_CS_STR-MEG015 sy-vline 
WA_RKU01JA_CS_STR-MEG016 sy-vline 
WA_RKU01JA_CS_STR-MEF001 sy-vline 
WA_RKU01JA_CS_STR-MEF002 sy-vline 
WA_RKU01JA_CS_STR-MEF003 sy-vline 
WA_RKU01JA_CS_STR-MEF004 sy-vline 
WA_RKU01JA_CS_STR-MEF005 sy-vline 
WA_RKU01JA_CS_STR-MEF006 sy-vline 
WA_RKU01JA_CS_STR-MEF007 sy-vline 
WA_RKU01JA_CS_STR-MEF008 sy-vline 
WA_RKU01JA_CS_STR-MEF009 sy-vline 
WA_RKU01JA_CS_STR-MEF010 sy-vline 
WA_RKU01JA_CS_STR-MEF011 sy-vline 
WA_RKU01JA_CS_STR-MEF012 sy-vline 
WA_RKU01JA_CS_STR-MEF013 sy-vline 
WA_RKU01JA_CS_STR-MEF014 sy-vline 
WA_RKU01JA_CS_STR-MEF015 sy-vline 
WA_RKU01JA_CS_STR-MEF016 sy-vline 
WA_RKU01JA_CS_STR-MBG001 sy-vline 
WA_RKU01JA_CS_STR-MBG002 sy-vline 
WA_RKU01JA_CS_STR-MBG003 sy-vline 
WA_RKU01JA_CS_STR-MBG004 sy-vline 
WA_RKU01JA_CS_STR-MBG005 sy-vline 
WA_RKU01JA_CS_STR-MBG006 sy-vline 
WA_RKU01JA_CS_STR-MBG007 sy-vline 
WA_RKU01JA_CS_STR-MBG008 sy-vline 
WA_RKU01JA_CS_STR-MBG009 sy-vline 
WA_RKU01JA_CS_STR-MBG010 sy-vline 
WA_RKU01JA_CS_STR-MBG011 sy-vline 
WA_RKU01JA_CS_STR-MBG012 sy-vline 
WA_RKU01JA_CS_STR-MBG013 sy-vline 
WA_RKU01JA_CS_STR-MBG014 sy-vline 
WA_RKU01JA_CS_STR-MBG015 sy-vline 
WA_RKU01JA_CS_STR-MBG016 sy-vline 
WA_RKU01JA_CS_STR-MBF001 sy-vline 
WA_RKU01JA_CS_STR-MBF002 sy-vline 
WA_RKU01JA_CS_STR-MBF003 sy-vline 
WA_RKU01JA_CS_STR-MBF004 sy-vline 
WA_RKU01JA_CS_STR-MBF005 sy-vline 
WA_RKU01JA_CS_STR-MBF006 sy-vline 
WA_RKU01JA_CS_STR-MBF007 sy-vline 
WA_RKU01JA_CS_STR-MBF008 sy-vline 
WA_RKU01JA_CS_STR-MBF009 sy-vline 
WA_RKU01JA_CS_STR-MBF010 sy-vline 
WA_RKU01JA_CS_STR-MBF011 sy-vline 
WA_RKU01JA_CS_STR-MBF012 sy-vline 
WA_RKU01JA_CS_STR-MBF013 sy-vline 
WA_RKU01JA_CS_STR-MBF014 sy-vline 
WA_RKU01JA_CS_STR-MBF015 sy-vline 
WA_RKU01JA_CS_STR-MBF016 sy-vline 
WA_RKU01JA_CS_STR-BEKNZ sy-vline 
WA_RKU01JA_CS_STR-TWAER sy-vline 
WA_RKU01JA_CS_STR-MEINH sy-vline 
WA_RKU01JA_CS_STR-MEINB sy-vline 
WA_RKU01JA_CS_STR-MGEFL sy-vline 
WA_RKU01JA_CS_STR-EIGEN sy-vline 
WA_RKU01JA_CS_STR-REFBZ sy-vline 
WA_RKU01JA_CS_STR-KALNR sy-vline 
WA_RKU01JA_CS_STR-TXFLG sy-vline 
WA_RKU01JA_CS_STR-OWAER sy-vline 
WA_RKU01JA_CS_STR-FCWKF sy-vline 
WA_RKU01JA_CS_STR-FCWKV sy-vline 
WA_RKU01JA_CS_STR-FCWKG sy-vline 
WA_RKU01JA_CS_STR-FCMEF sy-vline 
WA_RKU01JA_CS_STR-FCMEV sy-vline 
WA_RKU01JA_CS_STR-FCMEG sy-vline 
WA_RKU01JA_CS_STR-PRZNR sy-vline 
WA_RKU01JA_CS_STR-P_PRZNR sy-vline 
WA_RKU01JA_CS_STR-P1_PRZNR sy-vline 
WA_RKU01JA_CS_STR-UP_PRZNR sy-vline 
WA_RKU01JA_CS_STR-RESRC sy-vline 
WA_RKU01JA_CS_STR-NPLNR sy-vline 
WA_RKU01JA_CS_STR-VORNR sy-vline 
WA_RKU01JA_CS_STR-KSTRG sy-vline 
WA_RKU01JA_CS_STR-R_INDEX sy-vline 
WA_RKU01JA_CS_STR-FCWOG sy-vline 
WA_RKU01JA_CS_STR-FCWOF sy-vline 
WA_RKU01JA_CS_STR-FCWOV sy-vline 
WA_RKU01JA_CS_STR-FCWTG sy-vline 
WA_RKU01JA_CS_STR-FCWTF sy-vline 
WA_RKU01JA_CS_STR-FCWTV sy-vline 
WA_RKU01JA_CS_STR-PAROB_PS sy-vline 
WA_RKU01JA_CS_STR-USPOB_PS sy-vline 
WA_RKU01JA_CS_STR-BUKRS_RE sy-vline 
WA_RKU01JA_CS_STR-RECNNR sy-vline 
WA_RKU01JA_CS_STR-SGENR sy-vline 
WA_RKU01JA_CS_STR-SGRNR sy-vline 
WA_RKU01JA_CS_STR-SMENR sy-vline 
WA_RKU01JA_CS_STR-SMIVE sy-vline 
WA_RKU01JA_CS_STR-SVWNR sy-vline 
WA_RKU01JA_CS_STR-SWENR sy-vline 
WA_RKU01JA_CS_STR-SNKSL sy-vline 
WA_RKU01JA_CS_STR-SEMPSL sy-vline 
WA_RKU01JA_CS_STR-DABRBZ sy-vline 
WA_RKU01JA_CS_STR-ROW_ID sy-vline 
WA_RKU01JA_CS_STR-FKBER sy-vline 
WA_RKU01JA_CS_STR-PFKBER sy-vline 
WA_RKU01JA_CS_STR-GEBER sy-vline 
WA_RKU01JA_CS_STR-PGEBER sy-vline 
WA_RKU01JA_CS_STR-GRANT_NBR sy-vline 
WA_RKU01JA_CS_STR-PGRANT_NBR sy-vline 
WA_RKU01JA_CS_STR-BUDGET_PD sy-vline 
WA_RKU01JA_CS_STR-PBUDGET_PD sy-vline 
WA_RKU01JA_CS_STR-STFLG sy-vline      INTO ld_text SEPARATED BY SPACE.

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