MP50AI03 SAP ABAP INCLUDE - documentation and ABAP source code
MP50AI03 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 MP50AI03 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 MP50AI03. "Basic submit
SUBMIT MP50AI03 AND RETURN. "Return to original report after report execution complete
SUBMIT MP50AI03 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 MP50AI03
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:
DYNP_VALUES_READ call function 'DYNP_VALUES_READ' "XFYK048858 exporting "XFYK048858 dyname = 'SAPMP50A' "XFYK048858 dynumb = sy-dynnr "XFYK048858 tables "XFYK048858 dynpfields = htab "XFYK048858 exceptions "XFYK048858 invalid_abapworkarea = 1 "XFYK048858 invalid_dynprofield = 2 "XFYK048858 invalid_dynproname = 3 "XFYK048858 invalid_dynpronummer = 4 "XFYK048858 invalid_request = 5 "XFYK048858 no_fielddescription = 6 "XFYK048858 invalid_parameter = 7 "XFYK048858 undefind_error = 8 "XFYK048858 others = 9. "XFYK048858
DYNP_VALUES_READ call function 'DYNP_VALUES_READ' "XFYK004376 exporting dyname = 'SAPMP50A' dynumb = dynp_time tables dynpfields = htab 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 others = 9.
RP_FORMATING_DATE call function 'RP_FORMATING_DATE' exporting date_i = rp50g-begda birth_date = ' ' importing date_o = sel-begst exceptions date_invalid = 1 others = 2.
RP_CHECK_DATE call function 'RP_CHECK_DATE' exporting date = sel-begst exceptions date_invalid = 1 others = 2.
RP_FORMATING_DATE call function 'RP_FORMATING_DATE' exporting date_i = rp50g-endda birth_date = ' ' importing date_o = sel-endst exceptions date_invalid = 1 others = 2.
RP_CHECK_DATE call function 'RP_CHECK_DATE' exporting date = sel-endst exceptions date_invalid = 1 others = 2.
DYNP_VALUES_READ call function 'DYNP_VALUES_READ' exporting dyname = 'SAPMP50A' dynumb = '1000' tables dynpfields = htab 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 others = 9.
DYNP_VALUES_READ call function 'DYNP_VALUES_READ' exporting dyname = 'SAPMP50A' dynumb = '1100' tables dynpfields = htab 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 others = 9.
HR_F4_GET_SUBTYPE call function 'HR_F4_GET_SUBTYPE' exporting infty = rp50g-infty persnr = rp50g-pernr * v========================== XRGN436561 ==========================v tclas = pspar-tclas * ^========================== XRGN436561 ==========================^ begda = sel-begst endda = sel-endst importing subty = rp50g-subty stext = subty_text exceptions infty_not_found = 1 no_entries_found = 2 cancelled = 3 infty_not_supported = 4 infty_has_no_subties = 5 others = 6.
HR_T582A_READ * CALL FUNCTION 'HR_T582A_READ' "XYVAHRK039910 * EXPORTING "XYVAHRK039910 * infty = rp50g-infty "XYVAHRK039910 * IMPORTING "XYVAHRK039910 * t582a = t582a "XYVAHRK039910 * EXCEPTIONS "XYVAHRK039910 * entry_not_found = 1 "XYVAHRK039910 * OTHERS = 2. "XYVAHRK039910
HR_SEN_0553_SUBTYP_VALUES_GET * CALL FUNCTION 'HR_SEN_0553_SUBTYP_VALUES_GET' * EXPORTING * molga = molga * TABLES * help_fields = ihelp_fields * helptab = helptab.
HR_SEN_0552_SUBTYP_VALUES_GET * CALL FUNCTION 'HR_SEN_0552_SUBTYP_VALUES_GET' * TABLES * help_fields = ihelp_fields * helptab = helptab.
HRCM_F4_CPLAN_GET * CALL FUNCTION 'HRCM_F4_CPLAN_GET' * EXPORTING * pernr = rp50g-pernr * datum = cplan_date * IMPORTING * cplan = rp50g-subty.
HRCM_F4_CTYPE_GET * CALL FUNCTION 'HRCM_F4_CTYPE_GET' * EXPORTING * pernr = rp50g-pernr * datum = cplan_date * IMPORTING * ctype = rp50g-subty.
HRCM_F4_STOCK_GET * CALL FUNCTION 'HRCM_F4_STOCK_GET' * EXPORTING * pernr = rp50g-pernr * datum = cplan_date * IMPORTING * ctype = rp50g-subty.
HELP_VALUES_GET_WITH_TABLE call function 'HELP_VALUES_GET_WITH_TABLE' exporting fieldname = fnam tabname = tnam importing select_value = rp50g-subty tables fields = ihelp_fields valuetab = helptab exceptions field_not_in_ddic = 01 more_then_one_selectfield = 02 no_selectfield = 03.
DYNP_VALUES_READ call function 'DYNP_VALUES_READ' exporting dyname = dynpname dynumb = dynpnumb tables dynpfields = dynpvaluetab exceptions invalid_abapworkarea = 01 invalid_dynprofield = 02 invalid_dynproname = 03 invalid_dynpronummer = 04 invalid_request = 05.
DYNP_VALUES_READ * call function 'DYNP_VALUES_READ' * exporting * dyname = dynpname * dynumb = dynpnumb * tables * dynpfields = dynpvaluetab * exceptions * invalid_abapworkarea = 01 * invalid_dynprofield = 02 * invalid_dynproname = 03 * invalid_dynpronummer = 04 * invalid_request = 05.
call function 'HELP_VALUES_GET_WITH_TABLE' exporting fieldname = 'T503' tabname = 'PERSK' importing select_value = rp50g-persk tables fields = ihelp_fields valuetab = helptab exceptions field_not_in_ddic = 01 more_then_one_selectfield = 02 no_selectfield = 03.
HR_F4_GET_SUBTYPE call function 'HR_F4_GET_SUBTYPE' exporting infty = rp50g-infty persnr = rp50g-pernr tclas = pspar-tclas "XRGN436561 begda = sel-begst endda = sel-endst importing subty = rp50g-subty stext = subty_text exceptions infty_not_found = 1 no_entries_found = 2 cancelled = 3 infty_not_supported = 4 infty_has_no_subties = 5 others = 6.
HR_T582A_READ * CALL FUNCTION 'HR_T582A_READ' "XYVAHRK039910 * EXPORTING "XYVAHRK039910 * infty = rp50g-infty "XYVAHRK039910 * IMPORTING "XYVAHRK039910 * t582a = t582a"XYVAHRK039910 * EXCEPTIONS "XYVAHRK039910 * entry_not_found = 1 "XYVAHRK039910 * OTHERS = 2. "XYVAHRK039910
HELP_VALUES_GET_WITH_TABLE call function 'HELP_VALUES_GET_WITH_TABLE' exporting fieldname = fnam tabname = tnam title_in_values_list = 'Bitte wählen Sie einen Subtyp aus:'(004) titel = ltext "QNOK001646 importing select_value = rp50g-subty tables fields = ihelp_fields valuetab = helptab exceptions field_not_in_ddic = 01 more_then_one_selectfield = 02 no_selectfield = 03.
HR_GET_SUBTYPE_TEXT call function 'HR_GET_SUBTYPE_TEXT' exporting infty = rp50g-infty subty = rp50g-subty persnr = rp50g-pernr tclas = pspar-tclas "XRGN436561 begda = sel-begst endda = sel-endst importing stext = subty_text exceptions infty_not_found = 1 subty_not_found = 2 infty_not_supported = 3 others = 4.
HR_T582A_READ * CALL FUNCTION 'HR_T582A_READ' "XYVAHRK039910 * EXPORTING "XYVAHRK039910 * infty = rp50g-infty "XYVAHRK039910 * IMPORTING "XYVAHRK039910 * t582a = t582a "XYVAHRK039910 * EXCEPTIONS "XYVAHRK039910 * entry_not_found = 0 "XYVAHRK039910 * OTHERS = 0. "XYVAHRK039910
HR_SEN_0553_SUBTYP_TEXT_GET * CALL FUNCTION 'HR_SEN_0553_SUBTYP_TEXT_GET' * EXPORTING * molga = molga * subty = rp50g-subty * f4flag = f4flag * subty_text_old = subty_text_old * IMPORTING * subty_text = subty_text * txt_subrc = txt_subrc.
HR_SEN_0552_SUBTYP_TEXT_GET * CALL FUNCTION 'HR_SEN_0552_SUBTYP_TEXT_GET' * EXPORTING * subty = rp50g-subty * f4flag = f4flag * subty_text_old = subty_text_old * IMPORTING * subty_text = subty_text * txt_subrc = txt_subrc.
HR_COUNTRYGROUPING_GET call function 'HR_COUNTRYGROUPING_GET' exporting tclas = pspar-tclas begda = pspar-begda endda = pspar-endda werks = pspar-werks importing molga = p_molga exceptions not_found = 1 others = 2.
HR_F4_GET_SUBTYPE call function 'HR_F4_GET_SUBTYPE' exporting infty = rp50g-infty persnr = rp50g-pernr tclas = pspar-tclas "SKBN899867 begda = pspar-begda endda = pspar-endda importing subty = rp50g-subty stext = subty_text exceptions infty_not_found = 1 no_entries_found = 2 cancelled = 3 infty_not_supported = 4 infty_has_no_subties = 5 others = 6.
HR_COUNTRYGROUPING_GET call function 'HR_COUNTRYGROUPING_GET' exporting pernr = rp50g-pernr tclas = pspar-tclas begda = pspar-begda endda = pspar-endda exceptions not_found = 1 others = 2.
HR_F4_GET_SUBTYPE call function 'HR_F4_GET_SUBTYPE' exporting infty = rp50g-infty persnr = rp50g-pernr tclas = pspar-tclas "SKBN899867 begda = pspar-begda endda = pspar-endda importing subty = rp50g-subty stext = subty_text exceptions infty_not_found = 1 no_entries_found = 2 cancelled = 3 infty_not_supported = 4 infty_has_no_subties = 5 others = 6.
HR_F4_GET_SUBTYPE call function 'HR_F4_GET_SUBTYPE' exporting infty = rp50g-infty tclas = pspar-tclas "XRGN436561 * PERSNR = rp50g-pernr "XWSK001309 * BEGDA = sel-begst "XWSK001309 * ENDDA = sel-endst "XWSK001309 begda = pspar-begda "XWSK001309 endda = pspar-endda "XWSK001309 molga = p_molga "XWSK001309 importing subty = rp50g-subty stext = subty_text exceptions infty_not_found = 1 no_entries_found = 2 cancelled = 3 infty_not_supported = 4 infty_has_no_subties = 5 others = 6.
HR_T582A_READ * CALL FUNCTION 'HR_T582A_READ' "XYVAHRK039910 * EXPORTING "XYVAHRK039910 * infty = rp50g-infty "XYVAHRK039910 * IMPORTING "XYVAHRK039910 * t582a = t582a "XYVAHRK039910 * EXCEPTIONS "XYVAHRK039910 * entry_not_found = 0 "XYVAHRK039910 * OTHERS = 0. "XYVAHRK039910
HR_T582A_READ * CALL FUNCTION 'HR_T582A_READ' "XYVAHRK039910 * EXPORTING "XYVAHRK039910 * infty = rp50g-infty "XYVAHRK039910 * IMPORTING "XYVAHRK039910 * t582a = t582a"XYVAHRK039910 * EXCEPTIONS "XYVAHRK039910 * entry_not_found = 0 "XYVAHRK039910 * OTHERS = 0. "XYVAHRK039910
HELP_VALUES_GET_WITH_TABLE call function 'HELP_VALUES_GET_WITH_TABLE' exporting fieldname = fnam tabname = tnam importing select_value = rp50g-choic tables fields = ihelp_fields valuetab = helptab exceptions field_not_in_ddic = 01 more_then_one_selectfield = 02 no_selectfield = 03.
DYNP_VALUES_UPDATE call function 'DYNP_VALUES_UPDATE' exporting dyname = dynpronam1 dynumb = sy-dynnr tables dynpfields = htab exceptions invalid_abapworkarea = 1 invalid_dynprofield = 2 invalid_dynproname = 3 invalid_dynpronummer = 4 invalid_request = 5 no_fielddescription = 6 undefind_error = 7 others = 8.
HR_CHECK_MOLGA_INFTY_PERM call function 'HR_CHECK_MOLGA_INFTY_PERM' exporting molga = p_molga infty = p_infty subty = subty importing allowed = allowed.
F4IF_GET_SHLP_DESCR call function 'F4IF_GET_SHLP_DESCR' exporting shlpname = 'H_PAD_T582L_INFTY' * SHLPTYPE = 'SH' importing shlp = shlp.
F4IF_START_VALUE_REQUEST call function 'F4IF_START_VALUE_REQUEST' exporting shlp = shlp * DISPONLY = ' ' * MAXRECORDS = 500 * MULTISEL = ' ' * CUCOL = SY-CUCOL * CUROW = SY-CUROW importing rc = rc_infty tables return_values = return_values.
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 MP50AI03 or its description.