DBA Data[Home] [Help]

PACKAGE BODY: APPS.PER_DISABILITY_API_BK1

Source


1 package body PER_DISABILITY_API_BK1 as
2 /* $Header: pedisapi.pkb 120.0 2005/10/02 02:14:49 generated $ */
3 -- Code generated by the Oracle HRMS API Hook Pre-processor
4 -- Created on 2009/03/30 04:54:01 (YYYY/MM/DD HH24:MI:SS)
5 procedure CREATE_DISABILITY_A
6 (P_EFFECTIVE_DATE in DATE
7 ,P_PERSON_ID in NUMBER
8 ,P_CATEGORY in VARCHAR2
9 ,P_STATUS in VARCHAR2
10 ,P_QUOTA_FTE in NUMBER
11 ,P_ORGANIZATION_ID in NUMBER
12 ,P_REGISTRATION_ID in VARCHAR2
13 ,P_REGISTRATION_DATE in DATE
14 ,P_REGISTRATION_EXP_DATE in DATE
15 ,P_DESCRIPTION in VARCHAR2
16 ,P_DEGREE in NUMBER
17 ,P_REASON in VARCHAR2
18 ,P_WORK_RESTRICTION in VARCHAR2
19 ,P_INCIDENT_ID in NUMBER
20 ,P_PRE_REGISTRATION_JOB in VARCHAR2
21 ,P_ATTRIBUTE_CATEGORY in VARCHAR2
22 ,P_ATTRIBUTE1 in VARCHAR2
23 ,P_ATTRIBUTE2 in VARCHAR2
24 ,P_ATTRIBUTE3 in VARCHAR2
25 ,P_ATTRIBUTE4 in VARCHAR2
26 ,P_ATTRIBUTE5 in VARCHAR2
27 ,P_ATTRIBUTE6 in VARCHAR2
28 ,P_ATTRIBUTE7 in VARCHAR2
29 ,P_ATTRIBUTE8 in VARCHAR2
30 ,P_ATTRIBUTE9 in VARCHAR2
31 ,P_ATTRIBUTE10 in VARCHAR2
32 ,P_ATTRIBUTE11 in VARCHAR2
33 ,P_ATTRIBUTE12 in VARCHAR2
34 ,P_ATTRIBUTE13 in VARCHAR2
35 ,P_ATTRIBUTE14 in VARCHAR2
36 ,P_ATTRIBUTE15 in VARCHAR2
37 ,P_ATTRIBUTE16 in VARCHAR2
38 ,P_ATTRIBUTE17 in VARCHAR2
39 ,P_ATTRIBUTE18 in VARCHAR2
40 ,P_ATTRIBUTE19 in VARCHAR2
41 ,P_ATTRIBUTE20 in VARCHAR2
42 ,P_ATTRIBUTE21 in VARCHAR2
43 ,P_ATTRIBUTE22 in VARCHAR2
44 ,P_ATTRIBUTE23 in VARCHAR2
45 ,P_ATTRIBUTE24 in VARCHAR2
46 ,P_ATTRIBUTE25 in VARCHAR2
47 ,P_ATTRIBUTE26 in VARCHAR2
48 ,P_ATTRIBUTE27 in VARCHAR2
49 ,P_ATTRIBUTE28 in VARCHAR2
50 ,P_ATTRIBUTE29 in VARCHAR2
51 ,P_ATTRIBUTE30 in VARCHAR2
52 ,P_DIS_INFORMATION_CATEGORY in VARCHAR2
53 ,P_DIS_INFORMATION1 in VARCHAR2
54 ,P_DIS_INFORMATION2 in VARCHAR2
55 ,P_DIS_INFORMATION3 in VARCHAR2
56 ,P_DIS_INFORMATION4 in VARCHAR2
57 ,P_DIS_INFORMATION5 in VARCHAR2
58 ,P_DIS_INFORMATION6 in VARCHAR2
59 ,P_DIS_INFORMATION7 in VARCHAR2
60 ,P_DIS_INFORMATION8 in VARCHAR2
61 ,P_DIS_INFORMATION9 in VARCHAR2
62 ,P_DIS_INFORMATION10 in VARCHAR2
63 ,P_DIS_INFORMATION11 in VARCHAR2
64 ,P_DIS_INFORMATION12 in VARCHAR2
65 ,P_DIS_INFORMATION13 in VARCHAR2
66 ,P_DIS_INFORMATION14 in VARCHAR2
67 ,P_DIS_INFORMATION15 in VARCHAR2
68 ,P_DIS_INFORMATION16 in VARCHAR2
69 ,P_DIS_INFORMATION17 in VARCHAR2
70 ,P_DIS_INFORMATION18 in VARCHAR2
71 ,P_DIS_INFORMATION19 in VARCHAR2
72 ,P_DIS_INFORMATION20 in VARCHAR2
73 ,P_DIS_INFORMATION21 in VARCHAR2
74 ,P_DIS_INFORMATION22 in VARCHAR2
75 ,P_DIS_INFORMATION23 in VARCHAR2
76 ,P_DIS_INFORMATION24 in VARCHAR2
77 ,P_DIS_INFORMATION25 in VARCHAR2
78 ,P_DIS_INFORMATION26 in VARCHAR2
79 ,P_DIS_INFORMATION27 in VARCHAR2
80 ,P_DIS_INFORMATION28 in VARCHAR2
81 ,P_DIS_INFORMATION29 in VARCHAR2
82 ,P_DIS_INFORMATION30 in VARCHAR2
83 ,P_DISABILITY_ID in NUMBER
84 ,P_OBJECT_VERSION_NUMBER in NUMBER
85 ,P_EFFECTIVE_START_DATE in DATE
86 ,P_EFFECTIVE_END_DATE in DATE
87 )is
88 l_commit_unit_number number;
89 l_legislation_code   varchar2(30);
90 begin
91 hr_utility.set_location('Entering: PER_DISABILITY_API_BK1.CREATE_DISABILITY_A', 10);
92 l_commit_unit_number := hr_api.return_commit_unit;
93 if hr_api.call_leg_hooks then
94 l_legislation_code := PER_PER_BUS.RETURN_LEGISLATION_CODE(P_PERSON_ID => P_PERSON_ID
95 );
96 if l_legislation_code = 'HU' then
97 PER_HU_DISABILITY.CREATE_HU_DISABILITY
98 (P_CATEGORY => P_CATEGORY
99 ,P_DEGREE => P_DEGREE
100 );
101 elsif l_legislation_code = 'IN' then
102 PER_IN_DISABILITY_LEG_HOOK.EMP_DISABILITY_CREATE
103 (P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
104 ,P_PERSON_ID => P_PERSON_ID
105 ,P_CATEGORY => P_CATEGORY
106 ,P_STATUS => P_STATUS
107 ,P_DEGREE => P_DEGREE
108 ,P_DIS_INFORMATION1 => P_DIS_INFORMATION1
109 );
110 elsif l_legislation_code = 'MX' then
111 PER_MX_VALIDATE_ID.VALIDATE_REGN_ID
112 (P_DISABILITY_ID => P_DISABILITY_ID
113 ,P_REGISTRATION_ID => P_REGISTRATION_ID
114 );
115 end if;
116 end if;
117 hr_multi_message.end_validation_set;
118 hr_api.validate_commit_unit(l_commit_unit_number, 'CREATE_DISABILITY', 'AP');
119 hr_utility.set_location(' Leaving: PER_DISABILITY_API_BK1.CREATE_DISABILITY_A', 20);
120 end CREATE_DISABILITY_A;
121 procedure CREATE_DISABILITY_B
122 (P_EFFECTIVE_DATE in DATE
123 ,P_PERSON_ID in NUMBER
124 ,P_CATEGORY in VARCHAR2
125 ,P_STATUS in VARCHAR2
126 ,P_QUOTA_FTE in NUMBER
127 ,P_ORGANIZATION_ID in NUMBER
128 ,P_REGISTRATION_ID in VARCHAR2
129 ,P_REGISTRATION_DATE in DATE
130 ,P_REGISTRATION_EXP_DATE in DATE
131 ,P_DESCRIPTION in VARCHAR2
132 ,P_DEGREE in NUMBER
133 ,P_REASON in VARCHAR2
134 ,P_WORK_RESTRICTION in VARCHAR2
135 ,P_INCIDENT_ID in NUMBER
136 ,P_PRE_REGISTRATION_JOB in VARCHAR2
137 ,P_ATTRIBUTE_CATEGORY in VARCHAR2
138 ,P_ATTRIBUTE1 in VARCHAR2
139 ,P_ATTRIBUTE2 in VARCHAR2
140 ,P_ATTRIBUTE3 in VARCHAR2
141 ,P_ATTRIBUTE4 in VARCHAR2
142 ,P_ATTRIBUTE5 in VARCHAR2
143 ,P_ATTRIBUTE6 in VARCHAR2
144 ,P_ATTRIBUTE7 in VARCHAR2
145 ,P_ATTRIBUTE8 in VARCHAR2
146 ,P_ATTRIBUTE9 in VARCHAR2
147 ,P_ATTRIBUTE10 in VARCHAR2
148 ,P_ATTRIBUTE11 in VARCHAR2
149 ,P_ATTRIBUTE12 in VARCHAR2
150 ,P_ATTRIBUTE13 in VARCHAR2
151 ,P_ATTRIBUTE14 in VARCHAR2
152 ,P_ATTRIBUTE15 in VARCHAR2
153 ,P_ATTRIBUTE16 in VARCHAR2
154 ,P_ATTRIBUTE17 in VARCHAR2
155 ,P_ATTRIBUTE18 in VARCHAR2
156 ,P_ATTRIBUTE19 in VARCHAR2
157 ,P_ATTRIBUTE20 in VARCHAR2
158 ,P_ATTRIBUTE21 in VARCHAR2
159 ,P_ATTRIBUTE22 in VARCHAR2
160 ,P_ATTRIBUTE23 in VARCHAR2
161 ,P_ATTRIBUTE24 in VARCHAR2
162 ,P_ATTRIBUTE25 in VARCHAR2
163 ,P_ATTRIBUTE26 in VARCHAR2
164 ,P_ATTRIBUTE27 in VARCHAR2
165 ,P_ATTRIBUTE28 in VARCHAR2
166 ,P_ATTRIBUTE29 in VARCHAR2
167 ,P_ATTRIBUTE30 in VARCHAR2
168 ,P_DIS_INFORMATION_CATEGORY in VARCHAR2
169 ,P_DIS_INFORMATION1 in VARCHAR2
170 ,P_DIS_INFORMATION2 in VARCHAR2
171 ,P_DIS_INFORMATION3 in VARCHAR2
172 ,P_DIS_INFORMATION4 in VARCHAR2
173 ,P_DIS_INFORMATION5 in VARCHAR2
174 ,P_DIS_INFORMATION6 in VARCHAR2
175 ,P_DIS_INFORMATION7 in VARCHAR2
176 ,P_DIS_INFORMATION8 in VARCHAR2
177 ,P_DIS_INFORMATION9 in VARCHAR2
178 ,P_DIS_INFORMATION10 in VARCHAR2
179 ,P_DIS_INFORMATION11 in VARCHAR2
180 ,P_DIS_INFORMATION12 in VARCHAR2
181 ,P_DIS_INFORMATION13 in VARCHAR2
182 ,P_DIS_INFORMATION14 in VARCHAR2
183 ,P_DIS_INFORMATION15 in VARCHAR2
184 ,P_DIS_INFORMATION16 in VARCHAR2
185 ,P_DIS_INFORMATION17 in VARCHAR2
186 ,P_DIS_INFORMATION18 in VARCHAR2
187 ,P_DIS_INFORMATION19 in VARCHAR2
188 ,P_DIS_INFORMATION20 in VARCHAR2
189 ,P_DIS_INFORMATION21 in VARCHAR2
190 ,P_DIS_INFORMATION22 in VARCHAR2
191 ,P_DIS_INFORMATION23 in VARCHAR2
192 ,P_DIS_INFORMATION24 in VARCHAR2
193 ,P_DIS_INFORMATION25 in VARCHAR2
194 ,P_DIS_INFORMATION26 in VARCHAR2
195 ,P_DIS_INFORMATION27 in VARCHAR2
196 ,P_DIS_INFORMATION28 in VARCHAR2
197 ,P_DIS_INFORMATION29 in VARCHAR2
198 ,P_DIS_INFORMATION30 in VARCHAR2
199 )is
200 l_commit_unit_number number;
201 l_legislation_code   varchar2(30);
202 begin
203 hr_utility.set_location('Entering: PER_DISABILITY_API_BK1.CREATE_DISABILITY_B', 10);
204 l_commit_unit_number := hr_api.return_commit_unit;
205 if hr_api.call_leg_hooks then
206 l_legislation_code := PER_PER_BUS.RETURN_LEGISLATION_CODE(P_PERSON_ID => P_PERSON_ID
207 );
208 if l_legislation_code = 'AE' then
209 HR_AE_VALIDATE_PKG.CREATE_DISABILITY_VALIDATE
210 (P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
211 ,P_PERSON_ID => P_PERSON_ID
212 ,P_CATEGORY => P_CATEGORY
213 ,P_DEGREE => P_DEGREE
214 ,P_DIS_INFORMATION_CATEGORY => P_DIS_INFORMATION_CATEGORY
215 ,P_DIS_INFORMATION1 => P_DIS_INFORMATION1
216 ,P_DIS_INFORMATION2 => P_DIS_INFORMATION2
217 );
218 elsif l_legislation_code = 'ES' then
219 PER_ES_DISABILITY.CREATE_ES_DISABILITY
220 (P_CATEGORY => P_CATEGORY
221 ,P_DEGREE => P_DEGREE
222 );
223 elsif l_legislation_code = 'GB' then
224 PER_GB_DISABILITY.VALIDATE_CREATE_DISABILITY
225 (P_CATEGORY => P_CATEGORY
226 ,P_PERSON_ID => P_PERSON_ID
227 ,P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
228 );
229 elsif l_legislation_code = 'KW' then
230 HR_KW_VALIDATE_PKG.DISABILITY_VALIDATE
231 (P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
232 ,P_CATEGORY => P_CATEGORY
233 ,P_DEGREE => P_DEGREE
234 ,P_DIS_INFORMATION_CATEGORY => P_DIS_INFORMATION_CATEGORY
235 ,P_DIS_INFORMATION1 => P_DIS_INFORMATION1
236 ,P_DIS_INFORMATION2 => P_DIS_INFORMATION2
237 );
238 elsif l_legislation_code = 'PL' then
239 PER_PL_DISABILITY.CREATE_PL_DISABILITY
240 (P_REASON => P_REASON
241 );
242 end if;
243 end if;
244 hr_api.validate_commit_unit(l_commit_unit_number, 'CREATE_DISABILITY', 'BP');
245 hr_utility.set_location(' Leaving: PER_DISABILITY_API_BK1.CREATE_DISABILITY_B', 20);
246 end CREATE_DISABILITY_B;
247 end PER_DISABILITY_API_BK1;