ABAP Select data from SAP table DB2_VIEW_IFI225 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 DB2_VIEW_IFI225 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 DB2_VIEW_IFI225. 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 DB2_VIEW_IFI225 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_DB2_VIEW_IFI225 TYPE STANDARD TABLE OF DB2_VIEW_IFI225,
      WA_DB2_VIEW_IFI225 TYPE DB2_VIEW_IFI225,
      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: <DB2_VIEW_IFI225> TYPE DB2_VIEW_IFI225.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM DB2_VIEW_IFI225
*  INTO TABLE @DATA(IT_DB2_VIEW_IFI2252).
*--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_DB2_VIEW_IFI225 INDEX 1 INTO DATA(WA_DB2_VIEW_IFI2252).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_DB2_VIEW_IFI225 ASSIGNING <DB2_VIEW_IFI225>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<DB2_VIEW_IFI225>-DS_DATA = 1.
<DB2_VIEW_IFI225>-MEMBER = 1.
<DB2_VIEW_IFI225>-MEMBER_LIST = 1.
<DB2_VIEW_IFI225>-SNAPTIMESTAMP = 1.
<DB2_VIEW_IFI225>-SNAP_LIST = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_DB2_VIEW_IFI225-IFI225, sy-vline,
WA_DB2_VIEW_IFI225-STRGSSID, sy-vline,
WA_DB2_VIEW_IFI225-STRGMEMB, sy-vline,
WA_DB2_VIEW_IFI225-STRGDATE, sy-vline,
WA_DB2_VIEW_IFI225-STRGTIME, sy-vline,
WA_DB2_VIEW_IFI225-STGRMSEC, sy-vline.
ENDLOOP. *Add any further fields from structure WA_DB2_VIEW_IFI225 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_DB2_VIEW_IFI225 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_DB2_VIEW_IFI225 INTO WA_DB2_VIEW_IFI225. *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.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_DB2_VIEW_IFI225_STR,
DS_DATA TYPE STRING,
MEMBER TYPE STRING,
MEMBER_LIST TYPE STRING,
SNAPTIMESTAMP TYPE STRING,
SNAP_LIST TYPE STRING,
IFI225 TYPE STRING,
STRGSSID TYPE STRING,
STRGMEMB TYPE STRING,
STRGDATE TYPE STRING,
STRGTIME TYPE STRING,
STGRMSEC TYPE STRING,
STRGDSGN TYPE STRING,
DIST_QW0225RG TYPE STRING,
DIST_QW0225LO TYPE STRING,
DIST_QW0225HI TYPE STRING,
DIST_QW0225EL TYPE STRING,
DIST_QW0225EH TYPE STRING,
DIST_QW0225TP TYPE STRING,
DIST_QW0225EP TYPE STRING,
DIST_QW0225CR TYPE STRING,
DIST_QW0225MV TYPE STRING,
DIST_QW0225SO TYPE STRING,
DIST_QW0225GS TYPE STRING,
DIST_QW0225SU TYPE STRING,
DIST_QW0225VR TYPE STRING,
DIST_QW0225FX TYPE STRING,
DIST_QW0225GM TYPE STRING,
DIST_QW0225AV TYPE STRING,
DIST_QW0225VA TYPE STRING,
DIST_QW0225FA TYPE STRING,
DIST_QW0225GA TYPE STRING,
DIST_QW0225SM TYPE STRING,
DIST_QW0225RL TYPE STRING,
DIST_QW0225AX TYPE STRING,
DIST_QW0225HV_PAGES_IN_REAL TYPE STRING,
DIST_QW0225HV_PAGES_IN_REAL_2G TYPE STRING,
DIST_QW0225HV_AUX_SLOTS TYPE STRING,
DIST_QW0225HVG_PAGES_IN_REAL TYPE STRING,
DIST_QW0225HVG_AUX_SLOTS TYPE STRING,
DBM1_QW0225RG TYPE STRING,
DBM1_QW0225LO TYPE STRING,
DBM1_QW0225HI TYPE STRING,
DBM1_QW0225EL TYPE STRING,
DBM1_QW0225EH TYPE STRING,
DBM1_QW0225TP TYPE STRING,
DBM1_QW0225EP TYPE STRING,
DBM1_QW0225CR TYPE STRING,
DBM1_QW0225MV TYPE STRING,
DBM1_QW0225SO TYPE STRING,
DBM1_QW0225GS TYPE STRING,
DBM1_QW0225SU TYPE STRING,
DBM1_QW0225VR TYPE STRING,
DBM1_QW0225FX TYPE STRING,
DBM1_QW0225GM TYPE STRING,
DBM1_QW0225AV TYPE STRING,
DBM1_QW0225VA TYPE STRING,
DBM1_QW0225FA TYPE STRING,
DBM1_QW0225GA TYPE STRING,
DBM1_QW0225SM TYPE STRING,
DBM1_QW0225RL TYPE STRING,
DBM1_QW0225AX TYPE STRING,
DBM1_QW0225HV_PAGES_IN_REAL TYPE STRING,
DBM1_QW0225HV_PAGES_IN_REAL_2G TYPE STRING,
DBM1_QW0225HV_AUX_SLOTS TYPE STRING,
DBM1_QW0225HVG_PAGES_IN_REAL TYPE STRING,
DBM1_QW0225HVG_AUX_SLOTS TYPE STRING,
QW0225AT TYPE STRING,
QW0225DB TYPE STRING,
QW0225CE TYPE STRING,
QW0225DW TYPE STRING,
QW0225GW TYPE STRING,
QW0225PF TYPE STRING,
QW0225PL TYPE STRING,
QW0225EC TYPE STRING,
QW0225FC TYPE STRING,
QW0225VC TYPE STRING,
QW0225GC TYPE STRING,
QW0225FCG TYPE STRING,
QW0225VCG TYPE STRING,
QW0225GCG TYPE STRING,
QW0225SMC TYPE STRING,
QW0225SF TYPE STRING,
QW0225SG TYPE STRING,
QW0225SV TYPE STRING,
QW0225SMS TYPE STRING,
QW0225GSG_SYS TYPE STRING,
QW0225SUG_SYS TYPE STRING,
QW0225GSG TYPE STRING,
QW0225SUG TYPE STRING,
QW0225SHRNMOMB TYPE STRING,
QW0225SHRPAGES TYPE STRING,
QW0225SHRGBYTES TYPE STRING,
QW0225SHRINREAL TYPE STRING,
QW0225SHRAUXSLOTS TYPE STRING,
QW0225SHRPAGEINS TYPE STRING,
QW0225SHRPAGEOUTS TYPE STRING,
QW0225SC TYPE STRING,
QW0225LC TYPE STRING,
QW0225LS TYPE STRING,
QW0225SX TYPE STRING,
QW0225HS TYPE STRING,
QW0225HC TYPE STRING,
QW0225L2 TYPE STRING,
QW0225H2 TYPE STRING,
QW0225S2 TYPE STRING,
QW0225AL TYPE STRING,
QW0225AS TYPE STRING,
QW0225CD TYPE STRING,
QW0225ALG TYPE STRING,
QW0225ASG TYPE STRING,
QW0225BB TYPE STRING,
QW0225RP TYPE STRING,
DIST_QW0225SS TYPE STRING,
DBM1_QW0225SS TYPE STRING,
DBM1_QW0225PRI_STG_REAL TYPE STRING,
DBM1_QW0225PRI_STG_AUX TYPE STRING,
DIST_QW0225PRI_STG_REAL TYPE STRING,
DIST_QW0225PRI_STG_AUX TYPE STRING,
QW0225PT TYPE STRING,
QW0225SHR_STG_REAL TYPE STRING,
QW0225SHR_STG_AUX TYPE STRING,
QW0225SHR_STK_STG_REAL TYPE STRING,
QW0225SHR_STK_STG_AUX TYPE STRING,
QW0225COM_STG_REAL TYPE STRING,
QW0225COM_STG_AUX TYPE STRING,
REALSTORBP TYPE STRING,
AUXSTORBP TYPE STRING,
QW0225SC8 TYPE STRING,
QW0225LS8 TYPE STRING,
QW0225SX8 TYPE STRING,
QW0225HS8 TYPE STRING,
QW0225_LMWRITE_REAL TYPE STRING,
QW0225_LMCTRL_REAL TYPE STRING,
QW0225_LMCTRL_AUX TYPE STRING,
QW0225I_ABCSA TYPE STRING,
QW0225I_ABCSH TYPE STRING,
QW0225I_BBPVT TYPE STRING,
QW0225I_BBPVH TYPE STRING,
QW0225I_ABPVT TYPE STRING,
QW0225I_ABPVH TYPE STRING,
QW0225I_BBECSA TYPE STRING,
QW0225I_BBECSAH TYPE STRING,
QW0225I_BPMAX TYPE STRING,
QW0225I_APMAX TYPE STRING,END OF T_EKKO_STR. DATA: WA_DB2_VIEW_IFI225_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_DB2_VIEW_IFI225_STR-DS_DATA sy-vline
WA_DB2_VIEW_IFI225_STR-MEMBER sy-vline
WA_DB2_VIEW_IFI225_STR-MEMBER_LIST sy-vline
WA_DB2_VIEW_IFI225_STR-SNAPTIMESTAMP sy-vline
WA_DB2_VIEW_IFI225_STR-SNAP_LIST sy-vline
WA_DB2_VIEW_IFI225_STR-IFI225 sy-vline
WA_DB2_VIEW_IFI225_STR-STRGSSID sy-vline
WA_DB2_VIEW_IFI225_STR-STRGMEMB sy-vline
WA_DB2_VIEW_IFI225_STR-STRGDATE sy-vline
WA_DB2_VIEW_IFI225_STR-STRGTIME sy-vline
WA_DB2_VIEW_IFI225_STR-STGRMSEC sy-vline
WA_DB2_VIEW_IFI225_STR-STRGDSGN sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225RG sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225LO sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225HI sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225EL sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225EH sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225TP sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225EP sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225CR sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225MV sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225SO sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225GS sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225SU sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225VR sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225FX sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225GM sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225AV sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225VA sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225FA sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225GA sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225SM sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225RL sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225AX sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225HV_PAGES_IN_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225HV_PAGES_IN_REAL_2G sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225HV_AUX_SLOTS sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225HVG_PAGES_IN_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225HVG_AUX_SLOTS sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225RG sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225LO sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225HI sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225EL sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225EH sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225TP sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225EP sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225CR sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225MV sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225SO sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225GS sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225SU sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225VR sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225FX sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225GM sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225AV sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225VA sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225FA sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225GA sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225SM sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225RL sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225AX sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225HV_PAGES_IN_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225HV_PAGES_IN_REAL_2G sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225HV_AUX_SLOTS sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225HVG_PAGES_IN_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225HVG_AUX_SLOTS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225AT sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225DB sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225CE sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225DW sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225GW sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225PF sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225PL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225EC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225FC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225VC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225GC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225FCG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225VCG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225GCG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SMC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SF sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SV sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SMS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225GSG_SYS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SUG_SYS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225GSG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SUG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHRNMOMB sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHRPAGES sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHRGBYTES sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHRINREAL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHRAUXSLOTS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHRPAGEINS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHRPAGEOUTS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225LC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225LS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SX sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225HS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225HC sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225L2 sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225H2 sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225S2 sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225AL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225AS sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225CD sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225ALG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225ASG sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225BB sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225RP sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225SS sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225SS sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225PRI_STG_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-DBM1_QW0225PRI_STG_AUX sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225PRI_STG_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-DIST_QW0225PRI_STG_AUX sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225PT sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHR_STG_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHR_STG_AUX sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHR_STK_STG_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SHR_STK_STG_AUX sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225COM_STG_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225COM_STG_AUX sy-vline
WA_DB2_VIEW_IFI225_STR-REALSTORBP sy-vline
WA_DB2_VIEW_IFI225_STR-AUXSTORBP sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SC8 sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225LS8 sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225SX8 sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225HS8 sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225_LMWRITE_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225_LMCTRL_REAL sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225_LMCTRL_AUX sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_ABCSA sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_ABCSH sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_BBPVT sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_BBPVH sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_ABPVT sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_ABPVH sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_BBECSA sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_BBECSAH sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_BPMAX sy-vline
WA_DB2_VIEW_IFI225_STR-QW0225I_APMAX sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.