[Home] [Help]
PACKAGE BODY: APPS.HR_TEMPLATE_CONFIGURATOR_INFO
Source
1 PACKAGE BODY hr_template_configurator_info
2 /* $Header: hrtcrinf.pkb 120.0 2005/05/31 03:01:16 appldev noship $ */
3 AS
4 --
5 g_configurating BOOLEAN := FALSE;
6 g_form_template_id NUMBER;
7 g_objects t_objects := t_objects();
8 g_events t_events := t_events();
9 --
10 -- -----------------------------------------------------------------------------
11 -- |-----------------------------< configurating >-----------------------------|
12 -- -----------------------------------------------------------------------------
13 FUNCTION configurating
14 RETURN BOOLEAN
15 IS
16 BEGIN
17 RETURN(g_configurating);
18 END configurating;
19 --
20 -- -----------------------------------------------------------------------------
21 -- |---------------------------< set_configurating >---------------------------|
22 -- -----------------------------------------------------------------------------
23 PROCEDURE set_configurating
24 (p_configurating IN BOOLEAN
25 )
26 IS
27 BEGIN
28 IF (p_configurating IS NOT NULL)
29 THEN
30 g_configurating := p_configurating;
31 END IF;
32 END set_configurating;
33 --
34 -- -----------------------------------------------------------------------------
35 -- |---------------------------< form_template_id >----------------------------|
36 -- -----------------------------------------------------------------------------
37 FUNCTION form_template_id
38 RETURN NUMBER
39 IS
40 BEGIN
41 RETURN(g_form_template_id);
42 END form_template_id;
43 --
44 -- -----------------------------------------------------------------------------
45 -- |-------------------------< set_form_template_id >--------------------------|
46 -- -----------------------------------------------------------------------------
47 PROCEDURE set_form_template_id
48 (p_form_template_id IN NUMBER
49 )
50 IS
51 BEGIN
52 g_form_template_id := p_form_template_id;
53 END set_form_template_id;
54 --
55 -- -----------------------------------------------------------------------------
56 -- |-----------------------------< index_number >------------------------------|
57 -- -----------------------------------------------------------------------------
58 FUNCTION index_number
59 (p_object_type IN VARCHAR2
60 ,p_object_name IN VARCHAR2
61 ,p_event IN VARCHAR2
62 ,p_radio_button_name IN VARCHAR2 DEFAULT NULL
63 ,p_property_type IN NUMBER DEFAULT NULL
64 ,p_tab_page_name IN VARCHAR2 DEFAULT NULL
65 ,p_context_type IN VARCHAR2 DEFAULT NULL
66 ,p_segment1 IN VARCHAR2 DEFAULT NULL
67 ,p_segment2 IN VARCHAR2 DEFAULT NULL
68 ,p_segment3 IN VARCHAR2 DEFAULT NULL
69 ,p_segment4 IN VARCHAR2 DEFAULT NULL
70 ,p_segment5 IN VARCHAR2 DEFAULT NULL
71 ,p_segment6 IN VARCHAR2 DEFAULT NULL
72 ,p_segment7 IN VARCHAR2 DEFAULT NULL
73 ,p_segment8 IN VARCHAR2 DEFAULT NULL
74 ,p_segment9 IN VARCHAR2 DEFAULT NULL
75 ,p_segment10 IN VARCHAR2 DEFAULT NULL
76 ,p_segment11 IN VARCHAR2 DEFAULT NULL
77 ,p_segment12 IN VARCHAR2 DEFAULT NULL
78 ,p_segment13 IN VARCHAR2 DEFAULT NULL
79 ,p_segment14 IN VARCHAR2 DEFAULT NULL
80 ,p_segment15 IN VARCHAR2 DEFAULT NULL
81 ,p_segment16 IN VARCHAR2 DEFAULT NULL
82 ,p_segment17 IN VARCHAR2 DEFAULT NULL
83 ,p_segment18 IN VARCHAR2 DEFAULT NULL
84 ,p_segment19 IN VARCHAR2 DEFAULT NULL
85 ,p_segment20 IN VARCHAR2 DEFAULT NULL
86 ,p_segment21 IN VARCHAR2 DEFAULT NULL
87 ,p_segment22 IN VARCHAR2 DEFAULT NULL
88 ,p_segment23 IN VARCHAR2 DEFAULT NULL
89 ,p_segment24 IN VARCHAR2 DEFAULT NULL
90 ,p_segment25 IN VARCHAR2 DEFAULT NULL
91 ,p_segment26 IN VARCHAR2 DEFAULT NULL
92 ,p_segment27 IN VARCHAR2 DEFAULT NULL
93 ,p_segment28 IN VARCHAR2 DEFAULT NULL
94 ,p_segment29 IN VARCHAR2 DEFAULT NULL
95 ,p_segment30 IN VARCHAR2 DEFAULT NULL
96 )
97 RETURN NUMBER
98 IS
99 l_index_number NUMBER;
100 l_object_found BOOLEAN := FALSE;
101 BEGIN
102 l_index_number := g_objects.FIRST;
103 WHILE ( (NOT l_object_found)
104 AND (l_index_number IS NOT NULL) )
105 LOOP
106 IF ( (g_objects(l_index_number).object_type = p_object_type)
107 AND (g_objects(l_index_number).object_name = p_object_name)
108 AND (g_objects(l_index_number).event = p_event)
109 AND ( (g_objects(l_index_number).radio_button_name = p_radio_button_name)
110 OR (p_radio_button_name IS NULL) )
111 AND ( (g_objects(l_index_number).property_type = p_property_type)
112 OR (p_property_type IS NULL) )
113 AND ( (g_objects(l_index_number).tab_page_name = p_tab_page_name)
114 OR (p_tab_page_name IS NULL) )
115 AND ( (g_objects(l_index_number).context_type = p_context_type)
116 OR (p_context_type IS NULL) )
117 AND ( (g_objects(l_index_number).segment1 = p_segment1 )
118 OR (p_segment1 IS NULL) )
119 AND ( (g_objects(l_index_number).segment2 = p_segment2 )
120 OR (p_segment2 IS NULL) )
121 AND ( (g_objects(l_index_number).segment3 = p_segment3 )
122 OR (p_segment3 IS NULL) )
123 AND ( (g_objects(l_index_number).segment4 = p_segment4 )
124 OR (p_segment4 IS NULL) )
125 AND ( (g_objects(l_index_number).segment5 = p_segment5 )
126 OR (p_segment5 IS NULL) )
127 AND ( (g_objects(l_index_number).segment6 = p_segment6 )
128 OR (p_segment6 IS NULL) )
129 AND ( (g_objects(l_index_number).segment7 = p_segment7 )
130 OR (p_segment7 IS NULL) )
131 AND ( (g_objects(l_index_number).segment8 = p_segment8 )
132 OR (p_segment8 IS NULL) )
133 AND ( (g_objects(l_index_number).segment9 = p_segment9 )
134 OR (p_segment9 IS NULL) )
135 AND ( (g_objects(l_index_number).segment10 = p_segment10)
136 OR (p_segment10 IS NULL) )
137 AND ( (g_objects(l_index_number).segment11 = p_segment11)
138 OR (p_segment11 IS NULL) )
139 AND ( (g_objects(l_index_number).segment12 = p_segment12)
140 OR (p_segment12 IS NULL) )
141 AND ( (g_objects(l_index_number).segment13 = p_segment13)
142 OR (p_segment13 IS NULL) )
143 AND ( (g_objects(l_index_number).segment14 = p_segment14)
144 OR (p_segment14 IS NULL) )
145 AND ( (g_objects(l_index_number).segment15 = p_segment15)
146 OR (p_segment15 IS NULL) )
147 AND ( (g_objects(l_index_number).segment16 = p_segment16)
148 OR (p_segment16 IS NULL) )
149 AND ( (g_objects(l_index_number).segment17 = p_segment17)
150 OR (p_segment17 IS NULL) )
151 AND ( (g_objects(l_index_number).segment18 = p_segment18)
152 OR (p_segment18 IS NULL) )
153 AND ( (g_objects(l_index_number).segment19 = p_segment19)
154 OR (p_segment19 IS NULL) )
155 AND ( (g_objects(l_index_number).segment20 = p_segment20)
156 OR (p_segment20 IS NULL) )
157 AND ( (g_objects(l_index_number).segment21 = p_segment21)
158 OR (p_segment21 IS NULL) )
159 AND ( (g_objects(l_index_number).segment22 = p_segment22)
160 OR (p_segment22 IS NULL) )
161 AND ( (g_objects(l_index_number).segment23 = p_segment23)
162 OR (p_segment23 IS NULL) )
163 AND ( (g_objects(l_index_number).segment24 = p_segment24)
164 OR (p_segment24 IS NULL) )
165 AND ( (g_objects(l_index_number).segment25 = p_segment25)
166 OR (p_segment25 IS NULL) )
167 AND ( (g_objects(l_index_number).segment26 = p_segment26)
168 OR (p_segment26 IS NULL) )
169 AND ( (g_objects(l_index_number).segment27 = p_segment27)
170 OR (p_segment27 IS NULL) )
171 AND ( (g_objects(l_index_number).segment28 = p_segment28)
172 OR (p_segment28 IS NULL) )
173 AND ( (g_objects(l_index_number).segment29 = p_segment29)
174 OR (p_segment29 IS NULL) )
175 AND ( (g_objects(l_index_number).segment30 = p_segment30)
176 OR (p_segment30 IS NULL) ) )
177 THEN
178 l_object_found := TRUE;
179 ELSE
180 l_index_number := g_objects.NEXT(l_index_number);
181 END IF;
182 END LOOP;
183 IF (NOT l_object_found)
184 THEN
185 g_objects.EXTEND;
186 l_index_number := g_objects.LAST;
187 g_objects(l_index_number).object_type := p_object_type;
188 g_objects(l_index_number).object_name := p_object_name;
189 g_objects(l_index_number).event := p_event;
190 g_objects(l_index_number).radio_button_name := p_radio_button_name;
191 g_objects(l_index_number).property_type := p_property_type;
192 g_objects(l_index_number).tab_page_name := p_tab_page_name;
193 g_objects(l_index_number).context_type := p_context_type;
194 g_objects(l_index_number).segment1 := p_segment1;
195 g_objects(l_index_number).segment2 := p_segment2;
196 g_objects(l_index_number).segment3 := p_segment3;
197 g_objects(l_index_number).segment4 := p_segment4;
198 g_objects(l_index_number).segment5 := p_segment5;
199 g_objects(l_index_number).segment6 := p_segment6;
200 g_objects(l_index_number).segment7 := p_segment7;
201 g_objects(l_index_number).segment8 := p_segment8;
202 g_objects(l_index_number).segment9 := p_segment9;
203 g_objects(l_index_number).segment10 := p_segment10;
204 g_objects(l_index_number).segment11 := p_segment11;
205 g_objects(l_index_number).segment12 := p_segment12;
206 g_objects(l_index_number).segment13 := p_segment13;
207 g_objects(l_index_number).segment14 := p_segment14;
208 g_objects(l_index_number).segment15 := p_segment15;
209 g_objects(l_index_number).segment16 := p_segment16;
210 g_objects(l_index_number).segment17 := p_segment17;
211 g_objects(l_index_number).segment18 := p_segment18;
212 g_objects(l_index_number).segment19 := p_segment19;
213 g_objects(l_index_number).segment20 := p_segment20;
214 g_objects(l_index_number).segment21 := p_segment21;
215 g_objects(l_index_number).segment22 := p_segment22;
216 g_objects(l_index_number).segment23 := p_segment23;
217 g_objects(l_index_number).segment24 := p_segment24;
218 g_objects(l_index_number).segment25 := p_segment25;
219 g_objects(l_index_number).segment26 := p_segment26;
220 g_objects(l_index_number).segment27 := p_segment27;
221 g_objects(l_index_number).segment28 := p_segment28;
222 g_objects(l_index_number).segment29 := p_segment29;
223 g_objects(l_index_number).segment30 := p_segment30;
224 END IF;
225 RETURN(l_index_number);
226 END index_number;
227 --
228 -- -----------------------------------------------------------------------------
229 -- |--------------------------------< objects >--------------------------------|
230 -- -----------------------------------------------------------------------------
231 FUNCTION objects
232 RETURN t_objects
233 IS
234 l_objects t_objects := t_objects();
235 l_index_number NUMBER;
236 BEGIN
237 l_index_number := g_objects.FIRST;
238 WHILE (l_index_number IS NOT NULL)
239 LOOP
240 IF (g_objects(l_index_number).processed)
241 THEN
242 NULL;
243 ELSE
244 l_objects.EXTEND;
245 l_objects(l_objects.LAST) := g_objects(l_index_number);
246 END IF;
247 l_index_number := g_objects.NEXT(l_index_number);
248 END LOOP;
249 RETURN(l_objects);
250 END objects;
251 --
252 -- -----------------------------------------------------------------------------
253 -- |------------------------------< objects_pst >------------------------------|
254 -- -----------------------------------------------------------------------------
255 FUNCTION objects_pst
256 RETURN t_objects_pst
257 IS
258 l_objects_pst t_objects_pst;
259 l_objects t_objects;
260 l_index_number NUMBER;
261 BEGIN
262 l_objects := objects();
263 l_index_number := l_objects.FIRST;
264 WHILE (l_index_number IS NOT NULL)
265 LOOP
266 l_objects_pst(l_index_number) := l_objects(l_index_number);
267 l_index_number := l_objects.NEXT(l_index_number);
268 END LOOP;
269 RETURN(l_objects_pst);
270 END objects_pst;
271 --
272 -- -----------------------------------------------------------------------------
273 -- |-----------------------------< commit_objects >----------------------------|
274 -- -----------------------------------------------------------------------------
275 PROCEDURE commit_objects
276 IS
277 l_index_number NUMBER;
278 BEGIN
279 l_index_number := index_number
280 (p_object_type => NULL
281 ,p_object_name => NULL
282 ,p_event => 'COMMIT'
283 );
284 g_objects(l_index_number).processed := FALSE;
285 END commit_objects;
286 --
287 -- -----------------------------------------------------------------------------
288 -- |-----------------------------< create_object >-----------------------------|
289 -- -----------------------------------------------------------------------------
290 PROCEDURE create_object
291 (p_object_type IN VARCHAR2
292 ,p_object_name IN VARCHAR2
293 ,p_radio_button_name IN VARCHAR2 DEFAULT NULL
294 ,p_tab_page_name IN VARCHAR2 DEFAULT NULL
295 ,p_context_type IN VARCHAR2 DEFAULT NULL
296 ,p_segment1 IN VARCHAR2 DEFAULT NULL
297 ,p_segment2 IN VARCHAR2 DEFAULT NULL
298 ,p_segment3 IN VARCHAR2 DEFAULT NULL
299 ,p_segment4 IN VARCHAR2 DEFAULT NULL
300 ,p_segment5 IN VARCHAR2 DEFAULT NULL
301 ,p_segment6 IN VARCHAR2 DEFAULT NULL
302 ,p_segment7 IN VARCHAR2 DEFAULT NULL
303 ,p_segment8 IN VARCHAR2 DEFAULT NULL
304 ,p_segment9 IN VARCHAR2 DEFAULT NULL
305 ,p_segment10 IN VARCHAR2 DEFAULT NULL
306 ,p_segment11 IN VARCHAR2 DEFAULT NULL
307 ,p_segment12 IN VARCHAR2 DEFAULT NULL
308 ,p_segment13 IN VARCHAR2 DEFAULT NULL
309 ,p_segment14 IN VARCHAR2 DEFAULT NULL
310 ,p_segment15 IN VARCHAR2 DEFAULT NULL
311 ,p_segment16 IN VARCHAR2 DEFAULT NULL
312 ,p_segment17 IN VARCHAR2 DEFAULT NULL
313 ,p_segment18 IN VARCHAR2 DEFAULT NULL
314 ,p_segment19 IN VARCHAR2 DEFAULT NULL
315 ,p_segment20 IN VARCHAR2 DEFAULT NULL
316 ,p_segment21 IN VARCHAR2 DEFAULT NULL
317 ,p_segment22 IN VARCHAR2 DEFAULT NULL
318 ,p_segment23 IN VARCHAR2 DEFAULT NULL
319 ,p_segment24 IN VARCHAR2 DEFAULT NULL
320 ,p_segment25 IN VARCHAR2 DEFAULT NULL
321 ,p_segment26 IN VARCHAR2 DEFAULT NULL
322 ,p_segment27 IN VARCHAR2 DEFAULT NULL
323 ,p_segment28 IN VARCHAR2 DEFAULT NULL
324 ,p_segment29 IN VARCHAR2 DEFAULT NULL
325 ,p_segment30 IN VARCHAR2 DEFAULT NULL
326 )
327 IS
328 l_index_number NUMBER;
329 BEGIN
330 l_index_number := index_number
331 (p_object_type => p_object_type
332 ,p_object_name => p_object_name
336 ,p_context_type => p_context_type
333 ,p_event => 'CREATE'
334 ,p_radio_button_name => p_radio_button_name
335 ,p_tab_page_name => p_tab_page_name
337 ,p_segment1 => p_segment1
338 ,p_segment2 => p_segment2
339 ,p_segment3 => p_segment3
340 ,p_segment4 => p_segment4
341 ,p_segment5 => p_segment5
342 ,p_segment6 => p_segment6
343 ,p_segment7 => p_segment7
344 ,p_segment8 => p_segment8
345 ,p_segment9 => p_segment9
346 ,p_segment10 => p_segment10
347 ,p_segment11 => p_segment11
348 ,p_segment12 => p_segment12
349 ,p_segment13 => p_segment13
350 ,p_segment14 => p_segment14
351 ,p_segment15 => p_segment15
352 ,p_segment16 => p_segment16
353 ,p_segment17 => p_segment17
354 ,p_segment18 => p_segment18
355 ,p_segment19 => p_segment19
356 ,p_segment20 => p_segment20
357 ,p_segment21 => p_segment21
358 ,p_segment22 => p_segment22
359 ,p_segment23 => p_segment23
360 ,p_segment24 => p_segment24
361 ,p_segment25 => p_segment25
362 ,p_segment26 => p_segment26
363 ,p_segment27 => p_segment27
364 ,p_segment28 => p_segment28
365 ,p_segment29 => p_segment29
366 ,p_segment30 => p_segment30
367 );
368 g_objects(l_index_number).processed := FALSE;
369 END create_object;
370 --
371 -- -----------------------------------------------------------------------------
372 -- |-----------------------------< delete_object >-----------------------------|
373 -- -----------------------------------------------------------------------------
374 PROCEDURE delete_object
375 (p_object_type IN VARCHAR2
376 ,p_object_name IN VARCHAR2
377 ,p_radio_button_name IN VARCHAR2 DEFAULT NULL
378 ,p_tab_page_name IN VARCHAR2 DEFAULT NULL
379 ,p_context_type IN VARCHAR2 DEFAULT NULL
380 ,p_segment1 IN VARCHAR2 DEFAULT NULL
381 ,p_segment2 IN VARCHAR2 DEFAULT NULL
382 ,p_segment3 IN VARCHAR2 DEFAULT NULL
383 ,p_segment4 IN VARCHAR2 DEFAULT NULL
384 ,p_segment5 IN VARCHAR2 DEFAULT NULL
385 ,p_segment6 IN VARCHAR2 DEFAULT NULL
386 ,p_segment7 IN VARCHAR2 DEFAULT NULL
387 ,p_segment8 IN VARCHAR2 DEFAULT NULL
388 ,p_segment9 IN VARCHAR2 DEFAULT NULL
389 ,p_segment10 IN VARCHAR2 DEFAULT NULL
390 ,p_segment11 IN VARCHAR2 DEFAULT NULL
391 ,p_segment12 IN VARCHAR2 DEFAULT NULL
392 ,p_segment13 IN VARCHAR2 DEFAULT NULL
393 ,p_segment14 IN VARCHAR2 DEFAULT NULL
394 ,p_segment15 IN VARCHAR2 DEFAULT NULL
395 ,p_segment16 IN VARCHAR2 DEFAULT NULL
396 ,p_segment17 IN VARCHAR2 DEFAULT NULL
397 ,p_segment18 IN VARCHAR2 DEFAULT NULL
398 ,p_segment19 IN VARCHAR2 DEFAULT NULL
399 ,p_segment20 IN VARCHAR2 DEFAULT NULL
400 ,p_segment21 IN VARCHAR2 DEFAULT NULL
401 ,p_segment22 IN VARCHAR2 DEFAULT NULL
402 ,p_segment23 IN VARCHAR2 DEFAULT NULL
403 ,p_segment24 IN VARCHAR2 DEFAULT NULL
404 ,p_segment25 IN VARCHAR2 DEFAULT NULL
405 ,p_segment26 IN VARCHAR2 DEFAULT NULL
406 ,p_segment27 IN VARCHAR2 DEFAULT NULL
407 ,p_segment28 IN VARCHAR2 DEFAULT NULL
408 ,p_segment29 IN VARCHAR2 DEFAULT NULL
409 ,p_segment30 IN VARCHAR2 DEFAULT NULL
410 )
411 IS
412 l_index_number NUMBER;
413 BEGIN
414 l_index_number := index_number
415 (p_object_type => p_object_type
416 ,p_object_name => p_object_name
417 ,p_event => 'DELETE'
418 ,p_radio_button_name => p_radio_button_name
419 ,p_tab_page_name => p_tab_page_name
420 ,p_context_type => p_context_type
421 ,p_segment1 => p_segment1
422 ,p_segment2 => p_segment2
423 ,p_segment3 => p_segment3
424 ,p_segment4 => p_segment4
425 ,p_segment5 => p_segment5
426 ,p_segment6 => p_segment6
427 ,p_segment7 => p_segment7
428 ,p_segment8 => p_segment8
429 ,p_segment9 => p_segment9
430 ,p_segment10 => p_segment10
431 ,p_segment11 => p_segment11
432 ,p_segment12 => p_segment12
433 ,p_segment13 => p_segment13
434 ,p_segment14 => p_segment14
438 ,p_segment18 => p_segment18
435 ,p_segment15 => p_segment15
436 ,p_segment16 => p_segment16
437 ,p_segment17 => p_segment17
439 ,p_segment19 => p_segment19
440 ,p_segment20 => p_segment20
441 ,p_segment21 => p_segment21
442 ,p_segment22 => p_segment22
443 ,p_segment23 => p_segment23
444 ,p_segment24 => p_segment24
445 ,p_segment25 => p_segment25
446 ,p_segment26 => p_segment26
447 ,p_segment27 => p_segment27
448 ,p_segment28 => p_segment28
449 ,p_segment29 => p_segment29
450 ,p_segment30 => p_segment30
451 );
452 g_objects(l_index_number).processed := FALSE;
453 END delete_object;
454 --
455 -- -----------------------------------------------------------------------------
456 -- |----------------------------< process_objects >----------------------------|
457 -- -----------------------------------------------------------------------------
458 PROCEDURE process_objects
459 IS
460 l_index_number NUMBER;
461 l_committed BOOLEAN := FALSE;
462 BEGIN
463 l_index_number := g_objects.FIRST;
464 WHILE ( (NOT l_committed)
465 AND (l_index_number IS NOT NULL) )
466 LOOP
467 IF (g_objects(l_index_number).processed)
468 THEN
469 NULL;
470 ELSE
471 IF (g_objects(l_index_number).event = 'COMMIT')
472 THEN
473 l_committed := TRUE;
474 END IF;
475 g_objects(l_index_number).processed := TRUE;
476 END IF;
477 l_index_number := g_objects.NEXT(l_index_number);
478 END LOOP;
479 IF (l_committed)
480 THEN
481 g_objects := t_objects();
482 END IF;
483 g_events := t_events();
484 END process_objects;
485 --
486 -- -----------------------------------------------------------------------------
487 -- |----------------------------< rollback_object >----------------------------|
488 -- -----------------------------------------------------------------------------
489 PROCEDURE rollback_object
490 (p_object_type IN VARCHAR2
491 ,p_object_name IN VARCHAR2
492 ,p_radio_button_name IN VARCHAR2 DEFAULT NULL
493 ,p_context_type IN VARCHAR2 DEFAULT NULL
494 ,p_segment1 IN VARCHAR2 DEFAULT NULL
495 ,p_segment2 IN VARCHAR2 DEFAULT NULL
496 ,p_segment3 IN VARCHAR2 DEFAULT NULL
497 ,p_segment4 IN VARCHAR2 DEFAULT NULL
498 ,p_segment5 IN VARCHAR2 DEFAULT NULL
499 ,p_segment6 IN VARCHAR2 DEFAULT NULL
500 ,p_segment7 IN VARCHAR2 DEFAULT NULL
501 ,p_segment8 IN VARCHAR2 DEFAULT NULL
502 ,p_segment9 IN VARCHAR2 DEFAULT NULL
503 ,p_segment10 IN VARCHAR2 DEFAULT NULL
504 ,p_segment11 IN VARCHAR2 DEFAULT NULL
505 ,p_segment12 IN VARCHAR2 DEFAULT NULL
506 ,p_segment13 IN VARCHAR2 DEFAULT NULL
507 ,p_segment14 IN VARCHAR2 DEFAULT NULL
508 ,p_segment15 IN VARCHAR2 DEFAULT NULL
509 ,p_segment16 IN VARCHAR2 DEFAULT NULL
510 ,p_segment17 IN VARCHAR2 DEFAULT NULL
511 ,p_segment18 IN VARCHAR2 DEFAULT NULL
512 ,p_segment19 IN VARCHAR2 DEFAULT NULL
513 ,p_segment20 IN VARCHAR2 DEFAULT NULL
514 ,p_segment21 IN VARCHAR2 DEFAULT NULL
515 ,p_segment22 IN VARCHAR2 DEFAULT NULL
516 ,p_segment23 IN VARCHAR2 DEFAULT NULL
517 ,p_segment24 IN VARCHAR2 DEFAULT NULL
518 ,p_segment25 IN VARCHAR2 DEFAULT NULL
519 ,p_segment26 IN VARCHAR2 DEFAULT NULL
520 ,p_segment27 IN VARCHAR2 DEFAULT NULL
521 ,p_segment28 IN VARCHAR2 DEFAULT NULL
522 ,p_segment29 IN VARCHAR2 DEFAULT NULL
523 ,p_segment30 IN VARCHAR2 DEFAULT NULL
524 )
525 IS
526 l_index_number NUMBER;
527 BEGIN
528 l_index_number := index_number
529 (p_object_type => p_object_type
530 ,p_object_name => p_object_name
531 ,p_event => 'ROLLBACK'
532 ,p_radio_button_name => p_radio_button_name
533 ,p_context_type => p_context_type
534 ,p_segment1 => p_segment1
535 ,p_segment2 => p_segment2
536 ,p_segment3 => p_segment3
537 ,p_segment4 => p_segment4
538 ,p_segment5 => p_segment5
539 ,p_segment6 => p_segment6
540 ,p_segment7 => p_segment7
541 ,p_segment8 => p_segment8
542 ,p_segment9 => p_segment9
543 ,p_segment10 => p_segment10
544 ,p_segment11 => p_segment11
545 ,p_segment12 => p_segment12
546 ,p_segment13 => p_segment13
550 ,p_segment17 => p_segment17
547 ,p_segment14 => p_segment14
548 ,p_segment15 => p_segment15
549 ,p_segment16 => p_segment16
551 ,p_segment18 => p_segment18
552 ,p_segment19 => p_segment19
553 ,p_segment20 => p_segment20
554 ,p_segment21 => p_segment21
555 ,p_segment22 => p_segment22
556 ,p_segment23 => p_segment23
557 ,p_segment24 => p_segment24
558 ,p_segment25 => p_segment25
559 ,p_segment26 => p_segment26
560 ,p_segment27 => p_segment27
561 ,p_segment28 => p_segment28
562 ,p_segment29 => p_segment29
563 ,p_segment30 => p_segment30
564 );
565 g_objects(l_index_number).processed := FALSE;
566 END rollback_object;
567 --
568 -- -----------------------------------------------------------------------------
569 -- |-----------------------------< update_object >-----------------------------|
570 -- -----------------------------------------------------------------------------
571 PROCEDURE update_object
572 (p_object_type IN VARCHAR2
573 ,p_object_name IN VARCHAR2
574 ,p_radio_button_name IN VARCHAR2 DEFAULT NULL
575 ,p_property_type IN NUMBER DEFAULT NULL
576 ,p_property_value IN VARCHAR2 DEFAULT NULL
577 ,p_tab_page_name IN VARCHAR2 DEFAULT NULL
578 ,p_context_type IN VARCHAR2 DEFAULT NULL
579 ,p_segment1 IN VARCHAR2 DEFAULT NULL
580 ,p_segment2 IN VARCHAR2 DEFAULT NULL
581 ,p_segment3 IN VARCHAR2 DEFAULT NULL
582 ,p_segment4 IN VARCHAR2 DEFAULT NULL
583 ,p_segment5 IN VARCHAR2 DEFAULT NULL
584 ,p_segment6 IN VARCHAR2 DEFAULT NULL
585 ,p_segment7 IN VARCHAR2 DEFAULT NULL
586 ,p_segment8 IN VARCHAR2 DEFAULT NULL
587 ,p_segment9 IN VARCHAR2 DEFAULT NULL
588 ,p_segment10 IN VARCHAR2 DEFAULT NULL
589 ,p_segment11 IN VARCHAR2 DEFAULT NULL
590 ,p_segment12 IN VARCHAR2 DEFAULT NULL
591 ,p_segment13 IN VARCHAR2 DEFAULT NULL
592 ,p_segment14 IN VARCHAR2 DEFAULT NULL
593 ,p_segment15 IN VARCHAR2 DEFAULT NULL
594 ,p_segment16 IN VARCHAR2 DEFAULT NULL
595 ,p_segment17 IN VARCHAR2 DEFAULT NULL
596 ,p_segment18 IN VARCHAR2 DEFAULT NULL
597 ,p_segment19 IN VARCHAR2 DEFAULT NULL
598 ,p_segment20 IN VARCHAR2 DEFAULT NULL
599 ,p_segment21 IN VARCHAR2 DEFAULT NULL
600 ,p_segment22 IN VARCHAR2 DEFAULT NULL
601 ,p_segment23 IN VARCHAR2 DEFAULT NULL
602 ,p_segment24 IN VARCHAR2 DEFAULT NULL
603 ,p_segment25 IN VARCHAR2 DEFAULT NULL
604 ,p_segment26 IN VARCHAR2 DEFAULT NULL
605 ,p_segment27 IN VARCHAR2 DEFAULT NULL
606 ,p_segment28 IN VARCHAR2 DEFAULT NULL
607 ,p_segment29 IN VARCHAR2 DEFAULT NULL
608 ,p_segment30 IN VARCHAR2 DEFAULT NULL
609 )
610 IS
611 l_index_number NUMBER;
612 BEGIN
613 l_index_number := index_number
614 (p_object_type => p_object_type
615 ,p_object_name => p_object_name
616 ,p_event => 'UPDATE'
617 ,p_radio_button_name => p_radio_button_name
618 ,p_property_type => p_property_type
619 ,p_tab_page_name => p_tab_page_name
620 ,p_context_type => p_context_type
621 ,p_segment1 => p_segment1
622 ,p_segment2 => p_segment2
623 ,p_segment3 => p_segment3
624 ,p_segment4 => p_segment4
625 ,p_segment5 => p_segment5
626 ,p_segment6 => p_segment6
627 ,p_segment7 => p_segment7
628 ,p_segment8 => p_segment8
629 ,p_segment9 => p_segment9
630 ,p_segment10 => p_segment10
631 ,p_segment11 => p_segment11
632 ,p_segment12 => p_segment12
633 ,p_segment13 => p_segment13
634 ,p_segment14 => p_segment14
635 ,p_segment15 => p_segment15
636 ,p_segment16 => p_segment16
637 ,p_segment17 => p_segment17
638 ,p_segment18 => p_segment18
639 ,p_segment19 => p_segment19
640 ,p_segment20 => p_segment20
641 ,p_segment21 => p_segment21
642 ,p_segment22 => p_segment22
643 ,p_segment23 => p_segment23
644 ,p_segment24 => p_segment24
645 ,p_segment25 => p_segment25
646 ,p_segment26 => p_segment26
650 ,p_segment30 => p_segment30
647 ,p_segment27 => p_segment27
648 ,p_segment28 => p_segment28
649 ,p_segment29 => p_segment29
651 );
652 g_objects(l_index_number).property_value := p_property_value;
653 g_objects(l_index_number).processed := FALSE;
654 END update_object;
655 --
656 -- -----------------------------------------------------------------------------
657 -- |--------------------------------< events >---------------------------------|
658 -- -----------------------------------------------------------------------------
659 FUNCTION events
660 RETURN t_events
661 IS
662 l_events t_events := t_events();
663 l_index_number NUMBER;
664 BEGIN
665 l_index_number := g_events.FIRST;
666 WHILE (l_index_number IS NOT NULL)
667 LOOP
668 IF (g_events(l_index_number).processed)
669 THEN
670 NULL;
671 ELSE
672 l_events.EXTEND;
673 l_events(l_events.LAST) := g_events(l_index_number);
674 END IF;
675 l_index_number := g_events.NEXT(l_index_number);
676 END LOOP;
677 RETURN(l_events);
678 END events;
679 --
680 -- -----------------------------------------------------------------------------
681 -- |------------------------------< events_pst >-------------------------------|
682 -- -----------------------------------------------------------------------------
683 FUNCTION events_pst
684 RETURN t_events_pst
685 IS
686 l_events_pst t_events_pst;
687 l_events t_events;
688 l_index_number NUMBER;
689 BEGIN
690 l_events := events();
691 l_index_number := l_events.FIRST;
692 WHILE (l_index_number IS NOT NULL)
693 LOOP
694 l_events_pst(l_index_number) := l_events(l_index_number);
695 l_index_number := l_events.NEXT(l_index_number);
696 END LOOP;
697 RETURN(l_events_pst);
698 END events_pst;
699 --
700 -- -----------------------------------------------------------------------------
701 -- |------------------------------< set_context >------------------------------|
702 -- -----------------------------------------------------------------------------
703 PROCEDURE set_context
704 (p_full_item_name IN VARCHAR2
705 ,p_context_type IN VARCHAR2
706 ,p_segment1 IN VARCHAR2 DEFAULT NULL
707 ,p_segment2 IN VARCHAR2 DEFAULT NULL
708 ,p_segment3 IN VARCHAR2 DEFAULT NULL
709 ,p_segment4 IN VARCHAR2 DEFAULT NULL
710 ,p_segment5 IN VARCHAR2 DEFAULT NULL
711 ,p_segment6 IN VARCHAR2 DEFAULT NULL
712 ,p_segment7 IN VARCHAR2 DEFAULT NULL
713 ,p_segment8 IN VARCHAR2 DEFAULT NULL
714 ,p_segment9 IN VARCHAR2 DEFAULT NULL
715 ,p_segment10 IN VARCHAR2 DEFAULT NULL
716 ,p_segment11 IN VARCHAR2 DEFAULT NULL
717 ,p_segment12 IN VARCHAR2 DEFAULT NULL
718 ,p_segment13 IN VARCHAR2 DEFAULT NULL
719 ,p_segment14 IN VARCHAR2 DEFAULT NULL
720 ,p_segment15 IN VARCHAR2 DEFAULT NULL
721 ,p_segment16 IN VARCHAR2 DEFAULT NULL
722 ,p_segment17 IN VARCHAR2 DEFAULT NULL
723 ,p_segment18 IN VARCHAR2 DEFAULT NULL
724 ,p_segment19 IN VARCHAR2 DEFAULT NULL
725 ,p_segment20 IN VARCHAR2 DEFAULT NULL
726 ,p_segment21 IN VARCHAR2 DEFAULT NULL
727 ,p_segment22 IN VARCHAR2 DEFAULT NULL
728 ,p_segment23 IN VARCHAR2 DEFAULT NULL
729 ,p_segment24 IN VARCHAR2 DEFAULT NULL
730 ,p_segment25 IN VARCHAR2 DEFAULT NULL
731 ,p_segment26 IN VARCHAR2 DEFAULT NULL
732 ,p_segment27 IN VARCHAR2 DEFAULT NULL
733 ,p_segment28 IN VARCHAR2 DEFAULT NULL
734 ,p_segment29 IN VARCHAR2 DEFAULT NULL
735 ,p_segment30 IN VARCHAR2 DEFAULT NULL
736 )
737 IS
738 BEGIN
739 g_events.EXTEND;
740 g_events(g_events.LAST).event_name := 'SET_CONTEXT';
741 g_events(g_events.LAST).full_item_name := p_full_item_name;
742 g_events(g_events.LAST).context_type := p_context_type;
743 g_events(g_events.LAST).segment1 := p_segment1;
744 g_events(g_events.LAST).segment2 := p_segment2;
745 g_events(g_events.LAST).segment3 := p_segment3;
746 g_events(g_events.LAST).segment4 := p_segment4;
747 g_events(g_events.LAST).segment5 := p_segment5;
748 g_events(g_events.LAST).segment6 := p_segment6;
749 g_events(g_events.LAST).segment7 := p_segment7;
750 g_events(g_events.LAST).segment8 := p_segment8;
751 g_events(g_events.LAST).segment9 := p_segment9;
752 g_events(g_events.LAST).segment10 := p_segment10;
753 g_events(g_events.LAST).segment11 := p_segment11;
754 g_events(g_events.LAST).segment12 := p_segment12;
755 g_events(g_events.LAST).segment13 := p_segment13;
756 g_events(g_events.LAST).segment14 := p_segment14;
757 g_events(g_events.LAST).segment15 := p_segment15;
758 g_events(g_events.LAST).segment16 := p_segment16;
759 g_events(g_events.LAST).segment17 := p_segment17;
760 g_events(g_events.LAST).segment18 := p_segment18;
761 g_events(g_events.LAST).segment19 := p_segment19;
762 g_events(g_events.LAST).segment20 := p_segment20;
763 g_events(g_events.LAST).segment21 := p_segment21;
764 g_events(g_events.LAST).segment22 := p_segment22;
765 g_events(g_events.LAST).segment23 := p_segment23;
766 g_events(g_events.LAST).segment24 := p_segment24;
767 g_events(g_events.LAST).segment25 := p_segment25;
768 g_events(g_events.LAST).segment26 := p_segment26;
769 g_events(g_events.LAST).segment27 := p_segment27;
770 g_events(g_events.LAST).segment28 := p_segment28;
771 g_events(g_events.LAST).segment29 := p_segment29;
772 g_events(g_events.LAST).segment30 := p_segment30;
773 END set_context;
774 --
775 -- -----------------------------------------------------------------------------
776 -- |-----------------------------< reset_contexts >----------------------------|
777 -- -----------------------------------------------------------------------------
778 PROCEDURE reset_contexts
779 IS
780 BEGIN
781 g_events.EXTEND;
782 g_events(g_events.LAST).event_name := 'RESET_CONTEXTS';
783 END reset_contexts;
784 --
785 -- -----------------------------------------------------------------------------
786 -- |------------------------------< show_object >------------------------------|
787 -- -----------------------------------------------------------------------------
788 PROCEDURE show_object
789 (p_object_type IN VARCHAR2
790 ,p_object_name IN VARCHAR2
791 )
792 IS
793 BEGIN
794 g_events.EXTEND;
795 g_events(g_events.LAST).event_name := 'SHOW_OBJECT';
796 g_events(g_events.LAST).object_type := p_object_type;
797 g_events(g_events.LAST).object_name := p_object_name;
798 END show_object;
799 --
800 -- -----------------------------------------------------------------------------
801 -- |------------------------------< close_form >-------------------------------|
802 -- -----------------------------------------------------------------------------
803 PROCEDURE close_form
804 IS
805 BEGIN
806 g_events.EXTEND;
807 g_events(g_events.LAST).event_name := 'CLOSE_FORM';
808 END close_form;
809 --
810 -- -----------------------------------------------------------------------------
811 -- |-------------------------< reinit_item_contexts >--------------------------|
812 -- -----------------------------------------------------------------------------
813 PROCEDURE reinit_item_contexts
814 IS
815 BEGIN
816 g_events.EXTEND;
817 g_events(g_events.LAST).event_name := 'REINIT_ITEM_CONTEXTS';
818 END reinit_item_contexts;
819 --
820 END hr_template_configurator_info;