ABAP Select data from SAP table PIQCORR_STRU_CMS2_EVENT into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP PIQCORR_STRU_CMS2_EVENT 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 PIQCORR_STRU_CMS2_EVENT. 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 PIQCORR_STRU_CMS2_EVENT 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_PIQCORR_STRU_CMS2_EVENT TYPE STANDARD TABLE OF PIQCORR_STRU_CMS2_EVENT,
      WA_PIQCORR_STRU_CMS2_EVENT TYPE PIQCORR_STRU_CMS2_EVENT,
      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: <PIQCORR_STRU_CMS2_EVENT> TYPE PIQCORR_STRU_CMS2_EVENT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PIQCORR_STRU_CMS2_EVENT
*  INTO TABLE @DATA(IT_PIQCORR_STRU_CMS2_EVENT2).
*--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_PIQCORR_STRU_CMS2_EVENT INDEX 1 INTO DATA(WA_PIQCORR_STRU_CMS2_EVENT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PIQCORR_STRU_CMS2_EVENT ASSIGNING <PIQCORR_STRU_CMS2_EVENT>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PIQCORR_STRU_CMS2_EVENT>-WA_EVENT = 1.
<PIQCORR_STRU_CMS2_EVENT>-OTYPE = 1.
<PIQCORR_STRU_CMS2_EVENT>-OBJID = 1.
<PIQCORR_STRU_CMS2_EVENT>-SHORT = 1.
<PIQCORR_STRU_CMS2_EVENT>-STEXT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PIQCORR_STRU_CMS2_EVENT-BEGDA, sy-vline,
  WA_PIQCORR_STRU_CMS2_EVENT-ENDDA, sy-vline,
  WA_PIQCORR_STRU_CMS2_EVENT-WA_E_INFO, sy-vline,
  WA_PIQCORR_STRU_CMS2_EVENT-MANDT, sy-vline,
  WA_PIQCORR_STRU_CMS2_EVENT-PLVAR, sy-vline,
  WA_PIQCORR_STRU_CMS2_EVENT-OTYPE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PIQCORR_STRU_CMS2_EVENT 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_PIQCORR_STRU_CMS2_EVENT 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_PIQCORR_STRU_CMS2_EVENT INTO WA_PIQCORR_STRU_CMS2_EVENT.


*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
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_PIQCORR_STRU_CMS2_EVENT-LANGU
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PIQCORR_STRU_CMS2_EVENT-LANGU.
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_PIQCORR_STRU_CMS2_EVENT_STR, 
WA_EVENT TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SHORT TYPE STRING,
STEXT TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
WA_E_INFO TYPE STRING,
MANDT TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SUBTY TYPE STRING,
ISTAT TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
VARYF TYPE STRING,
SEQNR TYPE STRING,
LANGU TYPE STRING,
LOCKM TYPE STRING,
DELET TYPE STRING,
EXTRN TYPE STRING,
TEILX TYPE STRING,
CANCR TYPE STRING,
BCONT TYPE STRING,
WCONT TYPE STRING,
NCONT TYPE STRING,
UPDAX TYPE STRING,
FLUPX TYPE STRING,
COND1 TYPE STRING,
COND2 TYPE STRING,
CUBOE TYPE STRING,
TZONE TYPE STRING,
WA_E_CAP TYPE STRING,
MANDT TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SUBTY TYPE STRING,
ISTAT TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
VARYF TYPE STRING,
SEQNR TYPE STRING,
KAPZ1 TYPE STRING,
KAPZ2 TYPE STRING,
KAPZ3 TYPE STRING,
WA_E_CAMPREL TYPE STRING,
MANDT TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SUBTY TYPE STRING,
ISTAT TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
VARYF TYPE STRING,
SEQNR TYPE STRING,
RSIGN TYPE STRING,
RELAT TYPE STRING,
SCLAS TYPE STRING,
SOBID TYPE STRING,
REL_OBJ_SHORT TYPE STRING,
REL_OBJ_STEXT TYPE STRING,
ADATA TYPE STRING,
WA_E_RESOU TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
RESTP TYPE STRING,
RESID TYPE STRING,
RESHT TYPE STRING,
RESXT TYPE STRING,
RESBG TYPE STRING,
RESED TYPE STRING,
BEGUZ TYPE STRING,
ENDUZ TYPE STRING,
RETID TYPE STRING,
RETXT TYPE STRING,
REKNZ TYPE STRING,
WA_E_SCHED TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
EVDAT TYPE STRING,
BEGUZ TYPE STRING,
ENDUZ TYPE STRING,
DAYTXT TYPE STRING,
NODAY TYPE STRING,
NDAYS TYPE STRING,
NHOURS TYPE STRING,
GSCHED TYPE STRING,
WA_E_WEBLINK TYPE STRING,
MANDT TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SUBTY TYPE STRING,
ISTAT TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
VARYF TYPE STRING,
SEQNR TYPE STRING,
LINKTXT TYPE STRING,
URL TYPE STRING,
WA_E_WORKLOAD TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
ISTAT TYPE STRING,
HISTO TYPE STRING,
SHORT TYPE STRING,
STEXT TYPE STRING,
REALO TYPE STRING,
SEQNR TYPE STRING,
WLACTIVITY TYPE STRING,
EXPENDITURE TYPE STRING,
EXP_UNIT TYPE STRING,
EXPENDITUREFWL TYPE STRING,
OTYPEFWL TYPE STRING,
OBJIDFWL TYPE STRING,
OTEXTFWL TYPE STRING,
SHORTFWL TYPE STRING,
PERSONFWL TYPE STRING,
BEGDAFWL TYPE STRING,
ENDDAFWL TYPE STRING,
ISTATFWL TYPE STRING,
PRIOXFWL TYPE STRING,
WA_E_SCHE_PAR TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SCHEDCATEG TYPE STRING,
PLPERLIMBEG TYPE STRING,
PLPERLIMBEGU TYPE STRING,
PLPERLIMEND TYPE STRING,
PLPERLIMENDU TYPE STRING,
SCHEDBGDAY TYPE STRING,
SCHEDCATEGTXT TYPE STRING,
PLPERLIMBEGUTXT TYPE STRING,
PLPERLIMENDUTXT TYPE STRING,
SCHEDBGDAYTXT TYPE STRING,
WA_E_PROCSTAT TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
EVPROCSTAT TYPE STRING,
EVPROCSTATTXT TYPE STRING,
WA_E_RESP_EL TYPE STRING,
MANDT TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
SUBTY TYPE STRING,
ISTAT TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
VARYF TYPE STRING,
SEQNR TYPE STRING,
RSIGN TYPE STRING,
RELAT TYPE STRING,
SCLAS TYPE STRING,
SOBID TYPE STRING,
REL_OBJ_SHORT TYPE STRING,
REL_OBJ_STEXT TYPE STRING,
ADATA TYPE STRING,
T_E_DESC TYPE STRING,
T_E_ROOM_AD TYPE STRING,
T_E_ROOM_CAP TYPE STRING,
T_E_SCHED_EL TYPE STRING,
T_EVENT_TYPE TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PIQCORR_STRU_CMS2_EVENT_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_PIQCORR_STRU_CMS2_EVENT_STR-WA_EVENT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SHORT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-STEXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_INFO sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-MANDT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SUBTY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ISTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-VARYF sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SEQNR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-LANGU sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-LOCKM sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-DELET sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-EXTRN sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-TEILX sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-CANCR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BCONT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WCONT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-NCONT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-UPDAX sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-FLUPX sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-COND1 sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-COND2 sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-CUBOE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-TZONE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_CAP sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-MANDT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SUBTY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ISTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-VARYF sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SEQNR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-KAPZ1 sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-KAPZ2 sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-KAPZ3 sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_CAMPREL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-MANDT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SUBTY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ISTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-VARYF sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SEQNR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RSIGN sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RELAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SCLAS sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SOBID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-REL_OBJ_SHORT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-REL_OBJ_STEXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ADATA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_RESOU sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RESTP sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RESID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RESHT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RESXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RESBG sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RESED sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGUZ sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDUZ sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RETID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RETXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-REKNZ sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_SCHED sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-EVDAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGUZ sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDUZ sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-DAYTXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-NODAY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-NDAYS sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-NHOURS sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-GSCHED sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_WEBLINK sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-MANDT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SUBTY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ISTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-VARYF sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SEQNR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-LINKTXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-URL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_WORKLOAD sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ISTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-HISTO sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SHORT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-STEXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-REALO sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SEQNR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WLACTIVITY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-EXPENDITURE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-EXP_UNIT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-EXPENDITUREFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPEFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJIDFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTEXTFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SHORTFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PERSONFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDAFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDAFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ISTATFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PRIOXFWL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_SCHE_PAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SCHEDCATEG sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLPERLIMBEG sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLPERLIMBEGU sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLPERLIMEND sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLPERLIMENDU sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SCHEDBGDAY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SCHEDCATEGTXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLPERLIMBEGUTXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLPERLIMENDUTXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SCHEDBGDAYTXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_PROCSTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-EVPROCSTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-EVPROCSTATTXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-WA_E_RESP_EL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-MANDT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-PLVAR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OTYPE sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-OBJID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SUBTY sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ISTAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-BEGDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ENDDA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-VARYF sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SEQNR sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RSIGN sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-RELAT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SCLAS sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-SOBID sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-REL_OBJ_SHORT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-REL_OBJ_STEXT sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-ADATA sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-T_E_DESC sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-T_E_ROOM_AD sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-T_E_ROOM_CAP sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-T_E_SCHED_EL sy-vline 
WA_PIQCORR_STRU_CMS2_EVENT_STR-T_EVENT_TYPE sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.