46: l_package varchar2(80) := g_package||'.Start_on_line_lf_evt_proc';
47: --
48: begin
49: --
50: hr_utility.set_location ('Entering '||l_package,05);
51: --
52: --
53: -- Generate a new itemkey
54: --
112: --
113: p_itemkey := itemkey;
114: --
115: --
116: hr_utility.set_location ('Leaving '||l_package,05);
117: --
118: --
119: exception
120: --
170: --
171: begin
172: --
173: --
174: hr_utility.set_location ('Entering '||l_package,05);
175: --
176: --
177: if itemtype = 'BEN_OLLE' then
178: resultout := 'ON_LINE_LIFE_EVENT_PROC';
206: --
207: end if;
208: --
209: --
210: hr_utility.set_location ('Leaving '||l_package,05);
211: --
212: exception
213: --
214: when others then
263: --
264: begin
265:
266: --
267: hr_utility.set_location ('Entering '||l_package,05);
268: --
269: -- RUN mode - normal process execution.
270: --
271: if (funcmode = 'RUN' ) then
345: --
346: end if;
347: --
348: --
349: hr_utility.set_location ('Leaving '||l_package,05);
350: --
351: exception
352: --
353: when others then
581:
582: --
583: begin
584: --
585: hr_utility.set_location ('Entering '||l_package,05);
586: --
587: --
588: -- RUN mode - normal process execution.
589: --
869: --
870: end if;
871: --
872: --
873: hr_utility.set_location ('Leaving '||l_package,05);
874: --
875: exception
876: --
877: when others then
1090: --
1091: begin
1092: --
1093: --
1094: hr_utility.set_location ('Entering '||l_package,05);
1095: --
1096: -- RUN mode - normal process execution.
1097: --
1098: if (funcmode = 'RUN' ) then
1146: --
1147: end if;
1148: --
1149: --
1150: hr_utility.set_location ('Leaving '||l_package,05);
1151: --
1152: exception
1153: --
1154: when others then
1202: --
1203: begin
1204: --
1205: --
1206: hr_utility.set_location ('Entering '||l_package,05);
1207: --
1208: -- RUN mode - normal process execution.
1209: --
1210: if (funcmode = 'RUN' ) then
1262: --
1263: end if;
1264: --
1265: --
1266: hr_utility.set_location ('Leaving '||l_package,05);
1267: --
1268: exception
1269: --
1270: when others then
1477: --l_contact c_contact%rowtype;
1478: --end bug 4430107
1479: begin
1480: --
1481: hr_utility.set_location('Before Process',5);
1482: savepoint p_manage_life_events_savepoint; -- Bug 8290746
1483: /*
1484: l_effective_date := to_char(p_effective_date,'YYYY/MM/DD HH24:MI:SS');
1485: l_lf_evt_ocrd_dt := to_char(nvl(p_lf_evt_ocrd_dt,p_effective_date),'YYYY/MM/DD HH24:MI:SS');
1543: p_commit_data => 'N',
1544: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
1545: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt ); -- GLOBAL CWB l_effective_date );
1546: --
1547: hr_utility.set_location('After process',10);
1548: hr_utility.set_location('Before get_parameter',21);
1549: --
1550: benutils.get_parameter
1551: (p_business_group_id => p_business_group_id,
1544: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
1545: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt ); -- GLOBAL CWB l_effective_date );
1546: --
1547: hr_utility.set_location('After process',10);
1548: hr_utility.set_location('Before get_parameter',21);
1549: --
1550: benutils.get_parameter
1551: (p_business_group_id => p_business_group_id,
1552: p_batch_exe_cd => 'BENMNGLE',
1555: p_max_errors => l_max_errors_allowed);
1556: --
1557: -- Set up benefits environment
1558: --
1559: hr_utility.set_location('After get_parameter',22);
1560: hr_utility.set_location('Before clear_init_benmngle_caches',23);
1561: --
1562: ben_manage_life_events.clear_init_benmngle_caches
1563: (p_business_group_id => p_business_group_id
1556: --
1557: -- Set up benefits environment
1558: --
1559: hr_utility.set_location('After get_parameter',22);
1560: hr_utility.set_location('Before clear_init_benmngle_caches',23);
1561: --
1562: ben_manage_life_events.clear_init_benmngle_caches
1563: (p_business_group_id => p_business_group_id
1564: ,p_effective_date => p_effective_date
1567: ,p_max_errors => l_max_errors_allowed
1568: ,p_benefit_action_id => benutils.g_benefit_action_id
1569: ,p_thread_id => 1
1570: );
1571: hr_utility.set_location('After clear_init_benmngle_caches',24);
1572: hr_utility.set_location('Before Build Comp Object List',30);
1573: --
1574: if (p_mode = 'U')
1575: then
1568: ,p_benefit_action_id => benutils.g_benefit_action_id
1569: ,p_thread_id => 1
1570: );
1571: hr_utility.set_location('After clear_init_benmngle_caches',24);
1572: hr_utility.set_location('Before Build Comp Object List',30);
1573: --
1574: if (p_mode = 'U')
1575: then
1576: ben_comp_object_list.build_comp_object_list
1595: --
1596: ben_manage_life_events.g_modified_mode := 'U';
1597: --
1598: end if;
1599: hr_utility.set_location('After build comp object',32);
1600: hr_utility.set_location('Before Cursor',35);
1601: --
1602: open c_ler;
1603: fetch c_ler into p_ler_id;
1596: ben_manage_life_events.g_modified_mode := 'U';
1597: --
1598: end if;
1599: hr_utility.set_location('After build comp object',32);
1600: hr_utility.set_location('Before Cursor',35);
1601: --
1602: open c_ler;
1603: fetch c_ler into p_ler_id;
1604: --
1610: end if;
1611: --
1612: close c_ler;
1613: --
1614: hr_utility.set_location('After Cursor',40);
1615: hr_utility.set_location('Before evaluate life events',45);
1616: --
1617: ben_manage_life_events.evaluate_life_events
1618: (p_person_id => p_person_id,
1611: --
1612: close c_ler;
1613: --
1614: hr_utility.set_location('After Cursor',40);
1615: hr_utility.set_location('Before evaluate life events',45);
1616: --
1617: ben_manage_life_events.evaluate_life_events
1618: (p_person_id => p_person_id,
1619: p_business_group_id => p_business_group_id,
1622: -- p_popl_enrt_typ_cycl_id => null,
1623: p_lf_evt_ocrd_dt => nvl(p_lf_evt_ocrd_dt,p_effective_date),
1624: p_effective_date => p_effective_date);
1625: --
1626: hr_utility.set_location('After evaluate life events',50);
1627: --
1628: -- save the benefit action id to be used by process_comp_objects.
1629: --
1630: g_benefit_action_id := benutils.g_benefit_action_id;
1631: --
1632: -- To synchronize with process_life_events procedure
1633: -- ben_manage_life_events.person_header is moved here.
1634: --
1635: hr_utility.set_location('Before Person Header',51);
1636: --
1637: if p_mode = 'W' then
1638: -- GLOBAL CWB : Call diferent procedures for different modes.
1639: benutils.get_active_life_event
1686: (p_person_id => p_person_id,
1687: p_business_group_id => p_business_group_id,
1688: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) );
1689: --
1690: hr_utility.set_location('After Person Header',52);
1691: --
1692: hr_utility.set_location('Before process comp objects',55);
1693: --
1694: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1688: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) );
1689: --
1690: hr_utility.set_location('After Person Header',52);
1691: --
1692: hr_utility.set_location('Before process comp objects',55);
1693: --
1694: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1695: hr_utility.set_location('l_rec.lf_evt_ocrd_dt'||l_rec.lf_evt_ocrd_dt,10);
1696: --
1690: hr_utility.set_location('After Person Header',52);
1691: --
1692: hr_utility.set_location('Before process comp objects',55);
1693: --
1694: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1695: hr_utility.set_location('l_rec.lf_evt_ocrd_dt'||l_rec.lf_evt_ocrd_dt,10);
1696: --
1697: ben_manage_life_events.process_comp_objects
1698: (p_person_id => p_person_id,
1691: --
1692: hr_utility.set_location('Before process comp objects',55);
1693: --
1694: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1695: hr_utility.set_location('l_rec.lf_evt_ocrd_dt'||l_rec.lf_evt_ocrd_dt,10);
1696: --
1697: ben_manage_life_events.process_comp_objects
1698: (p_person_id => p_person_id,
1699: p_person_action_id => null,
1707: p_effective_date => p_effective_date,
1708: p_lf_evt_ocrd_dt => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) --CWB GLOBAL
1709: );
1710: --
1711: hr_utility.set_location('After process comp objects',60);
1712:
1713: -- start bug 4430107
1714: if p_mode <> 'U' then -- only for NON-unrestricted Life events
1715: for l_pgm in c_pgm loop
1713: -- start bug 4430107
1714: if p_mode <> 'U' then -- only for NON-unrestricted Life events
1715: for l_pgm in c_pgm loop
1716:
1717: hr_utility.set_location('SUP: In c_pgm Loop :l_pgm.pgm_id '||l_pgm.pgm_id, 99);
1718:
1719: for l_contact in c_contact loop
1720:
1721: hr_utility.set_location('SUP: In c_contact Loop :l_contact.contact_person_id '||l_contact.contact_person_id, 99);
1717: hr_utility.set_location('SUP: In c_pgm Loop :l_pgm.pgm_id '||l_pgm.pgm_id, 99);
1718:
1719: for l_contact in c_contact loop
1720:
1721: hr_utility.set_location('SUP: In c_contact Loop :l_contact.contact_person_id '||l_contact.contact_person_id, 99);
1722:
1723: ben_determine_dpnt_elig_ss.main
1724: (p_pgm_id => l_pgm.pgm_id,
1725: p_per_in_ler_id => l_rec.per_in_ler_id,
1764:
1765: -- Bug 8290746
1766: when ben_manage_life_events.g_cwb_trk_ineligible then
1767: --
1768: hr_utility.set_location ('Exception g_cwb_trk_ineligible ',20);
1769:
1770: --
1771: rollback to p_manage_life_events_savepoint;
1772:
1899: where BENEFIT_ACTION_ID = benutils.g_benefit_action_id;
1900: --
1901: begin
1902: --
1903: hr_utility.set_location(l_package || ' Before Process',5);
1904: --
1905: if p_effective_date is not null then
1906: --l_effective_date := to_char(p_effective_date,'YYYY/MM/DD HH24:MI:SS');
1907: l_effective_date := fnd_date.date_to_canonical(p_effective_date);
1968: p_commit_data => 'N',
1969: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
1970: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt );
1971: --
1972: hr_utility.set_location(l_package ||' After process',10);
1973: --
1974: hr_utility.set_location('Before get_parameter',21);
1975: --
1976: benutils.get_parameter
1970: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt );
1971: --
1972: hr_utility.set_location(l_package ||' After process',10);
1973: --
1974: hr_utility.set_location('Before get_parameter',21);
1975: --
1976: benutils.get_parameter
1977: (p_business_group_id => p_business_group_id,
1978: p_batch_exe_cd => 'BENMNGLE',
1981: p_max_errors => l_max_errors_allowed);
1982: --
1983: -- Set up benefits environment
1984: --
1985: hr_utility.set_location('After get_parameter',22);
1986: --
1987: -- Clear benmngle level caches
1988: --
1989: ben_manage_life_events.clear_init_benmngle_caches
1995: ,p_benefit_action_id => benutils.g_benefit_action_id
1996: ,p_thread_id => 1
1997: );
1998: --
1999: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
2000: hr_utility.set_location('Before Cursor',35);
2001: --
2002: open c_ler;
2003: fetch c_ler into p_ler_id;
1996: ,p_thread_id => 1
1997: );
1998: --
1999: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
2000: hr_utility.set_location('Before Cursor',35);
2001: --
2002: open c_ler;
2003: fetch c_ler into p_ler_id;
2004: --
2012: end if;
2013: --
2014: close c_ler;
2015: --
2016: hr_utility.set_location('After Cursor',40);
2017: hr_utility.set_location('Before evaluate life events',45);
2018: --
2019: g_ptnls_voidd_flag := FALSE;
2020: ben_manage_life_events.g_modified_mode := null;
2013: --
2014: close c_ler;
2015: --
2016: hr_utility.set_location('After Cursor',40);
2017: hr_utility.set_location('Before evaluate life events',45);
2018: --
2019: g_ptnls_voidd_flag := FALSE;
2020: ben_manage_life_events.g_modified_mode := null;
2021: ben_lf_evt_clps_restore.g_bckdt_pil_restored_flag := 'N';
2028: -- p_popl_enrt_typ_cycl_id => p_popl_enrt_typ_cycl_id,
2029: p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt,
2030: p_effective_date => p_effective_date);
2031: --
2032: hr_utility.set_location('After evaluate life events',50);
2033: --
2034: -- save the benefit action id to be used by process_comp_objects.
2035: --
2036: g_benefit_action_id := benutils.g_benefit_action_id;
2037: --
2038: -- To synchronize with process_life_events procedure
2039: -- ben_manage_life_events.person_header is moved here.
2040: --
2041: hr_utility.set_location('Before Person Header',51);
2042: --
2043: -- GSP : Call diferent procedures for different modes.
2044: if p_mode = 'G' then
2045: --
2081: (p_person_id => p_person_id,
2082: p_business_group_id => p_business_group_id,
2083: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) );
2084: --
2085: hr_utility.set_location('After Person Header',52);
2086: --
2087: exception
2088: when ben_manage_life_events.g_record_error then
2089: -- there is an error from benmngle, show the error message that is
2132: l_person_action_id number;
2133: --
2134: begin
2135: --
2136: hr_utility.set_location('Before process comp objects',55);
2137: --
2138: --
2139: open c_person_thread;
2140: fetch c_person_thread into l_object_version_number, l_person_action_id;
2160: --
2161: benutils.WRITE_TABLE_AND_FILE(P_TABLE => TRUE, P_FILE => FALSE);
2162: --
2163: ben_cobj_cache.clear_down_cache;
2164: hr_utility.set_location('After process comp objects',60);
2165: --
2166: exception
2167: when ben_manage_life_events.g_record_error then
2168: -- there is an error from benmngle, show the error message that is
2217: where BENEFIT_ACTION_ID = benutils.g_benefit_action_id;
2218: --
2219: begin
2220: --
2221: hr_utility.set_location('Before Process',5);
2222: --
2223: -- Initialise the globals.
2224: --
2225: g_benefit_action_id := null;
2263: p_commit_data => 'N',
2264: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
2265: p_lf_evt_ocrd_dt => l_effective_date );
2266: --
2267: hr_utility.set_location('After process',10);
2268: hr_utility.set_location('Before get_parameter',21);
2269: --
2270: benutils.get_parameter
2271: (p_business_group_id => p_business_group_id,
2264: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
2265: p_lf_evt_ocrd_dt => l_effective_date );
2266: --
2267: hr_utility.set_location('After process',10);
2268: hr_utility.set_location('Before get_parameter',21);
2269: --
2270: benutils.get_parameter
2271: (p_business_group_id => p_business_group_id,
2272: p_batch_exe_cd => 'BENMNGLE',
2275: p_max_errors => l_max_errors_allowed);
2276: --
2277: -- Set up benefits environment
2278: --
2279: hr_utility.set_location('After get_parameter',22);
2280: --
2281: -- Clear benmngle level caches
2282: --
2283: ben_manage_life_events.clear_init_benmngle_caches
2289: ,p_benefit_action_id => benutils.g_benefit_action_id
2290: ,p_thread_id => 1
2291: );
2292: --
2293: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
2294: hr_utility.set_location('Before Cursor',35);
2295: --
2296: open c_ler;
2297: fetch c_ler into p_ler_id;
2290: ,p_thread_id => 1
2291: );
2292: --
2293: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
2294: hr_utility.set_location('Before Cursor',35);
2295: --
2296: open c_ler;
2297: fetch c_ler into p_ler_id;
2298: --
2304: end if;
2305: --
2306: close c_ler;
2307: --
2308: hr_utility.set_location('After Cursor',40);
2309: hr_utility.set_location('Before evaluate life events',45);
2310: --
2311: ben_manage_life_events.evaluate_life_events
2312: (p_person_id => p_person_id,
2305: --
2306: close c_ler;
2307: --
2308: hr_utility.set_location('After Cursor',40);
2309: hr_utility.set_location('Before evaluate life events',45);
2310: --
2311: ben_manage_life_events.evaluate_life_events
2312: (p_person_id => p_person_id,
2313: p_business_group_id => p_business_group_id,
2316: -- p_popl_enrt_typ_cycl_id => null,
2317: p_lf_evt_ocrd_dt => p_effective_date,
2318: p_effective_date => p_effective_date);
2319: --
2320: hr_utility.set_location('After evaluate life events',50);
2321: hr_utility.set_location('Before Person Header',25);
2322: --
2323: -- GSP : Call diferent procedures for different modes.
2324: if p_mode = 'G' then
2317: p_lf_evt_ocrd_dt => p_effective_date,
2318: p_effective_date => p_effective_date);
2319: --
2320: hr_utility.set_location('After evaluate life events',50);
2321: hr_utility.set_location('Before Person Header',25);
2322: --
2323: -- GSP : Call diferent procedures for different modes.
2324: if p_mode = 'G' then
2325: --
2362: (p_person_id => p_person_id,
2363: p_business_group_id => p_business_group_id,
2364: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date));
2365: --
2366: hr_utility.set_location('After Person Header',30);
2367: hr_utility.set_location('Before process comp objects',55);
2368: --
2369: ben_manage_life_events.process_comp_objects
2370: (p_person_id => p_person_id,
2363: p_business_group_id => p_business_group_id,
2364: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date));
2365: --
2366: hr_utility.set_location('After Person Header',30);
2367: hr_utility.set_location('Before process comp objects',55);
2368: --
2369: ben_manage_life_events.process_comp_objects
2370: (p_person_id => p_person_id,
2371: p_person_action_id => benutils.g_benefit_action_id, -- null,
2378: -- p_popl_enrt_typ_cycl_id => null,
2379: p_effective_date => p_effective_date
2380: );
2381: --
2382: hr_utility.set_location('After process comp objects',60);
2383: --
2384: exception
2385: when ben_manage_life_events.g_record_error then
2386: -- there is an error from benmngle, show the error message that is
2501: l_message_count number := 0;
2502: --
2503: begin
2504: --
2505: hr_utility.set_location ('Entering '||l_proc,10);
2506: p_message_type1 := null;
2507: p_message1 := null;
2508: p_message_type2 := null;
2509: p_message2 := null;
2679: end if;
2680: --
2681: end loop;
2682: p_message_count := l_message_count;
2683: hr_utility.set_location ('Leaving '||l_proc,10);
2684: --
2685: return ;
2686: Exception
2687: when others then
2828: l_trace_on := false;
2829: end if;
2830: --
2831: if l_trace_on then
2832: hr_utility.trace_on(null,'BENOLLET');
2833: end if;
2834: --
2835: hr_utility.set_location('l_trace_param : '|| l_trace_param, 5);
2836: hr_utility.set_location ('Entering '||l_proc,10);
2831: if l_trace_on then
2832: hr_utility.trace_on(null,'BENOLLET');
2833: end if;
2834: --
2835: hr_utility.set_location('l_trace_param : '|| l_trace_param, 5);
2836: hr_utility.set_location ('Entering '||l_proc,10);
2837: --
2838: fnd_msg_pub.initialize;
2839:
2832: hr_utility.trace_on(null,'BENOLLET');
2833: end if;
2834: --
2835: hr_utility.set_location('l_trace_param : '|| l_trace_param, 5);
2836: hr_utility.set_location ('Entering '||l_proc,10);
2837: --
2838: fnd_msg_pub.initialize;
2839:
2840: /* One-Off bug 3697615
2855: or (p_ss_process_unrestricted = 'P' and
2856: (benutils.run_osb_benmngle_flag(p_person_id,p_business_group_id,
2857: p_effective_date)))))) then
2858: --
2859: hr_utility.set_location ('Calling p_manage_life_events in '||p_mode||' p_mode ', 20);
2860: --
2861: if p_lf_evt_ocrd_dt IS NOT NULL THEN
2862: open c_open(p_lf_evt_ocrd_dt,p_person_id);
2863: fetch c_open into l_open ;
2899: rollback to ben_popl_lock_savepoint; --in order to release the lock(if obtained) on POPL
2900:
2901: exception
2902: when record_locked then
2903: hr_utility.set_location ('POPL locked. Returning without processing unrestricted.',25);
2904: return; --POPL is locked, so return to calling procedure without processing unrestricted
2905: end;
2906: end if;
2907: --
2932: fnd_msg_pub.initialize;
2933: --
2934: commit;
2935: --
2936: hr_utility.set_location ('Leaving '||l_proc,30);
2937: --
2938: if l_trace_on then
2939: hr_utility.trace_off;
2940: l_trace_param := null;
2935: --
2936: hr_utility.set_location ('Leaving '||l_proc,30);
2937: --
2938: if l_trace_on then
2939: hr_utility.trace_off;
2940: l_trace_param := null;
2941: l_trace_on := false;
2942: end if;
2943: --
2986: rollback;
2987: end if;
2988: --
2989: if l_trace_on then
2990: hr_utility.trace_off;
2991: l_trace_param := null;
2992: l_trace_on := false;
2993: end if;
2994: --rollback;
2998: fnd_message.set_token('2',substr(sqlerrm,1,200));
2999: fnd_msg_pub.add;
3000: p_return_status := 'E';
3001: if l_trace_on then
3002: hr_utility.trace_off;
3003: l_trace_param := null;
3004: l_trace_on := false;
3005: end if;
3006: end p_manage_life_events_w;
3032: --
3033: -- Create a save point.
3034: savepoint irec_life_events_savepoint; --irec2
3035:
3036: --hr_utility.trace_on(NULL, 'IREC2'); -- ACE
3037: --
3038: hr_utility.set_location ('Entering '||l_proc,10);
3039: --
3040: fnd_msg_pub.initialize;
3034: savepoint irec_life_events_savepoint; --irec2
3035:
3036: --hr_utility.trace_on(NULL, 'IREC2'); -- ACE
3037: --
3038: hr_utility.set_location ('Entering '||l_proc,10);
3039: --
3040: fnd_msg_pub.initialize;
3041: --
3042: hr_utility.set_location ('Calling p_manage_irec_life_events_w in iRecruitment (I) mode', 20);
3038: hr_utility.set_location ('Entering '||l_proc,10);
3039: --
3040: fnd_msg_pub.initialize;
3041: --
3042: hr_utility.set_location ('Calling p_manage_irec_life_events_w in iRecruitment (I) mode', 20);
3043: --
3044: -- l_effective_date := to_char(p_effective_date,'YYYY/MM/DD HH24:MI:SS');
3045: l_effective_date := fnd_date.date_to_canonical(p_effective_date);
3046: --
3063: fnd_msg_pub.initialize;
3064: --
3065: commit;
3066: --
3067: hr_utility.set_location ('Leaving '||l_proc,30);
3068: -- hr_utility.trace_off;
3069: --
3070: exception
3071: when app_exception.application_exception then
3064: --
3065: commit;
3066: --
3067: hr_utility.set_location ('Leaving '||l_proc,30);
3068: -- hr_utility.trace_off;
3069: --
3070: exception
3071: when app_exception.application_exception then
3072: get_ser_message(p_encoded_message => l_encoded_message,
3093: when others then
3094: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
3095: fnd_message.set_token('2',substr(sqlerrm,1,200));
3096: fnd_msg_pub.add;
3097: -- hr_utility.set_location(' EXCEPTION CAUGHT',9909);
3098: --hr_utility.trace_off;
3099: rollback to irec_life_events_savepoint;
3100: end p_manage_irec_life_events_w;
3101: --
3094: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
3095: fnd_message.set_token('2',substr(sqlerrm,1,200));
3096: fnd_msg_pub.add;
3097: -- hr_utility.set_location(' EXCEPTION CAUGHT',9909);
3098: --hr_utility.trace_off;
3099: rollback to irec_life_events_savepoint;
3100: end p_manage_irec_life_events_w;
3101: --
3102: end ben_on_line_lf_evt;