103: --
104: --
105:
106: procedure not_used_chk_name
107: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
108: ,p_business_group_id in per_rating_scales.business_group_id%TYPE
109: ,p_name in per_rating_scales.name%TYPE
110: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
111: )
104: --
105:
106: procedure not_used_chk_name
107: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
108: ,p_business_group_id in per_rating_scales.business_group_id%TYPE
109: ,p_name in per_rating_scales.name%TYPE
110: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
111: )
112: is
105:
106: procedure not_used_chk_name
107: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
108: ,p_business_group_id in per_rating_scales.business_group_id%TYPE
109: ,p_name in per_rating_scales.name%TYPE
110: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
111: )
112: is
113: --
106: procedure not_used_chk_name
107: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
108: ,p_business_group_id in per_rating_scales.business_group_id%TYPE
109: ,p_name in per_rating_scales.name%TYPE
110: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
111: )
112: is
113: --
114: l_exists per_rating_scales.business_group_id%TYPE;
110: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
111: )
112: is
113: --
114: l_exists per_rating_scales.business_group_id%TYPE;
115: l_api_updating boolean;
116: l_proc varchar2(72) := g_package||'not_used_chk_name';
117: l_business_group_id number(15);
118: --
120: -- Cursor to check name is unique within business group
121: -- ngundura changes done for pa requirements.
122: cursor csr_name_exists is
123: select business_group_id
124: from per_rating_scales
125: where ( (p_rating_scale_id is null)
126: or(rating_scale_id <> p_rating_scale_id)
127: )
128: and name = p_name
128: and name = p_name
129: and p_business_group_id is null
130: UNION
131: select business_group_id
132: from per_rating_scales
133: where ( (p_rating_scale_id is null)
134: or(rating_scale_id <> p_rating_scale_id)
135: )
136: and name = p_name
227: -- Access status
228: -- Internal Table Handler Use Only
229: --
230: procedure chk_type
231: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
232: ,p_type in per_rating_scales.type%TYPE
233: ,p_effective_date in date
234: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
235: ) is
228: -- Internal Table Handler Use Only
229: --
230: procedure chk_type
231: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
232: ,p_type in per_rating_scales.type%TYPE
233: ,p_effective_date in date
234: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
235: ) is
236: --
230: procedure chk_type
231: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
232: ,p_type in per_rating_scales.type%TYPE
233: ,p_effective_date in date
234: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
235: ) is
236: --
237: l_proc varchar2(72) := g_package||'chk_not_applicable_flag';
238: l_api_updating boolean;
318: -- Access status
319: -- Internal Table Handler Use Only
320: --
321: procedure chk_default_flag
322: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
323: ,p_business_group_id in per_rating_scales.business_group_id%TYPE default null
324: ,p_type in per_rating_scales.type%TYPE
325: ,p_default_flag in per_rating_scales.default_flag%TYPE
326: ,p_effective_date in date
319: -- Internal Table Handler Use Only
320: --
321: procedure chk_default_flag
322: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
323: ,p_business_group_id in per_rating_scales.business_group_id%TYPE default null
324: ,p_type in per_rating_scales.type%TYPE
325: ,p_default_flag in per_rating_scales.default_flag%TYPE
326: ,p_effective_date in date
327: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
320: --
321: procedure chk_default_flag
322: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
323: ,p_business_group_id in per_rating_scales.business_group_id%TYPE default null
324: ,p_type in per_rating_scales.type%TYPE
325: ,p_default_flag in per_rating_scales.default_flag%TYPE
326: ,p_effective_date in date
327: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
328: ) is
321: procedure chk_default_flag
322: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
323: ,p_business_group_id in per_rating_scales.business_group_id%TYPE default null
324: ,p_type in per_rating_scales.type%TYPE
325: ,p_default_flag in per_rating_scales.default_flag%TYPE
326: ,p_effective_date in date
327: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
328: ) is
329: --
323: ,p_business_group_id in per_rating_scales.business_group_id%TYPE default null
324: ,p_type in per_rating_scales.type%TYPE
325: ,p_default_flag in per_rating_scales.default_flag%TYPE
326: ,p_effective_date in date
327: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
328: ) is
329: --
330: l_proc varchar2(72) := g_package||'chk_default_flag';
331: l_api_updating boolean;
335: -- Business Group
336: -- ngundura changes done for pa requirements..
337: cursor csr_get_default_flag is
338: select null
339: from per_rating_scales
340: where ( (p_rating_scale_id is null)
341: or(rating_scale_id <> p_rating_scale_id)
342: )
343: and default_flag = 'Y'
345: and business_group_id is null
346: and p_business_group_id is null
347: UNION
348: select null
349: from per_rating_scales
350: where ( (p_rating_scale_id is null)
351: or(rating_scale_id <> p_rating_scale_id)
352: )
353: and business_group_id = p_business_group_id
457: -- referenced by a competence element
458: --
459: --
460: procedure chk_rating_scale_delete
461: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
462: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
463: ) is
464: --
465: l_proc varchar2(72) := g_package||' chk_rating_scale_delete';
458: --
459: --
460: procedure chk_rating_scale_delete
461: (p_rating_scale_id in per_rating_scales.rating_scale_id%TYPE
462: ,p_object_version_number in per_rating_scales.object_version_number%TYPE
463: ) is
464: --
465: l_proc varchar2(72) := g_package||' chk_rating_scale_delete';
466: l_exists varchar2(1);
650: -- b) During insert.
651: --
652: hr_dflex_utility.ins_or_upd_descflex_attribs
653: (p_appl_short_name => 'PER'
654: ,p_descflex_name => 'PER_RATING_SCALES'
655: ,p_attribute_category => p_rec.attribute_category
656: ,p_attribute1_name => 'ATTRIBUTE1'
657: ,p_attribute1_value => p_rec.attribute1
658: ,p_attribute2_name => 'ATTRIBUTE2'
895: --
896: cursor csr_leg_code is
897: select legislation_code
898: from per_business_groups pbg,
899: per_rating_scales prs
900: where prs.rating_scale_id = p_rating_scale_id
901: and pbg.business_group_id = prs.business_group_id;
902:
903: l_proc varchar2(72) := g_package||'return_legislation_code';
913: p_argument => 'rating_scale_id',
914: p_argument_value => p_rating_scale_id );
915: -- ngundura changes done for pa requirements...
916: select 'Y' into l_business_group_flag
917: from per_rating_scales
918: where rating_scale_id = p_rating_scale_id
919: and business_group_id is null;
920: if l_business_group_flag = 'Y' then
921: return null;