49: exception
50: when app_exception.application_exception then
51: if hr_multi_message.exception_add
52: (p_associated_column1 => 'ATTRIBUTE_ID') then
53: hr_utility.set_location(' Leaving:'|| l_proc, 50);
54: raise;
55: end if;
56: hr_utility.set_location(' Leaving:'|| l_proc, 60);
57: end chk_delete;
52: (p_associated_column1 => 'ATTRIBUTE_ID') then
53: hr_utility.set_location(' Leaving:'|| l_proc, 50);
54: raise;
55: end if;
56: hr_utility.set_location(' Leaving:'|| l_proc, 60);
57: end chk_delete;
58: --
59: -- ----------------------------------------------------------------------------
60: -- |------------------------------< chk_ddf >----------------------------------|
90: --
91: l_proc varchar2(72) := g_package || 'chk_ddf';
92: --
93: begin
94: hr_utility.set_location('Entering:'||l_proc,10);
95: --
96: if ((p_rec.referral_info_id is not null) and (
97: nvl(irc_irf_shd.g_old_rec.irf_information_category, hr_api.g_varchar2) <>
98: nvl(p_rec.irf_information_category, hr_api.g_varchar2) or
149: ,p_attribute10_value => p_rec.irf_information10
150: );
151: end if;
152: --
153: hr_utility.set_location(' Leaving:'||l_proc,20);
154: end chk_ddf;
155: --
156: -- ----------------------------------------------------------------------------
157: -- |------------------------------< chk_df >----------------------------------|
187: --
188: l_proc varchar2(72) := g_package || 'chk_df';
189: --
190: begin
191: hr_utility.set_location('Entering:'||l_proc,10);
192: --
193: if ((p_rec.referral_info_id is not null) and (
194: nvl(irc_irf_shd.g_old_rec.irf_attribute_category, hr_api.g_varchar2) <>
195: nvl(p_rec.irf_attribute_category, hr_api.g_varchar2) or
246: ,p_attribute10_value => p_rec.irf_attribute10
247: );
248: end if;
249: --
250: hr_utility.set_location(' Leaving:'||l_proc,20);
251: end chk_df;
252: --
253: -- ----------------------------------------------------------------------------
254: -- |-----------------------< chk_non_updateable_args >------------------------|
285: l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
286: --
287: Begin
288: --
289: hr_utility.set_location(' Leaving:'||l_proc,10);
290: --
291: -- Only proceed with the validation if a row exists for the current
292: -- record in the HR Schema.
293: --
328: ,p_base_table => irc_irf_shd.g_tab_name
329: );
330: end if;
331: --
332: hr_utility.set_location(' Leaving:'||l_proc,20);
333: End chk_non_updateable_args;
334: --
335: -- ----------------------------------------------------------------------------
336: -- |--------------------------< dt_update_validate >--------------------------|
517: --
518: l_proc varchar2(72) := g_package||'chk_source_criteria';
519: l_not_exists boolean;
520: Begin
521: hr_utility.set_location('Entering:'||l_proc, 5);
522: --
523: if p_source_criteria is not null then
524: l_not_exists := hr_api.not_exists_in_hr_lookups
525: (p_effective_date
525: (p_effective_date
526: ,'IRC_REFERRAL_CRITERIA'
527: ,p_source_criteria
528: );
529: hr_utility.set_location(l_proc, 10);
530: if (l_not_exists = true) then
531: -- RAISE ERROR SAYING THAT THE SOURCE CRITERIA IS INVALID
532: fnd_message.set_name('PER','IRC_412529_INV_SRC_CRITERIA');
533: fnd_message.set_token('CRIT_NUM',p_source_criteria_index);
533: fnd_message.set_token('CRIT_NUM',p_source_criteria_index);
534: fnd_message.raise_error;
535: end if;
536: end if;
537: hr_utility.set_location('leaving:'||l_proc, 15);
538: end chk_source_criteria;
539: --
540: --
541: -- ----------------------------------------------------------------------------
548: --
549: l_proc varchar2(72) := g_package||'chk_source_type';
550: l_not_exists boolean;
551: Begin
552: hr_utility.set_location('Entering:'||l_proc, 5);
553: --
554: if p_source_type is not null then
555: l_not_exists := hr_api.not_exists_in_hr_lookups
556: (p_effective_date
556: (p_effective_date
557: ,'REC_TYPE'
558: ,p_source_type
559: );
560: hr_utility.set_location(l_proc, 10);
561: if (l_not_exists = true) then
562: -- RAISE ERROR SAYING THAT THE SOURCE CRITERIA IS INVALID
563: fnd_message.set_name('PER','HR_51162_ASG_INV_SOURCE_TYPE');
564: fnd_message.raise_error;
563: fnd_message.set_name('PER','HR_51162_ASG_INV_SOURCE_TYPE');
564: fnd_message.raise_error;
565: end if;
566: end if;
567: hr_utility.set_location('leaving:'||l_proc, 15);
568: end chk_source_type;
569: --
570: --
571: -- ----------------------------------------------------------------------------
578: --
579: l_proc varchar2(72) := g_package||'chk_object';
580: l_not_exists boolean;
581: Begin
582: hr_utility.set_location('Entering:'||l_proc, 5);
583: --
584: -- Check for the Object Type first.
585: if (p_rec.object_type<>'PERSON' and p_rec.object_type<>'APPLICATION') then
586: -- RAISE ERROR SAYING THAT THE OBJECT TYPE IS INVALID
587: fnd_message.set_name('PER','IRC_412527_INV_OBJ_TYPE');
588: fnd_message.raise_error;
589: end if;
590: --
591: hr_utility.set_location(l_proc, 10);
592: --
593: -- Check for the Object Id
594: if p_rec.object_type='PERSON' then
595: chk_party_id(p_party_id => p_rec.object_id,
597: else
598: chk_assignment_id(p_assignment_id => p_rec.object_id,
599: p_effective_date => p_effective_date);
600: end if;
601: hr_utility.set_location('leaving:'||l_proc, 15);
602: end chk_object;
603: --
604: --
605: -- ----------------------------------------------------------------------------
612: --
613: l_proc varchar2(72) := g_package||'chk_object_created_by';
614: l_not_exists boolean;
615: Begin
616: hr_utility.set_location('Entering:'||l_proc, 5);
617: --
618: if (p_rec.object_created_by<>'EMP'
619: and p_rec.object_created_by<>'CAND'
620: and p_rec.object_created_by<>'MGR'
622: -- RAISE ERROR SAYING THAT THE OBJECT CRATED BY IS INVALID
623: fnd_message.set_name('PER','IRC_412528_INV_OBJ_CREATED_BY');
624: fnd_message.raise_error;
625: end if;
626: hr_utility.set_location('leaving:'||l_proc, 10);
627: end chk_object_created_by;
628: --
629: -- ----------------------------------------------------------------------------
630: -- |-----------------------------< chk_person_id >----------------------------|
663: and trunc(p_effective_date) between ppf.effective_start_date
664: and ppf.effective_end_date;
665: --
666: begin
667: hr_utility.set_location('Entering:'||l_proc,10);
668: -- Check that Person_ID(Object_id) exists in per_all_people_f
669: open csr_person_id;
670: fetch csr_person_id into l_person_id;
671: hr_utility.set_location(l_proc,20);
667: hr_utility.set_location('Entering:'||l_proc,10);
668: -- Check that Person_ID(Object_id) exists in per_all_people_f
669: open csr_person_id;
670: fetch csr_person_id into l_person_id;
671: hr_utility.set_location(l_proc,20);
672: if csr_person_id%NOTFOUND then
673: close csr_person_id;
674: fnd_message.set_name('PER','IRC_412008_BAD_PARTY_PERSON_ID');
675: fnd_message.raise_error;
674: fnd_message.set_name('PER','IRC_412008_BAD_PARTY_PERSON_ID');
675: fnd_message.raise_error;
676: end if;
677: close csr_person_id;
678: hr_utility.set_location(' Leaving:'||l_proc,30);
679: exception
680: when app_exception.application_exception then
681: if hr_multi_message.exception_add
682: (p_associated_column1 =>
681: if hr_multi_message.exception_add
682: (p_associated_column1 =>
683: 'IRC_REFERRAL_INFO.OBJECT_ID'
684: ) then
685: hr_utility.set_location(' Leaving:'||l_proc,40);
686: raise;
687: end if;
688: hr_utility.set_location(' Leaving:'||l_proc,50);
689: end chk_person_id;
684: ) then
685: hr_utility.set_location(' Leaving:'||l_proc,40);
686: raise;
687: end if;
688: hr_utility.set_location(' Leaving:'||l_proc,50);
689: end chk_person_id;
690: --
691: -- ----------------------------------------------------------------------------
692: -- |-----------------------------< chk_party_id >----------------------------|
725: and trunc(p_effective_date) between ppf.effective_start_date
726: and ppf.effective_end_date;
727: --
728: begin
729: hr_utility.set_location('Entering:'||l_proc,10);
730: -- Check that Party_ID(Object_id) exists in per_all_people_f
731: open csr_party_id;
732: fetch csr_party_id into l_party_id;
733: hr_utility.set_location(l_proc,20);
729: hr_utility.set_location('Entering:'||l_proc,10);
730: -- Check that Party_ID(Object_id) exists in per_all_people_f
731: open csr_party_id;
732: fetch csr_party_id into l_party_id;
733: hr_utility.set_location(l_proc,20);
734: if csr_party_id%NOTFOUND then
735: close csr_party_id;
736: fnd_message.set_name('PER','IRC_412008_BAD_PARTY_PERSON_ID');
737: fnd_message.raise_error;
736: fnd_message.set_name('PER','IRC_412008_BAD_PARTY_PERSON_ID');
737: fnd_message.raise_error;
738: end if;
739: close csr_party_id;
740: hr_utility.set_location(' Leaving:'||l_proc,30);
741: exception
742: when app_exception.application_exception then
743: if hr_multi_message.exception_add
744: (p_associated_column1 =>
743: if hr_multi_message.exception_add
744: (p_associated_column1 =>
745: 'IRC_REFERRAL_INFO.OBJECT_ID'
746: ) then
747: hr_utility.set_location(' Leaving:'||l_proc,40);
748: raise;
749: end if;
750: hr_utility.set_location(' Leaving:'||l_proc,50);
751: end chk_party_id;
746: ) then
747: hr_utility.set_location(' Leaving:'||l_proc,40);
748: raise;
749: end if;
750: hr_utility.set_location(' Leaving:'||l_proc,50);
751: end chk_party_id;
752: --
753: -- ----------------------------------------------------------------------------
754: -- |---------------------------< chk_assignment_id >--------------------------|
791: and effective_end_date;
792: --
793: begin
794: --
795: hr_utility.set_location('Entering:'|| l_proc, 10);
796: --
797: open csr_applicant_assignment;
798: fetch csr_applicant_assignment Into l_assignment_id;
799: --
796: --
797: open csr_applicant_assignment;
798: fetch csr_applicant_assignment Into l_assignment_id;
799: --
800: hr_utility.set_location(l_proc,20);
801: --
802: if csr_applicant_assignment%notfound then
803: close csr_applicant_assignment;
804: fnd_message.set_name ('PER', 'IRC_412006_ASG_NOT_APPL');
806: end if;
807: --
808: close csr_applicant_assignment;
809: --
810: hr_utility.set_location(' Leaving:'|| l_proc, 30);
811: --
812: exception
813: when app_exception.application_exception then
814: if hr_multi_message.exception_add
813: when app_exception.application_exception then
814: if hr_multi_message.exception_add
815: (p_associated_column1 => 'IRC_ASSIGNMENT_STATUSES.ASSIGNMENT_ID'
816: ) then
817: hr_utility.set_location(' Leaving:'|| l_proc, 40);
818: raise;
819: end if;
820: hr_utility.set_location(' Leaving:'|| l_proc, 50);
821: --
816: ) then
817: hr_utility.set_location(' Leaving:'|| l_proc, 40);
818: raise;
819: end if;
820: hr_utility.set_location(' Leaving:'|| l_proc, 50);
821: --
822: end chk_assignment_id;
823: --
824: -- ----------------------------------------------------------------------------
835: l_proc varchar2(72) := g_package||'insert_validate';
836: --
837: Begin
838: --
839: hr_utility.set_location('Entering:'||l_proc, 5);
840: --
841: irc_irf_bus.chk_object(p_rec => p_rec
842: ,p_effective_date => p_effective_date
843: );
841: irc_irf_bus.chk_object(p_rec => p_rec
842: ,p_effective_date => p_effective_date
843: );
844: --
845: hr_utility.set_location(l_proc, 15);
846: --
847: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria1
848: ,p_source_criteria_index => 1
849: ,p_effective_date => p_effective_date);
847: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria1
848: ,p_source_criteria_index => 1
849: ,p_effective_date => p_effective_date);
850: --
851: hr_utility.set_location(l_proc, 20);
852: --
853: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria2
854: ,p_source_criteria_index => 2
855: ,p_effective_date => p_effective_date);
853: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria2
854: ,p_source_criteria_index => 2
855: ,p_effective_date => p_effective_date);
856: --
857: hr_utility.set_location(l_proc, 25);
858: --
859: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria3
860: ,p_source_criteria_index => 3
861: ,p_effective_date => p_effective_date);
859: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria3
860: ,p_source_criteria_index => 3
861: ,p_effective_date => p_effective_date);
862: --
863: hr_utility.set_location(l_proc, 30);
864: --
865: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria4
866: ,p_source_criteria_index => 4
867: ,p_effective_date => p_effective_date);
865: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria4
866: ,p_source_criteria_index => 4
867: ,p_effective_date => p_effective_date);
868: --
869: hr_utility.set_location(l_proc, 35);
870: --
871: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria5
872: ,p_source_criteria_index => 5
873: ,p_effective_date => p_effective_date);
871: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria5
872: ,p_source_criteria_index => 5
873: ,p_effective_date => p_effective_date);
874: --
875: hr_utility.set_location(l_proc, 40);
876: --
877: irc_irf_bus.chk_source_type(p_source_type => p_rec.source_type
878: ,p_effective_date => p_effective_date);
879: --
876: --
877: irc_irf_bus.chk_source_type(p_source_type => p_rec.source_type
878: ,p_effective_date => p_effective_date);
879: --
880: hr_utility.set_location(l_proc, 45);
881: --
882: irc_irf_bus.chk_object_created_by(p_rec => p_rec
883: ,p_effective_date => p_effective_date);
884: --
881: --
882: irc_irf_bus.chk_object_created_by(p_rec => p_rec
883: ,p_effective_date => p_effective_date);
884: --
885: hr_utility.set_location(l_proc, 50);
886: --
887: if p_rec.source_person_id is not null then
888: irc_irf_bus.chk_person_id(p_person_id => p_rec.source_person_id
889: ,p_effective_date => p_effective_date);
888: irc_irf_bus.chk_person_id(p_person_id => p_rec.source_person_id
889: ,p_effective_date => p_effective_date);
890: end if;
891: --
892: hr_utility.set_location(l_proc, 55);
893: --
894: --irc_irf_bus.chk_ddf(p_rec);
895: --
896: hr_utility.set_location(l_proc, 60);
892: hr_utility.set_location(l_proc, 55);
893: --
894: --irc_irf_bus.chk_ddf(p_rec);
895: --
896: hr_utility.set_location(l_proc, 60);
897: --
898: --irc_irf_bus.chk_df(p_rec);
899: --
900: hr_utility.set_location(' Leaving:'||l_proc, 65);
896: hr_utility.set_location(l_proc, 60);
897: --
898: --irc_irf_bus.chk_df(p_rec);
899: --
900: hr_utility.set_location(' Leaving:'||l_proc, 65);
901: End insert_validate;
902: --
903: -- ----------------------------------------------------------------------------
904: -- |---------------------------< update_validate >----------------------------|
914: l_proc varchar2(72) := g_package||'update_validate';
915: --
916: Begin
917: --
918: hr_utility.set_location(l_proc, 10);
919: --
920: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria1
921: ,p_source_criteria_index => 1
922: ,p_effective_date => p_effective_date);
920: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria1
921: ,p_source_criteria_index => 1
922: ,p_effective_date => p_effective_date);
923: --
924: hr_utility.set_location(l_proc, 20);
925: --
926: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria2
927: ,p_source_criteria_index => 2
928: ,p_effective_date => p_effective_date);
926: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria2
927: ,p_source_criteria_index => 2
928: ,p_effective_date => p_effective_date);
929: --
930: hr_utility.set_location(l_proc, 25);
931: --
932: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria3
933: ,p_source_criteria_index => 3
934: ,p_effective_date => p_effective_date);
932: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria3
933: ,p_source_criteria_index => 3
934: ,p_effective_date => p_effective_date);
935: --
936: hr_utility.set_location(l_proc, 30);
937: --
938: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria4
939: ,p_source_criteria_index => 4
940: ,p_effective_date => p_effective_date);
938: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria4
939: ,p_source_criteria_index => 4
940: ,p_effective_date => p_effective_date);
941: --
942: hr_utility.set_location(l_proc, 35);
943: --
944: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria5
945: ,p_source_criteria_index => 5
946: ,p_effective_date => p_effective_date);
944: irc_irf_bus.chk_source_criteria(p_source_criteria => p_rec.source_criteria5
945: ,p_source_criteria_index => 5
946: ,p_effective_date => p_effective_date);
947: --
948: hr_utility.set_location(l_proc, 40);
949: --
950: irc_irf_bus.chk_source_type(p_source_type => p_rec.source_type
951: ,p_effective_date => p_effective_date);
952: --
949: --
950: irc_irf_bus.chk_source_type(p_source_type => p_rec.source_type
951: ,p_effective_date => p_effective_date);
952: --
953: hr_utility.set_location(l_proc, 45);
954: --
955: irc_irf_bus.chk_object_created_by(p_rec => p_rec
956: ,p_effective_date => p_effective_date);
957: --
954: --
955: irc_irf_bus.chk_object_created_by(p_rec => p_rec
956: ,p_effective_date => p_effective_date);
957: --
958: hr_utility.set_location(l_proc, 50);
959: --
960: if p_rec.source_person_id is not null then
961: irc_irf_bus.chk_person_id(p_person_id => p_rec.source_person_id
962: ,p_effective_date => p_effective_date);
961: irc_irf_bus.chk_person_id(p_person_id => p_rec.source_person_id
962: ,p_effective_date => p_effective_date);
963: end if;
964: --
965: hr_utility.set_location(l_proc, 55);
966: --
967: -- Call the datetrack update integrity operation
968: --
969: dt_update_validate
971: ,p_validation_start_date => p_validation_start_date
972: ,p_validation_end_date => p_validation_end_date
973: );
974: --
975: hr_utility.set_location(l_proc, 60);
976: --
977: chk_non_updateable_args
978: (p_effective_date => p_effective_date
979: ,p_rec => p_rec
978: (p_effective_date => p_effective_date
979: ,p_rec => p_rec
980: );
981: --
982: hr_utility.set_location(l_proc, 65);
983: --
984: --irc_irf_bus.chk_ddf(p_rec);
985: --
986: hr_utility.set_location(l_proc, 70);
982: hr_utility.set_location(l_proc, 65);
983: --
984: --irc_irf_bus.chk_ddf(p_rec);
985: --
986: hr_utility.set_location(l_proc, 70);
987: --
988: --irc_irf_bus.chk_df(p_rec);
989: --
990: hr_utility.set_location(' Leaving:'||l_proc, 75);
986: hr_utility.set_location(l_proc, 70);
987: --
988: --irc_irf_bus.chk_df(p_rec);
989: --
990: hr_utility.set_location(' Leaving:'||l_proc, 75);
991: End update_validate;
992: --
993: end irc_irf_bus;