[Home] [Help]
PACKAGE BODY: APPS.HR_NO_QUALIFICATION_API
Source
1 package body hr_no_qualification_api as
2 /* $Header: pequanoi.pkb 120.0 2005/05/31 16:20 appldev noship $ */
3 --
4 g_package varchar2(33) := 'hr_no_qualification_api.';
5 --
6 -- ----------------------------------------------------------------------------
7 -- |--------------------------< CREATE_NO_QUALIFICATION >------------------------|
8 -- ----------------------------------------------------------------------------
9 procedure CREATE_NO_QUALIFICATION
10 (p_validate in boolean default false
11 ,p_effective_date in date
12 ,p_qualification_type_id in number
13 ,p_language_code in varchar2 default hr_api.userenv_lang
14 ,p_business_group_id in number default null
15 ,p_person_id in number default null
16 ,p_title in varchar2 default null
17 ,p_grade_attained in varchar2 default null
18 ,p_status in varchar2 default null
19 ,p_awarded_date in date default null
20 ,p_fee in number default null
21 ,p_fee_currency in varchar2 default null
22 ,p_training_completed_amount in number default null
23 ,p_reimbursement_arrangements in varchar2 default null
24 ,p_training_completed_units in varchar2 default null
25 ,p_total_training_amount in number default null
26 ,p_start_date in date default null
27 ,p_end_date in date default null
28 ,p_license_number in varchar2 default null
29 ,p_expiry_date in date default null
30 ,p_license_restrictions in varchar2 default null
31 ,p_projected_completion_date in date default null
32 ,p_awarding_body in varchar2 default null
33 ,p_tuition_method in varchar2 default null
34 ,p_group_ranking in varchar2 default null
35 ,p_comments in varchar2 default null
36 ,p_attendance_id in number default null
37 ,p_attribute_category in varchar2 default null
38 ,p_attribute1 in varchar2 default null
39 ,p_attribute2 in varchar2 default null
40 ,p_attribute3 in varchar2 default null
41 ,p_attribute4 in varchar2 default null
42 ,p_attribute5 in varchar2 default null
43 ,p_attribute6 in varchar2 default null
44 ,p_attribute7 in varchar2 default null
45 ,p_attribute8 in varchar2 default null
46 ,p_attribute9 in varchar2 default null
47 ,p_attribute10 in varchar2 default null
48 ,p_attribute11 in varchar2 default null
49 ,p_attribute12 in varchar2 default null
50 ,p_attribute13 in varchar2 default null
51 ,p_attribute14 in varchar2 default null
52 ,p_attribute15 in varchar2 default null
53 ,p_attribute16 in varchar2 default null
54 ,p_attribute17 in varchar2 default null
55 ,p_attribute18 in varchar2 default null
56 ,p_attribute19 in varchar2 default null
57 ,p_attribute20 in varchar2 default null
58 ,p_party_id in number default null
59 ,p_nus2000_code in varchar2 default null
60 ,p_highest_level in varchar2 default null
61 ,p_grade_point_avg in varchar2 default null
62 ,p_no_of_credits in varchar2 default null
63 ,p_professional_body_name in varchar2 default null
64 ,p_membership_number in varchar2 default null
65 ,p_membership_category in varchar2 default null
66 ,p_subscription_payment_method in varchar2 default null
67 ,p_qualification_id out nocopy number
68 ,p_object_version_number out nocopy number
69 ) IS
70 -- Declare cursors and local variables
71 l_proc VARCHAR2(72) := g_package||'create_no_qualification';
72 l_legislation_code VARCHAR2(2);
73 l_territory_code VARCHAR2(2);
74
75 --
76 CURSOR csr_leg_code IS
77 SELECT legislation_code
78 FROM per_business_groups pbg
79 WHERE pbg.business_group_id = p_business_group_id;
80 --
81 BEGIN
82 hr_utility.set_location('Entering:'|| l_proc, 10);
83 --
84 -- Validation IN addition to Row Handlers
85 --
86 -- Check that the specified business group is valid.
87 --
88 OPEN csr_leg_code;
89 FETCH csr_leg_code
90 INTO l_legislation_code;
91 IF csr_leg_code%notfound THEN
92 CLOSE csr_leg_code;
93 hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
94 hr_utility.raise_error;
95 END IF;
96 CLOSE csr_leg_code;
97 hr_utility.set_location(l_proc, 20);
98 --
99 -- Check that the legislation of the specified business group is 'NO'.
100 --
101 IF l_legislation_code <> 'NO' THEN
102 hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
103 hr_utility.set_message_token('LEG_CODE','NO');
104 hr_utility.raise_error;
105 END IF;
106 hr_utility.set_location(l_proc, 30);
107 --
108 -- Call the person business process
109 --
110 per_qualifications_api.create_qualification
111 (p_validate => p_validate
112 ,p_effective_date => p_effective_date
113 ,p_qualification_type_id => p_qualification_type_id
114 ,p_language_code => p_language_code
115 ,p_business_group_id => p_business_group_id
116 ,p_person_id => p_person_id
117 ,p_title => p_title
118 ,p_grade_attained => p_grade_attained
119 ,p_status => p_status
120 ,p_awarded_date => p_awarded_date
121 ,p_fee => p_fee
122 ,p_fee_currency => p_fee_currency
123 ,p_training_completed_amount => p_training_completed_amount
124 ,p_reimbursement_arrangements => p_reimbursement_arrangements
125 ,p_training_completed_units => p_training_completed_units
126 ,p_total_training_amount => p_total_training_amount
127 ,p_start_date => p_start_date
128 ,p_end_date => p_end_date
129 ,p_license_number => p_license_number
130 ,p_expiry_date => p_expiry_date
131 ,p_license_restrictions => p_license_restrictions
132 ,p_projected_completion_date => p_projected_completion_date
133 ,p_awarding_body => p_awarding_body
134 ,p_tuition_method => p_tuition_method
135 ,p_group_ranking => p_group_ranking
136 ,p_comments => p_comments
137 ,p_attendance_id => p_attendance_id
138 ,p_attribute_category => p_attribute_category
139 ,p_attribute1 => p_attribute1
140 ,p_attribute2 => p_attribute2
141 ,p_attribute3 => p_attribute3
142 ,p_attribute4 => p_attribute4
143 ,p_attribute5 => p_attribute5
144 ,p_attribute6 => p_attribute6
145 ,p_attribute7 => p_attribute7
146 ,p_attribute8 => p_attribute8
147 ,p_attribute9 => p_attribute9
148 ,p_attribute10 => p_attribute10
149 ,p_attribute11 => p_attribute11
150 ,p_attribute12 => p_attribute12
151 ,p_attribute13 => p_attribute13
152 ,p_attribute14 => p_attribute14
153 ,p_attribute15 => p_attribute15
154 ,p_attribute16 => p_attribute16
155 ,p_attribute17 => p_attribute17
156 ,p_attribute18 => p_attribute18
157 ,p_attribute19 => p_attribute19
158 ,p_attribute20 => p_attribute20
159 ,p_party_id => p_party_id
160 ,p_qua_information_category => 'NO'
161 ,p_qua_information1 => p_nus2000_code
162 ,p_qua_information2 => p_highest_level
163 ,p_qua_information3 => p_grade_point_avg
164 ,p_qua_information4 => p_no_of_credits
165 ,p_professional_body_name => p_professional_body_name
166 ,p_membership_number => p_membership_number
167 ,p_membership_category => p_membership_category
168 ,p_subscription_payment_method => p_subscription_payment_method
169 ,p_qualification_id => p_qualification_id
170 ,p_object_version_number => p_object_version_number
171 );
172 --
173 hr_utility.set_location(' Leaving:'||l_proc, 40);
174 --
175 end create_no_qualification;
176 --
177 -- ----------------------------------------------------------------------------
178 -- |--------------------------< UPDATE_NO_QUALIFICATION >------------------------|
179 -- ----------------------------------------------------------------------------
180 procedure UPDATE_NO_QUALIFICATION
181 (p_validate in boolean default false
182 ,p_effective_date in date
183 ,p_qualification_id in number
184 ,p_language_code in varchar2 default hr_api.userenv_lang
185 ,p_qualification_type_id in number default hr_api.g_number
186 ,p_title in varchar2 default hr_api.g_varchar2
187 ,p_grade_attained in varchar2 default hr_api.g_varchar2
188 ,p_status in varchar2 default hr_api.g_varchar2
189 ,p_awarded_date in date default hr_api.g_date
190 ,p_fee in number default hr_api.g_number
191 ,p_fee_currency in varchar2 default hr_api.g_varchar2
192 ,p_training_completed_amount in number default hr_api.g_number
193 ,p_reimbursement_arrangements in varchar2 default hr_api.g_varchar2
194 ,p_training_completed_units in varchar2 default hr_api.g_varchar2
195 ,p_total_training_amount in number default hr_api.g_number
196 ,p_start_date in date default hr_api.g_date
197 ,p_end_date in date default hr_api.g_date
198 ,p_license_number in varchar2 default hr_api.g_varchar2
199 ,p_expiry_date in date default hr_api.g_date
200 ,p_license_restrictions in varchar2 default hr_api.g_varchar2
201 ,p_projected_completion_date in date default hr_api.g_date
202 ,p_awarding_body in varchar2 default hr_api.g_varchar2
203 ,p_tuition_method in varchar2 default hr_api.g_varchar2
204 ,p_group_ranking in varchar2 default hr_api.g_varchar2
205 ,p_comments in varchar2 default hr_api.g_varchar2
206 ,p_attendance_id in number default hr_api.g_number
207 ,p_attribute_category in varchar2 default hr_api.g_varchar2
208 ,p_attribute1 in varchar2 default hr_api.g_varchar2
209 ,p_attribute2 in varchar2 default hr_api.g_varchar2
210 ,p_attribute3 in varchar2 default hr_api.g_varchar2
211 ,p_attribute4 in varchar2 default hr_api.g_varchar2
212 ,p_attribute5 in varchar2 default hr_api.g_varchar2
213 ,p_attribute6 in varchar2 default hr_api.g_varchar2
214 ,p_attribute7 in varchar2 default hr_api.g_varchar2
215 ,p_attribute8 in varchar2 default hr_api.g_varchar2
216 ,p_attribute9 in varchar2 default hr_api.g_varchar2
217 ,p_attribute10 in varchar2 default hr_api.g_varchar2
218 ,p_attribute11 in varchar2 default hr_api.g_varchar2
219 ,p_attribute12 in varchar2 default hr_api.g_varchar2
220 ,p_attribute13 in varchar2 default hr_api.g_varchar2
221 ,p_attribute14 in varchar2 default hr_api.g_varchar2
222 ,p_attribute15 in varchar2 default hr_api.g_varchar2
223 ,p_attribute16 in varchar2 default hr_api.g_varchar2
224 ,p_attribute17 in varchar2 default hr_api.g_varchar2
225 ,p_attribute18 in varchar2 default hr_api.g_varchar2
226 ,p_attribute19 in varchar2 default hr_api.g_varchar2
227 ,p_attribute20 in varchar2 default hr_api.g_varchar2
228 ,p_nus2000_code in varchar2 default hr_api.g_varchar2
229 ,p_highest_level in varchar2 default hr_api.g_varchar2
230 ,p_grade_point_avg in varchar2 default hr_api.g_varchar2
231 ,p_no_of_credits in varchar2 default hr_api.g_varchar2
232 ,p_professional_body_name in varchar2 default hr_api.g_varchar2
233 ,p_membership_number in varchar2 default hr_api.g_varchar2
234 ,p_membership_category in varchar2 default hr_api.g_varchar2
235 ,p_subscription_payment_method in varchar2 default hr_api.g_varchar2
236 ,p_object_version_number in out nocopy number
237 ) IS
238 -- Declare cursors and local variables
239 l_proc VARCHAR2(72) := g_package||'create_no_qualification';
240 l_legislation_code VARCHAR2(2);
241 l_territory_code VARCHAR2(2);
242
243 --
244 cursor csr_leg_code is
245 select pbg.legislation_code
246 from per_business_groups_perf pbg
247 , per_qualifications qua
248 where qua.qualification_id = p_qualification_id
249 and pbg.business_group_id (+) = qua.business_group_id;
250
251 --
252 BEGIN
253 hr_utility.set_location('Entering:'|| l_proc, 10);
254 --
255 -- Validation IN addition to Row Handlers
256 --
257 -- Check that the specified business group is valid.
258 --
259 OPEN csr_leg_code;
260 FETCH csr_leg_code
261 INTO l_legislation_code;
262 IF csr_leg_code%notfound THEN
263 CLOSE csr_leg_code;
264 hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
265 hr_utility.raise_error;
266 END IF;
267 CLOSE csr_leg_code;
268 hr_utility.set_location(l_proc, 20);
269 --
270 -- Check that the legislation of the specified business group is 'NO'.
271 --
272 IF l_legislation_code <> 'NO' THEN
273 hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
274 hr_utility.set_message_token('LEG_CODE','NO');
275 hr_utility.raise_error;
276 END IF;
277 hr_utility.set_location(l_proc, 30);
278 --
279 -- Call the person business process
280 --
281 per_qualifications_api.update_qualification
282 (p_validate => p_validate
283 ,p_effective_date => p_effective_date
284 ,p_qualification_id => p_qualification_id
285 ,p_language_code => p_language_code
286 ,p_qualification_type_id => p_qualification_type_id
287 ,p_title => p_title
288 ,p_grade_attained => p_grade_attained
289 ,p_status => p_status
290 ,p_awarded_date => p_awarded_date
291 ,p_fee => p_fee
292 ,p_fee_currency => p_fee_currency
293 ,p_training_completed_amount => p_training_completed_amount
294 ,p_reimbursement_arrangements => p_reimbursement_arrangements
295 ,p_training_completed_units => p_training_completed_units
296 ,p_total_training_amount => p_total_training_amount
297 ,p_start_date => p_start_date
298 ,p_end_date => p_end_date
299 ,p_license_number => p_license_number
300 ,p_expiry_date => p_expiry_date
301 ,p_license_restrictions => p_license_restrictions
302 ,p_projected_completion_date => p_projected_completion_date
303 ,p_awarding_body => p_awarding_body
304 ,p_tuition_method => p_tuition_method
305 ,p_group_ranking => p_group_ranking
306 ,p_comments => p_comments
307 ,p_attendance_id => p_attendance_id
308 ,p_attribute_category => p_attribute_category
309 ,p_attribute1 => p_attribute1
310 ,p_attribute2 => p_attribute2
311 ,p_attribute3 => p_attribute3
312 ,p_attribute4 => p_attribute4
313 ,p_attribute5 => p_attribute5
314 ,p_attribute6 => p_attribute6
315 ,p_attribute7 => p_attribute7
316 ,p_attribute8 => p_attribute8
317 ,p_attribute9 => p_attribute9
318 ,p_attribute10 => p_attribute10
319 ,p_attribute11 => p_attribute11
320 ,p_attribute12 => p_attribute12
321 ,p_attribute13 => p_attribute13
322 ,p_attribute14 => p_attribute14
323 ,p_attribute15 => p_attribute15
324 ,p_attribute16 => p_attribute16
325 ,p_attribute17 => p_attribute17
326 ,p_attribute18 => p_attribute18
327 ,p_attribute19 => p_attribute19
328 ,p_attribute20 => p_attribute20
329 ,p_qua_information_category => 'NO'
330 ,p_qua_information1 => p_nus2000_code
331 ,p_qua_information2 => p_highest_level
332 ,p_qua_information3 => p_grade_point_avg
333 ,p_qua_information4 => p_no_of_credits
334 ,p_professional_body_name => p_professional_body_name
335 ,p_membership_number => p_membership_number
336 ,p_membership_category => p_membership_category
337 ,p_subscription_payment_method => p_subscription_payment_method
338 ,p_object_version_number => p_object_version_number
339 );
340 --
341 hr_utility.set_location(' Leaving:'||l_proc, 40);
342 --
343 end update_no_qualification;
344
345
346 end hr_no_qualification_api;