DBA Data[Home] [Help]

APPS.BEN_COLLAPSE_LIFE_EVENT dependencies on HR_UTILITY

Line 70: hr_utility.set_location('Entering '||l_proc,10);

66: l_object_version_number number(15);
67: --
68: begin
69: --
70: hr_utility.set_location('Entering '||l_proc,10);
71: --
72: -- Clear g_events table cache
73: --
74: g_events.delete;

Line 79: hr_utility.set_location('Entering after last',11);

75: --
76: open c_events;
77: --
78: l_counter := nvl(g_events.last, 0);
79: hr_utility.set_location('Entering after last',11);
80: loop
81: --
82: fetch c_events into l_events;
83: exit when c_events%notfound;

Line 94: hr_utility.set_location('Entering before assign',11);

90: l_lf_evt_ocrd_dt := l_events.lf_evt_ocrd_dt;
91: l_ntfn_dt := l_events.ntfn_dt;
92: l_object_version_number := l_events.object_version_number;
93: l_counter := l_counter + 1;
94: hr_utility.set_location('Entering before assign',11);
95:
96: /*
97: g_events(l_counter) := l_events;
98: */

Line 105: hr_utility.set_location('Entering after assign',11);

101: g_events(l_counter).ptnl_ler_for_per_stat_cd := l_ptnl_ler_for_per_stat_cd;
102: g_events(l_counter).lf_evt_ocrd_dt := l_lf_evt_ocrd_dt;
103: g_events(l_counter).ntfn_dt := l_ntfn_dt;
104: g_events(l_counter).object_version_number := l_object_version_number;
105: hr_utility.set_location('Entering after assign',11);
106: /*
107: Bug 1975925
108: if g_events.exists(1) then
109: --

Line 123: hr_utility.set_location('Leaving '||l_proc,10);

119: end loop;
120: --
121: close c_events;
122: --
123: hr_utility.set_location('Leaving '||l_proc,10);
124: --
125: end build_life_event_set;
126: --
127: function included_in_events(p_ler_id in number) return date is

Line 134: hr_utility.set_location('Entering '||l_proc,10);

130: l_date date;
131: --
132: begin
133: --
134: hr_utility.set_location('Entering '||l_proc,10);
135: --
136: -- If the life event is in the set of included life events then return the
137: -- earliest life event occurred date within the set.
138: --

Line 149: hr_utility.set_location('Leaving '||l_proc,10);

145: end if;
146: --
147: end loop;
148: --
149: hr_utility.set_location('Leaving '||l_proc,10);
150: --
151: return null;
152: --
153: end included_in_events;

Line 163: hr_utility.set_location('Entering '||l_proc,10);

159: l_proc varchar2(80) := g_package||'get_first_date';
160: --
161: begin
162: --
163: hr_utility.set_location('Entering '||l_proc,10);
164: --
165: for l_count in g_included_events.first..g_included_events.last loop
166: --
167: if g_included_events(l_count).ler_id in

Line 174: hr_utility.set_location('Leaving '||l_proc,10);

170: p_events.ler5_id,p_events.ler6_id,
171: p_events.ler7_id,p_events.ler8_id,
172: p_events.ler9_id,p_events.ler10_id) then
173: --
174: hr_utility.set_location('Leaving '||l_proc,10);
175: --
176: return g_included_events(l_count).lf_evt_ocrd_dt;
177: --
178: exit;

Line 196: hr_utility.set_location('Entering '||l_proc,10);

192: l_proc varchar2(80) := g_package||'get_last_date';
193: --
194: begin
195: --
196: hr_utility.set_location('Entering '||l_proc,10);
197: --
198: for l_count in reverse g_included_events.first..g_included_events.last loop
199: --
200: if g_included_events(l_count).ler_id in

Line 207: hr_utility.set_location('Leaving '||l_proc,10);

203: p_events.ler5_id,p_events.ler6_id,
204: p_events.ler7_id,p_events.ler8_id,
205: p_events.ler9_id,p_events.ler10_id) then
206: --
207: hr_utility.set_location('Leaving '||l_proc,10);
208: --
209: return g_included_events(l_count).lf_evt_ocrd_dt;
210: exit;
211: --

Line 316: hr_utility.set_location('Entering '||l_proc,10);

312: begin
313: --
314: l_flag := false;
315: l_not_present := true;
316: hr_utility.set_location('Entering '||l_proc,10);
317: --
318: -- First set operation to event collision method
319: --
320: if p_events.eval_cd = 'RL' then

Line 389: hr_utility.set_location('loutput value1 '|| l_outputs(l_outputs.first).name,10);

385: p_assignment_id => l_ass_rec.assignment_id);
386: --
387: begin
388: --
389: hr_utility.set_location('loutput value1 '|| l_outputs(l_outputs.first).name,10);
390: hr_utility.set_location('loutput value2 '|| l_outputs(l_outputs.first).value,10);
391: if l_outputs(l_outputs.first).name = 'LIFE_EVENT_OCCURRED_DATE' then
392: --
393: l_lf_evt_ocrd_dt :=

Line 390: hr_utility.set_location('loutput value2 '|| l_outputs(l_outputs.first).value,10);

386: --
387: begin
388: --
389: hr_utility.set_location('loutput value1 '|| l_outputs(l_outputs.first).name,10);
390: hr_utility.set_location('loutput value2 '|| l_outputs(l_outputs.first).value,10);
391: if l_outputs(l_outputs.first).name = 'LIFE_EVENT_OCCURRED_DATE' then
392: --
393: l_lf_evt_ocrd_dt :=
394: fnd_date.canonical_to_date(l_outputs(l_outputs.first).value);

Line 490: hr_utility.set_location('Backout All Future PILs ', 50);

486: open c1(g_included_events(l_count).ptnl_ler_for_per_id);
487: fetch c1 into l_per_in_ler_id, l_c1_lf_evt_ocrd_dt;
488: close c1;
489: --
490: hr_utility.set_location('Backout All Future PILs ', 50);
491: --
492: -- 5677090 Backout LE shud be called in reverse order of occurance.
493: -- Before backing out the LEs with same ocrd-dt, we shud backout all future
494: -- LEs. Lets make them 'Unprocessed'.

Line 500: hr_utility.set_location('per_in_ler_id ' || l_pil_rec.per_in_ler_id, 50);

496: --
497: open get_all_fut_pils(l_c1_lf_evt_ocrd_dt, l_per_in_ler_id);
498: loop
499: --
500: hr_utility.set_location('per_in_ler_id ' || l_pil_rec.per_in_ler_id, 50);
501: hr_utility.set_location('lf_evt_ocrd_dt ' || l_pil_rec.lf_evt_ocrd_dt, 50);
502: --
503: fetch get_all_fut_pils into l_pil_rec;
504: exit when get_all_fut_pils%notfound;

Line 501: hr_utility.set_location('lf_evt_ocrd_dt ' || l_pil_rec.lf_evt_ocrd_dt, 50);

497: open get_all_fut_pils(l_c1_lf_evt_ocrd_dt, l_per_in_ler_id);
498: loop
499: --
500: hr_utility.set_location('per_in_ler_id ' || l_pil_rec.per_in_ler_id, 50);
501: hr_utility.set_location('lf_evt_ocrd_dt ' || l_pil_rec.lf_evt_ocrd_dt, 50);
502: --
503: fetch get_all_fut_pils into l_pil_rec;
504: exit when get_all_fut_pils%notfound;
505: --

Line 506: hr_utility.set_location('Backing Out UNPROCD Future '|| l_pil_rec.per_in_ler_id, 50);

502: --
503: fetch get_all_fut_pils into l_pil_rec;
504: exit when get_all_fut_pils%notfound;
505: --
506: hr_utility.set_location('Backing Out UNPROCD Future '|| l_pil_rec.per_in_ler_id, 50);
507: ben_back_out_life_event.back_out_life_events
508: (p_per_in_ler_id => l_pil_rec.per_in_ler_id,
509: p_bckt_per_in_ler_id => null,
510: p_bckt_stat_cd => 'UNPROCD',

Line 529: hr_utility.set_location('PROCD eval ler_id '|| p_events.eval_ler_id, 50);

525: --
526: end loop;
527: close get_all_fut_pils;
528: --
529: hr_utility.set_location('PROCD eval ler_id '|| p_events.eval_ler_id, 50);
530: hr_utility.set_location('PROCD g_included_events '|| g_included_events(l_count).ler_id, 50);
531: /* Bug 7583015: Added if else condition.VOIDD if not winning LE, else backout the winning LE to UNPROCD*/
532: if(g_included_events(l_count).ler_id <> p_events.eval_ler_id) then
533: hr_utility.set_location('Backing Out VOID '|| l_per_in_ler_id, 50);

Line 530: hr_utility.set_location('PROCD g_included_events '|| g_included_events(l_count).ler_id, 50);

526: end loop;
527: close get_all_fut_pils;
528: --
529: hr_utility.set_location('PROCD eval ler_id '|| p_events.eval_ler_id, 50);
530: hr_utility.set_location('PROCD g_included_events '|| g_included_events(l_count).ler_id, 50);
531: /* Bug 7583015: Added if else condition.VOIDD if not winning LE, else backout the winning LE to UNPROCD*/
532: if(g_included_events(l_count).ler_id <> p_events.eval_ler_id) then
533: hr_utility.set_location('Backing Out VOID '|| l_per_in_ler_id, 50);
534: ben_back_out_life_event.back_out_life_events

Line 533: hr_utility.set_location('Backing Out VOID '|| l_per_in_ler_id, 50);

529: hr_utility.set_location('PROCD eval ler_id '|| p_events.eval_ler_id, 50);
530: hr_utility.set_location('PROCD g_included_events '|| g_included_events(l_count).ler_id, 50);
531: /* Bug 7583015: Added if else condition.VOIDD if not winning LE, else backout the winning LE to UNPROCD*/
532: if(g_included_events(l_count).ler_id <> p_events.eval_ler_id) then
533: hr_utility.set_location('Backing Out VOID '|| l_per_in_ler_id, 50);
534: ben_back_out_life_event.back_out_life_events
535: (p_per_in_ler_id => l_per_in_ler_id,
536: p_bckt_per_in_ler_id => null,
537: p_bckt_stat_cd => 'VOIDD',

Line 542: hr_utility.set_location('Backing Out UNPROCD '|| l_per_in_ler_id, 50);

538: p_business_group_id => p_business_group_id,
539: p_effective_date => p_effective_date);
540: l_flag := true;
541: else
542: hr_utility.set_location('Backing Out UNPROCD '|| l_per_in_ler_id, 50);
543: ben_back_out_life_event.back_out_life_events
544: (p_per_in_ler_id => l_per_in_ler_id,
545: p_bckt_per_in_ler_id => null,
546: p_bckt_stat_cd => 'UNPROCD',

Line 600: hr_utility.set_location('In V VOIDD ', 50);

596: -- Update the life event and set its status to voided
597: --
598: /* Bug 7583015: Added if else condition.VOIDD if not winning LE, else backout the winning LE to UNPROCD*/
599: if(g_included_events(l_count).ler_id <> p_events.eval_ler_id) then
600: hr_utility.set_location('In V VOIDD ', 50);
601: ben_ptnl_ler_for_per_api.update_ptnl_ler_for_per
602: (p_ptnl_ler_for_per_id => g_included_events(l_count).
603: ptnl_ler_for_per_id,
604: p_ptnl_ler_for_per_stat_cd => 'VOIDD',

Line 620: hr_utility.set_location('Event not voided '||g_included_events(l_count).ler_id, 50);

616: ntfn_dt);
617: benutils.write(fnd_message.get);
618: else
619: if (g_included_events(l_count).ler_id = p_events.eval_ler_id) then
620: hr_utility.set_location('Event not voided '||g_included_events(l_count).ler_id, 50);
621: hr_utility.set_location('p_events.eval_ler_id '||p_events.eval_ler_id, 50);
622: hr_utility.set_location('state '||g_included_events(l_count).ptnl_ler_for_per_stat_cd, 50);
623: l_flag := true;
624: l_not_present := false;

Line 621: hr_utility.set_location('p_events.eval_ler_id '||p_events.eval_ler_id, 50);

617: benutils.write(fnd_message.get);
618: else
619: if (g_included_events(l_count).ler_id = p_events.eval_ler_id) then
620: hr_utility.set_location('Event not voided '||g_included_events(l_count).ler_id, 50);
621: hr_utility.set_location('p_events.eval_ler_id '||p_events.eval_ler_id, 50);
622: hr_utility.set_location('state '||g_included_events(l_count).ptnl_ler_for_per_stat_cd, 50);
623: l_flag := true;
624: l_not_present := false;
625:

Line 622: hr_utility.set_location('state '||g_included_events(l_count).ptnl_ler_for_per_stat_cd, 50);

618: else
619: if (g_included_events(l_count).ler_id = p_events.eval_ler_id) then
620: hr_utility.set_location('Event not voided '||g_included_events(l_count).ler_id, 50);
621: hr_utility.set_location('p_events.eval_ler_id '||p_events.eval_ler_id, 50);
622: hr_utility.set_location('state '||g_included_events(l_count).ptnl_ler_for_per_stat_cd, 50);
623: l_flag := true;
624: l_not_present := false;
625:
626: /*Bug 9372154: If Winner LE is not processed then update the LE occured with the

Line 631: hr_utility.set_location('Winner LE is not processed ', 50);

627: date determined from the LE occured date determination code */
628: open c_ler_status(g_included_events(l_count).ptnl_ler_for_per_id);
629: fetch c_ler_status into l_flag1;
630: if(c_ler_status%found) then
631: hr_utility.set_location('Winner LE is not processed ', 50);
632: ben_ptnl_ler_for_per_api.update_ptnl_ler_for_per
633: (p_ptnl_ler_for_per_id => g_included_events(l_count).
634: ptnl_ler_for_per_id,
635: p_effective_date => p_effective_date,

Line 728: hr_utility.set_location('Leaving '||l_proc,10);

724: end if;
725: --
726:
727:
728: hr_utility.set_location('Leaving '||l_proc,10);
729: --
730: end perform_collapse;
731: --
732: procedure add_to_included(p_rec in g_events_rec) is

Line 738: hr_utility.set_location('Entering '||l_proc,10);

734: l_proc varchar2(80) := g_package||'add_to_include';
735: --
736: begin
737: --
738: hr_utility.set_location('Entering '||l_proc,10);
739: --
740: -- Add record into included list. This is the list from which we will be
741: -- voiding or deleteing record from.
742: --

Line 753: hr_utility.set_location('Leaving '||l_proc,10);

749: g_included_events(1) := p_rec;
750: --
751: end if;
752: --
753: hr_utility.set_location('Leaving '||l_proc,10);
754: --
755: end add_to_included;
756: --
757: procedure add_expression(p_value in varchar2,

Line 801: hr_utility.set_location('Entering '||l_proc,10);

797: l_expression varchar2(32000);
798: --
799: begin
800: --
801: hr_utility.set_location('Entering '||l_proc,10);
802: --
803: add_expression(p_value => p_events.ler1_id,
804: p_expression => l_expression);
805: --

Line 892: hr_utility.set_location('Leaving '||l_proc,10);

888: p_expression => l_expression);
889: --
890: return l_expression;
891: --
892: hr_utility.set_location('Leaving '||l_proc,10);
893: --
894: exception
895: --
896: when all_expressions_parsed then

Line 898: hr_utility.set_location('Leaving '||l_proc,10);

894: exception
895: --
896: when all_expressions_parsed then
897: --
898: hr_utility.set_location('Leaving '||l_proc,10);
899: return l_expression;
900: --
901: end build_boolean_expression;
902: --

Line 911: hr_utility.set_location('Entering '||l_proc,10);

907: l_rows integer;
908: --
909: begin
910: --
911: hr_utility.set_location('Entering '||l_proc,10);
912: --
913: l_dynamic_sql := 'select 1 from sys.dual where '||p_expression;
914: --
915: execute immediate l_dynamic_sql into l_rows;

Line 923: hr_utility.set_location('Entering '||l_proc,10);

919: return true;
920: --
921: end if;
922: --
923: hr_utility.set_location('Entering '||l_proc,10);
924: --
925: exception
926: --
927: when no_data_found then

Line 949: hr_utility.set_location('Entering '||l_proc,10);

945: l_expression varchar2(32000);
946: --
947: begin
948: --
949: hr_utility.set_location('Entering '||l_proc,10);
950: --
951: g_included_events.delete;
952: --
953: -- Steps to build in string

Line 1004: hr_utility.set_location(' l_exp '||l_expression,10);

1000: l_success := false;
1001: --
1002: end if;
1003: --
1004: hr_utility.set_location(' l_exp '||l_expression,10);
1005: hr_utility.set_location('Leaving '||l_proc,10);
1006: --
1007: return l_success;
1008: --

Line 1005: hr_utility.set_location('Leaving '||l_proc,10);

1001: --
1002: end if;
1003: --
1004: hr_utility.set_location(' l_exp '||l_expression,10);
1005: hr_utility.set_location('Leaving '||l_proc,10);
1006: --
1007: return l_success;
1008: --
1009: end parse_and_match;

Line 1034: hr_utility.set_location('Entering '||l_proc,10);

1030: l_operation varchar2(30) := 'NO_MATCH';
1031: --
1032: begin
1033: --
1034: hr_utility.set_location('Entering '||l_proc,10);
1035: --
1036: -- Test if at least one life event was included in the set
1037: --
1038: --

Line 1083: hr_utility.set_location('Leaving '||l_proc,10);

1079: end loop;
1080: --
1081: close c_events;
1082: --
1083: hr_utility.set_location('Leaving '||l_proc,10);
1084: --
1085: end collapse_event;
1086: --
1087: -- Main routine. This performs the collapse and returns to the calling

Line 1100: hr_utility.set_location('Entering '||l_proc,10);

1096: l_proc varchar2(80) := g_package||'main';
1097: --
1098: begin
1099: --
1100: hr_utility.set_location('Entering '||l_proc,10);
1101: --
1102: -- Steps to perform process
1103: --
1104: -- 1) Check if we have rows in the collapse life event table

Line 1115: hr_utility.set_location('Leaving '||l_proc,10);

1111: p_mode => p_mode,
1112: p_min_lf_evt_ocrd_dt => p_min_lf_evt_ocrd_dt,
1113: p_effective_date => p_effective_date);
1114: --
1115: hr_utility.set_location('Leaving '||l_proc,10);
1116: --
1117: end main;
1118: --
1119: end ben_collapse_life_event;