216: -- ----------------------------------------------------------------------------
217: --
218: Procedure chk_non_updateable_args
219: (p_effective_date in date
220: ,p_rec in per_seu_shd.g_rec_type
221: ) IS
222: --
223: l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
224: --
226: --
227: -- Only proceed with the validation if a row exists for the current
228: -- record in the HR Schema.
229: --
230: IF NOT per_seu_shd.api_updating
231: (p_security_user_id => p_rec.security_user_id
232: ,p_object_version_number => p_rec.object_version_number
233: ) THEN
234: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
281: -- a) inserting or
282: -- b) updating and the parameters used within this chk procedure
283: -- have not changed.
284: --
285: l_api_updating := per_seu_shd.api_updating
286: (p_security_user_id => p_security_user_id
287: ,p_object_version_number => p_object_version_number);
288:
289: IF (l_api_updating
286: (p_security_user_id => p_security_user_id
287: ,p_object_version_number => p_object_version_number);
288:
289: IF (l_api_updating
290: AND NVL(per_seu_shd.g_old_rec.user_id, hr_api.g_number)
291: = NVL(p_user_id, hr_api.g_number)) THEN
292: RETURN;
293: END IF;
294:
359: -- a) inserting or
360: -- b) updating and the parameters used within this chk procedure
361: -- have not changed.
362: --
363: l_api_updating := per_seu_shd.api_updating
364: (p_security_user_id => p_security_user_id
365: ,p_object_version_number => p_object_version_number);
366:
367: IF (l_api_updating
364: (p_security_user_id => p_security_user_id
365: ,p_object_version_number => p_object_version_number);
366:
367: IF (l_api_updating
368: AND NVL(per_seu_shd.g_old_rec.security_profile_id, hr_api.g_number)
369: = NVL(p_security_profile_id, hr_api.g_number)) THEN
370: RETURN;
371: END IF;
372:
441: -- a) inserting or
442: -- b) updating and the parameters used within this chk procedure
443: -- have not changed.
444: --
445: l_api_updating := per_seu_shd.api_updating
446: (p_security_user_id => p_security_user_id
447: ,p_object_version_number => p_object_version_number);
448:
449: IF (l_api_updating
446: (p_security_user_id => p_security_user_id
447: ,p_object_version_number => p_object_version_number);
448:
449: IF (l_api_updating
450: AND NVL(per_seu_shd.g_old_rec.user_id, hr_api.g_number)
451: = NVL(p_user_id, hr_api.g_number)
452: AND NVL(per_seu_shd.g_old_rec.security_profile_id, hr_api.g_number)
453: = NVL(p_security_profile_id, hr_api.g_number)) THEN
454: RETURN;
448:
449: IF (l_api_updating
450: AND NVL(per_seu_shd.g_old_rec.user_id, hr_api.g_number)
451: = NVL(p_user_id, hr_api.g_number)
452: AND NVL(per_seu_shd.g_old_rec.security_profile_id, hr_api.g_number)
453: = NVL(p_security_profile_id, hr_api.g_number)) THEN
454: RETURN;
455: END IF;
456:
521: -- a) inserting or
522: -- b) updating and the parameters used within this chk procedure
523: -- have not changed.
524: --
525: l_api_updating := per_seu_shd.api_updating
526: (p_security_user_id => p_security_user_id
527: ,p_object_version_number => p_object_version_number);
528:
529: IF (l_api_updating
526: (p_security_user_id => p_security_user_id
527: ,p_object_version_number => p_object_version_number);
528:
529: IF (l_api_updating
530: AND NVL(per_seu_shd.g_old_rec.process_in_next_run_flag, hr_api.g_varchar2)
531: = NVL(p_process_in_next_run_flag, hr_api.g_varchar2)) THEN
532: RETURN;
533: END IF;
534:
558: -- |---------------------------< insert_validate >----------------------------|
559: -- ----------------------------------------------------------------------------
560: Procedure insert_validate
561: (p_effective_date in date
562: ,p_rec in per_seu_shd.g_rec_type
563: ) is
564: --
565: l_proc varchar2(72) := g_package||'insert_validate';
566: --
643: -- |---------------------------< update_validate >----------------------------|
644: -- ----------------------------------------------------------------------------
645: Procedure update_validate
646: (p_effective_date in date
647: ,p_rec in per_seu_shd.g_rec_type
648: ) is
649: --
650: l_proc varchar2(72) := g_package||'update_validate';
651: --
731: -- ----------------------------------------------------------------------------
732: -- |---------------------------< delete_validate >----------------------------|
733: -- ----------------------------------------------------------------------------
734: Procedure delete_validate
735: (p_rec in per_seu_shd.g_rec_type
736: ) is
737: --
738: l_proc varchar2(72) := g_package||'delete_validate';
739: --