MIT30F02 SAP ABAP INCLUDE - documentation and ABAP source code
MIT30F02 is a standard ABAP INCLUDE 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 MIT30F02 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 MIT30F02. "Basic submit
SUBMIT MIT30F02 AND RETURN. "Return to original report after report execution complete
SUBMIT MIT30F02 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
INCLUDES used within this REPORT MIT30F02
No INCLUDES are used within this REPORT code!
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 = $placa begda = fvo_kurs-begda endda = fvo_kurs-endda * CONDITION = '00000' * SORT = 'X' * WITH_EV = ' ' * ADATA = 'X' TABLES i1001 = i1001 objects = intobj EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = fvo_kurs-plvar otype = $kurso * OBJID = realo = i1001-sobid * ISTAT = ' ' begda = i1001-begda endda = i1001-endda * LANGU = SY-LANGU * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' IMPORTING * obeg = * oend = ostat = fvo_ort-istat histo = fvo_ort-histo short = fvo_ort-short stext = fvo_ort-stext * TISTAT = * TLANGU = * TABLES * EXISTENCE = EXCEPTIONS not_found = 1 OTHERS = 2.
RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * ISTAT = ' ' * EXTEND = 'X' subty = $occpa begda = fr_kurs-begda endda = fr_kurs-endda * CONDITION = '00000' * SORT = 'X' * WITH_EV = ' ' * ADATA = 'X' TABLES i1001 = l1001 objects = intobj EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3.
RH_READ_INFTY_NNNN CALL FUNCTION 'RH_READ_INFTY_NNNN' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' infty = oc_infty istat = '1' * EXTEND = 'X' * SUBTY = ' ' begda = fr_kurs-begda endda = fr_kurs-endda * CONDITION = '00000' * INFTB = '1' * SORT = 'X' TABLES innnn = i1023 objects = intobj EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = l1001-plvar otype = l1001-sclas * OBJID = realo = l1001-sobid * ISTAT = ' ' begda = l1001-begda endda = l1001-endda * LANGU = SY-LANGU * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' IMPORTING * obeg = * oend = ostat = fr_raum-istat histo = fr_raum-histo short = fr_raum-short stext = fr_raum-stext EXCEPTIONS not_found = 01 OTHERS = 02.
RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * ISTAT = ' ' * EXTEND = 'X' subty = $occpa begda = fr_kurs-begda endda = fr_kurs-endda * CONDITION = '00000' * SORT = 'X' * WITH_EV_FOR_INT ' ' * ADATA = 'X' TABLES i1001 = i1001 objects = intobj EXCEPTIONS nothing_found = 01 wrong_condition = 02.
RH_READ_INFTY_NNNN CALL FUNCTION 'RH_READ_INFTY_NNNN' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' infty = oc_infty istat = '1' * EXTEND = 'X' * SUBTY = ' ' begda = fr_kurs-begda endda = fr_kurs-endda * CONDITION = '00000' * INFTB = '1' * SORT = 'X' TABLES innnn = i1023 objects = intobj EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = i1001-plvar otype = i1001-sclas * OBJID = realo = i1001-sobid * ISTAT = ' ' begda = i1001-begda endda = i1001-endda langu = sy-langu * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' IMPORTING obeg = fr_ref-begda oend = fr_ref-endda ostat = fr_ref-istat histo = fr_ref-histo short = fr_ref-short stext = fr_ref-stext EXCEPTIONS not_found = 01 OTHERS = 02.
RH_GET_COMPANY CALL FUNCTION 'RH_GET_COMPANY' EXPORTING begda = fr_datum endda = fr_datum sort = ' ' TABLES objects = obj company_tab = comp EXCEPTIONS nothing_found = 1 no_participant = 2 no_single_part = 3 no_orway_in_t77r3 = 4 OTHERS = 5.
RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * ISTAT = ' ' * EXTEND = 'X' subty = $occpa begda = fr_kurs-begda endda = fr_kurs-endda * CONDITION = '00000' * SORT = 'X' * WITH_EV_FOR_INT ' ' * ADATA = 'X' TABLES i1001 = i1001 objects = intobj EXCEPTIONS nothing_found = 01 wrong_condition = 02 OTHERS = 03.
RH_READ_INFTY_NNNN CALL FUNCTION 'RH_READ_INFTY_NNNN' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' infty = '1023' istat = '1' * EXTEND = 'X' * SUBTY = ' ' begda = fr_kurs-begda endda = fr_kurs-endda * CONDITION = '00000' * INFTB = '1' * SORT = 'X' TABLES innnn = i1023 objects = intobj EXCEPTIONS nothing_found = 1 wrong_condition = 2 OTHERS = 3.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = i1001-plvar otype = i1001-sclas * OBJID = realo = i1001-sobid * ISTAT = ' ' begda = i1001-begda endda = i1001-endda langu = sy-langu * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' IMPORTING obeg = ref-begda oend = ref-endda ostat = ref-istat histo = ref-histo short = ref-short stext = ref-stext EXCEPTIONS not_found = 01 OTHERS = 02.
RH_GET_COMPANY CALL FUNCTION 'RH_GET_COMPANY' EXPORTING begda = fr_datum endda = fr_datum sort = ' ' TABLES objects = obj company_tab = comp EXCEPTIONS nothing_found = 1 no_participant = 2 no_single_part = 3 no_orway_in_t77r3 = 4 OTHERS = 5.
RH_GET_PARTICIPANTS CALL FUNCTION 'RH_GET_PARTICIPANTS' EXPORTING begda = fb_kurs-begda endda = fb_kurs-endda * ISTAT = ' ' * SORT = 'X' * ALPHA_SORT = ' ' * FLAGP = ' ' * CHECK_1031 = ' ' * PARTEVENT = ' ' * MAXMU = 'X' * NPRIO = 'X' * MINWL = 'X' TABLES event_tab = intobj partic_tab = partic i1001 = i1001 EXCEPTIONS no_participant = 1 no_event_found = 2 wrong_condition = 3 OTHERS = 4.
RH_READ_INFTY_1001 CALL FUNCTION 'RH_READ_INFTY_1001' EXPORTING * AUTHORITY = 'DISP' * WITH_STRU_AUTH = 'X' * ISTAT = ' ' * EXTEND = 'X' subty = $orgaa begda = fv_datum endda = fv_datum * CONDITION = '00000' * SORT = 'X' * WITH_EV = ' ' * ADATA = 'X' TABLES i1001 = i1001 objects = intobj EXCEPTIONS nothing_found = 01 wrong_condition = 02 OTHERS = 03.
RH_READ_OBJECT CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = i1001-plvar otype = i1001-sclas * OBJID = realo = i1001-sobid * ISTAT = ' ' begda = fv_datum endda = fv_datum * LANGU = SY-LANGU * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' IMPORTING * OBEG = * OEND = * OSTAT = * HISTO = short = fv_veran-short stext = fv_veran-stext * TISTAT = * TLANGU = * TABLES * EXISTENCE = EXCEPTIONS not_found = 1 OTHERS = 2.
RH_GET_SCHEDULE CALL FUNCTION 'RH_GET_SCHEDULE' EXPORTING plvar = fa_kurs-plvar otype = $kurs objid = objid TABLES * EVENTLIST = schedule_out = fa_abltab EXCEPTIONS no_schedule_found = 01 calid_error = 02 OTHERS = 03.
RH_GET_RESOURCE CALL FUNCTION 'RH_GET_RESOURCE' EXPORTING plvar = fr_kurs-plvar otype = $kurs objid = eveid begda = fr_kurs-begda endda = fr_kurs-endda istat = fr_kurs-istat langu = fr_langu TABLES ressource_tab = resbel * EVENT_TAB = EXCEPTIONS no_event_found = 1 no_occupying = 2 wrong_objecttype = 3 OTHERS = 4.
CALL FUNCTION 'RH_READ_OBJECT' EXPORTING plvar = ra_restab-plvar otype = ra_restab-retyp * OBJID = realo = ra_restab-resid * ISTAT = ' ' begda = ra_restab-begda endda = ra_restab-endda * LANGU = SY-LANGU * OINTERVAL = 'X' * STORE = 'X' * CHECK_STRU_AUTH = 'X' * READ_DB = ' ' IMPORTING obeg = res-begda oend = res-endda ostat = res-istat histo = res-histo short = res-short stext = res-stext * TISTAT = * TLANGU = * TABLES * EXISTENCE = EXCEPTIONS not_found = 1 OTHERS = 2.
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 MIT30F02 or its description.