ABAP Select data from SAP table P10_SHR_F_940 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 P10_SHR_F_940 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 P10_SHR_F_940. 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 P10_SHR_F_940 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_P10_SHR_F_940 TYPE STANDARD TABLE OF P10_SHR_F_940,
      WA_P10_SHR_F_940 TYPE P10_SHR_F_940,
      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: <P10_SHR_F_940> TYPE P10_SHR_F_940.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM P10_SHR_F_940
*  INTO TABLE @DATA(IT_P10_SHR_F_9402).
*--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_P10_SHR_F_940 INDEX 1 INTO DATA(WA_P10_SHR_F_9402).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_P10_SHR_F_940 ASSIGNING <P10_SHR_F_940>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<P10_SHR_F_940>-P2_LINE_3 = 1.
<P10_SHR_F_940>-T5UTL_TXCMP = 1.
<P10_SHR_F_940>-T5UTL_LTEXT = 1.
<P10_SHR_F_940>-T5UTL_STRAS = 1.
<P10_SHR_F_940>-T5UTL_ORT01 = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_P10_SHR_F_940-T5UTL_STATE, sy-vline,
WA_P10_SHR_F_940-T5UTL_ZIPCD, sy-vline,
WA_P10_SHR_F_940-T5UTL_TELNR, sy-vline,
WA_P10_SHR_F_940-P0002_NACHN, sy-vline,
WA_P10_SHR_F_940-P0002_PERID, sy-vline,
WA_P10_SHR_F_940-P0002_PERNR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_P10_SHR_F_940 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_P10_SHR_F_940 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_P10_SHR_F_940 INTO WA_P10_SHR_F_940. *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_P10_SHR_F_940_STR,
P2_LINE_3 TYPE STRING,
T5UTL_TXCMP TYPE STRING,
T5UTL_LTEXT TYPE STRING,
T5UTL_STRAS TYPE STRING,
T5UTL_ORT01 TYPE STRING,
T5UTL_STATE TYPE STRING,
T5UTL_ZIPCD TYPE STRING,
T5UTL_TELNR TYPE STRING,
P0002_NACHN TYPE STRING,
P0002_PERID TYPE STRING,
P0002_PERNR TYPE STRING,
P0002_VORNA TYPE STRING,
P0002_FNAMK TYPE STRING,
P0002_MIDNM TYPE STRING,
P0002_NAME2 TYPE STRING,
P0002_NAMZU TYPE STRING,
P0006_LAND1 TYPE STRING,
P0006_LOCAT TYPE STRING,
P0006_ORT01 TYPE STRING,
P0006_PSTLZ TYPE STRING,
P0006_STATE TYPE STRING,
P0006_STRAS TYPE STRING,
CURKY TYPE STRING,
T005T_LANDX TYPE STRING,
CRAK TYPE STRING,
CRAL TYPE STRING,
CRAR TYPE STRING,
CRAZ TYPE STRING,
CRCA TYPE STRING,
CRCO TYPE STRING,
CRCT TYPE STRING,
CRDC TYPE STRING,
CRDE TYPE STRING,
CRFL TYPE STRING,
CRGA TYPE STRING,
CRHI TYPE STRING,
CRIA TYPE STRING,
CRID TYPE STRING,
CRIL TYPE STRING,
CRIN TYPE STRING,
CRKS TYPE STRING,
CRKY TYPE STRING,
CRLA TYPE STRING,
CRMA TYPE STRING,
CRMD TYPE STRING,
CRME TYPE STRING,
CRMI TYPE STRING,
CRMN TYPE STRING,
CRMO TYPE STRING,
CRMS TYPE STRING,
CRMT TYPE STRING,
CRNC TYPE STRING,
CRND TYPE STRING,
CRNE TYPE STRING,
CRNH TYPE STRING,
CRNJ TYPE STRING,
CRNM TYPE STRING,
CRNV TYPE STRING,
CRNY TYPE STRING,
CROH TYPE STRING,
CROK TYPE STRING,
CROR TYPE STRING,
CRPA TYPE STRING,
CRPR TYPE STRING,
CRRI TYPE STRING,
CRSC TYPE STRING,
CRSD TYPE STRING,
CRTN TYPE STRING,
CRTX TYPE STRING,
CRUT TYPE STRING,
CRVA TYPE STRING,
CRVI TYPE STRING,
CRVT TYPE STRING,
CRWA TYPE STRING,
CRWI TYPE STRING,
CRWV TYPE STRING,
CRWY TYPE STRING,
DDAY TYPE STRING,
DMON TYPE STRING,
DYEA TYPE STRING,
F001 TYPE STRING,
F002 TYPE STRING,
F003 TYPE STRING,
F004 TYPE STRING,
F005 TYPE STRING,
F007 TYPE STRING,
F009 TYPE STRING,
F3AH TYPE STRING,
F3AI TYPE STRING,
FCW1 TYPE STRING,
FCW2 TYPE STRING,
FFEN TYPE STRING,
FP21 TYPE STRING,
FP26 TYPE STRING,
FP27 TYPE STRING,
FP28 TYPE STRING,
FP29 TYPE STRING,
FT3B TYPE STRING,
FWS1 TYPE STRING,
FWS2 TYPE STRING,
INCR TYPE STRING,
INWG TYPE STRING,
L310 TYPE STRING,
MICR TYPE STRING,
MIWG TYPE STRING,
RRAK TYPE STRING,
RRAL TYPE STRING,
RRAR TYPE STRING,
RRAZ TYPE STRING,
RRCA TYPE STRING,
RRCO TYPE STRING,
RRCT TYPE STRING,
RRDC TYPE STRING,
RRDE TYPE STRING,
RRFL TYPE STRING,
RRGA TYPE STRING,
RRHI TYPE STRING,
RRIA TYPE STRING,
RRID TYPE STRING,
RRIL TYPE STRING,
RRIN TYPE STRING,
RRKS TYPE STRING,
RRKY TYPE STRING,
RRLA TYPE STRING,
RRMA TYPE STRING,
RRMD TYPE STRING,
RRME TYPE STRING,
RRMI TYPE STRING,
RRMN TYPE STRING,
RRMO TYPE STRING,
RRMS TYPE STRING,
RRMT TYPE STRING,
RRNC TYPE STRING,
RRND TYPE STRING,
RRNE TYPE STRING,
RRNH TYPE STRING,
RRNJ TYPE STRING,
RRNM TYPE STRING,
RRNV TYPE STRING,
RRNY TYPE STRING,
RROH TYPE STRING,
RROK TYPE STRING,
RROR TYPE STRING,
RRPA TYPE STRING,
RRPR TYPE STRING,
RRRI TYPE STRING,
RRSC TYPE STRING,
RRSD TYPE STRING,
RRTN TYPE STRING,
RRTX TYPE STRING,
RRUT TYPE STRING,
RRVA TYPE STRING,
RRVI TYPE STRING,
RRVT TYPE STRING,
RRWA TYPE STRING,
RRWI TYPE STRING,
RRWV TYPE STRING,
RRWY TYPE STRING,
SCCR TYPE STRING,
SCWG TYPE STRING,
T000 TYPE STRING,
TOCR TYPE STRING,
U001 TYPE STRING,
U002 TYPE STRING,
U003 TYPE STRING,
U004 TYPE STRING,
U005 TYPE STRING,
WGAK TYPE STRING,
WGAL TYPE STRING,
WGAR TYPE STRING,
WGAZ TYPE STRING,
WGCA TYPE STRING,
WGCO TYPE STRING,
WGCT TYPE STRING,
WGDC TYPE STRING,
WGDE TYPE STRING,
WGFL TYPE STRING,
WGGA TYPE STRING,
WGHI TYPE STRING,
WGIA TYPE STRING,
WGID TYPE STRING,
WGIL TYPE STRING,
WGIN TYPE STRING,
WGKS TYPE STRING,
WGKY TYPE STRING,
WGLA TYPE STRING,
WGMA TYPE STRING,
WGMD TYPE STRING,
WGME TYPE STRING,
WGMI TYPE STRING,
WGMN TYPE STRING,
WGMO TYPE STRING,
WGMS TYPE STRING,
WGMT TYPE STRING,
WGNC TYPE STRING,
WGND TYPE STRING,
WGNE TYPE STRING,
WGNH TYPE STRING,
WGNJ TYPE STRING,
WGNM TYPE STRING,
WGNV TYPE STRING,
WGNY TYPE STRING,
WGOH TYPE STRING,
WGOK TYPE STRING,
WGOR TYPE STRING,
WGPA TYPE STRING,
WGPR TYPE STRING,
WGRI TYPE STRING,
WGSC TYPE STRING,
WGSD TYPE STRING,
WGTN TYPE STRING,
WGTX TYPE STRING,
WGUT TYPE STRING,
WGVA TYPE STRING,
WGVI TYPE STRING,
WGVT TYPE STRING,
WGWA TYPE STRING,
WGWI TYPE STRING,
WGWV TYPE STRING,
WGWY TYPE STRING,END OF T_EKKO_STR. DATA: WA_P10_SHR_F_940_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_P10_SHR_F_940_STR-P2_LINE_3 sy-vline
WA_P10_SHR_F_940_STR-T5UTL_TXCMP sy-vline
WA_P10_SHR_F_940_STR-T5UTL_LTEXT sy-vline
WA_P10_SHR_F_940_STR-T5UTL_STRAS sy-vline
WA_P10_SHR_F_940_STR-T5UTL_ORT01 sy-vline
WA_P10_SHR_F_940_STR-T5UTL_STATE sy-vline
WA_P10_SHR_F_940_STR-T5UTL_ZIPCD sy-vline
WA_P10_SHR_F_940_STR-T5UTL_TELNR sy-vline
WA_P10_SHR_F_940_STR-P0002_NACHN sy-vline
WA_P10_SHR_F_940_STR-P0002_PERID sy-vline
WA_P10_SHR_F_940_STR-P0002_PERNR sy-vline
WA_P10_SHR_F_940_STR-P0002_VORNA sy-vline
WA_P10_SHR_F_940_STR-P0002_FNAMK sy-vline
WA_P10_SHR_F_940_STR-P0002_MIDNM sy-vline
WA_P10_SHR_F_940_STR-P0002_NAME2 sy-vline
WA_P10_SHR_F_940_STR-P0002_NAMZU sy-vline
WA_P10_SHR_F_940_STR-P0006_LAND1 sy-vline
WA_P10_SHR_F_940_STR-P0006_LOCAT sy-vline
WA_P10_SHR_F_940_STR-P0006_ORT01 sy-vline
WA_P10_SHR_F_940_STR-P0006_PSTLZ sy-vline
WA_P10_SHR_F_940_STR-P0006_STATE sy-vline
WA_P10_SHR_F_940_STR-P0006_STRAS sy-vline
WA_P10_SHR_F_940_STR-CURKY sy-vline
WA_P10_SHR_F_940_STR-T005T_LANDX sy-vline
WA_P10_SHR_F_940_STR-CRAK sy-vline
WA_P10_SHR_F_940_STR-CRAL sy-vline
WA_P10_SHR_F_940_STR-CRAR sy-vline
WA_P10_SHR_F_940_STR-CRAZ sy-vline
WA_P10_SHR_F_940_STR-CRCA sy-vline
WA_P10_SHR_F_940_STR-CRCO sy-vline
WA_P10_SHR_F_940_STR-CRCT sy-vline
WA_P10_SHR_F_940_STR-CRDC sy-vline
WA_P10_SHR_F_940_STR-CRDE sy-vline
WA_P10_SHR_F_940_STR-CRFL sy-vline
WA_P10_SHR_F_940_STR-CRGA sy-vline
WA_P10_SHR_F_940_STR-CRHI sy-vline
WA_P10_SHR_F_940_STR-CRIA sy-vline
WA_P10_SHR_F_940_STR-CRID sy-vline
WA_P10_SHR_F_940_STR-CRIL sy-vline
WA_P10_SHR_F_940_STR-CRIN sy-vline
WA_P10_SHR_F_940_STR-CRKS sy-vline
WA_P10_SHR_F_940_STR-CRKY sy-vline
WA_P10_SHR_F_940_STR-CRLA sy-vline
WA_P10_SHR_F_940_STR-CRMA sy-vline
WA_P10_SHR_F_940_STR-CRMD sy-vline
WA_P10_SHR_F_940_STR-CRME sy-vline
WA_P10_SHR_F_940_STR-CRMI sy-vline
WA_P10_SHR_F_940_STR-CRMN sy-vline
WA_P10_SHR_F_940_STR-CRMO sy-vline
WA_P10_SHR_F_940_STR-CRMS sy-vline
WA_P10_SHR_F_940_STR-CRMT sy-vline
WA_P10_SHR_F_940_STR-CRNC sy-vline
WA_P10_SHR_F_940_STR-CRND sy-vline
WA_P10_SHR_F_940_STR-CRNE sy-vline
WA_P10_SHR_F_940_STR-CRNH sy-vline
WA_P10_SHR_F_940_STR-CRNJ sy-vline
WA_P10_SHR_F_940_STR-CRNM sy-vline
WA_P10_SHR_F_940_STR-CRNV sy-vline
WA_P10_SHR_F_940_STR-CRNY sy-vline
WA_P10_SHR_F_940_STR-CROH sy-vline
WA_P10_SHR_F_940_STR-CROK sy-vline
WA_P10_SHR_F_940_STR-CROR sy-vline
WA_P10_SHR_F_940_STR-CRPA sy-vline
WA_P10_SHR_F_940_STR-CRPR sy-vline
WA_P10_SHR_F_940_STR-CRRI sy-vline
WA_P10_SHR_F_940_STR-CRSC sy-vline
WA_P10_SHR_F_940_STR-CRSD sy-vline
WA_P10_SHR_F_940_STR-CRTN sy-vline
WA_P10_SHR_F_940_STR-CRTX sy-vline
WA_P10_SHR_F_940_STR-CRUT sy-vline
WA_P10_SHR_F_940_STR-CRVA sy-vline
WA_P10_SHR_F_940_STR-CRVI sy-vline
WA_P10_SHR_F_940_STR-CRVT sy-vline
WA_P10_SHR_F_940_STR-CRWA sy-vline
WA_P10_SHR_F_940_STR-CRWI sy-vline
WA_P10_SHR_F_940_STR-CRWV sy-vline
WA_P10_SHR_F_940_STR-CRWY sy-vline
WA_P10_SHR_F_940_STR-DDAY sy-vline
WA_P10_SHR_F_940_STR-DMON sy-vline
WA_P10_SHR_F_940_STR-DYEA sy-vline
WA_P10_SHR_F_940_STR-F001 sy-vline
WA_P10_SHR_F_940_STR-F002 sy-vline
WA_P10_SHR_F_940_STR-F003 sy-vline
WA_P10_SHR_F_940_STR-F004 sy-vline
WA_P10_SHR_F_940_STR-F005 sy-vline
WA_P10_SHR_F_940_STR-F007 sy-vline
WA_P10_SHR_F_940_STR-F009 sy-vline
WA_P10_SHR_F_940_STR-F3AH sy-vline
WA_P10_SHR_F_940_STR-F3AI sy-vline
WA_P10_SHR_F_940_STR-FCW1 sy-vline
WA_P10_SHR_F_940_STR-FCW2 sy-vline
WA_P10_SHR_F_940_STR-FFEN sy-vline
WA_P10_SHR_F_940_STR-FP21 sy-vline
WA_P10_SHR_F_940_STR-FP26 sy-vline
WA_P10_SHR_F_940_STR-FP27 sy-vline
WA_P10_SHR_F_940_STR-FP28 sy-vline
WA_P10_SHR_F_940_STR-FP29 sy-vline
WA_P10_SHR_F_940_STR-FT3B sy-vline
WA_P10_SHR_F_940_STR-FWS1 sy-vline
WA_P10_SHR_F_940_STR-FWS2 sy-vline
WA_P10_SHR_F_940_STR-INCR sy-vline
WA_P10_SHR_F_940_STR-INWG sy-vline
WA_P10_SHR_F_940_STR-L310 sy-vline
WA_P10_SHR_F_940_STR-MICR sy-vline
WA_P10_SHR_F_940_STR-MIWG sy-vline
WA_P10_SHR_F_940_STR-RRAK sy-vline
WA_P10_SHR_F_940_STR-RRAL sy-vline
WA_P10_SHR_F_940_STR-RRAR sy-vline
WA_P10_SHR_F_940_STR-RRAZ sy-vline
WA_P10_SHR_F_940_STR-RRCA sy-vline
WA_P10_SHR_F_940_STR-RRCO sy-vline
WA_P10_SHR_F_940_STR-RRCT sy-vline
WA_P10_SHR_F_940_STR-RRDC sy-vline
WA_P10_SHR_F_940_STR-RRDE sy-vline
WA_P10_SHR_F_940_STR-RRFL sy-vline
WA_P10_SHR_F_940_STR-RRGA sy-vline
WA_P10_SHR_F_940_STR-RRHI sy-vline
WA_P10_SHR_F_940_STR-RRIA sy-vline
WA_P10_SHR_F_940_STR-RRID sy-vline
WA_P10_SHR_F_940_STR-RRIL sy-vline
WA_P10_SHR_F_940_STR-RRIN sy-vline
WA_P10_SHR_F_940_STR-RRKS sy-vline
WA_P10_SHR_F_940_STR-RRKY sy-vline
WA_P10_SHR_F_940_STR-RRLA sy-vline
WA_P10_SHR_F_940_STR-RRMA sy-vline
WA_P10_SHR_F_940_STR-RRMD sy-vline
WA_P10_SHR_F_940_STR-RRME sy-vline
WA_P10_SHR_F_940_STR-RRMI sy-vline
WA_P10_SHR_F_940_STR-RRMN sy-vline
WA_P10_SHR_F_940_STR-RRMO sy-vline
WA_P10_SHR_F_940_STR-RRMS sy-vline
WA_P10_SHR_F_940_STR-RRMT sy-vline
WA_P10_SHR_F_940_STR-RRNC sy-vline
WA_P10_SHR_F_940_STR-RRND sy-vline
WA_P10_SHR_F_940_STR-RRNE sy-vline
WA_P10_SHR_F_940_STR-RRNH sy-vline
WA_P10_SHR_F_940_STR-RRNJ sy-vline
WA_P10_SHR_F_940_STR-RRNM sy-vline
WA_P10_SHR_F_940_STR-RRNV sy-vline
WA_P10_SHR_F_940_STR-RRNY sy-vline
WA_P10_SHR_F_940_STR-RROH sy-vline
WA_P10_SHR_F_940_STR-RROK sy-vline
WA_P10_SHR_F_940_STR-RROR sy-vline
WA_P10_SHR_F_940_STR-RRPA sy-vline
WA_P10_SHR_F_940_STR-RRPR sy-vline
WA_P10_SHR_F_940_STR-RRRI sy-vline
WA_P10_SHR_F_940_STR-RRSC sy-vline
WA_P10_SHR_F_940_STR-RRSD sy-vline
WA_P10_SHR_F_940_STR-RRTN sy-vline
WA_P10_SHR_F_940_STR-RRTX sy-vline
WA_P10_SHR_F_940_STR-RRUT sy-vline
WA_P10_SHR_F_940_STR-RRVA sy-vline
WA_P10_SHR_F_940_STR-RRVI sy-vline
WA_P10_SHR_F_940_STR-RRVT sy-vline
WA_P10_SHR_F_940_STR-RRWA sy-vline
WA_P10_SHR_F_940_STR-RRWI sy-vline
WA_P10_SHR_F_940_STR-RRWV sy-vline
WA_P10_SHR_F_940_STR-RRWY sy-vline
WA_P10_SHR_F_940_STR-SCCR sy-vline
WA_P10_SHR_F_940_STR-SCWG sy-vline
WA_P10_SHR_F_940_STR-T000 sy-vline
WA_P10_SHR_F_940_STR-TOCR sy-vline
WA_P10_SHR_F_940_STR-U001 sy-vline
WA_P10_SHR_F_940_STR-U002 sy-vline
WA_P10_SHR_F_940_STR-U003 sy-vline
WA_P10_SHR_F_940_STR-U004 sy-vline
WA_P10_SHR_F_940_STR-U005 sy-vline
WA_P10_SHR_F_940_STR-WGAK sy-vline
WA_P10_SHR_F_940_STR-WGAL sy-vline
WA_P10_SHR_F_940_STR-WGAR sy-vline
WA_P10_SHR_F_940_STR-WGAZ sy-vline
WA_P10_SHR_F_940_STR-WGCA sy-vline
WA_P10_SHR_F_940_STR-WGCO sy-vline
WA_P10_SHR_F_940_STR-WGCT sy-vline
WA_P10_SHR_F_940_STR-WGDC sy-vline
WA_P10_SHR_F_940_STR-WGDE sy-vline
WA_P10_SHR_F_940_STR-WGFL sy-vline
WA_P10_SHR_F_940_STR-WGGA sy-vline
WA_P10_SHR_F_940_STR-WGHI sy-vline
WA_P10_SHR_F_940_STR-WGIA sy-vline
WA_P10_SHR_F_940_STR-WGID sy-vline
WA_P10_SHR_F_940_STR-WGIL sy-vline
WA_P10_SHR_F_940_STR-WGIN sy-vline
WA_P10_SHR_F_940_STR-WGKS sy-vline
WA_P10_SHR_F_940_STR-WGKY sy-vline
WA_P10_SHR_F_940_STR-WGLA sy-vline
WA_P10_SHR_F_940_STR-WGMA sy-vline
WA_P10_SHR_F_940_STR-WGMD sy-vline
WA_P10_SHR_F_940_STR-WGME sy-vline
WA_P10_SHR_F_940_STR-WGMI sy-vline
WA_P10_SHR_F_940_STR-WGMN sy-vline
WA_P10_SHR_F_940_STR-WGMO sy-vline
WA_P10_SHR_F_940_STR-WGMS sy-vline
WA_P10_SHR_F_940_STR-WGMT sy-vline
WA_P10_SHR_F_940_STR-WGNC sy-vline
WA_P10_SHR_F_940_STR-WGND sy-vline
WA_P10_SHR_F_940_STR-WGNE sy-vline
WA_P10_SHR_F_940_STR-WGNH sy-vline
WA_P10_SHR_F_940_STR-WGNJ sy-vline
WA_P10_SHR_F_940_STR-WGNM sy-vline
WA_P10_SHR_F_940_STR-WGNV sy-vline
WA_P10_SHR_F_940_STR-WGNY sy-vline
WA_P10_SHR_F_940_STR-WGOH sy-vline
WA_P10_SHR_F_940_STR-WGOK sy-vline
WA_P10_SHR_F_940_STR-WGOR sy-vline
WA_P10_SHR_F_940_STR-WGPA sy-vline
WA_P10_SHR_F_940_STR-WGPR sy-vline
WA_P10_SHR_F_940_STR-WGRI sy-vline
WA_P10_SHR_F_940_STR-WGSC sy-vline
WA_P10_SHR_F_940_STR-WGSD sy-vline
WA_P10_SHR_F_940_STR-WGTN sy-vline
WA_P10_SHR_F_940_STR-WGTX sy-vline
WA_P10_SHR_F_940_STR-WGUT sy-vline
WA_P10_SHR_F_940_STR-WGVA sy-vline
WA_P10_SHR_F_940_STR-WGVI sy-vline
WA_P10_SHR_F_940_STR-WGVT sy-vline
WA_P10_SHR_F_940_STR-WGWA sy-vline
WA_P10_SHR_F_940_STR-WGWI sy-vline
WA_P10_SHR_F_940_STR-WGWV sy-vline
WA_P10_SHR_F_940_STR-WGWY sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.