50: p_pl_gd_or_svc_id => p_pl_gd_or_svc_id,
51: p_object_version_number => p_object_version_number);
52: --
53: if (l_api_updating
54: and nvl(p_pl_gd_or_svc_id,hr_api.g_number)
55: <> ben_vgs_shd.g_old_rec.pl_gd_or_svc_id) then
56: --
57: -- raise error as PK has changed
58: --
125: p_effective_date => p_effective_date,
126: p_object_version_number => p_object_version_number);
127: --
128: if (l_api_updating
129: and nvl(p_gd_or_svc_typ_id,hr_api.g_number)
130: <> nvl(ben_vgs_shd.g_old_rec.gd_or_svc_typ_id,hr_api.g_number)
131: or not l_api_updating) then
132: --
133: -- check if gd_or_svc_typ_id value exists in ben_gd_or_svc_typ table
126: p_object_version_number => p_object_version_number);
127: --
128: if (l_api_updating
129: and nvl(p_gd_or_svc_typ_id,hr_api.g_number)
130: <> nvl(ben_vgs_shd.g_old_rec.gd_or_svc_typ_id,hr_api.g_number)
131: or not l_api_updating) then
132: --
133: -- check if gd_or_svc_typ_id value exists in ben_gd_or_svc_typ table
134: --
198: p_object_version_number => p_object_version_number);
199: --
200: if (l_api_updating
201: and p_alw_rcrrg_clms_flag
202: <> nvl(ben_vgs_shd.g_old_rec.alw_rcrrg_clms_flag,hr_api.g_varchar2)
203: or not l_api_updating)
204: and p_alw_rcrrg_clms_flag is not null then
205: --
206: -- check if value of lookup falls within lookup type.
204: and p_alw_rcrrg_clms_flag is not null then
205: --
206: -- check if value of lookup falls within lookup type.
207: --
208: if hr_api.not_exists_in_hr_lookups
209: (p_lookup_type => 'YES_NO',
210: p_lookup_code => p_alw_rcrrg_clms_flag,
211: p_effective_date => p_effective_date) then
212: --
270: --
271:
272: if (l_api_updating
273: and (p_gd_svc_recd_basis_cd
274: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_cd,hr_api.g_varchar2)
275: or p_gd_svc_recd_basis_dt
276: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_dt,hr_api.g_date)
277: or p_gd_svc_recd_basis_mo
278: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_mo,hr_api.g_number)
272: if (l_api_updating
273: and (p_gd_svc_recd_basis_cd
274: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_cd,hr_api.g_varchar2)
275: or p_gd_svc_recd_basis_dt
276: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_dt,hr_api.g_date)
277: or p_gd_svc_recd_basis_mo
278: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_mo,hr_api.g_number)
279: )
280: or not l_api_updating)
274: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_cd,hr_api.g_varchar2)
275: or p_gd_svc_recd_basis_dt
276: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_dt,hr_api.g_date)
277: or p_gd_svc_recd_basis_mo
278: <> nvl(ben_vgs_shd.g_old_rec.gd_svc_recd_basis_mo,hr_api.g_number)
279: )
280: or not l_api_updating)
281: and ( p_gd_svc_recd_basis_cd is not null
282: and (p_gd_svc_recd_basis_dt is not null
285: --
286: -- check if value of lookup falls within lookup type.
287: --
288: hr_utility.set_location('l_api_updating :'||'TRUE', 7);
289: if hr_api.not_exists_in_hr_lookups
290: (p_lookup_type => 'BEN_GD_SVC_RECD_BASIS',
291: p_lookup_code => p_gd_svc_recd_basis_cd,
292: p_effective_date => p_effective_date) then
293: --
370: --
371: -- {End Of Comments}
372: -- ----------------------------------------------------------------------------
373: Procedure dt_update_validate
374: (p_pl_id in number default hr_api.g_number,
375: p_datetrack_mode in varchar2,
376: p_validation_start_date in date,
377: p_validation_end_date in date) Is
378: --
384: hr_utility.set_location('Entering:'||l_proc, 5);
385: --
386: -- Ensure that the p_datetrack_mode argument is not null
387: --
388: hr_api.mandatory_arg_error
389: (p_api_name => l_proc,
390: p_argument => 'datetrack_mode',
391: p_argument_value => p_datetrack_mode);
392: --
396: --
397: --
398: -- Ensure the arguments are not null
399: --
400: hr_api.mandatory_arg_error
401: (p_api_name => l_proc,
402: p_argument => 'validation_start_date',
403: p_argument_value => p_validation_start_date);
404: --
401: (p_api_name => l_proc,
402: p_argument => 'validation_start_date',
403: p_argument_value => p_validation_start_date);
404: --
405: hr_api.mandatory_arg_error
406: (p_api_name => l_proc,
407: p_argument => 'validation_end_date',
408: p_argument_value => p_validation_end_date);
409: --
406: (p_api_name => l_proc,
407: p_argument => 'validation_end_date',
408: p_argument_value => p_validation_end_date);
409: --
410: If ((nvl(p_pl_id, hr_api.g_number) <> hr_api.g_number) and
411: NOT (dt_api.check_min_max_dates
412: (p_base_table_name => 'ben_pl_f',
413: p_base_key_column => 'pl_id',
414: p_base_key_value => p_pl_id,
490: hr_utility.set_location('Entering:'||l_proc, 5);
491: --
492: -- Ensure that the p_datetrack_mode argument is not null
493: --
494: hr_api.mandatory_arg_error
495: (p_api_name => l_proc,
496: p_argument => 'datetrack_mode',
497: p_argument_value => p_datetrack_mode);
498: --
504: --
505: --
506: -- Ensure the arguments are not null
507: --
508: hr_api.mandatory_arg_error
509: (p_api_name => l_proc,
510: p_argument => 'validation_start_date',
511: p_argument_value => p_validation_start_date);
512: --
509: (p_api_name => l_proc,
510: p_argument => 'validation_start_date',
511: p_argument_value => p_validation_start_date);
512: --
513: hr_api.mandatory_arg_error
514: (p_api_name => l_proc,
515: p_argument => 'validation_end_date',
516: p_argument_value => p_validation_end_date);
517: --
514: (p_api_name => l_proc,
515: p_argument => 'validation_end_date',
516: p_argument_value => p_validation_end_date);
517: --
518: hr_api.mandatory_arg_error
519: (p_api_name => l_proc,
520: p_argument => 'pl_gd_or_svc_id',
521: p_argument_value => p_pl_gd_or_svc_id);
522: --
570: --
571: -- Call all supporting business operations
572: --
573: --
574: hr_api.validate_bus_grp_id(p_rec.business_group_id); -- Validate Bus Grp
575: --
576: chk_pl_gd_or_svc_id
577: (p_pl_gd_or_svc_id => p_rec.pl_gd_or_svc_id,
578: p_effective_date => p_effective_date,
616: --
617: -- Call all supporting business operations
618: --
619: --
620: hr_api.validate_bus_grp_id(p_rec.business_group_id); -- Validate Bus Grp
621: --
622: chk_pl_gd_or_svc_id
623: (p_pl_gd_or_svc_id => p_rec.pl_gd_or_svc_id,
624: p_effective_date => p_effective_date,
708: hr_utility.set_location('Entering:'|| l_proc, 10);
709: --
710: -- Ensure that all the mandatory parameter are not null
711: --
712: hr_api.mandatory_arg_error(p_api_name => l_proc,
713: p_argument => 'pl_gd_or_svc_id',
714: p_argument_value => p_pl_gd_or_svc_id);
715: --
716: open csr_leg_code;