31:
32: BEGIN
33:
34: /* Added for GSI Bug 5472781 */
35: IF hr_utility.chk_product_install('Oracle Human Resources', 'IE') THEN
36:
37: l_check_flag := null;
38:
39: open get_unique;
40: fetch get_unique into l_check_flag, l_paye_ref_no;
41: close get_unique;
42:
43: if l_check_flag = 'x' then
44: hr_utility.set_message(800,'HR_IE_PAYE_UNIQUE_ERROR');
45: hr_utility.raise_error;
46: end if;
47:
48: END IF; /* Added for GSI Bug 5472781 */
41: close get_unique;
42:
43: if l_check_flag = 'x' then
44: hr_utility.set_message(800,'HR_IE_PAYE_UNIQUE_ERROR');
45: hr_utility.raise_error;
46: end if;
47:
48: END IF; /* Added for GSI Bug 5472781 */
49:
80:
81: BEGIN
82:
83: /* Added for GSI Bug 5472781 */
84: IF hr_utility.chk_product_install('Oracle Human Resources', 'IE') THEN
85:
86: l_check_flag := null;
87:
88: open get_unique;
89: fetch get_unique into l_check_flag, l_paye_ref_no;
90: close get_unique;
91:
92: if l_check_flag = 'x' then
93: hr_utility.set_message(800,'HR_IE_PAYE_UNIQUE_ERROR');
94: hr_utility.raise_error;
95: end if;
96:
97: END IF; /* Added for GSI Bug 5472781 */
90: close get_unique;
91:
92: if l_check_flag = 'x' then
93: hr_utility.set_message(800,'HR_IE_PAYE_UNIQUE_ERROR');
94: hr_utility.raise_error;
95: end if;
96:
97: END IF; /* Added for GSI Bug 5472781 */
98:
113: l_cbr_no c_cbr_no%rowtype;
114:
115: begin
116: if length(p_cbr_no)<>10 then
117: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
118: hr_utility.raise_error;
119: end if;
120:
121: OPEN c_cbr_no;
114:
115: begin
116: if length(p_cbr_no)<>10 then
117: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
118: hr_utility.raise_error;
119: end if;
120:
121: OPEN c_cbr_no;
122: FETCH c_cbr_no INTO l_cbr_no;
124: EXIT WHEN c_cbr_no%NOTFOUND;
125:
126: if(l_trace=1 and l_cbr_no.cbr<>'E') then
127: l_flag:=false;
128: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
129: hr_utility.raise_error;
130: end if;
131:
132: if(l_trace=2 and l_cbr_no.cbr<>'N') then
125:
126: if(l_trace=1 and l_cbr_no.cbr<>'E') then
127: l_flag:=false;
128: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
129: hr_utility.raise_error;
130: end if;
131:
132: if(l_trace=2 and l_cbr_no.cbr<>'N') then
133: l_flag:=false;
130: end if;
131:
132: if(l_trace=2 and l_cbr_no.cbr<>'N') then
133: l_flag:=false;
134: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
135: hr_utility.raise_error;
136: end if;
137:
138: IF(l_trace>=3) then
131:
132: if(l_trace=2 and l_cbr_no.cbr<>'N') then
133: l_flag:=false;
134: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
135: hr_utility.raise_error;
136: end if;
137:
138: IF(l_trace>=3) then
139: if(l_cbr_no.cbr in ('1','2','3','4','5','6','7','8','9','0')) then
139: if(l_cbr_no.cbr in ('1','2','3','4','5','6','7','8','9','0')) then
140: l_original_total:=l_original_total+to_number(l_cbr_no.cbr)*l_count;
141: l_count:=l_count-1;
142: ELSE
143: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
144: hr_utility.raise_error;
145: end if;
146: end if;
147: l_trace:=l_trace+1;
140: l_original_total:=l_original_total+to_number(l_cbr_no.cbr)*l_count;
141: l_count:=l_count-1;
142: ELSE
143: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
144: hr_utility.raise_error;
145: end if;
146: end if;
147: l_trace:=l_trace+1;
148: FETCH c_cbr_no INTO l_cbr_no;
158: end if;
159: l_last_digit:=substr(p_cbr_no,length(p_cbr_no ),1);
160:
161: if(l_last_digit<>l_check_digit) then
162: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
163: hr_utility.raise_error;
164: end if;
165:
166: end proc_cbr_no;
159: l_last_digit:=substr(p_cbr_no,length(p_cbr_no ),1);
160:
161: if(l_last_digit<>l_check_digit) then
162: hr_utility.set_message(800,'HR_IE_CBR_VALIDATION');
163: hr_utility.raise_error;
164: end if;
165:
166: end proc_cbr_no;
167: --
182: l_business_group_id hr_all_organization_units.business_group_id%TYPE;
183: BEGIN
184:
185: /* Added for GSI Bug 5472781 */
186: IF hr_utility.chk_product_install('Oracle Human Resources', 'IE') THEN
187:
188: OPEN get_business_group;
189: FETCH get_business_group into l_business_group_id;
190: CLOSE get_business_group;
225: l_business_group_id hr_all_organization_units.business_group_id%TYPE;
226: BEGIN
227:
228: /* Added for GSI Bug 5472781 */
229: IF hr_utility.chk_product_install('Oracle Human Resources', 'IE') THEN
230:
231: OPEN get_business_group;
232: FETCH get_business_group into l_business_group_id;
233: CLOSE get_business_group;
317:
318: BEGIN
319:
320: /* Added for GSI Bug 5472781 */
321: IF hr_utility.chk_product_install('Oracle Human Resources', 'IE') THEN
322:
323: l_er_exists := 0;
324: OPEN get_business_group;
325: FETCH get_business_group into l_business_group_id;
338: CLOSE csr_chk_er_change;
339:
340: IF(l_er_exists = 1) THEN
341:
342: hr_utility.set_message(800,'HR_IE_ASG_PAYE_DIFF_ERROR');
343: hr_utility.raise_error;
344: END IF;
345:
346: END IF; /* Added for GSI Bug 5472781 */
339:
340: IF(l_er_exists = 1) THEN
341:
342: hr_utility.set_message(800,'HR_IE_ASG_PAYE_DIFF_ERROR');
343: hr_utility.raise_error;
344: END IF;
345:
346: END IF; /* Added for GSI Bug 5472781 */
347: