1: PACKAGE BODY PER_SIT_PKG as
2: /* $Header: pesit01t.pkb 115.3 2004/06/15 01:00:26 vanantha ship $ */
3: --
4: -- Constants to define Special Information Type Categories
5: -- used by this package
30: and business_group_id = p_bg_id;
31: --
32: l_exists varchar2(1);
33: begin
34: hr_utility.set_location('per_sit_pkg.check_unique_sit',1);
35: open c;
36: fetch c into l_exists;
37: if c%found then
38: close c;
62: and pa.id_flex_num = p_id_flex_num; --bug 3648683
63: --
64: l_exists varchar2(1);
65: begin
66: hr_utility.set_location('per_sit_pkg.sit_flex_used',1);
67: open c;
68: fetch c into l_exists;
69: if c%found then
70: close c;
84: --
85: procedure sit_del_validation(p_bg_id number
86: ,p_id_flex_num number) is
87: begin
88: hr_utility.set_location('per_sit_pkg.sit_del_validation',1);
89: if sit_flex_used(p_bg_id
90: ,p_id_flex_num) then
91: hr_utility.set_message(801,'PER_7837_DEF_FUR_IN_USE');
92: hr_utility.raise_error;
110: where id_flex_code = 'PEA'
111: and id_flex_num = p_id_flex_num;
112: --
113: begin
114: hr_utility.set_location('per_sit_pkg.populate_fields',1);
115: open c;
116: fetch c into p_name, p_flex_enabled;
117: close c;
118: end populate_fields;
603: Return l_result;
604: --
605: end;
606:
607: END PER_SIT_PKG;