1248: --
1249: if p_gsp_plip_id is null or p_gsp_pgm_id is null
1250: then
1251: --
1252: fnd_message.set_name('BEN','BEN_94094_PERSON_GRADE_NOT_FND');
1253: --
1254: elsif p_gsp_emp_step_id is null or p_gsp_oipl_id is null
1255: then
1256: --
1253: --
1254: elsif p_gsp_emp_step_id is null or p_gsp_oipl_id is null
1255: then
1256: --
1257: fnd_message.set_name('BEN','BEN_94095_PERSON_STEP_NOT_FND');
1258: --
1259: end if;
1260: --
1261: raise g_record_error;
1598: --
1599: if p_no_plans = 'Y' and
1600: p_no_programs = 'Y' then
1601: --
1602: fnd_message.set_name('BEN','BEN_91391_NO_PLAN_PROG');
1603: fnd_message.raise_error;
1604: --
1605: end if;
1606: --
1599: if p_no_plans = 'Y' and
1600: p_no_programs = 'Y' then
1601: --
1602: fnd_message.set_name('BEN','BEN_91391_NO_PLAN_PROG');
1603: fnd_message.raise_error;
1604: --
1605: end if;
1606: --
1607: -- p_person_selection_rule_id and p_person_id are mutually exclusive
1608: --
1609: if p_person_id is not null and
1610: p_person_selection_rule_id is not null then
1611: --
1612: fnd_message.set_name('BEN','BEN_91745_RULE_AND_PERSON');
1613: fnd_message.raise_error;
1614: --
1615: end if;
1616: --
1609: if p_person_id is not null and
1610: p_person_selection_rule_id is not null then
1611: --
1612: fnd_message.set_name('BEN','BEN_91745_RULE_AND_PERSON');
1613: fnd_message.raise_error;
1614: --
1615: end if;
1616: --
1617: -- p_no_plans = 'Y' then p_pl_id and p_opt_id must be null
1619: if p_no_plans = 'Y' and
1620: (p_pl_id is not null or
1621: p_opt_id is not null) then
1622: --
1623: fnd_message.set_name('BEN','BEN_91746_PROGRAMS_ONLY');
1624: fnd_message.raise_error;
1625: --
1626: end if;
1627: --
1620: (p_pl_id is not null or
1621: p_opt_id is not null) then
1622: --
1623: fnd_message.set_name('BEN','BEN_91746_PROGRAMS_ONLY');
1624: fnd_message.raise_error;
1625: --
1626: end if;
1627: --
1628: -- p_no_programs = 'Y' then p_pgm_id must be null
1629: --
1630: if p_no_programs = 'Y' and
1631: p_pgm_id is not null then
1632: --
1633: fnd_message.set_name('BEN','BEN_91747_PLANS_ONLY');
1634: fnd_message.raise_error;
1635: --
1636: end if;
1637: --
1630: if p_no_programs = 'Y' and
1631: p_pgm_id is not null then
1632: --
1633: fnd_message.set_name('BEN','BEN_91747_PLANS_ONLY');
1634: fnd_message.raise_error;
1635: --
1636: end if;
1637: --
1638: -- p_person_id must be of p_person_type_id
1647: fetch c1 into l_dummy;
1648: if c1%notfound then
1649: --
1650: close c1;
1651: fnd_message.set_name('BEN','BEN_91748_PERSON_TYPE');
1652: fnd_message.raise_error;
1653: --
1654: end if;
1655: --
1648: if c1%notfound then
1649: --
1650: close c1;
1651: fnd_message.set_name('BEN','BEN_91748_PERSON_TYPE');
1652: fnd_message.raise_error;
1653: --
1654: end if;
1655: --
1656: close c1;
1666: (p_no_plans = 'Y' or
1667: p_opt_id is not null or
1668: p_pl_id is not null) then
1669: --
1670: fnd_message.set_name('BEN','BEN_91749_PLAN_TYPE');
1671: fnd_message.raise_error;
1672: --
1673: end if;
1674: --
1667: p_opt_id is not null or
1668: p_pl_id is not null) then
1669: --
1670: fnd_message.set_name('BEN','BEN_91749_PLAN_TYPE');
1671: fnd_message.raise_error;
1672: --
1673: end if;
1674: --
1675: -- p_mode = 'C' and p_popl_enrt_typ_cycl_id is null
1682: --
1683: -- p_popl_enrt_typ_cycl_id is null then
1684: p_lf_evt_ocrd_dt is null then
1685: --
1686: fnd_message.set_name('BEN','BEN_91667_SCHED_NO_POPL_ENRT');
1687: fnd_message.raise_error;
1688: --
1689: end if;
1690: --
1683: -- p_popl_enrt_typ_cycl_id is null then
1684: p_lf_evt_ocrd_dt is null then
1685: --
1686: fnd_message.set_name('BEN','BEN_91667_SCHED_NO_POPL_ENRT');
1687: fnd_message.raise_error;
1688: --
1689: end if;
1690: --
1691: -- CWB Changes
1691: -- CWB Changes
1692: --
1693: if p_mode = 'W' and p_pl_id is null then
1694: --
1695: fnd_message.set_name('BEN','BEN_91667_SCHED_NO_POPL_ENRT');
1696: fnd_message.raise_error;
1697: --
1698: end if;
1699:
1692: --
1693: if p_mode = 'W' and p_pl_id is null then
1694: --
1695: fnd_message.set_name('BEN','BEN_91667_SCHED_NO_POPL_ENRT');
1696: fnd_message.raise_error;
1697: --
1698: end if;
1699:
1700: --
1702: -- Effective date must be greater than or equal to Life Event Occurred Date
1703: --
1704: if p_mode = 'W' and p_effective_date < p_lf_evt_ocrd_dt then
1705: --
1706: fnd_message.set_name('BEN','BEN_93017_INVALID_EFF_DATE');
1707: fnd_message.raise_error;
1708: --
1709: end if;
1710:
1703: --
1704: if p_mode = 'W' and p_effective_date < p_lf_evt_ocrd_dt then
1705: --
1706: fnd_message.set_name('BEN','BEN_93017_INVALID_EFF_DATE');
1707: fnd_message.raise_error;
1708: --
1709: end if;
1710:
1711: --
1725: fetch c2 into l_dummy;
1726: if c2%found then -- Bug 3975857 Changed "notfound" to "found"
1727: --
1728: close c2;
1729: fnd_message.set_name('BEN','BEN_93015_CWB_NO_WS_RATE');
1730: fnd_message.raise_error;
1731: --
1732: end if;
1733: --
1726: if c2%found then -- Bug 3975857 Changed "notfound" to "found"
1727: --
1728: close c2;
1729: fnd_message.set_name('BEN','BEN_93015_CWB_NO_WS_RATE');
1730: fnd_message.raise_error;
1731: --
1732: end if;
1733: --
1734: close c2;
1740: fetch c5 into l_dummy;
1741: if c5%found then
1742: --
1743: close c5;
1744: fnd_message.set_name('BEN','BEN_93968_CWB_BDGT_RT_AMT_CB');
1745: fnd_message.raise_error;
1746: --
1747: end if;
1748: close c5;
1741: if c5%found then
1742: --
1743: close c5;
1744: fnd_message.set_name('BEN','BEN_93968_CWB_BDGT_RT_AMT_CB');
1745: fnd_message.raise_error;
1746: --
1747: end if;
1748: close c5;
1749: --
1772: * fetch c11 into l_dummy ;
1773: * if c11%found then
1774: * close c11 ;
1775: * close c10 ;
1776: * fnd_message.set_name('BEN','BEN_93742_CWB_RATE_TO_CHILD');
1777: * fnd_message.raise_error;
1778: * end if ;
1779: * close c11 ;
1780: * end if ;
1773: * if c11%found then
1774: * close c11 ;
1775: * close c10 ;
1776: * fnd_message.set_name('BEN','BEN_93742_CWB_RATE_TO_CHILD');
1777: * fnd_message.raise_error;
1778: * end if ;
1779: * close c11 ;
1780: * end if ;
1781: * close c10 ;
1786: if c3_rec.uses_bdgt_flag = 'Y' then
1787: if l_cwbdb_count < 1 or
1788: l_cwbwb_count < 1 then
1789: --
1790: fnd_message.set_name('BEN','BEN_93967_CWB_BDGT_RT_PLAN_CB');
1791: fnd_message.raise_error;
1792: --
1793: end if;
1794: end if ;
1787: if l_cwbdb_count < 1 or
1788: l_cwbwb_count < 1 then
1789: --
1790: fnd_message.set_name('BEN','BEN_93967_CWB_BDGT_RT_PLAN_CB');
1791: fnd_message.raise_error;
1792: --
1793: end if;
1794: end if ;
1795: /* -- bug 5090149
1797: open c9 ;
1798: fetch c9 into l_dummy ;
1799: if c9%notfound then
1800: close c9 ;
1801: fnd_message.set_name('BEN','BEN_93740_CWB_BDGT_TASK_NOT');
1802: fnd_message.raise_error;
1803: end if ;
1804: close c9 ;
1805: */
1798: fetch c9 into l_dummy ;
1799: if c9%notfound then
1800: close c9 ;
1801: fnd_message.set_name('BEN','BEN_93740_CWB_BDGT_TASK_NOT');
1802: fnd_message.raise_error;
1803: end if ;
1804: close c9 ;
1805: */
1806:
1812: -- if the plan is not group and date DB/WB/reserve attached then error
1813: if l_cwbdb_count > 0 or
1814: l_cwbwb_count > 0 or
1815: l_cwbr_count > 0 then
1816: fnd_message.set_name('BEN','BEN_93743_CWB_RATE_TO_GROUP');
1817: fnd_message.raise_error;
1818: end if ;
1819: */
1820: end if ;
1813: if l_cwbdb_count > 0 or
1814: l_cwbwb_count > 0 or
1815: l_cwbr_count > 0 then
1816: fnd_message.set_name('BEN','BEN_93743_CWB_RATE_TO_GROUP');
1817: fnd_message.raise_error;
1818: end if ;
1819: */
1820: end if ;
1821: --
1827: fetch c6 into l_dummy;
1828: if c6%found then
1829: --
1830: close c6;
1831: fnd_message.set_name('BEN','BEN_93319_CWB_BDGT_RT_SAL');
1832: fnd_message.raise_error;
1833: --
1834: end if;
1835: --
1828: if c6%found then
1829: --
1830: close c6;
1831: fnd_message.set_name('BEN','BEN_93319_CWB_BDGT_RT_SAL');
1832: fnd_message.raise_error;
1833: --
1834: end if;
1835: --
1836: close c6;
1848: fetch c7 into l_opt_count;
1849: close c7;
1850:
1851: if l_opt_count = 1 then
1852: fnd_message.set_name('BEN','BEN_93320_CWB_OPT_COMP_RSN');
1853: fnd_message.raise_error;
1854: end if;
1855: */
1856:
1849: close c7;
1850:
1851: if l_opt_count = 1 then
1852: fnd_message.set_name('BEN','BEN_93320_CWB_OPT_COMP_RSN');
1853: fnd_message.raise_error;
1854: end if;
1855: */
1856:
1857: --
1862: fetch c8 into l_dummy;
1863: if c8%found then
1864: --
1865: close c8;
1866: fnd_message.set_name('BEN','BEN_93356_CWB_NO_CVG');
1867: fnd_message.raise_error;
1868: --
1869: end if;
1870: --
1863: if c8%found then
1864: --
1865: close c8;
1866: fnd_message.set_name('BEN','BEN_93356_CWB_NO_CVG');
1867: fnd_message.raise_error;
1868: --
1869: end if;
1870: --
1871: close c8;
1885: fetch c_irec_rptg_grp into l_dummy;
1886: if c_irec_rptg_grp%notfound then
1887: --
1888: close c_irec_rptg_grp;
1889: fnd_message.set_name('BEN','BEN_94026_NO_RPTG_GRP_DFND');
1890: fnd_message.raise_error;
1891: --
1892: end if;
1893: --
1886: if c_irec_rptg_grp%notfound then
1887: --
1888: close c_irec_rptg_grp;
1889: fnd_message.set_name('BEN','BEN_94026_NO_RPTG_GRP_DFND');
1890: fnd_message.raise_error;
1891: --
1892: end if;
1893: --
1894: close c_irec_rptg_grp;
1908: if c_gsp_rate_sync_ler%notfound
1909: then
1910: --
1911: close c_gsp_rate_sync_ler;
1912: fnd_message.set_name('BEN','BEN_94090_NO_GSP_RS_LER_DFND');
1913: fnd_message.raise_error;
1914: --
1915: end if;
1916: --
1909: then
1910: --
1911: close c_gsp_rate_sync_ler;
1912: fnd_message.set_name('BEN','BEN_94090_NO_GSP_RS_LER_DFND');
1913: fnd_message.raise_error;
1914: --
1915: end if;
1916: --
1917: close c_gsp_rate_sync_ler;
1934: (p_lookup_type => 'BEN_BENMNGLE_MD',
1935: p_lookup_code => p_mode,
1936: p_effective_date => p_effective_date) then
1937: --
1938: fnd_message.set_name('BEN','BEN_91326_MODE_INVALID');
1939: fnd_message.raise_error;
1940: --
1941: end if;
1942: --
1935: p_lookup_code => p_mode,
1936: p_effective_date => p_effective_date) then
1937: --
1938: fnd_message.set_name('BEN','BEN_91326_MODE_INVALID');
1939: fnd_message.raise_error;
1940: --
1941: end if;
1942: --
1943: -- 2940151 grade/step
1946: if p_per_sel_dt_cd is null and
1947: ( p_per_sel_dt_from is not null or
1948: p_per_sel_dt_to is not null) then
1949:
1950: fnd_message.set_name('PER','HR_289506_SPP_BR_NULL');
1951: fnd_message.raise_error;
1952: end if;
1953:
1954: -- 2. If business rule param is not null and business rule strt or end dts
1947: ( p_per_sel_dt_from is not null or
1948: p_per_sel_dt_to is not null) then
1949:
1950: fnd_message.set_name('PER','HR_289506_SPP_BR_NULL');
1951: fnd_message.raise_error;
1952: end if;
1953:
1954: -- 2. If business rule param is not null and business rule strt or end dts
1955: -- are null, raise error
1956: if p_per_sel_dt_cd is not null and
1957: ( p_per_sel_dt_from is null or
1958: p_per_sel_dt_to is null) then
1959:
1960: fnd_message.set_name('PER','HR_289510_SPP_BR_DATE_NULL');
1961: fnd_message.raise_error;
1962: end if;
1963: --
1964: -- 3. If business rule param is neither of the four values, raise error
1957: ( p_per_sel_dt_from is null or
1958: p_per_sel_dt_to is null) then
1959:
1960: fnd_message.set_name('PER','HR_289510_SPP_BR_DATE_NULL');
1961: fnd_message.raise_error;
1962: end if;
1963: --
1964: -- 3. If business rule param is neither of the four values, raise error
1965:
1963: --
1964: -- 3. If business rule param is neither of the four values, raise error
1965:
1966: if p_per_sel_dt_cd not in ('AOJ', 'DOB', 'ASD', 'LHD') then
1967: fnd_message.set_name('PER','HR_289507_SPP_BR_INVALID');
1968: fnd_message.raise_error;
1969: end if;
1970: --
1971: -- 4. If date from is greater than date to, raise error
1964: -- 3. If business rule param is neither of the four values, raise error
1965:
1966: if p_per_sel_dt_cd not in ('AOJ', 'DOB', 'ASD', 'LHD') then
1967: fnd_message.set_name('PER','HR_289507_SPP_BR_INVALID');
1968: fnd_message.raise_error;
1969: end if;
1970: --
1971: -- 4. If date from is greater than date to, raise error
1972:
1970: --
1971: -- 4. If date from is greater than date to, raise error
1972:
1973: if p_per_sel_dt_from > p_per_sel_dt_to then
1974: fnd_message.set_name('PER','HR_289500_SPP_BR_DATE');
1975: fnd_message.raise_error;
1976: end if;
1977: --
1978: -- 5. If the dates are more than 12 months apart, raise error
1971: -- 4. If date from is greater than date to, raise error
1972:
1973: if p_per_sel_dt_from > p_per_sel_dt_to then
1974: fnd_message.set_name('PER','HR_289500_SPP_BR_DATE');
1975: fnd_message.raise_error;
1976: end if;
1977: --
1978: -- 5. If the dates are more than 12 months apart, raise error
1979:
1977: --
1978: -- 5. If the dates are more than 12 months apart, raise error
1979:
1980: if ( months_between( p_per_sel_dt_to, p_per_sel_dt_from) > 12 ) then
1981: fnd_message.set_name('PER','HR_289501_SPP_BR_YEAR_GREATER');
1982: fnd_message.raise_error;
1983: end if;
1984: --
1985: -- 6. If effective date does not fall between the from and to dates, raise error
1978: -- 5. If the dates are more than 12 months apart, raise error
1979:
1980: if ( months_between( p_per_sel_dt_to, p_per_sel_dt_from) > 12 ) then
1981: fnd_message.set_name('PER','HR_289501_SPP_BR_YEAR_GREATER');
1982: fnd_message.raise_error;
1983: end if;
1984: --
1985: -- 6. If effective date does not fall between the from and to dates, raise error
1986:
1984: --
1985: -- 6. If effective date does not fall between the from and to dates, raise error
1986:
1987: if not ( p_effective_date between p_per_sel_dt_from and p_per_sel_dt_to ) then
1988: fnd_message.set_name('PER','HR_289503_SPP_EFF_BR_DATE');
1989: fnd_message.raise_error;
1990: end if;
1991: --
1992: -- 7. If year from is greater than year to, raise error
1985: -- 6. If effective date does not fall between the from and to dates, raise error
1986:
1987: if not ( p_effective_date between p_per_sel_dt_from and p_per_sel_dt_to ) then
1988: fnd_message.set_name('PER','HR_289503_SPP_EFF_BR_DATE');
1989: fnd_message.raise_error;
1990: end if;
1991: --
1992: -- 7. If year from is greater than year to, raise error
1993:
1991: --
1992: -- 7. If year from is greater than year to, raise error
1993:
1994: if p_year_from > p_year_to then
1995: fnd_message.set_name('PER','HR_289504_SPP_BR_YEAR_FROM_TO');
1996: fnd_message.raise_error;
1997: end if;
1998: --
1999: -- end 2940151
1992: -- 7. If year from is greater than year to, raise error
1993:
1994: if p_year_from > p_year_to then
1995: fnd_message.set_name('PER','HR_289504_SPP_BR_YEAR_FROM_TO');
1996: fnd_message.raise_error;
1997: end if;
1998: --
1999: -- end 2940151
2000:
2752: exception
2753: --
2754: --
2755: when table_full then
2756: benutils.write(fnd_message.get);
2757: fnd_message.raise_error;
2758: when index_full then
2759: benutils.write(fnd_message.get);
2760: fnd_message.raise_error;
2753: --
2754: --
2755: when table_full then
2756: benutils.write(fnd_message.get);
2757: fnd_message.raise_error;
2758: when index_full then
2759: benutils.write(fnd_message.get);
2760: fnd_message.raise_error;
2761: --
2755: when table_full then
2756: benutils.write(fnd_message.get);
2757: fnd_message.raise_error;
2758: when index_full then
2759: benutils.write(fnd_message.get);
2760: fnd_message.raise_error;
2761: --
2762: when others then
2763: --
2756: benutils.write(fnd_message.get);
2757: fnd_message.raise_error;
2758: when index_full then
2759: benutils.write(fnd_message.get);
2760: fnd_message.raise_error;
2761: --
2762: when others then
2763: --
2764: fnd_message.set_name('BEN','BEN_91663_BENMNGLE_LOGGING');
2760: fnd_message.raise_error;
2761: --
2762: when others then
2763: --
2764: fnd_message.set_name('BEN','BEN_91663_BENMNGLE_LOGGING');
2765: benutils.write(fnd_message.get);
2766: fnd_message.raise_error;
2767: --
2768: end write_logfile;
2761: --
2762: when others then
2763: --
2764: fnd_message.set_name('BEN','BEN_91663_BENMNGLE_LOGGING');
2765: benutils.write(fnd_message.get);
2766: fnd_message.raise_error;
2767: --
2768: end write_logfile;
2769: --
2762: when others then
2763: --
2764: fnd_message.set_name('BEN','BEN_91663_BENMNGLE_LOGGING');
2765: benutils.write(fnd_message.get);
2766: fnd_message.raise_error;
2767: --
2768: end write_logfile;
2769: --
2770: procedure flush_global_structures is
5965: );
5966: --
5967: if l_slave_errored then
5968: --
5969: fnd_message.raise_error;
5970: --
5971: end if;
5972: --
5973: if g_debug then
5979: when g_record_error then
5980: if g_debug then
5981: hr_utility.set_location (l_package||' Exception g_record_error ',50);
5982: end if;
5983: benutils.write(p_text => fnd_message.get);
5984: --
5985: -- Write the last bit of information for the thread
5986: --
5987: benutils.write_table_and_file(p_table => true,
6013: if g_debug then
6014: hr_utility.set_location ('BENMNGLE Super Error '||l_package,10);
6015: end if;
6016: g_rec.rep_typ_cd := 'FATAL';
6017: g_rec.text := nvl(fnd_message.get,sqlerrm);
6018: if g_debug then
6019: hr_utility.set_location(substr(g_rec.text,1,100),10);
6020: end if;
6021: benutils.write(p_rec => g_rec);
6037: end if;
6038: --
6039: -- Set generic system error with oracle SQLCODE as the token
6040: --
6041: fnd_message.set_name('BEN','BEN_91665_BENMNGLE_ERRORED');
6042: fnd_message.set_token('ORA_ERRCODE',SQLCODE);
6043: --
6044: benutils.write(p_text => fnd_message.get);
6045: benutils.write_table_and_file(p_table => true,
6038: --
6039: -- Set generic system error with oracle SQLCODE as the token
6040: --
6041: fnd_message.set_name('BEN','BEN_91665_BENMNGLE_ERRORED');
6042: fnd_message.set_token('ORA_ERRCODE',SQLCODE);
6043: --
6044: benutils.write(p_text => fnd_message.get);
6045: benutils.write_table_and_file(p_table => true,
6046: p_file => true);
6040: --
6041: fnd_message.set_name('BEN','BEN_91665_BENMNGLE_ERRORED');
6042: fnd_message.set_token('ORA_ERRCODE',SQLCODE);
6043: --
6044: benutils.write(p_text => fnd_message.get);
6045: benutils.write_table_and_file(p_table => true,
6046: p_file => true);
6047: commit;
6048: if g_debug then
6047: commit;
6048: if g_debug then
6049: hr_utility.set_location ('Others error '||l_package,100);
6050: end if;
6051: fnd_message.raise_error;
6052: --
6053: end do_multithread;
6054: --
6055: procedure restart
6117: --
6118: fetch c_parameters into l_parameters;
6119: if c_parameters%notfound then
6120: --
6121: fnd_message.set_name('BEN','BEN_91666_BENMNGLE_NO_RESTART');
6122: fnd_message.raise_error;
6123: --
6124: end if;
6125: --
6118: fetch c_parameters into l_parameters;
6119: if c_parameters%notfound then
6120: --
6121: fnd_message.set_name('BEN','BEN_91666_BENMNGLE_NO_RESTART');
6122: fnd_message.raise_error;
6123: --
6124: end if;
6125: --
6126: close c_parameters;
6284: --
6285: Exception
6286: when l_exc_no_parent_req then
6287: -- 4394545
6288: fnd_message.set_name('BEN','BEN_94272_COMOD_NO_SRS_SUBMIT');
6289: l_text := fnd_message.get ;
6290: FND_FILE.PUT_LINE(FND_FILE.LOG, l_text);
6291: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', l_text) ;
6292: --
6285: Exception
6286: when l_exc_no_parent_req then
6287: -- 4394545
6288: fnd_message.set_name('BEN','BEN_94272_COMOD_NO_SRS_SUBMIT');
6289: l_text := fnd_message.get ;
6290: FND_FILE.PUT_LINE(FND_FILE.LOG, l_text);
6291: l_temp := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', l_text) ;
6292: --
6293: end cwb_process;
6811: fetch c_irec_ass_rec into ben_manage_life_events.g_irec_old_ass_rec; -- irec2
6812: if c_irec_ass_rec%notfound then
6813: --
6814: close c_irec_ass_rec;
6815: fnd_message.set_name('BEN','BEN_94027_NO_ACT_APL_ASS_FOUND');
6816: fnd_message.raise_error;
6817: --
6818: else -- begin irec2
6819: begin
6812: if c_irec_ass_rec%notfound then
6813: --
6814: close c_irec_ass_rec;
6815: fnd_message.set_name('BEN','BEN_94027_NO_ACT_APL_ASS_FOUND');
6816: fnd_message.raise_error;
6817: --
6818: else -- begin irec2
6819: begin
6820: l_old_data_migrator_mode := hr_general.g_data_migrator_mode ;
7656: fetch c_popl_enrt_typ_cycl into l_ler_override_id, l_popl_enrt_typ_cycl_id;
7657: if c_popl_enrt_typ_cycl%notfound then
7658: --
7659: close c_popl_enrt_typ_cycl;
7660: fnd_message.set_name('BEN','BEN_91668_NO_FIND_POPL_ENRT');
7661: fnd_message.raise_error;
7662: --
7663: end if;
7664: --
7657: if c_popl_enrt_typ_cycl%notfound then
7658: --
7659: close c_popl_enrt_typ_cycl;
7660: fnd_message.set_name('BEN','BEN_91668_NO_FIND_POPL_ENRT');
7661: fnd_message.raise_error;
7662: --
7663: end if;
7664: --
7665: close c_popl_enrt_typ_cycl;
8015: --
8016: if l_num_ranges = 0 then
8017: --
8018: if nvl(p_mode, 'X') <> 'W' then
8019: fnd_message.set_name('BEN','BEN_91769_NOONE_TO_PROCESS');
8020: -- Bug 3870204 : If no persons are selected then, dont error out, but just write the message
8021: -- in Audit Log and finish the process with Status = Normal
8022: -- fnd_message.raise_error;
8023: fnd_message.set_token('PROC' , l_package);
8018: if nvl(p_mode, 'X') <> 'W' then
8019: fnd_message.set_name('BEN','BEN_91769_NOONE_TO_PROCESS');
8020: -- Bug 3870204 : If no persons are selected then, dont error out, but just write the message
8021: -- in Audit Log and finish the process with Status = Normal
8022: -- fnd_message.raise_error;
8023: fnd_message.set_token('PROC' , l_package);
8024: raise l_no_one_to_process;
8025: end if;
8026: --
8019: fnd_message.set_name('BEN','BEN_91769_NOONE_TO_PROCESS');
8020: -- Bug 3870204 : If no persons are selected then, dont error out, but just write the message
8021: -- in Audit Log and finish the process with Status = Normal
8022: -- fnd_message.raise_error;
8023: fnd_message.set_token('PROC' , l_package);
8024: raise l_no_one_to_process;
8025: end if;
8026: --
8027: end if;
8188: --
8189: exception
8190: -- Bug 3870204
8191: when l_no_one_to_process then
8192: benutils.write(p_text => fnd_message.get);
8193: benutils.write_table_and_file(p_table => TRUE, p_file => TRUE);
8194: rollback;
8195: end internal_process;
8196: --
9109: close c_ler_exists;
9110: --
9111: end if;
9112: --
9113: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
9114: --
9115: -- CWB Changes : Added mode
9116: --
9117: if p_mode in ('C', 'L') then
9118: --
9119: if g_debug then
9120: hr_utility.set_location('Evaluate potential',10);
9121: end if;
9122: fnd_message.set_token('PROC','ben_evaluate_ptnl_lf_evt');
9123: --
9124: if p_validate = 'Y'
9125: then
9126: l_validate := TRUE;
9144: if g_debug then
9145: hr_utility.set_location('Evaluate iRec Potential LER',10);
9146: end if;
9147: --
9148: fnd_message.set_token('PROC','ben_evaluate_ptnl_lf_evt');
9149: --
9150: ben_evaluate_ptnl_lf_evt.irec_eval_ptnl_per_for_ler
9151: (p_validate => false,
9152: p_person_id => p_person_id,
9166: --
9167: if g_debug then
9168: hr_utility.set_location('CWB Evaluate potential',10);
9169: end if;
9170: fnd_message.set_token('PROC','cwb_eval_ptnl_per_for_ler');
9171: --
9172: ben_evaluate_ptnl_lf_evt.cwb_eval_ptnl_per_for_ler
9173: (p_validate => false,
9174: p_person_id => p_person_id,
9342: l_use_mode := 'Scheduled mode';
9343: else
9344: l_use_mode := 'Life event mode';
9345: end if;
9346: fnd_message.set_name('BEN','BEN_92145_MODE_LE_DIFFER');
9347: fnd_message.set_token('MODE',l_use_mode);
9348: --
9349: -- Bug 2836770
9350: -- Set proper values to global variables before raising error
9343: else
9344: l_use_mode := 'Life event mode';
9345: end if;
9346: fnd_message.set_name('BEN','BEN_92145_MODE_LE_DIFFER');
9347: fnd_message.set_token('MODE',l_use_mode);
9348: --
9349: -- Bug 2836770
9350: -- Set proper values to global variables before raising error
9351: -- Once value is retrieved from fnd_message.get, the next call
9347: fnd_message.set_token('MODE',l_use_mode);
9348: --
9349: -- Bug 2836770
9350: -- Set proper values to global variables before raising error
9351: -- Once value is retrieved from fnd_message.get, the next call
9352: -- return null value. Hence set the values.
9353: --
9354: g_rec.text := fnd_message.get;
9355: g_rec.error_message_code := 'BEN_92145_MODE_LE_DIFFER';
9350: -- Set proper values to global variables before raising error
9351: -- Once value is retrieved from fnd_message.get, the next call
9352: -- return null value. Hence set the values.
9353: --
9354: g_rec.text := fnd_message.get;
9355: g_rec.error_message_code := 'BEN_92145_MODE_LE_DIFFER';
9356: benutils.write(p_text => g_rec.text );
9357: --
9358: -- Bug 2836770
9360: -- Bug : 3658807
9361: -- Set the message name so that correct message is displayed in
9362: -- BENAUTHE.pld (Life Events Evaluation Processing Summary) - Messages
9363: --
9364: fnd_message.set_name('BEN','BEN_92145_MODE_LE_DIFFER');
9365: fnd_message.set_token('MODE',l_use_mode);
9366: raise g_record_error;
9367: --
9368: end if;
9361: -- Set the message name so that correct message is displayed in
9362: -- BENAUTHE.pld (Life Events Evaluation Processing Summary) - Messages
9363: --
9364: fnd_message.set_name('BEN','BEN_92145_MODE_LE_DIFFER');
9365: fnd_message.set_token('MODE',l_use_mode);
9366: raise g_record_error;
9367: --
9368: end if;
9369: --
9383: ben_env_object.setenv(p_lf_evt_ocrd_dt => l_rec.lf_evt_ocrd_dt);
9384: dt_fndate.change_ses_date
9385: (p_ses_date => l_rec.lf_evt_ocrd_dt,
9386: p_commit => l_commit);
9387: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
9388: fnd_message.set_token('PROC','ben_related_person_ler_api');
9389: if g_debug then
9390: hr_utility.set_location (l_package||' create_rel_per_ler ' ,20);
9391: end if;
9384: dt_fndate.change_ses_date
9385: (p_ses_date => l_rec.lf_evt_ocrd_dt,
9386: p_commit => l_commit);
9387: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
9388: fnd_message.set_token('PROC','ben_related_person_ler_api');
9389: if g_debug then
9390: hr_utility.set_location (l_package||' create_rel_per_ler ' ,20);
9391: end if;
9392: --
9621: end if;
9622: --
9623: end if;
9624: --
9625: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
9626: fnd_message.set_token('PROC','benutils.get_batch_parameters');
9627: ben_enrolment_requirements.g_electable_choice_created := false;
9628: ben_enrolment_requirements.g_any_choice_created := false;
9629: ben_enrolment_requirements.g_auto_choice_created := false;
9622: --
9623: end if;
9624: --
9625: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
9626: fnd_message.set_token('PROC','benutils.get_batch_parameters');
9627: ben_enrolment_requirements.g_electable_choice_created := false;
9628: ben_enrolment_requirements.g_any_choice_created := false;
9629: ben_enrolment_requirements.g_auto_choice_created := false;
9630: ben_determine_dpnt_eligibility.g_dpnt_ineligible := false;
10427: if l_gsp_pgm_id is null or
10428: l_gsp_plip_id is null
10429: then
10430: hr_utility.set_location('Current GSP Grade Ladder / Grade / PLIP for person not found', 15);
10431: fnd_message.set_name('BEN','BEN_94094_PERSON_GRADE_NOT_FND');
10432: raise g_record_error;
10433: elsif l_prgr_style not in ('PQH_GSP_GP') and l_gsp_oipl_id is null /* Bug 3964719 */
10434: then
10435: hr_utility.set_location('Current GSP OIPL for person not found', 15);
10432: raise g_record_error;
10433: elsif l_prgr_style not in ('PQH_GSP_GP') and l_gsp_oipl_id is null /* Bug 3964719 */
10434: then
10435: hr_utility.set_location('Current GSP OIPL for person not found', 15);
10436: fnd_message.set_name('BEN','BEN_94095_PERSON_STEP_NOT_FND');
10437: raise g_record_error;
10438: end if;
10439: --
10440: open c_ptip_pl_id(l_gsp_pgm_id,l_gsp_plip_id);
10478: end if;
10479: --
10480: end if;
10481: --
10482: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
10483: fnd_message.set_token('PROC','BEN_CARRY_FORWARD_ITEMS');
10484: --
10485: -- If the event is staying open, then delete the suspended enrollments
10486: -- and action items
10479: --
10480: end if;
10481: --
10482: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
10483: fnd_message.set_token('PROC','BEN_CARRY_FORWARD_ITEMS');
10484: --
10485: -- If the event is staying open, then delete the suspended enrollments
10486: -- and action items
10487: --
10948: --
10949: if p_derivable_factors <> 'NONE' then
10950: --
10951: if g_debug then
10952: hr_utility.set_location (l_package||' fnd_message_call ',30);
10953: end if;
10954: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
10955: fnd_message.set_token('PROC','ben_derive_part_and_rate_facts');
10956: if g_debug then
10950: --
10951: if g_debug then
10952: hr_utility.set_location (l_package||' fnd_message_call ',30);
10953: end if;
10954: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
10955: fnd_message.set_token('PROC','ben_derive_part_and_rate_facts');
10956: if g_debug then
10957: hr_utility.set_location (l_package||' done fnd_message_call ',30);
10958: hr_utility.set_location (l_package||' DRAF ',15);
10951: if g_debug then
10952: hr_utility.set_location (l_package||' fnd_message_call ',30);
10953: end if;
10954: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
10955: fnd_message.set_token('PROC','ben_derive_part_and_rate_facts');
10956: if g_debug then
10957: hr_utility.set_location (l_package||' done fnd_message_call ',30);
10958: hr_utility.set_location (l_package||' DRAF ',15);
10959: end if;
10953: end if;
10954: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
10955: fnd_message.set_token('PROC','ben_derive_part_and_rate_facts');
10956: if g_debug then
10957: hr_utility.set_location (l_package||' done fnd_message_call ',30);
10958: hr_utility.set_location (l_package||' DRAF ',15);
10959: end if;
10960: ben_derive_part_and_rate_facts.derive_rates_and_factors
10961: (p_comp_obj_tree_row => l_comp_obj_tree_row
11017: --
11018: -- p_mode changed to l_mode in following line by Gopal Venkataraman 3/27/01 bug 1636071
11019: if l_mode not in ('R','T') then
11020: --
11021: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11022: fnd_message.set_token('PROC','ben_determine_eligibility');
11023: if g_debug then
11024: hr_utility.set_location (l_package||' Dn FND Mess ',80);
11025: end if;
11018: -- p_mode changed to l_mode in following line by Gopal Venkataraman 3/27/01 bug 1636071
11019: if l_mode not in ('R','T') then
11020: --
11021: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11022: fnd_message.set_token('PROC','ben_determine_eligibility');
11023: if g_debug then
11024: hr_utility.set_location (l_package||' Dn FND Mess ',80);
11025: end if;
11026: --
11331: --
11332: if g_debug then
11333: hr_utility.set_location (l_package||' FND Bf BENDENRR ',85);
11334: end if;
11335: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11336: fnd_message.set_token('PROC','ben_enrolment_requirements');
11337: --
11338: -- p_mode changed to l_mode in following line by Gopal Venkataraman
11339: -- 3/27/01 bug 1636071
11332: if g_debug then
11333: hr_utility.set_location (l_package||' FND Bf BENDENRR ',85);
11334: end if;
11335: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11336: fnd_message.set_token('PROC','ben_enrolment_requirements');
11337: --
11338: -- p_mode changed to l_mode in following line by Gopal Venkataraman
11339: -- 3/27/01 bug 1636071
11340: --
11387: --
11388: ben_epe_cache.g_currcobjepe_row.ler_id := p_ler_id;
11389: ben_epe_cache.g_currcobjepe_row.opt_id := l_comp_obj_tree(l_treeele_num).par_opt_id;
11390: --
11391: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11392: fnd_message.set_token('PROC','ben_determine_dpnt_eligibility');
11393: --
11394: if g_debug then
11395: hr_utility.set_location (l_package||' BDDE_PUEWEID ',110);
11388: ben_epe_cache.g_currcobjepe_row.ler_id := p_ler_id;
11389: ben_epe_cache.g_currcobjepe_row.opt_id := l_comp_obj_tree(l_treeele_num).par_opt_id;
11390: --
11391: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11392: fnd_message.set_token('PROC','ben_determine_dpnt_eligibility');
11393: --
11394: if g_debug then
11395: hr_utility.set_location (l_package||' BDDE_PUEWEID ',110);
11396: end if;
11411: );
11412: --
11413: end if;
11414: --
11415: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11416: fnd_message.set_token('PROC','BEN_DETERMINE_CHC_CTFN');
11417: --
11418: if g_debug then
11419: hr_utility.set_location ('BDCC_MN '||l_package,10);
11412: --
11413: end if;
11414: --
11415: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11416: fnd_message.set_token('PROC','BEN_DETERMINE_CHC_CTFN');
11417: --
11418: if g_debug then
11419: hr_utility.set_location ('BDCC_MN '||l_package,10);
11420: end if;
11428: if g_debug then
11429: hr_utility.set_location ('Dn BDCC_MN '||l_package,10);
11430: end if;
11431: --
11432: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11433: fnd_message.set_token('PROC','ben_determine_coverage');
11434: --
11435: if g_debug then
11436: hr_utility.set_location (l_package||' ben_determine_coverage.main ',110);
11429: hr_utility.set_location ('Dn BDCC_MN '||l_package,10);
11430: end if;
11431: --
11432: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11433: fnd_message.set_token('PROC','ben_determine_coverage');
11434: --
11435: if g_debug then
11436: hr_utility.set_location (l_package||' ben_determine_coverage.main ',110);
11437: end if;
11487: if g_debug then
11488: hr_utility.set_location (l_package||' FND Bf BENDENRR ',86);
11489: hr_utility.set_location ('l_oipl_id' ||l_oipl_id,87);
11490: end if;
11491: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11492: fnd_message.set_token('PROC','ben_enrolment_requirements');
11493: --
11494: ben_enrolment_requirements.enrolment_requirements
11495: (p_comp_obj_tree_row => l_comp_obj_tree_row
11488: hr_utility.set_location (l_package||' FND Bf BENDENRR ',86);
11489: hr_utility.set_location ('l_oipl_id' ||l_oipl_id,87);
11490: end if;
11491: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11492: fnd_message.set_token('PROC','ben_enrolment_requirements');
11493: --
11494: ben_enrolment_requirements.enrolment_requirements
11495: (p_comp_obj_tree_row => l_comp_obj_tree_row
11496: ,p_run_mode => 'U' --l_mode
11767: );
11768: -- 1895846 call
11769: -- to delete the egd records create for the suspended pen or in pending wkflow epe records
11770: --
11771: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11772: fnd_message.set_token('PROC','delete_in_pndg_elig_dpnt');
11773: --
11774: delete_in_pndg_elig_dpnt( l_rec.per_in_ler_id,p_effective_date ) ;
11775: --
11768: -- 1895846 call
11769: -- to delete the egd records create for the suspended pen or in pending wkflow epe records
11770: --
11771: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11772: fnd_message.set_token('PROC','delete_in_pndg_elig_dpnt');
11773: --
11774: delete_in_pndg_elig_dpnt( l_rec.per_in_ler_id,p_effective_date ) ;
11775: --
11776: end if;
11773: --
11774: delete_in_pndg_elig_dpnt( l_rec.per_in_ler_id,p_effective_date ) ;
11775: --
11776: end if;
11777: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11778: fnd_message.set_token('PROC','ben_determine_elct_chc_flx_imp');
11779: if g_debug then
11780: hr_utility.set_location('lf evt ocrd dt'||l_rec.lf_evt_ocrd_dt,11);
11781: end if;
11774: delete_in_pndg_elig_dpnt( l_rec.per_in_ler_id,p_effective_date ) ;
11775: --
11776: end if;
11777: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11778: fnd_message.set_token('PROC','ben_determine_elct_chc_flx_imp');
11779: if g_debug then
11780: hr_utility.set_location('lf evt ocrd dt'||l_rec.lf_evt_ocrd_dt,11);
11781: end if;
11782: --
11823: then
11824: if g_debug then
11825: hr_utility.set_location (l_package||'.ben_determine_actual_premium ',10);
11826: end if;
11827: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11828: fnd_message.set_token('PROC','ben_determine_actual_premium');
11829: --
11830: ben_determine_actual_premium.main
11831: (p_person_id => p_person_id,
11824: if g_debug then
11825: hr_utility.set_location (l_package||'.ben_determine_actual_premium ',10);
11826: end if;
11827: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11828: fnd_message.set_token('PROC','ben_determine_actual_premium');
11829: --
11830: ben_determine_actual_premium.main
11831: (p_person_id => p_person_id,
11832: p_effective_date => p_effective_date,
11842: --
11843: if g_debug then
11844: hr_utility.set_location ('FND mess '||l_package,10);
11845: end if;
11846: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11847: fnd_message.set_token('PROC','ben_determine_rates');
11848: --
11849: if g_debug then
11850: hr_utility.set_location ('ben_determine_rates '||l_package,10);
11843: if g_debug then
11844: hr_utility.set_location ('FND mess '||l_package,10);
11845: end if;
11846: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11847: fnd_message.set_token('PROC','ben_determine_rates');
11848: --
11849: if g_debug then
11850: hr_utility.set_location ('ben_determine_rates '||l_package,10);
11851: end if;
11900: end if;
11901: if g_debug then
11902: hr_utility.set_location ('ben_determine_rate_chg '||l_package,10);
11903: end if;
11904: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11905: fnd_message.set_token('PROC','ben_determine_rate_chg');
11906: --
11907: -- Turn off distribute rates function caching because cached information
11908: -- is updated in later RCOs. Any further RCOs will hit the DB rather the
11901: if g_debug then
11902: hr_utility.set_location ('ben_determine_rate_chg '||l_package,10);
11903: end if;
11904: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11905: fnd_message.set_token('PROC','ben_determine_rate_chg');
11906: --
11907: -- Turn off distribute rates function caching because cached information
11908: -- is updated in later RCOs. Any further RCOs will hit the DB rather the
11909: -- function cache.
11927: end if;
11928: --
11929: end if;
11930: --
11931: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11932: fnd_message.set_token('PROC','reset_elctbl_chc_inpng_flag');
11933: --
11934: -- Reset the in_pndg_wkflow_flag to 'N' for the suspended enrollment cases
11935: --
11928: --
11929: end if;
11930: --
11931: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11932: fnd_message.set_token('PROC','reset_elctbl_chc_inpng_flag');
11933: --
11934: -- Reset the in_pndg_wkflow_flag to 'N' for the suspended enrollment cases
11935: --
11936: reset_elctbl_chc_inpng_flag(l_rec.per_in_ler_id,p_effective_date );
11948: p_effective_date => l_rec.lf_evt_ocrd_dt);
11949: --
11950: end if;
11951: --
11952: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11953: fnd_message.set_token('PROC','ben_automatic_enrollments');
11954: --
11955: -- Do the automatic enrollments
11956: --
11949: --
11950: end if;
11951: --
11952: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11953: fnd_message.set_token('PROC','ben_automatic_enrollments');
11954: --
11955: -- Do the automatic enrollments
11956: --
11957: -- CWB Changes.
11977: --
11978: --
11979: -- Check for reqired communications
11980: --
11981: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11982: fnd_message.set_token('PROC','ben_generate_communications');
11983: --
11984: if g_debug then
11985: hr_utility.set_location ('Comms '||l_package,10);
11978: --
11979: -- Check for reqired communications
11980: --
11981: fnd_message.set_name('BEN','BEN_91333_CALLING_PROC');
11982: fnd_message.set_token('PROC','ben_generate_communications');
11983: --
11984: if g_debug then
11985: hr_utility.set_location ('Comms '||l_package,10);
11986: end if;
12190: open c_get_ptip(l_rslt_rec.ptip_id);
12191: fetch c_get_ptip into l_ptip_rec;
12192: if c_get_ptip%notfound then
12193: close c_get_ptip;
12194: fnd_message.set_name('BEN','BEN_91462_PTIP_MISSING');
12195: fnd_message.set_token('ID', to_char(l_rslt_rec.ptip_id) );
12196: fnd_message.raise_error;
12197: end if;
12198: --
12191: fetch c_get_ptip into l_ptip_rec;
12192: if c_get_ptip%notfound then
12193: close c_get_ptip;
12194: fnd_message.set_name('BEN','BEN_91462_PTIP_MISSING');
12195: fnd_message.set_token('ID', to_char(l_rslt_rec.ptip_id) );
12196: fnd_message.raise_error;
12197: end if;
12198: --
12199: close c_get_ptip;
12192: if c_get_ptip%notfound then
12193: close c_get_ptip;
12194: fnd_message.set_name('BEN','BEN_91462_PTIP_MISSING');
12195: fnd_message.set_token('ID', to_char(l_rslt_rec.ptip_id) );
12196: fnd_message.raise_error;
12197: end if;
12198: --
12199: close c_get_ptip;
12200: --
12213: close c_get_ptip_tot_enrd;
12214: hr_utility.set_location (' MN_ENRD_RQD_OVRID_NUM '||l_ptip_rec.MN_ENRD_RQD_OVRID_NUM,10);
12215: if (l_count < l_MN_ENRD_RQD_OVRID_NUM ) then
12216: hr_utility.set_location (' error '||l_count,10);
12217: fnd_message.set_name('BEN','BEN_91588_PL_ENRD_LT_MN_RQD');
12218: fnd_message.set_token('MN_ENRL', to_char(l_MN_ENRD_RQD_OVRID_NUM));
12219: fnd_message.set_token('PL_TYP_NAME', l_ptip_rec.name);
12220: fnd_message.raise_error;
12221: end if;
12214: hr_utility.set_location (' MN_ENRD_RQD_OVRID_NUM '||l_ptip_rec.MN_ENRD_RQD_OVRID_NUM,10);
12215: if (l_count < l_MN_ENRD_RQD_OVRID_NUM ) then
12216: hr_utility.set_location (' error '||l_count,10);
12217: fnd_message.set_name('BEN','BEN_91588_PL_ENRD_LT_MN_RQD');
12218: fnd_message.set_token('MN_ENRL', to_char(l_MN_ENRD_RQD_OVRID_NUM));
12219: fnd_message.set_token('PL_TYP_NAME', l_ptip_rec.name);
12220: fnd_message.raise_error;
12221: end if;
12222: end if;
12215: if (l_count < l_MN_ENRD_RQD_OVRID_NUM ) then
12216: hr_utility.set_location (' error '||l_count,10);
12217: fnd_message.set_name('BEN','BEN_91588_PL_ENRD_LT_MN_RQD');
12218: fnd_message.set_token('MN_ENRL', to_char(l_MN_ENRD_RQD_OVRID_NUM));
12219: fnd_message.set_token('PL_TYP_NAME', l_ptip_rec.name);
12220: fnd_message.raise_error;
12221: end if;
12222: end if;
12223: end loop;
12216: hr_utility.set_location (' error '||l_count,10);
12217: fnd_message.set_name('BEN','BEN_91588_PL_ENRD_LT_MN_RQD');
12218: fnd_message.set_token('MN_ENRL', to_char(l_MN_ENRD_RQD_OVRID_NUM));
12219: fnd_message.set_token('PL_TYP_NAME', l_ptip_rec.name);
12220: fnd_message.raise_error;
12221: end if;
12222: end if;
12223: end loop;
12224: end if;
12760: g_rec.person_id := p_person_id;
12761: g_rec.pgm_id := l_env.pgm_id;
12762: g_rec.pl_id := l_env.pl_id;
12763: g_rec.oipl_id := l_env.oipl_id;
12764: l_encoded_message := fnd_message.get_encoded;
12765: fnd_message.parse_encoded(encoded_message => l_encoded_message,
12766: app_short_name => l_app_short_name,
12767: message_name => l_message_name);
12768: fnd_message.set_encoded(encoded_message => l_encoded_message);
12761: g_rec.pgm_id := l_env.pgm_id;
12762: g_rec.pl_id := l_env.pl_id;
12763: g_rec.oipl_id := l_env.oipl_id;
12764: l_encoded_message := fnd_message.get_encoded;
12765: fnd_message.parse_encoded(encoded_message => l_encoded_message,
12766: app_short_name => l_app_short_name,
12767: message_name => l_message_name);
12768: fnd_message.set_encoded(encoded_message => l_encoded_message);
12769:
12764: l_encoded_message := fnd_message.get_encoded;
12765: fnd_message.parse_encoded(encoded_message => l_encoded_message,
12766: app_short_name => l_app_short_name,
12767: message_name => l_message_name);
12768: fnd_message.set_encoded(encoded_message => l_encoded_message);
12769:
12770: g_rec.rep_typ_cd := 'ERROR';
12771: g_rec.national_identifier := l_per_rec.national_identifier;
12772:
12770: g_rec.rep_typ_cd := 'ERROR';
12771: g_rec.national_identifier := l_per_rec.national_identifier;
12772:
12773: -- Bug 2836770
12774: -- Added nvl's for l_message_name and fnd_message.get
12775: -- made call to write_table_and_file
12776: --
12777: g_rec.error_message_code := nvl(l_message_name , g_rec.error_message_code);
12778: g_rec.text := nvl(fnd_message.get , g_rec.text );
12774: -- Added nvl's for l_message_name and fnd_message.get
12775: -- made call to write_table_and_file
12776: --
12777: g_rec.error_message_code := nvl(l_message_name , g_rec.error_message_code);
12778: g_rec.text := nvl(fnd_message.get , g_rec.text );
12779: --
12780: --benutils.write(p_text => g_rec.text); /* GSP Rate Sync */
12781: benutils.write(p_rec => g_rec);
12782: --
12795: p_error_person_count := p_error_person_count +1;
12796: --
12797: if p_error_person_count = g_max_errors_allowed then
12798: --
12799: fnd_message.set_name('BEN','BEN_91662_BENMNGLE_ERROR_LIMIT');
12800: benutils.write(p_text => fnd_message.get);
12801: if g_debug then
12802: hr_utility.set_location ('PLE g_record_error Err Lim '||l_package,10);
12803: end if;
12796: --
12797: if p_error_person_count = g_max_errors_allowed then
12798: --
12799: fnd_message.set_name('BEN','BEN_91662_BENMNGLE_ERROR_LIMIT');
12800: benutils.write(p_text => fnd_message.get);
12801: if g_debug then
12802: hr_utility.set_location ('PLE g_record_error Err Lim '||l_package,10);
12803: end if;
12804: --
12874: g_rec.person_id := p_person_id;
12875: g_rec.pgm_id := l_env.pgm_id;
12876: g_rec.pl_id := l_env.pl_id;
12877: g_rec.oipl_id := l_env.oipl_id;
12878: l_encoded_message := fnd_message.get_encoded;
12879: fnd_message.parse_encoded(encoded_message => l_encoded_message,
12880: app_short_name => l_app_short_name,
12881: message_name => l_message_name);
12882: fnd_message.set_encoded(encoded_message => l_encoded_message);
12875: g_rec.pgm_id := l_env.pgm_id;
12876: g_rec.pl_id := l_env.pl_id;
12877: g_rec.oipl_id := l_env.oipl_id;
12878: l_encoded_message := fnd_message.get_encoded;
12879: fnd_message.parse_encoded(encoded_message => l_encoded_message,
12880: app_short_name => l_app_short_name,
12881: message_name => l_message_name);
12882: fnd_message.set_encoded(encoded_message => l_encoded_message);
12883: g_rec.rep_typ_cd := 'ERROR';
12878: l_encoded_message := fnd_message.get_encoded;
12879: fnd_message.parse_encoded(encoded_message => l_encoded_message,
12880: app_short_name => l_app_short_name,
12881: message_name => l_message_name);
12882: fnd_message.set_encoded(encoded_message => l_encoded_message);
12883: g_rec.rep_typ_cd := 'ERROR';
12884: g_rec.error_message_code := l_message_name;
12885: g_rec.national_identifier := l_per_rec.national_identifier;
12886: g_rec.text := fnd_message.get;
12882: fnd_message.set_encoded(encoded_message => l_encoded_message);
12883: g_rec.rep_typ_cd := 'ERROR';
12884: g_rec.error_message_code := l_message_name;
12885: g_rec.national_identifier := l_per_rec.national_identifier;
12886: g_rec.text := fnd_message.get;
12887: benutils.write(p_text => g_rec.text);
12888: benutils.write(p_rec => g_rec);
12889: --
12890: g_action_rec.person_action_id := p_person_action_id;
12898: p_error_person_count := p_error_person_count +1;
12899: --
12900: if p_error_person_count = g_max_errors_allowed then
12901: --
12902: fnd_message.set_name('BEN','BEN_91662_BENMNGLE_ERROR_LIMIT');
12903: benutils.write(p_text => fnd_message.get);
12904: --
12905: -- Write the last bit of information for the thread before
12906: -- the rollback fires when we raise the error.
12899: --
12900: if p_error_person_count = g_max_errors_allowed then
12901: --
12902: fnd_message.set_name('BEN','BEN_91662_BENMNGLE_ERROR_LIMIT');
12903: benutils.write(p_text => fnd_message.get);
12904: --
12905: -- Write the last bit of information for the thread before
12906: -- the rollback fires when we raise the error.
12907: --