RHSEMI60 SAP ABAP Report - Business Event Information
RHSEMI60 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Detailed Information About Business Event Dates This report lets you display detailed information stored for business event dates such as event location, instructor, room, telephone number of room, event owner, availability of places on the event, or duration of the event...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter RHSEMI60 into the relevant SAP transactions such as SE38 or SE80
ABAP code to call this SAP report using the submit statement
This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.
SUBMIT RHSEMI60. "Basic submit
SUBMIT RHSEMI60 AND RETURN. "Return to original report after report execution complete
SUBMIT RHSEMI60 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Business Event Information
Text Symbol: S28 = Not locked
Text Symbol: S27 = All
Text Symbol: S26 = Canceled only
Text Symbol: S25 = Not canceled
Text Symbol: S24 = All
Text Symbol: S23 = Hist. record only
Text Symbol: S22 = No historical record
Text Symbol: S21 = All
Text Symbol: S01 = Output
Text Symbol: P05 = Importing event owners ...
Text Symbol: P04 = Importing event locations ...
Text Symbol: P03 = Importing instructors and rooms ...
Text Symbol: P02 = Importing business event schedule ...
Text Symbol: P01 = Importing business event data ...
Text Symbol: P00 = Processing ...
Text Symbol: S29 = Locked only
Text Symbol: SPN = Selection period
Text Symbol: S42 = Followed up only
Text Symbol: S41 = Not followed up
Text Symbol: S40 = All
Text Symbol: S39 = External only
Text Symbol: S38 = Internal only
Text Symbol: S37 = All
Text Symbol: S36 = Reserved only
Text Symbol: S35 = Available only
Text Symbol: S34 = All
Text Symbol: S33 = Planned only
Text Symbol: S32 = Firmly booked only
Text Symbol: S31 = All
INCLUDES used within this REPORT RHSEMI60
INCLUDE: RHALVINC.
INCLUDE: RHREPTOP.
INCLUDE: RHODAT00.
INCLUDE: RHRDAT10.
TABLES used within REPORT and the associated SELECT statement:
No SAP DATABASE tables are accessed within this REPORT code!
Function Modules used within report and the associated call statement:
RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * ISTAT = ' ' extend = 'X' subty = $specb * BEGDA = LOW_DATE * ENDDA = HIGH_DATE * CONDITION = '00000' sort = ' ' with_ev = ' ' adata = ' ' TABLES i1001 = x1001 objects = room_type EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING "PERCENTAGE = 0 text = txt EXCEPTIONS OTHERS = 1.
RH_CONDITION_BUILD CALL FUNCTION 'RH_CONDITION_BUILD' EXPORTING infty = '1026' IMPORTING condition = red_cond TABLES condtab = red_condtab EXCEPTIONS OTHERS = 0.
RH_READ_INFTY CALL FUNCTION 'RH_READ_INFTY' EXPORTING authority = space condition = red_cond infty = '1026' extend = 'D' TABLES innnn = red_i1026 objects = objects_tab EXCEPTIONS OTHERS = 0.
RH_CONDITION_DELETE CALL FUNCTION 'RH_CONDITION_DELETE' EXPORTING condition = red_cond.
RH_EVENT_DATA_READ CALL FUNCTION 'RH_EVENT_DATA_READ' EXPORTING plvar = red_i1026-plvar eotyp = red_i1026-otype eveid = red_i1026-objid * LOCKM = FLAG_LOCKM * HISTO = FLAG_HISTO * DELET = FLAG_DELET IMPORTING event_data = read_evdat_tab EXCEPTIONS no_type_assigned = 1 OTHERS = 2.
RH_READ_EVENT_SCHEDULE CALL FUNCTION 'RH_READ_EVENT_SCHEDULE' TABLES eventlist = objects_tab schedule_tab = sched_tab EXCEPTIONS nothing_found = 0 OTHERS = 0.
RH_TEXT_BUFFER_FILL CALL FUNCTION 'RH_TEXT_BUFFER_FILL' EXPORTING check_stru_auth = ' ' "is checked by RH_READ_OBJECT TABLES objects = objects_loc "WITH_EXTINT = ' ' EXCEPTIONS OTHERS = 1.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = objects_loc-plvar otype = objects_loc-otype objid = objects_loc-objid * BEGDA = SY-DATUM * ENDDA = SY-DATUM * LANGU = SY-LANGU * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' IMPORTING short = loc_tab-short stext = loc_tab-stext EXCEPTIONS not_found = 0 OTHERS = 0.
RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING AUTHORITY = 'DISP' WITH_STRU_AUTH = 'X' ISTAT = ' ' EXTEND = 'X' SUBTY = $RESPA BEGDA = '19000101' ENDDA = '99991231' CONDITION = '00000' SORT = ' ' WITH_EV = ' ' ADATA = ' ' TABLES I1001 = I1001 OBJECTS = evtypes_tab EXCEPTIONS NOTHING_FOUND = 1 WRONG_CONDITION = 2 OTHERS = 3.
RH_TEXT_BUFFER_FILL_EXTERNAL CALL FUNCTION 'RH_TEXT_BUFFER_FILL_EXTERNAL' EXPORTING CHECK_STRU_AUTH = ' ' "is checked by RH_READ_OBJECT TABLES OBJECTS = RESPO EXCEPTIONS OTHERS = 1.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING PLVAR = RESPO-PLVAR OTYPE = RESPO-OTYPE REALO = RESPO-SOBID IMPORTING SHORT = RESP_TAB-SHORT STEXT = RESP_TAB-STEXT EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.
RH_CONDITION_BUILD CALL FUNCTION 'RH_CONDITION_BUILD' EXPORTING infty = '1001' IMPORTING condition = condi_id TABLES condtab = condi_tab EXCEPTIONS empty_condtab = 1 no_db_field = 2 unknown_infty_db = 3 wrong_condition = 4 unknown_pad_db = 5 OTHERS = 6.
RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING authority = 'DISP' with_stru_auth = ' ' "allready checked! extend = 'D' condition = condi_id sort = ' ' * WITH_EV = ' ' adata = 'X' "Res.typ Referent ?
RH_CONDITION_DELETE CALL FUNCTION 'RH_CONDITION_DELETE' EXPORTING condition = condi_id EXCEPTIONS OTHERS = 1.
RH_READ_INFTY_NNNN CALL FUNCTION 'RH_READ_INFTY_NNNN' EXPORTING infty = '1023' extend = ' ' sort = 'X' "must be sorted! TABLES innnn = i1023 objects = resty_obj EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3.
RH_TEXT_BUFFER_FILL_EXTERNAL CALL FUNCTION 'RH_TEXT_BUFFER_FILL_EXTERNAL' EXPORTING check_stru_auth = ' ' "is checked by RH_READ_OBJECT TABLES objects = train_obj EXCEPTIONS OTHERS = 1.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = rooms_obj-plvar otype = rooms_obj-otype objid = rooms_obj-objid check_stru_auth = 'X' IMPORTING stext = room_tab-name short = room_tab-short EXCEPTIONS not_found = 1 OTHERS = 2.
CALL FUNCTION 'RH_GET_ADDRESS' EXPORTING begda = '19000101' endda = '99991231' * ISTAT = ' ' objid = rooms_obj-objid otype = rooms_obj-otype plvar = rooms_obj-plvar * SUBTY = ' ' TABLES address = i1028 EXCEPTIONS OTHERS = 1.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = train_obj-plvar otype = train_obj-otype realo = train_obj-sobid check_stru_auth = 'X' IMPORTING stext = ref_tab-name short = ref_tab-short EXCEPTIONS not_found = 1 OTHERS = 2.
RH_GET_COMPANY * CALL FUNCTION 'RH_GET_COMPANY' * EXPORTING * BEGDA = SY-DATUM * ENDDA = SY-DATUM * SORT = 'X' * TABLES * OBJECTS = org_assign * COMPANY_TAB = comptab * EXCEPTIONS * NOTHING_FOUND = 1 * NO_PARTICIPANT = 2 * NO_SINGLE_PART = 3 * NO_ORWAY_IN_T77R3 = 4 * OTHERS = 5.
RH_GET_COMPANY CALL FUNCTION 'RH_GET_COMPANY' EXPORTING BEGDA = evdat_tab-ebegd ENDDA = evdat_tab-ebegd SORT = 'X' TABLES objects = org_assign company_tab = comptab EXCEPTIONS NOTHING_FOUND = 1 NO_PARTICIPANT = 2 NO_SINGLE_PART = 3 NO_ORWAY_IN_T77R3 = 4 OTHERS = 5.
Contribute (Add Comments)
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.
This will then be available for everyone to easily find by simply searching on the report name RHSEMI60 or its description.