104: -- ACCESS STATUS
105: -- Internal Development Use Only
106: --
107: Procedure chk_assessment_type_id
108: (p_assessment_id in per_assessments.assessment_id%TYPE
109: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
110: ,p_assessment_date in per_assessments.assessment_date%TYPE
111: ,p_business_group_id in per_assessments.business_group_id%TYPE
112: ,p_object_version_number in per_assessments.object_version_number%TYPE
105: -- Internal Development Use Only
106: --
107: Procedure chk_assessment_type_id
108: (p_assessment_id in per_assessments.assessment_id%TYPE
109: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
110: ,p_assessment_date in per_assessments.assessment_date%TYPE
111: ,p_business_group_id in per_assessments.business_group_id%TYPE
112: ,p_object_version_number in per_assessments.object_version_number%TYPE
113: )
106: --
107: Procedure chk_assessment_type_id
108: (p_assessment_id in per_assessments.assessment_id%TYPE
109: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
110: ,p_assessment_date in per_assessments.assessment_date%TYPE
111: ,p_business_group_id in per_assessments.business_group_id%TYPE
112: ,p_object_version_number in per_assessments.object_version_number%TYPE
113: )
114: is
107: Procedure chk_assessment_type_id
108: (p_assessment_id in per_assessments.assessment_id%TYPE
109: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
110: ,p_assessment_date in per_assessments.assessment_date%TYPE
111: ,p_business_group_id in per_assessments.business_group_id%TYPE
112: ,p_object_version_number in per_assessments.object_version_number%TYPE
113: )
114: is
115: --
108: (p_assessment_id in per_assessments.assessment_id%TYPE
109: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
110: ,p_assessment_date in per_assessments.assessment_date%TYPE
111: ,p_business_group_id in per_assessments.business_group_id%TYPE
112: ,p_object_version_number in per_assessments.object_version_number%TYPE
113: )
114: is
115: --
116: l_proc varchar2(72):=g_package||'chk_assessment_type_id';
181: --
182: close csr_ast_date_from_date_to;
183: --
184: per_asn_shd.constraint_error
185: (p_constraint_name => 'PER_ASSESSMENTS_FK1');
186: --
187: end if;
188: --
189: close csr_ast_date_from_date_to;
205: EXCEPTION
206:
207: when app_exception.application_exception then
208: if hr_multi_message.exception_add
209: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_ID'
210: ) then
211: raise;
212: end if;
213:
234: -- ACCESS STATUS
235: -- Internal Development Use Only
236: --
237: Procedure chk_assessment_date
238: (p_assessment_date in per_assessments.assessment_date%TYPE
239: ,p_assessment_id in per_assessments.assessment_id%TYPE
240: ,p_object_version_number in per_assessments.object_version_number%TYPE
241: )
242: is
235: -- Internal Development Use Only
236: --
237: Procedure chk_assessment_date
238: (p_assessment_date in per_assessments.assessment_date%TYPE
239: ,p_assessment_id in per_assessments.assessment_id%TYPE
240: ,p_object_version_number in per_assessments.object_version_number%TYPE
241: )
242: is
243: --
236: --
237: Procedure chk_assessment_date
238: (p_assessment_date in per_assessments.assessment_date%TYPE
239: ,p_assessment_id in per_assessments.assessment_id%TYPE
240: ,p_object_version_number in per_assessments.object_version_number%TYPE
241: )
242: is
243: --
244: l_api_updating boolean;
267: EXCEPTION
268:
269: when app_exception.application_exception then
270: if hr_multi_message.exception_add
271: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_DATE'
272: ) then
273: raise;
274: end if;
275:
298: -- ACCESS STATUS
299: -- Internal Development Use Only
300: --
301: Procedure chk_person_id
302: (p_assessment_id in per_assessments.assessment_id%TYPE
303: ,p_person_id in per_assessments.person_id%TYPE
304: ,p_business_group_id in per_assessments.business_group_id%TYPE
305: ,p_assessment_date in per_assessments.assessment_date%TYPE
306: ,p_object_version_number in per_assessments.object_version_number%TYPE
299: -- Internal Development Use Only
300: --
301: Procedure chk_person_id
302: (p_assessment_id in per_assessments.assessment_id%TYPE
303: ,p_person_id in per_assessments.person_id%TYPE
304: ,p_business_group_id in per_assessments.business_group_id%TYPE
305: ,p_assessment_date in per_assessments.assessment_date%TYPE
306: ,p_object_version_number in per_assessments.object_version_number%TYPE
307: )
300: --
301: Procedure chk_person_id
302: (p_assessment_id in per_assessments.assessment_id%TYPE
303: ,p_person_id in per_assessments.person_id%TYPE
304: ,p_business_group_id in per_assessments.business_group_id%TYPE
305: ,p_assessment_date in per_assessments.assessment_date%TYPE
306: ,p_object_version_number in per_assessments.object_version_number%TYPE
307: )
308: is
301: Procedure chk_person_id
302: (p_assessment_id in per_assessments.assessment_id%TYPE
303: ,p_person_id in per_assessments.person_id%TYPE
304: ,p_business_group_id in per_assessments.business_group_id%TYPE
305: ,p_assessment_date in per_assessments.assessment_date%TYPE
306: ,p_object_version_number in per_assessments.object_version_number%TYPE
307: )
308: is
309: --
302: (p_assessment_id in per_assessments.assessment_id%TYPE
303: ,p_person_id in per_assessments.person_id%TYPE
304: ,p_business_group_id in per_assessments.business_group_id%TYPE
305: ,p_assessment_date in per_assessments.assessment_date%TYPE
306: ,p_object_version_number in per_assessments.object_version_number%TYPE
307: )
308: is
309: --
310: l_proc varchar2(72):=g_package||'chk_person_id';
366: EXCEPTION
367:
368: when app_exception.application_exception then
369: if hr_multi_message.exception_add
370: (p_associated_column1 => 'PER_ASSESSMENTS.PERSON_ID'
371: ) then
372: raise;
373: end if;
374:
398: -- ACCESS STATUS
399: -- Internal Development Use Only
400: --
401: Procedure chk_assessor_person_id
402: (p_assessor_person_id in per_assessments.assessor_person_id%TYPE
403: ,p_business_group_id in per_assessments.business_group_id%TYPE
404: ,p_assessment_date in per_assessments.assessment_date%TYPE
405: ,p_assessment_id in per_assessments.assessment_id%TYPE
406: ,p_object_version_number in per_assessments.object_version_number%TYPE
399: -- Internal Development Use Only
400: --
401: Procedure chk_assessor_person_id
402: (p_assessor_person_id in per_assessments.assessor_person_id%TYPE
403: ,p_business_group_id in per_assessments.business_group_id%TYPE
404: ,p_assessment_date in per_assessments.assessment_date%TYPE
405: ,p_assessment_id in per_assessments.assessment_id%TYPE
406: ,p_object_version_number in per_assessments.object_version_number%TYPE
407: )
400: --
401: Procedure chk_assessor_person_id
402: (p_assessor_person_id in per_assessments.assessor_person_id%TYPE
403: ,p_business_group_id in per_assessments.business_group_id%TYPE
404: ,p_assessment_date in per_assessments.assessment_date%TYPE
405: ,p_assessment_id in per_assessments.assessment_id%TYPE
406: ,p_object_version_number in per_assessments.object_version_number%TYPE
407: )
408: is
401: Procedure chk_assessor_person_id
402: (p_assessor_person_id in per_assessments.assessor_person_id%TYPE
403: ,p_business_group_id in per_assessments.business_group_id%TYPE
404: ,p_assessment_date in per_assessments.assessment_date%TYPE
405: ,p_assessment_id in per_assessments.assessment_id%TYPE
406: ,p_object_version_number in per_assessments.object_version_number%TYPE
407: )
408: is
409: --
402: (p_assessor_person_id in per_assessments.assessor_person_id%TYPE
403: ,p_business_group_id in per_assessments.business_group_id%TYPE
404: ,p_assessment_date in per_assessments.assessment_date%TYPE
405: ,p_assessment_id in per_assessments.assessment_id%TYPE
406: ,p_object_version_number in per_assessments.object_version_number%TYPE
407: )
408: is
409: --
410: l_proc varchar2(72):=g_package||'chk_assessor_person_id';
476: EXCEPTION
477:
478: when app_exception.application_exception then
479: if hr_multi_message.exception_add
480: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSOR_PERSON_ID'
481: ) then
482: raise;
483: end if;
484:
507: -- ACCESS STATUS
508: -- Internal Development Use Only
509: --
510: Procedure chk_group_date_id
511: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
512: ,p_group_date in per_assessments.group_date%TYPE
513: ,p_assessment_id in per_assessments.assessment_id%TYPE
514: ,p_object_version_number in per_assessments.object_version_number%TYPE
515: )
508: -- Internal Development Use Only
509: --
510: Procedure chk_group_date_id
511: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
512: ,p_group_date in per_assessments.group_date%TYPE
513: ,p_assessment_id in per_assessments.assessment_id%TYPE
514: ,p_object_version_number in per_assessments.object_version_number%TYPE
515: )
516: is
509: --
510: Procedure chk_group_date_id
511: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
512: ,p_group_date in per_assessments.group_date%TYPE
513: ,p_assessment_id in per_assessments.assessment_id%TYPE
514: ,p_object_version_number in per_assessments.object_version_number%TYPE
515: )
516: is
517: --
510: Procedure chk_group_date_id
511: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
512: ,p_group_date in per_assessments.group_date%TYPE
513: ,p_assessment_id in per_assessments.assessment_id%TYPE
514: ,p_object_version_number in per_assessments.object_version_number%TYPE
515: )
516: is
517: --
518: l_api_updating boolean;
551: EXCEPTION
552:
553: when app_exception.application_exception then
554: if hr_multi_message.exception_add
555: (p_associated_column1 => 'PER_ASSESSMENTS.GROUP_INITIATOR_ID'
556: ,p_associated_column2 => 'PER_ASSESSMENTS.P_GROUP_DATE'
557: ) then
558: raise;
559: end if;
552:
553: when app_exception.application_exception then
554: if hr_multi_message.exception_add
555: (p_associated_column1 => 'PER_ASSESSMENTS.GROUP_INITIATOR_ID'
556: ,p_associated_column2 => 'PER_ASSESSMENTS.P_GROUP_DATE'
557: ) then
558: raise;
559: end if;
560:
585: -- ACCESS STATUS
586: -- Internal Development Use Only
587: --
588: Procedure chk_group_initiator_id
589: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
590: ,p_business_group_id in per_assessments.business_group_id%TYPE
591: ,p_group_date in per_assessments.group_date%TYPE
592: ,p_assessment_id in per_assessments.assessment_id%TYPE
593: ,p_object_version_number in per_assessments.object_version_number%TYPE
586: -- Internal Development Use Only
587: --
588: Procedure chk_group_initiator_id
589: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
590: ,p_business_group_id in per_assessments.business_group_id%TYPE
591: ,p_group_date in per_assessments.group_date%TYPE
592: ,p_assessment_id in per_assessments.assessment_id%TYPE
593: ,p_object_version_number in per_assessments.object_version_number%TYPE
594: )
587: --
588: Procedure chk_group_initiator_id
589: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
590: ,p_business_group_id in per_assessments.business_group_id%TYPE
591: ,p_group_date in per_assessments.group_date%TYPE
592: ,p_assessment_id in per_assessments.assessment_id%TYPE
593: ,p_object_version_number in per_assessments.object_version_number%TYPE
594: )
595: is
588: Procedure chk_group_initiator_id
589: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
590: ,p_business_group_id in per_assessments.business_group_id%TYPE
591: ,p_group_date in per_assessments.group_date%TYPE
592: ,p_assessment_id in per_assessments.assessment_id%TYPE
593: ,p_object_version_number in per_assessments.object_version_number%TYPE
594: )
595: is
596: --
589: (p_group_initiator_id in per_assessments.group_initiator_id%TYPE
590: ,p_business_group_id in per_assessments.business_group_id%TYPE
591: ,p_group_date in per_assessments.group_date%TYPE
592: ,p_assessment_id in per_assessments.assessment_id%TYPE
593: ,p_object_version_number in per_assessments.object_version_number%TYPE
594: )
595: is
596: --
597: l_api_updating boolean;
667: EXCEPTION
668:
669: when app_exception.application_exception then
670: if hr_multi_message.exception_add
671: (p_associated_column1 => 'PER_ASSESSMENTS.GROUP_INITIATOR_ID'
672: ) then
673: raise;
674: end if;
675:
698: -- ACCESS STATUS
699: -- Internal Development Use Only
700: --
701: Procedure chk_status
702: (p_status in per_assessments.status%TYPE
703: ,p_effective_date in date
704: ,p_assessment_id in per_assessments.assessment_id%TYPE
705: ,p_object_version_number in per_assessments.object_version_number%TYPE
706: )
700: --
701: Procedure chk_status
702: (p_status in per_assessments.status%TYPE
703: ,p_effective_date in date
704: ,p_assessment_id in per_assessments.assessment_id%TYPE
705: ,p_object_version_number in per_assessments.object_version_number%TYPE
706: )
707: is
708: --
701: Procedure chk_status
702: (p_status in per_assessments.status%TYPE
703: ,p_effective_date in date
704: ,p_assessment_id in per_assessments.assessment_id%TYPE
705: ,p_object_version_number in per_assessments.object_version_number%TYPE
706: )
707: is
708: --
709: l_api_updating boolean;
741: EXCEPTION
742:
743: when app_exception.application_exception then
744: if hr_multi_message.exception_add
745: (p_associated_column1 => 'PER_ASSESSMENTS.STATUS'
746: ) then
747: raise;
748: end if;
749:
774: -- ACCESS STATUS
775: -- Internal Development Use Only
776: --
777: Procedure chk_assessment_period
778: (p_assessment_period_start_date in per_assessments.assessment_period_start_date%TYPE
779: ,p_assessment_period_end_date in per_assessments.assessment_period_end_date%TYPE
780: ,p_assessment_id in per_assessments.assessment_id%TYPE
781: ,p_object_version_number in per_assessments.object_version_number%TYPE
782: )
775: -- Internal Development Use Only
776: --
777: Procedure chk_assessment_period
778: (p_assessment_period_start_date in per_assessments.assessment_period_start_date%TYPE
779: ,p_assessment_period_end_date in per_assessments.assessment_period_end_date%TYPE
780: ,p_assessment_id in per_assessments.assessment_id%TYPE
781: ,p_object_version_number in per_assessments.object_version_number%TYPE
782: )
783: is
776: --
777: Procedure chk_assessment_period
778: (p_assessment_period_start_date in per_assessments.assessment_period_start_date%TYPE
779: ,p_assessment_period_end_date in per_assessments.assessment_period_end_date%TYPE
780: ,p_assessment_id in per_assessments.assessment_id%TYPE
781: ,p_object_version_number in per_assessments.object_version_number%TYPE
782: )
783: is
784: --
777: Procedure chk_assessment_period
778: (p_assessment_period_start_date in per_assessments.assessment_period_start_date%TYPE
779: ,p_assessment_period_end_date in per_assessments.assessment_period_end_date%TYPE
780: ,p_assessment_id in per_assessments.assessment_id%TYPE
781: ,p_object_version_number in per_assessments.object_version_number%TYPE
782: )
783: is
784: --
785: l_api_updating boolean;
808: --
809: if (p_assessment_period_start_date is NULL) then
810: --
811: per_asn_shd.constraint_error
812: (p_constraint_name => 'PER_ASSESSMENTS_DATE_END_CHK');
813: --
814: end if;
815: --
816: -- The end date has to be >= the start date, else error.
817: --
818: if (p_assessment_period_start_date > p_assessment_period_end_date) then
819: --
820: per_asn_shd.constraint_error
821: (p_constraint_name => 'PER_ASSESSMENTS_DATE_CHK');
822: --
823: end if;
824: --
825: end if;
828: EXCEPTION
829:
830: when app_exception.application_exception then
831: if hr_multi_message.exception_add
832: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_PERIOD_START_DATE'
833: ,p_associated_column2 => 'PER_ASSESSMENTS.ASSESSMENT_PERIOD_END_DATE'
834: ) then
835: raise;
836: end if;
829:
830: when app_exception.application_exception then
831: if hr_multi_message.exception_add
832: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_PERIOD_START_DATE'
833: ,p_associated_column2 => 'PER_ASSESSMENTS.ASSESSMENT_PERIOD_END_DATE'
834: ) then
835: raise;
836: end if;
837:
867: -- ACCESS STATUS
868: -- Internal Development Use Only
869: --
870: Procedure chk_unique_combination
871: (p_assessment_id in per_assessments.assessment_id%TYPE
872: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
873: ,p_assessment_date in per_assessments.assessment_date%TYPE
874: ,p_person_id in per_assessments.person_id%TYPE
875: ,p_assessor_person_id in per_assessments.assessor_person_id%TYPE
868: -- Internal Development Use Only
869: --
870: Procedure chk_unique_combination
871: (p_assessment_id in per_assessments.assessment_id%TYPE
872: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
873: ,p_assessment_date in per_assessments.assessment_date%TYPE
874: ,p_person_id in per_assessments.person_id%TYPE
875: ,p_assessor_person_id in per_assessments.assessor_person_id%TYPE
876: ,p_group_date in per_assessments.group_date%TYPE
869: --
870: Procedure chk_unique_combination
871: (p_assessment_id in per_assessments.assessment_id%TYPE
872: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
873: ,p_assessment_date in per_assessments.assessment_date%TYPE
874: ,p_person_id in per_assessments.person_id%TYPE
875: ,p_assessor_person_id in per_assessments.assessor_person_id%TYPE
876: ,p_group_date in per_assessments.group_date%TYPE
877: ,p_object_version_number in per_assessments.object_version_number%TYPE
870: Procedure chk_unique_combination
871: (p_assessment_id in per_assessments.assessment_id%TYPE
872: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
873: ,p_assessment_date in per_assessments.assessment_date%TYPE
874: ,p_person_id in per_assessments.person_id%TYPE
875: ,p_assessor_person_id in per_assessments.assessor_person_id%TYPE
876: ,p_group_date in per_assessments.group_date%TYPE
877: ,p_object_version_number in per_assessments.object_version_number%TYPE
878: )
871: (p_assessment_id in per_assessments.assessment_id%TYPE
872: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
873: ,p_assessment_date in per_assessments.assessment_date%TYPE
874: ,p_person_id in per_assessments.person_id%TYPE
875: ,p_assessor_person_id in per_assessments.assessor_person_id%TYPE
876: ,p_group_date in per_assessments.group_date%TYPE
877: ,p_object_version_number in per_assessments.object_version_number%TYPE
878: )
879: is
872: ,p_assessment_type_id in per_assessments.assessment_type_id%TYPE
873: ,p_assessment_date in per_assessments.assessment_date%TYPE
874: ,p_person_id in per_assessments.person_id%TYPE
875: ,p_assessor_person_id in per_assessments.assessor_person_id%TYPE
876: ,p_group_date in per_assessments.group_date%TYPE
877: ,p_object_version_number in per_assessments.object_version_number%TYPE
878: )
879: is
880: --
873: ,p_assessment_date in per_assessments.assessment_date%TYPE
874: ,p_person_id in per_assessments.person_id%TYPE
875: ,p_assessor_person_id in per_assessments.assessor_person_id%TYPE
876: ,p_group_date in per_assessments.group_date%TYPE
877: ,p_object_version_number in per_assessments.object_version_number%TYPE
878: )
879: is
880: --
881: l_proc varchar2(72):=g_package||'chk_unique_combination';
883: -- Create a cursor to get duplicate rows
884: --
885: cursor csr_duplicate_rows is
886: select null
887: from per_assessments
888: where assessment_type_id = p_assessment_type_id
889: and assessment_date = p_assessment_date
890: and person_id = p_person_id
891: and assessor_person_id = p_assessor_person_id
912: hr_utility.set_location('Dup.found:'|| l_proc, 3);
913: close csr_duplicate_rows;
914: --
915: per_asn_shd.constraint_error
916: (p_constraint_name => 'PER_ASSESSMENTS_UK1');
917: --
918: end if;
919: close csr_duplicate_rows;
920: */
923: EXCEPTION
924:
925: when app_exception.application_exception then
926: if hr_multi_message.exception_add
927: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_TYPE_ID'
928: ,p_associated_column2 => 'PER_ASSESSMENTS.ASSESSMENT_DATE'
929: ,p_associated_column3 => 'PER_ASSESSMENTS.PERSON_ID'
930: ,p_associated_column4 => 'PER_ASSESSMENTS.ASSESSOR_PERSON_ID'
931: ) then
924:
925: when app_exception.application_exception then
926: if hr_multi_message.exception_add
927: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_TYPE_ID'
928: ,p_associated_column2 => 'PER_ASSESSMENTS.ASSESSMENT_DATE'
929: ,p_associated_column3 => 'PER_ASSESSMENTS.PERSON_ID'
930: ,p_associated_column4 => 'PER_ASSESSMENTS.ASSESSOR_PERSON_ID'
931: ) then
932: raise;
925: when app_exception.application_exception then
926: if hr_multi_message.exception_add
927: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_TYPE_ID'
928: ,p_associated_column2 => 'PER_ASSESSMENTS.ASSESSMENT_DATE'
929: ,p_associated_column3 => 'PER_ASSESSMENTS.PERSON_ID'
930: ,p_associated_column4 => 'PER_ASSESSMENTS.ASSESSOR_PERSON_ID'
931: ) then
932: raise;
933: end if;
926: if hr_multi_message.exception_add
927: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_TYPE_ID'
928: ,p_associated_column2 => 'PER_ASSESSMENTS.ASSESSMENT_DATE'
929: ,p_associated_column3 => 'PER_ASSESSMENTS.PERSON_ID'
930: ,p_associated_column4 => 'PER_ASSESSMENTS.ASSESSOR_PERSON_ID'
931: ) then
932: raise;
933: end if;
934:
954: -- ACCESS STATUS
955: -- Internal Development Use Only
956: --
957: Procedure chk_assessment_group_id
958: (p_assessment_group_id in per_assessments.assessment_group_id%TYPE
959: ,p_business_group_id in per_assessments.business_group_id%TYPE
960: ,p_assessment_id in per_assessments.assessment_id%TYPE
961: ,p_object_version_number in per_assessments.object_version_number%TYPE
962: )
955: -- Internal Development Use Only
956: --
957: Procedure chk_assessment_group_id
958: (p_assessment_group_id in per_assessments.assessment_group_id%TYPE
959: ,p_business_group_id in per_assessments.business_group_id%TYPE
960: ,p_assessment_id in per_assessments.assessment_id%TYPE
961: ,p_object_version_number in per_assessments.object_version_number%TYPE
962: )
963: is
956: --
957: Procedure chk_assessment_group_id
958: (p_assessment_group_id in per_assessments.assessment_group_id%TYPE
959: ,p_business_group_id in per_assessments.business_group_id%TYPE
960: ,p_assessment_id in per_assessments.assessment_id%TYPE
961: ,p_object_version_number in per_assessments.object_version_number%TYPE
962: )
963: is
964:
957: Procedure chk_assessment_group_id
958: (p_assessment_group_id in per_assessments.assessment_group_id%TYPE
959: ,p_business_group_id in per_assessments.business_group_id%TYPE
960: ,p_assessment_id in per_assessments.assessment_id%TYPE
961: ,p_object_version_number in per_assessments.object_version_number%TYPE
962: )
963: is
964:
965: --
1000: if (csr_chk_ass_group_id%notfound) then
1001: close csr_chk_ass_group_id;
1002: --
1003: per_asn_shd.constraint_error
1004: (p_constraint_name => 'PER_ASSESSMENTS_FK3');
1005: --
1006: end if;
1007: close csr_chk_ass_group_id;
1008: end if;
1011: EXCEPTION
1012:
1013: when app_exception.application_exception then
1014: if hr_multi_message.exception_add
1015: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_GROUP_ID'
1016: ) then
1017: raise;
1018: end if;
1019:
1040: -- ACCESS STATUS
1041: -- Internal Development Use Only
1042: --
1043: Procedure chk_appraisal_id
1044: (p_appraisal_id in per_assessments.assessment_group_id%TYPE
1045: ,p_business_group_id in per_assessments.business_group_id%TYPE
1046: ,p_assessment_id in per_assessments.assessment_id%TYPE
1047: ,p_object_version_number in per_assessments.object_version_number%TYPE
1048: )
1041: -- Internal Development Use Only
1042: --
1043: Procedure chk_appraisal_id
1044: (p_appraisal_id in per_assessments.assessment_group_id%TYPE
1045: ,p_business_group_id in per_assessments.business_group_id%TYPE
1046: ,p_assessment_id in per_assessments.assessment_id%TYPE
1047: ,p_object_version_number in per_assessments.object_version_number%TYPE
1048: )
1049: is
1042: --
1043: Procedure chk_appraisal_id
1044: (p_appraisal_id in per_assessments.assessment_group_id%TYPE
1045: ,p_business_group_id in per_assessments.business_group_id%TYPE
1046: ,p_assessment_id in per_assessments.assessment_id%TYPE
1047: ,p_object_version_number in per_assessments.object_version_number%TYPE
1048: )
1049: is
1050:
1043: Procedure chk_appraisal_id
1044: (p_appraisal_id in per_assessments.assessment_group_id%TYPE
1045: ,p_business_group_id in per_assessments.business_group_id%TYPE
1046: ,p_assessment_id in per_assessments.assessment_id%TYPE
1047: ,p_object_version_number in per_assessments.object_version_number%TYPE
1048: )
1049: is
1050:
1051: --
1084: if (csr_chk_appraisal_id%notfound) then
1085: close csr_chk_appraisal_id;
1086: --
1087: per_asn_shd.constraint_error
1088: (p_constraint_name => 'PER_ASSESSMENTS_FK4');
1089: --
1090: end if;
1091: close csr_chk_appraisal_id;
1092: end if;
1095: EXCEPTION
1096:
1097: when app_exception.application_exception then
1098: if hr_multi_message.exception_add
1099: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_GROUP_ID'
1100: ) then
1101: raise;
1102: end if;
1103:
1120: -- Processing fails.
1121: -- ACCESS STATUS
1122: -- Internal Development Use Only
1123: Procedure chk_comp_elements
1124: (p_assessment_id in per_assessments.assessment_id%TYPE
1125: ,p_object_version_number in per_assessments.object_version_number%TYPE
1126: ) is
1127: --
1128: l_proc varchar2(72):=g_package||'chk_comp_elements';
1121: -- ACCESS STATUS
1122: -- Internal Development Use Only
1123: Procedure chk_comp_elements
1124: (p_assessment_id in per_assessments.assessment_id%TYPE
1125: ,p_object_version_number in per_assessments.object_version_number%TYPE
1126: ) is
1127: --
1128: l_proc varchar2(72):=g_package||'chk_comp_elements';
1129: --
1154: EXCEPTION
1155:
1156: when app_exception.application_exception then
1157: if hr_multi_message.exception_add
1158: (p_associated_column1 => 'PER_ASSESSMENTS.ASSESSMENT_ID'
1159: ) then
1160: raise;
1161: end if;
1162: end chk_comp_elements;
1248: -- b) During insert.
1249: --
1250: hr_dflex_utility.ins_or_upd_descflex_attribs
1251: (p_appl_short_name => 'PER'
1252: ,p_descflex_name => 'PER_ASSESSMENTS'
1253: ,p_attribute_category => p_rec.attribute_category
1254: ,p_attribute1_name => 'ATTRIBUTE1'
1255: ,p_attribute1_value => p_rec.attribute1
1256: ,p_attribute2_name => 'ATTRIBUTE2'
1609: --
1610: cursor csr_leg_code is
1611: select legislation_code
1612: from per_business_groups pbg,
1613: per_assessments pas
1614: where pas.assessment_id = p_assessment_id
1615: and pbg.business_group_id = pas.business_group_id;
1616:
1617: l_proc varchar2(72) := g_package||'return_legislation_code';