ABAP Select data from SAP table PIQACADOFFERBUF_BASEOBJDATA 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 PIQACADOFFERBUF_BASEOBJDATA 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 PIQACADOFFERBUF_BASEOBJDATA. 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 PIQACADOFFERBUF_BASEOBJDATA 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_PIQACADOFFERBUF_BASEOBJDATA TYPE STANDARD TABLE OF PIQACADOFFERBUF_BASEOBJDATA,
      WA_PIQACADOFFERBUF_BASEOBJDATA TYPE PIQACADOFFERBUF_BASEOBJDATA,
      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: <PIQACADOFFERBUF_BASEOBJDATA> TYPE PIQACADOFFERBUF_BASEOBJDATA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PIQACADOFFERBUF_BASEOBJDATA
*  INTO TABLE @DATA(IT_PIQACADOFFERBUF_BASEOBJDATA2).
*--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_PIQACADOFFERBUF_BASEOBJDATA INDEX 1 INTO DATA(WA_PIQACADOFFERBUF_BASEOBJDATA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PIQACADOFFERBUF_BASEOBJDATA ASSIGNING <PIQACADOFFERBUF_BASEOBJDATA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PIQACADOFFERBUF_BASEOBJDATA>-PLVAR = 1.
<PIQACADOFFERBUF_BASEOBJDATA>-OBJID_SM = 1.
<PIQACADOFFERBUF_BASEOBJDATA>-SHORT_SM = 1.
<PIQACADOFFERBUF_BASEOBJDATA>-STEXT_SM = 1.
<PIQACADOFFERBUF_BASEOBJDATA>-SEVERITY_SM = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PIQACADOFFERBUF_BASEOBJDATA-CATEGORY_SM, sy-vline,
WA_PIQACADOFFERBUF_BASEOBJDATA-MODREPEATTYPE_SM, sy-vline,
WA_PIQACADOFFERBUF_BASEOBJDATA-SHOWINCATALOGUE_SM, sy-vline,
WA_PIQACADOFFERBUF_BASEOBJDATA-WAITL_LEVEL_SM, sy-vline,
WA_PIQACADOFFERBUF_BASEOBJDATA-WAITL_NUMBER_SM, sy-vline,
WA_PIQACADOFFERBUF_BASEOBJDATA-WAITL_DISABLED_SM, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PIQACADOFFERBUF_BASEOBJDATA 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_PIQACADOFFERBUF_BASEOBJDATA 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_PIQACADOFFERBUF_BASEOBJDATA INTO WA_PIQACADOFFERBUF_BASEOBJDATA. *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 ISOLA, internal->external for field LANGU_EV CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_PIQACADOFFERBUF_BASEOBJDATA-LANGU_EV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PIQACADOFFERBUF_BASEOBJDATA-LANGU_EV.
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_PIQACADOFFERBUF_BASEOBJDATA_STR,
PLVAR TYPE STRING,
OBJID_SM TYPE STRING,
SHORT_SM TYPE STRING,
STEXT_SM TYPE STRING,
SEVERITY_SM TYPE STRING,
CATEGORY_SM TYPE STRING,
MODREPEATTYPE_SM TYPE STRING,
SHOWINCATALOGUE_SM TYPE STRING,
WAITL_LEVEL_SM TYPE STRING,
WAITL_NUMBER_SM TYPE STRING,
WAITL_DISABLED_SM TYPE STRING,
MULT_SEC_ENABLED_SM TYPE STRING,
SUBJ_DIR_SM TYPE STRING,
SEVERITY_TEXT_SM TYPE STRING,
CATEGORY_TEXT_SM TYPE STRING,
MODREPEATTYPETXT_SM TYPE STRING,
WAITL_STDPERCT_SM TYPE STRING,
WAITL_STDLEVEL_SM TYPE STRING,
SUBJ_DIR_TEXT_SM TYPE STRING,
KAPZ1_SM TYPE STRING,
KAPZ2_SM TYPE STRING,
KAPZ3_SM TYPE STRING,
OBJIDREF_SM TYPE STRING,
SHORTREF_SM TYPE STRING,
STEXTREF_SM TYPE STRING,
OPERA_SM TYPE STRING,
OBJID_D TYPE STRING,
SHORT_D TYPE STRING,
STEXT_D TYPE STRING,
KAPZ1_D TYPE STRING,
KAPZ2_D TYPE STRING,
KAPZ3_D TYPE STRING,
CATEGORY_D TYPE STRING,
METHOD_D TYPE STRING,
ATTREQ_D TYPE STRING,
DELMODE_D TYPE STRING,
AGRTYPE_D TYPE STRING,
CATEGORYT_D TYPE STRING,
METHODT_D TYPE STRING,
DELMODET_D TYPE STRING,
AGRTYPETEXT_D TYPE STRING,
CHOURUNIT_D TYPE STRING,
CONTACTHOURS_D TYPE STRING,
ACTIVCHNGABL_D TYPE STRING,
CHOURUNIT_TEXT_D TYPE STRING,
OPERA_D TYPE STRING,
OBJID_SE TYPE STRING,
SHORT_SE TYPE STRING,
STEXT_SE TYPE STRING,
BEGDA_SE TYPE STRING,
ENDDA_SE TYPE STRING,
KAPZ1_SE TYPE STRING,
KAPZ2_SE TYPE STRING,
KAPZ3_SE TYPE STRING,
SECCAT1_SE TYPE STRING,
SECCAT2_SE TYPE STRING,
DDSCHED_SE TYPE STRING,
SECCAT1T_SE TYPE STRING,
LFEECATT_SE TYPE STRING,
DDSCHEDT_SE TYPE STRING,
OFFERPATTERN_SE TYPE STRING,
OFFERPATTERNTXT_SE TYPE STRING,
OBJID_F_SE TYPE STRING,
SHORT_F_SE TYPE STRING,
STEXT_F_SE TYPE STRING,
OBJID_CA_SE TYPE STRING,
SHORT_CA_SE TYPE STRING,
STEXT_CA_SE TYPE STRING,
OPERA_SE TYPE STRING,
OTYPE_EV TYPE STRING,
OTEXT_EV TYPE STRING,
OBJID_EV TYPE STRING,
SHORT_EV TYPE STRING,
STEXT_EV TYPE STRING,
BEGDA_EV TYPE STRING,
ENDDA_EV TYPE STRING,
ISTAT_EV TYPE STRING,
ISTATTXT_EV TYPE STRING,
KAPZ1_EV TYPE STRING,
KAPZ2_EV TYPE STRING,
KAPZ3_EV TYPE STRING,
LANGU_EV TYPE STRING,
LOCKM_EV TYPE STRING,
DELET_EV TYPE STRING,
EXTRN_EV TYPE STRING,
TEILX_EV TYPE STRING,
CANCR_EV TYPE STRING,
BCONT_EV TYPE STRING,
WCONT_EV TYPE STRING,
NCONT_EV TYPE STRING,
UPDAX_EV TYPE STRING,
FLUPX_EV TYPE STRING,
COND1_EV TYPE STRING,
COND2_EV TYPE STRING,
CUBOE_EV TYPE STRING,
TZONE_EV TYPE STRING,
LANGUTXT_EV TYPE STRING,
AVAIL_PLACES_EV TYPE STRING,
SCHEDCATEG_EV TYPE STRING,
PLPERLIMBEG_EV TYPE STRING,
PLPERLIMBEGU_EV TYPE STRING,
PLPERLIMEND_EV TYPE STRING,
PLPERLIMENDU_EV TYPE STRING,
SCHEDBGDAY_EV TYPE STRING,
SCHEDCATEGTXT_EV TYPE STRING,
PLPERLIMBEGUTXT_EV TYPE STRING,
PLPERLIMENDUTXT_EV TYPE STRING,
SCHEDBGDAYTXT_EV TYPE STRING,
EVPROCSTAT_EV TYPE STRING,
EVPROCSTATTXT_EV TYPE STRING,
CHOURUNIT_EV TYPE STRING,
CONTACTHOURS_EV TYPE STRING,
ACTIVCHNGABL_EV TYPE STRING,
CHOURUNIT_TEXT_EV TYPE STRING,
OBJID_F_EV TYPE STRING,
SHORT_F_EV TYPE STRING,
STEXT_F_EV TYPE STRING,
KAPZ1CLC_EV TYPE STRING,
KAPZ2CLC_EV TYPE STRING,
KAPZ3CLC_EV TYPE STRING,
OPERA_EV TYPE STRING,END OF T_EKKO_STR. DATA: WA_PIQACADOFFERBUF_BASEOBJDATA_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_PIQACADOFFERBUF_BASEOBJDATA_STR-PLVAR sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJID_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORT_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXT_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SEVERITY_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CATEGORY_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-MODREPEATTYPE_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHOWINCATALOGUE_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-WAITL_LEVEL_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-WAITL_NUMBER_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-WAITL_DISABLED_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-MULT_SEC_ENABLED_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SUBJ_DIR_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SEVERITY_TEXT_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CATEGORY_TEXT_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-MODREPEATTYPETXT_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-WAITL_STDPERCT_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-WAITL_STDLEVEL_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SUBJ_DIR_TEXT_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ1_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ2_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ3_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJIDREF_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORTREF_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXTREF_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OPERA_SM sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJID_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORT_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXT_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ1_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ2_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ3_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CATEGORY_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-METHOD_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-ATTREQ_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-DELMODE_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-AGRTYPE_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CATEGORYT_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-METHODT_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-DELMODET_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-AGRTYPETEXT_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CHOURUNIT_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CONTACTHOURS_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-ACTIVCHNGABL_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CHOURUNIT_TEXT_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OPERA_D sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJID_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORT_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXT_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-BEGDA_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-ENDDA_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ1_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ2_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ3_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SECCAT1_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SECCAT2_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-DDSCHED_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SECCAT1T_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-LFEECATT_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-DDSCHEDT_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OFFERPATTERN_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OFFERPATTERNTXT_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJID_F_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORT_F_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXT_F_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJID_CA_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORT_CA_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXT_CA_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OPERA_SE sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OTYPE_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OTEXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJID_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-BEGDA_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-ENDDA_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-ISTAT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-ISTATTXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ1_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ2_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ3_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-LANGU_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-LOCKM_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-DELET_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-EXTRN_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-TEILX_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CANCR_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-BCONT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-WCONT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-NCONT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-UPDAX_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-FLUPX_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-COND1_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-COND2_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CUBOE_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-TZONE_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-LANGUTXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-AVAIL_PLACES_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SCHEDCATEG_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-PLPERLIMBEG_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-PLPERLIMBEGU_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-PLPERLIMEND_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-PLPERLIMENDU_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SCHEDBGDAY_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SCHEDCATEGTXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-PLPERLIMBEGUTXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-PLPERLIMENDUTXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SCHEDBGDAYTXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-EVPROCSTAT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-EVPROCSTATTXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CHOURUNIT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CONTACTHOURS_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-ACTIVCHNGABL_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-CHOURUNIT_TEXT_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OBJID_F_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-SHORT_F_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-STEXT_F_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ1CLC_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ2CLC_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-KAPZ3CLC_EV sy-vline
WA_PIQACADOFFERBUF_BASEOBJDATA_STR-OPERA_EV sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.