211: Begin
212: --
213: hr_utility.set_location('Entering:'||l_proc, 5);
214: --
215: l_api_updating := ben_epa_shd.api_updating
216: (p_effective_date => p_effective_date,
217: p_prtn_elig_id => p_prtn_elig_id,
218: p_object_version_number => p_object_version_number);
219: --
218: p_object_version_number => p_object_version_number);
219: --
220: if (l_api_updating
221: and nvl(p_prtn_elig_id,hr_api.g_number)
222: <> ben_epa_shd.g_old_rec.prtn_elig_id) then
223: --
224: -- raise error as PK has changed
225: --
226: ben_epa_shd.constraint_error('BEN_PRTN_ELIG_PK');
222: <> ben_epa_shd.g_old_rec.prtn_elig_id) then
223: --
224: -- raise error as PK has changed
225: --
226: ben_epa_shd.constraint_error('BEN_PRTN_ELIG_PK');
227: --
228: elsif not l_api_updating then
229: --
230: -- check if PK is null
232: if p_prtn_elig_id is not null then
233: --
234: -- raise error as PK is not null
235: --
236: ben_epa_shd.constraint_error('BEN_PRTN_ELIG_PK');
237: --
238: end if;
239: --
240: end if;
297: Begin
298: --
299: hr_utility.set_location('Entering:'||l_proc, 5);
300: --
301: l_api_updating := ben_epa_shd.api_updating
302: (p_prtn_elig_id => p_prtn_elig_id,
303: p_effective_date => p_effective_date,
304: p_object_version_number => p_object_version_number);
305: --
304: p_object_version_number => p_object_version_number);
305: --
306: if (l_api_updating
307: and nvl(p_prtn_eff_end_dt_rl,hr_api.g_number)
308: <> ben_epa_shd.g_old_rec.prtn_eff_end_dt_rl
309: or not l_api_updating)
310: and p_prtn_eff_end_dt_rl is not null then
311: --
312: -- check if value of formula rule is valid.
393: Begin
394: --
395: hr_utility.set_location('Entering:'||l_proc, 5);
396: --
397: l_api_updating := ben_epa_shd.api_updating
398: (p_prtn_elig_id => p_prtn_elig_id,
399: p_effective_date => p_effective_date,
400: p_object_version_number => p_object_version_number);
401: --
400: p_object_version_number => p_object_version_number);
401: --
402: if (l_api_updating
403: and nvl(p_prtn_eff_strt_dt_rl,hr_api.g_number)
404: <> ben_epa_shd.g_old_rec.prtn_eff_strt_dt_rl
405: or not l_api_updating)
406: and p_prtn_eff_strt_dt_rl is not null then
407: --
408: -- check if value of formula rule is valid.
471: Begin
472: --
473: hr_utility.set_location('Entering:'||l_proc, 5);
474: --
475: l_api_updating := ben_epa_shd.api_updating
476: (p_prtn_elig_id => p_prtn_elig_id,
477: p_effective_date => p_effective_date,
478: p_object_version_number => p_object_version_number);
479: --
478: p_object_version_number => p_object_version_number);
479: --
480: if (l_api_updating
481: and p_prtn_eff_end_dt_cd
482: <> nvl(ben_epa_shd.g_old_rec.prtn_eff_end_dt_cd,hr_api.g_varchar2)
483: or not l_api_updating)
484: and p_prtn_eff_end_dt_cd is not null then
485: --
486: -- check if value of lookup falls within lookup type.
540: Begin
541: --
542: hr_utility.set_location('Entering:'||l_proc, 5);
543: --
544: l_api_updating := ben_epa_shd.api_updating
545: (p_prtn_elig_id => p_prtn_elig_id,
546: p_effective_date => p_effective_date,
547: p_object_version_number => p_object_version_number);
548: --
547: p_object_version_number => p_object_version_number);
548: --
549: if (l_api_updating
550: and p_prtn_eff_strt_dt_cd
551: <> nvl(ben_epa_shd.g_old_rec.prtn_eff_strt_dt_cd,hr_api.g_varchar2)
552: or not l_api_updating)
553: and p_prtn_eff_strt_dt_cd is not null then
554: --
555: -- check if value of lookup falls within lookup type.
611: Begin
612: --
613: hr_utility.set_location('Entering:'||l_proc, 5);
614: --
615: l_api_updating := ben_epa_shd.api_updating
616: (p_prtn_elig_id => p_prtn_elig_id,
617: p_effective_date => p_effective_date,
618: p_object_version_number => p_object_version_number);
619: --
618: p_object_version_number => p_object_version_number);
619: --
620: if (l_api_updating
621: and p_wait_perd_dt_to_use_cd
622: <> nvl(ben_epa_shd.g_old_rec.wait_perd_dt_to_use_cd,hr_api.g_varchar2)
623: or not l_api_updating) and
624: p_wait_perd_dt_to_use_cd is not null
625: then
626: --
688: Begin
689: --
690: hr_utility.set_location('Entering:'||l_proc, 5);
691: --
692: l_api_updating := ben_epa_shd.api_updating
693: (p_effective_date => p_effective_date,
694: p_prtn_elig_id => p_prtn_elig_id,
695: p_object_version_number => p_object_version_number);
696: --
695: p_object_version_number => p_object_version_number);
696: --
697: if (l_api_updating
698: and nvl(p_wait_perd_dt_to_use_rl,hr_api.g_number)
699: <> ben_epa_shd.g_old_rec.wait_perd_dt_to_use_rl
700: or not l_api_updating)
701: and p_wait_perd_dt_to_use_rl is not null then
702: --
703: -- check if value of formula rule is valid.
760: Begin
761: --
762: hr_utility.set_location('Entering:'||l_proc, 5);
763: --
764: l_api_updating := ben_epa_shd.api_updating
765: (p_prtn_elig_id => p_prtn_elig_id,
766: p_effective_date => p_effective_date,
767: p_object_version_number => p_object_version_number);
768: --
767: p_object_version_number => p_object_version_number);
768: --
769: if (l_api_updating
770: and p_wait_perd_uom
771: <> nvl(ben_epa_shd.g_old_rec.wait_perd_uom,hr_api.g_varchar2)
772: or not l_api_updating)
773: and p_wait_perd_uom is not null then
774: --
775: -- check if value of lookup falls within lookup type.
832: Begin
833: --
834: hr_utility.set_location('Entering:'||l_proc, 5);
835: --
836: l_api_updating := ben_epa_shd.api_updating
837: (p_effective_date => p_effective_date,
838: p_prtn_elig_id => p_prtn_elig_id,
839: p_object_version_number => p_object_version_number);
840: --
839: p_object_version_number => p_object_version_number);
840: --
841: if (l_api_updating
842: and nvl(p_wait_perd_rl,hr_api.g_number)
843: <> ben_epa_shd.g_old_rec.wait_perd_rl
844: or not l_api_updating)
845: and p_wait_perd_rl is not null then
846: --
847: -- check if value of formula rule is valid.
907: Begin
908: --
909: hr_utility.set_location('Entering:'||l_proc, 5);
910: --
911: l_api_updating := ben_epa_shd.api_updating
912: (p_effective_date => p_effective_date,
913: p_prtn_elig_id => p_prtn_elig_id,
914: p_object_version_number => p_object_version_number);
915: --
914: p_object_version_number => p_object_version_number);
915: --
916: if (l_api_updating
917: and nvl(p_mx_poe_det_dt_rl,hr_api.g_number)
918: <> ben_epa_shd.g_old_rec.mx_poe_det_dt_rl
919: or not l_api_updating)
920: and p_mx_poe_det_dt_rl is not null then
921: --
922: -- check if value of formula rule is valid.
982: Begin
983: --
984: hr_utility.set_location('Entering:'||l_proc, 5);
985: --
986: l_api_updating := ben_epa_shd.api_updating
987: (p_effective_date => p_effective_date,
988: p_prtn_elig_id => p_prtn_elig_id,
989: p_object_version_number => p_object_version_number);
990: --
989: p_object_version_number => p_object_version_number);
990: --
991: if (l_api_updating
992: and nvl(p_mx_poe_rl,hr_api.g_number)
993: <> ben_epa_shd.g_old_rec.mx_poe_rl
994: or not l_api_updating)
995: and p_mx_poe_rl is not null then
996: --
997: -- check if value of formula rule is valid.
1057: Begin
1058: --
1059: hr_utility.set_location('Entering:'||l_proc, 5);
1060: --
1061: l_api_updating := ben_epa_shd.api_updating
1062: (p_prtn_elig_id => p_prtn_elig_id,
1063: p_effective_date => p_effective_date,
1064: p_object_version_number => p_object_version_number);
1065: --
1064: p_object_version_number => p_object_version_number);
1065: --
1066: if (l_api_updating
1067: and p_mx_poe_apls_cd
1068: <> nvl(ben_epa_shd.g_old_rec.mx_poe_apls_cd,hr_api.g_varchar2)
1069: or not l_api_updating)
1070: and p_mx_poe_apls_cd is not null then
1071: --
1072: -- check if value of lookup falls within lookup type.
1130: Begin
1131: --
1132: hr_utility.set_location('Entering:'||l_proc, 5);
1133: --
1134: l_api_updating := ben_epa_shd.api_updating
1135: (p_prtn_elig_id => p_prtn_elig_id,
1136: p_effective_date => p_effective_date,
1137: p_object_version_number => p_object_version_number);
1138: --
1137: p_object_version_number => p_object_version_number);
1138: --
1139: if (l_api_updating
1140: and p_mx_poe_uom
1141: <> nvl(ben_epa_shd.g_old_rec.mx_poe_uom,hr_api.g_varchar2)
1142: or not l_api_updating)
1143: and p_mx_poe_uom is not null then
1144: --
1145: -- check if value of lookup falls within lookup type.
1203: Begin
1204: --
1205: hr_utility.set_location('Entering:'||l_proc, 5);
1206: --
1207: l_api_updating := ben_epa_shd.api_updating
1208: (p_prtn_elig_id => p_prtn_elig_id,
1209: p_effective_date => p_effective_date,
1210: p_object_version_number => p_object_version_number);
1211: --
1210: p_object_version_number => p_object_version_number);
1211: --
1212: if (l_api_updating
1213: and p_mx_poe_det_dt_cd
1214: <> nvl(ben_epa_shd.g_old_rec.mx_poe_det_dt_cd,hr_api.g_varchar2)
1215: or not l_api_updating)
1216: and p_mx_poe_det_dt_cd is not null then
1217: --
1218: -- check if value of lookup falls within lookup type.
1360: Begin
1361: --
1362: hr_utility.set_location('Entering:'||l_proc,5);
1363: --
1364: l_api_updating := ben_epa_shd.api_updating
1365: (p_prtn_elig_id => p_prtn_elig_id,
1366: p_effective_date => p_effective_date,
1367: p_object_version_number => p_object_version_number);
1368: --
1368: --
1369: if p_pgm_id is not null then
1370: if (l_api_updating
1371: and nvl(p_pgm_id, hr_api.g_number)
1372: <> nvl(ben_epa_shd.g_old_rec.pgm_id, hr_api.g_number)
1373: or not l_api_updating) then
1374: --
1375: --
1376: open c1;
1444: Begin
1445: --
1446: hr_utility.set_location('Entering:'||l_proc,5);
1447: --
1448: l_api_updating := ben_epa_shd.api_updating
1449: (p_prtn_elig_id => p_prtn_elig_id,
1450: p_effective_date => p_effective_date,
1451: p_object_version_number => p_object_version_number);
1452: --
1452: --
1453: if p_pl_id is not null then
1454: if (l_api_updating
1455: and nvl(p_pl_id, hr_api.g_number)
1456: <> nvl(ben_epa_shd.g_old_rec.pl_id, hr_api.g_number)
1457: or not l_api_updating) then
1458: --
1459: --
1460: open c1;
1528: Begin
1529: --
1530: hr_utility.set_location('Entering:'||l_proc,5);
1531: --
1532: l_api_updating := ben_epa_shd.api_updating
1533: (p_prtn_elig_id => p_prtn_elig_id,
1534: p_effective_date => p_effective_date,
1535: p_object_version_number => p_object_version_number);
1536: --
1536: --
1537: if p_oipl_id is not null then
1538: if (l_api_updating
1539: and nvl(p_oipl_id, hr_api.g_number)
1540: <> nvl(ben_epa_shd.g_old_rec.oipl_id, hr_api.g_number)
1541: or not l_api_updating) then
1542: --
1543: --
1544: open c1;
1611: Begin
1612: --
1613: hr_utility.set_location('Entering:'||l_proc,5);
1614: --
1615: l_api_updating := ben_epa_shd.api_updating
1616: (p_prtn_elig_id => p_prtn_elig_id,
1617: p_effective_date => p_effective_date,
1618: p_object_version_number => p_object_version_number);
1619: --
1620: if p_ptip_id is not null then
1621: --
1622: if (l_api_updating
1623: and nvl(p_ptip_id,hr_api.g_number)
1624: <> nvl(ben_epa_shd.g_old_rec.ptip_id,hr_api.g_number)
1625: or not l_api_updating) then
1626: --
1627: open c1;
1628: --
1697: Begin
1698: --
1699: hr_utility.set_location('Entering:'||l_proc,5);
1700: --
1701: l_api_updating := ben_epa_shd.api_updating
1702: (p_prtn_elig_id => p_prtn_elig_id,
1703: p_effective_date => p_effective_date,
1704: p_object_version_number => p_object_version_number);
1705: --
1706: if p_plip_id is not null then
1707: --
1708: if (l_api_updating
1709: and nvl(p_plip_id,hr_api.g_number)
1710: <> nvl(ben_epa_shd.g_old_rec.plip_id,hr_api.g_number)
1711: or not l_api_updating) then
1712: --
1713: open c1;
1714: --
2014: -- ----------------------------------------------------------------------------
2015: -- |---------------------------< insert_validate >----------------------------|
2016: -- ----------------------------------------------------------------------------
2017: Procedure insert_validate
2018: (p_rec in ben_epa_shd.g_rec_type,
2019: p_effective_date in date,
2020: p_datetrack_mode in varchar2,
2021: p_validation_start_date in date,
2022: p_validation_end_date in date) is
2192: -- |---------------------------< update_validate >----------------------------|
2193: -- ----------------------------------------------------------------------------
2194: --
2195: Procedure update_validate
2196: (p_rec in ben_epa_shd.g_rec_type,
2197: p_effective_date in date,
2198: p_datetrack_mode in varchar2,
2199: p_validation_start_date in date,
2200: p_validation_end_date in date) is
2381: -- ----------------------------------------------------------------------------
2382: -- |---------------------------< delete_validate >----------------------------|
2383: -- ----------------------------------------------------------------------------
2384: Procedure delete_validate
2385: (p_rec in ben_epa_shd.g_rec_type,
2386: p_effective_date in date,
2387: p_datetrack_mode in varchar2,
2388: p_validation_start_date in date,
2389: p_validation_end_date in date) is