61: p_sql OUT NOCOPY VARCHAR2)
62: IS
63: BEGIN
64:
65: g_debug := hr_utility.debug_enabled;
66:
67: IF g_debug
68: THEN
69: hr_utility.set_location('Start of range_code ',1);
65: g_debug := hr_utility.debug_enabled;
66:
67: IF g_debug
68: THEN
69: hr_utility.set_location('Start of range_code ',1);
70: END IF;
71:
72: p_sql := ' select distinct p.person_id' ||
73: ' from per_people_f p,' ||
77: ' order by p.person_id';
78:
79: IF g_debug
80: THEN
81: hr_utility.set_location('End of range_code',2);
82: END IF;
83: END range_code;
84:
85:
101: l_procedure VARCHAR2(80);
102:
103: BEGIN
104:
105: g_debug := hr_utility.debug_enabled;
106: IF g_debug
107: THEN
108: l_procedure := g_package||'.initialization_code_amend';
109: hr_utility.set_location('In Procedure '||l_procedure,1000);
105: g_debug := hr_utility.debug_enabled;
106: IF g_debug
107: THEN
108: l_procedure := g_package||'.initialization_code_amend';
109: hr_utility.set_location('In Procedure '||l_procedure,1000);
110: END IF;
111:
112: pay_au_payment_summary.initialization_code(p_payroll_action_id);
113: pay_au_payment_summary.g_payment_summary_type := 'A'; /*Reset the Payment Summary Type Variable */
114: populate_user_entity_types; /* Initialize the DB Item Types */
115:
116: IF g_debug
117: THEN
118: hr_utility.set_location('Leaving Procedure '||l_procedure,1000);
119: END IF;
120:
121: EXCEPTION
122: WHEN others THEN
120:
121: EXCEPTION
122: WHEN others THEN
123: IF g_debug THEN
124: hr_utility.set_location('Error in initialization_code',1000);
125: END IF;
126: raise;
127: END initialization_code;
128:
285: FROM dual;
286:
287: BEGIN
288:
289: g_debug := hr_utility.debug_enabled;
290:
291: IF g_debug
292: THEN
293: l_procedure := g_package||'.assignment_action_coded';
290:
291: IF g_debug
292: THEN
293: l_procedure := g_package||'.assignment_action_coded';
294: hr_utility.set_location('In Procedure '||l_procedure,1020);
295: END IF;
296:
297: /* Get the paramters for archival process */
298: OPEN get_params(p_payroll_action_id);
314: v_reg_emp := to_number(v_registered_employer);
315:
316: IF g_debug
317: THEN
318: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
319: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
320: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
321: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
322: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
315:
316: IF g_debug
317: THEN
318: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
319: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
320: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
321: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
322: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
323: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
316: IF g_debug
317: THEN
318: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
319: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
320: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
321: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
322: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
323: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
324: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
317: THEN
318: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
319: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
320: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
321: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
322: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
323: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
324: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
325: END IF;
318: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,1030);
319: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
320: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
321: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
322: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
323: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
324: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
325: END IF;
326:
319: hr_utility.set_location('p_start_person_id '||p_start_person_id,1030);
320: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
321: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
322: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
323: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
324: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
325: END IF;
326:
327: IF v_assignment_id IS NOT NULL
320: hr_utility.set_location('p_end_person_id '||p_end_person_id,1030);
321: hr_utility.set_location('v_assignment_set_id '||to_number(v_assignment_set_id),1030);
322: hr_utility.set_location('v_financial_year '||v_financial_year,1030);
323: hr_utility.set_location('v_assignment_id '||v_assignment_id,1030);
324: hr_utility.set_location('v_reg_emp '||v_reg_emp,1030);
325: END IF;
326:
327: IF v_assignment_id IS NOT NULL
328: THEN
367:
368: END IF;
369:
370: IF g_debug THEN
371: hr_utility.set_location('Leaving '||l_procedure,1040);
372: END IF;
373:
374: EXCEPTION
375: WHEN others THEN
373:
374: EXCEPTION
375: WHEN others THEN
376: IF g_debug THEN
377: hr_utility.set_location('Error raised in assignment_action_code_amend procedure ',1050);
378: END IF;
379: raise;
380: END assignment_action_code;
381:
465: l_procedure VARCHAR2(200);
466:
467: BEGIN
468:
469: g_debug := hr_utility.debug_enabled;
470: IF g_debug
471: THEN
472: l_procedure := g_package||'.populate_user_entity_types';
473: hr_utility.set_location('Entering Procedure '||l_procedure,2400);
469: g_debug := hr_utility.debug_enabled;
470: IF g_debug
471: THEN
472: l_procedure := g_package||'.populate_user_entity_types';
473: hr_utility.set_location('Entering Procedure '||l_procedure,2400);
474: END IF;
475:
476: OPEN csr_payg_items;
477: FETCH csr_payg_items BULK COLLECT INTO g_payg_db_items;
498: CLOSE csr_etp4_items ;
499:
500: IF g_debug
501: THEN
502: hr_utility.set_location('Leaving Procedure '||l_procedure,2420);
503: END IF;
504: END populate_user_entity_types;
505:
506: /*
535: l_found BOOLEAN;
536:
537: BEGIN
538:
539: g_debug := hr_utility.debug_enabled;
540:
541: IF g_debug
542: THEN
543: l_procedure := g_package||'.check_user_entity_type';
540:
541: IF g_debug
542: THEN
543: l_procedure := g_package||'.check_user_entity_type';
544: hr_utility.set_location('Entering Procedure '||l_procedure,2500);
545: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2510);
546: END IF;
547:
548: IF p_user_entity_name IN ('X_PAYG_PAYMENT_SUMMARY_TYPE','X_PAYMENT_SUMMARY_TYPE','X_ETP1_PAYMENT_SUMMARY_TYPE'
541: IF g_debug
542: THEN
543: l_procedure := g_package||'.check_user_entity_type';
544: hr_utility.set_location('Entering Procedure '||l_procedure,2500);
545: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2510);
546: END IF;
547:
548: IF p_user_entity_name IN ('X_PAYG_PAYMENT_SUMMARY_TYPE','X_PAYMENT_SUMMARY_TYPE','X_ETP1_PAYMENT_SUMMARY_TYPE'
549: ,'X_ETP2_PAYMENT_SUMMARY_TYPE','X_ETP3_PAYMENT_SUMMARY_TYPE','X_ETP4_PAYMENT_SUMMARY_TYPE')
642:
643: END IF;
644:
645: IF g_debug THEN
646: hr_utility.set_location('Return Value '||l_return_value,2520);
647: hr_utility.set_location('Leaving Procedure '||l_procedure,2530);
648: END IF;
649:
650: RETURN NVL(l_return_value,'CMN');
643: END IF;
644:
645: IF g_debug THEN
646: hr_utility.set_location('Return Value '||l_return_value,2520);
647: hr_utility.set_location('Leaving Procedure '||l_procedure,2530);
648: END IF;
649:
650: RETURN NVL(l_return_value,'CMN');
651:
680:
681: IF g_debug
682: THEN
683: l_procedure := g_package||'.compare_user_entity_value';
684: hr_utility.set_location('Entering Function '||l_procedure,2600);
685: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
686: hr_utility.set_location('p_value1 '||p_value1,2620);
687: hr_utility.set_location('p_value2 '||p_value2,2620);
688: hr_utility.set_location('p_data_type '||p_data_type,2620);
681: IF g_debug
682: THEN
683: l_procedure := g_package||'.compare_user_entity_value';
684: hr_utility.set_location('Entering Function '||l_procedure,2600);
685: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
686: hr_utility.set_location('p_value1 '||p_value1,2620);
687: hr_utility.set_location('p_value2 '||p_value2,2620);
688: hr_utility.set_location('p_data_type '||p_data_type,2620);
689: END IF;
682: THEN
683: l_procedure := g_package||'.compare_user_entity_value';
684: hr_utility.set_location('Entering Function '||l_procedure,2600);
685: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
686: hr_utility.set_location('p_value1 '||p_value1,2620);
687: hr_utility.set_location('p_value2 '||p_value2,2620);
688: hr_utility.set_location('p_data_type '||p_data_type,2620);
689: END IF;
690:
683: l_procedure := g_package||'.compare_user_entity_value';
684: hr_utility.set_location('Entering Function '||l_procedure,2600);
685: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
686: hr_utility.set_location('p_value1 '||p_value1,2620);
687: hr_utility.set_location('p_value2 '||p_value2,2620);
688: hr_utility.set_location('p_data_type '||p_data_type,2620);
689: END IF;
690:
691: l_return_flag := 'Y'; /* Default - Values Match */
684: hr_utility.set_location('Entering Function '||l_procedure,2600);
685: hr_utility.set_location('p_user_entity_name '||p_user_entity_name,2610);
686: hr_utility.set_location('p_value1 '||p_value1,2620);
687: hr_utility.set_location('p_value2 '||p_value2,2620);
688: hr_utility.set_location('p_data_type '||p_data_type,2620);
689: END IF;
690:
691: l_return_flag := 'Y'; /* Default - Values Match */
692:
710: END IF;
711:
712: IF g_debug
713: THEN
714: hr_utility.set_location('l_return_flag '||l_return_flag,2640);
715: hr_utility.set_location('Leaving Function '||l_procedure,2650);
716: END IF;
717:
718: RETURN l_return_flag;
711:
712: IF g_debug
713: THEN
714: hr_utility.set_location('l_return_flag '||l_return_flag,2640);
715: hr_utility.set_location('Leaving Function '||l_procedure,2650);
716: END IF;
717:
718: RETURN l_return_flag;
719:
776: l_item_type VARCHAR2(20);
777:
778:
779: BEGIN
780: g_debug := hr_utility.debug_enabled;
781:
782: IF g_debug
783: THEN
784: l_procedure := g_package||'.find_new_missing_items';
781:
782: IF g_debug
783: THEN
784: l_procedure := g_package||'.find_new_missing_items';
785: hr_utility.set_location('Entering Procedure '||l_procedure,3500);
786: END IF;
787:
788: l_diff_count := p_old_count - p_new_count;
789:
820: /* DB Item missing in New Archive.
821: Set the Amend Flags */
822: IF g_debug
823: THEN
824: hr_utility.set_location('Missing Item Found '||csr_rec.user_entity_name,3510);
825: END IF;
826: l_item_type := check_user_entity_type(csr_rec.user_entity_name);
827: IF l_item_type = 'PAYG'
828: THEN
852: END LOOP;
853:
854: IF g_debug
855: THEN
856: hr_utility.set_location('Payment Summary Flags ',3520);
857: IF (l_amend_types_new.COUNT > 0 )
858: THEN
859: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
860: LOOP
857: IF (l_amend_types_new.COUNT > 0 )
858: THEN
859: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
860: LOOP
861: 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);
862: END LOOP;
863: hr_utility.set_location('Leaving Procedure '||l_procedure,3540);
864: END IF;
865: END IF;
859: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
860: LOOP
861: 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);
862: END LOOP;
863: hr_utility.set_location('Leaving Procedure '||l_procedure,3540);
864: END IF;
865: END IF;
866:
867: END find_new_missing_items;
911:
912:
913: BEGIN
914:
915: g_debug := hr_utility.debug_enabled;
916:
917: IF g_debug
918: THEN
919: l_procedure := g_package||'.slot_items_build_archive_list';
916:
917: IF g_debug
918: THEN
919: l_procedure := g_package||'.slot_items_build_archive_list';
920: hr_utility.set_location('Entering Procedure '||l_procedure,3700);
921: END IF;
922:
923:
924: l_etp_cmn_flag := 'O'; /* Initialize ETP Common Change Flag to O */
1253: IF g_debug
1254: THEN
1255: IF ( l_cmn_tab_new.COUNT > 0)
1256: THEN
1257: hr_utility.set_location(' COMMON ITEMS ',3710);
1258:
1259: FOR i IN l_cmn_tab_new.FIRST..l_cmn_tab_new.LAST
1260: LOOP
1261: 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);
1257: hr_utility.set_location(' COMMON ITEMS ',3710);
1258:
1259: FOR i IN l_cmn_tab_new.FIRST..l_cmn_tab_new.LAST
1260: LOOP
1261: 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);
1262: END LOOP;
1263: END IF;
1264:
1265: IF ( l_payg_tab_new.COUNT > 0)
1263: END IF;
1264:
1265: IF ( l_payg_tab_new.COUNT > 0)
1266: THEN
1267: hr_utility.set_location(' STANDARD ITEMS ',3720);
1268:
1269: FOR i IN l_payg_tab_new.FIRST..l_payg_tab_new.LAST
1270: LOOP
1271: 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);
1267: hr_utility.set_location(' STANDARD ITEMS ',3720);
1268:
1269: FOR i IN l_payg_tab_new.FIRST..l_payg_tab_new.LAST
1270: LOOP
1271: 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);
1272: END LOOP;
1273: END IF;
1274:
1275:
1274:
1275:
1276: IF ( l_etp_cmn_tab_new.COUNT > 0)
1277: THEN
1278: hr_utility.set_location(' ETP COMMON ITEMS ',3730);
1279:
1280: FOR i IN l_etp_cmn_tab_new.FIRST..l_etp_cmn_tab_new.LAST
1281: LOOP
1282: 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);
1278: hr_utility.set_location(' ETP COMMON ITEMS ',3730);
1279:
1280: FOR i IN l_etp_cmn_tab_new.FIRST..l_etp_cmn_tab_new.LAST
1281: LOOP
1282: 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);
1283: END LOOP;
1284: END IF;
1285:
1286: IF (l_etp_1_tab_new.COUNT > 0)
1284: END IF;
1285:
1286: IF (l_etp_1_tab_new.COUNT > 0)
1287: THEN
1288: hr_utility.set_location(' ETP 1 ITEMS ',3740);
1289:
1290: FOR i IN l_etp_1_tab_new.FIRST..l_etp_1_tab_new.LAST
1291: LOOP
1292: 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);
1288: hr_utility.set_location(' ETP 1 ITEMS ',3740);
1289:
1290: FOR i IN l_etp_1_tab_new.FIRST..l_etp_1_tab_new.LAST
1291: LOOP
1292: 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);
1293: END LOOP;
1294: END IF;
1295:
1296: IF (l_etp_2_tab_new.COUNT > 0)
1294: END IF;
1295:
1296: IF (l_etp_2_tab_new.COUNT > 0)
1297: THEN
1298: hr_utility.set_location(' ETP 2 ITEMS ',3750);
1299:
1300: FOR i IN l_etp_2_tab_new.FIRST..l_etp_2_tab_new.LAST
1301: LOOP
1302: 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);
1298: hr_utility.set_location(' ETP 2 ITEMS ',3750);
1299:
1300: FOR i IN l_etp_2_tab_new.FIRST..l_etp_2_tab_new.LAST
1301: LOOP
1302: 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);
1303: END LOOP;
1304: END IF;
1305:
1306: IF (l_etp_3_tab_new.COUNT > 0)
1304: END IF;
1305:
1306: IF (l_etp_3_tab_new.COUNT > 0)
1307: THEN
1308: hr_utility.set_location(' ETP 3 ITEMS ',3760);
1309:
1310: FOR i IN l_etp_3_tab_new.FIRST..l_etp_3_tab_new.LAST
1311: LOOP
1312: 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);
1308: hr_utility.set_location(' ETP 3 ITEMS ',3760);
1309:
1310: FOR i IN l_etp_3_tab_new.FIRST..l_etp_3_tab_new.LAST
1311: LOOP
1312: 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);
1313: END LOOP;
1314: END IF;
1315:
1316: IF ( l_etp_4_tab_new.COUNT > 0)
1314: END IF;
1315:
1316: IF ( l_etp_4_tab_new.COUNT > 0)
1317: THEN
1318: hr_utility.set_location(' ETP 4 ITEMS ',3770);
1319:
1320: FOR i IN l_etp_4_tab_new.FIRST..l_etp_4_tab_new.LAST
1321: LOOP
1322: 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);
1318: hr_utility.set_location(' ETP 4 ITEMS ',3770);
1319:
1320: FOR i IN l_etp_4_tab_new.FIRST..l_etp_4_tab_new.LAST
1321: LOOP
1322: 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);
1323: END LOOP;
1324: END IF;
1325:
1326:
1325:
1326:
1327: IF (l_amend_types_new.COUNT > 0)
1328: THEN
1329: hr_utility.set_location(' AMEND TYPE ITEMS ',3780);
1330:
1331: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
1332: LOOP
1333: 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,' '),3780);
1329: hr_utility.set_location(' AMEND TYPE ITEMS ',3780);
1330:
1331: FOR i IN l_amend_types_new.FIRST..l_amend_types_new.LAST
1332: LOOP
1333: 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,' '),3780);
1334: END LOOP;
1335: END IF;
1336:
1337: hr_utility.set_location('Leaving Procedure '||l_procedure,3800);
1333: 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,' '),3780);
1334: END LOOP;
1335: END IF;
1336:
1337: hr_utility.set_location('Leaving Procedure '||l_procedure,3800);
1338: END IF;
1339:
1340:
1341: END slot_items_build_archive_list;
1376: e_ue_missing EXCEPTION;
1377:
1378: BEGIN
1379:
1380: g_debug := hr_utility.debug_enabled;
1381: IF g_debug
1382: THEN
1383: l_procedure := g_package||'.archive_db_items_tab';
1384: hr_utility.set_location('Entering Procedure '||l_procedure,4200);
1380: g_debug := hr_utility.debug_enabled;
1381: IF g_debug
1382: THEN
1383: l_procedure := g_package||'.archive_db_items_tab';
1384: hr_utility.set_location('Entering Procedure '||l_procedure,4200);
1385: END IF;
1386:
1387: IF (p_db_item_tab.COUNT > 0)
1388: THEN
1389: FOR i IN p_db_item_tab.FIRST..p_db_item_tab.LAST
1390: LOOP
1391: IF g_debug
1392: THEN
1393: hr_utility.set_location('p_db_item_tab.name '||p_db_item_tab(i).db_item_name,4210);
1394: hr_utility.set_location('p_db_item_tab.value '||p_db_item_tab(i).db_item_value,4220);
1395: END IF;
1396:
1397: FOR csr_ue_rec IN get_user_entity_id(p_db_item_tab(i).db_item_name)
1390: LOOP
1391: IF g_debug
1392: THEN
1393: hr_utility.set_location('p_db_item_tab.name '||p_db_item_tab(i).db_item_name,4210);
1394: hr_utility.set_location('p_db_item_tab.value '||p_db_item_tab(i).db_item_value,4220);
1395: END IF;
1396:
1397: FOR csr_ue_rec IN get_user_entity_id(p_db_item_tab(i).db_item_name)
1398: LOOP
1414: ,p_some_warning => l_some_warning);
1415:
1416: IF g_debug
1417: THEN
1418: hr_utility.set_location('l_archive_item_id '||l_archive_item_id,4230);
1419: END IF;
1420: END LOOP;
1421:
1422: END LOOP;
1422: END LOOP;
1423: END IF;
1424: IF g_debug
1425: THEN
1426: hr_utility.set_location('Leaving Procedure '||l_procedure,4250);
1427: END IF;
1428:
1429: END archive_db_items_tab;
1430:
1528: l_old_count NUMBER;
1529: l_context_id ff_contexts.context_id%TYPE;
1530:
1531: BEGIN
1532: g_debug := hr_utility.debug_enabled;
1533:
1534: IF g_debug
1535: THEN
1536: l_procedure := g_package||'.modify_and_archive_code';
1533:
1534: IF g_debug
1535: THEN
1536: l_procedure := g_package||'.modify_and_archive_code';
1537: hr_utility.set_location('Entering Procedure '||l_procedure, 3000);
1538: END IF;
1539:
1540: /* Print All the DB Items Values got from Archive */
1541: IF g_debug
1543: IF (p_all_tab_new.COUNT > 0)
1544: THEN
1545: FOR i IN p_all_tab_new.FIRST..p_all_tab_new.LAST
1546: LOOP
1547: 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);
1548: END LOOP;
1549: END IF;
1550: END IF;
1551:
1569: CLOSE get_orig_archive_id;
1570:
1571: IF g_debug
1572: THEN
1573: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
1574: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
1575: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1570:
1571: IF g_debug
1572: THEN
1573: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
1574: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
1575: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1571: IF g_debug
1572: THEN
1573: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
1574: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
1575: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1572: THEN
1573: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
1574: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
1575: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1580: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
1573: hr_utility.set_location('l_business_group_id '||l_business_group_id,3020);
1574: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
1575: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1580: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
1581: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
1574: hr_utility.set_location('l_registered_employer '||l_registered_employer,3020);
1575: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1580: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
1581: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
1582: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
1575: hr_utility.set_location('l_employee_type '||l_employee_type,3020);
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1580: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
1581: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
1582: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
1583: END IF;
1576: hr_utility.set_location('l_payroll_action_id '||l_payroll_action_id,3020);
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1580: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
1581: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
1582: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
1583: END IF;
1584:
1577: hr_utility.set_location('l_assignment_id '||l_assignment_id,3020);
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1580: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
1581: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
1582: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
1583: END IF;
1584:
1585:
1578: hr_utility.set_location('l_year_start '||l_year_start,3020);
1579: hr_utility.set_location('l_year_end '||l_year_end,3020);
1580: hr_utility.set_location('l_lst_yr_term '||l_lst_yr_term,3020);
1581: hr_utility.set_location('l_fin_year '||l_fin_year,3020);
1582: hr_utility.set_location('l_archive_action_id '||l_archive_action_id,3020);
1583: END IF;
1584:
1585:
1586: /* Now you have all the archive items - slot them according to Datafile record
1638: FETCH get_archive_item_count INTO l_old_count;
1639: CLOSE get_archive_item_count ;
1640:
1641: IF g_debug THEN
1642: hr_utility.set_location('Old Archive Count '||l_old_count,3030);
1643: hr_utility.set_location('New Archive Count '||l_new_count,3030);
1644: END IF;
1645:
1646: IF l_old_count > l_new_count
1639: CLOSE get_archive_item_count ;
1640:
1641: IF g_debug THEN
1642: hr_utility.set_location('Old Archive Count '||l_old_count,3030);
1643: hr_utility.set_location('New Archive Count '||l_new_count,3030);
1644: END IF;
1645:
1646: IF l_old_count > l_new_count
1647: THEN
1695: ,p_db_item_tab => l_amend_types_new);
1696:
1697: IF g_debug
1698: THEN
1699: hr_utility.set_location('Leaving Procedure '||l_procedure, 3000);
1700: END IF;
1701:
1702: END modify_and_archive_code;
1703:
1745: AND meaning = c_financial_year;
1746:
1747: BEGIN
1748:
1749: g_debug := hr_utility.debug_enabled;
1750:
1751: IF g_debug
1752: THEN
1753: l_procedure := g_package||'.spawn_data_file';
1750:
1751: IF g_debug
1752: THEN
1753: l_procedure := g_package||'.spawn_data_file';
1754: hr_utility.set_location('Entering package '||l_procedure,4500);
1755: END IF;
1756:
1757: ps_request_id :=-1;
1758: l_TEST_EFILE :='N';
1811: END IF;
1812:
1813: IF g_debug
1814: THEN
1815: hr_utility.set_location('Leaving procedure '||l_procedure,4540);
1816: END IF;
1817:
1818: END spawn_data_file;
1819: