RPAR5W00 SAP ABAP Report - PA: Archiving - Write Program for Time Data (PA TIME)
RPAR5W00 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This
If you would like to execute this report or see the full code listing simply enter RPAR5W00 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 RPAR5W00. "Basic submit
SUBMIT RPAR5W00 AND RETURN. "Return to original report after report execution complete
SUBMIT RPAR5W00 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement
Text pool values
Selection Text: ARCH_GRP = D .
Selection Text: TESTRUN = Test run
Selection Text: P_WRITST = Test Mode
Selection Text: P_WRIPRD = Productive Mode
Selection Text: P_PROT = Detail Log
Selection Text: P_DELTST = Delete with Test Variant
Selection Text: P_COMENT = Archiving Flag
Selection Text: PROTOCOL = Detail log
Selection Text: ACOMMENT = Comment/note
Title: PA: Archiving - Write Program for Time Data (PA TIME)
Text Symbol: SE3 = Other data
Text Symbol: SE2 = Test options
Text Symbol: SE1 = Other selection
Text Symbol: PER = Personnel no.
Text Symbol: NUM = No. of personnel numbers in archiving group
Text Symbol: NOM = No personnel numbers in archiving group
Text Symbol: ER9 = Error in time data-terminated for pers.no.
Text Symbol: ABO = Program terminated
Text Symbol: 004 = Evaluation Result Archived for Destruction
Text Symbol: 003 = Retention Per. End Reached
Text Symbol: 002 = &1% (&2 of &3) of evaluation results have been processed
Text Symbol: 001 = Archiving groups
INCLUDES used within this REPORT RPAR5W00
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:
ARCHIVE_PROTOCOL_LINE_DETAIL CALL FUNCTION 'ARCHIVE_PROTOCOL_LINE_DETAIL'.
HR_ARCH_B2_CONSTRUCT_KEYS CALL FUNCTION 'HR_ARCH_B2_CONSTRUCT_KEYS' EXPORTING pernr_arc = p_pernr arc_group = arch_grp TABLES b2_keytab = l_key_tab EXCEPTIONS no_archived_clusters = 1 OTHERS = 2.
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING archive_handle = my_archive_handle object_id = p_pernr.
ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING archive_handle = my_archive_handle object_id = p_pernr.
PA_TIME_ARCHIVE_OBJECT CALL FUNCTION 'PA_TIME_ARCHIVE_OBJECT' EXPORTING archive_handle = my_archive_handle object_key = l_object_key.
ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING archive_handle = my_archive_handle * IMPORTING * OBJECT_OFFSET = * ARCHIVE_NAME = EXCEPTIONS file_io_error = 1 internal_error = 2 open_error = 3 termination_requested = 4 wrong_access_to_archive = 5 data_object_not_saved = 6 OTHERS = 7 .
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_object = lv_object_id i_msgid = sy-msgid i_msgno = sy-msgno i_msgtype = 2.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_object = lv_object_id i_msgid = sy-msgid i_msgno = sy-msgno i_msgv1 = lv_period i_msgv2 = lv_year i_msgtype = 1.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_object = lv_object_id i_msgtype = 1 i_msgid = sy-msgid i_msgno = sy-msgno i_msgv1 = lv_period i_msgv2 = lv_year.
PROGRESS_INDICATOR CALL FUNCTION 'PROGRESS_INDICATOR' EXPORTING "i_text = '&1% (&2 of &3) of the Evaluation Result have been processed'(002) "#EC * "text shall be understandable for EN-speaking coleagues i_msgid = sy-msgid i_msgno = sy-msgno i_processed = number_to_archive i_total = lv_total_objects IMPORTING e_progress_sent = lv_progress_send.
DB_COMMIT CALL FUNCTION 'DB_COMMIT'. "otherwise messag will not appear in the job-log
ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING archive_handle = my_archive_handle.
PROGRESS_INDICATOR CALL FUNCTION 'PROGRESS_INDICATOR' EXPORTING i_msgid = sy-msgid i_msgno = sy-msgno i_processed = number_to_archive i_total = lv_total_objects i_output_immediately = 'X'. "force the progress output ENDIF.
PA_TIME_TESTMODE CALL FUNCTION 'PA_TIME_TESTMODE' EXPORTING testmode_on_off = testrun.
PA_TIME_SET_OR_GET_PERMO CALL FUNCTION 'PA_TIME_SET_OR_GET_PERMO' EXPORTING archive_handle = my_archive_handle permo_in = l_permo_time.
ARCHIVE_PROTOCOL_INIT CALL FUNCTION 'ARCHIVE_PROTOCOL_INIT' EXPORTING i_detailprotocol = protocol i_protocol_output = ' '.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_msgid = sy-msgid i_msgno = sy-msgno.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_msgid = sy-msgid i_msgno = sy-msgno.
CALL FUNCTION 'ARCHIVE_OPEN_FOR_WRITE' EXPORTING call_delete_job_in_test_mode = testrun create_archive_file = create object = this_object comments = acomment do_not_delete_data = l_not_delete destroy = l_destroy IMPORTING archive_handle = my_archive_handle EXCEPTIONS internal_error = 1 object_not_found = 2 open_error = 3 not_authorized = 4 OTHERS = 5.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_msgid = sy-msgid i_msgno = sy-msgno i_msgtype = 2.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_msgid = sy-msgid i_msgno = sy-msgno i_msgtype = 2.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_msgid = sy-msgid i_msgno = sy-msgno i_msgtype = 2.
ARCHIVE_PROTOCOL_COLLECT CALL FUNCTION 'ARCHIVE_PROTOCOL_COLLECT' EXPORTING i_msgid = sy-msgid i_msgno = sy-msgno i_msgtype = 2.
ARCHIVE_OPEN_FOR_WRITE CALL FUNCTION 'ARCHIVE_OPEN_FOR_WRITE' EXPORTING call_delete_job_in_test_mode = testrun create_archive_file = create object = this_object comments = acomment IMPORTING archive_handle = my_archive_handle EXCEPTIONS internal_error = 1 object_not_found = 2 open_error = 3 not_authorized = 4.
ARCHIVE_GET_INFORMATION CALL FUNCTION 'ARCHIVE_GET_INFORMATION' EXPORTING archive_handle = my_archive_handle IMPORTING archive_document = archive_document.
ARCHIVE_WRITE_STATISTICS CALL FUNCTION 'ARCHIVE_WRITE_STATISTICS' EXPORTING archive_handle = my_archive_handle.
ARCHIVE_PROTOCOL_WRITE CALL FUNCTION 'ARCHIVE_PROTOCOL_WRITE'.
ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING archive_handle = my_archive_handle.
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 RPAR5W00 or its description.
RPAR5W00 - PA: Archiving - Write Program for Time Data (PA TIME) RPAR5W00 - PA: Archiving - Write Program for Time Data (PA TIME) RPAR5U40 - HR Archiving: Convert PA_TIME to 4.0 RPAR5U40 - HR Archiving: Convert PA_TIME to 4.0 RPAR5R00 - PA: Archiving - Reload Program for Time Data (PA TIME) RPAR5R00 - PA: Archiving - Reload Program for Time Data (PA TIME)