PCPSRUN04 SAP ABAP INCLUDE - documentation and ABAP source code
PCPSRUN04 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 PCPSRUN04 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 PCPSRUN04. "Basic submit
SUBMIT PCPSRUN04 AND RETURN. "Return to original report after report execution complete
SUBMIT PCPSRUN04 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 PCPSRUN04
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:
RP_SET_NAME_FORMAT CALL FUNCTION 'RP_SET_NAME_FORMAT' EXPORTING repid = sy-repid IMPORTING format = lstat_format.
RP_FILL_WAGE_TYPE_TABLE CALL FUNCTION 'RP_FILL_WAGE_TYPE_TABLE' EXPORTING * APPLI = 'E' begda = pn-begda endda = high_date infty = '0008' * OBJPS = ' ' pernr = p_pernr * SEQNR = ' ' * SUBTY = '0 ' * DLSPL = 'X' * MSGFLG = '' TABLES ppbwla = lt_pbwla pp0008 = p_p0008 pp0230 = lt_p0230 "N955961 EXCEPTIONS error_at_indirect_evaluation = 1 OTHERS = 2 .
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING * TCLAS = 'A' pernr =
-pernr infty = '0001' begda = -begda endda = -begda * BYPASS_BUFFER = ' ' IMPORTING subrc = l_subrc TABLES infty_tab = lt_p0001 EXCEPTIONS infty_not_found = 1 OTHERS = 2 .
HR_READ_INFOTYPE CALL FUNCTION 'HR_READ_INFOTYPE' EXPORTING * TCLAS = 'A' pernr =
-pernr infty = '0002' begda = -begda endda = -begda * BYPASS_BUFFER = ' ' IMPORTING subrc = l_subrc TABLES infty_tab = lt_p0002 EXCEPTIONS infty_not_found = 1 OTHERS = 2 .
RP_EDIT_NAME CALL FUNCTION 'RP_EDIT_NAME' EXPORTING format = lstat_format langu = sy-langu molga = ls_t500p-molga pp0002 = ls_p0002 * TCLAS = 'A' IMPORTING edit_name = l_edit_name retcode = l_subrc .
HRCA_COMPANYCODE_GETLIST CALL FUNCTION 'HRCA_COMPANYCODE_GETLIST' TABLES company_list = lstat_ccode_list EXCEPTIONS OTHERS = 0.
DD_DOMVALUES_GET CALL FUNCTION 'DD_DOMVALUES_GET' EXPORTING domname = 'PSRTY' text = 'X' langu = sy-langu TABLES dd07v_tab = lstat_psrty EXCEPTIONS OTHERS = 0.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = 'HRCM_PSRCL_LOG_ALV1' CHANGING ct_fieldcat = lt_fieldcat.
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = l_repid i_callback_pf_status_set = 'SET_STATUS_ALV1' i_callback_user_command = 'CALLBACK_ALV1' i_callback_top_of_page = 'TOP_OF_PAGE_ALV1' * I_CALLBACK_HTML_TOP_OF_PAGE = ' ' * I_CALLBACK_HTML_END_OF_LIST = ' ' i_grid_title = l_title is_layout = l_layout it_fieldcat = lt_fieldcat i_save = 'A' is_variant = l_variant TABLES t_outtab = pt_alv1 .
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = 'HRCM_PSRCL_LOG_ALV2' CHANGING ct_fieldcat = lt_fieldcat[].
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = l_repid i_callback_pf_status_set = 'SET_STATUS_ALV2' i_grid_title = l_title is_layout = l_layout it_fieldcat = lt_fieldcat[] i_save = 'A' is_variant = l_variant TABLES t_outtab = lt_alv2.
RP_FETCH_ALTERNATE_PERNR CALL FUNCTION 'RP_FETCH_ALTERNATE_PERNR' IMPORTING alter_pernr = lstat_show_perid * RETCODE = EXCEPTIONS OTHERS = 0.
REUSE_ALV_COMMENTARY_WRITE CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' EXPORTING it_list_commentary = lt_header[] * I_LOGO = * I_END_OF_LIST_GRID = .
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = l_repid i_callback_pf_status_set = 'SET_STATUS_ALV2' i_structure_name = 'HRCM_PSRCL_LOG_ALV2' i_grid_title = l_title is_layout = l_layout i_save = 'A' is_variant = l_variant TABLES t_outtab = lt_alv2[].
MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE'.
MESSAGE_STORE CALL FUNCTION 'MESSAGE_STORE' EXPORTING arbgb =
-arbgb msgty = -msgty msgv1 = -msgv1 msgv2 = -msgv2 msgv3 = -msgv3 msgv4 = -msgv4 txtnr = -msgno zeile = -pernr EXCEPTIONS OTHERS = 0.
MESSAGES_SHOW CALL FUNCTION 'MESSAGES_SHOW' EXPORTING object = text-lg8 send_if_one = ' ' * BATCH_LIST_TYPE = 'J' show_linno = 'X' show_linno_text = 'PersNr'(lg9) show_linno_text_len = '8' i_use_grid = 'X' i_amodal_window = ' ' EXCEPTIONS inconsistent_range = 0 no_messages = 0 OTHERS = 0 .
HRCM_ERROR_SHOW CALL FUNCTION 'HRCM_ERROR_SHOW' * EXPORTING * CALLBACK_PROGRAM = ' ' * CALLBACK_USER_COMMAND = ' ' * CALLBACK_PF_STATUS_SET = ' ' * MARK_FLAG = ' ' * TITLE = * SAVE_ON_DB = ' ' * POPUP = ' ' * IMPORTING * LOG_HANDLE = * TABLES * ERRORLIST_EXT = .
CALL FUNCTION 'HRCM_ERROR_SHOW' EXPORTING * CALLBACK_PROGRAM = ' ' * CALLBACK_USER_COMMAND = ' ' * CALLBACK_PF_STATUS_SET = ' ' * MARK_FLAG = ' ' * TITLE = save_on_db = 'X' * POPUP = ' ' * IMPORTING * LOG_HANDLE = * TABLES * ERRORLIST_EXT = .
HRCM_ERROR_SET_ENTRY CALL FUNCTION 'HRCM_ERROR_SET_ENTRY' EXPORTING otype = 'P' objid = l_objid * STEXT = msgty =
-msgty msgid = -arbgb msgno = -msgno msgv1 = -msgv1 msgv2 = -msgv2 msgv3 = -msgv3 msgv4 = -msgv4 * ONLINE_MSGTY = ' ' probclass = l_probclass * MSGTX = ' ' * IMPORTING * LOG_HANDLE = * TABLES * EXT_ERRORTAB = * EXCEPTIONS * INSERT_ERROR = 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 PCPSRUN04 or its description.