3: --
4: -- Package Variables
5: --
6: g_package varchar2(33) := ' BEN_CWB_AUDIT_API.';
7: g_debug boolean := hr_utility.debug_enabled;
8: g_lookup_validity g_validity_table_type := g_validity_table_type();
9: --
10: --
11: -- -----------------------------------------------------------------------
29: l_person_id fnd_user.employee_id%type;
30:
31: begin
32: if g_debug then
33: hr_utility.set_location('Entering:'|| l_proc, 100);
34: end if;
35:
36: begin
37: /*
69: );
70: end if;
71:
72: if g_debug then
73: hr_utility.set_location('BG:'||'p_per_in_ler_id : '||p_per_in_ler_id , 10);
74: hr_utility.set_location('done by :'||l_person_id, 12);
75: end if;
76:
77:
70: end if;
71:
72: if g_debug then
73: hr_utility.set_location('BG:'||'p_per_in_ler_id : '||p_per_in_ler_id , 10);
74: hr_utility.set_location('done by :'||l_person_id, 12);
75: end if;
76:
77:
78: exception
80: null;
81: end;
82:
83: if g_debug then
84: hr_utility.set_location('Leaving:'|| l_proc, 200);
85: end if;
86:
87:
88: end create_per_record;
116: l_person_id fnd_user.employee_id%type;
117:
118: begin
119: if g_debug then
120: hr_utility.set_location('Entering:'|| l_proc, 100);
121: end if;
122:
123: begin
124:
133: from fnd_user
134: where user_id = l_per_record_new.last_updated_by;
135:
136: if g_debug then
137: hr_utility.set_location('Record exists for per_in_ler_id: '|| l_per_record_new.per_in_ler_id, 10);
138: end if;
139: hr_utility.set_location('Record exists for per_in_ler_id: '|| l_per_record_new.per_in_ler_id, 10);
140:
141: /* -------- overloading
135:
136: if g_debug then
137: hr_utility.set_location('Record exists for per_in_ler_id: '|| l_per_record_new.per_in_ler_id, 10);
138: end if;
139: hr_utility.set_location('Record exists for per_in_ler_id: '|| l_per_record_new.per_in_ler_id, 10);
140:
141: /* -------- overloading
142: if( ((p_per_record_old.ws_mgr_id is null)
143: and (l_per_record_new.ws_mgr_id is not null))
191: ,p_object_version_number => l_object_version_number
192: );
193:
194: if g_debug then
195: hr_utility.set_location('MG done: '|| l_per_record_new.per_in_ler_id, 20);
196: end if;
197:
198: end if;
199: end if; */
201: if( (p_per_record_old.per_in_ler_stat_cd <> l_per_record_new.per_in_ler_stat_cd) ) then
202: --change in status
203:
204: if g_debug then
205: hr_utility.set_location('Some Change in Status: '|| l_per_record_new.per_in_ler_id, 30);
206: end if;
207:
208: */
209:
227: ,p_object_version_number => l_object_version_number
228: );
229:
230: if g_debug then
231: hr_utility.set_location('EN done: '|| l_per_record_new.per_in_ler_id, 30);
232: hr_utility.set_location('EN by: '|| l_person_id, 31);
233:
234: end if;
235:
228: );
229:
230: if g_debug then
231: hr_utility.set_location('EN done: '|| l_per_record_new.per_in_ler_id, 30);
232: hr_utility.set_location('EN by: '|| l_person_id, 31);
233:
234: end if;
235:
236: end if;
256: ,p_object_version_number => l_object_version_number
257: );
258:
259: if g_debug then
260: hr_utility.set_location('BO done: '|| l_per_record_new.per_in_ler_id, 300);
261: hr_utility.set_location('BO by: '|| l_person_id, 301);
262: hr_utility.set_location('sysdate: '|| sysdate, 305);
263: end if;
264:
257: );
258:
259: if g_debug then
260: hr_utility.set_location('BO done: '|| l_per_record_new.per_in_ler_id, 300);
261: hr_utility.set_location('BO by: '|| l_person_id, 301);
262: hr_utility.set_location('sysdate: '|| sysdate, 305);
263: end if;
264:
265: end if;
258:
259: if g_debug then
260: hr_utility.set_location('BO done: '|| l_per_record_new.per_in_ler_id, 300);
261: hr_utility.set_location('BO by: '|| l_person_id, 301);
262: hr_utility.set_location('sysdate: '|| sysdate, 305);
263: end if;
264:
265: end if;
266: end if;
272: null;
273: end;
274:
275: if g_debug then
276: hr_utility.set_location('Leaving:'|| l_proc, 200);
277: end if;
278:
279:
280: end update_per_record2;
302:
303:
304: begin
305:
306: --hr_utility.trace_on(null,'audit1');
307: --g_debug:=true;
308:
309: if g_debug then
310: hr_utility.set_location('Entering:'|| l_proc, 100);
306: --hr_utility.trace_on(null,'audit1');
307: --g_debug:=true;
308:
309: if g_debug then
310: hr_utility.set_location('Entering:'|| l_proc, 100);
311: end if;
312:
313: if(p_audit_type_cd is null) then
314: update_per_record2(p_group_per_in_ler_id => p_per_in_ler_id);
314: update_per_record2(p_group_per_in_ler_id => p_per_in_ler_id);
315:
316: elsif (p_audit_type_cd is not null) then
317:
318: hr_utility.set_location('audit_type_cd :'|| p_audit_type_cd, 10);
319:
320: begin
321:
322: select *
330: from fnd_user
331: where user_id = l_per_record_new.last_updated_by;
332:
333: if g_debug then
334: hr_utility.set_location
335: ('Record exists for per_in_ler_id: '||l_per_record_new.per_in_ler_id, 10);
336: end if;
337:
338: if( p_audit_type_cd = 'MG' ) then
429: ,p_object_version_number => l_object_version_number
430: );
431:
432: if g_debug then
433: hr_utility.set_location
434: ('MG done: '|| l_per_record_new.per_in_ler_id, 20);
435: end if;
436:
437: end if;
445:
446: end if;
447:
448: if g_debug then
449: hr_utility.set_location('Leaving:'|| l_proc, 200);
450: end if;
451:
452:
453: end update_per_record;
488: l_proc varchar2(72) := g_package||'create_audit_entry';
489: /* l_change_made_by_person_id number;*/
490: begin
491:
492: --hr_utility.trace_on(null,'audit1');
493: --g_debug:=true;
494:
495: if g_debug then
496: hr_utility.set_location('Entering:'|| l_proc, 10);
492: --hr_utility.trace_on(null,'audit1');
493: --g_debug:=true;
494:
495: if g_debug then
496: hr_utility.set_location('Entering:'|| l_proc, 10);
497: end if;
498:
499: /* removing because now receiving person_id from fnd_user.employee_id
500: begin
514:
515: if(p_change_made_by_person_id is null) then
516:
517: if g_debug then
518: hr_utility.set_location('NULL p_change_made_by_person_id ', 12);
519: end if;
520:
521: l_change_made_by_person_id := -1;
522: end if;
522: end if;
523:
524:
525: if g_debug then
526: hr_utility.set_location('l_change_made_by_person_id:'|| l_change_made_by_person_id||'END',11);
527: hr_utility.set_location('p_group_per_in_ler_id: '||p_group_per_in_ler_id,13);
528: hr_utility.set_location('p_group_pl_id: '||p_group_pl_id,14);
529: hr_utility.set_location('p_lf_evt_ocrd_dt: '||p_lf_evt_ocrd_dt,15);
530: hr_utility.set_location('p_pl_id: '||p_pl_id,16);
523:
524:
525: if g_debug then
526: hr_utility.set_location('l_change_made_by_person_id:'|| l_change_made_by_person_id||'END',11);
527: hr_utility.set_location('p_group_per_in_ler_id: '||p_group_per_in_ler_id,13);
528: hr_utility.set_location('p_group_pl_id: '||p_group_pl_id,14);
529: hr_utility.set_location('p_lf_evt_ocrd_dt: '||p_lf_evt_ocrd_dt,15);
530: hr_utility.set_location('p_pl_id: '||p_pl_id,16);
531: hr_utility.set_location('p_audit_type_cd: '||p_audit_type_cd,17);
524:
525: if g_debug then
526: hr_utility.set_location('l_change_made_by_person_id:'|| l_change_made_by_person_id||'END',11);
527: hr_utility.set_location('p_group_per_in_ler_id: '||p_group_per_in_ler_id,13);
528: hr_utility.set_location('p_group_pl_id: '||p_group_pl_id,14);
529: hr_utility.set_location('p_lf_evt_ocrd_dt: '||p_lf_evt_ocrd_dt,15);
530: hr_utility.set_location('p_pl_id: '||p_pl_id,16);
531: hr_utility.set_location('p_audit_type_cd: '||p_audit_type_cd,17);
532: end if;
525: if g_debug then
526: hr_utility.set_location('l_change_made_by_person_id:'|| l_change_made_by_person_id||'END',11);
527: hr_utility.set_location('p_group_per_in_ler_id: '||p_group_per_in_ler_id,13);
528: hr_utility.set_location('p_group_pl_id: '||p_group_pl_id,14);
529: hr_utility.set_location('p_lf_evt_ocrd_dt: '||p_lf_evt_ocrd_dt,15);
530: hr_utility.set_location('p_pl_id: '||p_pl_id,16);
531: hr_utility.set_location('p_audit_type_cd: '||p_audit_type_cd,17);
532: end if;
533:
526: hr_utility.set_location('l_change_made_by_person_id:'|| l_change_made_by_person_id||'END',11);
527: hr_utility.set_location('p_group_per_in_ler_id: '||p_group_per_in_ler_id,13);
528: hr_utility.set_location('p_group_pl_id: '||p_group_pl_id,14);
529: hr_utility.set_location('p_lf_evt_ocrd_dt: '||p_lf_evt_ocrd_dt,15);
530: hr_utility.set_location('p_pl_id: '||p_pl_id,16);
531: hr_utility.set_location('p_audit_type_cd: '||p_audit_type_cd,17);
532: end if;
533:
534: --
527: hr_utility.set_location('p_group_per_in_ler_id: '||p_group_per_in_ler_id,13);
528: hr_utility.set_location('p_group_pl_id: '||p_group_pl_id,14);
529: hr_utility.set_location('p_lf_evt_ocrd_dt: '||p_lf_evt_ocrd_dt,15);
530: hr_utility.set_location('p_pl_id: '||p_pl_id,16);
531: hr_utility.set_location('p_audit_type_cd: '||p_audit_type_cd,17);
532: end if;
533:
534: --
535: -- Issue a savepoint
633: --
634: p_object_version_number := l_object_version_number;
635: --
636: if g_debug then
637: hr_utility.set_location(' Leaving:'||l_proc, 70);
638: end if;
639: exception
640: when hr_api.validate_enabled then
641: --
644: --
645: rollback to create_audit_entry;
646: --
647: if g_debug then
648: hr_utility.set_location(' Leaving:'||l_proc, 80);
649: end if;
650: when others then
651: --
652: -- A validation or unexpected error has occured
653: --
654: rollback to create_audit_entry;
655: --
656: if g_debug then
657: hr_utility.set_location(' Leaving:'||l_proc, 90);
658: end if;
659: raise;
660: end create_audit_entry;
661: --
707: l_change_made_by_person_id := p_change_made_by_person_id;
708: end;
709: */
710: if g_debug then
711: hr_utility.set_location('Entering:'|| l_proc, 10);
712: end if;
713: --
714: -- Issue a savepoint
715: --
758: -- Min Max Edits (removed)
759: --
760: --
761: if g_debug then
762: hr_utility.set_location(l_proc, 30);
763: end if;
764: --
765: --
766: if g_debug then
763: end if;
764: --
765: --
766: if g_debug then
767: hr_utility.set_location(l_proc, 40);
768: end if;
769: --
770: --
771: if g_debug then
768: end if;
769: --
770: --
771: if g_debug then
772: hr_utility.set_location(l_proc, 50);
773: end if;
774: --
775: --
776: if g_debug then
773: end if;
774: --
775: --
776: if g_debug then
777: hr_utility.set_location(l_proc, 60);
778: end if;
779: --
780: --
781: -- Check Min, Max and Inc for Ws Bdgt Val
781: -- Check Min, Max and Inc for Ws Bdgt Val
782: --
783: --
784: if g_debug then
785: hr_utility.set_location(l_proc, 70);
786: end if;
787: --
788: --
789: -- Check Min, Max and Inc for Rsrv Val
855: --
856: p_object_version_number := l_object_version_number;
857: --
858: if g_debug then
859: hr_utility.set_location(' Leaving:'||l_proc, 80);
860: end if;
861: exception
862: when hr_api.validate_enabled then
863: --
870: -- (Any key or derived arguments must be set to null
871: -- when validation only mode is being used.)
872: --
873: if g_debug then
874: hr_utility.set_location(' Leaving:'||l_proc, 90);
875: end if;
876: when others then
877: --
878: -- A validation or unexpected error has occured
882: -- Reset IN OUT parameters and set all
883: -- OUT parameters, including warnings, to null
884: --
885: if g_debug then
886: hr_utility.set_location(' Leaving:'||l_proc, 99);
887: end if;
888: raise;
889: end update_audit_entry;
890: --
904: l_object_version_number number;
905: l_proc varchar2(72) := g_package||'delete_audit_entry';
906: begin
907: if g_debug then
908: hr_utility.set_location('Entering:'|| l_proc, 10);
909: end if;
910: --
911: -- Issue a savepoint
912: --
964: raise hr_api.validate_enabled;
965: end if;
966: --
967: if g_debug then
968: hr_utility.set_location(' Leaving:'||l_proc, 70);
969: end if;
970: exception
971: when hr_api.validate_enabled then
972: --
975: --
976: rollback to delete_audit_entry;
977: --
978: if g_debug then
979: hr_utility.set_location(' Leaving:'||l_proc, 80);
980: end if;
981: when others then
982: --
983: -- A validation or unexpected error has occured
987: -- Reset IN OUT parameters and set all
988: -- OUT parameters, including warnings, to null
989: --
990: if g_debug then
991: hr_utility.set_location(' Leaving:'||l_proc, 90);
992: end if;
993: raise;
994: end delete_audit_entry;
995: --
1152: l_found := false;
1153:
1154:
1155: if g_debug then
1156: hr_utility.set_location('loop:'|| g_lookup_validity.COUNT, 23);
1157: end if;
1158:
1159: if nvl(g_lookup_validity.COUNT,0) > 0 then
1160: FOR element IN 1..g_lookup_validity.COUNT loop
1162: if(g_lookup_validity(element).code = p_lookup_code) then
1163: l_found := true;
1164: l_index := element;
1165: if g_debug then
1166: hr_utility.set_location('found:'|| g_lookup_validity(element).code||element, 23);
1167: end if;
1168: end if;
1169: end if;
1170: exit when(l_found = true);
1173:
1174:
1175: if(l_found = true) then
1176: if g_debug then
1177: hr_utility.set_location('found at: '|| l_index, 24);
1178: end if;
1179: if g_debug then
1180: hr_utility.set_location('with flag: '|| g_lookup_validity(l_index).flag, 25);
1181: end if;
1176: if g_debug then
1177: hr_utility.set_location('found at: '|| l_index, 24);
1178: end if;
1179: if g_debug then
1180: hr_utility.set_location('with flag: '|| g_lookup_validity(l_index).flag, 25);
1181: end if;
1182: if(g_lookup_validity(l_index).flag = 'Y') then
1183: l_validity := true;
1184: else
1202: g_lookup_validity(g_lookup_validity.last) := l_code_flag;
1203: l_validity := false;
1204:
1205: if g_debug then
1206: hr_utility.set_location('flag: '||l_code_flag.flag, 25);
1207: end if;
1208:
1209: else
1210: l_code_flag.flag := l_lookup.enabled_flag;
1211: g_lookup_validity.extend(1);
1212: g_lookup_validity(g_lookup_validity.last) := l_code_flag;
1213: l_validity := true;
1214: if g_debug then
1215: hr_utility.set_location('flag: '||l_code_flag.flag, 25);
1216: end if;
1217: end if;
1218: exception
1219: when no_data_found then