[Home] [Help]
PACKAGE BODY: APPS.OZF_TASK_GROUP_PVT_W
Source
1 package body ozf_task_group_pvt_w as
2 /* $Header: ozfwttgb.pls 115.0 2003/06/26 05:12:58 mchang noship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 procedure rosetta_table_copy_in_p1(t out nocopy ozf_task_group_pvt.task_group_tbl_type, a0 JTF_NUMBER_TABLE
14 , a1 JTF_DATE_TABLE
15 , a2 JTF_NUMBER_TABLE
16 , a3 JTF_DATE_TABLE
17 , a4 JTF_NUMBER_TABLE
18 , a5 JTF_NUMBER_TABLE
19 , a6 JTF_DATE_TABLE
20 , a7 JTF_DATE_TABLE
21 , a8 JTF_VARCHAR2_TABLE_100
22 , a9 JTF_NUMBER_TABLE
23 , a10 JTF_VARCHAR2_TABLE_100
24 , a11 JTF_VARCHAR2_TABLE_200
25 , a12 JTF_VARCHAR2_TABLE_200
26 , a13 JTF_VARCHAR2_TABLE_200
27 , a14 JTF_VARCHAR2_TABLE_200
28 , a15 JTF_VARCHAR2_TABLE_200
29 , a16 JTF_VARCHAR2_TABLE_200
30 , a17 JTF_VARCHAR2_TABLE_200
31 , a18 JTF_VARCHAR2_TABLE_200
32 , a19 JTF_VARCHAR2_TABLE_200
33 , a20 JTF_VARCHAR2_TABLE_200
34 , a21 JTF_VARCHAR2_TABLE_200
35 , a22 JTF_VARCHAR2_TABLE_200
36 , a23 JTF_VARCHAR2_TABLE_200
37 , a24 JTF_VARCHAR2_TABLE_200
38 , a25 JTF_VARCHAR2_TABLE_200
39 , a26 JTF_VARCHAR2_TABLE_100
40 , a27 JTF_VARCHAR2_TABLE_100
41 , a28 JTF_VARCHAR2_TABLE_4000
42 ) as
43 ddindx binary_integer; indx binary_integer;
44 begin
45 if a0 is not null and a0.count=0 then
46 t := ozf_task_group_pvt.task_group_tbl_type();
47 elsif a0 is not null and a0.count > 0 then
48 if a0.count > 0 then
49 t := ozf_task_group_pvt.task_group_tbl_type();
50 t.extend(a0.count);
51 indx := a0.first;
52 ddindx := 1;
53 while true loop
54 t(ddindx).task_template_group_id := a0(indx);
55 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a1(indx));
56 t(ddindx).last_updated_by := a2(indx);
57 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a3(indx));
58 t(ddindx).created_by := a4(indx);
59 t(ddindx).last_update_login := a5(indx);
60 t(ddindx).start_date_active := rosetta_g_miss_date_in_map(a6(indx));
61 t(ddindx).end_date_active := rosetta_g_miss_date_in_map(a7(indx));
62 t(ddindx).source_object_type_code := a8(indx);
63 t(ddindx).object_version_number := a9(indx);
64 t(ddindx).attribute_category := a10(indx);
65 t(ddindx).attribute1 := a11(indx);
66 t(ddindx).attribute2 := a12(indx);
67 t(ddindx).attribute3 := a13(indx);
68 t(ddindx).attribute4 := a14(indx);
69 t(ddindx).attribute5 := a15(indx);
70 t(ddindx).attribute6 := a16(indx);
71 t(ddindx).attribute7 := a17(indx);
72 t(ddindx).attribute8 := a18(indx);
73 t(ddindx).attribute9 := a19(indx);
74 t(ddindx).attribute10 := a20(indx);
75 t(ddindx).attribute11 := a21(indx);
76 t(ddindx).attribute12 := a22(indx);
77 t(ddindx).attribute13 := a23(indx);
78 t(ddindx).attribute14 := a24(indx);
79 t(ddindx).attribute15 := a25(indx);
80 t(ddindx).reason_type := a26(indx);
81 t(ddindx).template_group_name := a27(indx);
82 t(ddindx).description := a28(indx);
83 ddindx := ddindx+1;
84 if a0.last =indx
85 then exit;
86 end if;
87 indx := a0.next(indx);
88 end loop;
89 end if;
90 end if;
91 end rosetta_table_copy_in_p1;
92 procedure rosetta_table_copy_out_p1(t ozf_task_group_pvt.task_group_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
93 , a1 out nocopy JTF_DATE_TABLE
94 , a2 out nocopy JTF_NUMBER_TABLE
95 , a3 out nocopy JTF_DATE_TABLE
96 , a4 out nocopy JTF_NUMBER_TABLE
97 , a5 out nocopy JTF_NUMBER_TABLE
98 , a6 out nocopy JTF_DATE_TABLE
99 , a7 out nocopy JTF_DATE_TABLE
100 , a8 out nocopy JTF_VARCHAR2_TABLE_100
101 , a9 out nocopy JTF_NUMBER_TABLE
102 , a10 out nocopy JTF_VARCHAR2_TABLE_100
103 , a11 out nocopy JTF_VARCHAR2_TABLE_200
104 , a12 out nocopy JTF_VARCHAR2_TABLE_200
105 , a13 out nocopy JTF_VARCHAR2_TABLE_200
106 , a14 out nocopy JTF_VARCHAR2_TABLE_200
107 , a15 out nocopy JTF_VARCHAR2_TABLE_200
108 , a16 out nocopy JTF_VARCHAR2_TABLE_200
109 , a17 out nocopy JTF_VARCHAR2_TABLE_200
110 , a18 out nocopy JTF_VARCHAR2_TABLE_200
111 , a19 out nocopy JTF_VARCHAR2_TABLE_200
112 , a20 out nocopy JTF_VARCHAR2_TABLE_200
113 , a21 out nocopy JTF_VARCHAR2_TABLE_200
114 , a22 out nocopy JTF_VARCHAR2_TABLE_200
115 , a23 out nocopy JTF_VARCHAR2_TABLE_200
116 , a24 out nocopy JTF_VARCHAR2_TABLE_200
117 , a25 out nocopy JTF_VARCHAR2_TABLE_200
118 , a26 out nocopy JTF_VARCHAR2_TABLE_100
119 , a27 out nocopy JTF_VARCHAR2_TABLE_100
120 , a28 out nocopy JTF_VARCHAR2_TABLE_4000
121 ) as
122 ddindx binary_integer; indx binary_integer;
123 begin
124 if t is null then
125 a0 := null;
126 a1 := null;
127 a2 := null;
128 a3 := null;
129 a4 := null;
130 a5 := null;
131 a6 := null;
132 a7 := null;
133 a8 := null;
134 a9 := null;
135 a10 := null;
136 a11 := null;
137 a12 := null;
138 a13 := null;
139 a14 := null;
140 a15 := null;
141 a16 := null;
142 a17 := null;
143 a18 := null;
144 a19 := null;
145 a20 := null;
146 a21 := null;
147 a22 := null;
148 a23 := null;
149 a24 := null;
150 a25 := null;
151 a26 := null;
152 a27 := null;
153 a28 := null;
154 elsif t.count = 0 then
155 a0 := JTF_NUMBER_TABLE();
156 a1 := JTF_DATE_TABLE();
157 a2 := JTF_NUMBER_TABLE();
158 a3 := JTF_DATE_TABLE();
159 a4 := JTF_NUMBER_TABLE();
160 a5 := JTF_NUMBER_TABLE();
161 a6 := JTF_DATE_TABLE();
162 a7 := JTF_DATE_TABLE();
163 a8 := JTF_VARCHAR2_TABLE_100();
164 a9 := JTF_NUMBER_TABLE();
165 a10 := JTF_VARCHAR2_TABLE_100();
166 a11 := JTF_VARCHAR2_TABLE_200();
167 a12 := JTF_VARCHAR2_TABLE_200();
168 a13 := JTF_VARCHAR2_TABLE_200();
169 a14 := JTF_VARCHAR2_TABLE_200();
170 a15 := JTF_VARCHAR2_TABLE_200();
171 a16 := JTF_VARCHAR2_TABLE_200();
172 a17 := JTF_VARCHAR2_TABLE_200();
173 a18 := JTF_VARCHAR2_TABLE_200();
174 a19 := JTF_VARCHAR2_TABLE_200();
175 a20 := JTF_VARCHAR2_TABLE_200();
176 a21 := JTF_VARCHAR2_TABLE_200();
177 a22 := JTF_VARCHAR2_TABLE_200();
178 a23 := JTF_VARCHAR2_TABLE_200();
179 a24 := JTF_VARCHAR2_TABLE_200();
180 a25 := JTF_VARCHAR2_TABLE_200();
181 a26 := JTF_VARCHAR2_TABLE_100();
182 a27 := JTF_VARCHAR2_TABLE_100();
183 a28 := JTF_VARCHAR2_TABLE_4000();
184 else
185 a0 := JTF_NUMBER_TABLE();
186 a1 := JTF_DATE_TABLE();
187 a2 := JTF_NUMBER_TABLE();
188 a3 := JTF_DATE_TABLE();
189 a4 := JTF_NUMBER_TABLE();
190 a5 := JTF_NUMBER_TABLE();
191 a6 := JTF_DATE_TABLE();
192 a7 := JTF_DATE_TABLE();
193 a8 := JTF_VARCHAR2_TABLE_100();
194 a9 := JTF_NUMBER_TABLE();
195 a10 := JTF_VARCHAR2_TABLE_100();
196 a11 := JTF_VARCHAR2_TABLE_200();
197 a12 := JTF_VARCHAR2_TABLE_200();
198 a13 := JTF_VARCHAR2_TABLE_200();
199 a14 := JTF_VARCHAR2_TABLE_200();
200 a15 := JTF_VARCHAR2_TABLE_200();
201 a16 := JTF_VARCHAR2_TABLE_200();
202 a17 := JTF_VARCHAR2_TABLE_200();
203 a18 := JTF_VARCHAR2_TABLE_200();
204 a19 := JTF_VARCHAR2_TABLE_200();
205 a20 := JTF_VARCHAR2_TABLE_200();
206 a21 := JTF_VARCHAR2_TABLE_200();
207 a22 := JTF_VARCHAR2_TABLE_200();
208 a23 := JTF_VARCHAR2_TABLE_200();
209 a24 := JTF_VARCHAR2_TABLE_200();
210 a25 := JTF_VARCHAR2_TABLE_200();
211 a26 := JTF_VARCHAR2_TABLE_100();
212 a27 := JTF_VARCHAR2_TABLE_100();
213 a28 := JTF_VARCHAR2_TABLE_4000();
214 if t.count > 0 then
215 a0.extend(t.count);
216 a1.extend(t.count);
217 a2.extend(t.count);
218 a3.extend(t.count);
219 a4.extend(t.count);
220 a5.extend(t.count);
221 a6.extend(t.count);
222 a7.extend(t.count);
223 a8.extend(t.count);
224 a9.extend(t.count);
225 a10.extend(t.count);
226 a11.extend(t.count);
227 a12.extend(t.count);
228 a13.extend(t.count);
229 a14.extend(t.count);
230 a15.extend(t.count);
231 a16.extend(t.count);
232 a17.extend(t.count);
233 a18.extend(t.count);
234 a19.extend(t.count);
235 a20.extend(t.count);
236 a21.extend(t.count);
237 a22.extend(t.count);
238 a23.extend(t.count);
239 a24.extend(t.count);
240 a25.extend(t.count);
241 a26.extend(t.count);
242 a27.extend(t.count);
243 a28.extend(t.count);
244 ddindx := t.first;
245 indx := 1;
246 while true loop
247 a0(indx) := t(ddindx).task_template_group_id;
248 a1(indx) := t(ddindx).last_update_date;
249 a2(indx) := t(ddindx).last_updated_by;
250 a3(indx) := t(ddindx).creation_date;
251 a4(indx) := t(ddindx).created_by;
252 a5(indx) := t(ddindx).last_update_login;
253 a6(indx) := t(ddindx).start_date_active;
254 a7(indx) := t(ddindx).end_date_active;
255 a8(indx) := t(ddindx).source_object_type_code;
256 a9(indx) := t(ddindx).object_version_number;
257 a10(indx) := t(ddindx).attribute_category;
258 a11(indx) := t(ddindx).attribute1;
259 a12(indx) := t(ddindx).attribute2;
260 a13(indx) := t(ddindx).attribute3;
261 a14(indx) := t(ddindx).attribute4;
262 a15(indx) := t(ddindx).attribute5;
263 a16(indx) := t(ddindx).attribute6;
264 a17(indx) := t(ddindx).attribute7;
265 a18(indx) := t(ddindx).attribute8;
266 a19(indx) := t(ddindx).attribute9;
267 a20(indx) := t(ddindx).attribute10;
268 a21(indx) := t(ddindx).attribute11;
269 a22(indx) := t(ddindx).attribute12;
270 a23(indx) := t(ddindx).attribute13;
271 a24(indx) := t(ddindx).attribute14;
272 a25(indx) := t(ddindx).attribute15;
273 a26(indx) := t(ddindx).reason_type;
274 a27(indx) := t(ddindx).template_group_name;
275 a28(indx) := t(ddindx).description;
276 indx := indx+1;
277 if t.last =ddindx
278 then exit;
279 end if;
280 ddindx := t.next(ddindx);
281 end loop;
282 end if;
283 end if;
284 end rosetta_table_copy_out_p1;
285
286 procedure rosetta_table_copy_in_p5(t out nocopy ozf_task_group_pvt.ozf_sort_data, a0 JTF_VARCHAR2_TABLE_100
287 , a1 JTF_VARCHAR2_TABLE_100
288 ) as
289 ddindx binary_integer; indx binary_integer;
290 begin
291 if a0 is not null and a0.count=0 then
292 t := ozf_task_group_pvt.ozf_sort_data();
293 elsif a0 is not null and a0.count > 0 then
294 if a0.count > 0 then
295 t := ozf_task_group_pvt.ozf_sort_data();
296 t.extend(a0.count);
297 indx := a0.first;
298 ddindx := 1;
299 while true loop
300 t(ddindx).field_name := a0(indx);
301 t(ddindx).asc_dsc_flag := a1(indx);
302 ddindx := ddindx+1;
303 if a0.last =indx
304 then exit;
305 end if;
306 indx := a0.next(indx);
307 end loop;
308 end if;
309 end if;
310 end rosetta_table_copy_in_p5;
311 procedure rosetta_table_copy_out_p5(t ozf_task_group_pvt.ozf_sort_data, a0 out nocopy JTF_VARCHAR2_TABLE_100
312 , a1 out nocopy JTF_VARCHAR2_TABLE_100
313 ) as
314 ddindx binary_integer; indx binary_integer;
315 begin
316 if t is null then
317 a0 := null;
318 a1 := null;
319 elsif t.count = 0 then
320 a0 := JTF_VARCHAR2_TABLE_100();
321 a1 := JTF_VARCHAR2_TABLE_100();
322 else
323 a0 := JTF_VARCHAR2_TABLE_100();
324 a1 := JTF_VARCHAR2_TABLE_100();
325 if t.count > 0 then
326 a0.extend(t.count);
327 a1.extend(t.count);
328 ddindx := t.first;
329 indx := 1;
330 while true loop
331 a0(indx) := t(ddindx).field_name;
332 a1(indx) := t(ddindx).asc_dsc_flag;
333 indx := indx+1;
334 if t.last =ddindx
335 then exit;
336 end if;
337 ddindx := t.next(ddindx);
338 end loop;
339 end if;
340 end if;
341 end rosetta_table_copy_out_p5;
342
343 procedure create_task_group(p_api_version NUMBER
344 , p_init_msg_list VARCHAR2
345 , p_commit VARCHAR2
346 , p_validation_level NUMBER
347 , x_return_status out nocopy VARCHAR2
348 , x_msg_data out nocopy VARCHAR2
349 , x_msg_count out nocopy NUMBER
350 , p7_a0 NUMBER
351 , p7_a1 DATE
352 , p7_a2 NUMBER
353 , p7_a3 DATE
354 , p7_a4 NUMBER
355 , p7_a5 NUMBER
356 , p7_a6 DATE
357 , p7_a7 DATE
358 , p7_a8 VARCHAR2
359 , p7_a9 NUMBER
360 , p7_a10 VARCHAR2
361 , p7_a11 VARCHAR2
362 , p7_a12 VARCHAR2
363 , p7_a13 VARCHAR2
364 , p7_a14 VARCHAR2
365 , p7_a15 VARCHAR2
366 , p7_a16 VARCHAR2
367 , p7_a17 VARCHAR2
368 , p7_a18 VARCHAR2
369 , p7_a19 VARCHAR2
370 , p7_a20 VARCHAR2
371 , p7_a21 VARCHAR2
372 , p7_a22 VARCHAR2
373 , p7_a23 VARCHAR2
374 , p7_a24 VARCHAR2
375 , p7_a25 VARCHAR2
376 , p7_a26 VARCHAR2
377 , p7_a27 VARCHAR2
378 , p7_a28 VARCHAR2
379 , x_task_template_group_id out nocopy NUMBER
380 )
381
382 as
383 ddp_task_group ozf_task_group_pvt.task_group_rec_type;
384 ddindx binary_integer; indx binary_integer;
385 begin
386
387 -- copy data to the local IN or IN-OUT args, if any
388
389
390
391
392
393
394
395 ddp_task_group.task_template_group_id := p7_a0;
396 ddp_task_group.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
397 ddp_task_group.last_updated_by := p7_a2;
398 ddp_task_group.creation_date := rosetta_g_miss_date_in_map(p7_a3);
399 ddp_task_group.created_by := p7_a4;
400 ddp_task_group.last_update_login := p7_a5;
401 ddp_task_group.start_date_active := rosetta_g_miss_date_in_map(p7_a6);
402 ddp_task_group.end_date_active := rosetta_g_miss_date_in_map(p7_a7);
403 ddp_task_group.source_object_type_code := p7_a8;
404 ddp_task_group.object_version_number := p7_a9;
405 ddp_task_group.attribute_category := p7_a10;
406 ddp_task_group.attribute1 := p7_a11;
407 ddp_task_group.attribute2 := p7_a12;
408 ddp_task_group.attribute3 := p7_a13;
409 ddp_task_group.attribute4 := p7_a14;
410 ddp_task_group.attribute5 := p7_a15;
411 ddp_task_group.attribute6 := p7_a16;
412 ddp_task_group.attribute7 := p7_a17;
413 ddp_task_group.attribute8 := p7_a18;
414 ddp_task_group.attribute9 := p7_a19;
415 ddp_task_group.attribute10 := p7_a20;
416 ddp_task_group.attribute11 := p7_a21;
417 ddp_task_group.attribute12 := p7_a22;
418 ddp_task_group.attribute13 := p7_a23;
419 ddp_task_group.attribute14 := p7_a24;
420 ddp_task_group.attribute15 := p7_a25;
421 ddp_task_group.reason_type := p7_a26;
422 ddp_task_group.template_group_name := p7_a27;
423 ddp_task_group.description := p7_a28;
424
425
426 -- here's the delegated call to the old PL/SQL routine
427 ozf_task_group_pvt.create_task_group(p_api_version,
428 p_init_msg_list,
429 p_commit,
430 p_validation_level,
431 x_return_status,
432 x_msg_data,
433 x_msg_count,
434 ddp_task_group,
435 x_task_template_group_id);
436
437 -- copy data back from the local variables to OUT or IN-OUT args, if any
438
439
440
441
442
443
444
445
446 end;
447
448 procedure update_task_group(p_api_version NUMBER
449 , p_init_msg_list VARCHAR2
450 , p_commit VARCHAR2
451 , p_validation_level NUMBER
452 , x_return_status out nocopy VARCHAR2
453 , x_msg_data out nocopy VARCHAR2
454 , x_msg_count out nocopy NUMBER
455 , p7_a0 NUMBER
456 , p7_a1 DATE
457 , p7_a2 NUMBER
458 , p7_a3 DATE
459 , p7_a4 NUMBER
460 , p7_a5 NUMBER
461 , p7_a6 DATE
462 , p7_a7 DATE
463 , p7_a8 VARCHAR2
464 , p7_a9 NUMBER
465 , p7_a10 VARCHAR2
466 , p7_a11 VARCHAR2
467 , p7_a12 VARCHAR2
468 , p7_a13 VARCHAR2
469 , p7_a14 VARCHAR2
470 , p7_a15 VARCHAR2
471 , p7_a16 VARCHAR2
472 , p7_a17 VARCHAR2
473 , p7_a18 VARCHAR2
474 , p7_a19 VARCHAR2
475 , p7_a20 VARCHAR2
476 , p7_a21 VARCHAR2
477 , p7_a22 VARCHAR2
478 , p7_a23 VARCHAR2
479 , p7_a24 VARCHAR2
480 , p7_a25 VARCHAR2
481 , p7_a26 VARCHAR2
482 , p7_a27 VARCHAR2
483 , p7_a28 VARCHAR2
484 , x_object_version_number out nocopy NUMBER
485 )
486
487 as
488 ddp_task_group ozf_task_group_pvt.task_group_rec_type;
489 ddindx binary_integer; indx binary_integer;
490 begin
491
492 -- copy data to the local IN or IN-OUT args, if any
493
494
495
496
497
498
499
500 ddp_task_group.task_template_group_id := p7_a0;
501 ddp_task_group.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
502 ddp_task_group.last_updated_by := p7_a2;
503 ddp_task_group.creation_date := rosetta_g_miss_date_in_map(p7_a3);
504 ddp_task_group.created_by := p7_a4;
505 ddp_task_group.last_update_login := p7_a5;
506 ddp_task_group.start_date_active := rosetta_g_miss_date_in_map(p7_a6);
507 ddp_task_group.end_date_active := rosetta_g_miss_date_in_map(p7_a7);
508 ddp_task_group.source_object_type_code := p7_a8;
509 ddp_task_group.object_version_number := p7_a9;
510 ddp_task_group.attribute_category := p7_a10;
511 ddp_task_group.attribute1 := p7_a11;
512 ddp_task_group.attribute2 := p7_a12;
513 ddp_task_group.attribute3 := p7_a13;
514 ddp_task_group.attribute4 := p7_a14;
515 ddp_task_group.attribute5 := p7_a15;
516 ddp_task_group.attribute6 := p7_a16;
517 ddp_task_group.attribute7 := p7_a17;
518 ddp_task_group.attribute8 := p7_a18;
519 ddp_task_group.attribute9 := p7_a19;
520 ddp_task_group.attribute10 := p7_a20;
521 ddp_task_group.attribute11 := p7_a21;
522 ddp_task_group.attribute12 := p7_a22;
523 ddp_task_group.attribute13 := p7_a23;
524 ddp_task_group.attribute14 := p7_a24;
525 ddp_task_group.attribute15 := p7_a25;
526 ddp_task_group.reason_type := p7_a26;
527 ddp_task_group.template_group_name := p7_a27;
528 ddp_task_group.description := p7_a28;
529
530
531 -- here's the delegated call to the old PL/SQL routine
532 ozf_task_group_pvt.update_task_group(p_api_version,
533 p_init_msg_list,
534 p_commit,
535 p_validation_level,
536 x_return_status,
537 x_msg_data,
538 x_msg_count,
539 ddp_task_group,
540 x_object_version_number);
541
542 -- copy data back from the local variables to OUT or IN-OUT args, if any
543
544
545
546
547
548
549
550
551 end;
552
553 procedure get_task_group(p_api_version NUMBER
554 , p_init_msg_list VARCHAR2
555 , p_validation_level NUMBER
556 , x_return_status out nocopy VARCHAR2
557 , x_msg_data out nocopy VARCHAR2
558 , x_msg_count out nocopy NUMBER
559 , p_task_template_group_id NUMBER
560 , p_template_group_name VARCHAR2
561 , p_source_object_type_code VARCHAR2
562 , p_start_date_active date
563 , p_end_date_active date
564 , p11_a0 JTF_VARCHAR2_TABLE_100
565 , p11_a1 JTF_VARCHAR2_TABLE_100
566 , p12_a0 NUMBER
567 , p12_a1 NUMBER
568 , p12_a2 VARCHAR2
569 , p13_a0 out nocopy NUMBER
570 , p13_a1 out nocopy NUMBER
571 , p13_a2 out nocopy NUMBER
572 , p14_a0 out nocopy JTF_NUMBER_TABLE
573 , p14_a1 out nocopy JTF_DATE_TABLE
574 , p14_a2 out nocopy JTF_NUMBER_TABLE
575 , p14_a3 out nocopy JTF_DATE_TABLE
576 , p14_a4 out nocopy JTF_NUMBER_TABLE
577 , p14_a5 out nocopy JTF_NUMBER_TABLE
578 , p14_a6 out nocopy JTF_DATE_TABLE
579 , p14_a7 out nocopy JTF_DATE_TABLE
580 , p14_a8 out nocopy JTF_VARCHAR2_TABLE_100
581 , p14_a9 out nocopy JTF_NUMBER_TABLE
582 , p14_a10 out nocopy JTF_VARCHAR2_TABLE_100
583 , p14_a11 out nocopy JTF_VARCHAR2_TABLE_200
584 , p14_a12 out nocopy JTF_VARCHAR2_TABLE_200
585 , p14_a13 out nocopy JTF_VARCHAR2_TABLE_200
586 , p14_a14 out nocopy JTF_VARCHAR2_TABLE_200
587 , p14_a15 out nocopy JTF_VARCHAR2_TABLE_200
588 , p14_a16 out nocopy JTF_VARCHAR2_TABLE_200
589 , p14_a17 out nocopy JTF_VARCHAR2_TABLE_200
590 , p14_a18 out nocopy JTF_VARCHAR2_TABLE_200
591 , p14_a19 out nocopy JTF_VARCHAR2_TABLE_200
592 , p14_a20 out nocopy JTF_VARCHAR2_TABLE_200
593 , p14_a21 out nocopy JTF_VARCHAR2_TABLE_200
594 , p14_a22 out nocopy JTF_VARCHAR2_TABLE_200
595 , p14_a23 out nocopy JTF_VARCHAR2_TABLE_200
596 , p14_a24 out nocopy JTF_VARCHAR2_TABLE_200
597 , p14_a25 out nocopy JTF_VARCHAR2_TABLE_200
598 , p14_a26 out nocopy JTF_VARCHAR2_TABLE_100
599 , p14_a27 out nocopy JTF_VARCHAR2_TABLE_100
600 , p14_a28 out nocopy JTF_VARCHAR2_TABLE_4000
601 )
602
603 as
604 ddp_start_date_active date;
605 ddp_end_date_active date;
606 ddp_sort_data ozf_task_group_pvt.ozf_sort_data;
607 ddp_request_rec ozf_task_group_pvt.ozf_request_rec_type;
608 ddx_return_rec ozf_task_group_pvt.ozf_return_rec_type;
609 ddx_task_group ozf_task_group_pvt.task_group_tbl_type;
610 ddindx binary_integer; indx binary_integer;
611 begin
612
613 -- copy data to the local IN or IN-OUT args, if any
614
615
616
617
618
619
620
621
622
623 ddp_start_date_active := rosetta_g_miss_date_in_map(p_start_date_active);
624
625 ddp_end_date_active := rosetta_g_miss_date_in_map(p_end_date_active);
626
627 ozf_task_group_pvt_w.rosetta_table_copy_in_p5(ddp_sort_data, p11_a0
628 , p11_a1
629 );
630
631 ddp_request_rec.records_requested := p12_a0;
632 ddp_request_rec.start_record_position := p12_a1;
633 ddp_request_rec.return_total_count_flag := p12_a2;
634
635
636
637 -- here's the delegated call to the old PL/SQL routine
638 ozf_task_group_pvt.get_task_group(p_api_version,
639 p_init_msg_list,
640 p_validation_level,
641 x_return_status,
642 x_msg_data,
643 x_msg_count,
644 p_task_template_group_id,
645 p_template_group_name,
646 p_source_object_type_code,
647 ddp_start_date_active,
648 ddp_end_date_active,
649 ddp_sort_data,
650 ddp_request_rec,
651 ddx_return_rec,
652 ddx_task_group);
653
654 -- copy data back from the local variables to OUT or IN-OUT args, if any
655
656
657
658
659
660
661
662
663
664
665
666
667
668 p13_a0 := ddx_return_rec.returned_record_count;
669 p13_a1 := ddx_return_rec.next_record_position;
670 p13_a2 := ddx_return_rec.total_record_count;
671
672 ozf_task_group_pvt_w.rosetta_table_copy_out_p1(ddx_task_group, p14_a0
673 , p14_a1
674 , p14_a2
675 , p14_a3
676 , p14_a4
677 , p14_a5
678 , p14_a6
679 , p14_a7
680 , p14_a8
681 , p14_a9
682 , p14_a10
683 , p14_a11
684 , p14_a12
685 , p14_a13
686 , p14_a14
687 , p14_a15
688 , p14_a16
689 , p14_a17
690 , p14_a18
691 , p14_a19
692 , p14_a20
693 , p14_a21
694 , p14_a22
695 , p14_a23
696 , p14_a24
697 , p14_a25
698 , p14_a26
699 , p14_a27
700 , p14_a28
701 );
702 end;
703
704 procedure validate_task_group(p_api_version NUMBER
705 , p_init_msg_list VARCHAR2
706 , p_validation_level NUMBER
707 , x_return_status out nocopy VARCHAR2
708 , x_msg_count out nocopy NUMBER
709 , x_msg_data out nocopy VARCHAR2
710 , p6_a0 NUMBER
711 , p6_a1 DATE
712 , p6_a2 NUMBER
713 , p6_a3 DATE
714 , p6_a4 NUMBER
715 , p6_a5 NUMBER
716 , p6_a6 DATE
717 , p6_a7 DATE
718 , p6_a8 VARCHAR2
719 , p6_a9 NUMBER
720 , p6_a10 VARCHAR2
721 , p6_a11 VARCHAR2
722 , p6_a12 VARCHAR2
723 , p6_a13 VARCHAR2
724 , p6_a14 VARCHAR2
725 , p6_a15 VARCHAR2
726 , p6_a16 VARCHAR2
727 , p6_a17 VARCHAR2
728 , p6_a18 VARCHAR2
729 , p6_a19 VARCHAR2
730 , p6_a20 VARCHAR2
731 , p6_a21 VARCHAR2
732 , p6_a22 VARCHAR2
733 , p6_a23 VARCHAR2
734 , p6_a24 VARCHAR2
735 , p6_a25 VARCHAR2
736 , p6_a26 VARCHAR2
737 , p6_a27 VARCHAR2
738 , p6_a28 VARCHAR2
739 )
740
741 as
742 ddp_task_group ozf_task_group_pvt.task_group_rec_type;
743 ddindx binary_integer; indx binary_integer;
744 begin
745
746 -- copy data to the local IN or IN-OUT args, if any
747
748
749
750
751
752
753 ddp_task_group.task_template_group_id := p6_a0;
754 ddp_task_group.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
755 ddp_task_group.last_updated_by := p6_a2;
756 ddp_task_group.creation_date := rosetta_g_miss_date_in_map(p6_a3);
757 ddp_task_group.created_by := p6_a4;
758 ddp_task_group.last_update_login := p6_a5;
759 ddp_task_group.start_date_active := rosetta_g_miss_date_in_map(p6_a6);
760 ddp_task_group.end_date_active := rosetta_g_miss_date_in_map(p6_a7);
761 ddp_task_group.source_object_type_code := p6_a8;
762 ddp_task_group.object_version_number := p6_a9;
763 ddp_task_group.attribute_category := p6_a10;
764 ddp_task_group.attribute1 := p6_a11;
765 ddp_task_group.attribute2 := p6_a12;
766 ddp_task_group.attribute3 := p6_a13;
767 ddp_task_group.attribute4 := p6_a14;
768 ddp_task_group.attribute5 := p6_a15;
769 ddp_task_group.attribute6 := p6_a16;
770 ddp_task_group.attribute7 := p6_a17;
771 ddp_task_group.attribute8 := p6_a18;
772 ddp_task_group.attribute9 := p6_a19;
773 ddp_task_group.attribute10 := p6_a20;
774 ddp_task_group.attribute11 := p6_a21;
775 ddp_task_group.attribute12 := p6_a22;
776 ddp_task_group.attribute13 := p6_a23;
777 ddp_task_group.attribute14 := p6_a24;
778 ddp_task_group.attribute15 := p6_a25;
779 ddp_task_group.reason_type := p6_a26;
780 ddp_task_group.template_group_name := p6_a27;
781 ddp_task_group.description := p6_a28;
782
783 -- here's the delegated call to the old PL/SQL routine
784 ozf_task_group_pvt.validate_task_group(p_api_version,
785 p_init_msg_list,
786 p_validation_level,
787 x_return_status,
788 x_msg_count,
789 x_msg_data,
790 ddp_task_group);
791
792 -- copy data back from the local variables to OUT or IN-OUT args, if any
793
794
795
796
797
798
799 end;
800
801 procedure check_task_group_items(p_validation_mode VARCHAR2
802 , x_return_status out nocopy VARCHAR2
803 , p2_a0 NUMBER
804 , p2_a1 DATE
805 , p2_a2 NUMBER
806 , p2_a3 DATE
807 , p2_a4 NUMBER
808 , p2_a5 NUMBER
809 , p2_a6 DATE
810 , p2_a7 DATE
811 , p2_a8 VARCHAR2
812 , p2_a9 NUMBER
813 , p2_a10 VARCHAR2
814 , p2_a11 VARCHAR2
815 , p2_a12 VARCHAR2
816 , p2_a13 VARCHAR2
817 , p2_a14 VARCHAR2
818 , p2_a15 VARCHAR2
819 , p2_a16 VARCHAR2
820 , p2_a17 VARCHAR2
821 , p2_a18 VARCHAR2
822 , p2_a19 VARCHAR2
823 , p2_a20 VARCHAR2
824 , p2_a21 VARCHAR2
825 , p2_a22 VARCHAR2
826 , p2_a23 VARCHAR2
827 , p2_a24 VARCHAR2
828 , p2_a25 VARCHAR2
829 , p2_a26 VARCHAR2
830 , p2_a27 VARCHAR2
831 , p2_a28 VARCHAR2
832 )
833
834 as
835 ddp_task_group_rec ozf_task_group_pvt.task_group_rec_type;
836 ddindx binary_integer; indx binary_integer;
837 begin
838
839 -- copy data to the local IN or IN-OUT args, if any
840
841
842 ddp_task_group_rec.task_template_group_id := p2_a0;
843 ddp_task_group_rec.last_update_date := rosetta_g_miss_date_in_map(p2_a1);
844 ddp_task_group_rec.last_updated_by := p2_a2;
845 ddp_task_group_rec.creation_date := rosetta_g_miss_date_in_map(p2_a3);
846 ddp_task_group_rec.created_by := p2_a4;
847 ddp_task_group_rec.last_update_login := p2_a5;
848 ddp_task_group_rec.start_date_active := rosetta_g_miss_date_in_map(p2_a6);
849 ddp_task_group_rec.end_date_active := rosetta_g_miss_date_in_map(p2_a7);
850 ddp_task_group_rec.source_object_type_code := p2_a8;
851 ddp_task_group_rec.object_version_number := p2_a9;
852 ddp_task_group_rec.attribute_category := p2_a10;
853 ddp_task_group_rec.attribute1 := p2_a11;
854 ddp_task_group_rec.attribute2 := p2_a12;
855 ddp_task_group_rec.attribute3 := p2_a13;
856 ddp_task_group_rec.attribute4 := p2_a14;
857 ddp_task_group_rec.attribute5 := p2_a15;
858 ddp_task_group_rec.attribute6 := p2_a16;
859 ddp_task_group_rec.attribute7 := p2_a17;
860 ddp_task_group_rec.attribute8 := p2_a18;
861 ddp_task_group_rec.attribute9 := p2_a19;
862 ddp_task_group_rec.attribute10 := p2_a20;
863 ddp_task_group_rec.attribute11 := p2_a21;
864 ddp_task_group_rec.attribute12 := p2_a22;
865 ddp_task_group_rec.attribute13 := p2_a23;
866 ddp_task_group_rec.attribute14 := p2_a24;
867 ddp_task_group_rec.attribute15 := p2_a25;
868 ddp_task_group_rec.reason_type := p2_a26;
869 ddp_task_group_rec.template_group_name := p2_a27;
870 ddp_task_group_rec.description := p2_a28;
871
872 -- here's the delegated call to the old PL/SQL routine
873 ozf_task_group_pvt.check_task_group_items(p_validation_mode,
874 x_return_status,
875 ddp_task_group_rec);
876
877 -- copy data back from the local variables to OUT or IN-OUT args, if any
878
879
880 end;
881
882 procedure check_task_group_record(p0_a0 NUMBER
883 , p0_a1 DATE
884 , p0_a2 NUMBER
885 , p0_a3 DATE
886 , p0_a4 NUMBER
887 , p0_a5 NUMBER
888 , p0_a6 DATE
889 , p0_a7 DATE
890 , p0_a8 VARCHAR2
891 , p0_a9 NUMBER
892 , p0_a10 VARCHAR2
893 , p0_a11 VARCHAR2
894 , p0_a12 VARCHAR2
895 , p0_a13 VARCHAR2
896 , p0_a14 VARCHAR2
897 , p0_a15 VARCHAR2
898 , p0_a16 VARCHAR2
899 , p0_a17 VARCHAR2
900 , p0_a18 VARCHAR2
901 , p0_a19 VARCHAR2
902 , p0_a20 VARCHAR2
903 , p0_a21 VARCHAR2
904 , p0_a22 VARCHAR2
905 , p0_a23 VARCHAR2
906 , p0_a24 VARCHAR2
907 , p0_a25 VARCHAR2
908 , p0_a26 VARCHAR2
909 , p0_a27 VARCHAR2
910 , p0_a28 VARCHAR2
911 , p1_a0 NUMBER
912 , p1_a1 DATE
913 , p1_a2 NUMBER
914 , p1_a3 DATE
915 , p1_a4 NUMBER
916 , p1_a5 NUMBER
917 , p1_a6 DATE
918 , p1_a7 DATE
919 , p1_a8 VARCHAR2
920 , p1_a9 NUMBER
921 , p1_a10 VARCHAR2
922 , p1_a11 VARCHAR2
923 , p1_a12 VARCHAR2
924 , p1_a13 VARCHAR2
925 , p1_a14 VARCHAR2
926 , p1_a15 VARCHAR2
927 , p1_a16 VARCHAR2
928 , p1_a17 VARCHAR2
929 , p1_a18 VARCHAR2
930 , p1_a19 VARCHAR2
931 , p1_a20 VARCHAR2
932 , p1_a21 VARCHAR2
933 , p1_a22 VARCHAR2
934 , p1_a23 VARCHAR2
935 , p1_a24 VARCHAR2
936 , p1_a25 VARCHAR2
937 , p1_a26 VARCHAR2
938 , p1_a27 VARCHAR2
939 , p1_a28 VARCHAR2
940 , x_return_status out nocopy VARCHAR2
941 )
942
943 as
944 ddp_task_group_rec ozf_task_group_pvt.task_group_rec_type;
945 ddp_complete_rec ozf_task_group_pvt.task_group_rec_type;
946 ddindx binary_integer; indx binary_integer;
947 begin
948
949 -- copy data to the local IN or IN-OUT args, if any
950 ddp_task_group_rec.task_template_group_id := p0_a0;
951 ddp_task_group_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
952 ddp_task_group_rec.last_updated_by := p0_a2;
953 ddp_task_group_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
954 ddp_task_group_rec.created_by := p0_a4;
955 ddp_task_group_rec.last_update_login := p0_a5;
956 ddp_task_group_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a6);
957 ddp_task_group_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a7);
958 ddp_task_group_rec.source_object_type_code := p0_a8;
959 ddp_task_group_rec.object_version_number := p0_a9;
960 ddp_task_group_rec.attribute_category := p0_a10;
961 ddp_task_group_rec.attribute1 := p0_a11;
962 ddp_task_group_rec.attribute2 := p0_a12;
963 ddp_task_group_rec.attribute3 := p0_a13;
964 ddp_task_group_rec.attribute4 := p0_a14;
965 ddp_task_group_rec.attribute5 := p0_a15;
966 ddp_task_group_rec.attribute6 := p0_a16;
967 ddp_task_group_rec.attribute7 := p0_a17;
968 ddp_task_group_rec.attribute8 := p0_a18;
969 ddp_task_group_rec.attribute9 := p0_a19;
970 ddp_task_group_rec.attribute10 := p0_a20;
971 ddp_task_group_rec.attribute11 := p0_a21;
972 ddp_task_group_rec.attribute12 := p0_a22;
973 ddp_task_group_rec.attribute13 := p0_a23;
974 ddp_task_group_rec.attribute14 := p0_a24;
975 ddp_task_group_rec.attribute15 := p0_a25;
976 ddp_task_group_rec.reason_type := p0_a26;
977 ddp_task_group_rec.template_group_name := p0_a27;
978 ddp_task_group_rec.description := p0_a28;
979
980 ddp_complete_rec.task_template_group_id := p1_a0;
981 ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
982 ddp_complete_rec.last_updated_by := p1_a2;
983 ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
984 ddp_complete_rec.created_by := p1_a4;
985 ddp_complete_rec.last_update_login := p1_a5;
986 ddp_complete_rec.start_date_active := rosetta_g_miss_date_in_map(p1_a6);
987 ddp_complete_rec.end_date_active := rosetta_g_miss_date_in_map(p1_a7);
988 ddp_complete_rec.source_object_type_code := p1_a8;
989 ddp_complete_rec.object_version_number := p1_a9;
990 ddp_complete_rec.attribute_category := p1_a10;
991 ddp_complete_rec.attribute1 := p1_a11;
992 ddp_complete_rec.attribute2 := p1_a12;
993 ddp_complete_rec.attribute3 := p1_a13;
994 ddp_complete_rec.attribute4 := p1_a14;
995 ddp_complete_rec.attribute5 := p1_a15;
996 ddp_complete_rec.attribute6 := p1_a16;
997 ddp_complete_rec.attribute7 := p1_a17;
998 ddp_complete_rec.attribute8 := p1_a18;
999 ddp_complete_rec.attribute9 := p1_a19;
1000 ddp_complete_rec.attribute10 := p1_a20;
1001 ddp_complete_rec.attribute11 := p1_a21;
1002 ddp_complete_rec.attribute12 := p1_a22;
1003 ddp_complete_rec.attribute13 := p1_a23;
1004 ddp_complete_rec.attribute14 := p1_a24;
1005 ddp_complete_rec.attribute15 := p1_a25;
1006 ddp_complete_rec.reason_type := p1_a26;
1007 ddp_complete_rec.template_group_name := p1_a27;
1008 ddp_complete_rec.description := p1_a28;
1009
1010
1011 -- here's the delegated call to the old PL/SQL routine
1012 ozf_task_group_pvt.check_task_group_record(ddp_task_group_rec,
1013 ddp_complete_rec,
1014 x_return_status);
1015
1016 -- copy data back from the local variables to OUT or IN-OUT args, if any
1017
1018
1019 end;
1020
1021 procedure init_task_group_rec(p0_a0 out nocopy NUMBER
1022 , p0_a1 out nocopy DATE
1023 , p0_a2 out nocopy NUMBER
1024 , p0_a3 out nocopy DATE
1025 , p0_a4 out nocopy NUMBER
1026 , p0_a5 out nocopy NUMBER
1027 , p0_a6 out nocopy DATE
1028 , p0_a7 out nocopy DATE
1029 , p0_a8 out nocopy VARCHAR2
1030 , p0_a9 out nocopy NUMBER
1031 , p0_a10 out nocopy VARCHAR2
1032 , p0_a11 out nocopy VARCHAR2
1033 , p0_a12 out nocopy VARCHAR2
1034 , p0_a13 out nocopy VARCHAR2
1035 , p0_a14 out nocopy VARCHAR2
1036 , p0_a15 out nocopy VARCHAR2
1037 , p0_a16 out nocopy VARCHAR2
1038 , p0_a17 out nocopy VARCHAR2
1039 , p0_a18 out nocopy VARCHAR2
1040 , p0_a19 out nocopy VARCHAR2
1041 , p0_a20 out nocopy VARCHAR2
1042 , p0_a21 out nocopy VARCHAR2
1043 , p0_a22 out nocopy VARCHAR2
1044 , p0_a23 out nocopy VARCHAR2
1045 , p0_a24 out nocopy VARCHAR2
1046 , p0_a25 out nocopy VARCHAR2
1047 , p0_a26 out nocopy VARCHAR2
1048 , p0_a27 out nocopy VARCHAR2
1049 , p0_a28 out nocopy VARCHAR2
1050 )
1051
1052 as
1053 ddx_task_group_rec ozf_task_group_pvt.task_group_rec_type;
1054 ddindx binary_integer; indx binary_integer;
1055 begin
1056
1057 -- copy data to the local IN or IN-OUT args, if any
1058
1059 -- here's the delegated call to the old PL/SQL routine
1060 ozf_task_group_pvt.init_task_group_rec(ddx_task_group_rec);
1061
1062 -- copy data back from the local variables to OUT or IN-OUT args, if any
1063 p0_a0 := ddx_task_group_rec.task_template_group_id;
1064 p0_a1 := ddx_task_group_rec.last_update_date;
1065 p0_a2 := ddx_task_group_rec.last_updated_by;
1066 p0_a3 := ddx_task_group_rec.creation_date;
1067 p0_a4 := ddx_task_group_rec.created_by;
1068 p0_a5 := ddx_task_group_rec.last_update_login;
1069 p0_a6 := ddx_task_group_rec.start_date_active;
1070 p0_a7 := ddx_task_group_rec.end_date_active;
1071 p0_a8 := ddx_task_group_rec.source_object_type_code;
1072 p0_a9 := ddx_task_group_rec.object_version_number;
1073 p0_a10 := ddx_task_group_rec.attribute_category;
1074 p0_a11 := ddx_task_group_rec.attribute1;
1075 p0_a12 := ddx_task_group_rec.attribute2;
1076 p0_a13 := ddx_task_group_rec.attribute3;
1077 p0_a14 := ddx_task_group_rec.attribute4;
1078 p0_a15 := ddx_task_group_rec.attribute5;
1079 p0_a16 := ddx_task_group_rec.attribute6;
1080 p0_a17 := ddx_task_group_rec.attribute7;
1081 p0_a18 := ddx_task_group_rec.attribute8;
1082 p0_a19 := ddx_task_group_rec.attribute9;
1083 p0_a20 := ddx_task_group_rec.attribute10;
1084 p0_a21 := ddx_task_group_rec.attribute11;
1085 p0_a22 := ddx_task_group_rec.attribute12;
1086 p0_a23 := ddx_task_group_rec.attribute13;
1087 p0_a24 := ddx_task_group_rec.attribute14;
1088 p0_a25 := ddx_task_group_rec.attribute15;
1089 p0_a26 := ddx_task_group_rec.reason_type;
1090 p0_a27 := ddx_task_group_rec.template_group_name;
1091 p0_a28 := ddx_task_group_rec.description;
1092 end;
1093
1094 procedure complete_task_group_rec(p0_a0 NUMBER
1095 , p0_a1 DATE
1096 , p0_a2 NUMBER
1097 , p0_a3 DATE
1098 , p0_a4 NUMBER
1099 , p0_a5 NUMBER
1100 , p0_a6 DATE
1101 , p0_a7 DATE
1102 , p0_a8 VARCHAR2
1103 , p0_a9 NUMBER
1104 , p0_a10 VARCHAR2
1105 , p0_a11 VARCHAR2
1106 , p0_a12 VARCHAR2
1107 , p0_a13 VARCHAR2
1108 , p0_a14 VARCHAR2
1109 , p0_a15 VARCHAR2
1110 , p0_a16 VARCHAR2
1111 , p0_a17 VARCHAR2
1112 , p0_a18 VARCHAR2
1113 , p0_a19 VARCHAR2
1114 , p0_a20 VARCHAR2
1115 , p0_a21 VARCHAR2
1116 , p0_a22 VARCHAR2
1117 , p0_a23 VARCHAR2
1118 , p0_a24 VARCHAR2
1119 , p0_a25 VARCHAR2
1120 , p0_a26 VARCHAR2
1121 , p0_a27 VARCHAR2
1122 , p0_a28 VARCHAR2
1123 , p1_a0 out nocopy NUMBER
1124 , p1_a1 out nocopy DATE
1125 , p1_a2 out nocopy NUMBER
1126 , p1_a3 out nocopy DATE
1127 , p1_a4 out nocopy NUMBER
1128 , p1_a5 out nocopy NUMBER
1129 , p1_a6 out nocopy DATE
1130 , p1_a7 out nocopy DATE
1131 , p1_a8 out nocopy VARCHAR2
1132 , p1_a9 out nocopy NUMBER
1133 , p1_a10 out nocopy VARCHAR2
1134 , p1_a11 out nocopy VARCHAR2
1135 , p1_a12 out nocopy VARCHAR2
1136 , p1_a13 out nocopy VARCHAR2
1137 , p1_a14 out nocopy VARCHAR2
1138 , p1_a15 out nocopy VARCHAR2
1139 , p1_a16 out nocopy VARCHAR2
1140 , p1_a17 out nocopy VARCHAR2
1141 , p1_a18 out nocopy VARCHAR2
1142 , p1_a19 out nocopy VARCHAR2
1143 , p1_a20 out nocopy VARCHAR2
1144 , p1_a21 out nocopy VARCHAR2
1145 , p1_a22 out nocopy VARCHAR2
1146 , p1_a23 out nocopy VARCHAR2
1147 , p1_a24 out nocopy VARCHAR2
1148 , p1_a25 out nocopy VARCHAR2
1149 , p1_a26 out nocopy VARCHAR2
1150 , p1_a27 out nocopy VARCHAR2
1151 , p1_a28 out nocopy VARCHAR2
1152 )
1153
1154 as
1155 ddp_task_group_rec ozf_task_group_pvt.task_group_rec_type;
1156 ddx_complete_rec ozf_task_group_pvt.task_group_rec_type;
1157 ddindx binary_integer; indx binary_integer;
1158 begin
1159
1160 -- copy data to the local IN or IN-OUT args, if any
1161 ddp_task_group_rec.task_template_group_id := p0_a0;
1162 ddp_task_group_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
1163 ddp_task_group_rec.last_updated_by := p0_a2;
1164 ddp_task_group_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
1165 ddp_task_group_rec.created_by := p0_a4;
1166 ddp_task_group_rec.last_update_login := p0_a5;
1167 ddp_task_group_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a6);
1168 ddp_task_group_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a7);
1169 ddp_task_group_rec.source_object_type_code := p0_a8;
1170 ddp_task_group_rec.object_version_number := p0_a9;
1171 ddp_task_group_rec.attribute_category := p0_a10;
1172 ddp_task_group_rec.attribute1 := p0_a11;
1173 ddp_task_group_rec.attribute2 := p0_a12;
1174 ddp_task_group_rec.attribute3 := p0_a13;
1175 ddp_task_group_rec.attribute4 := p0_a14;
1176 ddp_task_group_rec.attribute5 := p0_a15;
1177 ddp_task_group_rec.attribute6 := p0_a16;
1178 ddp_task_group_rec.attribute7 := p0_a17;
1179 ddp_task_group_rec.attribute8 := p0_a18;
1180 ddp_task_group_rec.attribute9 := p0_a19;
1181 ddp_task_group_rec.attribute10 := p0_a20;
1182 ddp_task_group_rec.attribute11 := p0_a21;
1183 ddp_task_group_rec.attribute12 := p0_a22;
1184 ddp_task_group_rec.attribute13 := p0_a23;
1185 ddp_task_group_rec.attribute14 := p0_a24;
1186 ddp_task_group_rec.attribute15 := p0_a25;
1187 ddp_task_group_rec.reason_type := p0_a26;
1188 ddp_task_group_rec.template_group_name := p0_a27;
1189 ddp_task_group_rec.description := p0_a28;
1190
1191
1192 -- here's the delegated call to the old PL/SQL routine
1193 ozf_task_group_pvt.complete_task_group_rec(ddp_task_group_rec,
1194 ddx_complete_rec);
1195
1196 -- copy data back from the local variables to OUT or IN-OUT args, if any
1197
1198 p1_a0 := ddx_complete_rec.task_template_group_id;
1199 p1_a1 := ddx_complete_rec.last_update_date;
1200 p1_a2 := ddx_complete_rec.last_updated_by;
1201 p1_a3 := ddx_complete_rec.creation_date;
1202 p1_a4 := ddx_complete_rec.created_by;
1203 p1_a5 := ddx_complete_rec.last_update_login;
1204 p1_a6 := ddx_complete_rec.start_date_active;
1205 p1_a7 := ddx_complete_rec.end_date_active;
1206 p1_a8 := ddx_complete_rec.source_object_type_code;
1207 p1_a9 := ddx_complete_rec.object_version_number;
1208 p1_a10 := ddx_complete_rec.attribute_category;
1209 p1_a11 := ddx_complete_rec.attribute1;
1210 p1_a12 := ddx_complete_rec.attribute2;
1211 p1_a13 := ddx_complete_rec.attribute3;
1212 p1_a14 := ddx_complete_rec.attribute4;
1213 p1_a15 := ddx_complete_rec.attribute5;
1214 p1_a16 := ddx_complete_rec.attribute6;
1215 p1_a17 := ddx_complete_rec.attribute7;
1216 p1_a18 := ddx_complete_rec.attribute8;
1217 p1_a19 := ddx_complete_rec.attribute9;
1218 p1_a20 := ddx_complete_rec.attribute10;
1219 p1_a21 := ddx_complete_rec.attribute11;
1220 p1_a22 := ddx_complete_rec.attribute12;
1221 p1_a23 := ddx_complete_rec.attribute13;
1222 p1_a24 := ddx_complete_rec.attribute14;
1223 p1_a25 := ddx_complete_rec.attribute15;
1224 p1_a26 := ddx_complete_rec.reason_type;
1225 p1_a27 := ddx_complete_rec.template_group_name;
1226 p1_a28 := ddx_complete_rec.description;
1227 end;
1228
1229 end ozf_task_group_pvt_w;