76: p_sql OUT NOCOPY VARCHAR2)
77: IS
78: BEGIN
79:
80: g_debug := hr_utility.debug_enabled;
81:
82: IF g_debug
83: THEN
84: hr_utility.set_location('Start of range_code ',1);
80: g_debug := hr_utility.debug_enabled;
81:
82: IF g_debug
83: THEN
84: hr_utility.set_location('Start of range_code ',1);
85: END IF;
86:
87: p_sql := ' select distinct p.person_id' ||
88: ' from per_people_f p,' ||
92: ' order by p.person_id';
93:
94: IF g_debug
95: THEN
96: hr_utility.set_location('End of range_code',2);
97: END IF;
98: END range_code;
99:
100: /*
131: l_report_param_val varchar2(30);
132:
133: BEGIN
134:
135: g_debug := hr_utility.debug_enabled;
136:
137: BEGIN
138:
139: open csr_action_parameter;
150: --
151: IF l_action_param_val = 'Y' AND l_report_param_val = 'Y' THEN
152: l_return := TRUE;
153: IF g_debug THEN
154: hr_utility.set_location('Range Person = True',1);
155: END IF;
156: ELSE
157: l_return := FALSE;
158: END IF;
179: l_procedure VARCHAR2(80);
180:
181: BEGIN
182:
183: g_debug := hr_utility.debug_enabled;
184: IF g_debug
185: THEN
186: l_procedure := g_package||'.initialization_code_amend';
187: hr_utility.set_location('In Procedure '||l_procedure,1000);
183: g_debug := hr_utility.debug_enabled;
184: IF g_debug
185: THEN
186: l_procedure := g_package||'.initialization_code_amend';
187: hr_utility.set_location('In Procedure '||l_procedure,1000);
188: END IF;
189:
190: pay_au_payment_summary.initialization_code(p_payroll_action_id);
191: pay_au_payment_summary.g_payment_summary_type := 'A'; /*Reset the Payment Summary Type Variable */
192: populate_user_entity_types; /* Initialize the DB Item Types */
193:
194: IF g_debug
195: THEN
196: hr_utility.set_location('Leaving Procedure '||l_procedure,1000);
197: END IF;
198:
199: EXCEPTION
200: WHEN others THEN
198:
199: EXCEPTION
200: WHEN others THEN
201: IF g_debug THEN
202: hr_utility.set_location('Error in initialization_code',1000);
203: END IF;
204: raise;
205: END initialization_code;
206:
548: FROM dual;
549:
550: BEGIN
551:
552: g_debug := hr_utility.debug_enabled;
553:
554: IF g_debug
555: THEN
556: l_procedure := g_package||'.assignment_action_coded';
553:
554: IF g_debug
555: THEN
556: l_procedure := g_package||'.assignment_action_coded';
557: hr_utility.set_location('In Procedure '||l_procedure,1020);
558: END IF;
559:
560: /* Get the paramters for archival process */
561: OPEN get_params(p_payroll_action_id);
579: v_multiple_flag := nvl(v_multiple_flag, 'N'); /* 14621185 */
580:
581: IF g_debug
582: THEN
583: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
584: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
585: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
580:
581: IF g_debug
582: THEN
583: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
584: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
585: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
588: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
581: IF g_debug
582: THEN
583: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
584: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
585: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
588: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
589: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
582: THEN
583: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
584: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
585: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
588: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
589: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
590: hr_utility.set_location('v_multiple_flag '||v_multiple_flag,1030);
583: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
584: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
585: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
588: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
589: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
590: hr_utility.set_location('v_multiple_flag '||v_multiple_flag,1030);
591: END IF;
584: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
585: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
588: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
589: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
590: hr_utility.set_location('v_multiple_flag '||v_multiple_flag,1030);
591: END IF;
592:
585: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
588: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
589: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
590: hr_utility.set_location('v_multiple_flag '||v_multiple_flag,1030);
591: END IF;
592:
593: IF v_multiple_flag = 'Y' THEN /* 14621185 - 12.1 release onwards only */
586: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
587: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
588: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
589: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
590: hr_utility.set_location('v_multiple_flag '||v_multiple_flag,1030);
591: END IF;
592:
593: IF v_multiple_flag = 'Y' THEN /* 14621185 - 12.1 release onwards only */
594: IF v_assignment_id IS NOT NULL
615: THEN
616:
617: IF range_person_on THEN /* 9113084 - Use new Range Person Cursor if Range Person is enabled */
618: IF g_debug THEN
619: hr_utility.set_location('Using Range Person Cursor for fetching assignments ', 5);
620: END IF;
621: FOR csr_rec IN multi_range_assignments(p_payroll_action_id
622: ,p_chunk
623: ,to_number(v_assignment_set_id)
681: THEN
682:
683: IF range_person_on THEN /* 9113084 - Use new Range Person Cursor if Range Person is enabled */
684: IF g_debug THEN
685: hr_utility.set_location('Using Range Person Cursor for fetching assignments ', 15);
686: END IF;
687: FOR csr_rec IN range_process_assignments(p_payroll_action_id
688: ,p_chunk
689: ,to_number(v_assignment_set_id)
725: END IF;
726:
727:
728: IF g_debug THEN
729: hr_utility.set_location('Leaving '||l_procedure,1040);
730: END IF;
731:
732: EXCEPTION
733: WHEN others THEN
731:
732: EXCEPTION
733: WHEN others THEN
734: IF g_debug THEN
735: hr_utility.set_location('Error raised in assignment_action_code_amend procedure ',1050);
736: END IF;
737: raise;
738: END assignment_action_code;
739:
859: l_procedure VARCHAR2(200);
860:
861: BEGIN
862:
863: g_debug := hr_utility.debug_enabled;
864: IF g_debug
865: THEN
866: l_procedure := g_package||'.populate_user_entity_types';
867: hr_utility.set_location('Entering Procedure '||l_procedure,2400);
863: g_debug := hr_utility.debug_enabled;
864: IF g_debug
865: THEN
866: l_procedure := g_package||'.populate_user_entity_types';
867: hr_utility.set_location('Entering Procedure '||l_procedure,2400);
868: END IF;
869:
870: OPEN csr_payg_items;
871: FETCH csr_payg_items BULK COLLECT INTO g_payg_db_items;
900: CLOSE csr_fw2_payg_items;
901:
902: IF g_debug
903: THEN
904: hr_utility.set_location('Leaving Procedure '||l_procedure,2420);
905: END IF;
906: END populate_user_entity_types;
907:
908: /*
940: l_found BOOLEAN;
941:
942: BEGIN
943:
944: g_debug := hr_utility.debug_enabled;
945:
946: IF g_debug
947: THEN
948: l_procedure := g_package||'.check_user_entity_type';
945:
946: IF g_debug
947: THEN
948: l_procedure := g_package||'.check_user_entity_type';
949: hr_utility.set_location('Entering Procedure '||l_procedure,2500);
950: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2510);
951: END IF;
952:
953: IF p_user_entity_name IN ('X_PAYG_PAYMENT_SUMMARY_TYPE','X_PAYMENT_SUMMARY_TYPE','X_ETP1_PAYMENT_SUMMARY_TYPE'
946: IF g_debug
947: THEN
948: l_procedure := g_package||'.check_user_entity_type';
949: hr_utility.set_location('Entering Procedure '||l_procedure,2500);
950: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2510);
951: END IF;
952:
953: IF p_user_entity_name IN ('X_PAYG_PAYMENT_SUMMARY_TYPE','X_PAYMENT_SUMMARY_TYPE','X_ETP1_PAYMENT_SUMMARY_TYPE'
954: ,'X_ETP2_PAYMENT_SUMMARY_TYPE','X_ETP3_PAYMENT_SUMMARY_TYPE','X_ETP4_PAYMENT_SUMMARY_TYPE'
1072:
1073: END IF;
1074:
1075: IF g_debug THEN
1076: hr_utility.set_location('Return Value '||l_return_value,2520);
1077: hr_utility.set_location('Leaving Procedure '||l_procedure,2530);
1078: END IF;
1079:
1080: RETURN NVL(l_return_value,'CMN');
1073: END IF;
1074:
1075: IF g_debug THEN
1076: hr_utility.set_location('Return Value '||l_return_value,2520);
1077: hr_utility.set_location('Leaving Procedure '||l_procedure,2530);
1078: END IF;
1079:
1080: RETURN NVL(l_return_value,'CMN');
1081:
1110:
1111: IF g_debug
1112: THEN
1113: l_procedure := g_package||'.compare_user_entity_value';
1114: hr_utility.set_location('Entering Function '||l_procedure,2600);
1115: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
1116: hr_utility.set_location('p_value1 '||p_value1,2620);
1117: hr_utility.set_location('p_value2 '||p_value2,2620);
1118: hr_utility.set_location('p_data_type '||p_data_type,2620);
1111: IF g_debug
1112: THEN
1113: l_procedure := g_package||'.compare_user_entity_value';
1114: hr_utility.set_location('Entering Function '||l_procedure,2600);
1115: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
1116: hr_utility.set_location('p_value1 '||p_value1,2620);
1117: hr_utility.set_location('p_value2 '||p_value2,2620);
1118: hr_utility.set_location('p_data_type '||p_data_type,2620);
1119: END IF;
1112: THEN
1113: l_procedure := g_package||'.compare_user_entity_value';
1114: hr_utility.set_location('Entering Function '||l_procedure,2600);
1115: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
1116: hr_utility.set_location('p_value1 '||p_value1,2620);
1117: hr_utility.set_location('p_value2 '||p_value2,2620);
1118: hr_utility.set_location('p_data_type '||p_data_type,2620);
1119: END IF;
1120:
1113: l_procedure := g_package||'.compare_user_entity_value';
1114: hr_utility.set_location('Entering Function '||l_procedure,2600);
1115: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
1116: hr_utility.set_location('p_value1 '||p_value1,2620);
1117: hr_utility.set_location('p_value2 '||p_value2,2620);
1118: hr_utility.set_location('p_data_type '||p_data_type,2620);
1119: END IF;
1120:
1121: l_return_flag := 'Y'; /* Default - Values Match */
1114: hr_utility.set_location('Entering Function '||l_procedure,2600);
1115: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
1116: hr_utility.set_location('p_value1 '||p_value1,2620);
1117: hr_utility.set_location('p_value2 '||p_value2,2620);
1118: hr_utility.set_location('p_data_type '||p_data_type,2620);
1119: END IF;
1120:
1121: l_return_flag := 'Y'; /* Default - Values Match */
1122:
1140: END IF;
1141:
1142: IF g_debug
1143: THEN
1144: hr_utility.set_location('l_return_flag '||l_return_flag,2640);
1145: hr_utility.set_location('Leaving Function '||l_procedure,2650);
1146: END IF;
1147:
1148: RETURN l_return_flag;
1141:
1142: IF g_debug
1143: THEN
1144: hr_utility.set_location('l_return_flag '||l_return_flag,2640);
1145: hr_utility.set_location('Leaving Function '||l_procedure,2650);
1146: END IF;
1147:
1148: RETURN l_return_flag;
1149:
1204: l_item_type VARCHAR2(20);
1205:
1206:
1207: BEGIN
1208: g_debug := hr_utility.debug_enabled;
1209:
1210: IF g_debug
1211: THEN
1212: l_procedure := g_package||'.find_new_missing_items';
1209:
1210: IF g_debug
1211: THEN
1212: l_procedure := g_package||'.find_new_missing_items';
1213: hr_utility.set_location('Entering Procedure '||l_procedure,3500);
1214: END IF;
1215:
1216: l_diff_count := p_old_count - p_new_count;
1217:
1248: /* DB Item missing in New Archive.
1249: Set the Amend Flags */
1250: IF g_debug
1251: THEN
1252: hr_utility.set_location('Missing Item Found '||csr_rec.user_entity_name,3510);
1253: END IF;
1254: l_item_type := check_user_entity_type(csr_rec.user_entity_name);
1255: IF l_item_type = 'PAYG'
1256: THEN
1285: END LOOP;
1286:
1287: IF g_debug
1288: THEN
1289: hr_utility.set_location('Payment Summary Flags ',3520);
1290: IF (l_amend_types_new.COUNT > 0 )
1291: THEN
1292: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
1293: LOOP
1290: IF (l_amend_types_new.COUNT > 0 )
1291: THEN
1292: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
1293: LOOP
1294: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_amend_types_new(i).db_item_name,1,50),50,' ')||rpad(l_amend_types_new(i).db_item_value,30,' '),3530);
1295: END LOOP;
1296: hr_utility.set_location('Leaving Procedure '||l_procedure,3540);
1297: END IF;
1298: END IF;
1292: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
1293: LOOP
1294: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_amend_types_new(i).db_item_name,1,50),50,' ')||rpad(l_amend_types_new(i).db_item_value,30,' '),3530);
1295: END LOOP;
1296: hr_utility.set_location('Leaving Procedure '||l_procedure,3540);
1297: END IF;
1298: END IF;
1299:
1300: END find_new_missing_items;
1365: l_counter number;
1366:
1367: BEGIN
1368:
1369: g_debug := hr_utility.debug_enabled;
1370:
1371: IF g_debug
1372: THEN
1373: l_procedure := g_package||'.slot_items_build_archive_list';
1370:
1371: IF g_debug
1372: THEN
1373: l_procedure := g_package||'.slot_items_build_archive_list';
1374: hr_utility.set_location('Entering Procedure '||l_procedure,3700);
1375: END IF;
1376:
1377:
1378: l_etp_cmn_flag := 'O'; /* Initialize ETP Common Change Flag to O */
1913:
1914: END IF;
1915:
1916: if g_debug then
1917: hr_utility.trace('PAYG/FW change comparision -');
1918: hr_utility.trace('l_payg_new_sum : '||l_payg_new_sum);
1919: hr_utility.trace('l_payg_old_sum : '||l_payg_old_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1914: END IF;
1915:
1916: if g_debug then
1917: hr_utility.trace('PAYG/FW change comparision -');
1918: hr_utility.trace('l_payg_new_sum : '||l_payg_new_sum);
1919: hr_utility.trace('l_payg_old_sum : '||l_payg_old_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1915:
1916: if g_debug then
1917: hr_utility.trace('PAYG/FW change comparision -');
1918: hr_utility.trace('l_payg_new_sum : '||l_payg_new_sum);
1919: hr_utility.trace('l_payg_old_sum : '||l_payg_old_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1916: if g_debug then
1917: hr_utility.trace('PAYG/FW change comparision -');
1918: hr_utility.trace('l_payg_new_sum : '||l_payg_new_sum);
1919: hr_utility.trace('l_payg_old_sum : '||l_payg_old_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1917: hr_utility.trace('PAYG/FW change comparision -');
1918: hr_utility.trace('l_payg_new_sum : '||l_payg_new_sum);
1919: hr_utility.trace('l_payg_old_sum : '||l_payg_old_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1925: hr_utility.trace('l_fw2_old_sum : '||l_fw2_old_sum);
1918: hr_utility.trace('l_payg_new_sum : '||l_payg_new_sum);
1919: hr_utility.trace('l_payg_old_sum : '||l_payg_old_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1925: hr_utility.trace('l_fw2_old_sum : '||l_fw2_old_sum);
1926: hr_utility.trace('l_fw2_new_sub_sum : '||l_fw2_new_sub_sum);
1919: hr_utility.trace('l_payg_old_sum : '||l_payg_old_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1925: hr_utility.trace('l_fw2_old_sum : '||l_fw2_old_sum);
1926: hr_utility.trace('l_fw2_new_sub_sum : '||l_fw2_new_sub_sum);
1927: hr_utility.trace('l_fw2_old_sub_sum : '||l_fw2_old_sub_sum);
1920: hr_utility.trace('l_fw1_new_sum : '||l_fw1_new_sum);
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1925: hr_utility.trace('l_fw2_old_sum : '||l_fw2_old_sum);
1926: hr_utility.trace('l_fw2_new_sub_sum : '||l_fw2_new_sub_sum);
1927: hr_utility.trace('l_fw2_old_sub_sum : '||l_fw2_old_sub_sum);
1928: end if;
1921: hr_utility.trace('l_fw1_old_sum : '||l_fw1_old_sum);
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1925: hr_utility.trace('l_fw2_old_sum : '||l_fw2_old_sum);
1926: hr_utility.trace('l_fw2_new_sub_sum : '||l_fw2_new_sub_sum);
1927: hr_utility.trace('l_fw2_old_sub_sum : '||l_fw2_old_sub_sum);
1928: end if;
1929:
1922: hr_utility.trace('l_fw1_new_sub_sum : '||l_fw1_new_sub_sum);
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1925: hr_utility.trace('l_fw2_old_sum : '||l_fw2_old_sum);
1926: hr_utility.trace('l_fw2_new_sub_sum : '||l_fw2_new_sub_sum);
1927: hr_utility.trace('l_fw2_old_sub_sum : '||l_fw2_old_sub_sum);
1928: end if;
1929:
1930: END IF;
1923: hr_utility.trace('l_fw1_old_sub_sum : '||l_fw1_old_sub_sum);
1924: hr_utility.trace('l_fw2_new_sum : '||l_fw2_new_sum);
1925: hr_utility.trace('l_fw2_old_sum : '||l_fw2_old_sum);
1926: hr_utility.trace('l_fw2_new_sub_sum : '||l_fw2_new_sub_sum);
1927: hr_utility.trace('l_fw2_old_sub_sum : '||l_fw2_old_sub_sum);
1928: end if;
1929:
1930: END IF;
1931:
1948: IF g_debug
1949: THEN
1950: IF ( l_cmn_tab_new.COUNT > 0)
1951: THEN
1952: hr_utility.set_location(' COMMON ITEMS ',3710);
1953:
1954: FOR i IN l_cmn_tab_new.FIRST..l_cmn_tab_new.LAST
1955: LOOP
1956: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_cmn_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_cmn_tab_new(i).db_item_value,30,' '),3710);
1952: hr_utility.set_location(' COMMON ITEMS ',3710);
1953:
1954: FOR i IN l_cmn_tab_new.FIRST..l_cmn_tab_new.LAST
1955: LOOP
1956: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_cmn_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_cmn_tab_new(i).db_item_value,30,' '),3710);
1957: END LOOP;
1958: END IF;
1959:
1960: IF ( l_payg_tab_new.COUNT > 0)
1958: END IF;
1959:
1960: IF ( l_payg_tab_new.COUNT > 0)
1961: THEN
1962: hr_utility.set_location(' STANDARD ITEMS ',3720);
1963:
1964: FOR i IN l_payg_tab_new.FIRST..l_payg_tab_new.LAST
1965: LOOP
1966: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_payg_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_payg_tab_new(i).db_item_value,30,' '),3720);
1962: hr_utility.set_location(' STANDARD ITEMS ',3720);
1963:
1964: FOR i IN l_payg_tab_new.FIRST..l_payg_tab_new.LAST
1965: LOOP
1966: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_payg_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_payg_tab_new(i).db_item_value,30,' '),3720);
1967: END LOOP;
1968: END IF;
1969:
1970:
1969:
1970:
1971: IF ( l_etp_cmn_tab_new.COUNT > 0)
1972: THEN
1973: hr_utility.set_location(' ETP COMMON ITEMS ',3730);
1974:
1975: FOR i IN l_etp_cmn_tab_new.FIRST..l_etp_cmn_tab_new.LAST
1976: LOOP
1977: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_cmn_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_cmn_tab_new(i).db_item_value,30,' '),3730);
1973: hr_utility.set_location(' ETP COMMON ITEMS ',3730);
1974:
1975: FOR i IN l_etp_cmn_tab_new.FIRST..l_etp_cmn_tab_new.LAST
1976: LOOP
1977: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_cmn_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_cmn_tab_new(i).db_item_value,30,' '),3730);
1978: END LOOP;
1979: END IF;
1980:
1981: IF (l_etp_1_tab_new.COUNT > 0)
1979: END IF;
1980:
1981: IF (l_etp_1_tab_new.COUNT > 0)
1982: THEN
1983: hr_utility.set_location(' ETP 1 ITEMS ',3740);
1984:
1985: FOR i IN l_etp_1_tab_new.FIRST..l_etp_1_tab_new.LAST
1986: LOOP
1987: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_1_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_1_tab_new(i).db_item_value,30,' '),3740);
1983: hr_utility.set_location(' ETP 1 ITEMS ',3740);
1984:
1985: FOR i IN l_etp_1_tab_new.FIRST..l_etp_1_tab_new.LAST
1986: LOOP
1987: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_1_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_1_tab_new(i).db_item_value,30,' '),3740);
1988: END LOOP;
1989: END IF;
1990:
1991: IF (l_etp_2_tab_new.COUNT > 0)
1989: END IF;
1990:
1991: IF (l_etp_2_tab_new.COUNT > 0)
1992: THEN
1993: hr_utility.set_location(' ETP 2 ITEMS ',3750);
1994:
1995: FOR i IN l_etp_2_tab_new.FIRST..l_etp_2_tab_new.LAST
1996: LOOP
1997: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_2_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_2_tab_new(i).db_item_value,30,' '),3750);
1993: hr_utility.set_location(' ETP 2 ITEMS ',3750);
1994:
1995: FOR i IN l_etp_2_tab_new.FIRST..l_etp_2_tab_new.LAST
1996: LOOP
1997: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_2_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_2_tab_new(i).db_item_value,30,' '),3750);
1998: END LOOP;
1999: END IF;
2000:
2001: IF (l_etp_3_tab_new.COUNT > 0)
1999: END IF;
2000:
2001: IF (l_etp_3_tab_new.COUNT > 0)
2002: THEN
2003: hr_utility.set_location(' ETP 3 ITEMS ',3760);
2004:
2005: FOR i IN l_etp_3_tab_new.FIRST..l_etp_3_tab_new.LAST
2006: LOOP
2007: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_3_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_3_tab_new(i).db_item_value,30,' '),3760);
2003: hr_utility.set_location(' ETP 3 ITEMS ',3760);
2004:
2005: FOR i IN l_etp_3_tab_new.FIRST..l_etp_3_tab_new.LAST
2006: LOOP
2007: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_3_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_3_tab_new(i).db_item_value,30,' '),3760);
2008: END LOOP;
2009: END IF;
2010:
2011: IF ( l_etp_4_tab_new.COUNT > 0)
2009: END IF;
2010:
2011: IF ( l_etp_4_tab_new.COUNT > 0)
2012: THEN
2013: hr_utility.set_location(' ETP 4 ITEMS ',3770);
2014:
2015: FOR i IN l_etp_4_tab_new.FIRST..l_etp_4_tab_new.LAST
2016: LOOP
2017: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_4_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_4_tab_new(i).db_item_value,30,' '),3770);
2013: hr_utility.set_location(' ETP 4 ITEMS ',3770);
2014:
2015: FOR i IN l_etp_4_tab_new.FIRST..l_etp_4_tab_new.LAST
2016: LOOP
2017: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_etp_4_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_etp_4_tab_new(i).db_item_value,30,' '),3770);
2018: END LOOP;
2019: END IF;
2020:
2021: IF ( l_fw1_payg_tab_new.COUNT > 0)
2019: END IF;
2020:
2021: IF ( l_fw1_payg_tab_new.COUNT > 0)
2022: THEN
2023: hr_utility.set_location(' FW1 PAYG ITEMS ',3770);
2024:
2025: FOR i IN l_fw1_payg_tab_new.FIRST..l_fw1_payg_tab_new.LAST
2026: LOOP
2027: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_fw1_payg_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_fw1_payg_tab_new(i).db_item_value,30,' '),3780);
2023: hr_utility.set_location(' FW1 PAYG ITEMS ',3770);
2024:
2025: FOR i IN l_fw1_payg_tab_new.FIRST..l_fw1_payg_tab_new.LAST
2026: LOOP
2027: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_fw1_payg_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_fw1_payg_tab_new(i).db_item_value,30,' '),3780);
2028: END LOOP;
2029: END IF;
2030:
2031: IF ( l_fw2_payg_tab_new.COUNT > 0)
2029: END IF;
2030:
2031: IF ( l_fw2_payg_tab_new.COUNT > 0)
2032: THEN
2033: hr_utility.set_location(' FW2 PAYG ITEMS ',3770);
2034:
2035: FOR i IN l_fw2_payg_tab_new.FIRST..l_fw2_payg_tab_new.LAST
2036: LOOP
2037: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_fw2_payg_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_fw2_payg_tab_new(i).db_item_value,30,' '),3780);
2033: hr_utility.set_location(' FW2 PAYG ITEMS ',3770);
2034:
2035: FOR i IN l_fw2_payg_tab_new.FIRST..l_fw2_payg_tab_new.LAST
2036: LOOP
2037: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_fw2_payg_tab_new(i).db_item_name,1,50),50,' ')||rpad(l_fw2_payg_tab_new(i).db_item_value,30,' '),3780);
2038: END LOOP;
2039: END IF;
2040:
2041: IF (l_amend_types_new.COUNT > 0)
2039: END IF;
2040:
2041: IF (l_amend_types_new.COUNT > 0)
2042: THEN
2043: hr_utility.set_location(' AMEND TYPE ITEMS ',3780);
2044:
2045: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
2046: LOOP
2047: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_amend_types_new(i).db_item_name,1,50),50,' ')||rpad(l_amend_types_new(i).db_item_value,30,' '),3790);
2043: hr_utility.set_location(' AMEND TYPE ITEMS ',3780);
2044:
2045: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
2046: LOOP
2047: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_amend_types_new(i).db_item_name,1,50),50,' ')||rpad(l_amend_types_new(i).db_item_value,30,' '),3790);
2048: END LOOP;
2049: END IF;
2050:
2051: hr_utility.set_location('Leaving Procedure '||l_procedure,3800);
2047: hr_utility.set_location(rpad(i,5,' ')||rpad(substr(l_amend_types_new(i).db_item_name,1,50),50,' ')||rpad(l_amend_types_new(i).db_item_value,30,' '),3790);
2048: END LOOP;
2049: END IF;
2050:
2051: hr_utility.set_location('Leaving Procedure '||l_procedure,3800);
2052: END IF;
2053:
2054:
2055: END slot_items_build_archive_list;
2090: e_ue_missing EXCEPTION;
2091:
2092: BEGIN
2093:
2094: g_debug := hr_utility.debug_enabled;
2095: IF g_debug
2096: THEN
2097: l_procedure := g_package||'.archive_db_items_tab';
2098: hr_utility.set_location('Entering Procedure '||l_procedure,4200);
2094: g_debug := hr_utility.debug_enabled;
2095: IF g_debug
2096: THEN
2097: l_procedure := g_package||'.archive_db_items_tab';
2098: hr_utility.set_location('Entering Procedure '||l_procedure,4200);
2099: END IF;
2100:
2101: IF (p_db_item_tab.COUNT > 0)
2102: THEN
2103: FOR i IN p_db_item_tab.FIRST..p_db_item_tab.LAST
2104: LOOP
2105: IF g_debug
2106: THEN
2107: hr_utility.set_location('p_db_item_tab.name '||p_db_item_tab(i).db_item_name,4210);
2108: hr_utility.set_location('p_db_item_tab.value '||p_db_item_tab(i).db_item_value,4220);
2109: END IF;
2110:
2111: FOR csr_ue_rec IN get_user_entity_id(p_db_item_tab(i).db_item_name)
2104: LOOP
2105: IF g_debug
2106: THEN
2107: hr_utility.set_location('p_db_item_tab.name '||p_db_item_tab(i).db_item_name,4210);
2108: hr_utility.set_location('p_db_item_tab.value '||p_db_item_tab(i).db_item_value,4220);
2109: END IF;
2110:
2111: FOR csr_ue_rec IN get_user_entity_id(p_db_item_tab(i).db_item_name)
2112: LOOP
2128: ,p_some_warning => l_some_warning);
2129:
2130: IF g_debug
2131: THEN
2132: hr_utility.set_location('l_archive_item_id '||l_archive_item_id,4230);
2133: END IF;
2134: END LOOP;
2135:
2136: END LOOP;
2136: END LOOP;
2137: END IF;
2138: IF g_debug
2139: THEN
2140: hr_utility.set_location('Leaving Procedure '||l_procedure,4250);
2141: END IF;
2142:
2143: END archive_db_items_tab;
2144:
2245: l_old_count NUMBER;
2246: l_context_id ff_contexts.context_id%TYPE;
2247:
2248: BEGIN
2249: g_debug := hr_utility.debug_enabled;
2250:
2251: IF g_debug
2252: THEN
2253: l_procedure := g_package||'.modify_and_archive_code';
2250:
2251: IF g_debug
2252: THEN
2253: l_procedure := g_package||'.modify_and_archive_code';
2254: hr_utility.set_location('Entering Procedure '||l_procedure, 3000);
2255: END IF;
2256:
2257: /* Print All the DB Items Values got from Archive */
2258: IF g_debug
2260: IF (p_all_tab_new.COUNT > 0)
2261: THEN
2262: FOR i IN p_all_tab_new.FIRST..p_all_tab_new.LAST
2263: LOOP
2264: hr_utility.set_location(rpad(i,5,' ')||rpad(p_all_tab_new(i).db_item_name,50,' ')||rpad(p_all_tab_new(i).db_item_value,30,' '),3010);
2265: END LOOP;
2266: END IF;
2267: END IF;
2268:
2286: CLOSE get_orig_archive_id;
2287:
2288: IF g_debug
2289: THEN
2290: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
2291: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
2292: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2287:
2288: IF g_debug
2289: THEN
2290: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
2291: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
2292: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2288: IF g_debug
2289: THEN
2290: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
2291: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
2292: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2289: THEN
2290: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
2291: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
2292: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2297: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
2290: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
2291: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
2292: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2297: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
2298: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
2291: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
2292: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2297: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
2298: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
2299: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
2292: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2297: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
2298: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
2299: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
2300: END IF;
2293: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2297: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
2298: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
2299: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
2300: END IF;
2301:
2294: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2297: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
2298: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
2299: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
2300: END IF;
2301:
2302:
2295: hr_utility.set_location('l_year_start '||l_year_start,3020);
2296: hr_utility.set_location('l_year_end '||l_year_end,3020);
2297: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
2298: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
2299: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
2300: END IF;
2301:
2302:
2303: /* Now you have all the archive items - slot them according to Datafile record
2362: FETCH get_archive_item_count INTO l_old_count;
2363: CLOSE get_archive_item_count ;
2364:
2365: IF g_debug THEN
2366: hr_utility.set_location('Old Archive Count '||l_old_count,3030);
2367: hr_utility.set_location('New Archive Count '||l_new_count,3030);
2368: END IF;
2369:
2370: IF l_old_count > l_new_count
2363: CLOSE get_archive_item_count ;
2364:
2365: IF g_debug THEN
2366: hr_utility.set_location('Old Archive Count '||l_old_count,3030);
2367: hr_utility.set_location('New Archive Count '||l_new_count,3030);
2368: END IF;
2369:
2370: IF l_old_count > l_new_count
2371: THEN
2427: ,p_db_item_tab => l_amend_types_new);
2428:
2429: IF g_debug
2430: THEN
2431: hr_utility.set_location('Leaving Procedure '||l_procedure, 3000);
2432: END IF;
2433:
2434: END modify_and_archive_code;
2435:
2477: AND meaning = c_financial_year;
2478:
2479: BEGIN
2480:
2481: g_debug := hr_utility.debug_enabled;
2482:
2483: IF g_debug
2484: THEN
2485: l_procedure := g_package||'.spawn_data_file';
2482:
2483: IF g_debug
2484: THEN
2485: l_procedure := g_package||'.spawn_data_file';
2486: hr_utility.set_location('Entering package '||l_procedure,4500);
2487: END IF;
2488:
2489: ps_request_id :=-1;
2490: l_TEST_EFILE :='N';
2543: END IF;
2544:
2545: IF g_debug
2546: THEN
2547: hr_utility.set_location('Leaving procedure '||l_procedure,4540);
2548: END IF;
2549:
2550: END spawn_data_file;
2551: