1 package body PER_HU_DISABILITY as
2 /* $Header: pehudisp.pkb 120.1 2006/09/21 09:07:14 mgettins noship $ */
3 PROCEDURE check_hu_disability(p_category varchar2
4 ,p_degree number) is
5
6 BEGIN
7 /*if p_degree is not null then
8 if p_category='HU_WC_LT_50_PERC' then
9 if (p_degree >=50) then
10 hr_utility.set_message(800,'HR_HU_INVALID_DIS_DEGREE');
11 hr_utility.raise_error;
12 end if;
13 elsif p_category='HU_WC_50_PERC' then
14 if (p_degree <> 50 ) then
15 hr_utility.set_message(800,'HR_HU_INVALID_DIS_DEGREE');
16 hr_utility.raise_error;
17 end if;
18 elsif p_category='HU_WC_GT_67_PERC' then
19 if (p_degree <=67) then
20 hr_utility.set_message(800,'HR_HU_INVALID_DIS_DEGREE');
21 hr_utility.raise_error;
22 end if;
23 elsif p_category='HU_WC_67_PERC' then
24 if (p_degree <>67) then
25 hr_utility.set_message(800,'HR_HU_INVALID_DIS_DEGREE');
26 hr_utility.raise_error;
27 end if;
28 end if;
29 end if;*/
30 null;
31 END check_hu_disability;
32
33 PROCEDURE create_hu_disability(p_category varchar2
34 ,p_degree number) is
35
36 BEGIN
37 --
38 -- Added for GSI Bug 5472781
39 --
40 IF hr_utility.chk_product_install('Oracle Human Resources', 'HU') THEN
41 --
42 --per_hu_disability.check_hu_disability(p_category => p_category
43 -- ,p_degree => p_degree);
44 null;
45 --
46 END IF;
47 END create_hu_disability;
48 --
49
50 PROCEDURE update_hu_disability(p_category varchar2
51 ,p_degree number) is
52 BEGIN
53 --
54 -- Added for GSI Bug 5472781
55 --
56 IF hr_utility.chk_product_install('Oracle Human Resources', 'HU') THEN
57 --
58 --per_hu_disability.check_hu_disability(p_category => p_category
59 -- ,p_degree => p_degree);
60 null;
61 --
62 END IF;
63 --
64 END update_hu_disability;
65
66 END PER_HU_DISABILITY;