ABAP Select data from SAP table UABW_S_EXCALC_FLAT_1PDCE 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 UABW_S_EXCALC_FLAT_1PDCE 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 UABW_S_EXCALC_FLAT_1PDCE. 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 UABW_S_EXCALC_FLAT_1PDCE 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_UABW_S_EXCALC_FLAT_1PDCE TYPE STANDARD TABLE OF UABW_S_EXCALC_FLAT_1PDCE,
WA_UABW_S_EXCALC_FLAT_1PDCE TYPE UABW_S_EXCALC_FLAT_1PDCE,
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: <UABW_S_EXCALC_FLAT_1PDCE> TYPE UABW_S_EXCALC_FLAT_1PDCE.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_UABW_S_EXCALC_FLAT_1PDCE.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM UABW_S_EXCALC_FLAT_1PDCE
INTO TABLE IT_UABW_S_EXCALC_FLAT_1PDCE.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM UABW_S_EXCALC_FLAT_1PDCE
* INTO TABLE @DATA(IT_UABW_S_EXCALC_FLAT_1PDCE2).
*--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_UABW_S_EXCALC_FLAT_1PDCE INDEX 1 INTO DATA(WA_UABW_S_EXCALC_FLAT_1PDCE2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_UABW_S_EXCALC_FLAT_1PDCE ASSIGNING <UABW_S_EXCALC_FLAT_1PDCE>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<UABW_S_EXCALC_FLAT_1PDCE>-ACC_RECORDMODE = 1.
<UABW_S_EXCALC_FLAT_1PDCE>-FINB_CHNG_TSTAMP = 1.
<UABW_S_EXCALC_FLAT_1PDCE>-FOBJ_OBJECT_ID = 1.
<UABW_S_EXCALC_FLAT_1PDCE>-ACC_POBJ_ID = 1.
<UABW_S_EXCALC_FLAT_1PDCE>-ACC_FLOW_IND = 1.
ENDLOOP. LOOP AT IT_UABW_S_EXCALC_FLAT_1PDCE INTO WA_UABW_S_EXCALC_FLAT_1PDCE. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_UABW_S_EXCALC_FLAT_1PDCE-/1FB/CO_AREA, sy-vline,
WA_UABW_S_EXCALC_FLAT_1PDCE-/1FB/COSTCENTER, sy-vline,
WA_UABW_S_EXCALC_FLAT_1PDCE-/1FB/ACTTYPE, sy-vline,
WA_UABW_S_EXCALC_FLAT_1PDCE-FINB_ORIGIN, sy-vline,
WA_UABW_S_EXCALC_FLAT_1PDCE-ACC_OBJ_STATUS, sy-vline,
WA_UABW_S_EXCALC_FLAT_1PDCE-FINB_CREATED_BY, sy-vline.
ENDLOOP. *Add any further fields from structure WA_UABW_S_EXCALC_FLAT_1PDCE 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_UABW_S_EXCALC_FLAT_1PDCE 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_UABW_S_EXCALC_FLAT_1PDCE INTO WA_UABW_S_EXCALC_FLAT_1PDCE. *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 GJAHR, internal->external for field FISCYEAR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_UABW_S_EXCALC_FLAT_1PDCE-FISCYEAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_UABW_S_EXCALC_FLAT_1PDCE-FISCYEAR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_UABW_S_EXCALC_FLAT_1PDCE-UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_UABW_S_EXCALC_FLAT_1PDCE-UNIT.
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_UABW_S_EXCALC_FLAT_1PDCE_STR,
ACC_RECORDMODE TYPE STRING,
FINB_CHNG_TSTAMP TYPE STRING,
FOBJ_OBJECT_ID TYPE STRING,
ACC_POBJ_ID TYPE STRING,
ACC_FLOW_IND TYPE STRING,
/1FB/CO_AREA TYPE STRING,
/1FB/COSTCENTER TYPE STRING,
/1FB/ACTTYPE TYPE STRING,
FINB_ORIGIN TYPE STRING,
ACC_OBJ_STATUS TYPE STRING,
FINB_CREATED_BY TYPE STRING,
FINB_CREA_DATE TYPE STRING,
FINB_CREA_TIME TYPE STRING,
FINB_CHANGED_BY TYPE STRING,
FINB_CHNG_DATE TYPE STRING,
FINB_CHNG_TIME TYPE STRING,
/1FB/PROFIT_CTR TYPE STRING,
/1FB/COMP_CODE TYPE STRING,
/1FB/BUS_AREA TYPE STRING,
/1FB/COSTELMNT TYPE STRING,
/1FB/ABCPROCESS TYPE STRING,
/1FB/PCPITEMCAT TYPE STRING,
/1FB/CPR_EXT_ID TYPE STRING,
/1FB/CPR_VRSN TYPE STRING,
/1FB/COSTVAR TYPE STRING,
/1FB/CEVERS TYPE STRING,
/1FB/PLANT TYPE STRING,
/1FB/MATERIAL TYPE STRING,
/1FB/PRICE_TYPE TYPE STRING,
/1FB/COS_DATVAL TYPE STRING,
/1FB/ORIGINGRP TYPE STRING,
/1FB/VAL_CLASS TYPE STRING,
/1FB/PURCH_ORG TYPE STRING,
/1FB/INFO_REC TYPE STRING,
/1FB/MATL_GROUP TYPE STRING,
/1FB/VENDOR TYPE STRING,
/1FB/CEPCCENT TYPE STRING,
/1FB/CEPACTT TYPE STRING,
/1FB/CEPMAT TYPE STRING,
/1FB/SERVICE TYPE STRING,
/1FB/CESNUM TYPE STRING,
FISCYEAR TYPE STRING,
FISCVARNT TYPE STRING,
/1FB/CECSCLVA TYPE STRING,
/1FB/CECSCLFX TYPE STRING,
/1FB/CEETTC TYPE STRING,
/1FB/CEETTCM TYPE STRING,
/1FB/CECSCL TYPE STRING,
/1FB/CEBQRQF TYPE STRING,
/1FB/CELSIZEM TYPE STRING,
/1FB/LOTSIZE TYPE STRING,
/1FB/CECLS TYPE STRING,
/1FB/CECSTARA TYPE STRING,
/1FB/CERQBQF TYPE STRING,
/1FB/CEPRCS4 TYPE STRING,
/1FB/CERVPERC TYPE STRING,
/1FB/CERVPMRG TYPE STRING,
/1FB/CEPRCS5 TYPE STRING,
/1FB/CEBQRQM TYPE STRING,
/1FB/CERVSVOL TYPE STRING,
/1FB/CECLSM TYPE STRING,
UAB_CCS_OVERHEAD TYPE STRING,
UAB_CCS_3RDPARTY TYPE STRING,
UAB_CCS_MANUFACT TYPE STRING,
UAB_CCS_MATERIAL TYPE STRING,
UAB_CCS_MISCELL TYPE STRING,
/1FB/CECSTQ TYPE STRING,
/1FB/CECSTQVR TYPE STRING,
/1FB/CECSTQFX TYPE STRING,
/1FB/CETOTQTY TYPE STRING,
/1FB/CEBQRQ TYPE STRING,
/1FB/CERQUNT TYPE STRING,
/1FB/CERQCLSM TYPE STRING,
/1FB/CERQBQ TYPE STRING,
/1FB/CERQSL TYPE STRING,
/1FB/CERQML TYPE STRING,
/1FB/CERQSLNS TYPE STRING,
/1FB/CERQFACT TYPE STRING,
/1FB/CERQLIM TYPE STRING,
/1FB/CERQLISL TYPE STRING,
/1FB/CERQLIML TYPE STRING,
/1FB/CERQLISN TYPE STRING,
/1FB/CERQLI TYPE STRING,
/1FB/CERQ TYPE STRING,
/1FB/CERQCLS TYPE STRING,
/1FB/PRICE_BASE TYPE STRING,
/1FB/CEPRCCFX TYPE STRING,
/1FB/CEPRCCVA TYPE STRING,
/1FB/CEPRCVFX TYPE STRING,
/1FB/CEPRCVVA TYPE STRING,
/1FB/CEPRCV TYPE STRING,
/1FB/CEPRCEFX TYPE STRING,
/1FB/CEPRCEVA TYPE STRING,
/1FB/CEPRCFX TYPE STRING,
/1FB/CEPRCVA TYPE STRING,
/1FB/CEPRC TYPE STRING,
/1FB/CEPRCUFX TYPE STRING,
/1FB/CEPRCUVA TYPE STRING,
/1FB/CEPRCU TYPE STRING,
/1FB/CECSBQFX TYPE STRING,
/1FB/CECSBQVA TYPE STRING,
/1FB/CECSBQ TYPE STRING,
/1FB/CEPRCS1 TYPE STRING,
/1FB/CEPRCS2 TYPE STRING,
/1FB/CECSTARV TYPE STRING,
/1FB/CEPRCS3 TYPE STRING,
/1FB/CECSTAR TYPE STRING,
CURRENCY TYPE STRING,
UNIT TYPE STRING,END OF T_EKKO_STR. DATA: WA_UABW_S_EXCALC_FLAT_1PDCE_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_UABW_S_EXCALC_FLAT_1PDCE_STR-ACC_RECORDMODE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_CHNG_TSTAMP sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FOBJ_OBJECT_ID sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-ACC_POBJ_ID sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-ACC_FLOW_IND sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CO_AREA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/COSTCENTER sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/ACTTYPE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_ORIGIN sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-ACC_OBJ_STATUS sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_CREATED_BY sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_CREA_DATE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_CREA_TIME sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_CHANGED_BY sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_CHNG_DATE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FINB_CHNG_TIME sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/PROFIT_CTR sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/COMP_CODE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/BUS_AREA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/COSTELMNT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/ABCPROCESS sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/PCPITEMCAT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CPR_EXT_ID sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CPR_VRSN sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/COSTVAR sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEVERS sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/PLANT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/MATERIAL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/PRICE_TYPE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/COS_DATVAL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/ORIGINGRP sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/VAL_CLASS sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/PURCH_ORG sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/INFO_REC sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/MATL_GROUP sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/VENDOR sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPCCENT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPACTT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPMAT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/SERVICE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CESNUM sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FISCYEAR sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-FISCVARNT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSCLVA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSCLFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEETTC sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEETTCM sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSCL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEBQRQF sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CELSIZEM sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/LOTSIZE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECLS sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSTARA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQBQF sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCS4 sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERVPERC sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERVPMRG sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCS5 sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEBQRQM sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERVSVOL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECLSM sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-UAB_CCS_OVERHEAD sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-UAB_CCS_3RDPARTY sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-UAB_CCS_MANUFACT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-UAB_CCS_MATERIAL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-UAB_CCS_MISCELL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSTQ sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSTQVR sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSTQFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CETOTQTY sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEBQRQ sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQUNT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQCLSM sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQBQ sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQSL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQML sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQSLNS sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQFACT sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQLIM sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQLISL sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQLIML sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQLISN sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQLI sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQ sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CERQCLS sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/PRICE_BASE sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCCFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCCVA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCVFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCVVA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCV sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCEFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCEVA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCVA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRC sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCUFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCUVA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCU sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSBQFX sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSBQVA sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSBQ sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCS1 sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCS2 sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSTARV sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CEPRCS3 sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-/1FB/CECSTAR sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-CURRENCY sy-vline
WA_UABW_S_EXCALC_FLAT_1PDCE_STR-UNIT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.