RPUC65K0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for This report does a mass update of cumulation class
If you would like to execute this report or see the full code listing simply enter RPUC65K0 into the relevant SAP transactions such as SE38 or SE80
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.
Selection Text: IT_WT = Wagetypes
Selection Text: WA_BEGDA = Valid from
Title: Utility to update Cumulation class 65 for Canada specific Wagetypes
Text Symbol: 001 = Wagetype Selection
Text Symbol: 002 = WTyp
Text Symbol: 003 = Wagetype Text
Text Symbol: 004 = Start Date
Text Symbol: 005 = End Date
Text Symbol: 006 = Selected Wagetypes are updated
Text Symbol: 007 = No Wagetypes are updated
Text Symbol: 008 = Cumulation Class 65 will be updated for selected wagetypes.
Text Symbol: 009 = Do you want to continue?
Text Symbol: 010 = Update Cumulation Class 65
Text Symbol: 011 = Lock modifed entries in Customizing Request
Text Symbol: 012 = Customizing changes cannot be recorded in request. Check view T000 for this Client
Text Symbol: 013 = Selected wagetypes are updated and locked
Text Symbol: COR = No correction request chosen
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
POPUP_TO_CONFIRM_STEP CALL FUNCTION 'POPUP_TO_CONFIRM_STEP' EXPORTING DEFAULTOPTION = 'N' TEXTLINE1 = text-008 TEXTLINE2 = text-009 TITEL = text-010 CANCEL_DISPLAY = SPACE IMPORTING ANSWER = retcode.
TR_ORDER_CHOICE_CORRECTION CALL FUNCTION 'TR_ORDER_CHOICE_CORRECTION' EXPORTING IV_CATEGORY = 'CUST' IV_CLI_DEP = 'X' IMPORTING EV_ORDER = TASK_NO EV_TASK = TASK_SUB_NO EXCEPTIONS INVALID_CATEGORY = 01 NO_CORRECTION_SELECTED = 02.
TR_APPEND_TO_COMM_OBJS_KEYS CALL FUNCTION 'TR_APPEND_TO_COMM_OBJS_KEYS' EXPORTING WI_SIMULATION = ' ' WI_SUPPRESS_KEY_CHECK = ' ' WI_TRKORR = TASK_SUB_NO TABLES WT_E071 = E071_TAB WT_E071K = E071K_TAB EXCEPTIONS KEY_CHAR_IN_NON_CHAR_FIELD = 01 KEY_CHECK_KEYSYNTAX_ERROR = 02 KEY_INTTAB_TABLE = 03 KEY_LONGER_FIELD_BUT_NO_GENERC = 04 KEY_MISSING_KEY_MASTER_FIELDS = 05 KEY_MISSING_KEY_TABLEKEY = 06 KEY_NON_CHAR_BUT_NO_GENERIC = 07 KEY_NO_KEY_FIELDS = 08 KEY_STRING_LONGER_CHAR_KEY = 09 KEY_TABLE_HAS_NO_FIELDS = 10 KEY_TABLE_NOT_ACTIV = 11 KEY_UNALLOWED_KEY_FUNCTION = 12 KEY_UNALLOWED_KEY_OBJECT = 13 KEY_UNALLOWED_KEY_OBJNAME = 14 KEY_UNALLOWED_KEY_PGMID = 15 KEY_WITHOUT_HEADER = 16 OB_CHECK_OBJ_ERROR = 17 OB_DEVCLASS_NO_EXIST = 18 OB_EMPTY_KEY = 19 OB_GENERIC_OBJECTNAME = 20 OB_ILL_DELIVERY_TRANSPORT = 21 OB_ILL_LOCK = 22 OB_ILL_PARTS_TRANSPORT = 23 OB_ILL_SOURCE_SYSTEM = 24 OB_ILL_SYSTEM_OBJECT = 25 OB_ILL_TARGET = 26 OB_INTTAB_TABLE = 27 OB_LOCAL_OBJECT = 28 OB_LOCKED_BY_OTHER = 29 OB_MODIF_ONLY_IN_MODIF_ORDER = 30 OB_NAME_TOO_LONG = 31 OB_NO_APPEND_OF_CORR_ENTRY = 32 OB_NO_APPEND_OF_C_MEMBER = 33 OB_NO_CONSOLIDATION_TRANSPORT = 34 OB_NO_ORIGINAL = 35 OB_NO_SHARED_REPAIRS = 36 OB_NO_SYSTEMNAME = 37 OB_NO_SYSTEMTYPE = 38 OB_NO_TADIR = 39 OB_NO_TADIR_NOT_LOCKABLE = 40 OB_PRIVAT_OBJECT = 41 OB_REPAIR_ONLY_IN_REPAIR_ORDER = 42 OB_RESERVED_NAME = 43 OB_SYNTAX_ERROR = 44 OB_TABLE_HAS_NO_FIELDS = 45 OB_TABLE_NOT_ACTIV = 46 TR_ENQUEUE_FAILED = 47 TR_ERRORS_IN_ERROR_TABLE = 48 TR_ILL_KORRNUM = 49 TR_LOCKMOD_FAILED = 50 TR_LOCK_ENQUEUE_FAILED = 51 TR_NOT_OWNER = 52 TR_NO_SYSTEMNAME = 53 TR_NO_SYSTEMTYPE = 54 TR_ORDER_NOT_EXIST = 55 TR_ORDER_RELEASED = 56 TR_ORDER_UPDATE_ERROR = 57 TR_WRONG_ORDER_TYPE = 58 OB_INVALID_TARGET_SYSTEM = 59 TR_NO_AUTHORIZATION = 60 OB_WRONG_TABLETYP = 61 OB_WRONG_CATEGORY = 62 OB_SYSTEM_ERROR = 63 OB_UNLOCAL_OBJEKT_IN_LOCAL_ORD = 64 TR_WRONG_CLIENT = 65 OB_WRONG_CLIENT = 66 KEY_WRONG_CLIENT = 67.
HR_PAL_LOG_REFRESH CALL FUNCTION 'HR_PAL_LOG_REFRESH' exporting i_with_err_and_stat_list = 'X' i_keep_categ = 'X' exceptions others = 99.
HR_PAL_NODE_ADD CALL FUNCTION 'HR_PAL_NODE_ADD' EXPORTING i_relatkey = obj_pal_log->c_root_node i_node_txt = space i_categ_id = c_pal_categids-struk IMPORTING e_node_key = i_node_key EXCEPTIONS OTHERS = 99.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_structure_name = c_alv_structures-struk CHANGING ct_fieldcat = l_i_fieldcat EXCEPTIONS OTHERS = 99.
HR_PAL_LOG_REFRESH CALL FUNCTION 'HR_PAL_LOG_REFRESH' exporting i_with_err_and_stat_list = 'X' i_keep_categ = 'X' exceptions others = 99.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
RPUC65K0 - Utility to update Cumulation class 65 for Canada specific Wagetypes RPUC65K0 - Utility to update Cumulation class 65 for Canada specific Wagetypes RPUC1000 - documentation and ABAP source code RPUC00JC - HR-J(3.0C): Infotype 0141 Conversion master program RPUC00JC - HR-J(3.0C): Infotype 0141 Conversion master program RPUC0002B - Update of infotype I0002 : Name conversion in applicant master data