[Home] [Help]
125: l_invalid_char||l_char_chk||l_number_chk,
126: l_invalid_char);
127:
128: if l_translated_value is not null then
129: hr_utility.trace('Lower case chars found: '||l_translated_value);
130: l_return_code := 5; -- Not valid
131: end if;
132:
133: l_ni_number := upper(p_ni_number);
198: l_proc varchar2(72) := 'hr_gb_utility.tax_code_validate';
199: --
200: begin
201: --
202: hr_utility.set_location('Entering:'|| l_proc, 5);
203: --
204: BEGIN
205: select formula_id,effective_start_date
206: into l_formula_id, l_effective_start_date
209: and business_group_id is null
210: and legislation_code='GB'
211: and p_effective_date between effective_start_date and effective_end_date;
212: EXCEPTION WHEN NO_DATA_FOUND THEN
213: hr_utility.trace('Error: TAX_CODE formula not defined');
214: l_return_value := 'TAX_CODE formula not found';
215: END;
216: --
217: hr_utility.set_location(l_proc, 10);
213: hr_utility.trace('Error: TAX_CODE formula not defined');
214: l_return_value := 'TAX_CODE formula not found';
215: END;
216: --
217: hr_utility.set_location(l_proc, 10);
218: --
219: ff_exec.init_formula(l_formula_id,l_effective_start_date,l_inputs,l_outputs);
220: --
221: for l_in_cnt in
233: l_inputs(l_in_cnt).value := to_char(p_assignment_id);
234: end if;
235: end loop;
236: --
237: hr_utility.set_location(l_proc, 15);
238: --
239: ff_exec.run_formula(l_inputs,l_outputs);
240: --
241: for l_out_cnt in
249: l_status_value := l_outputs(l_out_cnt).value;
250: end if;
251: end loop;
252: --
253: hr_utility.set_location('Leaving:'|| l_proc, 20);
254: --
255: if l_status_value = 'E' and
256: l_formula_mesg is null then
257: l_return_value := 'TAX_CODE Formula error';
260: end if;
261: return l_return_value;
262: exception
263: when NO_DATA_FOUND then
264: hr_utility.set_location('Leaving:'|| l_proc, 22);
265: --
266: return l_return_value;
267: --
268: end tax_code_validate;