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: /*
1483: l_effective_date := to_char(p_effective_date,'YYYY/MM/DD HH24:MI:SS');
1484: l_lf_evt_ocrd_dt := to_char(nvl(p_lf_evt_ocrd_dt,p_effective_date),'YYYY/MM/DD HH24:MI:SS');
1485: */
1542: p_commit_data => 'N',
1543: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
1544: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt ); -- GLOBAL CWB l_effective_date );
1545: --
1546: hr_utility.set_location('After process',10);
1547: hr_utility.set_location('Before get_parameter',21);
1548: --
1549: benutils.get_parameter
1550: (p_business_group_id => p_business_group_id,
1543: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
1544: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt ); -- GLOBAL CWB l_effective_date );
1545: --
1546: hr_utility.set_location('After process',10);
1547: hr_utility.set_location('Before get_parameter',21);
1548: --
1549: benutils.get_parameter
1550: (p_business_group_id => p_business_group_id,
1551: p_batch_exe_cd => 'BENMNGLE',
1554: p_max_errors => l_max_errors_allowed);
1555: --
1556: -- Set up benefits environment
1557: --
1558: hr_utility.set_location('After get_parameter',22);
1559: hr_utility.set_location('Before clear_init_benmngle_caches',23);
1560: --
1561: ben_manage_life_events.clear_init_benmngle_caches
1562: (p_business_group_id => p_business_group_id
1555: --
1556: -- Set up benefits environment
1557: --
1558: hr_utility.set_location('After get_parameter',22);
1559: hr_utility.set_location('Before clear_init_benmngle_caches',23);
1560: --
1561: ben_manage_life_events.clear_init_benmngle_caches
1562: (p_business_group_id => p_business_group_id
1563: ,p_effective_date => p_effective_date
1566: ,p_max_errors => l_max_errors_allowed
1567: ,p_benefit_action_id => benutils.g_benefit_action_id
1568: ,p_thread_id => 1
1569: );
1570: hr_utility.set_location('After clear_init_benmngle_caches',24);
1571: hr_utility.set_location('Before Build Comp Object List',30);
1572: --
1573: if (p_mode = 'U')
1574: then
1567: ,p_benefit_action_id => benutils.g_benefit_action_id
1568: ,p_thread_id => 1
1569: );
1570: hr_utility.set_location('After clear_init_benmngle_caches',24);
1571: hr_utility.set_location('Before Build Comp Object List',30);
1572: --
1573: if (p_mode = 'U')
1574: then
1575: ben_comp_object_list.build_comp_object_list
1594: --
1595: ben_manage_life_events.g_modified_mode := 'U';
1596: --
1597: end if;
1598: hr_utility.set_location('After build comp object',32);
1599: hr_utility.set_location('Before Cursor',35);
1600: --
1601: open c_ler;
1602: fetch c_ler into p_ler_id;
1595: ben_manage_life_events.g_modified_mode := 'U';
1596: --
1597: end if;
1598: hr_utility.set_location('After build comp object',32);
1599: hr_utility.set_location('Before Cursor',35);
1600: --
1601: open c_ler;
1602: fetch c_ler into p_ler_id;
1603: --
1609: end if;
1610: --
1611: close c_ler;
1612: --
1613: hr_utility.set_location('After Cursor',40);
1614: hr_utility.set_location('Before evaluate life events',45);
1615: --
1616: ben_manage_life_events.evaluate_life_events
1617: (p_person_id => p_person_id,
1610: --
1611: close c_ler;
1612: --
1613: hr_utility.set_location('After Cursor',40);
1614: hr_utility.set_location('Before evaluate life events',45);
1615: --
1616: ben_manage_life_events.evaluate_life_events
1617: (p_person_id => p_person_id,
1618: p_business_group_id => p_business_group_id,
1621: -- p_popl_enrt_typ_cycl_id => null,
1622: p_lf_evt_ocrd_dt => nvl(p_lf_evt_ocrd_dt,p_effective_date),
1623: p_effective_date => p_effective_date);
1624: --
1625: hr_utility.set_location('After evaluate life events',50);
1626: --
1627: -- save the benefit action id to be used by process_comp_objects.
1628: --
1629: g_benefit_action_id := benutils.g_benefit_action_id;
1630: --
1631: -- To synchronize with process_life_events procedure
1632: -- ben_manage_life_events.person_header is moved here.
1633: --
1634: hr_utility.set_location('Before Person Header',51);
1635: --
1636: if p_mode = 'W' then
1637: -- GLOBAL CWB : Call diferent procedures for different modes.
1638: benutils.get_active_life_event
1685: (p_person_id => p_person_id,
1686: p_business_group_id => p_business_group_id,
1687: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) );
1688: --
1689: hr_utility.set_location('After Person Header',52);
1690: --
1691: hr_utility.set_location('Before process comp objects',55);
1692: --
1693: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1687: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) );
1688: --
1689: hr_utility.set_location('After Person Header',52);
1690: --
1691: hr_utility.set_location('Before process comp objects',55);
1692: --
1693: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1694: hr_utility.set_location('l_rec.lf_evt_ocrd_dt'||l_rec.lf_evt_ocrd_dt,10);
1695: --
1689: hr_utility.set_location('After Person Header',52);
1690: --
1691: hr_utility.set_location('Before process comp objects',55);
1692: --
1693: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1694: hr_utility.set_location('l_rec.lf_evt_ocrd_dt'||l_rec.lf_evt_ocrd_dt,10);
1695: --
1696: ben_manage_life_events.process_comp_objects
1697: (p_person_id => p_person_id,
1690: --
1691: hr_utility.set_location('Before process comp objects',55);
1692: --
1693: hr_utility.set_location('p_ler_id '||p_ler_id,10);
1694: hr_utility.set_location('l_rec.lf_evt_ocrd_dt'||l_rec.lf_evt_ocrd_dt,10);
1695: --
1696: ben_manage_life_events.process_comp_objects
1697: (p_person_id => p_person_id,
1698: p_person_action_id => null,
1706: p_effective_date => p_effective_date,
1707: p_lf_evt_ocrd_dt => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) --CWB GLOBAL
1708: );
1709: --
1710: hr_utility.set_location('After process comp objects',60);
1711:
1712: -- start bug 4430107
1713: if p_mode <> 'U' then -- only for NON-unrestricted Life events
1714: for l_pgm in c_pgm loop
1712: -- start bug 4430107
1713: if p_mode <> 'U' then -- only for NON-unrestricted Life events
1714: for l_pgm in c_pgm loop
1715:
1716: hr_utility.set_location('SUP: In c_pgm Loop :l_pgm.pgm_id '||l_pgm.pgm_id, 99);
1717:
1718: for l_contact in c_contact loop
1719:
1720: hr_utility.set_location('SUP: In c_contact Loop :l_contact.contact_person_id '||l_contact.contact_person_id, 99);
1716: hr_utility.set_location('SUP: In c_pgm Loop :l_pgm.pgm_id '||l_pgm.pgm_id, 99);
1717:
1718: for l_contact in c_contact loop
1719:
1720: hr_utility.set_location('SUP: In c_contact Loop :l_contact.contact_person_id '||l_contact.contact_person_id, 99);
1721:
1722: ben_determine_dpnt_elig_ss.main
1723: (p_pgm_id => l_pgm.pgm_id,
1724: p_per_in_ler_id => l_rec.per_in_ler_id,
1887: where BENEFIT_ACTION_ID = benutils.g_benefit_action_id;
1888: --
1889: begin
1890: --
1891: hr_utility.set_location(l_package || ' Before Process',5);
1892: --
1893: if p_effective_date is not null then
1894: --l_effective_date := to_char(p_effective_date,'YYYY/MM/DD HH24:MI:SS');
1895: l_effective_date := fnd_date.date_to_canonical(p_effective_date);
1956: p_commit_data => 'N',
1957: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
1958: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt );
1959: --
1960: hr_utility.set_location(l_package ||' After process',10);
1961: --
1962: hr_utility.set_location('Before get_parameter',21);
1963: --
1964: benutils.get_parameter
1958: p_lf_evt_ocrd_dt => l_lf_evt_ocrd_dt );
1959: --
1960: hr_utility.set_location(l_package ||' After process',10);
1961: --
1962: hr_utility.set_location('Before get_parameter',21);
1963: --
1964: benutils.get_parameter
1965: (p_business_group_id => p_business_group_id,
1966: p_batch_exe_cd => 'BENMNGLE',
1969: p_max_errors => l_max_errors_allowed);
1970: --
1971: -- Set up benefits environment
1972: --
1973: hr_utility.set_location('After get_parameter',22);
1974: --
1975: -- Clear benmngle level caches
1976: --
1977: ben_manage_life_events.clear_init_benmngle_caches
1983: ,p_benefit_action_id => benutils.g_benefit_action_id
1984: ,p_thread_id => 1
1985: );
1986: --
1987: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
1988: hr_utility.set_location('Before Cursor',35);
1989: --
1990: open c_ler;
1991: fetch c_ler into p_ler_id;
1984: ,p_thread_id => 1
1985: );
1986: --
1987: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
1988: hr_utility.set_location('Before Cursor',35);
1989: --
1990: open c_ler;
1991: fetch c_ler into p_ler_id;
1992: --
2000: end if;
2001: --
2002: close c_ler;
2003: --
2004: hr_utility.set_location('After Cursor',40);
2005: hr_utility.set_location('Before evaluate life events',45);
2006: --
2007: g_ptnls_voidd_flag := FALSE;
2008: ben_manage_life_events.g_modified_mode := null;
2001: --
2002: close c_ler;
2003: --
2004: hr_utility.set_location('After Cursor',40);
2005: hr_utility.set_location('Before evaluate life events',45);
2006: --
2007: g_ptnls_voidd_flag := FALSE;
2008: ben_manage_life_events.g_modified_mode := null;
2009: ben_lf_evt_clps_restore.g_bckdt_pil_restored_flag := 'N';
2016: -- p_popl_enrt_typ_cycl_id => p_popl_enrt_typ_cycl_id,
2017: p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt,
2018: p_effective_date => p_effective_date);
2019: --
2020: hr_utility.set_location('After evaluate life events',50);
2021: --
2022: -- save the benefit action id to be used by process_comp_objects.
2023: --
2024: g_benefit_action_id := benutils.g_benefit_action_id;
2025: --
2026: -- To synchronize with process_life_events procedure
2027: -- ben_manage_life_events.person_header is moved here.
2028: --
2029: hr_utility.set_location('Before Person Header',51);
2030: --
2031: -- GSP : Call diferent procedures for different modes.
2032: if p_mode = 'G' then
2033: --
2069: (p_person_id => p_person_id,
2070: p_business_group_id => p_business_group_id,
2071: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date) );
2072: --
2073: hr_utility.set_location('After Person Header',52);
2074: --
2075: exception
2076: when ben_manage_life_events.g_record_error then
2077: -- there is an error from benmngle, show the error message that is
2120: l_person_action_id number;
2121: --
2122: begin
2123: --
2124: hr_utility.set_location('Before process comp objects',55);
2125: --
2126: --
2127: open c_person_thread;
2128: fetch c_person_thread into l_object_version_number, l_person_action_id;
2148: --
2149: benutils.WRITE_TABLE_AND_FILE(P_TABLE => TRUE, P_FILE => FALSE);
2150: --
2151: ben_cobj_cache.clear_down_cache;
2152: hr_utility.set_location('After process comp objects',60);
2153: --
2154: exception
2155: when ben_manage_life_events.g_record_error then
2156: -- there is an error from benmngle, show the error message that is
2205: where BENEFIT_ACTION_ID = benutils.g_benefit_action_id;
2206: --
2207: begin
2208: --
2209: hr_utility.set_location('Before Process',5);
2210: --
2211: -- Initialise the globals.
2212: --
2213: g_benefit_action_id := null;
2251: p_commit_data => 'N',
2252: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
2253: p_lf_evt_ocrd_dt => l_effective_date );
2254: --
2255: hr_utility.set_location('After process',10);
2256: hr_utility.set_location('Before get_parameter',21);
2257: --
2258: benutils.get_parameter
2259: (p_business_group_id => p_business_group_id,
2252: p_lmt_prpnip_by_org_flag => nvl(fnd_profile.value('BEN_LMT_PRPNIP_BY_ORG_FLAG'), 'N'),
2253: p_lf_evt_ocrd_dt => l_effective_date );
2254: --
2255: hr_utility.set_location('After process',10);
2256: hr_utility.set_location('Before get_parameter',21);
2257: --
2258: benutils.get_parameter
2259: (p_business_group_id => p_business_group_id,
2260: p_batch_exe_cd => 'BENMNGLE',
2263: p_max_errors => l_max_errors_allowed);
2264: --
2265: -- Set up benefits environment
2266: --
2267: hr_utility.set_location('After get_parameter',22);
2268: --
2269: -- Clear benmngle level caches
2270: --
2271: ben_manage_life_events.clear_init_benmngle_caches
2277: ,p_benefit_action_id => benutils.g_benefit_action_id
2278: ,p_thread_id => 1
2279: );
2280: --
2281: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
2282: hr_utility.set_location('Before Cursor',35);
2283: --
2284: open c_ler;
2285: fetch c_ler into p_ler_id;
2278: ,p_thread_id => 1
2279: );
2280: --
2281: hr_utility.set_location('After ben_manage_life_events.clear_init_benmngle_caches',24);
2282: hr_utility.set_location('Before Cursor',35);
2283: --
2284: open c_ler;
2285: fetch c_ler into p_ler_id;
2286: --
2292: end if;
2293: --
2294: close c_ler;
2295: --
2296: hr_utility.set_location('After Cursor',40);
2297: hr_utility.set_location('Before evaluate life events',45);
2298: --
2299: ben_manage_life_events.evaluate_life_events
2300: (p_person_id => p_person_id,
2293: --
2294: close c_ler;
2295: --
2296: hr_utility.set_location('After Cursor',40);
2297: hr_utility.set_location('Before evaluate life events',45);
2298: --
2299: ben_manage_life_events.evaluate_life_events
2300: (p_person_id => p_person_id,
2301: p_business_group_id => p_business_group_id,
2304: -- p_popl_enrt_typ_cycl_id => null,
2305: p_lf_evt_ocrd_dt => p_effective_date,
2306: p_effective_date => p_effective_date);
2307: --
2308: hr_utility.set_location('After evaluate life events',50);
2309: hr_utility.set_location('Before Person Header',25);
2310: --
2311: -- GSP : Call diferent procedures for different modes.
2312: if p_mode = 'G' then
2305: p_lf_evt_ocrd_dt => p_effective_date,
2306: p_effective_date => p_effective_date);
2307: --
2308: hr_utility.set_location('After evaluate life events',50);
2309: hr_utility.set_location('Before Person Header',25);
2310: --
2311: -- GSP : Call diferent procedures for different modes.
2312: if p_mode = 'G' then
2313: --
2350: (p_person_id => p_person_id,
2351: p_business_group_id => p_business_group_id,
2352: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date));
2353: --
2354: hr_utility.set_location('After Person Header',30);
2355: hr_utility.set_location('Before process comp objects',55);
2356: --
2357: ben_manage_life_events.process_comp_objects
2358: (p_person_id => p_person_id,
2351: p_business_group_id => p_business_group_id,
2352: p_effective_date => nvl(l_rec.lf_evt_ocrd_dt,p_effective_date));
2353: --
2354: hr_utility.set_location('After Person Header',30);
2355: hr_utility.set_location('Before process comp objects',55);
2356: --
2357: ben_manage_life_events.process_comp_objects
2358: (p_person_id => p_person_id,
2359: p_person_action_id => benutils.g_benefit_action_id, -- null,
2366: -- p_popl_enrt_typ_cycl_id => null,
2367: p_effective_date => p_effective_date
2368: );
2369: --
2370: hr_utility.set_location('After process comp objects',60);
2371: --
2372: exception
2373: when ben_manage_life_events.g_record_error then
2374: -- there is an error from benmngle, show the error message that is
2489: l_message_count number := 0;
2490: --
2491: begin
2492: --
2493: hr_utility.set_location ('Entering '||l_proc,10);
2494: p_message_type1 := null;
2495: p_message1 := null;
2496: p_message_type2 := null;
2497: p_message2 := null;
2667: end if;
2668: --
2669: end loop;
2670: p_message_count := l_message_count;
2671: hr_utility.set_location ('Leaving '||l_proc,10);
2672: --
2673: return ;
2674: Exception
2675: when others then
2793: l_trace_on := false;
2794: end if;
2795: --
2796: if l_trace_on then
2797: hr_utility.trace_on(null,'BENOLLET');
2798: end if;
2799: --
2800: hr_utility.set_location('l_trace_param : '|| l_trace_param, 5);
2801: hr_utility.set_location ('Entering '||l_proc,10);
2796: if l_trace_on then
2797: hr_utility.trace_on(null,'BENOLLET');
2798: end if;
2799: --
2800: hr_utility.set_location('l_trace_param : '|| l_trace_param, 5);
2801: hr_utility.set_location ('Entering '||l_proc,10);
2802: --
2803: fnd_msg_pub.initialize;
2804:
2797: hr_utility.trace_on(null,'BENOLLET');
2798: end if;
2799: --
2800: hr_utility.set_location('l_trace_param : '|| l_trace_param, 5);
2801: hr_utility.set_location ('Entering '||l_proc,10);
2802: --
2803: fnd_msg_pub.initialize;
2804:
2805: /* One-Off bug 3697615
2820: or (p_ss_process_unrestricted = 'P' and
2821: (benutils.run_osb_benmngle_flag(p_person_id,p_business_group_id,
2822: p_effective_date)))))) then
2823: --
2824: hr_utility.set_location ('Calling p_manage_life_events in '||p_mode||' p_mode ', 20);
2825: --
2826: if p_lf_evt_ocrd_dt IS NOT NULL THEN
2827: open c_open(p_lf_evt_ocrd_dt,p_person_id);
2828: fetch c_open into l_open ;
2864: rollback to ben_popl_lock_savepoint; --in order to release the lock(if obtained) on POPL
2865:
2866: exception
2867: when record_locked then
2868: hr_utility.set_location ('POPL locked. Returning without processing unrestricted.',25);
2869: return; --POPL is locked, so return to calling procedure without processing unrestricted
2870: end;
2871: end if;
2872: --
2897: fnd_msg_pub.initialize;
2898: --
2899: commit;
2900: --
2901: hr_utility.set_location ('Leaving '||l_proc,30);
2902: --
2903: if l_trace_on then
2904: hr_utility.trace_off;
2905: l_trace_param := null;
2900: --
2901: hr_utility.set_location ('Leaving '||l_proc,30);
2902: --
2903: if l_trace_on then
2904: hr_utility.trace_off;
2905: l_trace_param := null;
2906: l_trace_on := false;
2907: end if;
2908: --
2936: rollback;
2937: end if;
2938: --
2939: if l_trace_on then
2940: hr_utility.trace_off;
2941: l_trace_param := null;
2942: l_trace_on := false;
2943: end if;
2944: --rollback;
2948: fnd_message.set_token('2',substr(sqlerrm,1,200));
2949: fnd_msg_pub.add;
2950: p_return_status := 'E';
2951: if l_trace_on then
2952: hr_utility.trace_off;
2953: l_trace_param := null;
2954: l_trace_on := false;
2955: end if;
2956: end p_manage_life_events_w;
2982: --
2983: -- Create a save point.
2984: savepoint irec_life_events_savepoint; --irec2
2985:
2986: --hr_utility.trace_on(NULL, 'IREC2'); -- ACE
2987: --
2988: hr_utility.set_location ('Entering '||l_proc,10);
2989: --
2990: fnd_msg_pub.initialize;
2984: savepoint irec_life_events_savepoint; --irec2
2985:
2986: --hr_utility.trace_on(NULL, 'IREC2'); -- ACE
2987: --
2988: hr_utility.set_location ('Entering '||l_proc,10);
2989: --
2990: fnd_msg_pub.initialize;
2991: --
2992: hr_utility.set_location ('Calling p_manage_irec_life_events_w in iRecruitment (I) mode', 20);
2988: hr_utility.set_location ('Entering '||l_proc,10);
2989: --
2990: fnd_msg_pub.initialize;
2991: --
2992: hr_utility.set_location ('Calling p_manage_irec_life_events_w in iRecruitment (I) mode', 20);
2993: --
2994: -- l_effective_date := to_char(p_effective_date,'YYYY/MM/DD HH24:MI:SS');
2995: l_effective_date := fnd_date.date_to_canonical(p_effective_date);
2996: --
3013: fnd_msg_pub.initialize;
3014: --
3015: commit;
3016: --
3017: hr_utility.set_location ('Leaving '||l_proc,30);
3018: -- hr_utility.trace_off;
3019: --
3020: exception
3021: when app_exception.application_exception then
3014: --
3015: commit;
3016: --
3017: hr_utility.set_location ('Leaving '||l_proc,30);
3018: -- hr_utility.trace_off;
3019: --
3020: exception
3021: when app_exception.application_exception then
3022: get_ser_message(p_encoded_message => l_encoded_message,
3043: when others then
3044: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
3045: fnd_message.set_token('2',substr(sqlerrm,1,200));
3046: fnd_msg_pub.add;
3047: -- hr_utility.set_location(' EXCEPTION CAUGHT',9909);
3048: --hr_utility.trace_off;
3049: rollback to irec_life_events_savepoint;
3050: end p_manage_irec_life_events_w;
3051: --
3044: fnd_message.set_name('PER','FFU10_GENERAL_ORACLE_ERROR');
3045: fnd_message.set_token('2',substr(sqlerrm,1,200));
3046: fnd_msg_pub.add;
3047: -- hr_utility.set_location(' EXCEPTION CAUGHT',9909);
3048: --hr_utility.trace_off;
3049: rollback to irec_life_events_savepoint;
3050: end p_manage_irec_life_events_w;
3051: --
3052: end ben_on_line_lf_evt;