MP200140 SAP ABAP INCLUDE - Infotype 2001: Form Routines
MP200140 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 MP200140 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 MP200140. "Basic submit
SUBMIT MP200140 AND RETURN. "Return to original report after report execution complete
SUBMIT MP200140 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Infotype 2001: Form Routines
INCLUDES used within this REPORT MP200140
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:
HR_GET_VALIDITY_OF_APPLICATION CALL FUNCTION 'HR_GET_VALIDITY_OF_APPLICATION' "XYAM048800 EXPORTING "XYAM048800 i_molga = t001p-molga "XYAM048800 i_appl = 'LFKG' "XYAM048800 i_date = p2001-begda "XYAM048800 IMPORTING "XYAM048800 e_valid = g_sw_appl_lfkg "XYAM048800 . "XYAM048800
RP_DAYPROGRAM * CALL FUNCTION 'RP_DAYPROGRAM' * EXPORTING * INPUT = PTPRG * IMPORTING * OUTPUT = PTPRG * TABLES * I550AN = I550AN * I550AO = I550AO * I550PN = I550PN * I550PO = I550PO * PP0001 = M0001 * PP0002 = M0002 * PP0007 = M0007 * PP2001 = M2001 * PP2002 = M2002 * PP2003 = M2003.
HR_PERSONAL_WORK_SCHEDULE CALL FUNCTION 'HR_PERSONAL_WORK_SCHEDULE' EXPORTING pernr = pspar-pernr begda = p2001-begda endda = p2001-begda TABLES i0000 = m0000 i0001 = m0001 i0002 = m0002 i0007 = m0007 i2001 = m2001 i2002 = m2002 i2003 = m2003 perws = pws EXCEPTIONS error_occured = 1 abort_occured = 2 OTHERS = 3.
HR_CALCULATE_T554X_TIMES CALL FUNCTION 'HR_CALCULATE_T554X_TIMES' "XLCK014733 EXPORTING datum = ptabs-datum infty = ptabs-infty mopgk = ptabs-konty mozko = ptabs-mozko ktart = ptabs-ktart motpr = ptabs-motpr zmodn = ptabs-zmodn rgmod = ptabs-rgmod zeity = ptabs-zeity urlkl = ptabs-urlkl ftkla = ptabs-ftkla tpkla = ptabs-tpkla tagty = ptabs-tagty molga = t001p-molga stdaz = ptabs-stdaz sollz = ptabs-sollz IMPORTING * abrtg = ptabs-abrtg "YAYPH4K001273 * abrst = ptabs-abrst "YAYPH4K001273 abrtg = tpd_abrtg "YAYPH4K001273 abrst = tpd_abrst "YAYPH4K001273 EXCEPTIONS customizing_error = 1.
RP_BUILD_PSP * CALL FUNCTION 'RP_BUILD_PSP' "XOQK064687 * EXPORTING input = ptprg "XOQK064687 * begda = er_begda "XOQK064687 * endda = er_endda "XOQK064687 * error = no "XOQK064687 * activ = 1 "XOQK064687 * IMPORTING output = ptprg "XOQK064687 * TABLES i550an = i550an "XOQK064687 * i550ao = i550ao "XOQK064687 * i550pn = i550pn "XOQK064687 * i550po = i550po "XOQK064687 * pp0000 = m0000 "XOQK064687 * pp0001 = m0001 "XOQK064687 * pp0002 = m0002 "XOQK064687 * pp0007 = m0007 "XOQK064687 * pp2001 = m2001 "XOQK064687 * pp2002 = m2002 "XOQK064687 * pp2003 = m2003 "XOQK064687 * ppsp = psp. "XOQK064687
RP_ZRETCD * CALL FUNCTION 'RP_ZRETCD' "XOQK064687 * EXPORTING "XOQK064687 * msgty = 'E' "XOQK064687 * ptprg = ptprg. "XOQK064687
HR_REFRESH_ERROR_LIST CALL FUNCTION 'HR_REFRESH_ERROR_LIST'.
HR_PERSONAL_WORK_SCHEDULE CALL FUNCTION 'HR_PERSONAL_WORK_SCHEDULE' "XOQK064687 EXPORTING "XOQK064687 pernr = er_pernr "XOQK064687 begda = er_begda "XOQK064687 endda = er_endda "XOQK064687 switch_activ = 1 "XOQK064687 TABLES "XOQK064687 i0000 = m0000 "XOQK064687 i0001 = m0001 "XOQK064687 i0002 = m0002 "XOQK064687 i0007 = m0007 "XOQK064687 i2001 = m2001 "XOQK064687 i2002 = m2002 "XOQK064687 i2003 = m2003 "XOQK064687 perws = psp "XOQK064687 EXCEPTIONS "XOQK064687 error_occured = 1 "XOQK064687 abort_occured = 2 "XOQK064687 OTHERS = 3. "XOQK064687
HR_GET_ERROR_LIST CALL FUNCTION 'HR_GET_ERROR_LIST' TABLES error = errors errortexts = errortexts EXCEPTIONS no_errors = 1 OTHERS = 2.
HR_REFRESH_ERROR_LIST CALL FUNCTION 'HR_REFRESH_ERROR_LIST'.
HRCCE_IS_SHARED_ABS_TYPE ** CALL FUNCTION 'HRCCE_IS_SHARED_ABS_TYPE' ** EXPORTING ** i_pernr = pspar-pernr ** i_abs_type = awart ** IMPORTING ** e_shared_flag = lv_shared_abs ** EXCEPTIONS ** error_occurred = 1 ** wrong_absence_type = 2 ** parameter_error = 3 ** OTHERS = 4.
HRCCE_IS_SHARED_ABS_TYPE CALL FUNCTION 'HRCCE_IS_SHARED_ABS_TYPE' EXPORTING i_pernr = pspar-pernr i_abs_type = awart im_begda = p2001-begda "Note 1366581 im_endda = p2001-endda "Note 1366581 IMPORTING e_shared_flag = lv_shared_abs EXCEPTIONS error_occurred = 1 wrong_absence_type = 2 parameter_error = 3 OTHERS = 4.
GET_RELATED_PERNRS_QUOTAS CALL FUNCTION 'GET_RELATED_PERNRS_QUOTAS' " for shared quotas: PERNR / QUOTA TABLES EXPORTING i_pernr = pspar-pernr i_begda = p2001-begda "Note 1351492 i_endda = p2001-endda "Note 1351492 TABLES et_pernr = gt_pernr_tab et_pernr_quotas = gt_pernr_quota_tab b2006x2 = b2006x2.
HR_DEDUCE_SHARED_QUOTA CALL FUNCTION 'HR_DEDUCE_SHARED_QUOTA' EXPORTING pernr = pspar-pernr infty = infty awart = awart docnr =
TABLES times_per_day = times_per_day t2006x = b2006x2 t2007x = b2007x2 tquoded = bquoded p_pernr_tab = gt_pernr_tab p_pernr_quota_tab = gt_pernr_quota_tab EXCEPTIONS error_occurred = 1 zero_deduction = 2 * wrong_infty = 3 not_enough_quota = 4.
HR_DEDUCE_QUOTA CALL FUNCTION 'HR_DEDUCE_QUOTA' EXPORTING pernr = pspar-pernr infty = infty awart = awart docnr =
TABLES times_per_day = times_per_day t2006x = b2006x2 t2007x = b2007x2 tquoded = bquoded EXCEPTIONS error_occurred = 1 zero_deduction = 2 * wrong_infty = 3 not_enough_quota = 4.
HR_INSERT_QUODED_BUFFER CALL FUNCTION 'HR_INSERT_QUODED_BUFFER' TABLES new_quoded = bquoded.
HR_EXPORT_QUODED_BUFFER * call function 'HR_EXPORT_QUODED_BUFFER'. "note 506846
HR_EXPORT_QUODED_BUFFER_CE CALL FUNCTION 'HR_EXPORT_QUODED_BUFFER_CE' EXPORTING pernr_tab = lt_pernr_tab.
CALL FUNCTION 'HR_EXPORT_QUODED_BUFFER' "note 506846 EXPORTING "note 506846 pernr = pspar-pernr. "note 506846
HRCCE_IS_SHARED_ABS_TYPE CALL FUNCTION 'HRCCE_IS_SHARED_ABS_TYPE' "note 1657394 EXPORTING i_pernr = p2001-pernr i_abs_type = p2001-awart im_begda = p2001-begda im_endda = p2001-endda IMPORTING e_shared_flag = lv_shared_abs EXCEPTIONS OTHERS = 0.
GET_RELATED_PERNRS_QUOTAS CALL FUNCTION 'GET_RELATED_PERNRS_QUOTAS' " for shared quotas- GET ALL PERNS / QUOTAS EXPORTING i_pernr = pspar-pernr i_begda = p2001-begda "Note 1351492 i_endda = p2001-endda "Note 1351492 TABLES et_pernr_quotas = gt_pernr_quota_tab et_pernr = gt_pernr_tab b2006x2 = b2006x2.
HR_DELETE_QUODED_BUFFER CALL FUNCTION 'HR_DELETE_QUODED_BUFFER' EXPORTING docnr = docnr TABLES t2006x = b2006x2 t2007x = b2007x2 EXCEPTIONS duplicate_delete = 1 no_entry = 2 non_existing_quonr = 3.
HR_EXPORT_QUODED_BUFFER * call function 'HR_EXPORT_QUODED_BUFFER'. "note 506846
HR_EXPORT_QUODED_BUFFER_CE CALL FUNCTION 'HR_EXPORT_QUODED_BUFFER_CE' EXPORTING pernr_tab = lt_pernr_tab.
HR_EXPORT_QUODED_BUFFER CALL FUNCTION 'HR_EXPORT_QUODED_BUFFER' "note 506846 EXPORTING "note 506846 pernr = pspar-pernr. "note 506846
HR_GET_QUOTA_DEDUCTION CALL FUNCTION 'HR_GET_QUOTA_DEDUCTION' EXPORTING docnum = p_docnr TABLES qdisded = qdisded m2001 = m2001 m2002 = m2002 m2006 = m2006 m2007 = m2007 EXCEPTIONS record_not_found = 1.
HR_PERSONAL_WORK_SCHEDULE CALL FUNCTION 'HR_PERSONAL_WORK_SCHEDULE' EXPORTING pernr = p_pernr begda = p_date * endda = p_date "Note 374471 endda = p_endda "Note 374471 refresh = ' ' "performance for 1 person working_hours = 'X' modify_entries = ' ' "performance for 1 person TABLES i0000 = m0000 i0001 = m0001 i0002 = m0002 i0007 = m0007 i2001 = m2001 i2002 = m2002 i2003 = m2003 perws = pws EXCEPTIONS error_occured = 1 abort_occured = 2.
HR_DETERMINE_T556C_RULE CALL FUNCTION 'HR_DETERMINE_T556C_RULE' EXPORTING * datum = p_date "Note 374471 datum = l_date "Note 374471 motpr = pws-motpr zmodn = pws-zmodn crule = p_crule mopgk = p_konty mozko = p_mozko ftkla = pws-ftkla tpkla = pws-tpkla tagty = pws-tagty alldf = p_alldf sollz = pws-stdaz IMPORTING w556c = w556c EXCEPTIONS no_rule_found = 1 OTHERS = 2. "note 407055
HR_DE_PBS_READ_FEATURE_SWOED CALL FUNCTION 'HR_DE_PBS_READ_FEATURE_SWOED' "YMLN893345 EXPORTING it_p0001 = lt_i0001 i_molga = $molga i_date = $date IMPORTING e_back = $result e_kgz = allowed_oedtvl "YMLN1245189a EXCEPTIONS OTHERS = 0.
DYNP_VALUES_READ CALL FUNCTION 'DYNP_VALUES_READ' EXPORTING dyname = l_repid dynumb = l_dynnr determine_loop_index = with_loop_index TABLES dynpfields = l_dynpread_tab EXCEPTIONS invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 invalid_parameter = 7 undefind_error = 8 double_conversion = 9 stepl_not_found = 10 OTHERS = 11.
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 MP200140 or its description.