SAP Reports / Programs | Personnel Time Management(PT) SAP PT

MPT50F10 SAP ABAP INCLUDE - Subroutines for SAPMPT50







MPT50F10 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 MPT50F10 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 MPT50F10. "Basic submit
SUBMIT MPT50F10 AND RETURN. "Return to original report after report execution complete
SUBMIT MPT50F10 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Subroutines for SAPMPT50


INCLUDES used within this REPORT MPT50F10

INCLUDE RPUMKC00.


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_TELEPHONE_CALL CALL FUNCTION 'HR_TELEPHONE_CALL' EXPORTING pernr = call_pernr.

HR_PSBUFFER_INITIALIZE CALL FUNCTION 'HR_PSBUFFER_INITIALIZE'. "0372254

HR_INFOTYPE_OPERATION CALL FUNCTION 'HR_INFOTYPE_OPERATION' EXPORTING infty = '2013' number = rp51l-pernr subtype = p2013-subty OBJECTID = p2013-objps "note507855 validityend = rp51l-gdate validitybegin = rp51l-gdate recordnumber = p2013-seqnr "note507855 record = p2013 operation = p2013_fcode IMPORTING return = return key = pakey.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = titlebar text_question = question text_button_1 = 'Ja '(si3) icon_button_1 = icon_button1 text_button_2 = 'Nein '(si4) icon_button_2 = icon_button2 display_cancel_button = space start_column = 18 start_row = 6 IMPORTING answer = answer EXCEPTIONS text_not_found = 1.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = titlebar text_question = question text_button_1 = 'Ja '(si3) icon_button_1 = icon_button1 text_button_2 = 'Nein '(si4) icon_button_2 = icon_button2 display_cancel_button = space start_column = 18 start_row = 6 IMPORTING answer = answer EXCEPTIONS text_not_found = 1.

HR_TIME_EVALUATION CALL FUNCTION 'HR_TIME_EVALUATION' EXPORTING evaluation_end = rptime_endda selection_variant = rptime_varia log = 'ON' TABLES employee_numbers = employee_numbers buffer = tbuff buffer_directory = buffer_dir ppsoper = psoper EXCEPTIONS variant_not_exist = 1 program_not_exist = 2 OTHERS = 3.

POPUP_TO_CONFIRM CALL FUNCTION 'POPUP_TO_CONFIRM' EXPORTING titlebar = titlebar diagnose_object = 'ERROR_DURING_TIME_EVALUATION' text_question = question text_button_1 = 'Ja '(si3) icon_button_1 = icon_button1 text_button_2 = 'Nein '(si4) icon_button_2 = icon_button2 display_cancel_button = space start_column = 18 start_row = 6 IMPORTING answer = answer EXCEPTIONS text_not_found = 1.

HR_TIME_CLUSTER_B1_GET CALL FUNCTION 'HR_TIME_CLUSTER_B1_GET' EXPORTING int_pernr = rp51l-pernr * NO_AUTHORITY_CHECK = IMPORTING get_no_record_found = no_record_found TABLES get_tbuff = tbuff get_buffer_dir = buffer_dir int_cluster_b1 = int_cluster_b1 EXCEPTIONS wrong_cluster_version = 1 no_read_authority = 2 OTHERS = 3.

HR_READ_INFOTYPE * CALL FUNCTION 'HR_READ_INFOTYPE' * EXPORTING * PERNR = RP51L-PERNR * INFTY = '0003' * BEGDA = SY-DATUM * ENDDA = SY-DATUM * TABLES * INFTY_TAB = P0003 * EXCEPTIONS * INFTY_NOT_FOUND = 1 * OTHERS = 2.

HR_TIME_RESULTS_IN_INTERVAL CALL FUNCTION 'HR_TIME_RESULTS_IN_INTERVAL' EXPORTING int_pernr = rp51l-pernr int_begda = rp51l-gdbeg int_endda = gdend * INT_CLTYP = '1' TABLES get_tbuff = tbuff get_buffer_dir = buffer_dir int_time_results = time_results EXCEPTIONS * NO_PERIOD_SPECIFIED = 1 wrong_cluster_version = 2 no_read_authority = 3 cluster_archived = 4 technical_error = 5 OTHERS = 6 .

HR_TIME_RESULTS_GET * CALL FUNCTION 'HR_TIME_RESULTS_GET' * EXPORTING * GET_PERNR = RP51L-PERNR * GET_PABRJ = I549Q-PABRJ * GET_PABRP = I549Q-PABRP * TABLES * GET_TBUFF = TBUFF * GET_BUFFER_DIR = BUFFER_DIR * GET_QTACC = IMP_QTACC * EXCEPTIONS * WRONG_CLUSTER_VERSION = 1 * NO_READ_AUTHORITY = 2 * CLUSTER_ARCHIVED = 3 * TECHNICAL_ERROR = 4 * OTHERS = 0.

HR_PL_IMPORT_LOG_FROM_MEMORY CALL FUNCTION 'HR_PL_IMPORT_LOG_FROM_MEMORY' EXPORTING mem_key = imp_key.

HR_PL_DISPLAY_LOG CALL FUNCTION 'HR_PL_DISPLAY_LOG' EXPORTING procl = 'T' p_always_log = 'X'.

AUTHORITY_CHECK_TCODE CALL FUNCTION 'AUTHORITY_CHECK_TCODE' EXPORTING tcode = tcode EXCEPTIONS ok = 0 not_ok = 1 OTHERS = 2.

SUSR_AUTHORITY_CHECK_S_TCODE CALL FUNCTION 'SUSR_AUTHORITY_CHECK_S_TCODE' EXPORTING tcode = tcode IMPORTING rc = subrc EXCEPTIONS OTHERS = 1.

HR_PSEL_PERSONS_SELECT CALL FUNCTION 'HR_PSEL_PERSONS_SELECT' EXPORTING sel_view_name = 'PNP_PT50_SEL_PERNR' sel_profile = 'SAP_PT50' sel_begda = rp51l-vabeg sel_endda = rp51l-vaend TABLES sel_pernrs = h_selection_pernrs EXCEPTIONS no_view_name_specified = 1 no_profile_specified = 2 no_person_selected = 3 selection_canceled = 4.

HR_CHECK_AUTHORITY_INFTY CALL FUNCTION 'HR_CHECK_AUTHORITY_INFTY' EXPORTING PERNR = h_selection_pernrs-pernr INFTY = '0001' SUBTY = ' ' BEGDA = rp51l-vabeg ENDDA = rp51l-vaend LEVEL = 'R' EXCEPTIONS NO_AUTHORIZATION = 1 INTERNAL_ERROR = 2 OTHERS = 3.

HR_PSEL_PERSONS_DISPLAY CALL FUNCTION 'HR_PSEL_PERSONS_DISPLAY' EXPORTING show_repid = 'SAPMPT50' show_dynnr = sy-dynnr IMPORTING show_pernr = rp51l-pernr show_tree = tree show_popup = handle TABLES show_pernrs = selection_pernrs.

TREEV_GET_EP_EXPAND_NC





CALL FUNCTION 'TREEV_GET_EP_EXPAND_NC' EXPORTING handle = tree IMPORTING node_key = node_key EXCEPTIONS failed = 1 OTHERS = 2.

TREEV_GET_EP_NODE_DBL_CLK CALL FUNCTION 'TREEV_GET_EP_NODE_DBL_CLK' EXPORTING handle = tree IMPORTING node_key = node_key EXCEPTIONS failed = 1 OTHERS = 2.

HR_PSEL_EXISTENCE_CHECK CALL FUNCTION 'HR_PSEL_EXISTENCE_CHECK' EXPORTING check_tcode = sy-tcode check_uname = sy-uname IMPORTING check_answer = answer.

HR_PSEL_SELECTION_CALLED CALL FUNCTION 'HR_PSEL_SELECTION_CALLED' IMPORTING call_answer = answer.

HR_PSEL_PERSONS_ADD CALL FUNCTION 'HR_PSEL_PERSONS_ADD' EXPORTING add_pernr = rp51l-pernr IMPORTING add_lines = sy-tfill add_posid = sy-tabix TABLES add_pernrs = selection_pernrs.

HR_PSEL_PERSONS_DISPLAY CALL FUNCTION 'HR_PSEL_PERSONS_DISPLAY' EXPORTING show_repid = sy-cprog show_dynnr = sy-dynnr show_begda = sy-datum show_endda = sy-datum TABLES show_pernrs = selection_pernrs.

HR_INITIALIZE_BUFFER CALL FUNCTION 'HR_INITIALIZE_BUFFER' EXPORTING tclas = 'A' pernr = rp51l-pernr.

HR_REFRESH_DISDED_BUFFER CALL FUNCTION 'HR_REFRESH_DISDED_BUFFER'.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = rp51l-pernr infty = '0001' * BEGDA = SY-DATUM "XDGL9CK009790 * ENDDA = SY-DATUM "XDGL9CK009790 begda = '18000101' "XDGL9CK009790 endda = '99991231' "XDGL9CK009790 TABLES infty_tab = p0001 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = rp51l-pernr infty = '0003' begda = sy-datum endda = sy-datum TABLES infty_tab = p0003 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = rp51l-pernr infty = '0007' begda = sy-datum endda = sy-datum TABLES infty_tab = p0007 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

HR_READ_INFOTYPE_AUTHC_DISABLE CALL FUNCTION 'HR_READ_INFOTYPE_AUTHC_DISABLE'.

HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING pernr = rp51l-pernr infty = '0283' TABLES infty_tab = p0283 EXCEPTIONS infty_not_found = 1 OTHERS = 2.

TELEPHONY_ACTIVE_GET CALL FUNCTION 'TELEPHONY_ACTIVE_GET' IMPORTING active = telephony_active.

SCROLLING_IN_TABLE CALL FUNCTION 'SCROLLING_IN_TABLE' EXPORTING entry_act = -top_line entry_to = -lines loops = looplines ok_code = fcode IMPORTING entry_new = -top_line EXCEPTIONS no_entry_or_page_act = 1 no_entry_to = 2 no_ok_code_or_page_go = 3 OTHERS = 4.



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 MPT50F10 or its description.