26: --
27: cursor csr_leg_code is
28: select pbg.legislation_code,abb.business_group_id
29: from per_business_groups_perf pbg
30: , per_absence_attendance_types abb
31: where abb.absence_attendance_type_id = p_absence_attendance_type_id
32: and pbg.business_group_id(+) = abb.business_group_id;
33: --
34: -- Declare local variables
119: -- Internal Row Handler Use Only.
120: --
121: -- ----------------------------------------------------------------------------
122: procedure chk_absence_type_dates
123: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
124: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
125: ,p_date_effective in per_absence_attendance_types.date_effective%type
126: ,p_date_end in per_absence_attendance_types.date_end%type
127: ) is
120: --
121: -- ----------------------------------------------------------------------------
122: procedure chk_absence_type_dates
123: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
124: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
125: ,p_date_effective in per_absence_attendance_types.date_effective%type
126: ,p_date_end in per_absence_attendance_types.date_end%type
127: ) is
128: --
121: -- ----------------------------------------------------------------------------
122: procedure chk_absence_type_dates
123: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
124: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
125: ,p_date_effective in per_absence_attendance_types.date_effective%type
126: ,p_date_end in per_absence_attendance_types.date_end%type
127: ) is
128: --
129: l_proc varchar2(72) := g_package || 'chk_absence_type_dates';
122: procedure chk_absence_type_dates
123: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
124: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
125: ,p_date_effective in per_absence_attendance_types.date_effective%type
126: ,p_date_end in per_absence_attendance_types.date_end%type
127: ) is
128: --
129: l_proc varchar2(72) := g_package || 'chk_absence_type_dates';
130: l_api_updating boolean;
183: --
184: exception
185: when app_exception.application_exception then
186: if hr_multi_message.exception_add
187: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_EFFECTIVE'
188: ,p_associated_column2 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_END'
189: ) then
190: hr_utility.set_location(' Leaving:'||l_proc, 50);
191: raise;
184: exception
185: when app_exception.application_exception then
186: if hr_multi_message.exception_add
187: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_EFFECTIVE'
188: ,p_associated_column2 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_END'
189: ) then
190: hr_utility.set_location(' Leaving:'||l_proc, 50);
191: raise;
192: end if;
226: -- Internal Row Handler Use Only.
227: --
228: -- ----------------------------------------------------------------------------
229: procedure chk_input_value_id
230: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
231: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
232: ,p_date_effective in per_absence_attendance_types.date_effective%type
233: ,p_date_end in out nocopy per_absence_attendance_types.date_end%type
234: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
227: --
228: -- ----------------------------------------------------------------------------
229: procedure chk_input_value_id
230: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
231: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
232: ,p_date_effective in per_absence_attendance_types.date_effective%type
233: ,p_date_end in out nocopy per_absence_attendance_types.date_end%type
234: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
235: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
228: -- ----------------------------------------------------------------------------
229: procedure chk_input_value_id
230: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
231: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
232: ,p_date_effective in per_absence_attendance_types.date_effective%type
233: ,p_date_end in out nocopy per_absence_attendance_types.date_end%type
234: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
235: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
236: ) is
229: procedure chk_input_value_id
230: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
231: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
232: ,p_date_effective in per_absence_attendance_types.date_effective%type
233: ,p_date_end in out nocopy per_absence_attendance_types.date_end%type
234: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
235: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
236: ) is
237: --
230: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
231: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
232: ,p_date_effective in per_absence_attendance_types.date_effective%type
233: ,p_date_end in out nocopy per_absence_attendance_types.date_end%type
234: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
235: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
236: ) is
237: --
238: l_proc varchar2(72) := g_package || 'chk_input_value_id';
231: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
232: ,p_date_effective in per_absence_attendance_types.date_effective%type
233: ,p_date_end in out nocopy per_absence_attendance_types.date_end%type
234: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
235: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
236: ) is
237: --
238: l_proc varchar2(72) := g_package || 'chk_input_value_id';
239: l_api_updating boolean;
286: --
287: hr_utility.set_location('Entering:'||l_proc,10);
288: --
289: if hr_multi_message.no_all_inclusive_error
290: (p_check_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_EFFECTIVE'
291: ,p_check_column2 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_END'
292: ) then
293: --
294: l_api_updating := per_abb_shd.api_updating
287: hr_utility.set_location('Entering:'||l_proc,10);
288: --
289: if hr_multi_message.no_all_inclusive_error
290: (p_check_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_EFFECTIVE'
291: ,p_check_column2 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_END'
292: ) then
293: --
294: l_api_updating := per_abb_shd.api_updating
295: (p_absence_attendance_type_id => p_absence_attendance_type_id
405: --
406: exception
407: when app_exception.application_exception then
408: if hr_multi_message.exception_add
409: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_EFFECTIVE'
410: ,p_associated_column2 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_END'
411: ,p_associated_column3 => 'PER_ABSENCE_ATTENDANCE_TYPES.INPUT_VALUE_ID'
412: ) then
413: hr_utility.set_location(' Leaving:'||l_proc, 90);
406: exception
407: when app_exception.application_exception then
408: if hr_multi_message.exception_add
409: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_EFFECTIVE'
410: ,p_associated_column2 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_END'
411: ,p_associated_column3 => 'PER_ABSENCE_ATTENDANCE_TYPES.INPUT_VALUE_ID'
412: ) then
413: hr_utility.set_location(' Leaving:'||l_proc, 90);
414: raise;
407: when app_exception.application_exception then
408: if hr_multi_message.exception_add
409: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_EFFECTIVE'
410: ,p_associated_column2 => 'PER_ABSENCE_ATTENDANCE_TYPES.DATE_END'
411: ,p_associated_column3 => 'PER_ABSENCE_ATTENDANCE_TYPES.INPUT_VALUE_ID'
412: ) then
413: hr_utility.set_location(' Leaving:'||l_proc, 90);
414: raise;
415: end if;
443: -- {End Of Comments}
444: -- ----------------------------------------------------------------------------
445: procedure chk_abs_overlap_flag
446: (
447: p_absence_overlap_flag in per_absence_attendance_types.absence_overlap_flag %TYPE
448: )
449: is
450: --
451:
523: -- Internal Row Handler Use Only.
524: --
525: -- ----------------------------------------------------------------------------
526: procedure chk_inc_or_dec_flag
527: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
528: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
529: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
530: ,p_inc_or_dec_flag in per_absence_attendance_types.increasing_or_decreasing_flag%type
531: ) is
524: --
525: -- ----------------------------------------------------------------------------
526: procedure chk_inc_or_dec_flag
527: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
528: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
529: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
530: ,p_inc_or_dec_flag in per_absence_attendance_types.increasing_or_decreasing_flag%type
531: ) is
532: --
525: -- ----------------------------------------------------------------------------
526: procedure chk_inc_or_dec_flag
527: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
528: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
529: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
530: ,p_inc_or_dec_flag in per_absence_attendance_types.increasing_or_decreasing_flag%type
531: ) is
532: --
533: l_proc varchar2(72) := g_package || 'chk_inc_or_dec_flag';
526: procedure chk_inc_or_dec_flag
527: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
528: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
529: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
530: ,p_inc_or_dec_flag in per_absence_attendance_types.increasing_or_decreasing_flag%type
531: ) is
532: --
533: l_proc varchar2(72) := g_package || 'chk_inc_or_dec_flag';
534: l_api_updating boolean;
587: --
588: exception
589: when app_exception.application_exception then
590: if hr_multi_message.exception_add
591: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.INCREASING_OR_DECREASING_FLAG'
592: ) then
593: hr_utility.set_location(' Leaving:'||l_proc, 80);
594: raise;
595: end if;
625: -- Internal Row Handler Use Only.
626: --
627: -- ----------------------------------------------------------------------------
628: procedure chk_hours_or_days
629: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
630: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
631: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
632: ,p_hours_or_days in per_absence_attendance_types.hours_or_days%type
633: ,p_date_effective in per_absence_attendance_types.date_effective%type
626: --
627: -- ----------------------------------------------------------------------------
628: procedure chk_hours_or_days
629: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
630: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
631: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
632: ,p_hours_or_days in per_absence_attendance_types.hours_or_days%type
633: ,p_date_effective in per_absence_attendance_types.date_effective%type
634: ) is
627: -- ----------------------------------------------------------------------------
628: procedure chk_hours_or_days
629: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
630: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
631: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
632: ,p_hours_or_days in per_absence_attendance_types.hours_or_days%type
633: ,p_date_effective in per_absence_attendance_types.date_effective%type
634: ) is
635: --
628: procedure chk_hours_or_days
629: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
630: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
631: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
632: ,p_hours_or_days in per_absence_attendance_types.hours_or_days%type
633: ,p_date_effective in per_absence_attendance_types.date_effective%type
634: ) is
635: --
636: l_proc varchar2(72) := g_package || 'chk_hours_or_days';
629: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
630: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
631: ,p_input_value_id in per_absence_attendance_types.input_value_id%type
632: ,p_hours_or_days in per_absence_attendance_types.hours_or_days%type
633: ,p_date_effective in per_absence_attendance_types.date_effective%type
634: ) is
635: --
636: l_proc varchar2(72) := g_package || 'chk_hours_or_days';
637: l_api_updating boolean;
641: --
642: hr_utility.set_location('Entering:'||l_proc,10);
643: --
644: if hr_multi_message.no_all_inclusive_error
645: (p_check_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.INPUT_VALUE_ID'
646: ) then
647: --
648: --
649: l_api_updating := per_abb_shd.api_updating
699: --
700: exception
701: when app_exception.application_exception then
702: if hr_multi_message.exception_add
703: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.HOURS_OR_DAYS'
704: ) then
705: hr_utility.set_location(' Leaving:'||l_proc, 80);
706: raise;
707: end if;
738: -- Internal Row Handler Use Only.
739: --
740: -- ----------------------------------------------------------------------------
741: procedure chk_absence_category
742: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
743: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
744: ,p_date_effective in per_absence_attendance_types.date_effective%type
745: ,p_absence_category in per_absence_attendance_types.absence_category%type
746: ) is
739: --
740: -- ----------------------------------------------------------------------------
741: procedure chk_absence_category
742: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
743: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
744: ,p_date_effective in per_absence_attendance_types.date_effective%type
745: ,p_absence_category in per_absence_attendance_types.absence_category%type
746: ) is
747: --
740: -- ----------------------------------------------------------------------------
741: procedure chk_absence_category
742: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
743: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
744: ,p_date_effective in per_absence_attendance_types.date_effective%type
745: ,p_absence_category in per_absence_attendance_types.absence_category%type
746: ) is
747: --
748: l_proc varchar2(72) := g_package || 'chk_absence_category';
741: procedure chk_absence_category
742: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
743: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
744: ,p_date_effective in per_absence_attendance_types.date_effective%type
745: ,p_absence_category in per_absence_attendance_types.absence_category%type
746: ) is
747: --
748: l_proc varchar2(72) := g_package || 'chk_absence_category';
749: l_api_updating boolean;
814: --
815: exception
816: when app_exception.application_exception then
817: if hr_multi_message.exception_add
818: (p_associated_column1 => 'PER_ABSENCE_ATTENDANCE_TYPES.ABSENCE_CATEGORY'
819: ) then
820: hr_utility.set_location(' Leaving:'||l_proc, 80);
821: raise;
822: end if;
855: -- Internal Row Handler Use Only.
856: --
857: -- ----------------------------------------------------------------------------
858: procedure chk_information_category
859: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
860: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
861: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
862: ,p_information_category in out nocopy per_absence_attendance_types.information_category%type
863: ) is
856: --
857: -- ----------------------------------------------------------------------------
858: procedure chk_information_category
859: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
860: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
861: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
862: ,p_information_category in out nocopy per_absence_attendance_types.information_category%type
863: ) is
864: --
857: -- ----------------------------------------------------------------------------
858: procedure chk_information_category
859: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
860: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
861: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
862: ,p_information_category in out nocopy per_absence_attendance_types.information_category%type
863: ) is
864: --
865: l_proc varchar2(72) := g_package || 'chk_information_category';
858: procedure chk_information_category
859: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
860: ,p_object_version_number in per_absence_attendance_types.object_version_number%type
861: ,p_business_group_id in per_absence_attendance_types.business_group_id%type
862: ,p_information_category in out nocopy per_absence_attendance_types.information_category%type
863: ) is
864: --
865: l_proc varchar2(72) := g_package || 'chk_information_category';
866: l_api_updating boolean;
981: -- Internal Row Handler Use Only.
982: --
983: -- ----------------------------------------------------------------------------
984: procedure chk_absence_type_delete
985: (p_absence_attendance_type_id in per_absence_attendance_types.absence_attendance_type_id%type
986: ) is
987: --
988: l_proc varchar2(72) := g_package || 'chk_absence_type_delete';
989: l_dummy number;
1253: -- b) During insert.
1254: --
1255: hr_dflex_utility.ins_or_upd_descflex_attribs
1256: (p_appl_short_name => 'PER'
1257: ,p_descflex_name => 'PER_ABSENCE_ATTENDANCE_TYPES'
1258: ,p_attribute_category => p_rec.attribute_category
1259: ,p_attribute1_name => 'ATTRIBUTE1'
1260: ,p_attribute1_value => p_rec.attribute1
1261: ,p_attribute2_name => 'ATTRIBUTE2'