42: Begin
43: --
44: hr_utility.set_location('Entering:'||l_proc, 5);
45: --
46: l_api_updating := ben_lsf_shd.api_updating
47: (p_los_fctr_id => p_los_fctr_id,
48: p_object_version_number => p_object_version_number);
49: --
50: if (l_api_updating
48: p_object_version_number => p_object_version_number);
49: --
50: if (l_api_updating
51: and nvl(p_los_fctr_id,hr_api.g_number)
52: <> ben_lsf_shd.g_old_rec.los_fctr_id) then
53: --
54: -- raise error as PK has changed
55: --
56: ben_lsf_shd.constraint_error('BEN_LOS_FCTR_PK');
52: <> ben_lsf_shd.g_old_rec.los_fctr_id) then
53: --
54: -- raise error as PK has changed
55: --
56: ben_lsf_shd.constraint_error('BEN_LOS_FCTR_PK');
57: --
58: elsif not l_api_updating then
59: --
60: -- check if PK is null
62: if p_los_fctr_id is not null then
63: --
64: -- raise error as PK is not null
65: --
66: ben_lsf_shd.constraint_error('BEN_LOS_FCTR_PK');
67: --
68: end if;
69: --
70: end if;
119: Begin
120: --
121: hr_utility.set_location('Entering:'||l_proc,5);
122: --
123: l_api_updating := ben_lsf_shd.api_updating
124: (p_los_fctr_id => p_los_fctr_id,
125: p_object_version_number => p_object_version_number);
126: --
127: if (l_api_updating
125: p_object_version_number => p_object_version_number);
126: --
127: if (l_api_updating
128: and nvl(p_oab_fast_formula_id,hr_api.g_number)
129: <> nvl(ben_lsf_shd.g_old_rec.oab_fast_formula_id,hr_api.g_number)
130: or not l_api_updating) then
131: --
132: -- check if oab_fast_formula_id value exists in ben_oab_fast_formula_f table
133: --
140: --
141: -- raise error as FK does not relate to PK in ben_oab_fast_formula_f
142: -- table.
143: --
144: ben_lsf_shd.constraint_error('{ForeignKeyConstraint}');
145: --
146: end if;
147: --
148: close c1;
191: Begin
192: --
193: hr_utility.set_location('Entering:'||l_proc, 5);
194: --
195: l_api_updating := ben_lsf_shd.api_updating
196: (p_los_fctr_id => p_los_fctr_id,
197: p_object_version_number => p_object_version_number);
198: --
199: if (l_api_updating
197: p_object_version_number => p_object_version_number);
198: --
199: if (l_api_updating
200: and p_los_uom
201: <> nvl(ben_lsf_shd.g_old_rec.los_uom,hr_api.g_varchar2)
202: or not l_api_updating)
203: and p_los_uom is not null then
204: --
205: -- check if value of lookup falls within lookup type.
277: Begin
278: --
279: hr_utility.set_location('Entering:'||l_proc, 5);
280: --
281: l_api_updating :=ben_lsf_shd.api_updating
282: (p_los_fctr_id => p_los_fctr_id,
283: --p_effective_date => p_effective_date,
284: p_object_version_number => p_object_version_number);
285: --
284: p_object_version_number => p_object_version_number);
285: --
286: if (l_api_updating
287: and nvl(p_los_calc_rl,hr_api.g_number)
288: <>BEN_LSF_SHD.g_old_rec.los_calc_rl
289: or not l_api_updating)
290: and p_los_calc_rl is not null then
291: --
292: -- check if value of formula rule is valid.
356: Begin
357: --
358: hr_utility.set_location('Entering:'||l_proc, 5);
359: --
360: l_api_updating := ben_lsf_shd.api_updating
361: (p_los_fctr_id => p_los_fctr_id,
362: p_object_version_number => p_object_version_number);
363: --
364: if (l_api_updating
362: p_object_version_number => p_object_version_number);
363: --
364: if (l_api_updating
365: and p_los_alt_val_to_use_cd
366: <> nvl(ben_lsf_shd.g_old_rec.los_alt_val_to_use_cd,hr_api.g_varchar2)
367: or not l_api_updating)
368: and p_los_alt_val_to_use_cd is not null then
369: --
370: -- check if value of lookup falls within lookup type.
426: Begin
427: --
428: hr_utility.set_location('Entering:'||l_proc, 5);
429: --
430: l_api_updating := ben_lsf_shd.api_updating
431: (p_los_fctr_id => p_los_fctr_id,
432: p_object_version_number => p_object_version_number);
433: --
434: if (l_api_updating
432: p_object_version_number => p_object_version_number);
433: --
434: if (l_api_updating
435: and p_los_dt_to_use_cd
436: <> nvl(ben_lsf_shd.g_old_rec.los_dt_to_use_cd,hr_api.g_varchar2)
437: or not l_api_updating)
438: and p_los_dt_to_use_cd is not null then
439: --
440: -- check if value of lookup falls within lookup type.
494: Begin
495: --
496: hr_utility.set_location('Entering:'||l_proc, 5);
497: --
498: l_api_updating := ben_lsf_shd.api_updating
499: (p_los_fctr_id => p_los_fctr_id,
500: p_object_version_number => p_object_version_number);
501: --
502: if (l_api_updating
500: p_object_version_number => p_object_version_number);
501: --
502: if (l_api_updating
503: and p_rndg_cd
504: <> nvl(ben_lsf_shd.g_old_rec.rndg_cd,hr_api.g_varchar2)
505: or not l_api_updating)
506: and p_rndg_cd is not null then
507: --
508: -- check if value of lookup falls within lookup type.
562: Begin
563: --
564: hr_utility.set_location('Entering:'||l_proc, 5);
565: --
566: l_api_updating := ben_lsf_shd.api_updating
567: (p_los_fctr_id => p_los_fctr_id,
568: p_object_version_number => p_object_version_number);
569: --
570: if (l_api_updating
568: p_object_version_number => p_object_version_number);
569: --
570: if (l_api_updating
571: and p_los_det_cd
572: <> nvl(ben_lsf_shd.g_old_rec.los_det_cd,hr_api.g_varchar2)
573: or not l_api_updating)
574: and p_los_det_cd is not null then
575: --
576: -- check if value of lookup falls within lookup type.
605: Begin
606: --
607: hr_utility.set_location('Entering:'||l_proc, 5);
608: --
609: l_api_updating := ben_lsf_shd.api_updating
610: (p_los_fctr_id => p_los_fctr_id,
611: -- p_effective_date => p_effective_date,
612: p_object_version_number => p_object_version_number);
613: --
612: p_object_version_number => p_object_version_number);
613: --
614: if (l_api_updating
615: and p_no_mn_los_num_apls_flag
616: <> nvl(ben_lsf_shd.g_old_rec.no_mn_los_num_apls_flag,hr_api.g_varchar2)
617: or not l_api_updating)
618: and p_no_mn_los_num_apls_flag is not null then
619: --
620: -- check if value of lookup falls within lookup type.
650: Begin
651: --
652: hr_utility.set_location('Entering:'||l_proc, 5);
653: --
654: l_api_updating := ben_lsf_shd.api_updating
655: (p_los_fctr_id => p_los_fctr_id,
656: -- p_effective_date => p_effective_date,
657: p_object_version_number => p_object_version_number);
658: --
657: p_object_version_number => p_object_version_number);
658: --
659: if (l_api_updating
660: and p_no_mx_los_num_apls_flag
661: <> nvl(ben_lsf_shd.g_old_rec.no_mx_los_num_apls_flag,hr_api.g_varchar2)
662: or not l_api_updating)
663: and p_no_mx_los_num_apls_flag is not null then
664: --
665: -- check if value of lookup falls within lookup type.
742: Begin
743: --
744: hr_utility.set_location('Entering:'||l_proc, 5);
745: --
746: l_api_updating :=ben_lsf_shd.api_updating
747: (p_los_fctr_id => p_los_fctr_id,
748: -- p_effective_date => p_effective_date,
749: p_object_version_number => p_object_version_number);
750: --
749: p_object_version_number => p_object_version_number);
750: --
751: if (l_api_updating
752: and nvl(p_los_det_rl,hr_api.g_number)
753: <>BEN_LSF_SHD.g_old_rec.los_det_rl
754: or not l_api_updating)
755: and p_los_det_rl is not null then
756: --
757: -- check if value of formula rule is valid.
858: Begin
859: --
860: hr_utility.set_location('Entering:'||l_proc, 5);
861: --
862: l_api_updating :=ben_lsf_shd.api_updating -- 888888
863: (p_los_fctr_id => p_los_fctr_id,
864: -- p_effective_date => p_effective_date,
865: p_object_version_number => p_object_version_number);
866: --
865: p_object_version_number => p_object_version_number);
866: --
867: if (l_api_updating
868: and nvl(p_rndg_rl,hr_api.g_number)
869: <>BEN_LSF_SHD.g_old_rec.rndg_rl
870: or not l_api_updating)
871: and p_rndg_rl is not null then
872: --
873: -- check if value of formula rule is valid.
972: Begin
973: --
974: hr_utility.set_location('Entering:'||l_proc, 5);
975: --
976: l_api_updating :=ben_lsf_shd.api_updating -- 88888
977: (p_los_fctr_id => p_los_fctr_id,
978: -- p_effective_date => p_effective_date,
979: p_object_version_number => p_object_version_number);
980: --
979: p_object_version_number => p_object_version_number);
980: --
981: if (l_api_updating
982: and nvl(p_los_dt_to_use_rl,hr_api.g_number)
983: <>BEN_LSF_SHD.g_old_rec.los_dt_to_use_rl
984: or not l_api_updating)
985: and p_los_dt_to_use_rl is not null then
986: --
987: -- check if value of formula rule is valid.
1073: Begin
1074: --
1075: hr_utility.set_location('Entering:'||l_proc, 5);
1076: --
1077: l_api_updating := ben_lsf_shd.api_updating
1078: (p_los_fctr_id => p_los_fctr_id,
1079: -- p_effective_date => p_effective_date,
1080: p_object_version_number => p_object_version_number);
1081: --
1080: p_object_version_number => p_object_version_number);
1081: --
1082: if (l_api_updating
1083: and nvl(p_name,hr_api.g_varchar2)
1084: <> ben_lsf_shd.g_old_rec.name
1085: or not l_api_updating)
1086: and p_name is not null then
1087: --
1088: -- check if name already used.
1338:
1339: -- ----------------------------------------------------------------------------
1340: -- |---------------------------< insert_validate >----------------------------|
1341: -- ----------------------------------------------------------------------------
1342: Procedure insert_validate(p_rec in ben_lsf_shd.g_rec_type
1343: ,p_effective_date in date) is
1344: --
1345: l_proc varchar2(72) := g_package||'insert_validate';
1346: --
1457: --
1458: -- ----------------------------------------------------------------------------
1459: -- |---------------------------< update_validate >----------------------------|
1460: -- ----------------------------------------------------------------------------
1461: Procedure update_validate(p_rec in ben_lsf_shd.g_rec_type
1462: ,p_effective_date in date) is
1463: --
1464: l_proc varchar2(72) := g_package||'update_validate';
1465: --
1576: --
1577: -- ----------------------------------------------------------------------------
1578: -- |---------------------------< delete_validate >----------------------------|
1579: -- ----------------------------------------------------------------------------
1580: Procedure delete_validate(p_rec in ben_lsf_shd.g_rec_type
1581: ,p_effective_date in date) is
1582: --
1583: l_proc varchar2(72) := g_package||'delete_validate';
1584: --