81: -- An application error is raised and processing is terminated if the
82: -- name is not unique within BG.
83: --
84: Procedure chk_name
85: (p_name in per_assessment_types.name%TYPE,
86: p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE,
87: p_type in per_assessment_types.type%TYPE,
88: p_business_group_id in per_assessment_types.business_group_id%TYPE,
89: p_object_version_number in per_assessment_types.object_version_number%TYPE
82: -- name is not unique within BG.
83: --
84: Procedure chk_name
85: (p_name in per_assessment_types.name%TYPE,
86: p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE,
87: p_type in per_assessment_types.type%TYPE,
88: p_business_group_id in per_assessment_types.business_group_id%TYPE,
89: p_object_version_number in per_assessment_types.object_version_number%TYPE
90: )
83: --
84: Procedure chk_name
85: (p_name in per_assessment_types.name%TYPE,
86: p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE,
87: p_type in per_assessment_types.type%TYPE,
88: p_business_group_id in per_assessment_types.business_group_id%TYPE,
89: p_object_version_number in per_assessment_types.object_version_number%TYPE
90: )
91: is
84: Procedure chk_name
85: (p_name in per_assessment_types.name%TYPE,
86: p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE,
87: p_type in per_assessment_types.type%TYPE,
88: p_business_group_id in per_assessment_types.business_group_id%TYPE,
89: p_object_version_number in per_assessment_types.object_version_number%TYPE
90: )
91: is
92: --
85: (p_name in per_assessment_types.name%TYPE,
86: p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE,
87: p_type in per_assessment_types.type%TYPE,
88: p_business_group_id in per_assessment_types.business_group_id%TYPE,
89: p_object_version_number in per_assessment_types.object_version_number%TYPE
90: )
91: is
92: --
93: l_proc varchar2(72) := g_package||'chk_name';
90: )
91: is
92: --
93: l_proc varchar2(72) := g_package||'chk_name';
94: l_name per_assessment_types.name%TYPE;
95: l_exists per_assessment_types.business_group_id%TYPE;
96: l_api_updating boolean;
97: --
98: -- Cursor to get rows which have duplicate names
91: is
92: --
93: l_proc varchar2(72) := g_package||'chk_name';
94: l_name per_assessment_types.name%TYPE;
95: l_exists per_assessment_types.business_group_id%TYPE;
96: l_api_updating boolean;
97: --
98: -- Cursor to get rows which have duplicate names
99: --
97: --
98: -- Cursor to get rows which have duplicate names
99: --
100: cursor csr_name is
101: select business_group_id from per_assessment_types
102: where ((p_assessment_type_id is NULL)
103: or (p_assessment_type_id <> assessment_type_id))
104: and name = p_name -- there is a duplicate name.
105: and nvl(type , 'COMPETENCE') = nvl(p_type , 'COMPETENCE')
104: and name = p_name -- there is a duplicate name.
105: and nvl(type , 'COMPETENCE') = nvl(p_type , 'COMPETENCE')
106: and p_business_group_id is null
107: union
108: select business_group_id from per_assessment_types
109: where ((p_assessment_type_id is NULL)
110: or (p_assessment_type_id <> assessment_type_id))
111: and name = p_name -- there is a duplicate name.
112: and nvl(type , 'COMPETENCE') = nvl(p_type , 'COMPETENCE')
204: -- Access Status:
205: -- Internal Table Handler Use Only.
206: --
207: Procedure chk_disp_assess_comments
208: (p_display_assessment_comments in per_assessment_types.display_assessment_comments%TYPE
209:
210: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
211: ,p_effective_date in date
212: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
206: --
207: Procedure chk_disp_assess_comments
208: (p_display_assessment_comments in per_assessment_types.display_assessment_comments%TYPE
209:
210: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
211: ,p_effective_date in date
212: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
213: )
214: is
208: (p_display_assessment_comments in per_assessment_types.display_assessment_comments%TYPE
209:
210: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
211: ,p_effective_date in date
212: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
213: )
214: is
215: --
216: l_proc varchar2(72):=g_package||'chk_display_assessment_comments';
293: -- Access Status:
294: -- Internal Table Handler Use Only.
295: --
296: Procedure chk_date_from_to
297: (p_date_from in per_assessment_types.date_from%TYPE
298: ,p_date_to in per_assessment_types.date_to%TYPE
299: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
300: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
301: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
294: -- Internal Table Handler Use Only.
295: --
296: Procedure chk_date_from_to
297: (p_date_from in per_assessment_types.date_from%TYPE
298: ,p_date_to in per_assessment_types.date_to%TYPE
299: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
300: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
301: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
302: )
295: --
296: Procedure chk_date_from_to
297: (p_date_from in per_assessment_types.date_from%TYPE
298: ,p_date_to in per_assessment_types.date_to%TYPE
299: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
300: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
301: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
302: )
303: is
296: Procedure chk_date_from_to
297: (p_date_from in per_assessment_types.date_from%TYPE
298: ,p_date_to in per_assessment_types.date_to%TYPE
299: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
300: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
301: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
302: )
303: is
304: --
297: (p_date_from in per_assessment_types.date_from%TYPE
298: ,p_date_to in per_assessment_types.date_to%TYPE
299: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
300: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
301: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
302: )
303: is
304: --
305: l_proc varchar2(72):=g_package||'chk_date_from_to';
414: -- Access Status:
415: -- Internal Table Handler Use Only.
416: --
417: Procedure chk_assessment_classification
418: (p_assessment_classification in per_assessment_types.assessment_classification%TYPE
419: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
420: ,p_effective_date in date
421: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
422: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
415: -- Internal Table Handler Use Only.
416: --
417: Procedure chk_assessment_classification
418: (p_assessment_classification in per_assessment_types.assessment_classification%TYPE
419: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
420: ,p_effective_date in date
421: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
422: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
423: )
417: Procedure chk_assessment_classification
418: (p_assessment_classification in per_assessment_types.assessment_classification%TYPE
419: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
420: ,p_effective_date in date
421: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
422: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
423: )
424: is
425: --
418: (p_assessment_classification in per_assessment_types.assessment_classification%TYPE
419: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
420: ,p_effective_date in date
421: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
422: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
423: )
424: is
425: --
426: -- Define the cursor to check if the assessment_type is used in an assessment
530: -- Access Status:
531: -- Internal table handler use only.
532: --
533: Procedure chk_weighting_scale_id
534: (p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
535: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
536: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
537: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
538: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
531: -- Internal table handler use only.
532: --
533: Procedure chk_weighting_scale_id
534: (p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
535: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
536: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
537: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
538: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
539: )
532: --
533: Procedure chk_weighting_scale_id
534: (p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
535: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
536: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
537: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
538: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
539: )
540: is
533: Procedure chk_weighting_scale_id
534: (p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
535: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
536: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
537: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
538: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
539: )
540: is
541: --
534: (p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
535: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
536: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
537: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
538: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
539: )
540: is
541: --
542: -- Define the cursor the get the type and bg from per_rating_scales
637: -- dbms_output.put_line('and weighting_scale_id doesnt exist in other tab');
638: hr_utility.trace('and weighting_scale_id doesnt exist in other tab');
639: hr_utility.set_location(l_proc,20);
640: per_ast_shd.constraint_error
641: (p_constraint_name => 'PER_ASSESSMENT_TYPES_FK3');
642: --
643: --
644: -- Check if the weighting_scale_id is of the wrong type
645: -- ie. if the type of the weighing_scale in per_rating_scales is not equal
653: -- is concerned the value doesn't exist even if it does but is of a
654: -- different type.
655: --
656: per_ast_shd.constraint_error
657: (p_constraint_name => 'PER_ASSESSMENT_TYPES_FK3');
658: --
659: end if;
660: --
661: end if;
680: -- Access Status:
681: -- Internal table handler use only
682: --
683: Procedure chk_weighting_scale_comment
684: (p_weighting_scale_comment in per_assessment_types.weighting_scale_comment%TYPE
685:
686: ,p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
687: )
688: is
682: --
683: Procedure chk_weighting_scale_comment
684: (p_weighting_scale_comment in per_assessment_types.weighting_scale_comment%TYPE
685:
686: ,p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
687: )
688: is
689: l_proc varchar2(72):=g_package||'chk_weighting_scale_comment';
690: begin
732: -- Access Status:
733: -- Internal Table Handler Use Only.
734: --
735: Procedure chk_rating_scale_id
736: (p_rating_scale_id in per_assessment_types.rating_scale_id%TYPE
737: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
738: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
739: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
740: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
733: -- Internal Table Handler Use Only.
734: --
735: Procedure chk_rating_scale_id
736: (p_rating_scale_id in per_assessment_types.rating_scale_id%TYPE
737: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
738: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
739: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
740: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
741: ,p_weighting_classification in per_assessment_types.weighting_classification%TYPE
734: --
735: Procedure chk_rating_scale_id
736: (p_rating_scale_id in per_assessment_types.rating_scale_id%TYPE
737: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
738: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
739: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
740: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
741: ,p_weighting_classification in per_assessment_types.weighting_classification%TYPE
742: )
735: Procedure chk_rating_scale_id
736: (p_rating_scale_id in per_assessment_types.rating_scale_id%TYPE
737: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
738: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
739: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
740: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
741: ,p_weighting_classification in per_assessment_types.weighting_classification%TYPE
742: )
743: is
736: (p_rating_scale_id in per_assessment_types.rating_scale_id%TYPE
737: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
738: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
739: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
740: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
741: ,p_weighting_classification in per_assessment_types.weighting_classification%TYPE
742: )
743: is
744: -- Define the cursor to get the info. from per_rating_scales
737: ,p_business_group_id in per_assessment_types.business_group_id%TYPE
738: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
739: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
740: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
741: ,p_weighting_classification in per_assessment_types.weighting_classification%TYPE
742: )
743: is
744: -- Define the cursor to get the info. from per_rating_scales
745: -- ngundura changes done for pa requirements
851: -- dbms_output.put_line('chk_rating_scale_id:Rating scale not found');
852: hr_utility.trace('chk_rating_scale_id:Rating scale not found');
853: hr_utility.set_location(l_proc,20);
854: per_ast_shd.constraint_error
855: (p_constraint_name => 'PER_ASSESSMENT_TYPES_FK2');
856: --
857: -- Check if the rating_scale_id is of the wrong type.
858: -- ie if the type of the rating_scale in per_rating_scales
859: -- is not equal to PERFORMANCE, then error.
873: -- not exist.
874: --
875:
876: per_ast_shd.constraint_error
877: (p_constraint_name => 'PER_ASSESSMENT_TYPES_FK2');
878:
879: --
880: end if;
881: --
914: -- Access Status:
915: -- Internal table handler use only
916: --
917: Procedure chk_rating_scale_comment
918: (p_rating_scale_comment in per_assessment_types.rating_scale_comment%TYPE
919: ,p_rating_scale_id in per_assessment_types.rating_scale_id%TYPE
920: )
921: is
922: l_proc varchar2(72):=g_package||'chk_rating_scale_comment';
915: -- Internal table handler use only
916: --
917: Procedure chk_rating_scale_comment
918: (p_rating_scale_comment in per_assessment_types.rating_scale_comment%TYPE
919: ,p_rating_scale_id in per_assessment_types.rating_scale_id%TYPE
920: )
921: is
922: l_proc varchar2(72):=g_package||'chk_rating_scale_comment';
923: begin
957: -- Access Status:
958: -- Internal Table Handler Use Only.
959: --
960: Procedure chk_weighting_classification
961: (p_weighting_classification in per_assessment_types.weighting_classification%TYPE
962:
963: ,p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
964: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
965:
959: --
960: Procedure chk_weighting_classification
961: (p_weighting_classification in per_assessment_types.weighting_classification%TYPE
962:
963: ,p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
964: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
965:
966: )
967: is
960: Procedure chk_weighting_classification
961: (p_weighting_classification in per_assessment_types.weighting_classification%TYPE
962:
963: ,p_weighting_scale_id in per_assessment_types.weighting_scale_id%TYPE
964: ,p_assessment_classification in per_assessment_types.assessment_classification%TYPE
965:
966: )
967: is
968: --
1044: -- Post Failure
1045: -- Processing halts.
1046: --
1047: Procedure chk_line_score_formula
1048: (p_line_score_formula in per_assessment_types.line_score_formula%TYPE
1049: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1050: ,p_effective_date in date
1051: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1052: )
1045: -- Processing halts.
1046: --
1047: Procedure chk_line_score_formula
1048: (p_line_score_formula in per_assessment_types.line_score_formula%TYPE
1049: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1050: ,p_effective_date in date
1051: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1052: )
1053: is
1047: Procedure chk_line_score_formula
1048: (p_line_score_formula in per_assessment_types.line_score_formula%TYPE
1049: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1050: ,p_effective_date in date
1051: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1052: )
1053: is
1054: --
1055: l_proc varchar2(72) := g_package||'chk_line_score_formula';
1098: -- Post Failure
1099: -- Processing halts.
1100: --
1101: Procedure chk_total_score_formula
1102: (p_total_score_formula in per_assessment_types.total_score_formula%TYPE
1103: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1104: ,p_effective_date in date
1105: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1106: )
1099: -- Processing halts.
1100: --
1101: Procedure chk_total_score_formula
1102: (p_total_score_formula in per_assessment_types.total_score_formula%TYPE
1103: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1104: ,p_effective_date in date
1105: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1106: )
1107: is
1101: Procedure chk_total_score_formula
1102: (p_total_score_formula in per_assessment_types.total_score_formula%TYPE
1103: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1104: ,p_effective_date in date
1105: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1106: )
1107: is
1108: --
1109: l_proc varchar2(72) := g_package||'chk_total_score_formula';
1177: -- Post Failure
1178: -- Processing halts.
1179: --
1180: Procedure chk_type
1181: (p_type in per_assessment_types.type%TYPE
1182: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1183: ,p_effective_date in date
1184: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1185: )
1178: -- Processing halts.
1179: --
1180: Procedure chk_type
1181: (p_type in per_assessment_types.type%TYPE
1182: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1183: ,p_effective_date in date
1184: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1185: )
1186: is
1180: Procedure chk_type
1181: (p_type in per_assessment_types.type%TYPE
1182: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1183: ,p_effective_date in date
1184: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1185: )
1186: is
1187: --
1188: l_proc varchar2(72) := g_package||'chk_type';
1258: -- Access Status
1259: -- Internal processing only
1260: --
1261: Procedure chk_assessment_type_used
1262: (p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1263: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1264: ) is
1265: --
1266: l_proc varchar2(72) := g_package || 'chk_assessment_type_used';
1259: -- Internal processing only
1260: --
1261: Procedure chk_assessment_type_used
1262: (p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1263: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1264: ) is
1265: --
1266: l_proc varchar2(72) := g_package || 'chk_assessment_type_used';
1267: l_exists varchar2(1);
1323: --
1324:
1325: Procedure chk_available_flag
1326: (
1327: p_available_flag in per_assessment_types.available_flag%TYPE
1328: ,p_effective_date in date
1329: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1330: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1331: )
1325: Procedure chk_available_flag
1326: (
1327: p_available_flag in per_assessment_types.available_flag%TYPE
1328: ,p_effective_date in date
1329: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1330: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1331: )
1332: is
1333: --
1326: (
1327: p_available_flag in per_assessment_types.available_flag%TYPE
1328: ,p_effective_date in date
1329: ,p_object_version_number in per_assessment_types.object_version_number%TYPE
1330: ,p_assessment_type_id in per_assessment_types.assessment_type_id%TYPE
1331: )
1332: is
1333: --
1334: l_proc varchar2(72):=g_package||'chk_available_flag';
1472: -- b) During insert.
1473: --
1474: hr_dflex_utility.ins_or_upd_descflex_attribs
1475: (p_appl_short_name => 'PER'
1476: ,p_descflex_name => 'PER_ASSESSMENT_TYPES'
1477: ,p_attribute_category => p_rec.attribute_category
1478: ,p_attribute1_name => 'ATTRIBUTE1'
1479: ,p_attribute1_value => p_rec.attribute1
1480: ,p_attribute2_name => 'ATTRIBUTE2'
2032: --
2033: cursor csr_leg_code is
2034: select legislation_code
2035: from per_business_groups pbg,
2036: per_assessment_types pat
2037: where pat.assessment_type_id = p_assessment_type_id
2038: and pbg.business_group_id = pat.business_group_id;
2039:
2040: l_proc varchar2(72) := g_package||'return_legislation_code';