271: -- Internal Row Handler Use Only.
272: --
273: -- ----------------------------------------------------------------------------
274: procedure chk_participation_type
275: (p_participant_id in per_participants.participant_id%TYPE
276: ,p_object_version_number in per_participants.object_version_number%TYPE
277: ,p_participation_type in per_participants.participation_type%TYPE
278: ,p_effective_date in date
279: )
272: --
273: -- ----------------------------------------------------------------------------
274: procedure chk_participation_type
275: (p_participant_id in per_participants.participant_id%TYPE
276: ,p_object_version_number in per_participants.object_version_number%TYPE
277: ,p_participation_type in per_participants.participation_type%TYPE
278: ,p_effective_date in date
279: )
280: is
273: -- ----------------------------------------------------------------------------
274: procedure chk_participation_type
275: (p_participant_id in per_participants.participant_id%TYPE
276: ,p_object_version_number in per_participants.object_version_number%TYPE
277: ,p_participation_type in per_participants.participation_type%TYPE
278: ,p_effective_date in date
279: )
280: is
281: --
315: --
316: EXCEPTION
317: when app_exception.application_exception then
318: if hr_multi_message.exception_add
319: (p_associated_column1 => 'PER_PARTICIPANTS.PARTICIPATION_TYPE'
320: ) then
321: raise;
322: end if;
323: end chk_participation_type;
350: -- Access Status:
351: -- Internal Row Handler Use Only.
352: -- ----------------------------------------------------------------------------
353: procedure chk_participation_status
354: (p_participation_status in per_participants.participation_status%TYPE
355: ,p_effective_date in date
356: )
357: is
358: --
377: --
378: EXCEPTION
379: when app_exception.application_exception then
380: if hr_multi_message.exception_add
381: (p_associated_column1 => 'PER_PARTICIPANTS.PARTICIPATION_STATUS'
382: ) then
383: raise;
384: end if;
385:
409: -- Access Status
410: -- Internal Table Handler Use Only.
411: --
412: procedure chk_participation_in_table
413: (p_participation_in_table in per_participants.participation_in_table%TYPE
414: )
415: is
416: --
417: l_api_updating boolean;
448: hr_utility.set_location('Leaving: '|| l_proc, 10);
449: EXCEPTION
450: when app_exception.application_exception then
451: if hr_multi_message.exception_add
452: (p_associated_column1 => 'PER_PARTICIPANTS.PARTICIPATION_IN_TABLE'
453: ) then
454: raise;
455: end if;
456: end chk_participation_in_table;
482: -- Access Status
483: -- Internal Table Handler Use Only.
484: --
485: procedure chk_participation_in_column
486: (p_participation_in_table in per_participants.participation_in_table%TYPE
487: ,p_participation_in_column in per_participants.participation_in_column%TYPE
488: )
489: is
490: --
483: -- Internal Table Handler Use Only.
484: --
485: procedure chk_participation_in_column
486: (p_participation_in_table in per_participants.participation_in_table%TYPE
487: ,p_participation_in_column in per_participants.participation_in_column%TYPE
488: )
489: is
490: --
491: l_api_updating boolean;
530:
531: EXCEPTION
532: when app_exception.application_exception then
533: if hr_multi_message.exception_add
534: (p_associated_column1 => 'PER_PARTICIPANTS.PARTICIPATION_IN_COLUMN'
535: ) then
536: raise;
537: end if;
538: end chk_participation_in_column;
567: -- Access Status
568: -- Internal Table Handler Use Only.
569: --
570: procedure chk_participation_in_id
571: (p_participation_in_table in per_participants.participation_in_table%TYPE
572: ,p_participation_in_column in per_participants.participation_in_column%TYPE
573: ,p_participation_in_id in per_participants.participation_in_id%TYPE
574: ,p_business_group_id in per_participants.business_group_id%TYPE
575: )
568: -- Internal Table Handler Use Only.
569: --
570: procedure chk_participation_in_id
571: (p_participation_in_table in per_participants.participation_in_table%TYPE
572: ,p_participation_in_column in per_participants.participation_in_column%TYPE
573: ,p_participation_in_id in per_participants.participation_in_id%TYPE
574: ,p_business_group_id in per_participants.business_group_id%TYPE
575: )
576: is
569: --
570: procedure chk_participation_in_id
571: (p_participation_in_table in per_participants.participation_in_table%TYPE
572: ,p_participation_in_column in per_participants.participation_in_column%TYPE
573: ,p_participation_in_id in per_participants.participation_in_id%TYPE
574: ,p_business_group_id in per_participants.business_group_id%TYPE
575: )
576: is
577: --
570: procedure chk_participation_in_id
571: (p_participation_in_table in per_participants.participation_in_table%TYPE
572: ,p_participation_in_column in per_participants.participation_in_column%TYPE
573: ,p_participation_in_id in per_participants.participation_in_id%TYPE
574: ,p_business_group_id in per_participants.business_group_id%TYPE
575: )
576: is
577: --
578: l_business_group_id per_participants.business_group_id%TYPE;
574: ,p_business_group_id in per_participants.business_group_id%TYPE
575: )
576: is
577: --
578: l_business_group_id per_participants.business_group_id%TYPE;
579: l_exists varchar2(1);
580: l_proc varchar2(72) := g_package||'chk_participation_in_id';
581: l_sql_cursor integer; -- Dynamic sql cursor
582: l_dynamic_sql varchar2(2000); -- Dynamic sql text
699: Exception
700:
701: when app_exception.application_exception then
702: if hr_multi_message.exception_add
703: (p_associated_column1 => 'PER_PARTICIPANTS.PARTICIPATION_IN_ID'
704: ) then
705: raise;
706: end if;
707:
763: -- Internal Table Handler Use Only.
764: --
765: --
766: procedure chk_person_id
767: (p_participant_id in per_participants.participant_id%TYPE
768: ,p_object_version_number in per_participants.object_version_number%TYPE
769: ,p_person_id in per_participants.person_id%TYPE
770: ,p_business_group_id in per_participants.business_group_id%TYPE
771: ,p_participation_in_table in per_participants.participation_in_table%TYPE
764: --
765: --
766: procedure chk_person_id
767: (p_participant_id in per_participants.participant_id%TYPE
768: ,p_object_version_number in per_participants.object_version_number%TYPE
769: ,p_person_id in per_participants.person_id%TYPE
770: ,p_business_group_id in per_participants.business_group_id%TYPE
771: ,p_participation_in_table in per_participants.participation_in_table%TYPE
772: ,p_participation_in_column in per_participants.participation_in_column%TYPE
765: --
766: procedure chk_person_id
767: (p_participant_id in per_participants.participant_id%TYPE
768: ,p_object_version_number in per_participants.object_version_number%TYPE
769: ,p_person_id in per_participants.person_id%TYPE
770: ,p_business_group_id in per_participants.business_group_id%TYPE
771: ,p_participation_in_table in per_participants.participation_in_table%TYPE
772: ,p_participation_in_column in per_participants.participation_in_column%TYPE
773: ,p_participation_in_id in per_participants.participation_in_id%TYPE
766: procedure chk_person_id
767: (p_participant_id in per_participants.participant_id%TYPE
768: ,p_object_version_number in per_participants.object_version_number%TYPE
769: ,p_person_id in per_participants.person_id%TYPE
770: ,p_business_group_id in per_participants.business_group_id%TYPE
771: ,p_participation_in_table in per_participants.participation_in_table%TYPE
772: ,p_participation_in_column in per_participants.participation_in_column%TYPE
773: ,p_participation_in_id in per_participants.participation_in_id%TYPE
774: ,p_effective_date in date
767: (p_participant_id in per_participants.participant_id%TYPE
768: ,p_object_version_number in per_participants.object_version_number%TYPE
769: ,p_person_id in per_participants.person_id%TYPE
770: ,p_business_group_id in per_participants.business_group_id%TYPE
771: ,p_participation_in_table in per_participants.participation_in_table%TYPE
772: ,p_participation_in_column in per_participants.participation_in_column%TYPE
773: ,p_participation_in_id in per_participants.participation_in_id%TYPE
774: ,p_effective_date in date
775: )
768: ,p_object_version_number in per_participants.object_version_number%TYPE
769: ,p_person_id in per_participants.person_id%TYPE
770: ,p_business_group_id in per_participants.business_group_id%TYPE
771: ,p_participation_in_table in per_participants.participation_in_table%TYPE
772: ,p_participation_in_column in per_participants.participation_in_column%TYPE
773: ,p_participation_in_id in per_participants.participation_in_id%TYPE
774: ,p_effective_date in date
775: )
776: is
769: ,p_person_id in per_participants.person_id%TYPE
770: ,p_business_group_id in per_participants.business_group_id%TYPE
771: ,p_participation_in_table in per_participants.participation_in_table%TYPE
772: ,p_participation_in_column in per_participants.participation_in_column%TYPE
773: ,p_participation_in_id in per_participants.participation_in_id%TYPE
774: ,p_effective_date in date
775: )
776: is
777: --
776: is
777: --
778: l_exists varchar2(1);
779: l_api_updating boolean;
780: l_business_group_id per_participants.business_group_id%TYPE;
781: l_proc varchar2(72) := g_package||'chk_chk_person_id';
782: lv_cross_business_group VARCHAR2(10); -- bug 1980440 fix
783:
784: --
832: --
833: Cursor csr_person_id_unique
834: is
835: select 'Y'
836: from per_participants par
837: where ( (p_participant_id is null)
838: or(p_participant_id <> par.participant_id)
839: )
840: and par.participation_in_table = p_participation_in_table
987: --
988: EXCEPTION
989: when app_exception.application_exception then
990: if hr_multi_message.exception_add
991: (p_associated_column1 => 'PER_PARTICIPANTS.PERSON_ID'
992: ) then
993: raise;
994: end if;
995: end chk_person_id;
1081: -- b) During insert.
1082: --
1083: hr_dflex_utility.ins_or_upd_descflex_attribs
1084: (p_appl_short_name => 'PER'
1085: ,p_descflex_name => 'PER_PARTICIPANTS'
1086: ,p_attribute_category => p_rec.attribute_category
1087: ,p_attribute1_name => 'ATTRIBUTE1'
1088: ,p_attribute1_value => p_rec.attribute1
1089: ,p_attribute2_name => 'ATTRIBUTE2'
1218: EXCEPTION
1219:
1220: WHEN app_exception.application_exception THEN
1221: IF hr_multi_message.exception_add
1222: (p_associated_column1 => 'PER_PARTICIPANTS.PARTICIPANT_USAGE_STATUS')
1223: THEN
1224: hr_utility.set_location(' Leaving:'|| l_proc, 980);
1225: RAISE;
1226: END IF;
1417: --
1418: cursor csr_leg_code is
1419: select legislation_code
1420: from per_business_groups pbg,
1421: per_participants par
1422: where par.participant_id = p_participant_id
1423: and pbg.business_group_id = par.business_group_id;
1424:
1425: l_proc varchar2(72) := g_package||'return_legislation_code';