[Home] [Help]
PACKAGE BODY: APPS.HR_NO_JOB_API
Source
1 Package Body hr_no_job_api as
2 /* $Header: pejobnoi.pkb 120.0 2005/05/31 10:46:35 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' hr_no_job_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_no_job >------------------------------------|
10 -- ----------------------------------------------------------------------------
11 procedure create_no_job
12 (p_validate in boolean
13 ,p_job_group_id in number
14 ,p_business_group_id in number
15 ,p_date_from in date
16 ,p_comments in varchar2
17 ,p_date_to in date
18 ,p_approval_authority in number
19 ,p_benchmark_job_flag in varchar2
20 ,p_benchmark_job_id in number
21 ,p_emp_rights_flag in varchar2
22 ,p_attribute_category in varchar2
23 ,p_attribute1 in varchar2
24 ,p_attribute2 in varchar2
25 ,p_attribute3 in varchar2
26 ,p_attribute4 in varchar2
27 ,p_attribute5 in varchar2
28 ,p_attribute6 in varchar2
29 ,p_attribute7 in varchar2
30 ,p_attribute8 in varchar2
31 ,p_attribute9 in varchar2
32 ,p_attribute10 in varchar2
33 ,p_attribute11 in varchar2
34 ,p_attribute12 in varchar2
35 ,p_attribute13 in varchar2
36 ,p_attribute14 in varchar2
37 ,p_attribute15 in varchar2
38 ,p_attribute16 in varchar2
39 ,p_attribute17 in varchar2
40 ,p_attribute18 in varchar2
41 ,p_attribute19 in varchar2
42 ,p_attribute20 in varchar2
43 ,p_ssb_position_code in varchar2
44 ,p_working_title in varchar2
45 ,p_segment1 in varchar2
46 ,p_segment2 in varchar2
47 ,p_segment3 in varchar2
48 ,p_segment4 in varchar2
49 ,p_segment5 in varchar2
50 ,p_segment6 in varchar2
51 ,p_segment7 in varchar2
52 ,p_segment8 in varchar2
53 ,p_segment9 in varchar2
54 ,p_segment10 in varchar2
55 ,p_segment11 in varchar2
56 ,p_segment12 in varchar2
57 ,p_segment13 in varchar2
58 ,p_segment14 in varchar2
59 ,p_segment15 in varchar2
60 ,p_segment16 in varchar2
61 ,p_segment17 in varchar2
62 ,p_segment18 in varchar2
63 ,p_segment19 in varchar2
64 ,p_segment20 in varchar2
65 ,p_segment21 in varchar2
66 ,p_segment22 in varchar2
67 ,p_segment23 in varchar2
68 ,p_segment24 in varchar2
69 ,p_segment25 in varchar2
70 ,p_segment26 in varchar2
71 ,p_segment27 in varchar2
72 ,p_segment28 in varchar2
73 ,p_segment29 in varchar2
74 ,p_segment30 in varchar2
75 ,p_concat_segments in varchar2
76 ,p_job_id out nocopy number
77 ,p_object_version_number out nocopy number
78 ,p_job_definition_id out nocopy number
79 ,p_name out nocopy varchar2
80 ) is
81 --
82 -- Declare cursors and local variables
83 --
84 l_proc varchar2(72) := g_package||'create_no_job';
85 l_legislation_code varchar2(2);
86 --
87 cursor csr_bg is
88 select legislation_code
89 from per_business_groups pbg
90 where pbg.business_group_id = p_business_group_id;
91 --
92 begin
93 hr_utility.set_location('Entering:'|| l_proc, 5);
94 --
95 -- Validation in addition to Row Handlers
96 --
97 -- Check that the specified business group is valid.
98 --
99 open csr_bg;
100 fetch csr_bg
101 into l_legislation_code;
102 if csr_bg%notfound then
103 close csr_bg;
104 hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
105 hr_utility.raise_error;
106 end if;
107 close csr_bg;
108 --
109 -- Check that the legislation of the specified business group is 'NO'.
110 --
111 if l_legislation_code <> 'NO' then
112 hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
113 hr_utility.set_message_token('LEG_CODE','NO');
114 hr_utility.raise_error;
115 end if;
116
117 hr_utility.set_location(l_proc, 6);
118 --
119 -- Call the person business process
120 --
121 hr_job_api.create_job
122 (p_validate => p_validate
123 ,p_job_group_id => p_job_group_id
124 ,p_business_group_id => p_business_group_id
125 ,p_date_from => p_date_from
126 ,p_comments => p_comments
127 ,p_date_to => p_date_to
128 ,p_approval_authority => p_approval_authority
129 ,p_benchmark_job_flag => p_benchmark_job_flag
130 ,p_benchmark_job_id => p_benchmark_job_id
131 ,p_emp_rights_flag => p_emp_rights_flag
132 ,p_attribute_category => p_attribute_category
133 ,p_attribute1 => p_attribute1
134 ,p_attribute2 => p_attribute2
135 ,p_attribute3 => p_attribute3
136 ,p_attribute4 => p_attribute4
137 ,p_attribute5 => p_attribute5
138 ,p_attribute6 => p_attribute6
139 ,p_attribute7 => p_attribute7
140 ,p_attribute8 => p_attribute8
141 ,p_attribute9 => p_attribute9
142 ,p_attribute10 => p_attribute10
143 ,p_attribute11 => p_attribute11
144 ,p_attribute12 => p_attribute12
145 ,p_attribute13 => p_attribute13
146 ,p_attribute14 => p_attribute14
147 ,p_attribute15 => p_attribute15
148 ,p_attribute16 => p_attribute16
149 ,p_attribute17 => p_attribute17
150 ,p_attribute18 => p_attribute18
151 ,p_attribute19 => p_attribute19
152 ,p_attribute20 => p_attribute20
153 ,p_job_information_category => 'NO'
154 ,p_job_information1 => p_ssb_position_code
155 ,p_job_information2 => p_working_title
156 ,p_segment1 => p_segment1
157 ,p_segment2 => p_segment2
158 ,p_segment3 => p_segment3
159 ,p_segment4 => p_segment4
160 ,p_segment5 => p_segment5
161 ,p_segment6 => p_segment6
162 ,p_segment7 => p_segment7
163 ,p_segment8 => p_segment8
164 ,p_segment9 => p_segment9
165 ,p_segment10 => p_segment10
166 ,p_segment11 => p_segment11
167 ,p_segment12 => p_segment12
168 ,p_segment13 => p_segment13
169 ,p_segment14 => p_segment14
170 ,p_segment15 => p_segment15
171 ,p_segment16 => p_segment16
172 ,p_segment17 => p_segment17
173 ,p_segment18 => p_segment18
174 ,p_segment19 => p_segment19
175 ,p_segment20 => p_segment20
176 ,p_segment21 => p_segment21
177 ,p_segment22 => p_segment22
178 ,p_segment23 => p_segment23
179 ,p_segment24 => p_segment24
180 ,p_segment25 => p_segment25
181 ,p_segment26 => p_segment26
182 ,p_segment27 => p_segment27
183 ,p_segment28 => p_segment28
184 ,p_segment29 => p_segment29
185 ,p_segment30 => p_segment30
186 ,p_concat_segments => p_concat_segments
187 ,p_job_id => p_job_id
188 ,p_object_version_number => p_object_version_number
189 ,p_job_definition_id => p_job_definition_id
190 ,p_name => p_name
191 );
192 --
193 hr_utility.set_location(' Leaving:'||l_proc, 7);
194 end create_no_job;
195
196 --
197 -- ----------------------------------------------------------------------------
198 -- |------------------------< update_no_job >-------------------------------------|
199 -- ----------------------------------------------------------------------------
200 --
201 procedure update_no_job
202 (p_validate in boolean
203 ,p_job_id in number
204 ,p_object_version_number in out nocopy number
205 ,p_date_from in date
206 ,p_comments in varchar2
207 ,p_date_to in date
208 ,p_benchmark_job_flag in varchar2
209 ,p_benchmark_job_id in number
210 ,p_emp_rights_flag in varchar2
211 ,p_attribute_category in varchar2
212 ,p_attribute1 in varchar2
213 ,p_attribute2 in varchar2
214 ,p_attribute3 in varchar2
215 ,p_attribute4 in varchar2
216 ,p_attribute5 in varchar2
217 ,p_attribute6 in varchar2
218 ,p_attribute7 in varchar2
219 ,p_attribute8 in varchar2
220 ,p_attribute9 in varchar2
221 ,p_attribute10 in varchar2
222 ,p_attribute11 in varchar2
223 ,p_attribute12 in varchar2
224 ,p_attribute13 in varchar2
225 ,p_attribute14 in varchar2
226 ,p_attribute15 in varchar2
227 ,p_attribute16 in varchar2
228 ,p_attribute17 in varchar2
229 ,p_attribute18 in varchar2
230 ,p_attribute19 in varchar2
231 ,p_attribute20 in varchar2
232 ,p_ssb_position_code in varchar2
233 ,p_working_title in varchar2
234 ,p_segment1 in varchar2
235 ,p_segment2 in varchar2
236 ,p_segment3 in varchar2
237 ,p_segment4 in varchar2
238 ,p_segment5 in varchar2
239 ,p_segment6 in varchar2
240 ,p_segment7 in varchar2
241 ,p_segment8 in varchar2
242 ,p_segment9 in varchar2
243 ,p_segment10 in varchar2
244 ,p_segment11 in varchar2
245 ,p_segment12 in varchar2
246 ,p_segment13 in varchar2
247 ,p_segment14 in varchar2
248 ,p_segment15 in varchar2
249 ,p_segment16 in varchar2
250 ,p_segment17 in varchar2
251 ,p_segment18 in varchar2
252 ,p_segment19 in varchar2
253 ,p_segment20 in varchar2
254 ,p_segment21 in varchar2
255 ,p_segment22 in varchar2
256 ,p_segment23 in varchar2
257 ,p_segment24 in varchar2
258 ,p_segment25 in varchar2
259 ,p_segment26 in varchar2
260 ,p_segment27 in varchar2
261 ,p_segment28 in varchar2
262 ,p_segment29 in varchar2
263 ,p_segment30 in varchar2
264 ,p_job_definition_id out nocopy number
265 ,p_name out nocopy varchar2
266 ,p_valid_grades_changed_warning out nocopy boolean
267 ,p_effective_date in date
268 ) is
269 --
270 -- Declare cursors and local variables
271 --
272 l_proc varchar2(72) := g_package||'update_no_job';
273 l_legislation_code varchar2(2);
274 --
275 cursor csr_bg is
276 select legislation_code
277 from per_business_groups pbg
278 where pbg.business_group_id in (select pj.business_group_id
279 from per_jobs_v pj
280 where pj.job_id = p_job_id);
281 --
282 begin
283 hr_utility.set_location('Entering:'|| l_proc, 5);
284 --
285 -- Validation in addition to Row Handlers
286 --
287 -- Check that the specified business group is valid.
288 --
289 open csr_bg;
290 fetch csr_bg
291 into l_legislation_code;
292 if csr_bg%notfound then
293 close csr_bg;
294 hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
295 hr_utility.raise_error;
296 end if;
297 close csr_bg;
298 --
299 -- Check that the legislation of the specified business group is 'NO'.
300 --
301 if l_legislation_code <> 'NO' then
302 hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
303 hr_utility.set_message_token('LEG_CODE','NO');
304 hr_utility.raise_error;
305 end if;
306
307 hr_utility.set_location(l_proc, 6);
308 --
309 -- Call the person business process
310 --
311
312 hr_job_api.update_job
313 (
314 p_validate => p_validate
315 ,p_job_id => p_job_id
316 ,p_object_version_number => p_object_version_number
317 ,p_date_from => p_date_from
318 ,p_comments => p_comments
319 ,p_date_to => p_date_to
320 ,p_benchmark_job_flag => p_benchmark_job_flag
321 ,p_benchmark_job_id => p_benchmark_job_id
322 ,p_emp_rights_flag => p_emp_rights_flag
323 ,p_attribute_category => p_attribute_category
324 ,p_attribute1 => p_attribute1
325 ,p_attribute2 => p_attribute2
326 ,p_attribute3 => p_attribute3
327 ,p_attribute4 => p_attribute4
328 ,p_attribute5 => p_attribute5
329 ,p_attribute6 => p_attribute6
330 ,p_attribute7 => p_attribute7
331 ,p_attribute8 => p_attribute8
332 ,p_attribute9 => p_attribute9
333 ,p_attribute10 => p_attribute10
334 ,p_attribute11 => p_attribute11
335 ,p_attribute12 => p_attribute12
336 ,p_attribute13 => p_attribute13
337 ,p_attribute14 => p_attribute14
338 ,p_attribute15 => p_attribute15
339 ,p_attribute16 => p_attribute16
340 ,p_attribute17 => p_attribute17
341 ,p_attribute18 => p_attribute18
342 ,p_attribute19 => p_attribute19
343 ,p_attribute20 => p_attribute20
344 ,p_job_information_category => 'NO'
345 ,p_job_information1 => p_ssb_position_code
346 ,p_job_information2 => p_working_title
347 ,p_segment1 => p_segment1
348 ,p_segment2 => p_segment2
349 ,p_segment3 => p_segment3
350 ,p_segment4 => p_segment4
351 ,p_segment5 => p_segment5
352 ,p_segment6 => p_segment6
353 ,p_segment7 => p_segment7
354 ,p_segment8 => p_segment8
355 ,p_segment9 => p_segment9
356 ,p_segment11 => p_segment10
357 ,p_segment12 => p_segment12
358 ,p_segment13 => p_segment13
359 ,p_segment14 => p_segment14
360 ,p_segment15 => p_segment15
361 ,p_segment16 => p_segment16
362 ,p_segment17 => p_segment17
363 ,p_segment18 => p_segment18
364 ,p_segment19 => p_segment19
365 ,p_segment20 => p_segment20
366 ,p_segment21 => p_segment21
367 ,p_segment22 => p_segment22
368 ,p_segment23 => p_segment23
369 ,p_segment24 => p_segment24
370 ,p_segment25 => p_segment25
371 ,p_segment26 => p_segment26
372 ,p_segment27 => p_segment27
373 ,p_segment28 => p_segment28
374 ,p_segment29 => p_segment29
375 ,p_segment30 => p_segment30
376 ,p_job_definition_id => p_job_definition_id
377 ,p_name => p_name
378 ,p_valid_grades_changed_warning => p_valid_grades_changed_warning
379 ,p_effective_date => p_effective_date
380 );
381 --
382 hr_utility.set_location(' Leaving:'||l_proc, 7);
383 end update_no_job;
384
385 --
386 end hr_no_job_api;