[Home] [Help]
PACKAGE BODY: APPS.HR_FORM_WINDOWS_API
Source
1 Package Body hr_form_windows_api as
2 /* $Header: hrfwnapi.pkb 115.3 2002/12/16 10:18:35 hjonnala noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' hr_form_windows_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |--------------------------< create_form_window >--------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_form_window
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_language_code in varchar2 default hr_api.userenv_lang
16 ,p_application_id in number
17 ,p_form_id in number
18 ,p_window_name in varchar2
19 ,p_user_window_name in varchar2
20 ,p_description in varchar2 default null
21 ,p_height in number default null
22 ,p_title in varchar2 default null
23 ,p_width in number default null
24 ,p_x_position in number default null
25 ,p_y_position in number default null
26 ,p_information_category in varchar2 default null
27 ,p_information1 in varchar2 default null
28 ,p_information2 in varchar2 default null
29 ,p_information3 in varchar2 default null
30 ,p_information4 in varchar2 default null
31 ,p_information5 in varchar2 default null
32 ,p_information6 in varchar2 default null
33 ,p_information7 in varchar2 default null
34 ,p_information8 in varchar2 default null
35 ,p_information9 in varchar2 default null
36 ,p_information10 in varchar2 default null
37 ,p_information11 in varchar2 default null
38 ,p_information12 in varchar2 default null
39 ,p_information13 in varchar2 default null
40 ,p_information14 in varchar2 default null
41 ,p_information15 in varchar2 default null
42 ,p_information16 in varchar2 default null
43 ,p_information17 in varchar2 default null
44 ,p_information18 in varchar2 default null
45 ,p_information19 in varchar2 default null
46 ,p_information20 in varchar2 default null
47 ,p_information21 in varchar2 default null
48 ,p_information22 in varchar2 default null
49 ,p_information23 in varchar2 default null
50 ,p_information24 in varchar2 default null
51 ,p_information25 in varchar2 default null
52 ,p_information26 in varchar2 default null
53 ,p_information27 in varchar2 default null
54 ,p_information28 in varchar2 default null
55 ,p_information29 in varchar2 default null
56 ,p_information30 in varchar2 default null
57 ,p_form_window_id out nocopy number
58 ,p_object_version_number out nocopy number
59 ) is
60 --
61 -- Declare cursors and local variables
62 --
63
64 l_proc varchar2(72) := g_package||'create_form_window';
65 l_window_property_id number;
66 l_form_window_id number;
67 l_object_version_number number;
68 l_language_code fnd_languages.language_code%TYPE;
69
70 begin
71 hr_utility.set_location('Entering:'|| l_proc, 10);
72 --
73 -- Issue a savepoint
74 --
75 savepoint create_form_window;
76 --
77 -- Truncate the time portion from all IN date parameters
78 --
79 -- p_effective_date := TRUNC(p_effective_date);
80 --
81 -- Validate the language parameter. l_language_code should be passed
82 -- instead of p_language_code from now on, to allow an IN OUT parameter to
83 -- be passed through.
84 --
85 l_language_code := p_language_code;
86 hr_api.validate_language_code(p_language_code => l_language_code);
87 --
88 hr_utility.set_location(l_proc, 20);
89 --
90 --
91 -- Call Before Process User Hook
92 --
93 begin
94 hr_form_windows_api_bk1.create_form_window_b
95 (p_effective_date => TRUNC(p_effective_date)
96 ,p_language_code => l_language_code
97 ,p_application_id => p_application_id
98 ,p_form_id => p_form_id
99 ,p_window_name => p_window_name
100 ,p_user_window_name => p_user_window_name
101 ,p_description => p_description
102 ,p_height => p_height
103 ,p_title => p_title
104 ,p_width => p_width
105 ,p_x_position => p_x_position
106 ,p_y_position => p_y_position
107 ,p_information_category => p_information_category
108 ,p_information1 => p_information1
109 ,p_information2 => p_information2
110 ,p_information3 => p_information3
111 ,p_information4 => p_information4
112 ,p_information5 => p_information5
113 ,p_information6 => p_information6
114 ,p_information7 => p_information7
115 ,p_information8 => p_information8
116 ,p_information9 => p_information9
117 ,p_information10 => p_information10
118 ,p_information11 => p_information11
119 ,p_information12 => p_information12
120 ,p_information13 => p_information13
121 ,p_information14 => p_information14
122 ,p_information15 => p_information15
123 ,p_information16 => p_information16
124 ,p_information17 => p_information17
125 ,p_information18 => p_information18
126 ,p_information19 => p_information19
127 ,p_information20 => p_information20
128 ,p_information21 => p_information21
129 ,p_information22 => p_information22
130 ,p_information23 => p_information23
131 ,p_information24 => p_information24
132 ,p_information25 => p_information25
133 ,p_information26 => p_information26
134 ,p_information27 => p_information27
135 ,p_information28 => p_information28
136 ,p_information29 => p_information29
137 ,p_information30 => p_information30);
138 exception
139 when hr_api.cannot_find_prog_unit then
140 hr_api.cannot_find_prog_unit_error
141 (p_module_name => 'create_form_window'
142 ,p_hook_type => 'BP'
143 );
144 end;
145
146 --
147 -- Process Logic
148 --
149 hr_utility.set_location('At:'|| l_proc, 15);
150
151 hr_fwn_ins.ins( p_application_id => p_application_id
152 ,p_form_id => p_form_id
153 ,p_window_name => p_window_name
154 ,p_form_window_id => l_form_window_id
155 ,p_object_version_number => l_object_version_number);
156
157 hr_utility.set_location('At:'|| l_proc, 20);
158
159 hr_fwt_ins.ins_tl(p_language_code => l_language_code
160 ,p_form_window_id => l_form_window_id
161 ,p_user_window_name => p_user_window_name
162 ,p_description => p_description);
163
164 hr_utility.set_location('At:'|| l_proc, 25);
165
166 hr_window_properties_bsi.create_window_property(
167 p_effective_date => TRUNC(p_effective_date)
168 ,p_language_code => l_language_code
169 ,p_form_window_id => l_form_window_id
170 ,p_height => p_height
171 ,p_title => p_title
172 ,p_width => p_width
173 ,p_x_position => p_x_position
174 ,p_y_position => p_y_position
175 ,p_information_category => p_information_category
176 ,p_information1 => p_information1
177 ,p_information2 => p_information2
178 ,p_information3 => p_information3
179 ,p_information4 => p_information4
180 ,p_information5 => p_information5
181 ,p_information6 => p_information6
182 ,p_information7 => p_information7
183 ,p_information8 => p_information8
184 ,p_information9 => p_information9
185 ,p_information10 => p_information10
186 ,p_information11 => p_information11
187 ,p_information12 => p_information12
188 ,p_information13 => p_information13
189 ,p_information14 => p_information14
190 ,p_information15 => p_information15
191 ,p_information16 => p_information16
192 ,p_information17 => p_information17
193 ,p_information18 => p_information18
194 ,p_information19 => p_information19
195 ,p_information20 => p_information20
196 ,p_information21 => p_information21
197 ,p_information22 => p_information22
198 ,p_information23 => p_information23
199 ,p_information24 => p_information24
200 ,p_information25 => p_information25
201 ,p_information26 => p_information26
202 ,p_information27 => p_information27
203 ,p_information28 => p_information28
204 ,p_information29 => p_information29
205 ,p_information30 => p_information30
206 ,p_window_property_id => l_window_property_id);
207
208 --
209 -- Call After Process User Hook
210 --
211 hr_utility.set_location('At:'|| l_proc, 30);
212
213 begin
214 hr_form_windows_api_bk1.create_form_window_a
215 (p_effective_date => TRUNC(p_effective_date)
216 ,p_language_code => l_language_code
217 ,p_application_id => p_application_id
218 ,p_form_id => p_form_id
219 ,p_window_name => p_window_name
220 ,p_user_window_name => p_user_window_name
221 ,p_description => p_description
222 ,p_height => p_height
223 ,p_title => p_title
224 ,p_width => p_width
225 ,p_x_position => p_x_position
226 ,p_y_position => p_y_position
227 ,p_information_category => p_information_category
228 ,p_information1 => p_information1
229 ,p_information2 => p_information2
230 ,p_information3 => p_information3
231 ,p_information4 => p_information4
232 ,p_information5 => p_information5
233 ,p_information6 => p_information6
234 ,p_information7 => p_information7
235 ,p_information8 => p_information8
236 ,p_information9 => p_information9
237 ,p_information10 => p_information10
238 ,p_information11 => p_information11
239 ,p_information12 => p_information12
240 ,p_information13 => p_information13
241 ,p_information14 => p_information14
242 ,p_information15 => p_information15
243 ,p_information16 => p_information16
244 ,p_information17 => p_information17
245 ,p_information18 => p_information18
246 ,p_information19 => p_information19
247 ,p_information20 => p_information20
248 ,p_information21 => p_information21
249 ,p_information22 => p_information22
250 ,p_information23 => p_information23
251 ,p_information24 => p_information24
252 ,p_information25 => p_information25
253 ,p_information26 => p_information26
254 ,p_information27 => p_information27
255 ,p_information28 => p_information28
256 ,p_information29 => p_information29
257 ,p_information30 => p_information30
258 ,p_form_window_id => l_form_window_id
259 ,p_object_version_number => l_object_version_number);
260
261 exception
262 when hr_api.cannot_find_prog_unit then
263 hr_api.cannot_find_prog_unit_error
264 (p_module_name => 'create_form_window'
265 ,p_hook_type => 'AP'
266 );
267 end;
268 hr_utility.set_location('At:'|| l_proc, 35);
269
270 --
271 -- When in validation only mode raise the Validate_Enabled exception
272 --
273 if p_validate then
274 raise hr_api.validate_enabled;
275 end if;
276 --
277 -- Set all output arguments
278 --
279 p_form_window_id := l_form_window_id;
280 p_object_version_number := l_object_version_number;
281 --
282 hr_utility.set_location(' Leaving:'||l_proc, 70);
283 exception
284 when hr_api.validate_enabled then
285 --
286 -- As the Validate_Enabled exception has been raised
287 -- we must rollback to the savepoint
288 --
289 rollback to create_form_window;
290 --
291 -- Only set output warning arguments
292 -- (Any key or derived arguments must be set to null
293 -- when validation only mode is being used.)
294 --
295 p_form_window_id := null;
296 p_object_version_number := null;
297 hr_utility.set_location(' Leaving:'||l_proc, 80);
298 when others then
299 --
300 -- A validation or unexpected error has occured
301 --
302 rollback to create_form_window;
303 -- Set OUT parameters.
304 p_form_window_id := null;
305 p_object_version_number := null;
306 hr_utility.set_location(' Leaving:'||l_proc, 90);
307 raise;
308 end create_form_window;
309 --
310 -- ----------------------------------------------------------------------------
311 -- |--------------------------< delete_form_window >--------------------------|
312 -- ----------------------------------------------------------------------------
313 --
314 procedure delete_form_window
315 (p_validate in boolean default false
316 ,p_form_window_id in number
317 ,p_object_version_number in number
318 ) is
319 --
320 -- Declare cursors and local variables
321 --
322
323 l_proc varchar2(72) := g_package||'delete_form_window';
324 begin
325 hr_utility.set_location('Entering:'|| l_proc, 10);
326 --
327 -- Issue a savepoint
328 --
329 savepoint delete_form_window;
330
331 --
332 -- Call Before Process User Hook
333 --
334 begin
335 hr_form_windows_api_bk2.delete_form_window_b(
339 when hr_api.cannot_find_prog_unit then
336 p_form_window_id => p_form_window_id
337 ,p_object_version_number => p_object_version_number );
338 exception
340 hr_api.cannot_find_prog_unit_error
341 (p_module_name => 'delete_form_window'
342 ,p_hook_type => 'BP'
343 );
344 end;
345
346 --
347 -- Process Logic
348 --
349
350 hr_utility.set_location('At:'|| l_proc, 20);
351
352 hr_fwn_shd.lck( p_form_window_id => p_form_window_id
353 ,p_object_version_number => p_object_version_number);
354
355 hr_utility.set_location('At:'|| l_proc, 25);
356
357 hr_window_properties_bsi.delete_window_property
358 (p_form_window_id => p_form_window_id);
359
360 hr_utility.set_location('At:'|| l_proc, 30);
361
362 hr_fwt_del.del_tl( p_form_window_id => p_form_window_id);
363
364 hr_utility.set_location('At:'|| l_proc, 40);
365
366 hr_fwn_del.del( p_form_window_id => p_form_window_id
367 ,p_object_version_number => p_object_version_number);
368
369 hr_utility.set_location('At:'|| l_proc, 45);
370
371 --
372 -- Call After Process User Hook
373 --
374 begin
375 hr_form_windows_api_bk2.delete_form_window_a(
376 p_form_window_id => p_form_window_id
377 ,p_object_version_number => p_object_version_number );
378 exception
379 when hr_api.cannot_find_prog_unit then
380 hr_api.cannot_find_prog_unit_error
381 (p_module_name => 'delete_form_window'
382 ,p_hook_type => 'AP'
383 );
384 end;
385
386 hr_utility.set_location('At:'|| l_proc, 50);
387 --
388 -- When in validation only mode raise the Validate_Enabled exception
389 --
390 if p_validate then
391 raise hr_api.validate_enabled;
392 end if;
393 --
394 hr_utility.set_location(' Leaving:'||l_proc, 70);
395 exception
396 when hr_api.validate_enabled then
397 --
398 -- As the Validate_Enabled exception has been raised
399 -- we must rollback to the savepoint
400 --
401 rollback to delete_form_window;
402 --
403 -- Only set output warning arguments
404 -- (Any key or derived arguments must be set to null
405 -- when validation only mode is being used.)
406 --
407 hr_utility.set_location(' Leaving:'||l_proc, 80);
408 when others then
409 --
410 -- A validation or unexpected error has occured
411 --
412 rollback to delete_form_window;
413 hr_utility.set_location(' Leaving:'||l_proc, 90);
414 raise;
415 end delete_form_window;
416 --
417 -- ----------------------------------------------------------------------------
418 -- |--------------------------< update_form_window >--------------------------|
419 -- ----------------------------------------------------------------------------
420 --
421 procedure update_form_window
422 (p_validate in boolean default false
423 ,p_effective_date in date
424 ,p_language_code in varchar2 default hr_api.userenv_lang
425 --,p_application_id in number default hr_api.g_number
426 --,p_form_id in number default hr_api.g_number
427 ,p_form_window_id in number
428 ,p_object_version_number in out nocopy number
429 ,p_window_name in varchar2 default hr_api.g_varchar2
430 ,p_user_window_name in varchar2 default hr_api.g_varchar2
431 ,p_description in varchar2 default hr_api.g_varchar2
432 ,p_height in number default hr_api.g_number
433 ,p_title in varchar2 default hr_api.g_varchar2
434 ,p_width in number default hr_api.g_number
435 ,p_x_position in number default hr_api.g_number
436 ,p_y_position in number default hr_api.g_number
437 ,p_information_category in varchar2 default hr_api.g_varchar2
438 ,p_information1 in varchar2 default hr_api.g_varchar2
439 ,p_information2 in varchar2 default hr_api.g_varchar2
440 ,p_information3 in varchar2 default hr_api.g_varchar2
441 ,p_information4 in varchar2 default hr_api.g_varchar2
442 ,p_information5 in varchar2 default hr_api.g_varchar2
443 ,p_information6 in varchar2 default hr_api.g_varchar2
444 ,p_information7 in varchar2 default hr_api.g_varchar2
445 ,p_information8 in varchar2 default hr_api.g_varchar2
446 ,p_information9 in varchar2 default hr_api.g_varchar2
447 ,p_information10 in varchar2 default hr_api.g_varchar2
448 ,p_information11 in varchar2 default hr_api.g_varchar2
449 ,p_information12 in varchar2 default hr_api.g_varchar2
450 ,p_information13 in varchar2 default hr_api.g_varchar2
451 ,p_information14 in varchar2 default hr_api.g_varchar2
452 ,p_information15 in varchar2 default hr_api.g_varchar2
453 ,p_information16 in varchar2 default hr_api.g_varchar2
454 ,p_information17 in varchar2 default hr_api.g_varchar2
455 ,p_information18 in varchar2 default hr_api.g_varchar2
456 ,p_information19 in varchar2 default hr_api.g_varchar2
457 ,p_information20 in varchar2 default hr_api.g_varchar2
461 ,p_information24 in varchar2 default hr_api.g_varchar2
458 ,p_information21 in varchar2 default hr_api.g_varchar2
459 ,p_information22 in varchar2 default hr_api.g_varchar2
460 ,p_information23 in varchar2 default hr_api.g_varchar2
462 ,p_information25 in varchar2 default hr_api.g_varchar2
463 ,p_information26 in varchar2 default hr_api.g_varchar2
464 ,p_information27 in varchar2 default hr_api.g_varchar2
465 ,p_information28 in varchar2 default hr_api.g_varchar2
466 ,p_information29 in varchar2 default hr_api.g_varchar2
467 ,p_information30 in varchar2 default hr_api.g_varchar2
468 ) is
469 --
470 -- Declare cursors and local variables
471 --
472
473 CURSOR cur_form_canvas
474 IS
475 SELECT fcn.form_canvas_id
476 ,fcn.object_version_number
477 ,fwn.height
478 ,fwn.width
479 FROM hr_form_canvases fcn
480 ,hr_form_windows fwn
481 WHERE fcn.canvas_type = 'CONTENT'
482 AND fcn.form_window_id = fwn.form_window_id
483 AND fwn.form_window_id = p_form_window_id;
484
485 l_proc varchar2(72) := g_package||'update_form_window';
486 l_object_version_number number;
487 l_language_code fnd_languages.language_code%TYPE;
488 l_temp_ovn number := p_object_version_number;
489 begin
490 hr_utility.set_location('Entering:'|| l_proc, 10);
491 --
492 -- Issue a savepoint
493 --
494 savepoint update_form_window;
495 --
496 -- Truncate the time portion from all IN date parameters
497 --
498 -- p_effective_date := TRUNC(p_effective_date);
499 l_object_version_number := p_object_version_number;
500 --
501 -- Validate the language parameter. l_language_code should be passed
502 -- instead of p_language_code from now on, to allow an IN OUT parameter to
503 -- be passed through.
504 --
505 l_language_code := p_language_code;
506 hr_api.validate_language_code(p_language_code => l_language_code);
507 --
508 hr_utility.set_location(l_proc, 20);
509 --
510 --
511 -- Call Before Process User Hook
512 --
513 begin
514 hr_form_windows_api_bk3.update_form_window_b
515 (p_effective_date => TRUNC(p_effective_date)
516 ,p_language_code => l_language_code
517 --,p_application_id => p_application_id
518 --,p_form_id => p_form_id
519 ,p_form_window_id => p_form_window_id
520 ,p_object_version_number => l_object_version_number
521 ,p_window_name => p_window_name
522 ,p_user_window_name => p_user_window_name
523 ,p_description => p_description
524 ,p_height => p_height
525 ,p_title => p_title
526 ,p_width => p_width
527 ,p_x_position => p_x_position
528 ,p_y_position => p_y_position
529 ,p_information_category => p_information_category
530 ,p_information1 => p_information1
531 ,p_information2 => p_information2
532 ,p_information3 => p_information3
533 ,p_information4 => p_information4
534 ,p_information5 => p_information5
535 ,p_information6 => p_information6
536 ,p_information7 => p_information7
537 ,p_information8 => p_information8
538 ,p_information9 => p_information9
539 ,p_information10 => p_information10
540 ,p_information11 => p_information11
541 ,p_information12 => p_information12
542 ,p_information13 => p_information13
543 ,p_information14 => p_information14
544 ,p_information15 => p_information15
545 ,p_information16 => p_information16
546 ,p_information17 => p_information17
547 ,p_information18 => p_information18
548 ,p_information19 => p_information19
549 ,p_information20 => p_information20
550 ,p_information21 => p_information21
551 ,p_information22 => p_information22
552 ,p_information23 => p_information23
553 ,p_information24 => p_information24
554 ,p_information25 => p_information25
555 ,p_information26 => p_information26
556 ,p_information27 => p_information27
557 ,p_information28 => p_information28
558 ,p_information29 => p_information29
559 ,p_information30 => p_information30);
560 exception
561 when hr_api.cannot_find_prog_unit then
562 hr_api.cannot_find_prog_unit_error
563 (p_module_name => 'update_form_window'
564 ,p_hook_type => 'BP'
565 );
566 end;
567
568 --
569 -- Process Logic
570 --
571 hr_utility.set_location('At:'|| l_proc, 20);
572
573 hr_fwn_upd.upd(p_form_window_id => p_form_window_id
574 --,p_application_id => p_application_id
575 --,p_form_id => p_form_id
576 ,p_window_name => p_window_name
577 ,p_object_version_number => l_object_version_number);
578
582 ,p_form_window_id => p_form_window_id
579 hr_utility.set_location('At:'|| l_proc, 25);
580
581 hr_fwt_upd.upd_tl(p_language_code => l_language_code
583 ,p_user_window_name => p_user_window_name
584 ,p_description => p_description);
585
586 hr_utility.set_location('At:'|| l_proc, 30);
587
588 hr_window_properties_bsi.update_window_property(
589 p_effective_date => TRUNC(p_effective_date)
590 ,p_language_code => l_language_code
591 ,p_form_window_id => p_form_window_id
592 ,p_height => p_height
593 ,p_title => p_title
594 ,p_width => p_width
595 ,p_x_position => p_x_position
596 ,p_y_position => p_y_position
597 ,p_information_category => p_information_category
598 ,p_information1 => p_information1
599 ,p_information2 => p_information2
600 ,p_information3 => p_information3
601 ,p_information4 => p_information4
602 ,p_information5 => p_information5
603 ,p_information6 => p_information6
604 ,p_information7 => p_information7
605 ,p_information8 => p_information8
606 ,p_information9 => p_information9
607 ,p_information10 => p_information10
608 ,p_information11 => p_information11
609 ,p_information12 => p_information12
610 ,p_information13 => p_information13
611 ,p_information14 => p_information14
612 ,p_information15 => p_information15
613 ,p_information16 => p_information16
614 ,p_information17 => p_information17
615 ,p_information18 => p_information18
616 ,p_information19 => p_information19
617 ,p_information20 => p_information20
618 ,p_information21 => p_information21
619 ,p_information22 => p_information22
620 ,p_information23 => p_information23
621 ,p_information24 => p_information24
622 ,p_information25 => p_information25
623 ,p_information26 => p_information26
624 ,p_information27 => p_information27
625 ,p_information28 => p_information28
626 ,p_information29 => p_information29
627 ,p_information30 => p_information30);
628
629 hr_utility.set_location('At:'|| l_proc, 35);
630
631 FOR cur_rec in cur_form_canvas LOOP
632 hr_form_canvases_api.update_form_canvas(
633 p_effective_date => TRUNC(p_effective_date)
634 ,p_form_canvas_id => cur_rec.form_canvas_id
635 ,p_height => cur_rec.height
636 ,p_width => cur_rec.width
637 ,p_object_version_number => cur_rec.object_version_number
638 );
639 END LOOP;
640
641 hr_utility.set_location('At:'|| l_proc, 40);
642
643 --
644 -- Call After Process User Hook
645 --
646 begin
647 hr_form_windows_api_bk3.update_form_window_a
648 (p_effective_date => TRUNC(p_effective_date)
649 ,p_language_code => l_language_code
650 --,p_application_id => p_application_id
651 --,p_form_id => p_form_id
652 ,p_form_window_id => p_form_window_id
653 ,p_object_version_number => l_object_version_number
654 ,p_window_name => p_window_name
655 ,p_user_window_name => p_user_window_name
656 ,p_description => p_description
657 ,p_height => p_height
658 ,p_title => p_title
659 ,p_width => p_width
660 ,p_x_position => p_x_position
661 ,p_y_position => p_y_position
662 ,p_information_category => p_information_category
663 ,p_information1 => p_information1
664 ,p_information2 => p_information2
665 ,p_information3 => p_information3
666 ,p_information4 => p_information4
667 ,p_information5 => p_information5
668 ,p_information6 => p_information6
669 ,p_information7 => p_information7
670 ,p_information8 => p_information8
671 ,p_information9 => p_information9
672 ,p_information10 => p_information10
673 ,p_information11 => p_information11
674 ,p_information12 => p_information12
675 ,p_information13 => p_information13
676 ,p_information14 => p_information14
677 ,p_information15 => p_information15
678 ,p_information16 => p_information16
679 ,p_information17 => p_information17
680 ,p_information18 => p_information18
681 ,p_information19 => p_information19
682 ,p_information20 => p_information20
683 ,p_information21 => p_information21
684 ,p_information22 => p_information22
685 ,p_information23 => p_information23
686 ,p_information24 => p_information24
687 ,p_information25 => p_information25
688 ,p_information26 => p_information26
689 ,p_information27 => p_information27
690 ,p_information28 => p_information28
691 ,p_information29 => p_information29
692 ,p_information30 => p_information30);
693 exception
694 when hr_api.cannot_find_prog_unit then
695 hr_api.cannot_find_prog_unit_error
696 (p_module_name => 'update_form_window'
697 ,p_hook_type => 'AP'
698 );
699 end;
700 --
701 -- When in validation only mode raise the Validate_Enabled exception
702 --
703 hr_utility.set_location('At:'|| l_proc, 45);
704
705 if p_validate then
706 raise hr_api.validate_enabled;
707 end if;
708 --
709 -- Set all output arguments
710 --
711 p_object_version_number := l_object_version_number;
712 --
713 hr_utility.set_location(' Leaving:'||l_proc, 70);
714 exception
715 when hr_api.validate_enabled then
716 --
717 -- As the Validate_Enabled exception has been raised
718 -- we must rollback to the savepoint
719 --
720 rollback to update_form_window;
721 --
722 -- Only set output warning arguments
723 -- (Any key or derived arguments must be set to null
724 -- when validation only mode is being used.)
725 -- Reset all out arguments
726 --
727 p_object_version_number := l_temp_ovn;
728 --
729 hr_utility.set_location(' Leaving:'||l_proc, 80);
730 when others then
731 --
732 -- A validation or unexpected error has occured
733 --
734 rollback to update_form_window;
735 -- Reset all in out arguments
736 --
737 p_object_version_number := l_temp_ovn;
738 hr_utility.set_location(' Leaving:'||l_proc, 90);
739 raise;
740 end update_form_window;
741 --
742 end hr_form_windows_api;