ABAP Select data from SAP table CEBWKYF 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 CEBWKYF 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 CEBWKYF. 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 CEBWKYF 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_CEBWKYF TYPE STANDARD TABLE OF CEBWKYF,
WA_CEBWKYF TYPE CEBWKYF,
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: <CEBWKYF> TYPE CEBWKYF.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_CEBWKYF.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM CEBWKYF
INTO TABLE IT_CEBWKYF.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM CEBWKYF
* INTO TABLE @DATA(IT_CEBWKYF2).
*--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_CEBWKYF INDEX 1 INTO DATA(WA_CEBWKYF2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CEBWKYF ASSIGNING <CEBWKYF>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<CEBWKYF>-COPASLQTU = 1.
<CEBWKYF>-COPASLQTY = 1.
<CEBWKYF>-COPAREVEN = 1.
<CEBWKYF>-COPACDSCN = 1.
<CEBWKYF>-COPAPDSCN = 1.
ENDLOOP. LOOP AT IT_CEBWKYF INTO WA_CEBWKYF. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_CEBWKYF-COPAQDSCN, sy-vline,
WA_CEBWKYF-COPASPROM, sy-vline,
WA_CEBWKYF-COPACASHD, sy-vline,
WA_CEBWKYF-COPAREBAT, sy-vline,
WA_CEBWKYF-COPAODSCN, sy-vline,
WA_CEBWKYF-COPADISCT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CEBWKYF 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_CEBWKYF 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_CEBWKYF INTO WA_CEBWKYF. *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 CUNIT, internal->external for field COPASLQTU CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_CEBWKYF-COPASLQTU IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPASLQTU.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAREVEN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAREVEN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAREVEN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPACDSCN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPACDSCN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPACDSCN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAPDSCN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAPDSCN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAPDSCN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAQDSCN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAQDSCN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAQDSCN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPASPROM CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPASPROM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPASPROM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPACASHD CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPACASHD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPACASHD.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAREBAT CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAREBAT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAREBAT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAODSCN CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAODSCN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAODSCN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPADISCT CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPADISCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPADISCT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPANETSL CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPANETSL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPANETSL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPASCOMM CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPASCOMM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPASCOMM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPASDIRS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPASDIRS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPASDIRS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAFRGTC CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAFRGTC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAFRGTC.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPADIRSL CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPADIRSL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPADIRSL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPANETRV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPANETRV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPANETRV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPADMATC CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPADMATC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPADMATC.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAPRDCV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAPRDCV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAPRDCV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPACOGSV CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPACOGSV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPACOGSV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAMRGN1 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAMRGN1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAMRGN1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAMATOH CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAMATOH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAMATOH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAPRDCF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAPRDCF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAPRDCF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPACOGSF CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPACOGSF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPACOGSF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAMRGN2 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAMRGN2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAMRGN2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAVRNCS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAVRNCS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAVRNCS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAMRGN3 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAMRGN3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAMRGN3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAOHMRK CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAOHMRK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAOHMRK.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAOHSLS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAOHSLS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAOHSLS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAOHADM CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAOHADM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAOHADM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAOHRND CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAOHRND IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAOHRND.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAOHLOG CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAOHLOG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAOHLOG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAOHOTH CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAOHOTH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAOHOTH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAOVHDC CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAOVHDC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAOVHDC.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAPROFT CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAPROFT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAPROFT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR01 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR01 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR01.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR02 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR02 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR02.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR03 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR03 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR03.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR04 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR04 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR04.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR05 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR05 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR05.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR06 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR06 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR06.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR07 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR07 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR07.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR08 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR08 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR08.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPAUSR09 CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPAUSR09 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPAUSR09.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC152, internal->external for field COPACOGS CALL FUNCTION 'CONVERSION_EXIT_AC152_OUTPUT' EXPORTING input = WA_CEBWKYF-COPACOGS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CEBWKYF-COPACOGS.
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_CEBWKYF_STR,
COPASLQTU TYPE STRING,
COPASLQTY TYPE STRING,
COPAREVEN TYPE STRING,
COPACDSCN TYPE STRING,
COPAPDSCN TYPE STRING,
COPAQDSCN TYPE STRING,
COPASPROM TYPE STRING,
COPACASHD TYPE STRING,
COPAREBAT TYPE STRING,
COPAODSCN TYPE STRING,
COPADISCT TYPE STRING,
COPANETSL TYPE STRING,
COPASCOMM TYPE STRING,
COPASDIRS TYPE STRING,
COPAFRGTC TYPE STRING,
COPADIRSL TYPE STRING,
COPANETRV TYPE STRING,
COPADMATC TYPE STRING,
COPAPRDCV TYPE STRING,
COPACOGSV TYPE STRING,
COPAMRGN1 TYPE STRING,
COPAMATOH TYPE STRING,
COPAPRDCF TYPE STRING,
COPACOGSF TYPE STRING,
COPAMRGN2 TYPE STRING,
COPAVRNCS TYPE STRING,
COPAMRGN3 TYPE STRING,
COPAOHMRK TYPE STRING,
COPAOHSLS TYPE STRING,
COPAOHADM TYPE STRING,
COPAOHRND TYPE STRING,
COPAOHLOG TYPE STRING,
COPAOHOTH TYPE STRING,
COPAOVHDC TYPE STRING,
COPAPROFT TYPE STRING,
COPAUSR01 TYPE STRING,
COPAUSR02 TYPE STRING,
COPAUSR03 TYPE STRING,
COPAUSR04 TYPE STRING,
COPAUSR05 TYPE STRING,
COPAUSR06 TYPE STRING,
COPAUSR07 TYPE STRING,
COPAUSR08 TYPE STRING,
COPAUSR09 TYPE STRING,
COPACOGS TYPE STRING,END OF T_EKKO_STR. DATA: WA_CEBWKYF_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_CEBWKYF_STR-COPASLQTU sy-vline
WA_CEBWKYF_STR-COPASLQTY sy-vline
WA_CEBWKYF_STR-COPAREVEN sy-vline
WA_CEBWKYF_STR-COPACDSCN sy-vline
WA_CEBWKYF_STR-COPAPDSCN sy-vline
WA_CEBWKYF_STR-COPAQDSCN sy-vline
WA_CEBWKYF_STR-COPASPROM sy-vline
WA_CEBWKYF_STR-COPACASHD sy-vline
WA_CEBWKYF_STR-COPAREBAT sy-vline
WA_CEBWKYF_STR-COPAODSCN sy-vline
WA_CEBWKYF_STR-COPADISCT sy-vline
WA_CEBWKYF_STR-COPANETSL sy-vline
WA_CEBWKYF_STR-COPASCOMM sy-vline
WA_CEBWKYF_STR-COPASDIRS sy-vline
WA_CEBWKYF_STR-COPAFRGTC sy-vline
WA_CEBWKYF_STR-COPADIRSL sy-vline
WA_CEBWKYF_STR-COPANETRV sy-vline
WA_CEBWKYF_STR-COPADMATC sy-vline
WA_CEBWKYF_STR-COPAPRDCV sy-vline
WA_CEBWKYF_STR-COPACOGSV sy-vline
WA_CEBWKYF_STR-COPAMRGN1 sy-vline
WA_CEBWKYF_STR-COPAMATOH sy-vline
WA_CEBWKYF_STR-COPAPRDCF sy-vline
WA_CEBWKYF_STR-COPACOGSF sy-vline
WA_CEBWKYF_STR-COPAMRGN2 sy-vline
WA_CEBWKYF_STR-COPAVRNCS sy-vline
WA_CEBWKYF_STR-COPAMRGN3 sy-vline
WA_CEBWKYF_STR-COPAOHMRK sy-vline
WA_CEBWKYF_STR-COPAOHSLS sy-vline
WA_CEBWKYF_STR-COPAOHADM sy-vline
WA_CEBWKYF_STR-COPAOHRND sy-vline
WA_CEBWKYF_STR-COPAOHLOG sy-vline
WA_CEBWKYF_STR-COPAOHOTH sy-vline
WA_CEBWKYF_STR-COPAOVHDC sy-vline
WA_CEBWKYF_STR-COPAPROFT sy-vline
WA_CEBWKYF_STR-COPAUSR01 sy-vline
WA_CEBWKYF_STR-COPAUSR02 sy-vline
WA_CEBWKYF_STR-COPAUSR03 sy-vline
WA_CEBWKYF_STR-COPAUSR04 sy-vline
WA_CEBWKYF_STR-COPAUSR05 sy-vline
WA_CEBWKYF_STR-COPAUSR06 sy-vline
WA_CEBWKYF_STR-COPAUSR07 sy-vline
WA_CEBWKYF_STR-COPAUSR08 sy-vline
WA_CEBWKYF_STR-COPAUSR09 sy-vline
WA_CEBWKYF_STR-COPACOGS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.