58:
59: begin
60:
61: if g_debug then
62: hr_utility.set_location('Entering : archive_item',1);
63: end if;
64:
65: open get_user_entity_id (p_item);
66: fetch get_user_entity_id into v_user_Entity_id,
94: end if;
95: else
96: close get_user_entity_id;
97: if g_debug then
98: hr_utility.set_location('User entity not found :'||p_item,20);
99: end if;
100: end if;
101:
102: if g_debug then
99: end if;
100: end if;
101:
102: if g_debug then
103: hr_utility.set_location('Leaving : archive_item',1);
104: end if;
105:
106: exception
107: when others then
107: when others then
108:
109: if get_user_entity_id%isopen then
110: close get_user_entity_id;
111: hr_utility.set_location('closing..',117);
112: end if;
113:
114: hr_utility.set_location('Error in archive_item',20);
115: raise;
110: close get_user_entity_id;
111: hr_utility.set_location('closing..',117);
112: end if;
113:
114: hr_utility.set_location('Error in archive_item',20);
115: raise;
116: end archive_item;
117:
118: --------------------------------------------------------------------------------+
174: l_arch_tab(9).item := 'X_KR_BP_REP_NI' ;
175: l_arch_tab(10).item := 'X_KR_BP_TAX_OFFICE_CODE' ;
176:
177: if g_debug then
178: hr_utility.set_location('Entering : Archiving corp Details ',1);
179: hr_utility.set_location('Assignments action id is '||p_assignment_action_id,2);
180: end if;
181:
182: open c_corp_details ;
175: l_arch_tab(10).item := 'X_KR_BP_TAX_OFFICE_CODE' ;
176:
177: if g_debug then
178: hr_utility.set_location('Entering : Archiving corp Details ',1);
179: hr_utility.set_location('Assignments action id is '||p_assignment_action_id,2);
180: end if;
181:
182: open c_corp_details ;
183: fetch c_corp_details
194:
195: close c_corp_details ;
196:
197: if g_debug then
198: hr_utility.set_location('Creating Archive Item ',3);
199: end if;
200:
201: for i in 1..l_arch_tab.count loop
202:
207: end loop;
208:
209:
210: if g_debug then
211: hr_utility.set_location('Exiting : Archiving corp Details ',4);
212: end if;
213:
214: exception
215: when others then
212: end if;
213:
214: exception
215: when others then
216: hr_utility.set_location('Error in archiving corp details ',10);
217: raise;
218:
219: End archive_corp_details;
220:
372: l_arch_tab(8).item := 'X_KR_EMP_PAID_DATE' ;
373: l_arch_tab(9).item := 'X_KR_EMP_COUNTRY_CODE' ;
374:
375: if g_debug then
376: hr_utility.set_location('Entering : Archiving current emp Details ',1);
377: hr_utility.set_location('Assignment action id is '||p_assignment_action_id,2);
378: end if;
379:
380: open c_cemp_details ;
373: l_arch_tab(9).item := 'X_KR_EMP_COUNTRY_CODE' ;
374:
375: if g_debug then
376: hr_utility.set_location('Entering : Archiving current emp Details ',1);
377: hr_utility.set_location('Assignment action id is '||p_assignment_action_id,2);
378: end if;
379:
380: open c_cemp_details ;
381: fetch c_cemp_details
393: close c_cemp_details ;
394: return(FALSE);
395: else
396: if g_debug then
397: hr_utility.set_location('Creating Archive Item ',3);
398: end if;
399:
400: for i in 1..l_arch_tab.count loop
401:
437:
438: end if;
439:
440: if g_debug then
441: hr_utility.set_location('Exiting :Archiving current emp Details',200);
442: end if;
443: return(true);
444:
445: exception
443: return(true);
444:
445: exception
446: when others then
447: hr_utility.set_location('Error in archiving emp details ',10);
448: raise;
449:
450: End archive_emp_details;
451:
510:
511: begin
512:
513: if g_debug then
514: hr_utility.set_location('Entering : Populate archive item ',1);
515: hr_utility.set_location('Assignments action id is '||p_assignment_action_id,2);
516: end if;
517:
518: l_ele_ent_id_tab.delete;
511: begin
512:
513: if g_debug then
514: hr_utility.set_location('Entering : Populate archive item ',1);
515: hr_utility.set_location('Assignments action id is '||p_assignment_action_id,2);
516: end if;
517:
518: l_ele_ent_id_tab.delete;
519: l_ele_value_tab.delete;
524: l_ele_ent_id_tab,
525: l_ele_value_tab;
526:
527: if g_debug then
528: hr_utility.set_location('Creating Archive Item ',3);
529: end if;
530:
531:
532: for i in 1..l_ele_ent_id_tab.count loop
538:
539: close c_prev_emp_details;
540:
541: if g_debug then
542: hr_utility.set_location('Exiting : Populate archive item ',200);
543: end if;
544: exception
545:
546: when others then
543: end if;
544: exception
545:
546: when others then
547: hr_utility.set_location('Error in populate archive item ',10);
548: raise;
549:
550: end;
551:
557:
558: begin
559:
560: if g_debug then
561: hr_utility.set_location('Entering : archive_preapid_item_value',1);
562: end if;
563:
564: l_ele_ent_id_tab.delete;
565: l_ele_value_tab.delete;
583: ,p_context2 => null
584: ,p_value => l_prepaid_value);
585:
586: if g_debug then
587: hr_utility.set_location('Leaving : archive_preapid_item_value',1);
588: end if;
589:
590: exception
591: when others then
588: end if;
589:
590: exception
591: when others then
592: hr_utility.set_location('Error in archive_preapid_item_value ',10);
593: raise;
594:
595: end archive_preapid_item_value;
596:
596:
597: Begin
598:
599: if g_debug then
600: hr_utility.set_location('Entering : Archiving prev emp Details ',10);
601: end if;
602:
603: populate_archive_item('X_KR_PREV_BP_NUMBER','BP_NUMBER');
604: populate_archive_item('X_KR_PREV_BP_NAME','BP_NAME');
616: archive_preapid_item_value('X_KR_EMP_PREPAID_STAX','STAX',p_assignment_action_id);
617:
618:
619: if g_debug then
620: hr_utility.set_location('Exiting : Archiving prev emp Details ',200);
621: end if;
622:
623: End archive_prev_emp_details;
624:
750: --
751: begin
752: --
753: if g_debug then
754: hr_utility.trace('Start Of assignment_action_creation');
755: end if;
756:
757: open csr_process_assignment;
758: loop
765: into l_locking_action_id
766: from dual;
767: --
768: if g_debug then
769: hr_utility.trace(' Locking assignment_action_id ..:'||l_locking_action_id);
770: end if;
771:
772: hr_nonrun_asact.insact(lockingactid => l_locking_action_id,
773: assignid => l_csr_process_assignment.assignment_id,
779: --
780: -- Lock archived Assignemnt Actions
781: --
782: if g_debug then
783: hr_utility.trace('Locked assignment_action_id ..:'||l_csr_process_assignment.assignment_action_id);
784: end if;
785:
786: --Bug # 2377251 : added the the code to lock the assignment_action_id (i.e child assignment action id )
787:
788: hr_nonrun_asact.insint(lockingactid => l_locking_action_id,
789: lockedactid => l_csr_process_assignment.assignment_action_id);
790:
791: if g_debug then
792: hr_utility.trace('Locked source_action_id ..:'||l_csr_process_assignment.source_action_id);
793: end if;
794: --
795: hr_nonrun_asact.insint(lockingactid => l_locking_action_id,
796: lockedactid => l_csr_process_assignment.source_action_id);
799: end loop;
800: close csr_process_assignment;
801:
802: if g_debug then
803: hr_utility.trace('End Of assignment_action_creation');
804: end if;
805: --
806: end assignment_action_creation;
807: --------------------------------------------------------------------------------
851: --
852: begin
853: --
854: if g_debug then
855: hr_utility.trace('Start of archive_data');
856: end if;
857:
858: l_context_no := pay_archive.g_context_values.sz;
859: for i in 1..l_context_no loop
926: --
927: --
928: --
929: if g_debug then
930: hr_utility.set_location('P_BUSINESS_GROUP_ID ->' ||l_business_group_id,100);
931: hr_utility.set_location('P_TAX_UNIT_ID ->' ||l_tax_unit_id,200);
932: hr_utility.set_location('P_ASSIGNMENT_ID ->' ||l_assignment_id,300);
933: hr_utility.set_location('P_PAYROLL_ACTION_ID ->' ||l_payroll_action_id,400);
934: hr_utility.set_location('P_ASSIGNMENT_ACTION_ID ->' ||p_assignment_action_id,500);
927: --
928: --
929: if g_debug then
930: hr_utility.set_location('P_BUSINESS_GROUP_ID ->' ||l_business_group_id,100);
931: hr_utility.set_location('P_TAX_UNIT_ID ->' ||l_tax_unit_id,200);
932: hr_utility.set_location('P_ASSIGNMENT_ID ->' ||l_assignment_id,300);
933: hr_utility.set_location('P_PAYROLL_ACTION_ID ->' ||l_payroll_action_id,400);
934: hr_utility.set_location('P_ASSIGNMENT_ACTION_ID ->' ||p_assignment_action_id,500);
935: end if;
928: --
929: if g_debug then
930: hr_utility.set_location('P_BUSINESS_GROUP_ID ->' ||l_business_group_id,100);
931: hr_utility.set_location('P_TAX_UNIT_ID ->' ||l_tax_unit_id,200);
932: hr_utility.set_location('P_ASSIGNMENT_ID ->' ||l_assignment_id,300);
933: hr_utility.set_location('P_PAYROLL_ACTION_ID ->' ||l_payroll_action_id,400);
934: hr_utility.set_location('P_ASSIGNMENT_ACTION_ID ->' ||p_assignment_action_id,500);
935: end if;
936:
929: if g_debug then
930: hr_utility.set_location('P_BUSINESS_GROUP_ID ->' ||l_business_group_id,100);
931: hr_utility.set_location('P_TAX_UNIT_ID ->' ||l_tax_unit_id,200);
932: hr_utility.set_location('P_ASSIGNMENT_ID ->' ||l_assignment_id,300);
933: hr_utility.set_location('P_PAYROLL_ACTION_ID ->' ||l_payroll_action_id,400);
934: hr_utility.set_location('P_ASSIGNMENT_ACTION_ID ->' ||p_assignment_action_id,500);
935: end if;
936:
937: --------------------------
930: hr_utility.set_location('P_BUSINESS_GROUP_ID ->' ||l_business_group_id,100);
931: hr_utility.set_location('P_TAX_UNIT_ID ->' ||l_tax_unit_id,200);
932: hr_utility.set_location('P_ASSIGNMENT_ID ->' ||l_assignment_id,300);
933: hr_utility.set_location('P_PAYROLL_ACTION_ID ->' ||l_payroll_action_id,400);
934: hr_utility.set_location('P_ASSIGNMENT_ACTION_ID ->' ||p_assignment_action_id,500);
935: end if;
936:
937: --------------------------
938:
938:
939: --Archive efile related data
940: --------------------------
941: if g_debug then
942: hr_utility.set_location('Calling archive_xdbi',2);
943: end if;
944:
945: archive_xdbi ( P_BUSINESS_GROUP_ID =>l_business_group_id
946: ,P_TAX_UNIT_ID =>l_tax_unit_id
949: ,P_ASSIGNMENT_ACTION_ID =>p_assignment_action_id
950: ,P_DATE_EARNED =>l_date_earned );
951:
952: if g_debug then
953: hr_utility.set_location('Exiting archive_xdbi',3);
954: hr_utility.trace('End of archive_data');
955: end if;
956: end archive_data;
957:
950: ,P_DATE_EARNED =>l_date_earned );
951:
952: if g_debug then
953: hr_utility.set_location('Exiting archive_xdbi',3);
954: hr_utility.trace('End of archive_data');
955: end if;
956: end archive_data;
957:
958: begin
955: end if;
956: end archive_data;
957:
958: begin
959: g_debug := hr_utility.debug_enabled;
960: end pay_kr_sep_archive_pkg;