ABAP Select data from SAP table TCOA 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 TCOA 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 TCOA. 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 TCOA 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_TCOA TYPE STANDARD TABLE OF TCOA,
      WA_TCOA TYPE TCOA,
      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: <TCOA> TYPE TCOA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM TCOA
*  INTO TABLE @DATA(IT_TCOA2).
*--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_TCOA INDEX 1 INTO DATA(WA_TCOA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_TCOA ASSIGNING <TCOA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<TCOA>-MANDT = 1.
<TCOA>-PROFID = 1.
<TCOA>-AENAM = 1.
<TCOA>-PROTECT = 1.
<TCOA>-VARIANTE = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_TCOA-FLG_LOEKZ, sy-vline,
WA_TCOA-FLG_MSTUF, sy-vline,
WA_TCOA-PROFID_AA, sy-vline,
WA_TCOA-HEADER_SEL, sy-vline,
WA_TCOA-HEADER_ANZ, sy-vline,
WA_TCOA-HEADER_AFL, sy-vline.
ENDLOOP. *Add any further fields from structure WA_TCOA 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_TCOA 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_TCOA INTO WA_TCOA. *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_TCOA_STR,
MANDT TYPE STRING,
PROFID TYPE STRING,
AENAM TYPE STRING,
PROTECT TYPE STRING,
VARIANTE TYPE STRING,
FLG_LOEKZ TYPE STRING,
FLG_MSTUF TYPE STRING,
PROFID_AA TYPE STRING,
HEADER_SEL TYPE STRING,
HEADER_ANZ TYPE STRING,
HEADER_AFL TYPE STRING,
PROFID_BA TYPE STRING,
ITEM_SEL TYPE STRING,
ITEM_ANZ TYPE STRING,
ITEM_AFL TYPE STRING,
PROFID_BB TYPE STRING,
SEQUEN_SEL TYPE STRING,
SEQUEN_ANZ TYPE STRING,
SEQUEN_AFL TYPE STRING,
PROFID_BC TYPE STRING,
CONF_SEL TYPE STRING,
CONF_ANZ TYPE STRING,
CONF_AFL TYPE STRING,
PROFID_BE TYPE STRING,
DOCL_SEL TYPE STRING,
DOCL_ANZ TYPE STRING,
DOCL_AFL TYPE STRING,
PROFID_CA TYPE STRING,
OPER_SEL TYPE STRING,
OPER_ANZ TYPE STRING,
OPER_AFL TYPE STRING,
PROFID_CB TYPE STRING,
GMER_SEL TYPE STRING,
GMER_ANZ TYPE STRING,
GMER_AFL TYPE STRING,
PROFID_CC TYPE STRING,
GOMO_SEL TYPE STRING,
GOMO_ANZ TYPE STRING,
GOMO_AFL TYPE STRING,
PROFID_DA TYPE STRING,
OPCAP_SEL TYPE STRING,
OPCAP_ANZ TYPE STRING,
OPCAP_AFL TYPE STRING,
PROFID_DB TYPE STRING,
SOPER_SEL TYPE STRING,
SOPER_ANZ TYPE STRING,
SOPER_AFL TYPE STRING,
PROFID_DC TYPE STRING,
OPMST_SEL TYPE STRING,
OPMST_ANZ TYPE STRING,
OPMST_AFL TYPE STRING,
PROFID_DE TYPE STRING,
OPCOMP_SEL TYPE STRING,
OPCOMP_ANZ TYPE STRING,
OPCOMP_AFL TYPE STRING,
PROFID_DF TYPE STRING,
OPPRT_SEL TYPE STRING,
OPPRT_ANZ TYPE STRING,
OPPRT_AFL TYPE STRING,
PROFID_DG TYPE STRING,
OPCONF_SEL TYPE STRING,
OPCONF_ANZ TYPE STRING,
OPCONF_AFL TYPE STRING,
PROFID_EA TYPE STRING,
OPSCAP_SEL TYPE STRING,
OPSCAP_ANZ TYPE STRING,
OPSCAP_AFL TYPE STRING,
PROFID_EB TYPE STRING,
SOCAP_SEL TYPE STRING,
SOCAP_ANZ TYPE STRING,
SOCAP_AFL TYPE STRING,
PROFID_EC TYPE STRING,
SOCONF_SEL TYPE STRING,
SOCONF_ANZ TYPE STRING,
SOCONF_AFL TYPE STRING,
PROFID_ED TYPE STRING,
OPGMER_SEL TYPE STRING,
OPGMER_ANZ TYPE STRING,
OPGMER_AFL TYPE STRING,
PROFID_EE TYPE STRING,
OPGOMO_SEL TYPE STRING,
OPGOMO_ANZ TYPE STRING,
OPGOMO_AFL TYPE STRING,
PROFID_FA TYPE STRING,
SOSCAP_SEL TYPE STRING,
SOSCAP_ANZ TYPE STRING,
SOSCAP_AFL TYPE STRING,
PROFID_FB TYPE STRING,
SOGMER_SEL TYPE STRING,
SOGMER_ANZ TYPE STRING,
SOGMER_AFL TYPE STRING,
PROFID_FC TYPE STRING,
OPSCCF_SEL TYPE STRING,
OPSCCF_ANZ TYPE STRING,
OPSCCF_AFL TYPE STRING,
PROFID_FD TYPE STRING,
SOGOMO_SEL TYPE STRING,
SOGOMO_ANZ TYPE STRING,
SOGOMO_AFL TYPE STRING,
PROFID_GA TYPE STRING,
SOSCCF_SEL TYPE STRING,
SOSCCF_ANZ TYPE STRING,
SOSCCF_AFL TYPE STRING,
PROFID_BD TYPE STRING,
MAMO_SEL TYPE STRING,
MAMO_ANZ TYPE STRING,
MAMO_AFL TYPE STRING,
PROFID_DH TYPE STRING,
OPPREQ_SEL TYPE STRING,
OPPREQ_ANZ TYPE STRING,
OPPREQ_AFL TYPE STRING,
PROFID_DI TYPE STRING,
OPPORD_SEL TYPE STRING,
OPPORD_ANZ TYPE STRING,
OPPORD_AFL TYPE STRING,
PROFID_EF TYPE STRING,
SOPREQ_SEL TYPE STRING,
SOPREQ_ANZ TYPE STRING,
SOPREQ_AFL TYPE STRING,
PROFID_EG TYPE STRING,
SOPORD_SEL TYPE STRING,
SOPORD_ANZ TYPE STRING,
SOPORD_AFL TYPE STRING,
PROFID_DJ TYPE STRING,
OPDOCL_SEL TYPE STRING,
OPDOCL_ANZ TYPE STRING,
OPDOCL_AFL TYPE STRING,
AEDAT TYPE STRING,
FLG_ALVTR TYPE STRING,
LAYOUTID_AA TYPE STRING,
LAYOUTID_BA TYPE STRING,
LAYOUTID_BB TYPE STRING,
LAYOUTID_BC TYPE STRING,
LAYOUTID_BD TYPE STRING,
LAYOUTID_BE TYPE STRING,
LAYOUTID_CA TYPE STRING,
LAYOUTID_CB TYPE STRING,
LAYOUTID_CC TYPE STRING,
LAYOUTID_DA TYPE STRING,
LAYOUTID_DB TYPE STRING,
LAYOUTID_DC TYPE STRING,
LAYOUTID_DE TYPE STRING,
LAYOUTID_DF TYPE STRING,
LAYOUTID_DG TYPE STRING,
LAYOUTID_DH TYPE STRING,
LAYOUTID_DI TYPE STRING,
LAYOUTID_DJ TYPE STRING,
LAYOUTID_EA TYPE STRING,
LAYOUTID_EB TYPE STRING,
LAYOUTID_EC TYPE STRING,
LAYOUTID_ED TYPE STRING,
LAYOUTID_EE TYPE STRING,
LAYOUTID_EF TYPE STRING,
LAYOUTID_EG TYPE STRING,
LAYOUTID_FA TYPE STRING,
LAYOUTID_FB TYPE STRING,
LAYOUTID_FC TYPE STRING,
LAYOUTID_FD TYPE STRING,
LAYOUTID_GA TYPE STRING,
HEADER_POS TYPE STRING,
ITEM_POS TYPE STRING,
SEQUEN_POS TYPE STRING,
MAMO_POS TYPE STRING,
DOCL_POS TYPE STRING,
CONF_POS TYPE STRING,
OPER_POS TYPE STRING,
GMER_POS TYPE STRING,
GOMO_POS TYPE STRING,
OPCAP_POS TYPE STRING,
OPCOMP_POS TYPE STRING,
OPCONF_POS TYPE STRING,
OPMST_POS TYPE STRING,
OPPRT_POS TYPE STRING,
OPPREQ_POS TYPE STRING,
OPPORD_POS TYPE STRING,
OPDOCL_POS TYPE STRING,
SOPER_POS TYPE STRING,
OPSCAP_POS TYPE STRING,
OPGMER_POS TYPE STRING,
OPGOMO_POS TYPE STRING,
SOCAP_POS TYPE STRING,
SOCONF_POS TYPE STRING,
SOSCAP_POS TYPE STRING,
SOPREQ_POS TYPE STRING,
SOPORD_POS TYPE STRING,
SOGMER_POS TYPE STRING,
SOGOMO_POS TYPE STRING,
OPSCCF_POS TYPE STRING,
SOSCCF_POS TYPE STRING,
PRODLIST_SEL TYPE STRING,
MATVER_SEL TYPE STRING,
PRODLIST_LAY TYPE STRING,
MATVER_LAY TYPE STRING,
BUYOFF_SEL TYPE STRING,
BUYOFF_ANZ TYPE STRING,
BUYOFF_AFL TYPE STRING,
BUYOFF_POS TYPE STRING,
PROFID_HA TYPE STRING,
HOLD_SEL TYPE STRING,
HOLD_ANZ TYPE STRING,
HOLD_AFL TYPE STRING,
HOLD_POS TYPE STRING,
PROFID_HB TYPE STRING,
COMP_SEL TYPE STRING,
COMP_ANZ TYPE STRING,
COMP_AFL TYPE STRING,
COMP_POS TYPE STRING,
PROFID_HC TYPE STRING,
DEF_SEL TYPE STRING,
DEF_ANZ TYPE STRING,
DEF_AFL TYPE STRING,
DEF_POS TYPE STRING,
PROFID_HD TYPE STRING,
LAB_SEL TYPE STRING,
LAB_ANZ TYPE STRING,
LAB_AFL TYPE STRING,
LAB_POS TYPE STRING,
PROFID_HE TYPE STRING,END OF T_EKKO_STR. DATA: WA_TCOA_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_TCOA_STR-MANDT sy-vline
WA_TCOA_STR-PROFID sy-vline
WA_TCOA_STR-AENAM sy-vline
WA_TCOA_STR-PROTECT sy-vline
WA_TCOA_STR-VARIANTE sy-vline
WA_TCOA_STR-FLG_LOEKZ sy-vline
WA_TCOA_STR-FLG_MSTUF sy-vline
WA_TCOA_STR-PROFID_AA sy-vline
WA_TCOA_STR-HEADER_SEL sy-vline
WA_TCOA_STR-HEADER_ANZ sy-vline
WA_TCOA_STR-HEADER_AFL sy-vline
WA_TCOA_STR-PROFID_BA sy-vline
WA_TCOA_STR-ITEM_SEL sy-vline
WA_TCOA_STR-ITEM_ANZ sy-vline
WA_TCOA_STR-ITEM_AFL sy-vline
WA_TCOA_STR-PROFID_BB sy-vline
WA_TCOA_STR-SEQUEN_SEL sy-vline
WA_TCOA_STR-SEQUEN_ANZ sy-vline
WA_TCOA_STR-SEQUEN_AFL sy-vline
WA_TCOA_STR-PROFID_BC sy-vline
WA_TCOA_STR-CONF_SEL sy-vline
WA_TCOA_STR-CONF_ANZ sy-vline
WA_TCOA_STR-CONF_AFL sy-vline
WA_TCOA_STR-PROFID_BE sy-vline
WA_TCOA_STR-DOCL_SEL sy-vline
WA_TCOA_STR-DOCL_ANZ sy-vline
WA_TCOA_STR-DOCL_AFL sy-vline
WA_TCOA_STR-PROFID_CA sy-vline
WA_TCOA_STR-OPER_SEL sy-vline
WA_TCOA_STR-OPER_ANZ sy-vline
WA_TCOA_STR-OPER_AFL sy-vline
WA_TCOA_STR-PROFID_CB sy-vline
WA_TCOA_STR-GMER_SEL sy-vline
WA_TCOA_STR-GMER_ANZ sy-vline
WA_TCOA_STR-GMER_AFL sy-vline
WA_TCOA_STR-PROFID_CC sy-vline
WA_TCOA_STR-GOMO_SEL sy-vline
WA_TCOA_STR-GOMO_ANZ sy-vline
WA_TCOA_STR-GOMO_AFL sy-vline
WA_TCOA_STR-PROFID_DA sy-vline
WA_TCOA_STR-OPCAP_SEL sy-vline
WA_TCOA_STR-OPCAP_ANZ sy-vline
WA_TCOA_STR-OPCAP_AFL sy-vline
WA_TCOA_STR-PROFID_DB sy-vline
WA_TCOA_STR-SOPER_SEL sy-vline
WA_TCOA_STR-SOPER_ANZ sy-vline
WA_TCOA_STR-SOPER_AFL sy-vline
WA_TCOA_STR-PROFID_DC sy-vline
WA_TCOA_STR-OPMST_SEL sy-vline
WA_TCOA_STR-OPMST_ANZ sy-vline
WA_TCOA_STR-OPMST_AFL sy-vline
WA_TCOA_STR-PROFID_DE sy-vline
WA_TCOA_STR-OPCOMP_SEL sy-vline
WA_TCOA_STR-OPCOMP_ANZ sy-vline
WA_TCOA_STR-OPCOMP_AFL sy-vline
WA_TCOA_STR-PROFID_DF sy-vline
WA_TCOA_STR-OPPRT_SEL sy-vline
WA_TCOA_STR-OPPRT_ANZ sy-vline
WA_TCOA_STR-OPPRT_AFL sy-vline
WA_TCOA_STR-PROFID_DG sy-vline
WA_TCOA_STR-OPCONF_SEL sy-vline
WA_TCOA_STR-OPCONF_ANZ sy-vline
WA_TCOA_STR-OPCONF_AFL sy-vline
WA_TCOA_STR-PROFID_EA sy-vline
WA_TCOA_STR-OPSCAP_SEL sy-vline
WA_TCOA_STR-OPSCAP_ANZ sy-vline
WA_TCOA_STR-OPSCAP_AFL sy-vline
WA_TCOA_STR-PROFID_EB sy-vline
WA_TCOA_STR-SOCAP_SEL sy-vline
WA_TCOA_STR-SOCAP_ANZ sy-vline
WA_TCOA_STR-SOCAP_AFL sy-vline
WA_TCOA_STR-PROFID_EC sy-vline
WA_TCOA_STR-SOCONF_SEL sy-vline
WA_TCOA_STR-SOCONF_ANZ sy-vline
WA_TCOA_STR-SOCONF_AFL sy-vline
WA_TCOA_STR-PROFID_ED sy-vline
WA_TCOA_STR-OPGMER_SEL sy-vline
WA_TCOA_STR-OPGMER_ANZ sy-vline
WA_TCOA_STR-OPGMER_AFL sy-vline
WA_TCOA_STR-PROFID_EE sy-vline
WA_TCOA_STR-OPGOMO_SEL sy-vline
WA_TCOA_STR-OPGOMO_ANZ sy-vline
WA_TCOA_STR-OPGOMO_AFL sy-vline
WA_TCOA_STR-PROFID_FA sy-vline
WA_TCOA_STR-SOSCAP_SEL sy-vline
WA_TCOA_STR-SOSCAP_ANZ sy-vline
WA_TCOA_STR-SOSCAP_AFL sy-vline
WA_TCOA_STR-PROFID_FB sy-vline
WA_TCOA_STR-SOGMER_SEL sy-vline
WA_TCOA_STR-SOGMER_ANZ sy-vline
WA_TCOA_STR-SOGMER_AFL sy-vline
WA_TCOA_STR-PROFID_FC sy-vline
WA_TCOA_STR-OPSCCF_SEL sy-vline
WA_TCOA_STR-OPSCCF_ANZ sy-vline
WA_TCOA_STR-OPSCCF_AFL sy-vline
WA_TCOA_STR-PROFID_FD sy-vline
WA_TCOA_STR-SOGOMO_SEL sy-vline
WA_TCOA_STR-SOGOMO_ANZ sy-vline
WA_TCOA_STR-SOGOMO_AFL sy-vline
WA_TCOA_STR-PROFID_GA sy-vline
WA_TCOA_STR-SOSCCF_SEL sy-vline
WA_TCOA_STR-SOSCCF_ANZ sy-vline
WA_TCOA_STR-SOSCCF_AFL sy-vline
WA_TCOA_STR-PROFID_BD sy-vline
WA_TCOA_STR-MAMO_SEL sy-vline
WA_TCOA_STR-MAMO_ANZ sy-vline
WA_TCOA_STR-MAMO_AFL sy-vline
WA_TCOA_STR-PROFID_DH sy-vline
WA_TCOA_STR-OPPREQ_SEL sy-vline
WA_TCOA_STR-OPPREQ_ANZ sy-vline
WA_TCOA_STR-OPPREQ_AFL sy-vline
WA_TCOA_STR-PROFID_DI sy-vline
WA_TCOA_STR-OPPORD_SEL sy-vline
WA_TCOA_STR-OPPORD_ANZ sy-vline
WA_TCOA_STR-OPPORD_AFL sy-vline
WA_TCOA_STR-PROFID_EF sy-vline
WA_TCOA_STR-SOPREQ_SEL sy-vline
WA_TCOA_STR-SOPREQ_ANZ sy-vline
WA_TCOA_STR-SOPREQ_AFL sy-vline
WA_TCOA_STR-PROFID_EG sy-vline
WA_TCOA_STR-SOPORD_SEL sy-vline
WA_TCOA_STR-SOPORD_ANZ sy-vline
WA_TCOA_STR-SOPORD_AFL sy-vline
WA_TCOA_STR-PROFID_DJ sy-vline
WA_TCOA_STR-OPDOCL_SEL sy-vline
WA_TCOA_STR-OPDOCL_ANZ sy-vline
WA_TCOA_STR-OPDOCL_AFL sy-vline
WA_TCOA_STR-AEDAT sy-vline
WA_TCOA_STR-FLG_ALVTR sy-vline
WA_TCOA_STR-LAYOUTID_AA sy-vline
WA_TCOA_STR-LAYOUTID_BA sy-vline
WA_TCOA_STR-LAYOUTID_BB sy-vline
WA_TCOA_STR-LAYOUTID_BC sy-vline
WA_TCOA_STR-LAYOUTID_BD sy-vline
WA_TCOA_STR-LAYOUTID_BE sy-vline
WA_TCOA_STR-LAYOUTID_CA sy-vline
WA_TCOA_STR-LAYOUTID_CB sy-vline
WA_TCOA_STR-LAYOUTID_CC sy-vline
WA_TCOA_STR-LAYOUTID_DA sy-vline
WA_TCOA_STR-LAYOUTID_DB sy-vline
WA_TCOA_STR-LAYOUTID_DC sy-vline
WA_TCOA_STR-LAYOUTID_DE sy-vline
WA_TCOA_STR-LAYOUTID_DF sy-vline
WA_TCOA_STR-LAYOUTID_DG sy-vline
WA_TCOA_STR-LAYOUTID_DH sy-vline
WA_TCOA_STR-LAYOUTID_DI sy-vline
WA_TCOA_STR-LAYOUTID_DJ sy-vline
WA_TCOA_STR-LAYOUTID_EA sy-vline
WA_TCOA_STR-LAYOUTID_EB sy-vline
WA_TCOA_STR-LAYOUTID_EC sy-vline
WA_TCOA_STR-LAYOUTID_ED sy-vline
WA_TCOA_STR-LAYOUTID_EE sy-vline
WA_TCOA_STR-LAYOUTID_EF sy-vline
WA_TCOA_STR-LAYOUTID_EG sy-vline
WA_TCOA_STR-LAYOUTID_FA sy-vline
WA_TCOA_STR-LAYOUTID_FB sy-vline
WA_TCOA_STR-LAYOUTID_FC sy-vline
WA_TCOA_STR-LAYOUTID_FD sy-vline
WA_TCOA_STR-LAYOUTID_GA sy-vline
WA_TCOA_STR-HEADER_POS sy-vline
WA_TCOA_STR-ITEM_POS sy-vline
WA_TCOA_STR-SEQUEN_POS sy-vline
WA_TCOA_STR-MAMO_POS sy-vline
WA_TCOA_STR-DOCL_POS sy-vline
WA_TCOA_STR-CONF_POS sy-vline
WA_TCOA_STR-OPER_POS sy-vline
WA_TCOA_STR-GMER_POS sy-vline
WA_TCOA_STR-GOMO_POS sy-vline
WA_TCOA_STR-OPCAP_POS sy-vline
WA_TCOA_STR-OPCOMP_POS sy-vline
WA_TCOA_STR-OPCONF_POS sy-vline
WA_TCOA_STR-OPMST_POS sy-vline
WA_TCOA_STR-OPPRT_POS sy-vline
WA_TCOA_STR-OPPREQ_POS sy-vline
WA_TCOA_STR-OPPORD_POS sy-vline
WA_TCOA_STR-OPDOCL_POS sy-vline
WA_TCOA_STR-SOPER_POS sy-vline
WA_TCOA_STR-OPSCAP_POS sy-vline
WA_TCOA_STR-OPGMER_POS sy-vline
WA_TCOA_STR-OPGOMO_POS sy-vline
WA_TCOA_STR-SOCAP_POS sy-vline
WA_TCOA_STR-SOCONF_POS sy-vline
WA_TCOA_STR-SOSCAP_POS sy-vline
WA_TCOA_STR-SOPREQ_POS sy-vline
WA_TCOA_STR-SOPORD_POS sy-vline
WA_TCOA_STR-SOGMER_POS sy-vline
WA_TCOA_STR-SOGOMO_POS sy-vline
WA_TCOA_STR-OPSCCF_POS sy-vline
WA_TCOA_STR-SOSCCF_POS sy-vline
WA_TCOA_STR-PRODLIST_SEL sy-vline
WA_TCOA_STR-MATVER_SEL sy-vline
WA_TCOA_STR-PRODLIST_LAY sy-vline
WA_TCOA_STR-MATVER_LAY sy-vline
WA_TCOA_STR-BUYOFF_SEL sy-vline
WA_TCOA_STR-BUYOFF_ANZ sy-vline
WA_TCOA_STR-BUYOFF_AFL sy-vline
WA_TCOA_STR-BUYOFF_POS sy-vline
WA_TCOA_STR-PROFID_HA sy-vline
WA_TCOA_STR-HOLD_SEL sy-vline
WA_TCOA_STR-HOLD_ANZ sy-vline
WA_TCOA_STR-HOLD_AFL sy-vline
WA_TCOA_STR-HOLD_POS sy-vline
WA_TCOA_STR-PROFID_HB sy-vline
WA_TCOA_STR-COMP_SEL sy-vline
WA_TCOA_STR-COMP_ANZ sy-vline
WA_TCOA_STR-COMP_AFL sy-vline
WA_TCOA_STR-COMP_POS sy-vline
WA_TCOA_STR-PROFID_HC sy-vline
WA_TCOA_STR-DEF_SEL sy-vline
WA_TCOA_STR-DEF_ANZ sy-vline
WA_TCOA_STR-DEF_AFL sy-vline
WA_TCOA_STR-DEF_POS sy-vline
WA_TCOA_STR-PROFID_HD sy-vline
WA_TCOA_STR-LAB_SEL sy-vline
WA_TCOA_STR-LAB_ANZ sy-vline
WA_TCOA_STR-LAB_AFL sy-vline
WA_TCOA_STR-LAB_POS sy-vline
WA_TCOA_STR-PROFID_HE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.