40: l_api_updating boolean;
41: --
42: Begin
43: --
44: hr_utility.set_location('Entering:'||l_proc, 5);
45: --
46: l_api_updating := ben_cmd_shd.api_updating
47: (p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id,
48: p_object_version_number => p_object_version_number);
68: end if;
69: --
70: end if;
71: --
72: hr_utility.set_location('Leaving:'||l_proc, 10);
73: --
74: End chk_cm_dlvry_med_typ_id;
75: --
76: -- ----------------------------------------------------------------------------
112: where a.cm_dlvry_mthd_typ_id = p_cm_dlvry_mthd_typ_id;
113: --
114: Begin
115: --
116: hr_utility.set_location('Entering:'||l_proc,5);
117: --
118: l_api_updating := ben_cmd_shd.api_updating
119: ( p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id,
120: p_object_version_number => p_object_version_number);
144: close c1;
145: --
146: end if;
147: --
148: hr_utility.set_location('Leaving:'||l_proc,10);
149: --
150: End chk_cm_dlvry_mthd_typ_id;
151: --
152: -- ----------------------------------------------------------------------------
184: l_api_updating boolean;
185: --
186: Begin
187: --
188: hr_utility.set_location('Entering:'||l_proc, 5);
189: --
190: l_api_updating := ben_cmd_shd.api_updating
191: (p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id,
192: p_object_version_number => p_object_version_number);
205: p_effective_date => p_effective_date) then
206: --
207: -- raise error as does not exist as lookup
208: --
209: hr_utility.set_message(801,'BEN_91210_INVLD_DFLT_FLAG');
210: hr_utility.raise_error;
211: --
212: end if;
213: --
206: --
207: -- raise error as does not exist as lookup
208: --
209: hr_utility.set_message(801,'BEN_91210_INVLD_DFLT_FLAG');
210: hr_utility.raise_error;
211: --
212: end if;
213: --
214: end if;
212: end if;
213: --
214: end if;
215: --
216: hr_utility.set_location('Leaving:'||l_proc,10);
217: --
218: end chk_dflt_flag;
219: --
220: -- ----------------------------------------------------------------------------
252: l_api_updating boolean;
253: --
254: Begin
255: --
256: hr_utility.set_location('Entering:'||l_proc, 5);
257: --
258: l_api_updating := ben_cmd_shd.api_updating
259: (p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id,
260: p_object_version_number => p_object_version_number);
273: p_effective_date => p_effective_date) then
274: --
275: -- raise error as does not exist as lookup
276: --
277: hr_utility.set_message(801,'BEN_91211_INVLD_RQD_FLAG');
278: hr_utility.raise_error;
279: --
280: end if;
281: --
274: --
275: -- raise error as does not exist as lookup
276: --
277: hr_utility.set_message(801,'BEN_91211_INVLD_RQD_FLAG');
278: hr_utility.raise_error;
279: --
280: end if;
281: --
282: end if;
280: end if;
281: --
282: end if;
283: --
284: hr_utility.set_location('Leaving:'||l_proc,10);
285: --
286: end chk_rqd_flag;
287: --
288: -- ----------------------------------------------------------------------------
320: l_api_updating boolean;
321: --
322: Begin
323: --
324: hr_utility.set_location('Entering:'||l_proc, 5);
325: --
326: l_api_updating := ben_cmd_shd.api_updating
327: (p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id,
328: p_object_version_number => p_object_version_number);
341: p_effective_date => p_effective_date) then
342: --
343: -- raise error as does not exist as lookup
344: --
345: hr_utility.set_message(801,'BEN_91212_INVLD_CM_MED_CD');
346: hr_utility.raise_error;
347: --
348: end if;
349: --
342: --
343: -- raise error as does not exist as lookup
344: --
345: hr_utility.set_message(801,'BEN_91212_INVLD_CM_MED_CD');
346: hr_utility.raise_error;
347: --
348: end if;
349: --
350: end if;
348: end if;
349: --
350: end if;
351: --
352: hr_utility.set_location('Leaving:'||l_proc,10);
353: --
354: end chk_cm_dlvry_med_typ_cd;
355: --
356: -- --------------------------------------------------------------------------
402: and business_group_id + 0 = p_business_group_id ;
403: --
404: Begin
405: --
406: hr_utility.set_location('Entering:'||l_proc, 5);
407: --
408: l_api_updating := ben_cmd_shd.api_updating
409: ( p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id,
410: p_object_version_number => p_object_version_number);
412: if (l_api_updating
413: and p_cm_dlvry_med_typ_cd <> ben_cmd_shd.g_old_rec.cm_dlvry_med_typ_cd) or
414: not l_api_updating then
415: --
416: hr_utility.set_location('Entering:'||l_proc, 10);
417: --
418: -- check if this code is already exist
419: --
420: open crs_cm_dlvry_med;
433: close crs_cm_dlvry_med;
434: --
435: end if;
436: --
437: hr_utility.set_location('Leaving:'||l_proc, 20);
438: --
439: End chk_dupl_cm_dlvry_med;
440:
441: -- ----------------------------------------------------------------------------
446: --
447: l_proc varchar2(72) := g_package||'insert_validate';
448: --
449: Begin
450: hr_utility.set_location('Entering:'||l_proc, 5);
451: --
452: -- Call all supporting business operations
453: --
454: --
489: p_business_group_id => p_rec.business_group_id,
490: p_object_version_number => p_rec.object_version_number);
491: --
492:
493: hr_utility.set_location(' Leaving:'||l_proc, 10);
494: End insert_validate;
495: --
496: -- ----------------------------------------------------------------------------
497: -- |---------------------------< update_validate >----------------------------|
501: --
502: l_proc varchar2(72) := g_package||'update_validate';
503: --
504: Begin
505: hr_utility.set_location('Entering:'||l_proc, 5);
506: --
507: -- Call all supporting business operations
508: --
509: --
544: p_business_group_id => p_rec.business_group_id,
545: p_object_version_number => p_rec.object_version_number);
546: --
547:
548: hr_utility.set_location(' Leaving:'||l_proc, 10);
549: End update_validate;
550: --
551: -- ----------------------------------------------------------------------------
552: -- |---------------------------< delete_validate >----------------------------|
556: --
557: l_proc varchar2(72) := g_package||'delete_validate';
558: --
559: Begin
560: hr_utility.set_location('Entering:'||l_proc, 5);
561: --
562: -- Call all supporting business operations
563: --
564: hr_utility.set_location(' Leaving:'||l_proc, 10);
560: hr_utility.set_location('Entering:'||l_proc, 5);
561: --
562: -- Call all supporting business operations
563: --
564: hr_utility.set_location(' Leaving:'||l_proc, 10);
565: End delete_validate;
566: --
567: --
568: -- ---------------------------------------------------------------------------
587: l_proc varchar2(72) := g_package||'return_legislation_code';
588: --
589: begin
590: --
591: hr_utility.set_location('Entering:'|| l_proc, 10);
592: --
593: -- Ensure that all the mandatory parameter are not null
594: --
595: hr_api.mandatory_arg_error(p_api_name => l_proc,
605: close csr_leg_code;
606: --
607: -- The primary key is invalid therefore we must error
608: --
609: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
610: hr_utility.raise_error;
611: --
612: end if;
613: --
606: --
607: -- The primary key is invalid therefore we must error
608: --
609: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
610: hr_utility.raise_error;
611: --
612: end if;
613: --
614: close csr_leg_code;
612: end if;
613: --
614: close csr_leg_code;
615: --
616: hr_utility.set_location(' Leaving:'|| l_proc, 20);
617: --
618: return l_legislation_code;
619: --
620: end return_legislation_code;