[Home] [Help]
PACKAGE BODY: APPS.JTF_TASK_INST_TEMPLATES_PUB_W
Source
1 package body jtf_task_inst_templates_pub_w as
2 /* $Header: jtfpttwb.pls 120.3 2006/04/26 04:35 knayyar ship $ */
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 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 procedure rosetta_table_copy_in_p1(t out nocopy jtf_task_inst_templates_pub.task_details_tbl, a0 JTF_NUMBER_TABLE
17 , a1 JTF_NUMBER_TABLE
18 ) as
19 ddindx binary_integer; indx binary_integer;
20 begin
21 if a0 is not null and a0.count > 0 then
22 if a0.count > 0 then
23 indx := a0.first;
24 ddindx := 1;
25 while true loop
26 t(ddindx).task_id := a0(indx);
27 t(ddindx).task_template_id := a1(indx);
28 ddindx := ddindx+1;
29 if a0.last =indx
30 then exit;
31 end if;
32 indx := a0.next(indx);
33 end loop;
34 end if;
35 end if;
36 end rosetta_table_copy_in_p1;
37 procedure rosetta_table_copy_out_p1(t jtf_task_inst_templates_pub.task_details_tbl, a0 out nocopy JTF_NUMBER_TABLE
38 , a1 out nocopy JTF_NUMBER_TABLE
39 ) as
40 ddindx binary_integer; indx binary_integer;
41 begin
42 if t is null or t.count = 0 then
43 a0 := JTF_NUMBER_TABLE();
44 a1 := JTF_NUMBER_TABLE();
45 else
46 a0 := JTF_NUMBER_TABLE();
47 a1 := JTF_NUMBER_TABLE();
48 if t.count > 0 then
49 a0.extend(t.count);
50 a1.extend(t.count);
51 ddindx := t.first;
52 indx := 1;
53 while true loop
54 a0(indx) := t(ddindx).task_id;
55 a1(indx) := t(ddindx).task_template_id;
56 indx := indx+1;
57 if t.last =ddindx
58 then exit;
59 end if;
60 ddindx := t.next(ddindx);
61 end loop;
62 end if;
63 end if;
64 end rosetta_table_copy_out_p1;
65
66 procedure rosetta_table_copy_in_p3(t out nocopy jtf_task_inst_templates_pub.task_contact_points_tbl, a0 JTF_NUMBER_TABLE
67 , a1 JTF_NUMBER_TABLE
68 , a2 JTF_VARCHAR2_TABLE_100
69 ) as
70 ddindx binary_integer; indx binary_integer;
71 begin
72 if a0 is not null and a0.count > 0 then
73 if a0.count > 0 then
74 indx := a0.first;
75 ddindx := 1;
76 while true loop
77 t(ddindx).task_template_id := a0(indx);
78 t(ddindx).phone_id := a1(indx);
79 t(ddindx).primary_key := a2(indx);
80 ddindx := ddindx+1;
81 if a0.last =indx
82 then exit;
83 end if;
84 indx := a0.next(indx);
85 end loop;
86 end if;
87 end if;
88 end rosetta_table_copy_in_p3;
89 procedure rosetta_table_copy_out_p3(t jtf_task_inst_templates_pub.task_contact_points_tbl, a0 out nocopy JTF_NUMBER_TABLE
90 , a1 out nocopy JTF_NUMBER_TABLE
91 , a2 out nocopy JTF_VARCHAR2_TABLE_100
92 ) as
93 ddindx binary_integer; indx binary_integer;
94 begin
95 if t is null or t.count = 0 then
96 a0 := JTF_NUMBER_TABLE();
97 a1 := JTF_NUMBER_TABLE();
98 a2 := JTF_VARCHAR2_TABLE_100();
99 else
100 a0 := JTF_NUMBER_TABLE();
101 a1 := JTF_NUMBER_TABLE();
102 a2 := JTF_VARCHAR2_TABLE_100();
103 if t.count > 0 then
104 a0.extend(t.count);
105 a1.extend(t.count);
106 a2.extend(t.count);
107 ddindx := t.first;
108 indx := 1;
109 while true loop
110 a0(indx) := t(ddindx).task_template_id;
111 a1(indx) := t(ddindx).phone_id;
112 a2(indx) := t(ddindx).primary_key;
113 indx := indx+1;
114 if t.last =ddindx
115 then exit;
116 end if;
117 ddindx := t.next(ddindx);
118 end loop;
119 end if;
120 end if;
121 end rosetta_table_copy_out_p3;
122
123 procedure rosetta_table_copy_in_p6(t out nocopy jtf_task_inst_templates_pub.task_template_info_tbl, a0 JTF_NUMBER_TABLE
124 , a1 JTF_VARCHAR2_TABLE_100
125 , a2 JTF_VARCHAR2_TABLE_4000
126 , a3 JTF_NUMBER_TABLE
127 , a4 JTF_NUMBER_TABLE
128 , a5 JTF_NUMBER_TABLE
129 , a6 JTF_VARCHAR2_TABLE_100
130 , a7 JTF_NUMBER_TABLE
131 , a8 JTF_DATE_TABLE
132 , a9 JTF_DATE_TABLE
133 , a10 JTF_DATE_TABLE
134 , a11 JTF_DATE_TABLE
135 , a12 JTF_DATE_TABLE
136 , a13 JTF_DATE_TABLE
137 , a14 JTF_VARCHAR2_TABLE_100
138 , a15 JTF_NUMBER_TABLE
139 , a16 JTF_NUMBER_TABLE
140 , a17 JTF_VARCHAR2_TABLE_100
141 , a18 JTF_NUMBER_TABLE
142 , a19 JTF_VARCHAR2_TABLE_100
143 , a20 JTF_VARCHAR2_TABLE_100
144 , a21 JTF_VARCHAR2_TABLE_100
145 , a22 JTF_VARCHAR2_TABLE_100
146 , a23 JTF_VARCHAR2_TABLE_100
147 , a24 JTF_VARCHAR2_TABLE_100
148 , a25 JTF_VARCHAR2_TABLE_100
149 , a26 JTF_VARCHAR2_TABLE_100
150 , a27 JTF_VARCHAR2_TABLE_100
151 , a28 JTF_VARCHAR2_TABLE_100
152 , a29 JTF_VARCHAR2_TABLE_100
153 , a30 JTF_VARCHAR2_TABLE_200
154 , a31 JTF_VARCHAR2_TABLE_200
155 , a32 JTF_VARCHAR2_TABLE_200
156 , a33 JTF_VARCHAR2_TABLE_200
157 , a34 JTF_VARCHAR2_TABLE_200
158 , a35 JTF_VARCHAR2_TABLE_200
159 , a36 JTF_VARCHAR2_TABLE_200
160 , a37 JTF_VARCHAR2_TABLE_200
161 , a38 JTF_VARCHAR2_TABLE_200
162 , a39 JTF_VARCHAR2_TABLE_200
163 , a40 JTF_VARCHAR2_TABLE_200
164 , a41 JTF_VARCHAR2_TABLE_200
165 , a42 JTF_VARCHAR2_TABLE_200
166 , a43 JTF_VARCHAR2_TABLE_200
167 , a44 JTF_VARCHAR2_TABLE_200
168 , a45 JTF_VARCHAR2_TABLE_100
169 , a46 JTF_VARCHAR2_TABLE_100
170 ) as
171 ddindx binary_integer; indx binary_integer;
172 begin
173 if a0 is not null and a0.count > 0 then
174 if a0.count > 0 then
175 indx := a0.first;
176 ddindx := 1;
177 while true loop
178 t(ddindx).task_template_id := a0(indx);
179 t(ddindx).task_name := a1(indx);
180 t(ddindx).description := a2(indx);
181 t(ddindx).task_type_id := a3(indx);
182 t(ddindx).task_status_id := a4(indx);
183 t(ddindx).task_priority_id := a5(indx);
184 t(ddindx).owner_type_code := a6(indx);
185 t(ddindx).owner_id := a7(indx);
186 t(ddindx).planned_start_date := rosetta_g_miss_date_in_map(a8(indx));
187 t(ddindx).planned_end_date := rosetta_g_miss_date_in_map(a9(indx));
188 t(ddindx).scheduled_start_date := rosetta_g_miss_date_in_map(a10(indx));
189 t(ddindx).scheduled_end_date := rosetta_g_miss_date_in_map(a11(indx));
190 t(ddindx).actual_start_date := rosetta_g_miss_date_in_map(a12(indx));
191 t(ddindx).actual_end_date := rosetta_g_miss_date_in_map(a13(indx));
192 t(ddindx).p_date_selected := a14(indx);
193 t(ddindx).timezone_id := a15(indx);
194 t(ddindx).duration := a16(indx);
195 t(ddindx).duration_uom := a17(indx);
196 t(ddindx).planned_effort := a18(indx);
197 t(ddindx).planned_effort_uom := a19(indx);
198 t(ddindx).private_flag := a20(indx);
199 t(ddindx).restrict_closure_flag := a21(indx);
200 t(ddindx).palm_flag := a22(indx);
201 t(ddindx).wince_flag := a23(indx);
202 t(ddindx).laptop_flag := a24(indx);
203 t(ddindx).device1_flag := a25(indx);
204 t(ddindx).device2_flag := a26(indx);
205 t(ddindx).device3_flag := a27(indx);
206 t(ddindx).show_on_calendar := a28(indx);
207 t(ddindx).enable_workflow := a29(indx);
208 t(ddindx).attribute1 := a30(indx);
209 t(ddindx).attribute2 := a31(indx);
210 t(ddindx).attribute3 := a32(indx);
211 t(ddindx).attribute4 := a33(indx);
212 t(ddindx).attribute5 := a34(indx);
213 t(ddindx).attribute6 := a35(indx);
214 t(ddindx).attribute7 := a36(indx);
215 t(ddindx).attribute8 := a37(indx);
216 t(ddindx).attribute9 := a38(indx);
217 t(ddindx).attribute10 := a39(indx);
218 t(ddindx).attribute11 := a40(indx);
219 t(ddindx).attribute12 := a41(indx);
220 t(ddindx).attribute13 := a42(indx);
221 t(ddindx).attribute14 := a43(indx);
222 t(ddindx).attribute15 := a44(indx);
223 t(ddindx).attribute_category := a45(indx);
224 t(ddindx).task_confirmation_status := a46(indx);
225 ddindx := ddindx+1;
226 if a0.last =indx
227 then exit;
228 end if;
229 indx := a0.next(indx);
230 end loop;
231 end if;
232 end if;
233 end rosetta_table_copy_in_p6;
234 procedure rosetta_table_copy_out_p6(t jtf_task_inst_templates_pub.task_template_info_tbl, a0 out nocopy JTF_NUMBER_TABLE
235 , a1 out nocopy JTF_VARCHAR2_TABLE_100
236 , a2 out nocopy JTF_VARCHAR2_TABLE_4000
237 , a3 out nocopy JTF_NUMBER_TABLE
238 , a4 out nocopy JTF_NUMBER_TABLE
239 , a5 out nocopy JTF_NUMBER_TABLE
240 , a6 out nocopy JTF_VARCHAR2_TABLE_100
241 , a7 out nocopy JTF_NUMBER_TABLE
242 , a8 out nocopy JTF_DATE_TABLE
243 , a9 out nocopy JTF_DATE_TABLE
244 , a10 out nocopy JTF_DATE_TABLE
245 , a11 out nocopy JTF_DATE_TABLE
246 , a12 out nocopy JTF_DATE_TABLE
247 , a13 out nocopy JTF_DATE_TABLE
248 , a14 out nocopy JTF_VARCHAR2_TABLE_100
249 , a15 out nocopy JTF_NUMBER_TABLE
250 , a16 out nocopy JTF_NUMBER_TABLE
251 , a17 out nocopy JTF_VARCHAR2_TABLE_100
252 , a18 out nocopy JTF_NUMBER_TABLE
253 , a19 out nocopy JTF_VARCHAR2_TABLE_100
254 , a20 out nocopy JTF_VARCHAR2_TABLE_100
255 , a21 out nocopy JTF_VARCHAR2_TABLE_100
256 , a22 out nocopy JTF_VARCHAR2_TABLE_100
257 , a23 out nocopy JTF_VARCHAR2_TABLE_100
258 , a24 out nocopy JTF_VARCHAR2_TABLE_100
259 , a25 out nocopy JTF_VARCHAR2_TABLE_100
260 , a26 out nocopy JTF_VARCHAR2_TABLE_100
261 , a27 out nocopy JTF_VARCHAR2_TABLE_100
262 , a28 out nocopy JTF_VARCHAR2_TABLE_100
263 , a29 out nocopy JTF_VARCHAR2_TABLE_100
264 , a30 out nocopy JTF_VARCHAR2_TABLE_200
265 , a31 out nocopy JTF_VARCHAR2_TABLE_200
266 , a32 out nocopy JTF_VARCHAR2_TABLE_200
267 , a33 out nocopy JTF_VARCHAR2_TABLE_200
268 , a34 out nocopy JTF_VARCHAR2_TABLE_200
269 , a35 out nocopy JTF_VARCHAR2_TABLE_200
270 , a36 out nocopy JTF_VARCHAR2_TABLE_200
271 , a37 out nocopy JTF_VARCHAR2_TABLE_200
272 , a38 out nocopy JTF_VARCHAR2_TABLE_200
273 , a39 out nocopy JTF_VARCHAR2_TABLE_200
274 , a40 out nocopy JTF_VARCHAR2_TABLE_200
275 , a41 out nocopy JTF_VARCHAR2_TABLE_200
276 , a42 out nocopy JTF_VARCHAR2_TABLE_200
277 , a43 out nocopy JTF_VARCHAR2_TABLE_200
278 , a44 out nocopy JTF_VARCHAR2_TABLE_200
279 , a45 out nocopy JTF_VARCHAR2_TABLE_100
280 , a46 out nocopy JTF_VARCHAR2_TABLE_100
281 ) as
282 ddindx binary_integer; indx binary_integer;
283 begin
284 if t is null or t.count = 0 then
285 a0 := JTF_NUMBER_TABLE();
286 a1 := JTF_VARCHAR2_TABLE_100();
287 a2 := JTF_VARCHAR2_TABLE_4000();
288 a3 := JTF_NUMBER_TABLE();
289 a4 := JTF_NUMBER_TABLE();
290 a5 := JTF_NUMBER_TABLE();
291 a6 := JTF_VARCHAR2_TABLE_100();
292 a7 := JTF_NUMBER_TABLE();
293 a8 := JTF_DATE_TABLE();
294 a9 := JTF_DATE_TABLE();
295 a10 := JTF_DATE_TABLE();
296 a11 := JTF_DATE_TABLE();
297 a12 := JTF_DATE_TABLE();
298 a13 := JTF_DATE_TABLE();
299 a14 := JTF_VARCHAR2_TABLE_100();
300 a15 := JTF_NUMBER_TABLE();
301 a16 := JTF_NUMBER_TABLE();
302 a17 := JTF_VARCHAR2_TABLE_100();
303 a18 := JTF_NUMBER_TABLE();
304 a19 := JTF_VARCHAR2_TABLE_100();
305 a20 := JTF_VARCHAR2_TABLE_100();
306 a21 := JTF_VARCHAR2_TABLE_100();
307 a22 := JTF_VARCHAR2_TABLE_100();
308 a23 := JTF_VARCHAR2_TABLE_100();
309 a24 := JTF_VARCHAR2_TABLE_100();
310 a25 := JTF_VARCHAR2_TABLE_100();
311 a26 := JTF_VARCHAR2_TABLE_100();
312 a27 := JTF_VARCHAR2_TABLE_100();
313 a28 := JTF_VARCHAR2_TABLE_100();
314 a29 := JTF_VARCHAR2_TABLE_100();
315 a30 := JTF_VARCHAR2_TABLE_200();
316 a31 := JTF_VARCHAR2_TABLE_200();
317 a32 := JTF_VARCHAR2_TABLE_200();
318 a33 := JTF_VARCHAR2_TABLE_200();
319 a34 := JTF_VARCHAR2_TABLE_200();
320 a35 := JTF_VARCHAR2_TABLE_200();
321 a36 := JTF_VARCHAR2_TABLE_200();
322 a37 := JTF_VARCHAR2_TABLE_200();
323 a38 := JTF_VARCHAR2_TABLE_200();
324 a39 := JTF_VARCHAR2_TABLE_200();
325 a40 := JTF_VARCHAR2_TABLE_200();
326 a41 := JTF_VARCHAR2_TABLE_200();
327 a42 := JTF_VARCHAR2_TABLE_200();
328 a43 := JTF_VARCHAR2_TABLE_200();
329 a44 := JTF_VARCHAR2_TABLE_200();
330 a45 := JTF_VARCHAR2_TABLE_100();
331 a46 := JTF_VARCHAR2_TABLE_100();
332 else
333 a0 := JTF_NUMBER_TABLE();
334 a1 := JTF_VARCHAR2_TABLE_100();
335 a2 := JTF_VARCHAR2_TABLE_4000();
336 a3 := JTF_NUMBER_TABLE();
337 a4 := JTF_NUMBER_TABLE();
338 a5 := JTF_NUMBER_TABLE();
339 a6 := JTF_VARCHAR2_TABLE_100();
340 a7 := JTF_NUMBER_TABLE();
341 a8 := JTF_DATE_TABLE();
342 a9 := JTF_DATE_TABLE();
343 a10 := JTF_DATE_TABLE();
344 a11 := JTF_DATE_TABLE();
345 a12 := JTF_DATE_TABLE();
346 a13 := JTF_DATE_TABLE();
347 a14 := JTF_VARCHAR2_TABLE_100();
348 a15 := JTF_NUMBER_TABLE();
349 a16 := JTF_NUMBER_TABLE();
350 a17 := JTF_VARCHAR2_TABLE_100();
351 a18 := JTF_NUMBER_TABLE();
352 a19 := JTF_VARCHAR2_TABLE_100();
353 a20 := JTF_VARCHAR2_TABLE_100();
354 a21 := JTF_VARCHAR2_TABLE_100();
355 a22 := JTF_VARCHAR2_TABLE_100();
356 a23 := JTF_VARCHAR2_TABLE_100();
357 a24 := JTF_VARCHAR2_TABLE_100();
358 a25 := JTF_VARCHAR2_TABLE_100();
359 a26 := JTF_VARCHAR2_TABLE_100();
360 a27 := JTF_VARCHAR2_TABLE_100();
361 a28 := JTF_VARCHAR2_TABLE_100();
362 a29 := JTF_VARCHAR2_TABLE_100();
363 a30 := JTF_VARCHAR2_TABLE_200();
367 a34 := JTF_VARCHAR2_TABLE_200();
364 a31 := JTF_VARCHAR2_TABLE_200();
365 a32 := JTF_VARCHAR2_TABLE_200();
366 a33 := JTF_VARCHAR2_TABLE_200();
368 a35 := JTF_VARCHAR2_TABLE_200();
369 a36 := JTF_VARCHAR2_TABLE_200();
370 a37 := JTF_VARCHAR2_TABLE_200();
371 a38 := JTF_VARCHAR2_TABLE_200();
372 a39 := JTF_VARCHAR2_TABLE_200();
373 a40 := JTF_VARCHAR2_TABLE_200();
374 a41 := JTF_VARCHAR2_TABLE_200();
375 a42 := JTF_VARCHAR2_TABLE_200();
376 a43 := JTF_VARCHAR2_TABLE_200();
377 a44 := JTF_VARCHAR2_TABLE_200();
378 a45 := JTF_VARCHAR2_TABLE_100();
379 a46 := JTF_VARCHAR2_TABLE_100();
380 if t.count > 0 then
381 a0.extend(t.count);
382 a1.extend(t.count);
383 a2.extend(t.count);
384 a3.extend(t.count);
385 a4.extend(t.count);
386 a5.extend(t.count);
387 a6.extend(t.count);
388 a7.extend(t.count);
389 a8.extend(t.count);
390 a9.extend(t.count);
391 a10.extend(t.count);
392 a11.extend(t.count);
393 a12.extend(t.count);
394 a13.extend(t.count);
395 a14.extend(t.count);
396 a15.extend(t.count);
397 a16.extend(t.count);
398 a17.extend(t.count);
399 a18.extend(t.count);
400 a19.extend(t.count);
401 a20.extend(t.count);
402 a21.extend(t.count);
403 a22.extend(t.count);
404 a23.extend(t.count);
405 a24.extend(t.count);
406 a25.extend(t.count);
407 a26.extend(t.count);
408 a27.extend(t.count);
409 a28.extend(t.count);
410 a29.extend(t.count);
411 a30.extend(t.count);
412 a31.extend(t.count);
413 a32.extend(t.count);
414 a33.extend(t.count);
415 a34.extend(t.count);
416 a35.extend(t.count);
417 a36.extend(t.count);
418 a37.extend(t.count);
419 a38.extend(t.count);
420 a39.extend(t.count);
421 a40.extend(t.count);
422 a41.extend(t.count);
423 a42.extend(t.count);
424 a43.extend(t.count);
425 a44.extend(t.count);
426 a45.extend(t.count);
427 a46.extend(t.count);
428 ddindx := t.first;
429 indx := 1;
430 while true loop
431 a0(indx) := t(ddindx).task_template_id;
432 a1(indx) := t(ddindx).task_name;
433 a2(indx) := t(ddindx).description;
434 a3(indx) := t(ddindx).task_type_id;
435 a4(indx) := t(ddindx).task_status_id;
436 a5(indx) := t(ddindx).task_priority_id;
437 a6(indx) := t(ddindx).owner_type_code;
438 a7(indx) := t(ddindx).owner_id;
439 a8(indx) := t(ddindx).planned_start_date;
440 a9(indx) := t(ddindx).planned_end_date;
441 a10(indx) := t(ddindx).scheduled_start_date;
442 a11(indx) := t(ddindx).scheduled_end_date;
443 a12(indx) := t(ddindx).actual_start_date;
444 a13(indx) := t(ddindx).actual_end_date;
445 a14(indx) := t(ddindx).p_date_selected;
446 a15(indx) := t(ddindx).timezone_id;
447 a16(indx) := t(ddindx).duration;
448 a17(indx) := t(ddindx).duration_uom;
449 a18(indx) := t(ddindx).planned_effort;
450 a19(indx) := t(ddindx).planned_effort_uom;
451 a20(indx) := t(ddindx).private_flag;
452 a21(indx) := t(ddindx).restrict_closure_flag;
453 a22(indx) := t(ddindx).palm_flag;
454 a23(indx) := t(ddindx).wince_flag;
455 a24(indx) := t(ddindx).laptop_flag;
456 a25(indx) := t(ddindx).device1_flag;
457 a26(indx) := t(ddindx).device2_flag;
458 a27(indx) := t(ddindx).device3_flag;
459 a28(indx) := t(ddindx).show_on_calendar;
460 a29(indx) := t(ddindx).enable_workflow;
461 a30(indx) := t(ddindx).attribute1;
462 a31(indx) := t(ddindx).attribute2;
463 a32(indx) := t(ddindx).attribute3;
464 a33(indx) := t(ddindx).attribute4;
465 a34(indx) := t(ddindx).attribute5;
466 a35(indx) := t(ddindx).attribute6;
467 a36(indx) := t(ddindx).attribute7;
468 a37(indx) := t(ddindx).attribute8;
469 a38(indx) := t(ddindx).attribute9;
470 a39(indx) := t(ddindx).attribute10;
471 a40(indx) := t(ddindx).attribute11;
472 a41(indx) := t(ddindx).attribute12;
473 a42(indx) := t(ddindx).attribute13;
474 a43(indx) := t(ddindx).attribute14;
475 a44(indx) := t(ddindx).attribute15;
476 a45(indx) := t(ddindx).attribute_category;
477 a46(indx) := t(ddindx).task_confirmation_status;
478 indx := indx+1;
479 if t.last =ddindx
480 then exit;
481 end if;
482 ddindx := t.next(ddindx);
483 end loop;
484 end if;
485 end if;
486 end rosetta_table_copy_out_p6;
487
488 procedure create_task_from_template(p_api_version NUMBER
489 , p_init_msg_list VARCHAR2
490 , p_commit VARCHAR2
491 , p3_a0 NUMBER
492 , p3_a1 VARCHAR2
493 , p3_a2 NUMBER
494 , p3_a3 NUMBER
495 , p3_a4 VARCHAR2
496 , p3_a5 NUMBER
500 , p3_a9 DATE
497 , p3_a6 NUMBER
498 , p3_a7 NUMBER
499 , p3_a8 NUMBER
501 , p3_a10 DATE
502 , p3_a11 DATE
503 , p3_a12 DATE
504 , p3_a13 DATE
505 , p3_a14 DATE
506 , p3_a15 VARCHAR2
507 , p3_a16 VARCHAR2
508 , p3_a17 VARCHAR2
509 , p3_a18 VARCHAR2
510 , p3_a19 VARCHAR2
511 , p3_a20 VARCHAR2
512 , p3_a21 NUMBER
513 , p3_a22 NUMBER
514 , p3_a23 NUMBER
515 , p3_a24 NUMBER
516 , p3_a25 VARCHAR2
517 , p3_a26 VARCHAR2
518 , p3_a27 VARCHAR2
519 , p3_a28 VARCHAR2
520 , p3_a29 NUMBER
521 , p3_a30 NUMBER
522 , p3_a31 NUMBER
523 , p3_a32 VARCHAR2
524 , p3_a33 VARCHAR2
525 , p3_a34 VARCHAR2
526 , p3_a35 VARCHAR2
527 , p3_a36 VARCHAR2
528 , p3_a37 VARCHAR2
529 , p3_a38 VARCHAR2
530 , p3_a39 VARCHAR2
531 , p3_a40 VARCHAR2
532 , p3_a41 VARCHAR2
533 , p3_a42 VARCHAR2
534 , p3_a43 VARCHAR2
535 , p3_a44 VARCHAR2
536 , p3_a45 VARCHAR2
537 , p3_a46 VARCHAR2
538 , p3_a47 VARCHAR2
539 , p3_a48 VARCHAR2
540 , p3_a49 VARCHAR2
541 , p3_a50 VARCHAR2
542 , p3_a51 NUMBER
543 , p4_a0 JTF_NUMBER_TABLE
544 , p4_a1 JTF_VARCHAR2_TABLE_100
545 , p4_a2 JTF_VARCHAR2_TABLE_4000
546 , p4_a3 JTF_NUMBER_TABLE
547 , p4_a4 JTF_NUMBER_TABLE
548 , p4_a5 JTF_NUMBER_TABLE
549 , p4_a6 JTF_VARCHAR2_TABLE_100
550 , p4_a7 JTF_NUMBER_TABLE
551 , p4_a8 JTF_DATE_TABLE
552 , p4_a9 JTF_DATE_TABLE
553 , p4_a10 JTF_DATE_TABLE
554 , p4_a11 JTF_DATE_TABLE
555 , p4_a12 JTF_DATE_TABLE
556 , p4_a13 JTF_DATE_TABLE
557 , p4_a14 JTF_VARCHAR2_TABLE_100
558 , p4_a15 JTF_NUMBER_TABLE
559 , p4_a16 JTF_NUMBER_TABLE
560 , p4_a17 JTF_VARCHAR2_TABLE_100
561 , p4_a18 JTF_NUMBER_TABLE
562 , p4_a19 JTF_VARCHAR2_TABLE_100
563 , p4_a20 JTF_VARCHAR2_TABLE_100
564 , p4_a21 JTF_VARCHAR2_TABLE_100
565 , p4_a22 JTF_VARCHAR2_TABLE_100
566 , p4_a23 JTF_VARCHAR2_TABLE_100
567 , p4_a24 JTF_VARCHAR2_TABLE_100
568 , p4_a25 JTF_VARCHAR2_TABLE_100
569 , p4_a26 JTF_VARCHAR2_TABLE_100
570 , p4_a27 JTF_VARCHAR2_TABLE_100
571 , p4_a28 JTF_VARCHAR2_TABLE_100
572 , p4_a29 JTF_VARCHAR2_TABLE_100
573 , p4_a30 JTF_VARCHAR2_TABLE_200
574 , p4_a31 JTF_VARCHAR2_TABLE_200
575 , p4_a32 JTF_VARCHAR2_TABLE_200
576 , p4_a33 JTF_VARCHAR2_TABLE_200
577 , p4_a34 JTF_VARCHAR2_TABLE_200
578 , p4_a35 JTF_VARCHAR2_TABLE_200
579 , p4_a36 JTF_VARCHAR2_TABLE_200
580 , p4_a37 JTF_VARCHAR2_TABLE_200
581 , p4_a38 JTF_VARCHAR2_TABLE_200
582 , p4_a39 JTF_VARCHAR2_TABLE_200
583 , p4_a40 JTF_VARCHAR2_TABLE_200
584 , p4_a41 JTF_VARCHAR2_TABLE_200
585 , p4_a42 JTF_VARCHAR2_TABLE_200
586 , p4_a43 JTF_VARCHAR2_TABLE_200
587 , p4_a44 JTF_VARCHAR2_TABLE_200
588 , p4_a45 JTF_VARCHAR2_TABLE_100
589 , p4_a46 JTF_VARCHAR2_TABLE_100
590 , p5_a0 JTF_NUMBER_TABLE
591 , p5_a1 JTF_NUMBER_TABLE
592 , p5_a2 JTF_VARCHAR2_TABLE_100
593 , x_return_status out nocopy VARCHAR2
594 , x_msg_count out nocopy NUMBER
595 , x_msg_data out nocopy VARCHAR2
596 , p9_a0 out nocopy JTF_NUMBER_TABLE
597 , p9_a1 out nocopy JTF_NUMBER_TABLE
598 )
599
600 as
601 ddp_task_template_group_info jtf_task_inst_templates_pub.task_template_group_info;
602 ddp_task_templates_tbl jtf_task_inst_templates_pub.task_template_info_tbl;
603 ddp_task_contact_points_tbl jtf_task_inst_templates_pub.task_contact_points_tbl;
604 ddx_task_details_tbl jtf_task_inst_templates_pub.task_details_tbl;
605 ddindx binary_integer; indx binary_integer;
606 begin
607
608 -- copy data to the local IN or IN-OUT args, if any
609
610
611
612 ddp_task_template_group_info.task_template_group_id := p3_a0;
613 ddp_task_template_group_info.owner_type_code := p3_a1;
614 ddp_task_template_group_info.owner_id := p3_a2;
615 ddp_task_template_group_info.source_object_id := p3_a3;
616 ddp_task_template_group_info.source_object_name := p3_a4;
617 ddp_task_template_group_info.assigned_by_id := p3_a5;
618 ddp_task_template_group_info.cust_account_id := p3_a6;
619 ddp_task_template_group_info.customer_id := p3_a7;
620 ddp_task_template_group_info.address_id := p3_a8;
621 ddp_task_template_group_info.actual_start_date := rosetta_g_miss_date_in_map(p3_a9);
622 ddp_task_template_group_info.actual_end_date := rosetta_g_miss_date_in_map(p3_a10);
623 ddp_task_template_group_info.planned_start_date := rosetta_g_miss_date_in_map(p3_a11);
624 ddp_task_template_group_info.planned_end_date := rosetta_g_miss_date_in_map(p3_a12);
625 ddp_task_template_group_info.scheduled_start_date := rosetta_g_miss_date_in_map(p3_a13);
626 ddp_task_template_group_info.scheduled_end_date := rosetta_g_miss_date_in_map(p3_a14);
627 ddp_task_template_group_info.palm_flag := p3_a15;
628 ddp_task_template_group_info.wince_flag := p3_a16;
629 ddp_task_template_group_info.laptop_flag := p3_a17;
630 ddp_task_template_group_info.device1_flag := p3_a18;
631 ddp_task_template_group_info.device2_flag := p3_a19;
632 ddp_task_template_group_info.device3_flag := p3_a20;
633 ddp_task_template_group_info.parent_task_id := p3_a21;
634 ddp_task_template_group_info.percentage_complete := p3_a22;
635 ddp_task_template_group_info.timezone_id := p3_a23;
636 ddp_task_template_group_info.actual_effort := p3_a24;
637 ddp_task_template_group_info.actual_effort_uom := p3_a25;
638 ddp_task_template_group_info.reason_code := p3_a26;
639 ddp_task_template_group_info.bound_mode_code := p3_a27;
640 ddp_task_template_group_info.soft_bound_flag := p3_a28;
641 ddp_task_template_group_info.workflow_process_id := p3_a29;
642 ddp_task_template_group_info.owner_territory_id := p3_a30;
643 ddp_task_template_group_info.costs := p3_a31;
644 ddp_task_template_group_info.currency_code := p3_a32;
645 ddp_task_template_group_info.attribute1 := p3_a33;
646 ddp_task_template_group_info.attribute2 := p3_a34;
647 ddp_task_template_group_info.attribute3 := p3_a35;
648 ddp_task_template_group_info.attribute4 := p3_a36;
649 ddp_task_template_group_info.attribute5 := p3_a37;
650 ddp_task_template_group_info.attribute6 := p3_a38;
651 ddp_task_template_group_info.attribute7 := p3_a39;
652 ddp_task_template_group_info.attribute8 := p3_a40;
653 ddp_task_template_group_info.attribute9 := p3_a41;
654 ddp_task_template_group_info.attribute10 := p3_a42;
655 ddp_task_template_group_info.attribute11 := p3_a43;
656 ddp_task_template_group_info.attribute12 := p3_a44;
657 ddp_task_template_group_info.attribute13 := p3_a45;
658 ddp_task_template_group_info.attribute14 := p3_a46;
659 ddp_task_template_group_info.attribute15 := p3_a47;
660 ddp_task_template_group_info.attribute_category := p3_a48;
661 ddp_task_template_group_info.date_selected := p3_a49;
662 ddp_task_template_group_info.show_on_calendar := p3_a50;
663 ddp_task_template_group_info.location_id := p3_a51;
664
665 jtf_task_inst_templates_pub_w.rosetta_table_copy_in_p6(ddp_task_templates_tbl, p4_a0
666 , p4_a1
667 , p4_a2
668 , p4_a3
669 , p4_a4
670 , p4_a5
671 , p4_a6
672 , p4_a7
673 , p4_a8
674 , p4_a9
675 , p4_a10
676 , p4_a11
677 , p4_a12
678 , p4_a13
679 , p4_a14
680 , p4_a15
681 , p4_a16
682 , p4_a17
683 , p4_a18
684 , p4_a19
685 , p4_a20
686 , p4_a21
687 , p4_a22
688 , p4_a23
689 , p4_a24
690 , p4_a25
691 , p4_a26
692 , p4_a27
693 , p4_a28
694 , p4_a29
695 , p4_a30
696 , p4_a31
697 , p4_a32
698 , p4_a33
699 , p4_a34
700 , p4_a35
701 , p4_a36
702 , p4_a37
703 , p4_a38
704 , p4_a39
705 , p4_a40
706 , p4_a41
707 , p4_a42
708 , p4_a43
709 , p4_a44
710 , p4_a45
711 , p4_a46
712 );
713
714 jtf_task_inst_templates_pub_w.rosetta_table_copy_in_p3(ddp_task_contact_points_tbl, p5_a0
715 , p5_a1
716 , p5_a2
717 );
718
719
720
721
722
723 -- here's the delegated call to the old PL/SQL routine
724 jtf_task_inst_templates_pub.create_task_from_template(p_api_version,
725 p_init_msg_list,
726 p_commit,
727 ddp_task_template_group_info,
728 ddp_task_templates_tbl,
729 ddp_task_contact_points_tbl,
730 x_return_status,
731 x_msg_count,
732 x_msg_data,
733 ddx_task_details_tbl);
734
735 -- copy data back from the local variables to OUT or IN-OUT args, if any
736
737
738
739
740
741
742
743
744
745 jtf_task_inst_templates_pub_w.rosetta_table_copy_out_p1(ddx_task_details_tbl, p9_a0
746 , p9_a1
747 );
748 end;
749
750 end jtf_task_inst_templates_pub_w;