SAP Reports / Programs

RPAR5U40 SAP ABAP Report - HR Archiving: Convert PA_TIME to 4.0







RPAR5U40 is a standard Executable ABAP Report 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 RPAR5U40 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 RPAR5U40. "Basic submit
SUBMIT RPAR5U40 AND RETURN. "Return to original report after report execution complete
SUBMIT RPAR5U40 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: PROTOCOL = Detail log
Selection Text: RUN = Archiving Session Number
Selection Text: TESTRUN = D Test run
Title: HR Archiving: Convert PA_TIME to 4.0
Text Symbol: 019 = Convert release
Text Symbol: E42 = Error while updating IT 0283
Text Symbol: ER1 = Program terminated
Text Symbol: ERE = Rel. too high
Text Symbol: NUM = Number of objects deleted
Text Symbol: SE1 = Test options


INCLUDES used within this REPORT RPAR5U40

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:

PA_TIME_TESTMODE CALL FUNCTION 'PA_TIME_TESTMODE' EXPORTING testmode_on_off = protocol EXCEPTIONS OTHERS = ERROR_OTHERS.

ARCHIVE_OPEN_FOR_CONVERSION CALL FUNCTION 'ARCHIVE_OPEN_FOR_CONVERSION' EXPORTING OBJECT = THIS_OBJECT TEST_MODE = TESTRUN IMPORTING ARCHIVE_READ_HANDLE = MY_ARCHIVE_HANDLE_FROM ARCHIVE_WRITE_HANDLE = MY_ARCHIVE_HANDLE_TO * TABLES * ARCHIVE_RUNS = EXCEPTIONS FILE_ALREADY_OPEN = ERROR_FILE_ALREADY_OPEN FILE_IO_ERROR = ERROR_FILE_IO_ERROR INTERNAL_ERROR = ERROR_INTERNAL_ERROR NO_FILES_AVAILABLE = ERROR_NO_FILES_AVAILABLE OBJECT_NOT_FOUND = ERROR_OBJECT_NOT_FOUND OPEN_ERROR = ERROR_OPEN_ERROR NOT_AUTHORIZED = ERROR_NOT_AUTHORIZED.

ARCHIVE_GET_INFORMATION CALL FUNCTION 'ARCHIVE_GET_INFORMATION' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_FROM IMPORTING ARCHIVE_CREATION_RELEASE = L_SAP_RELEASE ARCHIVE_DOCUMENT = MY_DOCUMENT_FROM EXCEPTIONS INTERNAL_ERROR = 1 WRONG_ACCESS_TO_ARCHIVE = 2 OTHERS = 3.

ARCHIVE_GET_INFORMATION CALL FUNCTION 'ARCHIVE_GET_INFORMATION' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO IMPORTING ARCHIVE_DOCUMENT = MY_DOCUMENT_TO EXCEPTIONS INTERNAL_ERROR = 1 WRONG_ACCESS_TO_ARCHIVE = 2 OTHERS = 3.

ARCHIVE_GET_CUSTOMIZING_DATA CALL FUNCTION 'ARCHIVE_GET_CUSTOMIZING_DATA' EXPORTING OBJECT = THIS_OBJECT IMPORTING COMMIT_COUNT_FOR_DELETE_PRG = MY_COMMIT_COUNT EXCEPTIONS OBJECT_NOT_FOUND = ERROR_OBJECT_NOT_FOUND.

ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_FROM IMPORTING * object_offset = l_offset ARCHIVE_NAME = MY_ARCHIVE_NAME OBJECT_ID = L_OBJECT_ID EXCEPTIONS END_OF_FILE = ERROR_END_OF_FILE FILE_IO_ERROR = ERROR_FILE_IO_ERROR INTERNAL_ERROR = ERROR_INTERNAL_ERROR OPEN_ERROR = ERROR_OPEN_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.

PA_TIME_READ_OBJECT CALL FUNCTION 'PA_TIME_READ_OBJECT' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_FROM OBJECT_KEY = L_OBJECT_ID TABLES OBJECT = L_OBJECT_TAB EXCEPTIONS WRONG_ARCHIVE_HANDLE = 1 OTHERS = 2.

ARCHIVE_NEW_OBJECT CALL FUNCTION 'ARCHIVE_NEW_OBJECT' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO OBJECT_ID = L_OBJECT_ID EXCEPTIONS INTERNAL_ERROR = ERROR_INTERNAL_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.

HR_ARCHIVE_CONV_31_40_TIME CALL FUNCTION 'HR_ARCHIVE_CONV_31_40_TIME' EXPORTING LOG = PROTOCOL TABLES ARCHIVE_PCL2 = L_OBJECT_TAB EXCEPTIONS CONVERSION_FAILED = 1 OTHERS = 2.

PA_TIME_OBJECT_SET CALL FUNCTION 'PA_TIME_OBJECT_SET' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO TABLES * hier muss die umgesetzte Tabelle stehen: OBJECT = L_OBJECT_TAB.

ARCHIVE_SAVE_OBJECT CALL FUNCTION 'ARCHIVE_SAVE_OBJECT' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO EXCEPTIONS FILE_IO_ERROR = ERROR_FILE_IO_ERROR INTERNAL_ERROR = ERROR_INTERNAL_ERROR OPEN_ERROR = ERROR_OPEN_ERROR TERMINATION_REQUESTED = ERROR_TERMINATION_REQUESTED WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE OTHERS = ERROR_OTHERS.

ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_FROM IMPORTING ARCHIVE_NAME = MY_ARCHIVE_NAME OBJECT_ID = L_OBJECT_ID EXCEPTIONS END_OF_FILE = ERROR_END_OF_FILE FILE_IO_ERROR = ERROR_FILE_IO_ERROR INTERNAL_ERROR = ERROR_INTERNAL_ERROR OPEN_ERROR = ERROR_OPEN_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.

ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO IMPORTING OBJECT_OFFSET = L_OFFSET ARCHIVE_NAME = MY_ARCHIVE_NAME OBJECT_ID = L_OBJECT_ID EXCEPTIONS END_OF_FILE = ERROR_END_OF_FILE FILE_IO_ERROR = ERROR_FILE_IO_ERROR INTERNAL_ERROR = ERROR_INTERNAL_ERROR OPEN_ERROR = ERROR_OPEN_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.

ARCHIVE_DELETE_OBJECT_DATA CALL FUNCTION 'ARCHIVE_DELETE_OBJECT_DATA' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO EXCEPTIONS INTERNAL_ERROR = ERROR_INTERNAL_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.

ARCHIVE_GET_NEXT_OBJECT CALL FUNCTION 'ARCHIVE_GET_NEXT_OBJECT' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO IMPORTING OBJECT_OFFSET = L_OFFSET ARCHIVE_NAME = MY_ARCHIVE_NAME OBJECT_ID = L_OBJECT_ID EXCEPTIONS END_OF_FILE = ERROR_END_OF_FILE FILE_IO_ERROR = ERROR_FILE_IO_ERROR INTERNAL_ERROR = ERROR_INTERNAL_ERROR OPEN_ERROR = ERROR_OPEN_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.

PA_TIME_TESTMODE CALL FUNCTION 'PA_TIME_TESTMODE' EXPORTING testmode_on_off = protocol EXCEPTIONS OTHERS = ERROR_OTHERS.

ARCHIVE_OPEN_FOR_READ CALL FUNCTION 'ARCHIVE_OPEN_FOR_READ' EXPORTING * ARCHIVE_DOCUMENT = '000000' * ARCHIVE_NAME = ' ' OBJECT = THIS_OBJECT * MAINTAIN_INDEX = ' ' IMPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO * TABLES * ARCHIVE_FILES = * SELECTED_FILES = EXCEPTIONS FILE_ALREADY_OPEN = 1 FILE_IO_ERROR = 2 INTERNAL_ERROR = 3 NO_FILES_AVAILABLE = 4 OBJECT_NOT_FOUND = 5 OPEN_ERROR = 6 NOT_AUTHORIZED = 7 OTHERS = 8.

ARCHIVE_GET_INFORMATION CALL FUNCTION 'ARCHIVE_GET_INFORMATION' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO IMPORTING ARCHIVE_DOCUMENT = MY_DOCUMENT_TO EXCEPTIONS INTERNAL_ERROR = 1 WRONG_ACCESS_TO_ARCHIVE = 2 OTHERS = 3.

ARCHIVE_GET_CUSTOMIZING_DATA





CALL FUNCTION 'ARCHIVE_GET_CUSTOMIZING_DATA' EXPORTING OBJECT = THIS_OBJECT IMPORTING COMMIT_COUNT_FOR_DELETE_PRG = MY_COMMIT_COUNT EXCEPTIONS OBJECT_NOT_FOUND = ERROR_OBJECT_NOT_FOUND.

ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_TO EXCEPTIONS INTERNAL_ERROR = ERROR_INTERNAL_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.

ARCHIVE_CLOSE_FILE CALL FUNCTION 'ARCHIVE_CLOSE_FILE' EXPORTING ARCHIVE_HANDLE = MY_ARCHIVE_HANDLE_FROM EXCEPTIONS INTERNAL_ERROR = ERROR_INTERNAL_ERROR WRONG_ACCESS_TO_ARCHIVE = ERROR_WRONG_ACCESS_TO_ARCHIVE.



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