265: --
266: --
267: -- Check to see if record updated.
268: --
269: l_api_updating := per_ctr_shd.api_updating
270: (p_contact_relationship_id => p_contact_relationship_id
271: ,p_object_version_number => p_object_version_number);
272: --
273: hr_utility.set_location(l_proc, 2);
272: --
273: hr_utility.set_location(l_proc, 2);
274: --
275: if ((l_api_updating
276: and per_ctr_shd.g_old_rec.contact_type <> p_contact_type)
277: or (NOT l_api_updating))
278: then
279: --
280: if p_contact_type is null then
373: begin
374: --
375: -- Check to see if record updated.
376: --
377: l_api_updating := per_ctr_shd.api_updating
378: (p_contact_relationship_id => p_contact_relationship_id
379: ,p_object_version_number => p_object_version_number);
380: --
381: hr_utility.set_location(l_proc, 2);
380: --
381: hr_utility.set_location(l_proc, 2);
382: --
383: if ((l_api_updating
384: and per_ctr_shd.g_old_rec.primary_contact_flag <> p_primary_contact_flag)
385: or (NOT l_api_updating))
386: then
387: --
388: if p_primary_contact_flag not in ('Y','N') then
458: --
459: hr_utility.set_location('Entering:'|| l_proc,5);
460: --
461: if (p_contact_relationship_id is not null
462: and per_ctr_shd.g_old_rec.start_life_reason_id
463: <> p_start_life_reason_id
464: and p_start_life_reason_id is not null)
465: or (p_contact_relationship_id is null
466: and p_start_life_reason_id is NOT NULL)
530: hr_utility.set_location('Entering:'|| l_proc,5);
531: --
532: --
533: if (p_contact_relationship_id is not null
534: and per_ctr_shd.g_old_rec.end_life_reason_id
535: <> p_end_life_reason_id
536: and p_end_life_reason_id is not null)
537: or (p_contact_relationship_id is null
538: and p_end_life_reason_id is NOT NULL)
675: --
676: hr_utility.set_location('Entering:'|| l_proc,5);
677: --
678: if (p_contact_relationship_id is not null
679: and nvl(per_ctr_shd.g_old_rec.date_start, hr_api.g_date)
680: <> nvl(p_date_start, hr_api.g_date)
681: or nvl(per_ctr_shd.g_old_rec.date_end, hr_api.g_date)
682: <> nvl(p_date_end, hr_api.g_date)
683: or nvl(per_ctr_shd.g_old_rec.contact_type, hr_api.g_varchar2)
677: --
678: if (p_contact_relationship_id is not null
679: and nvl(per_ctr_shd.g_old_rec.date_start, hr_api.g_date)
680: <> nvl(p_date_start, hr_api.g_date)
681: or nvl(per_ctr_shd.g_old_rec.date_end, hr_api.g_date)
682: <> nvl(p_date_end, hr_api.g_date)
683: or nvl(per_ctr_shd.g_old_rec.contact_type, hr_api.g_varchar2)
684: <> nvl(p_contact_type, hr_api.g_varchar2))
685: or p_contact_relationship_id is null then
679: and nvl(per_ctr_shd.g_old_rec.date_start, hr_api.g_date)
680: <> nvl(p_date_start, hr_api.g_date)
681: or nvl(per_ctr_shd.g_old_rec.date_end, hr_api.g_date)
682: <> nvl(p_date_end, hr_api.g_date)
683: or nvl(per_ctr_shd.g_old_rec.contact_type, hr_api.g_varchar2)
684: <> nvl(p_contact_type, hr_api.g_varchar2))
685: or p_contact_relationship_id is null then
686: --
687: open csr_chk_time_validation;
770: hr_utility.set_location(l_proc, 1);
771: --
772: if p_contact_relationship_id is null or
773: (p_contact_relationship_id is not null and
774: nvl(per_ctr_shd.g_old_rec.sequence_number,hr_api.g_number)
775: <> nvl(p_sequence_number,hr_api.g_number)) then
776: --
777: if p_sequence_number is not null and
778: p_contact_person_id is not null then
775: <> nvl(p_sequence_number,hr_api.g_number)) then
776: --
777: if p_sequence_number is not null and
778: p_contact_person_id is not null then
779: if per_ctr_shd.g_old_rec.sequence_number is null then
780: open csr_seq;
781: fetch csr_seq into l_sequence_number;
782: if csr_seq%FOUND then
783: close csr_seq;
793: end if;
794: end if;
795: --fix 1322770 Sequence no. may only be UPDATED from null.
796: elsif (p_contact_relationship_id is not null
797: and p_sequence_number <> per_ctr_shd.g_old_rec.sequence_number) then
798: hr_utility.set_message('800','PER_52511_SEQ_NO_UPD');
799: hr_utility.raise_error;
800: end if;
801: elsif (p_contact_relationship_id is not null
798: hr_utility.set_message('800','PER_52511_SEQ_NO_UPD');
799: hr_utility.raise_error;
800: end if;
801: elsif (p_contact_relationship_id is not null
802: and per_ctr_shd.g_old_rec.sequence_number is not null) then
803: hr_utility.set_message('800','PER_52511_SEQ_NO_UPD');
804: hr_utility.raise_error;
805: end if;
806: end if;
908: end chk_date_of_birth;
909: -- ----------------------------------------------------------------------------
910: -- |--------------------< check_non_updateable_args >-------------------------|
911: -- ----------------------------------------------------------------------------
912: Procedure check_non_updateable_args(p_rec in per_ctr_shd.g_rec_type)
913: is
914: --
915: l_proc varchar2(72) := g_package||'check_non_updateable_args';
916: l_error exception;
921: --
922: -- Only proceed with validation if a row exists for
923: -- the current record in the HR Schema
924: --
925: if not per_ctr_shd.api_updating
926: (p_contact_relationship_id => p_rec.contact_relationship_id
927: ,p_object_version_number => p_rec.object_version_number
928: ) then
929: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
935: hr_utility.set_location(l_proc, 6);
936: --
937: --
938: if nvl(p_rec.business_group_id, hr_api.g_number) <>
939: per_ctr_shd.g_old_rec.business_group_id then
940: l_argument := 'business_group_id';
941: raise l_error;
942: end if;
943: --
941: raise l_error;
942: end if;
943: --
944: if nvl(p_rec.person_id, hr_api.g_number) <>
945: per_ctr_shd.g_old_rec.person_id then
946: l_argument := 'person_id';
947: raise l_error;
948: end if;
949: --
947: raise l_error;
948: end if;
949: --
950: if nvl(p_rec.contact_person_id, hr_api.g_number) <>
951: per_ctr_shd.g_old_rec.contact_person_id then
952: l_argument := 'contact_person_id';
953: raise l_error;
954: end if;
955: --
990: -- Access Status:
991: -- Internal Table Handler Use Only.
992: -- ---------------------------------------------------------------------------
993: procedure chk_df
994: (p_rec in per_ctr_shd.g_rec_type) is
995: --
996: l_proc varchar2(72) := g_package||'chk_df';
997: --
998: begin
998: begin
999: hr_utility.set_location('Entering:'||l_proc, 10);
1000: --
1001: if ((p_rec.contact_relationship_id is not null) and (
1002: nvl(per_ctr_shd.g_old_rec.cont_attribute_category, hr_api.g_varchar2) <>
1003: nvl(p_rec.cont_attribute_category, hr_api.g_varchar2) or
1004: nvl(per_ctr_shd.g_old_rec.cont_attribute1, hr_api.g_varchar2) <>
1005: nvl(p_rec.cont_attribute1, hr_api.g_varchar2) or
1006: nvl(per_ctr_shd.g_old_rec.cont_attribute2, hr_api.g_varchar2) <>
1000: --
1001: if ((p_rec.contact_relationship_id is not null) and (
1002: nvl(per_ctr_shd.g_old_rec.cont_attribute_category, hr_api.g_varchar2) <>
1003: nvl(p_rec.cont_attribute_category, hr_api.g_varchar2) or
1004: nvl(per_ctr_shd.g_old_rec.cont_attribute1, hr_api.g_varchar2) <>
1005: nvl(p_rec.cont_attribute1, hr_api.g_varchar2) or
1006: nvl(per_ctr_shd.g_old_rec.cont_attribute2, hr_api.g_varchar2) <>
1007: nvl(p_rec.cont_attribute2, hr_api.g_varchar2) or
1008: nvl(per_ctr_shd.g_old_rec.cont_attribute3, hr_api.g_varchar2) <>
1002: nvl(per_ctr_shd.g_old_rec.cont_attribute_category, hr_api.g_varchar2) <>
1003: nvl(p_rec.cont_attribute_category, hr_api.g_varchar2) or
1004: nvl(per_ctr_shd.g_old_rec.cont_attribute1, hr_api.g_varchar2) <>
1005: nvl(p_rec.cont_attribute1, hr_api.g_varchar2) or
1006: nvl(per_ctr_shd.g_old_rec.cont_attribute2, hr_api.g_varchar2) <>
1007: nvl(p_rec.cont_attribute2, hr_api.g_varchar2) or
1008: nvl(per_ctr_shd.g_old_rec.cont_attribute3, hr_api.g_varchar2) <>
1009: nvl(p_rec.cont_attribute3, hr_api.g_varchar2) or
1010: nvl(per_ctr_shd.g_old_rec.cont_attribute4, hr_api.g_varchar2) <>
1004: nvl(per_ctr_shd.g_old_rec.cont_attribute1, hr_api.g_varchar2) <>
1005: nvl(p_rec.cont_attribute1, hr_api.g_varchar2) or
1006: nvl(per_ctr_shd.g_old_rec.cont_attribute2, hr_api.g_varchar2) <>
1007: nvl(p_rec.cont_attribute2, hr_api.g_varchar2) or
1008: nvl(per_ctr_shd.g_old_rec.cont_attribute3, hr_api.g_varchar2) <>
1009: nvl(p_rec.cont_attribute3, hr_api.g_varchar2) or
1010: nvl(per_ctr_shd.g_old_rec.cont_attribute4, hr_api.g_varchar2) <>
1011: nvl(p_rec.cont_attribute4, hr_api.g_varchar2) or
1012: nvl(per_ctr_shd.g_old_rec.cont_attribute5, hr_api.g_varchar2) <>
1006: nvl(per_ctr_shd.g_old_rec.cont_attribute2, hr_api.g_varchar2) <>
1007: nvl(p_rec.cont_attribute2, hr_api.g_varchar2) or
1008: nvl(per_ctr_shd.g_old_rec.cont_attribute3, hr_api.g_varchar2) <>
1009: nvl(p_rec.cont_attribute3, hr_api.g_varchar2) or
1010: nvl(per_ctr_shd.g_old_rec.cont_attribute4, hr_api.g_varchar2) <>
1011: nvl(p_rec.cont_attribute4, hr_api.g_varchar2) or
1012: nvl(per_ctr_shd.g_old_rec.cont_attribute5, hr_api.g_varchar2) <>
1013: nvl(p_rec.cont_attribute5, hr_api.g_varchar2) or
1014: nvl(per_ctr_shd.g_old_rec.cont_attribute6, hr_api.g_varchar2) <>
1008: nvl(per_ctr_shd.g_old_rec.cont_attribute3, hr_api.g_varchar2) <>
1009: nvl(p_rec.cont_attribute3, hr_api.g_varchar2) or
1010: nvl(per_ctr_shd.g_old_rec.cont_attribute4, hr_api.g_varchar2) <>
1011: nvl(p_rec.cont_attribute4, hr_api.g_varchar2) or
1012: nvl(per_ctr_shd.g_old_rec.cont_attribute5, hr_api.g_varchar2) <>
1013: nvl(p_rec.cont_attribute5, hr_api.g_varchar2) or
1014: nvl(per_ctr_shd.g_old_rec.cont_attribute6, hr_api.g_varchar2) <>
1015: nvl(p_rec.cont_attribute6, hr_api.g_varchar2) or
1016: nvl(per_ctr_shd.g_old_rec.cont_attribute7, hr_api.g_varchar2) <>
1010: nvl(per_ctr_shd.g_old_rec.cont_attribute4, hr_api.g_varchar2) <>
1011: nvl(p_rec.cont_attribute4, hr_api.g_varchar2) or
1012: nvl(per_ctr_shd.g_old_rec.cont_attribute5, hr_api.g_varchar2) <>
1013: nvl(p_rec.cont_attribute5, hr_api.g_varchar2) or
1014: nvl(per_ctr_shd.g_old_rec.cont_attribute6, hr_api.g_varchar2) <>
1015: nvl(p_rec.cont_attribute6, hr_api.g_varchar2) or
1016: nvl(per_ctr_shd.g_old_rec.cont_attribute7, hr_api.g_varchar2) <>
1017: nvl(p_rec.cont_attribute7, hr_api.g_varchar2) or
1018: nvl(per_ctr_shd.g_old_rec.cont_attribute8, hr_api.g_varchar2) <>
1012: nvl(per_ctr_shd.g_old_rec.cont_attribute5, hr_api.g_varchar2) <>
1013: nvl(p_rec.cont_attribute5, hr_api.g_varchar2) or
1014: nvl(per_ctr_shd.g_old_rec.cont_attribute6, hr_api.g_varchar2) <>
1015: nvl(p_rec.cont_attribute6, hr_api.g_varchar2) or
1016: nvl(per_ctr_shd.g_old_rec.cont_attribute7, hr_api.g_varchar2) <>
1017: nvl(p_rec.cont_attribute7, hr_api.g_varchar2) or
1018: nvl(per_ctr_shd.g_old_rec.cont_attribute8, hr_api.g_varchar2) <>
1019: nvl(p_rec.cont_attribute8, hr_api.g_varchar2) or
1020: nvl(per_ctr_shd.g_old_rec.cont_attribute9, hr_api.g_varchar2) <>
1014: nvl(per_ctr_shd.g_old_rec.cont_attribute6, hr_api.g_varchar2) <>
1015: nvl(p_rec.cont_attribute6, hr_api.g_varchar2) or
1016: nvl(per_ctr_shd.g_old_rec.cont_attribute7, hr_api.g_varchar2) <>
1017: nvl(p_rec.cont_attribute7, hr_api.g_varchar2) or
1018: nvl(per_ctr_shd.g_old_rec.cont_attribute8, hr_api.g_varchar2) <>
1019: nvl(p_rec.cont_attribute8, hr_api.g_varchar2) or
1020: nvl(per_ctr_shd.g_old_rec.cont_attribute9, hr_api.g_varchar2) <>
1021: nvl(p_rec.cont_attribute9, hr_api.g_varchar2) or
1022: nvl(per_ctr_shd.g_old_rec.cont_attribute10, hr_api.g_varchar2) <>
1016: nvl(per_ctr_shd.g_old_rec.cont_attribute7, hr_api.g_varchar2) <>
1017: nvl(p_rec.cont_attribute7, hr_api.g_varchar2) or
1018: nvl(per_ctr_shd.g_old_rec.cont_attribute8, hr_api.g_varchar2) <>
1019: nvl(p_rec.cont_attribute8, hr_api.g_varchar2) or
1020: nvl(per_ctr_shd.g_old_rec.cont_attribute9, hr_api.g_varchar2) <>
1021: nvl(p_rec.cont_attribute9, hr_api.g_varchar2) or
1022: nvl(per_ctr_shd.g_old_rec.cont_attribute10, hr_api.g_varchar2) <>
1023: nvl(p_rec.cont_attribute10, hr_api.g_varchar2) or
1024: nvl(per_ctr_shd.g_old_rec.cont_attribute11, hr_api.g_varchar2) <>
1018: nvl(per_ctr_shd.g_old_rec.cont_attribute8, hr_api.g_varchar2) <>
1019: nvl(p_rec.cont_attribute8, hr_api.g_varchar2) or
1020: nvl(per_ctr_shd.g_old_rec.cont_attribute9, hr_api.g_varchar2) <>
1021: nvl(p_rec.cont_attribute9, hr_api.g_varchar2) or
1022: nvl(per_ctr_shd.g_old_rec.cont_attribute10, hr_api.g_varchar2) <>
1023: nvl(p_rec.cont_attribute10, hr_api.g_varchar2) or
1024: nvl(per_ctr_shd.g_old_rec.cont_attribute11, hr_api.g_varchar2) <>
1025: nvl(p_rec.cont_attribute11, hr_api.g_varchar2) or
1026: nvl(per_ctr_shd.g_old_rec.cont_attribute12, hr_api.g_varchar2) <>
1020: nvl(per_ctr_shd.g_old_rec.cont_attribute9, hr_api.g_varchar2) <>
1021: nvl(p_rec.cont_attribute9, hr_api.g_varchar2) or
1022: nvl(per_ctr_shd.g_old_rec.cont_attribute10, hr_api.g_varchar2) <>
1023: nvl(p_rec.cont_attribute10, hr_api.g_varchar2) or
1024: nvl(per_ctr_shd.g_old_rec.cont_attribute11, hr_api.g_varchar2) <>
1025: nvl(p_rec.cont_attribute11, hr_api.g_varchar2) or
1026: nvl(per_ctr_shd.g_old_rec.cont_attribute12, hr_api.g_varchar2) <>
1027: nvl(p_rec.cont_attribute12, hr_api.g_varchar2) or
1028: nvl(per_ctr_shd.g_old_rec.cont_attribute13, hr_api.g_varchar2) <>
1022: nvl(per_ctr_shd.g_old_rec.cont_attribute10, hr_api.g_varchar2) <>
1023: nvl(p_rec.cont_attribute10, hr_api.g_varchar2) or
1024: nvl(per_ctr_shd.g_old_rec.cont_attribute11, hr_api.g_varchar2) <>
1025: nvl(p_rec.cont_attribute11, hr_api.g_varchar2) or
1026: nvl(per_ctr_shd.g_old_rec.cont_attribute12, hr_api.g_varchar2) <>
1027: nvl(p_rec.cont_attribute12, hr_api.g_varchar2) or
1028: nvl(per_ctr_shd.g_old_rec.cont_attribute13, hr_api.g_varchar2) <>
1029: nvl(p_rec.cont_attribute13, hr_api.g_varchar2) or
1030: nvl(per_ctr_shd.g_old_rec.cont_attribute14, hr_api.g_varchar2) <>
1024: nvl(per_ctr_shd.g_old_rec.cont_attribute11, hr_api.g_varchar2) <>
1025: nvl(p_rec.cont_attribute11, hr_api.g_varchar2) or
1026: nvl(per_ctr_shd.g_old_rec.cont_attribute12, hr_api.g_varchar2) <>
1027: nvl(p_rec.cont_attribute12, hr_api.g_varchar2) or
1028: nvl(per_ctr_shd.g_old_rec.cont_attribute13, hr_api.g_varchar2) <>
1029: nvl(p_rec.cont_attribute13, hr_api.g_varchar2) or
1030: nvl(per_ctr_shd.g_old_rec.cont_attribute14, hr_api.g_varchar2) <>
1031: nvl(p_rec.cont_attribute14, hr_api.g_varchar2) or
1032: nvl(per_ctr_shd.g_old_rec.cont_attribute15, hr_api.g_varchar2) <>
1026: nvl(per_ctr_shd.g_old_rec.cont_attribute12, hr_api.g_varchar2) <>
1027: nvl(p_rec.cont_attribute12, hr_api.g_varchar2) or
1028: nvl(per_ctr_shd.g_old_rec.cont_attribute13, hr_api.g_varchar2) <>
1029: nvl(p_rec.cont_attribute13, hr_api.g_varchar2) or
1030: nvl(per_ctr_shd.g_old_rec.cont_attribute14, hr_api.g_varchar2) <>
1031: nvl(p_rec.cont_attribute14, hr_api.g_varchar2) or
1032: nvl(per_ctr_shd.g_old_rec.cont_attribute15, hr_api.g_varchar2) <>
1033: nvl(p_rec.cont_attribute15, hr_api.g_varchar2) or
1034: nvl(per_ctr_shd.g_old_rec.cont_attribute16, hr_api.g_varchar2) <>
1028: nvl(per_ctr_shd.g_old_rec.cont_attribute13, hr_api.g_varchar2) <>
1029: nvl(p_rec.cont_attribute13, hr_api.g_varchar2) or
1030: nvl(per_ctr_shd.g_old_rec.cont_attribute14, hr_api.g_varchar2) <>
1031: nvl(p_rec.cont_attribute14, hr_api.g_varchar2) or
1032: nvl(per_ctr_shd.g_old_rec.cont_attribute15, hr_api.g_varchar2) <>
1033: nvl(p_rec.cont_attribute15, hr_api.g_varchar2) or
1034: nvl(per_ctr_shd.g_old_rec.cont_attribute16, hr_api.g_varchar2) <>
1035: nvl(p_rec.cont_attribute16, hr_api.g_varchar2) or
1036: nvl(per_ctr_shd.g_old_rec.cont_attribute17, hr_api.g_varchar2) <>
1030: nvl(per_ctr_shd.g_old_rec.cont_attribute14, hr_api.g_varchar2) <>
1031: nvl(p_rec.cont_attribute14, hr_api.g_varchar2) or
1032: nvl(per_ctr_shd.g_old_rec.cont_attribute15, hr_api.g_varchar2) <>
1033: nvl(p_rec.cont_attribute15, hr_api.g_varchar2) or
1034: nvl(per_ctr_shd.g_old_rec.cont_attribute16, hr_api.g_varchar2) <>
1035: nvl(p_rec.cont_attribute16, hr_api.g_varchar2) or
1036: nvl(per_ctr_shd.g_old_rec.cont_attribute17, hr_api.g_varchar2) <>
1037: nvl(p_rec.cont_attribute17, hr_api.g_varchar2) or
1038: nvl(per_ctr_shd.g_old_rec.cont_attribute18, hr_api.g_varchar2) <>
1032: nvl(per_ctr_shd.g_old_rec.cont_attribute15, hr_api.g_varchar2) <>
1033: nvl(p_rec.cont_attribute15, hr_api.g_varchar2) or
1034: nvl(per_ctr_shd.g_old_rec.cont_attribute16, hr_api.g_varchar2) <>
1035: nvl(p_rec.cont_attribute16, hr_api.g_varchar2) or
1036: nvl(per_ctr_shd.g_old_rec.cont_attribute17, hr_api.g_varchar2) <>
1037: nvl(p_rec.cont_attribute17, hr_api.g_varchar2) or
1038: nvl(per_ctr_shd.g_old_rec.cont_attribute18, hr_api.g_varchar2) <>
1039: nvl(p_rec.cont_attribute18, hr_api.g_varchar2) or
1040: nvl(per_ctr_shd.g_old_rec.cont_attribute19, hr_api.g_varchar2) <>
1034: nvl(per_ctr_shd.g_old_rec.cont_attribute16, hr_api.g_varchar2) <>
1035: nvl(p_rec.cont_attribute16, hr_api.g_varchar2) or
1036: nvl(per_ctr_shd.g_old_rec.cont_attribute17, hr_api.g_varchar2) <>
1037: nvl(p_rec.cont_attribute17, hr_api.g_varchar2) or
1038: nvl(per_ctr_shd.g_old_rec.cont_attribute18, hr_api.g_varchar2) <>
1039: nvl(p_rec.cont_attribute18, hr_api.g_varchar2) or
1040: nvl(per_ctr_shd.g_old_rec.cont_attribute19, hr_api.g_varchar2) <>
1041: nvl(p_rec.cont_attribute19, hr_api.g_varchar2) or
1042: nvl(per_ctr_shd.g_old_rec.cont_attribute20, hr_api.g_varchar2) <>
1036: nvl(per_ctr_shd.g_old_rec.cont_attribute17, hr_api.g_varchar2) <>
1037: nvl(p_rec.cont_attribute17, hr_api.g_varchar2) or
1038: nvl(per_ctr_shd.g_old_rec.cont_attribute18, hr_api.g_varchar2) <>
1039: nvl(p_rec.cont_attribute18, hr_api.g_varchar2) or
1040: nvl(per_ctr_shd.g_old_rec.cont_attribute19, hr_api.g_varchar2) <>
1041: nvl(p_rec.cont_attribute19, hr_api.g_varchar2) or
1042: nvl(per_ctr_shd.g_old_rec.cont_attribute20, hr_api.g_varchar2) <>
1043: nvl(p_rec.cont_attribute20, hr_api.g_varchar2)))
1044: or
1038: nvl(per_ctr_shd.g_old_rec.cont_attribute18, hr_api.g_varchar2) <>
1039: nvl(p_rec.cont_attribute18, hr_api.g_varchar2) or
1040: nvl(per_ctr_shd.g_old_rec.cont_attribute19, hr_api.g_varchar2) <>
1041: nvl(p_rec.cont_attribute19, hr_api.g_varchar2) or
1042: nvl(per_ctr_shd.g_old_rec.cont_attribute20, hr_api.g_varchar2) <>
1043: nvl(p_rec.cont_attribute20, hr_api.g_varchar2)))
1044: or
1045: (p_rec.contact_relationship_id is null) then
1046: --
1126: -- Access Status:
1127: -- Internal Table Handler Use Only.
1128: -- ---------------------------------------------------------------------------
1129: procedure chk_ddf
1130: (p_rec in per_ctr_shd.g_rec_type) is
1131: --
1132: l_proc varchar2(72) := g_package||'chk_ddf';
1133: --
1134: begin
1134: begin
1135: hr_utility.set_location('Entering:'||l_proc, 10);
1136: --
1137: if ((p_rec.contact_relationship_id is not null) and (
1138: nvl(per_ctr_shd.g_old_rec.cont_information_category, hr_api.g_varchar2) <>
1139: nvl(p_rec.cont_information_category, hr_api.g_varchar2) or
1140: nvl(per_ctr_shd.g_old_rec.cont_information1, hr_api.g_varchar2) <>
1141: nvl(p_rec.cont_information1, hr_api.g_varchar2) or
1142: nvl(per_ctr_shd.g_old_rec.cont_information2, hr_api.g_varchar2) <>
1136: --
1137: if ((p_rec.contact_relationship_id is not null) and (
1138: nvl(per_ctr_shd.g_old_rec.cont_information_category, hr_api.g_varchar2) <>
1139: nvl(p_rec.cont_information_category, hr_api.g_varchar2) or
1140: nvl(per_ctr_shd.g_old_rec.cont_information1, hr_api.g_varchar2) <>
1141: nvl(p_rec.cont_information1, hr_api.g_varchar2) or
1142: nvl(per_ctr_shd.g_old_rec.cont_information2, hr_api.g_varchar2) <>
1143: nvl(p_rec.cont_information2, hr_api.g_varchar2) or
1144: nvl(per_ctr_shd.g_old_rec.cont_information3, hr_api.g_varchar2) <>
1138: nvl(per_ctr_shd.g_old_rec.cont_information_category, hr_api.g_varchar2) <>
1139: nvl(p_rec.cont_information_category, hr_api.g_varchar2) or
1140: nvl(per_ctr_shd.g_old_rec.cont_information1, hr_api.g_varchar2) <>
1141: nvl(p_rec.cont_information1, hr_api.g_varchar2) or
1142: nvl(per_ctr_shd.g_old_rec.cont_information2, hr_api.g_varchar2) <>
1143: nvl(p_rec.cont_information2, hr_api.g_varchar2) or
1144: nvl(per_ctr_shd.g_old_rec.cont_information3, hr_api.g_varchar2) <>
1145: nvl(p_rec.cont_information3, hr_api.g_varchar2) or
1146: nvl(per_ctr_shd.g_old_rec.cont_information4, hr_api.g_varchar2) <>
1140: nvl(per_ctr_shd.g_old_rec.cont_information1, hr_api.g_varchar2) <>
1141: nvl(p_rec.cont_information1, hr_api.g_varchar2) or
1142: nvl(per_ctr_shd.g_old_rec.cont_information2, hr_api.g_varchar2) <>
1143: nvl(p_rec.cont_information2, hr_api.g_varchar2) or
1144: nvl(per_ctr_shd.g_old_rec.cont_information3, hr_api.g_varchar2) <>
1145: nvl(p_rec.cont_information3, hr_api.g_varchar2) or
1146: nvl(per_ctr_shd.g_old_rec.cont_information4, hr_api.g_varchar2) <>
1147: nvl(p_rec.cont_information4, hr_api.g_varchar2) or
1148: nvl(per_ctr_shd.g_old_rec.cont_information5, hr_api.g_varchar2) <>
1142: nvl(per_ctr_shd.g_old_rec.cont_information2, hr_api.g_varchar2) <>
1143: nvl(p_rec.cont_information2, hr_api.g_varchar2) or
1144: nvl(per_ctr_shd.g_old_rec.cont_information3, hr_api.g_varchar2) <>
1145: nvl(p_rec.cont_information3, hr_api.g_varchar2) or
1146: nvl(per_ctr_shd.g_old_rec.cont_information4, hr_api.g_varchar2) <>
1147: nvl(p_rec.cont_information4, hr_api.g_varchar2) or
1148: nvl(per_ctr_shd.g_old_rec.cont_information5, hr_api.g_varchar2) <>
1149: nvl(p_rec.cont_information5, hr_api.g_varchar2) or
1150: nvl(per_ctr_shd.g_old_rec.cont_information6, hr_api.g_varchar2) <>
1144: nvl(per_ctr_shd.g_old_rec.cont_information3, hr_api.g_varchar2) <>
1145: nvl(p_rec.cont_information3, hr_api.g_varchar2) or
1146: nvl(per_ctr_shd.g_old_rec.cont_information4, hr_api.g_varchar2) <>
1147: nvl(p_rec.cont_information4, hr_api.g_varchar2) or
1148: nvl(per_ctr_shd.g_old_rec.cont_information5, hr_api.g_varchar2) <>
1149: nvl(p_rec.cont_information5, hr_api.g_varchar2) or
1150: nvl(per_ctr_shd.g_old_rec.cont_information6, hr_api.g_varchar2) <>
1151: nvl(p_rec.cont_information6, hr_api.g_varchar2) or
1152: nvl(per_ctr_shd.g_old_rec.cont_information7, hr_api.g_varchar2) <>
1146: nvl(per_ctr_shd.g_old_rec.cont_information4, hr_api.g_varchar2) <>
1147: nvl(p_rec.cont_information4, hr_api.g_varchar2) or
1148: nvl(per_ctr_shd.g_old_rec.cont_information5, hr_api.g_varchar2) <>
1149: nvl(p_rec.cont_information5, hr_api.g_varchar2) or
1150: nvl(per_ctr_shd.g_old_rec.cont_information6, hr_api.g_varchar2) <>
1151: nvl(p_rec.cont_information6, hr_api.g_varchar2) or
1152: nvl(per_ctr_shd.g_old_rec.cont_information7, hr_api.g_varchar2) <>
1153: nvl(p_rec.cont_information7, hr_api.g_varchar2) or
1154: nvl(per_ctr_shd.g_old_rec.cont_information8, hr_api.g_varchar2) <>
1148: nvl(per_ctr_shd.g_old_rec.cont_information5, hr_api.g_varchar2) <>
1149: nvl(p_rec.cont_information5, hr_api.g_varchar2) or
1150: nvl(per_ctr_shd.g_old_rec.cont_information6, hr_api.g_varchar2) <>
1151: nvl(p_rec.cont_information6, hr_api.g_varchar2) or
1152: nvl(per_ctr_shd.g_old_rec.cont_information7, hr_api.g_varchar2) <>
1153: nvl(p_rec.cont_information7, hr_api.g_varchar2) or
1154: nvl(per_ctr_shd.g_old_rec.cont_information8, hr_api.g_varchar2) <>
1155: nvl(p_rec.cont_information8, hr_api.g_varchar2) or
1156: nvl(per_ctr_shd.g_old_rec.cont_information9, hr_api.g_varchar2) <>
1150: nvl(per_ctr_shd.g_old_rec.cont_information6, hr_api.g_varchar2) <>
1151: nvl(p_rec.cont_information6, hr_api.g_varchar2) or
1152: nvl(per_ctr_shd.g_old_rec.cont_information7, hr_api.g_varchar2) <>
1153: nvl(p_rec.cont_information7, hr_api.g_varchar2) or
1154: nvl(per_ctr_shd.g_old_rec.cont_information8, hr_api.g_varchar2) <>
1155: nvl(p_rec.cont_information8, hr_api.g_varchar2) or
1156: nvl(per_ctr_shd.g_old_rec.cont_information9, hr_api.g_varchar2) <>
1157: nvl(p_rec.cont_information9, hr_api.g_varchar2) or
1158: nvl(per_ctr_shd.g_old_rec.cont_information10, hr_api.g_varchar2) <>
1152: nvl(per_ctr_shd.g_old_rec.cont_information7, hr_api.g_varchar2) <>
1153: nvl(p_rec.cont_information7, hr_api.g_varchar2) or
1154: nvl(per_ctr_shd.g_old_rec.cont_information8, hr_api.g_varchar2) <>
1155: nvl(p_rec.cont_information8, hr_api.g_varchar2) or
1156: nvl(per_ctr_shd.g_old_rec.cont_information9, hr_api.g_varchar2) <>
1157: nvl(p_rec.cont_information9, hr_api.g_varchar2) or
1158: nvl(per_ctr_shd.g_old_rec.cont_information10, hr_api.g_varchar2) <>
1159: nvl(p_rec.cont_information10, hr_api.g_varchar2) or
1160: nvl(per_ctr_shd.g_old_rec.cont_information11, hr_api.g_varchar2) <>
1154: nvl(per_ctr_shd.g_old_rec.cont_information8, hr_api.g_varchar2) <>
1155: nvl(p_rec.cont_information8, hr_api.g_varchar2) or
1156: nvl(per_ctr_shd.g_old_rec.cont_information9, hr_api.g_varchar2) <>
1157: nvl(p_rec.cont_information9, hr_api.g_varchar2) or
1158: nvl(per_ctr_shd.g_old_rec.cont_information10, hr_api.g_varchar2) <>
1159: nvl(p_rec.cont_information10, hr_api.g_varchar2) or
1160: nvl(per_ctr_shd.g_old_rec.cont_information11, hr_api.g_varchar2) <>
1161: nvl(p_rec.cont_information11, hr_api.g_varchar2) or
1162: nvl(per_ctr_shd.g_old_rec.cont_information12, hr_api.g_varchar2) <>
1156: nvl(per_ctr_shd.g_old_rec.cont_information9, hr_api.g_varchar2) <>
1157: nvl(p_rec.cont_information9, hr_api.g_varchar2) or
1158: nvl(per_ctr_shd.g_old_rec.cont_information10, hr_api.g_varchar2) <>
1159: nvl(p_rec.cont_information10, hr_api.g_varchar2) or
1160: nvl(per_ctr_shd.g_old_rec.cont_information11, hr_api.g_varchar2) <>
1161: nvl(p_rec.cont_information11, hr_api.g_varchar2) or
1162: nvl(per_ctr_shd.g_old_rec.cont_information12, hr_api.g_varchar2) <>
1163: nvl(p_rec.cont_information12, hr_api.g_varchar2) or
1164: nvl(per_ctr_shd.g_old_rec.cont_information13, hr_api.g_varchar2) <>
1158: nvl(per_ctr_shd.g_old_rec.cont_information10, hr_api.g_varchar2) <>
1159: nvl(p_rec.cont_information10, hr_api.g_varchar2) or
1160: nvl(per_ctr_shd.g_old_rec.cont_information11, hr_api.g_varchar2) <>
1161: nvl(p_rec.cont_information11, hr_api.g_varchar2) or
1162: nvl(per_ctr_shd.g_old_rec.cont_information12, hr_api.g_varchar2) <>
1163: nvl(p_rec.cont_information12, hr_api.g_varchar2) or
1164: nvl(per_ctr_shd.g_old_rec.cont_information13, hr_api.g_varchar2) <>
1165: nvl(p_rec.cont_information13, hr_api.g_varchar2) or
1166: nvl(per_ctr_shd.g_old_rec.cont_information14, hr_api.g_varchar2) <>
1160: nvl(per_ctr_shd.g_old_rec.cont_information11, hr_api.g_varchar2) <>
1161: nvl(p_rec.cont_information11, hr_api.g_varchar2) or
1162: nvl(per_ctr_shd.g_old_rec.cont_information12, hr_api.g_varchar2) <>
1163: nvl(p_rec.cont_information12, hr_api.g_varchar2) or
1164: nvl(per_ctr_shd.g_old_rec.cont_information13, hr_api.g_varchar2) <>
1165: nvl(p_rec.cont_information13, hr_api.g_varchar2) or
1166: nvl(per_ctr_shd.g_old_rec.cont_information14, hr_api.g_varchar2) <>
1167: nvl(p_rec.cont_information14, hr_api.g_varchar2) or
1168: nvl(per_ctr_shd.g_old_rec.cont_information15, hr_api.g_varchar2) <>
1162: nvl(per_ctr_shd.g_old_rec.cont_information12, hr_api.g_varchar2) <>
1163: nvl(p_rec.cont_information12, hr_api.g_varchar2) or
1164: nvl(per_ctr_shd.g_old_rec.cont_information13, hr_api.g_varchar2) <>
1165: nvl(p_rec.cont_information13, hr_api.g_varchar2) or
1166: nvl(per_ctr_shd.g_old_rec.cont_information14, hr_api.g_varchar2) <>
1167: nvl(p_rec.cont_information14, hr_api.g_varchar2) or
1168: nvl(per_ctr_shd.g_old_rec.cont_information15, hr_api.g_varchar2) <>
1169: nvl(p_rec.cont_information15, hr_api.g_varchar2) or
1170: nvl(per_ctr_shd.g_old_rec.cont_information16, hr_api.g_varchar2) <>
1164: nvl(per_ctr_shd.g_old_rec.cont_information13, hr_api.g_varchar2) <>
1165: nvl(p_rec.cont_information13, hr_api.g_varchar2) or
1166: nvl(per_ctr_shd.g_old_rec.cont_information14, hr_api.g_varchar2) <>
1167: nvl(p_rec.cont_information14, hr_api.g_varchar2) or
1168: nvl(per_ctr_shd.g_old_rec.cont_information15, hr_api.g_varchar2) <>
1169: nvl(p_rec.cont_information15, hr_api.g_varchar2) or
1170: nvl(per_ctr_shd.g_old_rec.cont_information16, hr_api.g_varchar2) <>
1171: nvl(p_rec.cont_information16, hr_api.g_varchar2) or
1172: nvl(per_ctr_shd.g_old_rec.cont_information17, hr_api.g_varchar2) <>
1166: nvl(per_ctr_shd.g_old_rec.cont_information14, hr_api.g_varchar2) <>
1167: nvl(p_rec.cont_information14, hr_api.g_varchar2) or
1168: nvl(per_ctr_shd.g_old_rec.cont_information15, hr_api.g_varchar2) <>
1169: nvl(p_rec.cont_information15, hr_api.g_varchar2) or
1170: nvl(per_ctr_shd.g_old_rec.cont_information16, hr_api.g_varchar2) <>
1171: nvl(p_rec.cont_information16, hr_api.g_varchar2) or
1172: nvl(per_ctr_shd.g_old_rec.cont_information17, hr_api.g_varchar2) <>
1173: nvl(p_rec.cont_information17, hr_api.g_varchar2) or
1174: nvl(per_ctr_shd.g_old_rec.cont_information18, hr_api.g_varchar2) <>
1168: nvl(per_ctr_shd.g_old_rec.cont_information15, hr_api.g_varchar2) <>
1169: nvl(p_rec.cont_information15, hr_api.g_varchar2) or
1170: nvl(per_ctr_shd.g_old_rec.cont_information16, hr_api.g_varchar2) <>
1171: nvl(p_rec.cont_information16, hr_api.g_varchar2) or
1172: nvl(per_ctr_shd.g_old_rec.cont_information17, hr_api.g_varchar2) <>
1173: nvl(p_rec.cont_information17, hr_api.g_varchar2) or
1174: nvl(per_ctr_shd.g_old_rec.cont_information18, hr_api.g_varchar2) <>
1175: nvl(p_rec.cont_information18, hr_api.g_varchar2) or
1176: nvl(per_ctr_shd.g_old_rec.cont_information19, hr_api.g_varchar2) <>
1170: nvl(per_ctr_shd.g_old_rec.cont_information16, hr_api.g_varchar2) <>
1171: nvl(p_rec.cont_information16, hr_api.g_varchar2) or
1172: nvl(per_ctr_shd.g_old_rec.cont_information17, hr_api.g_varchar2) <>
1173: nvl(p_rec.cont_information17, hr_api.g_varchar2) or
1174: nvl(per_ctr_shd.g_old_rec.cont_information18, hr_api.g_varchar2) <>
1175: nvl(p_rec.cont_information18, hr_api.g_varchar2) or
1176: nvl(per_ctr_shd.g_old_rec.cont_information19, hr_api.g_varchar2) <>
1177: nvl(p_rec.cont_information19, hr_api.g_varchar2) or
1178: nvl(per_ctr_shd.g_old_rec.cont_information20, hr_api.g_varchar2) <>
1172: nvl(per_ctr_shd.g_old_rec.cont_information17, hr_api.g_varchar2) <>
1173: nvl(p_rec.cont_information17, hr_api.g_varchar2) or
1174: nvl(per_ctr_shd.g_old_rec.cont_information18, hr_api.g_varchar2) <>
1175: nvl(p_rec.cont_information18, hr_api.g_varchar2) or
1176: nvl(per_ctr_shd.g_old_rec.cont_information19, hr_api.g_varchar2) <>
1177: nvl(p_rec.cont_information19, hr_api.g_varchar2) or
1178: nvl(per_ctr_shd.g_old_rec.cont_information20, hr_api.g_varchar2) <>
1179: nvl(p_rec.cont_information20, hr_api.g_varchar2)))
1180: or
1174: nvl(per_ctr_shd.g_old_rec.cont_information18, hr_api.g_varchar2) <>
1175: nvl(p_rec.cont_information18, hr_api.g_varchar2) or
1176: nvl(per_ctr_shd.g_old_rec.cont_information19, hr_api.g_varchar2) <>
1177: nvl(p_rec.cont_information19, hr_api.g_varchar2) or
1178: nvl(per_ctr_shd.g_old_rec.cont_information20, hr_api.g_varchar2) <>
1179: nvl(p_rec.cont_information20, hr_api.g_varchar2)))
1180: or
1181: (p_rec.contact_relationship_id is null) then
1182: --
1237: --
1238: -- ----------------------------------------------------------------------------
1239: -- |---------------------------< insert_validate >----------------------------|
1240: -- ----------------------------------------------------------------------------
1241: Procedure insert_validate(p_rec in per_ctr_shd.g_rec_type
1242: ,p_effective_date in date) is
1243: --
1244: l_proc varchar2(72) := g_package||'insert_validate';
1245: --
1408: --
1409: -- ----------------------------------------------------------------------------
1410: -- |---------------------------< update_validate >----------------------------|
1411: -- ----------------------------------------------------------------------------
1412: Procedure update_validate(p_rec in per_ctr_shd.g_rec_type
1413: ,p_effective_date in date) is
1414: --
1415: l_proc varchar2(72) := g_package||'update_validate';
1416: --
1572: --
1573: -- ----------------------------------------------------------------------------
1574: -- |---------------------------< delete_validate >----------------------------|
1575: -- ----------------------------------------------------------------------------
1576: Procedure delete_validate(p_rec in per_ctr_shd.g_rec_type) is
1577: --
1578: l_proc varchar2(72) := g_package||'delete_validate';
1579: --
1580: Begin