RHKURS00 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.
If you would like to execute this report or see the full code listing simply enter RHKURS00 into the relevant SAP transactions such as SE38 or SE80
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.
Selection Text: COND1 = Period containing no days off
Selection Text: COND2 = Include start day
Selection Text: ETSRK = Business event type
Selection Text: EVLNG = Business event language
Selection Text: EVLOC = Business event location
Selection Text: EVSTAT = Status
Selection Text: EVTID = Business event
Selection Text: PEBEG = Start date
Selection Text: PEEND = End date
Selection Text: PLVAR = Plan version
Selection Text: SUBTY = Schedule model
Title: Plan Business Event
Text Symbol: COM = Schedule model
Text Symbol: MD1 = Online
Text Symbol: MD2 = Background
Text Symbol: ORT = Location
Text Symbol: T01 = Business event data
Text Symbol: T02 = Planning period
Text Symbol: T03 = Conditions
Text Symbol: T04 = Execution mode
Text Symbol: VTP = Business event type
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
RH_EVENT_DISPO CALL FUNCTION 'RH_EVENT_DISPO' EXPORTING PLVAR = PLVAR ETYID = ETYID EVTID = EVTID PEBEG = PEBEG PEEND = PEEND EVFIX = $EVFIX LANGU = EVLNG ORTID = LOCID NUMEX = $NUMEX COND1 = COND1 COND2 = COND2 MODE = $MODE TABLES SCHED_TAB = DISP_SCHEDULE.
RH_EXIST_OBJECT CALL FUNCTION 'RH_EXIST_OBJECT' EXPORTING PLVAR = PLVAR OTYPE = $KURS OBJID = EVTID * REALO = ' ' IMPORTING EXTERNAL_OBJECT = DUMMY_SORT EXCEPTIONS NOT_FOUND = 1 OTHERS = 2.
RH_OBJID_REQUEST CALL FUNCTION 'RH_OBJID_REQUEST' EXPORTING * MODE = 'X' PLVAR = PLVAR OTYPE = $KURST SEARK = ETSRK DYNPRO_REPID = REPID DYNPRO_DYNNR = DYNNR IMPORTING SEL_OBJECT = RHKURS EXCEPTIONS CANCELLED = 1 WRONG_CONDITION = 2 NOTHING_FOUND = 3 ILLEGAL_MODE = 4 INTERNAL_ERROR = 5 OTHERS = 6.
RH_OBJID_REQUEST CALL FUNCTION 'RH_OBJID_REQUEST' EXPORTING * MODE = 'X' PLVAR = PLVAR OTYPE = $KURSO SEARK = EVLOC DYNPRO_REPID = REPID DYNPRO_DYNNR = DYNNR IMPORTING SEL_OBJECT = RHKURS EXCEPTIONS CANCELLED = 1 WRONG_CONDITION = 2 NOTHING_FOUND = 3 ILLEGAL_MODE = 4 INTERNAL_ERROR = 5 OTHERS = 6.
F4IF_INT_TABLE_VALUE_REQUEST CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST' EXPORTING * DDIC_STRUCTURE = ' ' retfield = 'ISTAT' * PVALKEY = ' ' DYNPPROG = 'RHKURS00' DYNPNR = '1000' DYNPROFIELD = 'EVSTAT' * STEPL = 0 * WINDOW_TITLE = * VALUE = ' ' value_org = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' TABLES value_tab = value_tab field_tab = field_tab * RETURN_TAB = * DYNPFLD_MAPPING = EXCEPTIONS parameter_error = 1 no_values_found = 2 OTHERS = 3.
RH_PICK_EVENTTYPE_SCHEDULE CALL FUNCTION 'RH_PICK_EVENTTYPE_SCHEDULE' EXPORTING PLVAR = PLVAR OTYPE = $KURST OBJID = ETYID BEGDA = PEBEG ENDDA = PEEND READ_EVETYP_TEXT = 'X' FCODE = 'PICK' TABLES DISP_SCHEDULE = DISP_SCHEDULE EXCEPTIONS NO_OBJECT_TEXT = 1 NOTHING_FOUND = 2 OTHERS = 3.
RH_OWN_SCHEDULE CALL FUNCTION 'RH_OWN_SCHEDULE' EXPORTING PLVAR = PLVAR OTYPE = $KURST OBJID = ETYID ISTAT = '1' TABLES OWN_DISP_SCHED = DISP_SCHEDULE EXCEPTIONS OTHERS = 1.
RHVM_USET_GET_MENUE CALL FUNCTION 'RHVM_USET_GET_MENUE' "XMK USET EXPORTING MENUE_TYPE = 'P' IMPORTING BEGDA = PEBEG ENDDA = PEEND FILTER_LANGU = EVLNG EXCEPTIONS OTHERS = 0.
RH_POPUP_DISP_SCHED CALL FUNCTION 'RH_POPUP_DISP_SCHED' EXPORTING CUCOL = 10 CUROW = 10 CALCULATE_TOTALS = 'B' TABLES DISP_SCHEDULE = DISP_SCHEDULE.
RH_PICK_EVENTTYPE_SCHEDULE CALL FUNCTION 'RH_PICK_EVENTTYPE_SCHEDULE' EXPORTING PLVAR = PLVAR OTYPE = $KURST OBJID = ETYID BEGDA = PEBEG ENDDA = PEEND READ_EVETYP_TEXT = 'X' FCODE = 'PICK' TABLES DISP_SCHEDULE = DISP_SCHEDULE EXCEPTIONS NO_OBJECT_TEXT = 1 NOTHING_FOUND = 2 OTHERS = 3.
RH_OWN_SCHEDULE CALL FUNCTION 'RH_OWN_SCHEDULE' EXPORTING PLVAR = PLVAR OTYPE = $KURST OBJID = ETYID ISTAT = '1' TABLES OWN_DISP_SCHED = DISP_SCHEDULE EXCEPTIONS OTHERS = 1.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING BEGDA = CE_PEBEG ENDDA = CE_PEEND ISTAT = ' ' LANGU = CE_EVLNG OBJID = CE_LOCID OTYPE = CE_KURSO PLVAR = CE_PLVAR CHECK_STRU_AUTH = ' ' IMPORTING OBEG = CE_LOCBEG OEND = CE_LOCEND OSTAT = CE_LOCSTAT HISTO = CE_HISTO EXCEPTIONS NOT_FOUND = 01 OTHERS = 02.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING BEGDA = CE_PEBEG ENDDA = CE_PEEND ISTAT = ' ' LANGU = CE_EVLNG OBJID = CE_ETYID OTYPE = CE_KURST PLVAR = CE_PLVAR CHECK_STRU_AUTH = ' ' IMPORTING OBEG = CE_ETBEG OEND = CE_ETEND OSTAT = CE_ISTAT HISTO = CE_HISTO EXCEPTIONS NOT_FOUND = 01 OTHERS = 02.
RH_PICK_EVENTTYPE_SCHEDULE CALL FUNCTION 'RH_PICK_EVENTTYPE_SCHEDULE' EXPORTING PLVAR = BS_PLVAR OTYPE = BS_KURST OBJID = BS_ETYID BEGDA = BS_PEBEG ENDDA = BS_PEEND READ_EVETYP_TEXT = 'X' FCODE = 'PICK' MODE = 'N' TABLES DISP_SCHEDULE = BS_DISP_SCHEDULE EXCEPTIONS NO_OBJECT_TEXT = 1 NOTHING_FOUND = 2 OTHERS = 3.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.