243: --
244: -- {End Of Comments}
245: -- ----------------------------------------------------------------------------
246: Procedure chk_non_updateable_args
247: (p_rec in ben_rts_shd.g_rec_type
248: ) IS
249: --
250: l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
251: --
253: --
254: -- Only proceed with the validation if a row exists for the current
255: -- record in the HR Schema.
256: --
257: IF NOT ben_rts_shd.api_updating
258: (p_group_per_in_ler_id => p_rec.group_per_in_ler_id
259: ,p_pl_id => p_rec.pl_id
260: ,p_oipl_id => p_rec.oipl_id
261: ,p_object_version_number => p_rec.object_version_number
266: fnd_message.raise_error;
267: END IF;
268: --
269: if nvl(p_rec.group_per_in_ler_id, hr_api.g_number) <>
270: ben_rts_shd.g_old_rec.group_per_in_ler_id then
271: hr_api.argument_changed_error
272: (p_api_name => l_proc
273: ,p_argument => 'GROUP_PER_IN_LER_ID'
274: ,p_base_table => ben_rts_shd.g_tab_nam
270: ben_rts_shd.g_old_rec.group_per_in_ler_id then
271: hr_api.argument_changed_error
272: (p_api_name => l_proc
273: ,p_argument => 'GROUP_PER_IN_LER_ID'
274: ,p_base_table => ben_rts_shd.g_tab_nam
275: );
276: end if;
277: --
278: if nvl(p_rec.pl_id, hr_api.g_number) <>
275: );
276: end if;
277: --
278: if nvl(p_rec.pl_id, hr_api.g_number) <>
279: ben_rts_shd.g_old_rec.pl_id then
280: hr_api.argument_changed_error
281: (p_api_name => l_proc
282: ,p_argument => 'PL_ID'
283: ,p_base_table => ben_rts_shd.g_tab_nam
279: ben_rts_shd.g_old_rec.pl_id then
280: hr_api.argument_changed_error
281: (p_api_name => l_proc
282: ,p_argument => 'PL_ID'
283: ,p_base_table => ben_rts_shd.g_tab_nam
284: );
285: end if;
286: --
287: if nvl(p_rec.oipl_id, hr_api.g_number) <>
284: );
285: end if;
286: --
287: if nvl(p_rec.oipl_id, hr_api.g_number) <>
288: ben_rts_shd.g_old_rec.oipl_id then
289: hr_api.argument_changed_error
290: (p_api_name => l_proc
291: ,p_argument => 'OIPL_ID'
292: ,p_base_table => ben_rts_shd.g_tab_nam
288: ben_rts_shd.g_old_rec.oipl_id then
289: hr_api.argument_changed_error
290: (p_api_name => l_proc
291: ,p_argument => 'OIPL_ID'
292: ,p_base_table => ben_rts_shd.g_tab_nam
293: );
294: end if;
295: --
296: End chk_non_updateable_args;
298: -- ----------------------------------------------------------------------------
299: -- |---------------------------< insert_validate >----------------------------|
300: -- ----------------------------------------------------------------------------
301: Procedure insert_validate
302: (p_rec in ben_rts_shd.g_rec_type
303: ) is
304: --
305: l_proc varchar2(72) := g_package||'insert_validate';
306: --
319: -- ----------------------------------------------------------------------------
320: -- |---------------------------< update_validate >----------------------------|
321: -- ----------------------------------------------------------------------------
322: Procedure update_validate
323: (p_rec in ben_rts_shd.g_rec_type
324: ) is
325: --
326: l_proc varchar2(72) := g_package||'update_validate';
327: --
343: -- ----------------------------------------------------------------------------
344: -- |---------------------------< delete_validate >----------------------------|
345: -- ----------------------------------------------------------------------------
346: Procedure delete_validate
347: (p_rec in ben_rts_shd.g_rec_type
348: ) is
349: --
350: l_proc varchar2(72) := g_package||'delete_validate';
351: --