SAP Reports / Programs | Personnel Time Management | Time Data Recording and Administration | Time Tickets(PT-RC-IW) SAP PT
MP53LF70 SAP ABAP INCLUDE - Routines for Validation and Messages
MP53LF70 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 MP53LF70 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 MP53LF70. "Basic submit
SUBMIT MP53LF70 AND RETURN. "Return to original report after report execution complete
SUBMIT MP53LF70 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Title: Routines for Validation and Messages
INCLUDES used within this REPORT MP53LF70
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:
RK_KOKRS_FIND * CALL FUNCTION 'RK_KOKRS_FIND' "ALRK022012 * EXPORTING "ALRK022012 * bukrs = bukrs "ALRK022012 * gsber = p0001-gsber "ALRK022012 * IMPORTING "ALRK022012 * kokrs = kokrs "ALRK022012 * EXCEPTIONS "ALRK022012 * assignment_not_allowed = 1 "ALRK022012 * insufficient_input = 2 "ALRK022012 * no_kokrs_assigned = 3 "ALRK022012 * no_kokrs_for_bukrs = 4 "ALRK022012 * no_kokrs_for_bu_gb = 5 "ALRK022012 * wrong_kokrs_for_bukrs = 6 "ALRK022012 * wrong_kokrs_for_bu_gb = 7. "ALRK022012
RK_KOSTL_READ * CALL FUNCTION 'RK_KOSTL_READ' "ALRK022012 * EXPORTING "ALRK022012 * datum = ls-budat "ALRK022012 * kokrs = kokrs "ALRK022012 * kostl = ls-skost "ALRK022012 * spras = sy-langu "P30K067994 * IMPORTING "ALRK022012 * gsber = gsber "ALRK022012 * EXCEPTIONS "ALRK022012 * kostl_not_complete = 8 "ALRK022012 * kostl_not_found = 9 "ALRK022012 * text_not_found = 10. "ALRK022012
RK_KOKRS_FIND * CALL FUNCTION 'RK_KOKRS_FIND' "ALRK022012 * EXPORTING "ALRK022012 * bukrs = bukrs "ALRK022012 * gsber = p0001-gsber "ALRK022012 * test_kokrs = kokrs "ALRK022012 * IMPORTING "ALRK022012 * kokrs = kokrs "ALRK022012 * EXCEPTIONS "ALRK022012 * assignment_not_allowed = 1 "ALRK022012 * insufficient_input = 2 "ALRK022012 * no_kokrs_assigned = 3 "ALRK022012 * no_kokrs_for_bukrs = 4 "ALRK022012 * no_kokrs_for_bu_gb = 5 "ALRK022012 * wrong_kokrs_for_bukrs = 6 "ALRK022012 * wrong_kokrs_for_bu_gb = 7. "ALRK022012
RK_KOSTL_READ * CALL FUNCTION 'RK_KOSTL_READ' "ALRK022012 * EXPORTING "ALRK022012 * datum = ls-budat "ALRK022012 * kokrs = kokrs "ALRK022012 * kostl = ls-ekost "ALRK022012 * spras = sy-langu "P30K067994 * importing "ALRK022012 * gsber = gsber "ALRK022012 * exceptions "ALRK022012 * kostl_not_complete = 8 "ALRK022012 * kostl_not_found = 9 "ALRK022012 * text_not_found = 10. "ALRK022012
COBL_EX_CODINGBLOCK_CHECK * CALL FUNCTION 'COBL_EX_CODINGBLOCK_CHECK' "PH4K002481 * EXPORTING "PH4K002481 * check_cobl = l_cobl "PH4K002481 * IMPORTING "ALRK037631 "PH4K002481 * checked_cobl = l_cobl_imp "ALRK037631 "PH4K002481 * TABLES "PH4K002481 * t_messages = l_messages "PH4K002481 * EXCEPTIONS "PH4K002481 * others = 0. "PH4K002481
HRCA_COBL_CHECK * call function 'HRCA_COBL_CHECK' "ALRK037631 "PH4K002481 * exporting "PH4K002481 * i_cobl = l_cobl "PH4K002481 * importing "PH4K002481 * number_of_errors = l_errors "PH4K002481 * e_cobl = l_cobl_imp "PH4K002481 * tables "PH4K002481 * cobl_messages = l_messages "PH4K002481 * exceptions "PH4K002481 * others = 0. "PH4K002481
HR_INW_CHECK_KOSTL CALL FUNCTION 'HR_INW_CHECK_KOSTL' "PH4K002481 EXPORTING "PH4K002481 i_bukrs = p_bukrs "PH4K002481 i_budat = p_datum "PH4K002481 * I_GSBER = "PH4K002481 i_kostl = p_kostl "PH4K002481 * I_AUFNR = "PH4K002481 * I_POSID = "PH4K002481 * I_KSTRG = "PH4K002481 * I_NPLNR = "PH4K002481 * I_VORNR = "PH4K002481 * I_KDAUF = "PH4K002481 * I_KDPOS = "PH4K002481 * I_PRZNR = "PH4K002481 IMPORTING "PH4K002481 e_gsber = p_gsber "PH4K002481 EXCEPTIONS "PH4K002481 general_error = 1 "PH4K002481 OTHERS = 2. "PH4K002481
RP_DAYPROGRAM * CALL FUNCTION 'RP_DAYPROGRAM' * EXPORTING * INPUT = PTPRG * IMPORTING * OUTPUT = PTPRG * TABLES * I550AN = I550AN * I550AO = I550AO * I550PN = I550PN * I550PO = I550PO * PP0001 = P0001 * PP0002 = P0002 * PP0007 = P0007 * PP2001 = P2001 * PP2002 = P2002 * PP2003 = P2003.
RP_ZRETCD * CALL FUNCTION 'RP_ZRETCD' * EXPORTING * MSGTY = 'W' * PTPRG = PTPRG.
HR_PERSONAL_WORK_SCHEDULE CALL FUNCTION 'HR_PERSONAL_WORK_SCHEDULE' EXPORTING pernr = pll40-pernr begda = pll40-budat endda = pll40-budat TABLES * i0000 = p0000 "PH4K007889 * i0001 = p0001 "PH4K007889 * i0002 = p0002 "PH4K007889 * i0007 = p0007 "PH4K007889 * i2001 = p2001 "PH4K007889 * i2002 = p2002 "PH4K007889 * i2003 = p2003 "PH4K007889 perws = pws EXCEPTIONS error_occured = 1 abort_occured = 2 OTHERS = 3.
HR_WORK_SCHEDULE_TIMES CALL FUNCTION 'HR_WORK_SCHEDULE_TIMES' EXPORTING pernr = pll40-pernr begda = pll40-budat endda = pll40-budat TABLES * i0001 = p0001 "PH4K007889 * i0007 = p0007 "PH4K007889 * i2003 = p2003 "PH4K007889 perws = pws daygen = daygen dayint = dayint EXCEPTIONS error_occured = 1 perws_error = 2 OTHERS = 3.
HR_HOURS_MINUS_BREAKS CALL FUNCTION 'HR_HOURS_MINUS_BREAKS' EXPORTING intvl_beguz = begti * intvl_enduz = endti "<-- DELETE note 353399 intvl_enduz = l_endti "<-- INSERT note 353399 IMPORTING * STDAZ = stdaz4 = stdaz4 TABLES breaks = dayint.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'J' textline1 = 'Soll der Vorschlagswert'(d11) textline2 = 'wirklich gelöscht werden'(d12) titel = 'Vorschlagswert löschen'(d10) IMPORTING answer = answer.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'J' textline1 = 'Soll des Zeitintervall'(d21) textline2 = 'wirklich gelöscht werden'(d22) titel = 'Zeitintervall löschen'(d20) IMPORTING answer = answer.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'J' textline1 = 'Soll der Lohnschein'(d01) textline2 = 'wirklich gelöscht werden'(d02) titel = 'Lohnschein löschen'(d00) IMPORTING answer = answer.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'J' textline1 = 'Sollen die Lohnscheine'(d03) textline2 = 'wirklich gelöscht werden'(d04) titel = 'Lohnschein löschen'(d00) IMPORTING answer = answer.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'J' textline1 = 'Soll die letzte Sicherung des Lohn-'(u01) textline2 = 'scheines wiederhergestellt werden'(u02) titel = 'Lohnschein wiederherstellen'(u00) IMPORTING answer = answer.
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING defaultoption = 'J' textline1 = 'Soll die letzte Sicherung der Lohn-'(u03) textline2 = 'scheine wiederhergestellt werden'(u04) titel = text-u00 IMPORTING answer = answer.
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 MP53LF70 or its description.