ABAP Select data from SAP table RFITEMGL_NO_ITEM 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 RFITEMGL_NO_ITEM 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 RFITEMGL_NO_ITEM. 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 RFITEMGL_NO_ITEM 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_RFITEMGL_NO_ITEM TYPE STANDARD TABLE OF RFITEMGL_NO_ITEM,
      WA_RFITEMGL_NO_ITEM TYPE RFITEMGL_NO_ITEM,
      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: <RFITEMGL_NO_ITEM> TYPE RFITEMGL_NO_ITEM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RFITEMGL_NO_ITEM
*  INTO TABLE @DATA(IT_RFITEMGL_NO_ITEM2).
*--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_RFITEMGL_NO_ITEM INDEX 1 INTO DATA(WA_RFITEMGL_NO_ITEM2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<RFITEMGL_NO_ITEM>-MANDT = 1.
<RFITEMGL_NO_ITEM>-BUKRS = 1.
<RFITEMGL_NO_ITEM>-KONTO = 1.
<RFITEMGL_NO_ITEM>-GJAHR = 1.
<RFITEMGL_NO_ITEM>-SEQNO = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RFITEMGL_NO_ITEM-UNAME, sy-vline,
  WA_RFITEMGL_NO_ITEM-ACTIV, sy-vline,
  WA_RFITEMGL_NO_ITEM-ANLN1, sy-vline,
  WA_RFITEMGL_NO_ITEM-ANLN2, sy-vline,
  WA_RFITEMGL_NO_ITEM-AUFNR, sy-vline,
  WA_RFITEMGL_NO_ITEM-AUGBL, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_RFITEMGL_NO_ITEM 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_RFITEMGL_NO_ITEM 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_RFITEMGL_NO_ITEM INTO WA_RFITEMGL_NO_ITEM.


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit EXCRT, internal->external for field KURSE
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_RFITEMGL_NO_ITEM-KURSE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFITEMGL_NO_ITEM-KURSE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU152, internal->external for field PSWBT
CALL FUNCTION 'CONVERSION_EXIT_AU152_OUTPUT'
  EXPORTING
    input =                      WA_RFITEMGL_NO_ITEM-PSWBT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFITEMGL_NO_ITEM-PSWBT.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit AU152, internal->external for field ABSBT
CALL FUNCTION 'CONVERSION_EXIT_AU152_OUTPUT'
  EXPORTING
    input =                      WA_RFITEMGL_NO_ITEM-ABSBT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFITEMGL_NO_ITEM-ABSBT.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AU152, internal->external for field PYAMT
CALL FUNCTION 'CONVERSION_EXIT_AU152_OUTPUT'
  EXPORTING
    input =                      WA_RFITEMGL_NO_ITEM-PYAMT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFITEMGL_NO_ITEM-PYAMT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit AU132, internal->external for field U_FWBAS
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_RFITEMGL_NO_ITEM-U_FWBAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFITEMGL_NO_ITEM-U_FWBAS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field U_REBZG
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_RFITEMGL_NO_ITEM-U_REBZG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_RFITEMGL_NO_ITEM-U_REBZG.
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_RFITEMGL_NO_ITEM_STR, 
MANDT TYPE STRING,
BUKRS TYPE STRING,
KONTO TYPE STRING,
GJAHR TYPE STRING,
SEQNO TYPE STRING,
UNAME TYPE STRING,
ACTIV TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
AUFNR TYPE STRING,
AUGBL TYPE STRING,
AUGDT TYPE STRING,
BELNR TYPE STRING,
BLART TYPE STRING,
BLDAT TYPE STRING,
BSCHL TYPE STRING,
BSTAT TYPE STRING,
BUDAT TYPE STRING,
BUZEI TYPE STRING,
BWWRT TYPE STRING,
BWWRC TYPE STRING,
BWWR2 TYPE STRING,
BWWR3 TYPE STRING,
DMSHB TYPE STRING,
HWAER TYPE STRING,
DMBE2 TYPE STRING,
HWAE2 TYPE STRING,
DMBE3 TYPE STRING,
HWAE3 TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
ETEN2 TYPE STRING,
FAEDT TYPE STRING,
FILKD TYPE STRING,
GSBER TYPE STRING,
JAMON TYPE STRING,
KOART TYPE STRING,
KOSTL TYPE STRING,
MABER TYPE STRING,
MADAT TYPE STRING,
MANSP TYPE STRING,
MANST TYPE STRING,
MONAT TYPE STRING,
MSCHL TYPE STRING,
MWSKZ TYPE STRING,
POSN2 TYPE STRING,
PRCTR TYPE STRING,
QBSHB TYPE STRING,
QSFBT TYPE STRING,
QSSHB TYPE STRING,
REBZG TYPE STRING,
SAMNR TYPE STRING,
SGTXT TYPE STRING,
SHKZG TYPE STRING,
SKFBT TYPE STRING,
WSKTO TYPE STRING,
SKNTO TYPE STRING,
STAKZ TYPE STRING,
UMSKS TYPE STRING,
UMSKZ TYPE STRING,
UZAWE TYPE STRING,
VALUT TYPE STRING,
VBEL2 TYPE STRING,
VBELN TYPE STRING,
VBEWA TYPE STRING,
VBUND TYPE STRING,
VERTN TYPE STRING,
VERTT TYPE STRING,
VERZ1 TYPE STRING,
VERZN TYPE STRING,
WERKS TYPE STRING,
WRSHB TYPE STRING,
WRSHC TYPE STRING,
WAERS TYPE STRING,
WVERW TYPE STRING,
XBLNR TYPE STRING,
XSTRP TYPE STRING,
XZAHL TYPE STRING,
ZALDT TYPE STRING,
ZBD1P TYPE STRING,
ZBD1T TYPE STRING,
ZBD2P TYPE STRING,
ZBD2T TYPE STRING,
ZBD3T TYPE STRING,
ZFBDT TYPE STRING,
ZINSZ TYPE STRING,
ZLSCH TYPE STRING,
ZLSPR TYPE STRING,
ZTERM TYPE STRING,
ZUONR TYPE STRING,
XREF1 TYPE STRING,
XREF2 TYPE STRING,
XARCH TYPE STRING,
RSTGR TYPE STRING,
ASKTO TYPE STRING,
KURSE TYPE STRING,
REBZT TYPE STRING,
PSWSL TYPE STRING,
PSWBT TYPE STRING,
HKONT TYPE STRING,
XNEGP TYPE STRING,
ZBFIX TYPE STRING,
RFZEI TYPE STRING,
CCBTC TYPE STRING,
KKBER TYPE STRING,
XREF3 TYPE STRING,
DTWS1 TYPE STRING,
DTWS2 TYPE STRING,
DTWS3 TYPE STRING,
DTWS4 TYPE STRING,
ABSBT TYPE STRING,
KKBWR TYPE STRING,
PROJK TYPE STRING,
XPYPR TYPE STRING,
KIDNO TYPE STRING,
XAUGP TYPE STRING,
BUPLA TYPE STRING,
SECCO TYPE STRING,
GKART TYPE STRING,
GKONT TYPE STRING,
PYCUR TYPE STRING,
PYAMT TYPE STRING,
PYORD TYPE STRING,
XTEXT TYPE STRING,
TDID TYPE STRING,
XDUEN TYPE STRING,
XDUE1 TYPE STRING,
XRAGL TYPE STRING,
XSELP TYPE STRING,
COLOR TYPE STRING,
CESSION_KZ TYPE STRING,
BUZID TYPE STRING,
AUGGJ TYPE STRING,
AGZEI TYPE STRING,
SYM_AUGP TYPE STRING,
ICO_AUGP TYPE STRING,
ICO_DUE TYPE STRING,
ICO_DUE1 TYPE STRING,
SORT TYPE STRING,
U_STBLG TYPE STRING,
U_BWSHB1 TYPE STRING,
U_PSTLZ TYPE STRING,
U_FWBAS TYPE STRING,
U_REBZG TYPE STRING,
U_CHECF TYPE STRING,
STCEG TYPE STRING,
ACNAM TYPE STRING,END OF T_EKKO_STR.
DATA: WA_RFITEMGL_NO_ITEM_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_RFITEMGL_NO_ITEM_STR-MANDT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BUKRS sy-vline 
WA_RFITEMGL_NO_ITEM_STR-KONTO sy-vline 
WA_RFITEMGL_NO_ITEM_STR-GJAHR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SEQNO sy-vline 
WA_RFITEMGL_NO_ITEM_STR-UNAME sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ACTIV sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ANLN1 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ANLN2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-AUFNR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-AUGBL sy-vline 
WA_RFITEMGL_NO_ITEM_STR-AUGDT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BELNR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BLART sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BLDAT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BSCHL sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BSTAT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BUDAT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BUZEI sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BWWRT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BWWRC sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BWWR2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BWWR3 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-DMSHB sy-vline 
WA_RFITEMGL_NO_ITEM_STR-HWAER sy-vline 
WA_RFITEMGL_NO_ITEM_STR-DMBE2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-HWAE2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-DMBE3 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-HWAE3 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-EBELN sy-vline 
WA_RFITEMGL_NO_ITEM_STR-EBELP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ETEN2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-FAEDT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-FILKD sy-vline 
WA_RFITEMGL_NO_ITEM_STR-GSBER sy-vline 
WA_RFITEMGL_NO_ITEM_STR-JAMON sy-vline 
WA_RFITEMGL_NO_ITEM_STR-KOART sy-vline 
WA_RFITEMGL_NO_ITEM_STR-KOSTL sy-vline 
WA_RFITEMGL_NO_ITEM_STR-MABER sy-vline 
WA_RFITEMGL_NO_ITEM_STR-MADAT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-MANSP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-MANST sy-vline 
WA_RFITEMGL_NO_ITEM_STR-MONAT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-MSCHL sy-vline 
WA_RFITEMGL_NO_ITEM_STR-MWSKZ sy-vline 
WA_RFITEMGL_NO_ITEM_STR-POSN2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-PRCTR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-QBSHB sy-vline 
WA_RFITEMGL_NO_ITEM_STR-QSFBT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-QSSHB sy-vline 
WA_RFITEMGL_NO_ITEM_STR-REBZG sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SAMNR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SGTXT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SHKZG sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SKFBT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-WSKTO sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SKNTO sy-vline 
WA_RFITEMGL_NO_ITEM_STR-STAKZ sy-vline 
WA_RFITEMGL_NO_ITEM_STR-UMSKS sy-vline 
WA_RFITEMGL_NO_ITEM_STR-UMSKZ sy-vline 
WA_RFITEMGL_NO_ITEM_STR-UZAWE sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VALUT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VBEL2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VBELN sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VBEWA sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VBUND sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VERTN sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VERTT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VERZ1 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-VERZN sy-vline 
WA_RFITEMGL_NO_ITEM_STR-WERKS sy-vline 
WA_RFITEMGL_NO_ITEM_STR-WRSHB sy-vline 
WA_RFITEMGL_NO_ITEM_STR-WRSHC sy-vline 
WA_RFITEMGL_NO_ITEM_STR-WAERS sy-vline 
WA_RFITEMGL_NO_ITEM_STR-WVERW sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XBLNR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XSTRP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XZAHL sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZALDT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZBD1P sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZBD1T sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZBD2P sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZBD2T sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZBD3T sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZFBDT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZINSZ sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZLSCH sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZLSPR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZTERM sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZUONR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XREF1 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XREF2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XARCH sy-vline 
WA_RFITEMGL_NO_ITEM_STR-RSTGR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ASKTO sy-vline 
WA_RFITEMGL_NO_ITEM_STR-KURSE sy-vline 
WA_RFITEMGL_NO_ITEM_STR-REBZT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-PSWSL sy-vline 
WA_RFITEMGL_NO_ITEM_STR-PSWBT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-HKONT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XNEGP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ZBFIX sy-vline 
WA_RFITEMGL_NO_ITEM_STR-RFZEI sy-vline 
WA_RFITEMGL_NO_ITEM_STR-CCBTC sy-vline 
WA_RFITEMGL_NO_ITEM_STR-KKBER sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XREF3 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-DTWS1 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-DTWS2 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-DTWS3 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-DTWS4 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ABSBT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-KKBWR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-PROJK sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XPYPR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-KIDNO sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XAUGP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BUPLA sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SECCO sy-vline 
WA_RFITEMGL_NO_ITEM_STR-GKART sy-vline 
WA_RFITEMGL_NO_ITEM_STR-GKONT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-PYCUR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-PYAMT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-PYORD sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XTEXT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-TDID sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XDUEN sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XDUE1 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XRAGL sy-vline 
WA_RFITEMGL_NO_ITEM_STR-XSELP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-COLOR sy-vline 
WA_RFITEMGL_NO_ITEM_STR-CESSION_KZ sy-vline 
WA_RFITEMGL_NO_ITEM_STR-BUZID sy-vline 
WA_RFITEMGL_NO_ITEM_STR-AUGGJ sy-vline 
WA_RFITEMGL_NO_ITEM_STR-AGZEI sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SYM_AUGP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ICO_AUGP sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ICO_DUE sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ICO_DUE1 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-SORT sy-vline 
WA_RFITEMGL_NO_ITEM_STR-U_STBLG sy-vline 
WA_RFITEMGL_NO_ITEM_STR-U_BWSHB1 sy-vline 
WA_RFITEMGL_NO_ITEM_STR-U_PSTLZ sy-vline 
WA_RFITEMGL_NO_ITEM_STR-U_FWBAS sy-vline 
WA_RFITEMGL_NO_ITEM_STR-U_REBZG sy-vline 
WA_RFITEMGL_NO_ITEM_STR-U_CHECF sy-vline 
WA_RFITEMGL_NO_ITEM_STR-STCEG sy-vline 
WA_RFITEMGL_NO_ITEM_STR-ACNAM sy-vline      INTO ld_text SEPARATED BY SPACE.

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