[Home] [Help]
PACKAGE BODY: APPS.CAC_SYNC_TASK_W
Source
1 package body cac_sync_task_w as
2 /* $Header: cacvstwb.pls 120.3 2005/09/27 07:37:31 rhshriva 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 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure rosetta_table_copy_in_p3(t out nocopy cac_sync_task.task_tbl, a0 JTF_NUMBER_TABLE
23 , a1 JTF_NUMBER_TABLE
24 , a2 JTF_NUMBER_TABLE
25 , a3 JTF_DATE_TABLE
26 , a4 JTF_NUMBER_TABLE
27 , a5 JTF_VARCHAR2_TABLE_100
28 , a6 JTF_VARCHAR2_TABLE_100
29 , a7 JTF_VARCHAR2_TABLE_2000
30 , a8 JTF_VARCHAR2_TABLE_4000
31 , a9 JTF_VARCHAR2_TABLE_100
32 , a10 JTF_DATE_TABLE
33 , a11 JTF_DATE_TABLE
34 , a12 JTF_DATE_TABLE
35 , a13 JTF_DATE_TABLE
36 , a14 JTF_DATE_TABLE
37 , a15 JTF_DATE_TABLE
38 , a16 JTF_NUMBER_TABLE
39 , a17 JTF_NUMBER_TABLE
40 , a18 JTF_VARCHAR2_TABLE_100
41 , a19 JTF_DATE_TABLE
42 , a20 JTF_VARCHAR2_TABLE_100
43 , a21 JTF_VARCHAR2_TABLE_300
44 , a22 JTF_NUMBER_TABLE
45 , a23 JTF_VARCHAR2_TABLE_2000
46 , a24 JTF_NUMBER_TABLE
47 , a25 JTF_NUMBER_TABLE
48 , a26 JTF_VARCHAR2_TABLE_300
49 , a27 JTF_VARCHAR2_TABLE_2000
50 , a28 JTF_VARCHAR2_TABLE_100
51 , a29 JTF_NUMBER_TABLE
52 , a30 JTF_DATE_TABLE
53 , a31 JTF_DATE_TABLE
54 , a32 JTF_VARCHAR2_TABLE_100
55 , a33 JTF_VARCHAR2_TABLE_100
56 , a34 JTF_VARCHAR2_TABLE_100
57 , a35 JTF_VARCHAR2_TABLE_100
58 , a36 JTF_VARCHAR2_TABLE_100
59 , a37 JTF_VARCHAR2_TABLE_100
60 , a38 JTF_VARCHAR2_TABLE_100
61 , a39 JTF_NUMBER_TABLE
62 , a40 JTF_NUMBER_TABLE
63 , a41 JTF_VARCHAR2_TABLE_4000
64 , a42 JTF_NUMBER_TABLE
65 , a43 JTF_VARCHAR2_TABLE_100
66 , a44 JTF_VARCHAR2_TABLE_100
67 ) as
68 ddindx binary_integer; indx binary_integer;
69 begin
70 if a0 is not null and a0.count > 0 then
71 if a0.count > 0 then
72 indx := a0.first;
73 ddindx := 1;
74 while true loop
75 t(ddindx).syncid := rosetta_g_miss_num_map(a0(indx));
76 t(ddindx).recordindex := rosetta_g_miss_num_map(a1(indx));
77 t(ddindx).task_id := rosetta_g_miss_num_map(a2(indx));
78 t(ddindx).syncanchor := rosetta_g_miss_date_in_map(a3(indx));
79 t(ddindx).timezoneid := rosetta_g_miss_num_map(a4(indx));
80 t(ddindx).eventtype := a5(indx);
81 t(ddindx).objectcode := a6(indx);
82 t(ddindx).subject := a7(indx);
83 t(ddindx).description := a8(indx);
84 t(ddindx).dateselected := a9(indx);
85 t(ddindx).plannedstartdate := rosetta_g_miss_date_in_map(a10(indx));
86 t(ddindx).plannedenddate := rosetta_g_miss_date_in_map(a11(indx));
87 t(ddindx).scheduledstartdate := rosetta_g_miss_date_in_map(a12(indx));
88 t(ddindx).scheduledenddate := rosetta_g_miss_date_in_map(a13(indx));
89 t(ddindx).actualstartdate := rosetta_g_miss_date_in_map(a14(indx));
90 t(ddindx).actualenddate := rosetta_g_miss_date_in_map(a15(indx));
91 t(ddindx).statusid := rosetta_g_miss_num_map(a16(indx));
92 t(ddindx).priorityid := rosetta_g_miss_num_map(a17(indx));
93 t(ddindx).alarmflag := a18(indx);
94 t(ddindx).alarmdate := rosetta_g_miss_date_in_map(a19(indx));
95 t(ddindx).privateflag := a20(indx);
96 t(ddindx).category := a21(indx);
97 t(ddindx).resourceid := rosetta_g_miss_num_map(a22(indx));
98 t(ddindx).resourcetype := a23(indx);
99 t(ddindx).task_assignment_id := rosetta_g_miss_num_map(a24(indx));
100 t(ddindx).resultid := rosetta_g_miss_num_map(a25(indx));
101 t(ddindx).resultsystemmessage := a26(indx);
102 t(ddindx).resultusermessage := a27(indx);
103 t(ddindx).unit_of_measure := a28(indx);
104 t(ddindx).occurs_every := rosetta_g_miss_num_map(a29(indx));
105 t(ddindx).start_date := rosetta_g_miss_date_in_map(a30(indx));
106 t(ddindx).end_date := rosetta_g_miss_date_in_map(a31(indx));
107 t(ddindx).sunday := a32(indx);
108 t(ddindx).monday := a33(indx);
109 t(ddindx).tuesday := a34(indx);
110 t(ddindx).wednesday := a35(indx);
111 t(ddindx).thursday := a36(indx);
112 t(ddindx).friday := a37(indx);
113 t(ddindx).saturday := a38(indx);
114 t(ddindx).date_of_month := rosetta_g_miss_num_map(a39(indx));
115 t(ddindx).occurs_which := rosetta_g_miss_num_map(a40(indx));
116 t(ddindx).locations := a41(indx);
117 t(ddindx).principal_id := rosetta_g_miss_num_map(a42(indx));
118 t(ddindx).free_busy_type := a43(indx);
119 t(ddindx).dial_in := a44(indx);
120 ddindx := ddindx+1;
121 if a0.last =indx
122 then exit;
123 end if;
124 indx := a0.next(indx);
125 end loop;
126 end if;
127 end if;
128 end rosetta_table_copy_in_p3;
129 procedure rosetta_table_copy_out_p3(t cac_sync_task.task_tbl, a0 out nocopy JTF_NUMBER_TABLE
130 , a1 out nocopy JTF_NUMBER_TABLE
131 , a2 out nocopy JTF_NUMBER_TABLE
132 , a3 out nocopy JTF_DATE_TABLE
133 , a4 out nocopy JTF_NUMBER_TABLE
134 , a5 out nocopy JTF_VARCHAR2_TABLE_100
135 , a6 out nocopy JTF_VARCHAR2_TABLE_100
136 , a7 out nocopy JTF_VARCHAR2_TABLE_2000
137 , a8 out nocopy JTF_VARCHAR2_TABLE_4000
138 , a9 out nocopy JTF_VARCHAR2_TABLE_100
139 , a10 out nocopy JTF_DATE_TABLE
140 , a11 out nocopy JTF_DATE_TABLE
141 , a12 out nocopy JTF_DATE_TABLE
142 , a13 out nocopy JTF_DATE_TABLE
143 , a14 out nocopy JTF_DATE_TABLE
144 , a15 out nocopy JTF_DATE_TABLE
145 , a16 out nocopy JTF_NUMBER_TABLE
146 , a17 out nocopy JTF_NUMBER_TABLE
147 , a18 out nocopy JTF_VARCHAR2_TABLE_100
148 , a19 out nocopy JTF_DATE_TABLE
149 , a20 out nocopy JTF_VARCHAR2_TABLE_100
150 , a21 out nocopy JTF_VARCHAR2_TABLE_300
151 , a22 out nocopy JTF_NUMBER_TABLE
152 , a23 out nocopy JTF_VARCHAR2_TABLE_2000
153 , a24 out nocopy JTF_NUMBER_TABLE
154 , a25 out nocopy JTF_NUMBER_TABLE
155 , a26 out nocopy JTF_VARCHAR2_TABLE_300
156 , a27 out nocopy JTF_VARCHAR2_TABLE_2000
157 , a28 out nocopy JTF_VARCHAR2_TABLE_100
158 , a29 out nocopy JTF_NUMBER_TABLE
159 , a30 out nocopy JTF_DATE_TABLE
160 , a31 out nocopy JTF_DATE_TABLE
161 , a32 out nocopy JTF_VARCHAR2_TABLE_100
162 , a33 out nocopy JTF_VARCHAR2_TABLE_100
163 , a34 out nocopy JTF_VARCHAR2_TABLE_100
164 , a35 out nocopy JTF_VARCHAR2_TABLE_100
165 , a36 out nocopy JTF_VARCHAR2_TABLE_100
166 , a37 out nocopy JTF_VARCHAR2_TABLE_100
167 , a38 out nocopy JTF_VARCHAR2_TABLE_100
168 , a39 out nocopy JTF_NUMBER_TABLE
169 , a40 out nocopy JTF_NUMBER_TABLE
170 , a41 out nocopy JTF_VARCHAR2_TABLE_4000
171 , a42 out nocopy JTF_NUMBER_TABLE
172 , a43 out nocopy JTF_VARCHAR2_TABLE_100
173 , a44 out nocopy JTF_VARCHAR2_TABLE_100
174 ) as
175 ddindx binary_integer; indx binary_integer;
176 begin
177 if t is null or t.count = 0 then
178 a0 := JTF_NUMBER_TABLE();
179 a1 := JTF_NUMBER_TABLE();
180 a2 := JTF_NUMBER_TABLE();
181 a3 := JTF_DATE_TABLE();
182 a4 := JTF_NUMBER_TABLE();
183 a5 := JTF_VARCHAR2_TABLE_100();
184 a6 := JTF_VARCHAR2_TABLE_100();
185 a7 := JTF_VARCHAR2_TABLE_2000();
186 a8 := JTF_VARCHAR2_TABLE_4000();
187 a9 := JTF_VARCHAR2_TABLE_100();
188 a10 := JTF_DATE_TABLE();
189 a11 := JTF_DATE_TABLE();
190 a12 := JTF_DATE_TABLE();
191 a13 := JTF_DATE_TABLE();
192 a14 := JTF_DATE_TABLE();
193 a15 := JTF_DATE_TABLE();
194 a16 := JTF_NUMBER_TABLE();
195 a17 := JTF_NUMBER_TABLE();
196 a18 := JTF_VARCHAR2_TABLE_100();
197 a19 := JTF_DATE_TABLE();
198 a20 := JTF_VARCHAR2_TABLE_100();
199 a21 := JTF_VARCHAR2_TABLE_300();
200 a22 := JTF_NUMBER_TABLE();
201 a23 := JTF_VARCHAR2_TABLE_2000();
202 a24 := JTF_NUMBER_TABLE();
203 a25 := JTF_NUMBER_TABLE();
204 a26 := JTF_VARCHAR2_TABLE_300();
205 a27 := JTF_VARCHAR2_TABLE_2000();
206 a28 := JTF_VARCHAR2_TABLE_100();
207 a29 := JTF_NUMBER_TABLE();
208 a30 := JTF_DATE_TABLE();
209 a31 := JTF_DATE_TABLE();
210 a32 := JTF_VARCHAR2_TABLE_100();
211 a33 := JTF_VARCHAR2_TABLE_100();
212 a34 := JTF_VARCHAR2_TABLE_100();
213 a35 := JTF_VARCHAR2_TABLE_100();
214 a36 := JTF_VARCHAR2_TABLE_100();
215 a37 := JTF_VARCHAR2_TABLE_100();
216 a38 := JTF_VARCHAR2_TABLE_100();
217 a39 := JTF_NUMBER_TABLE();
218 a40 := JTF_NUMBER_TABLE();
219 a41 := JTF_VARCHAR2_TABLE_4000();
220 a42 := JTF_NUMBER_TABLE();
221 a43 := JTF_VARCHAR2_TABLE_100();
222 a44 := JTF_VARCHAR2_TABLE_100();
223 else
224 a0 := JTF_NUMBER_TABLE();
225 a1 := JTF_NUMBER_TABLE();
226 a2 := JTF_NUMBER_TABLE();
227 a3 := JTF_DATE_TABLE();
228 a4 := JTF_NUMBER_TABLE();
229 a5 := JTF_VARCHAR2_TABLE_100();
230 a6 := JTF_VARCHAR2_TABLE_100();
231 a7 := JTF_VARCHAR2_TABLE_2000();
232 a8 := JTF_VARCHAR2_TABLE_4000();
233 a9 := JTF_VARCHAR2_TABLE_100();
234 a10 := JTF_DATE_TABLE();
235 a11 := JTF_DATE_TABLE();
236 a12 := JTF_DATE_TABLE();
237 a13 := JTF_DATE_TABLE();
238 a14 := JTF_DATE_TABLE();
239 a15 := JTF_DATE_TABLE();
240 a16 := JTF_NUMBER_TABLE();
241 a17 := JTF_NUMBER_TABLE();
242 a18 := JTF_VARCHAR2_TABLE_100();
243 a19 := JTF_DATE_TABLE();
244 a20 := JTF_VARCHAR2_TABLE_100();
245 a21 := JTF_VARCHAR2_TABLE_300();
246 a22 := JTF_NUMBER_TABLE();
247 a23 := JTF_VARCHAR2_TABLE_2000();
248 a24 := JTF_NUMBER_TABLE();
249 a25 := JTF_NUMBER_TABLE();
250 a26 := JTF_VARCHAR2_TABLE_300();
251 a27 := JTF_VARCHAR2_TABLE_2000();
252 a28 := JTF_VARCHAR2_TABLE_100();
253 a29 := JTF_NUMBER_TABLE();
254 a30 := JTF_DATE_TABLE();
255 a31 := JTF_DATE_TABLE();
256 a32 := JTF_VARCHAR2_TABLE_100();
257 a33 := JTF_VARCHAR2_TABLE_100();
258 a34 := JTF_VARCHAR2_TABLE_100();
259 a35 := JTF_VARCHAR2_TABLE_100();
260 a36 := JTF_VARCHAR2_TABLE_100();
261 a37 := JTF_VARCHAR2_TABLE_100();
262 a38 := JTF_VARCHAR2_TABLE_100();
263 a39 := JTF_NUMBER_TABLE();
264 a40 := JTF_NUMBER_TABLE();
265 a41 := JTF_VARCHAR2_TABLE_4000();
266 a42 := JTF_NUMBER_TABLE();
267 a43 := JTF_VARCHAR2_TABLE_100();
268 a44 := JTF_VARCHAR2_TABLE_100();
269 if t.count > 0 then
270 a0.extend(t.count);
271 a1.extend(t.count);
272 a2.extend(t.count);
273 a3.extend(t.count);
274 a4.extend(t.count);
275 a5.extend(t.count);
276 a6.extend(t.count);
277 a7.extend(t.count);
278 a8.extend(t.count);
279 a9.extend(t.count);
280 a10.extend(t.count);
281 a11.extend(t.count);
282 a12.extend(t.count);
283 a13.extend(t.count);
284 a14.extend(t.count);
285 a15.extend(t.count);
286 a16.extend(t.count);
287 a17.extend(t.count);
288 a18.extend(t.count);
289 a19.extend(t.count);
290 a20.extend(t.count);
291 a21.extend(t.count);
292 a22.extend(t.count);
293 a23.extend(t.count);
294 a24.extend(t.count);
295 a25.extend(t.count);
296 a26.extend(t.count);
297 a27.extend(t.count);
298 a28.extend(t.count);
299 a29.extend(t.count);
300 a30.extend(t.count);
301 a31.extend(t.count);
302 a32.extend(t.count);
303 a33.extend(t.count);
304 a34.extend(t.count);
305 a35.extend(t.count);
306 a36.extend(t.count);
307 a37.extend(t.count);
308 a38.extend(t.count);
309 a39.extend(t.count);
310 a40.extend(t.count);
311 a41.extend(t.count);
312 a42.extend(t.count);
313 a43.extend(t.count);
314 a44.extend(t.count);
315 ddindx := t.first;
316 indx := 1;
317 while true loop
318 a0(indx) := rosetta_g_miss_num_map(t(ddindx).syncid);
319 a1(indx) := rosetta_g_miss_num_map(t(ddindx).recordindex);
320 a2(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
321 a3(indx) := t(ddindx).syncanchor;
322 a4(indx) := rosetta_g_miss_num_map(t(ddindx).timezoneid);
323 a5(indx) := t(ddindx).eventtype;
324 a6(indx) := t(ddindx).objectcode;
325 a7(indx) := t(ddindx).subject;
326 a8(indx) := t(ddindx).description;
327 a9(indx) := t(ddindx).dateselected;
328 a10(indx) := t(ddindx).plannedstartdate;
329 a11(indx) := t(ddindx).plannedenddate;
330 a12(indx) := t(ddindx).scheduledstartdate;
331 a13(indx) := t(ddindx).scheduledenddate;
332 a14(indx) := t(ddindx).actualstartdate;
333 a15(indx) := t(ddindx).actualenddate;
334 a16(indx) := rosetta_g_miss_num_map(t(ddindx).statusid);
335 a17(indx) := rosetta_g_miss_num_map(t(ddindx).priorityid);
336 a18(indx) := t(ddindx).alarmflag;
337 a19(indx) := t(ddindx).alarmdate;
338 a20(indx) := t(ddindx).privateflag;
339 a21(indx) := t(ddindx).category;
340 a22(indx) := rosetta_g_miss_num_map(t(ddindx).resourceid);
341 a23(indx) := t(ddindx).resourcetype;
342 a24(indx) := rosetta_g_miss_num_map(t(ddindx).task_assignment_id);
343 a25(indx) := rosetta_g_miss_num_map(t(ddindx).resultid);
344 a26(indx) := t(ddindx).resultsystemmessage;
345 a27(indx) := t(ddindx).resultusermessage;
346 a28(indx) := t(ddindx).unit_of_measure;
347 a29(indx) := rosetta_g_miss_num_map(t(ddindx).occurs_every);
348 a30(indx) := t(ddindx).start_date;
349 a31(indx) := t(ddindx).end_date;
350 a32(indx) := t(ddindx).sunday;
351 a33(indx) := t(ddindx).monday;
352 a34(indx) := t(ddindx).tuesday;
353 a35(indx) := t(ddindx).wednesday;
354 a36(indx) := t(ddindx).thursday;
355 a37(indx) := t(ddindx).friday;
356 a38(indx) := t(ddindx).saturday;
357 a39(indx) := rosetta_g_miss_num_map(t(ddindx).date_of_month);
358 a40(indx) := rosetta_g_miss_num_map(t(ddindx).occurs_which);
359 a41(indx) := t(ddindx).locations;
360 a42(indx) := rosetta_g_miss_num_map(t(ddindx).principal_id);
361 a43(indx) := t(ddindx).free_busy_type;
362 a44(indx) := t(ddindx).dial_in;
363 indx := indx+1;
364 if t.last =ddindx
365 then exit;
366 end if;
367 ddindx := t.next(ddindx);
368 end loop;
369 end if;
370 end if;
371 end rosetta_table_copy_out_p3;
372
373 procedure rosetta_table_copy_in_p4(t out nocopy cac_sync_task.exclusion_tbl, a0 JTF_NUMBER_TABLE
374 , a1 JTF_DATE_TABLE
375 , a2 JTF_NUMBER_TABLE
376 , a3 JTF_NUMBER_TABLE
377 , a4 JTF_DATE_TABLE
378 , a5 JTF_NUMBER_TABLE
379 , a6 JTF_VARCHAR2_TABLE_100
380 , a7 JTF_VARCHAR2_TABLE_100
381 , a8 JTF_VARCHAR2_TABLE_2000
382 , a9 JTF_VARCHAR2_TABLE_4000
383 , a10 JTF_VARCHAR2_TABLE_100
384 , a11 JTF_DATE_TABLE
385 , a12 JTF_DATE_TABLE
386 , a13 JTF_DATE_TABLE
387 , a14 JTF_DATE_TABLE
388 , a15 JTF_DATE_TABLE
389 , a16 JTF_DATE_TABLE
390 , a17 JTF_NUMBER_TABLE
391 , a18 JTF_NUMBER_TABLE
392 , a19 JTF_VARCHAR2_TABLE_100
393 , a20 JTF_DATE_TABLE
394 , a21 JTF_VARCHAR2_TABLE_100
395 , a22 JTF_VARCHAR2_TABLE_300
396 , a23 JTF_NUMBER_TABLE
397 , a24 JTF_VARCHAR2_TABLE_2000
398 , a25 JTF_NUMBER_TABLE
399 , a26 JTF_NUMBER_TABLE
400 , a27 JTF_VARCHAR2_TABLE_300
401 , a28 JTF_VARCHAR2_TABLE_2000
402 , a29 JTF_VARCHAR2_TABLE_100
403 , a30 JTF_NUMBER_TABLE
404 , a31 JTF_DATE_TABLE
405 , a32 JTF_DATE_TABLE
406 , a33 JTF_VARCHAR2_TABLE_100
407 , a34 JTF_VARCHAR2_TABLE_100
408 , a35 JTF_VARCHAR2_TABLE_100
409 , a36 JTF_VARCHAR2_TABLE_100
410 , a37 JTF_VARCHAR2_TABLE_100
411 , a38 JTF_VARCHAR2_TABLE_100
412 , a39 JTF_VARCHAR2_TABLE_100
413 , a40 JTF_NUMBER_TABLE
414 , a41 JTF_NUMBER_TABLE
415 , a42 JTF_VARCHAR2_TABLE_4000
416 , a43 JTF_NUMBER_TABLE
417 , a44 JTF_VARCHAR2_TABLE_100
418 , a45 JTF_VARCHAR2_TABLE_100
419 ) as
420 ddindx binary_integer; indx binary_integer;
421 begin
422 if a0 is not null and a0.count > 0 then
423 if a0.count > 0 then
424 indx := a0.first;
425 ddindx := 1;
426 while true loop
427 t(ddindx).syncid := rosetta_g_miss_num_map(a0(indx));
428 t(ddindx).exclusion_date := rosetta_g_miss_date_in_map(a1(indx));
429 t(ddindx).recordindex := rosetta_g_miss_num_map(a2(indx));
430 t(ddindx).task_id := rosetta_g_miss_num_map(a3(indx));
431 t(ddindx).syncanchor := rosetta_g_miss_date_in_map(a4(indx));
432 t(ddindx).timezoneid := rosetta_g_miss_num_map(a5(indx));
433 t(ddindx).eventtype := a6(indx);
434 t(ddindx).objectcode := a7(indx);
435 t(ddindx).subject := a8(indx);
436 t(ddindx).description := a9(indx);
437 t(ddindx).dateselected := a10(indx);
438 t(ddindx).plannedstartdate := rosetta_g_miss_date_in_map(a11(indx));
439 t(ddindx).plannedenddate := rosetta_g_miss_date_in_map(a12(indx));
440 t(ddindx).scheduledstartdate := rosetta_g_miss_date_in_map(a13(indx));
441 t(ddindx).scheduledenddate := rosetta_g_miss_date_in_map(a14(indx));
442 t(ddindx).actualstartdate := rosetta_g_miss_date_in_map(a15(indx));
443 t(ddindx).actualenddate := rosetta_g_miss_date_in_map(a16(indx));
444 t(ddindx).statusid := rosetta_g_miss_num_map(a17(indx));
445 t(ddindx).priorityid := rosetta_g_miss_num_map(a18(indx));
446 t(ddindx).alarmflag := a19(indx);
447 t(ddindx).alarmdate := rosetta_g_miss_date_in_map(a20(indx));
448 t(ddindx).privateflag := a21(indx);
449 t(ddindx).category := a22(indx);
450 t(ddindx).resourceid := rosetta_g_miss_num_map(a23(indx));
451 t(ddindx).resourcetype := a24(indx);
452 t(ddindx).task_assignment_id := rosetta_g_miss_num_map(a25(indx));
453 t(ddindx).resultid := rosetta_g_miss_num_map(a26(indx));
454 t(ddindx).resultsystemmessage := a27(indx);
455 t(ddindx).resultusermessage := a28(indx);
456 t(ddindx).unit_of_measure := a29(indx);
457 t(ddindx).occurs_every := rosetta_g_miss_num_map(a30(indx));
458 t(ddindx).start_date := rosetta_g_miss_date_in_map(a31(indx));
459 t(ddindx).end_date := rosetta_g_miss_date_in_map(a32(indx));
460 t(ddindx).sunday := a33(indx);
461 t(ddindx).monday := a34(indx);
462 t(ddindx).tuesday := a35(indx);
463 t(ddindx).wednesday := a36(indx);
464 t(ddindx).thursday := a37(indx);
465 t(ddindx).friday := a38(indx);
466 t(ddindx).saturday := a39(indx);
467 t(ddindx).date_of_month := rosetta_g_miss_num_map(a40(indx));
468 t(ddindx).occurs_which := rosetta_g_miss_num_map(a41(indx));
469 t(ddindx).locations := a42(indx);
470 t(ddindx).principal_id := rosetta_g_miss_num_map(a43(indx));
471 t(ddindx).free_busy_type := a44(indx);
472 t(ddindx).dial_in := a45(indx);
473 ddindx := ddindx+1;
474 if a0.last =indx
475 then exit;
476 end if;
477 indx := a0.next(indx);
478 end loop;
479 end if;
480 end if;
481 end rosetta_table_copy_in_p4;
482 procedure rosetta_table_copy_out_p4(t cac_sync_task.exclusion_tbl, a0 out nocopy JTF_NUMBER_TABLE
483 , a1 out nocopy JTF_DATE_TABLE
484 , a2 out nocopy JTF_NUMBER_TABLE
485 , a3 out nocopy JTF_NUMBER_TABLE
486 , a4 out nocopy JTF_DATE_TABLE
487 , a5 out nocopy JTF_NUMBER_TABLE
488 , a6 out nocopy JTF_VARCHAR2_TABLE_100
489 , a7 out nocopy JTF_VARCHAR2_TABLE_100
490 , a8 out nocopy JTF_VARCHAR2_TABLE_2000
491 , a9 out nocopy JTF_VARCHAR2_TABLE_4000
492 , a10 out nocopy JTF_VARCHAR2_TABLE_100
493 , a11 out nocopy JTF_DATE_TABLE
494 , a12 out nocopy JTF_DATE_TABLE
495 , a13 out nocopy JTF_DATE_TABLE
496 , a14 out nocopy JTF_DATE_TABLE
497 , a15 out nocopy JTF_DATE_TABLE
498 , a16 out nocopy JTF_DATE_TABLE
499 , a17 out nocopy JTF_NUMBER_TABLE
500 , a18 out nocopy JTF_NUMBER_TABLE
501 , a19 out nocopy JTF_VARCHAR2_TABLE_100
502 , a20 out nocopy JTF_DATE_TABLE
503 , a21 out nocopy JTF_VARCHAR2_TABLE_100
504 , a22 out nocopy JTF_VARCHAR2_TABLE_300
505 , a23 out nocopy JTF_NUMBER_TABLE
506 , a24 out nocopy JTF_VARCHAR2_TABLE_2000
507 , a25 out nocopy JTF_NUMBER_TABLE
508 , a26 out nocopy JTF_NUMBER_TABLE
509 , a27 out nocopy JTF_VARCHAR2_TABLE_300
510 , a28 out nocopy JTF_VARCHAR2_TABLE_2000
511 , a29 out nocopy JTF_VARCHAR2_TABLE_100
512 , a30 out nocopy JTF_NUMBER_TABLE
513 , a31 out nocopy JTF_DATE_TABLE
514 , a32 out nocopy JTF_DATE_TABLE
515 , a33 out nocopy JTF_VARCHAR2_TABLE_100
516 , a34 out nocopy JTF_VARCHAR2_TABLE_100
517 , a35 out nocopy JTF_VARCHAR2_TABLE_100
518 , a36 out nocopy JTF_VARCHAR2_TABLE_100
519 , a37 out nocopy JTF_VARCHAR2_TABLE_100
520 , a38 out nocopy JTF_VARCHAR2_TABLE_100
521 , a39 out nocopy JTF_VARCHAR2_TABLE_100
522 , a40 out nocopy JTF_NUMBER_TABLE
523 , a41 out nocopy JTF_NUMBER_TABLE
524 , a42 out nocopy JTF_VARCHAR2_TABLE_4000
525 , a43 out nocopy JTF_NUMBER_TABLE
526 , a44 out nocopy JTF_VARCHAR2_TABLE_100
527 , a45 out nocopy JTF_VARCHAR2_TABLE_100
528 ) as
529 ddindx binary_integer; indx binary_integer;
530 begin
531 if t is null or t.count = 0 then
532 a0 := JTF_NUMBER_TABLE();
533 a1 := JTF_DATE_TABLE();
534 a2 := JTF_NUMBER_TABLE();
535 a3 := JTF_NUMBER_TABLE();
536 a4 := JTF_DATE_TABLE();
537 a5 := JTF_NUMBER_TABLE();
538 a6 := JTF_VARCHAR2_TABLE_100();
539 a7 := JTF_VARCHAR2_TABLE_100();
540 a8 := JTF_VARCHAR2_TABLE_2000();
541 a9 := JTF_VARCHAR2_TABLE_4000();
542 a10 := JTF_VARCHAR2_TABLE_100();
543 a11 := JTF_DATE_TABLE();
544 a12 := JTF_DATE_TABLE();
545 a13 := JTF_DATE_TABLE();
546 a14 := JTF_DATE_TABLE();
547 a15 := JTF_DATE_TABLE();
548 a16 := JTF_DATE_TABLE();
549 a17 := JTF_NUMBER_TABLE();
550 a18 := JTF_NUMBER_TABLE();
551 a19 := JTF_VARCHAR2_TABLE_100();
552 a20 := JTF_DATE_TABLE();
553 a21 := JTF_VARCHAR2_TABLE_100();
554 a22 := JTF_VARCHAR2_TABLE_300();
555 a23 := JTF_NUMBER_TABLE();
556 a24 := JTF_VARCHAR2_TABLE_2000();
557 a25 := JTF_NUMBER_TABLE();
558 a26 := JTF_NUMBER_TABLE();
559 a27 := JTF_VARCHAR2_TABLE_300();
560 a28 := JTF_VARCHAR2_TABLE_2000();
561 a29 := JTF_VARCHAR2_TABLE_100();
562 a30 := JTF_NUMBER_TABLE();
563 a31 := JTF_DATE_TABLE();
564 a32 := JTF_DATE_TABLE();
565 a33 := JTF_VARCHAR2_TABLE_100();
566 a34 := JTF_VARCHAR2_TABLE_100();
567 a35 := JTF_VARCHAR2_TABLE_100();
568 a36 := JTF_VARCHAR2_TABLE_100();
569 a37 := JTF_VARCHAR2_TABLE_100();
570 a38 := JTF_VARCHAR2_TABLE_100();
571 a39 := JTF_VARCHAR2_TABLE_100();
572 a40 := JTF_NUMBER_TABLE();
573 a41 := JTF_NUMBER_TABLE();
574 a42 := JTF_VARCHAR2_TABLE_4000();
575 a43 := JTF_NUMBER_TABLE();
576 a44 := JTF_VARCHAR2_TABLE_100();
577 a45 := JTF_VARCHAR2_TABLE_100();
578 else
579 a0 := JTF_NUMBER_TABLE();
580 a1 := JTF_DATE_TABLE();
581 a2 := JTF_NUMBER_TABLE();
582 a3 := JTF_NUMBER_TABLE();
583 a4 := JTF_DATE_TABLE();
584 a5 := JTF_NUMBER_TABLE();
585 a6 := JTF_VARCHAR2_TABLE_100();
586 a7 := JTF_VARCHAR2_TABLE_100();
587 a8 := JTF_VARCHAR2_TABLE_2000();
588 a9 := JTF_VARCHAR2_TABLE_4000();
589 a10 := JTF_VARCHAR2_TABLE_100();
590 a11 := JTF_DATE_TABLE();
591 a12 := JTF_DATE_TABLE();
592 a13 := JTF_DATE_TABLE();
593 a14 := JTF_DATE_TABLE();
594 a15 := JTF_DATE_TABLE();
595 a16 := JTF_DATE_TABLE();
596 a17 := JTF_NUMBER_TABLE();
597 a18 := JTF_NUMBER_TABLE();
598 a19 := JTF_VARCHAR2_TABLE_100();
599 a20 := JTF_DATE_TABLE();
600 a21 := JTF_VARCHAR2_TABLE_100();
601 a22 := JTF_VARCHAR2_TABLE_300();
602 a23 := JTF_NUMBER_TABLE();
603 a24 := JTF_VARCHAR2_TABLE_2000();
604 a25 := JTF_NUMBER_TABLE();
605 a26 := JTF_NUMBER_TABLE();
606 a27 := JTF_VARCHAR2_TABLE_300();
607 a28 := JTF_VARCHAR2_TABLE_2000();
608 a29 := JTF_VARCHAR2_TABLE_100();
609 a30 := JTF_NUMBER_TABLE();
610 a31 := JTF_DATE_TABLE();
611 a32 := JTF_DATE_TABLE();
612 a33 := JTF_VARCHAR2_TABLE_100();
613 a34 := JTF_VARCHAR2_TABLE_100();
614 a35 := JTF_VARCHAR2_TABLE_100();
615 a36 := JTF_VARCHAR2_TABLE_100();
616 a37 := JTF_VARCHAR2_TABLE_100();
617 a38 := JTF_VARCHAR2_TABLE_100();
618 a39 := JTF_VARCHAR2_TABLE_100();
619 a40 := JTF_NUMBER_TABLE();
620 a41 := JTF_NUMBER_TABLE();
621 a42 := JTF_VARCHAR2_TABLE_4000();
622 a43 := JTF_NUMBER_TABLE();
623 a44 := JTF_VARCHAR2_TABLE_100();
624 a45 := JTF_VARCHAR2_TABLE_100();
625 if t.count > 0 then
626 a0.extend(t.count);
627 a1.extend(t.count);
628 a2.extend(t.count);
629 a3.extend(t.count);
630 a4.extend(t.count);
631 a5.extend(t.count);
632 a6.extend(t.count);
633 a7.extend(t.count);
634 a8.extend(t.count);
635 a9.extend(t.count);
636 a10.extend(t.count);
637 a11.extend(t.count);
638 a12.extend(t.count);
639 a13.extend(t.count);
640 a14.extend(t.count);
641 a15.extend(t.count);
642 a16.extend(t.count);
643 a17.extend(t.count);
644 a18.extend(t.count);
645 a19.extend(t.count);
646 a20.extend(t.count);
647 a21.extend(t.count);
648 a22.extend(t.count);
649 a23.extend(t.count);
650 a24.extend(t.count);
651 a25.extend(t.count);
652 a26.extend(t.count);
653 a27.extend(t.count);
654 a28.extend(t.count);
655 a29.extend(t.count);
656 a30.extend(t.count);
657 a31.extend(t.count);
658 a32.extend(t.count);
659 a33.extend(t.count);
660 a34.extend(t.count);
661 a35.extend(t.count);
662 a36.extend(t.count);
663 a37.extend(t.count);
664 a38.extend(t.count);
665 a39.extend(t.count);
666 a40.extend(t.count);
667 a41.extend(t.count);
668 a42.extend(t.count);
669 a43.extend(t.count);
670 a44.extend(t.count);
671 a45.extend(t.count);
672 ddindx := t.first;
673 indx := 1;
674 while true loop
675 a0(indx) := rosetta_g_miss_num_map(t(ddindx).syncid);
676 a1(indx) := t(ddindx).exclusion_date;
677 a2(indx) := rosetta_g_miss_num_map(t(ddindx).recordindex);
678 a3(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
679 a4(indx) := t(ddindx).syncanchor;
680 a5(indx) := rosetta_g_miss_num_map(t(ddindx).timezoneid);
681 a6(indx) := t(ddindx).eventtype;
682 a7(indx) := t(ddindx).objectcode;
683 a8(indx) := t(ddindx).subject;
684 a9(indx) := t(ddindx).description;
685 a10(indx) := t(ddindx).dateselected;
686 a11(indx) := t(ddindx).plannedstartdate;
687 a12(indx) := t(ddindx).plannedenddate;
688 a13(indx) := t(ddindx).scheduledstartdate;
689 a14(indx) := t(ddindx).scheduledenddate;
690 a15(indx) := t(ddindx).actualstartdate;
691 a16(indx) := t(ddindx).actualenddate;
692 a17(indx) := rosetta_g_miss_num_map(t(ddindx).statusid);
693 a18(indx) := rosetta_g_miss_num_map(t(ddindx).priorityid);
694 a19(indx) := t(ddindx).alarmflag;
695 a20(indx) := t(ddindx).alarmdate;
696 a21(indx) := t(ddindx).privateflag;
697 a22(indx) := t(ddindx).category;
698 a23(indx) := rosetta_g_miss_num_map(t(ddindx).resourceid);
699 a24(indx) := t(ddindx).resourcetype;
700 a25(indx) := rosetta_g_miss_num_map(t(ddindx).task_assignment_id);
701 a26(indx) := rosetta_g_miss_num_map(t(ddindx).resultid);
702 a27(indx) := t(ddindx).resultsystemmessage;
703 a28(indx) := t(ddindx).resultusermessage;
704 a29(indx) := t(ddindx).unit_of_measure;
705 a30(indx) := rosetta_g_miss_num_map(t(ddindx).occurs_every);
706 a31(indx) := t(ddindx).start_date;
707 a32(indx) := t(ddindx).end_date;
708 a33(indx) := t(ddindx).sunday;
709 a34(indx) := t(ddindx).monday;
710 a35(indx) := t(ddindx).tuesday;
711 a36(indx) := t(ddindx).wednesday;
712 a37(indx) := t(ddindx).thursday;
713 a38(indx) := t(ddindx).friday;
714 a39(indx) := t(ddindx).saturday;
715 a40(indx) := rosetta_g_miss_num_map(t(ddindx).date_of_month);
716 a41(indx) := rosetta_g_miss_num_map(t(ddindx).occurs_which);
717 a42(indx) := t(ddindx).locations;
718 a43(indx) := rosetta_g_miss_num_map(t(ddindx).principal_id);
719 a44(indx) := t(ddindx).free_busy_type;
720 a45(indx) := t(ddindx).dial_in;
721 indx := indx+1;
722 if t.last =ddindx
723 then exit;
724 end if;
725 ddindx := t.next(ddindx);
726 end loop;
727 end if;
728 end if;
729 end rosetta_table_copy_out_p4;
730
731 procedure rosetta_table_copy_in_p6(t out nocopy cac_sync_task.attendee_tbl, a0 JTF_NUMBER_TABLE
732 , a1 JTF_VARCHAR2_TABLE_2000
733 , a2 JTF_NUMBER_TABLE
734 , a3 JTF_NUMBER_TABLE
735 , a4 JTF_VARCHAR2_TABLE_2000
736 , a5 JTF_VARCHAR2_TABLE_200
737 , a6 JTF_VARCHAR2_TABLE_100
738 , a7 JTF_VARCHAR2_TABLE_200
739 , a8 JTF_VARCHAR2_TABLE_100
740 , a9 JTF_VARCHAR2_TABLE_100
741 , a10 JTF_VARCHAR2_TABLE_100
742 , a11 JTF_VARCHAR2_TABLE_100
743 , a12 JTF_VARCHAR2_TABLE_2000
744 , a13 JTF_VARCHAR2_TABLE_100
745 ) as
746 ddindx binary_integer; indx binary_integer;
747 begin
748 if a0 is not null and a0.count > 0 then
749 if a0.count > 0 then
750 indx := a0.first;
751 ddindx := 1;
752 while true loop
753 t(ddindx).task_id := rosetta_g_miss_num_map(a0(indx));
754 t(ddindx).attendee_role := a1(indx);
755 t(ddindx).attendee_status := rosetta_g_miss_num_map(a2(indx));
756 t(ddindx).resourceid := rosetta_g_miss_num_map(a3(indx));
757 t(ddindx).resourcetype := a4(indx);
758 t(ddindx).first_name := a5(indx);
759 t(ddindx).middle_name := a6(indx);
760 t(ddindx).last_name := a7(indx);
761 t(ddindx).primary_phone_country_code := a8(indx);
762 t(ddindx).primary_phone_area_code := a9(indx);
763 t(ddindx).primary_phone_number := a10(indx);
764 t(ddindx).primary_phone_extension := a11(indx);
765 t(ddindx).email_address := a12(indx);
766 t(ddindx).job_title := a13(indx);
767 ddindx := ddindx+1;
768 if a0.last =indx
769 then exit;
770 end if;
771 indx := a0.next(indx);
772 end loop;
773 end if;
774 end if;
775 end rosetta_table_copy_in_p6;
776 procedure rosetta_table_copy_out_p6(t cac_sync_task.attendee_tbl, a0 out nocopy JTF_NUMBER_TABLE
777 , a1 out nocopy JTF_VARCHAR2_TABLE_2000
778 , a2 out nocopy JTF_NUMBER_TABLE
779 , a3 out nocopy JTF_NUMBER_TABLE
780 , a4 out nocopy JTF_VARCHAR2_TABLE_2000
781 , a5 out nocopy JTF_VARCHAR2_TABLE_200
782 , a6 out nocopy JTF_VARCHAR2_TABLE_100
783 , a7 out nocopy JTF_VARCHAR2_TABLE_200
784 , a8 out nocopy JTF_VARCHAR2_TABLE_100
785 , a9 out nocopy JTF_VARCHAR2_TABLE_100
786 , a10 out nocopy JTF_VARCHAR2_TABLE_100
787 , a11 out nocopy JTF_VARCHAR2_TABLE_100
788 , a12 out nocopy JTF_VARCHAR2_TABLE_2000
789 , a13 out nocopy JTF_VARCHAR2_TABLE_100
790 ) as
791 ddindx binary_integer; indx binary_integer;
792 begin
793 if t is null or t.count = 0 then
794 a0 := JTF_NUMBER_TABLE();
795 a1 := JTF_VARCHAR2_TABLE_2000();
796 a2 := JTF_NUMBER_TABLE();
797 a3 := JTF_NUMBER_TABLE();
798 a4 := JTF_VARCHAR2_TABLE_2000();
799 a5 := JTF_VARCHAR2_TABLE_200();
800 a6 := JTF_VARCHAR2_TABLE_100();
801 a7 := JTF_VARCHAR2_TABLE_200();
802 a8 := JTF_VARCHAR2_TABLE_100();
803 a9 := JTF_VARCHAR2_TABLE_100();
804 a10 := JTF_VARCHAR2_TABLE_100();
805 a11 := JTF_VARCHAR2_TABLE_100();
806 a12 := JTF_VARCHAR2_TABLE_2000();
807 a13 := JTF_VARCHAR2_TABLE_100();
808 else
809 a0 := JTF_NUMBER_TABLE();
810 a1 := JTF_VARCHAR2_TABLE_2000();
811 a2 := JTF_NUMBER_TABLE();
812 a3 := JTF_NUMBER_TABLE();
813 a4 := JTF_VARCHAR2_TABLE_2000();
814 a5 := JTF_VARCHAR2_TABLE_200();
815 a6 := JTF_VARCHAR2_TABLE_100();
816 a7 := JTF_VARCHAR2_TABLE_200();
817 a8 := JTF_VARCHAR2_TABLE_100();
818 a9 := JTF_VARCHAR2_TABLE_100();
819 a10 := JTF_VARCHAR2_TABLE_100();
820 a11 := JTF_VARCHAR2_TABLE_100();
821 a12 := JTF_VARCHAR2_TABLE_2000();
822 a13 := JTF_VARCHAR2_TABLE_100();
823 if t.count > 0 then
824 a0.extend(t.count);
825 a1.extend(t.count);
826 a2.extend(t.count);
827 a3.extend(t.count);
828 a4.extend(t.count);
829 a5.extend(t.count);
830 a6.extend(t.count);
831 a7.extend(t.count);
832 a8.extend(t.count);
833 a9.extend(t.count);
834 a10.extend(t.count);
835 a11.extend(t.count);
836 a12.extend(t.count);
837 a13.extend(t.count);
838 ddindx := t.first;
839 indx := 1;
840 while true loop
841 a0(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
842 a1(indx) := t(ddindx).attendee_role;
843 a2(indx) := rosetta_g_miss_num_map(t(ddindx).attendee_status);
844 a3(indx) := rosetta_g_miss_num_map(t(ddindx).resourceid);
845 a4(indx) := t(ddindx).resourcetype;
846 a5(indx) := t(ddindx).first_name;
847 a6(indx) := t(ddindx).middle_name;
848 a7(indx) := t(ddindx).last_name;
849 a8(indx) := t(ddindx).primary_phone_country_code;
850 a9(indx) := t(ddindx).primary_phone_area_code;
851 a10(indx) := t(ddindx).primary_phone_number;
852 a11(indx) := t(ddindx).primary_phone_extension;
853 a12(indx) := t(ddindx).email_address;
854 a13(indx) := t(ddindx).job_title;
855 indx := indx+1;
856 if t.last =ddindx
857 then exit;
858 end if;
859 ddindx := t.next(ddindx);
860 end loop;
861 end if;
862 end if;
863 end rosetta_table_copy_out_p6;
864
865 procedure get_count(p_request_type VARCHAR2
866 , p_syncanchor date
867 , p_principal_id NUMBER
868 , x_total out nocopy NUMBER
869 , x_totalnew out nocopy NUMBER
870 , x_totalmodified out nocopy NUMBER
871 , x_totaldeleted out nocopy NUMBER
872 )
873
874 as
875 ddp_syncanchor date;
876 ddindx binary_integer; indx binary_integer;
877 begin
878
879 -- copy data to the local IN or IN-OUT args, if any
880
881 ddp_syncanchor := rosetta_g_miss_date_in_map(p_syncanchor);
882
883
884
885
886
887
888 -- here's the delegated call to the old PL/SQL routine
889 cac_sync_task.get_count(p_request_type,
890 ddp_syncanchor,
891 p_principal_id,
892 x_total,
893 x_totalnew,
894 x_totalmodified,
895 x_totaldeleted);
896
897 -- copy data back from the local variables to OUT or IN-OUT args, if any
898
899
900
901
902
903
904 end;
905
906 procedure get_list(p_request_type VARCHAR2
907 , p_syncanchor date
908 , p_principal_id NUMBER
909 , p_sync_type VARCHAR2
910 , p4_a0 out nocopy JTF_NUMBER_TABLE
911 , p4_a1 out nocopy JTF_NUMBER_TABLE
912 , p4_a2 out nocopy JTF_NUMBER_TABLE
913 , p4_a3 out nocopy JTF_DATE_TABLE
914 , p4_a4 out nocopy JTF_NUMBER_TABLE
915 , p4_a5 out nocopy JTF_VARCHAR2_TABLE_100
916 , p4_a6 out nocopy JTF_VARCHAR2_TABLE_100
917 , p4_a7 out nocopy JTF_VARCHAR2_TABLE_2000
918 , p4_a8 out nocopy JTF_VARCHAR2_TABLE_4000
919 , p4_a9 out nocopy JTF_VARCHAR2_TABLE_100
920 , p4_a10 out nocopy JTF_DATE_TABLE
921 , p4_a11 out nocopy JTF_DATE_TABLE
922 , p4_a12 out nocopy JTF_DATE_TABLE
923 , p4_a13 out nocopy JTF_DATE_TABLE
924 , p4_a14 out nocopy JTF_DATE_TABLE
925 , p4_a15 out nocopy JTF_DATE_TABLE
926 , p4_a16 out nocopy JTF_NUMBER_TABLE
927 , p4_a17 out nocopy JTF_NUMBER_TABLE
928 , p4_a18 out nocopy JTF_VARCHAR2_TABLE_100
929 , p4_a19 out nocopy JTF_DATE_TABLE
930 , p4_a20 out nocopy JTF_VARCHAR2_TABLE_100
931 , p4_a21 out nocopy JTF_VARCHAR2_TABLE_300
932 , p4_a22 out nocopy JTF_NUMBER_TABLE
933 , p4_a23 out nocopy JTF_VARCHAR2_TABLE_2000
934 , p4_a24 out nocopy JTF_NUMBER_TABLE
935 , p4_a25 out nocopy JTF_NUMBER_TABLE
936 , p4_a26 out nocopy JTF_VARCHAR2_TABLE_300
937 , p4_a27 out nocopy JTF_VARCHAR2_TABLE_2000
938 , p4_a28 out nocopy JTF_VARCHAR2_TABLE_100
939 , p4_a29 out nocopy JTF_NUMBER_TABLE
940 , p4_a30 out nocopy JTF_DATE_TABLE
941 , p4_a31 out nocopy JTF_DATE_TABLE
942 , p4_a32 out nocopy JTF_VARCHAR2_TABLE_100
943 , p4_a33 out nocopy JTF_VARCHAR2_TABLE_100
944 , p4_a34 out nocopy JTF_VARCHAR2_TABLE_100
945 , p4_a35 out nocopy JTF_VARCHAR2_TABLE_100
946 , p4_a36 out nocopy JTF_VARCHAR2_TABLE_100
947 , p4_a37 out nocopy JTF_VARCHAR2_TABLE_100
948 , p4_a38 out nocopy JTF_VARCHAR2_TABLE_100
949 , p4_a39 out nocopy JTF_NUMBER_TABLE
950 , p4_a40 out nocopy JTF_NUMBER_TABLE
951 , p4_a41 out nocopy JTF_VARCHAR2_TABLE_4000
952 , p4_a42 out nocopy JTF_NUMBER_TABLE
953 , p4_a43 out nocopy JTF_VARCHAR2_TABLE_100
954 , p4_a44 out nocopy JTF_VARCHAR2_TABLE_100
955 , p5_a0 out nocopy JTF_NUMBER_TABLE
956 , p5_a1 out nocopy JTF_DATE_TABLE
957 , p5_a2 out nocopy JTF_NUMBER_TABLE
958 , p5_a3 out nocopy JTF_NUMBER_TABLE
959 , p5_a4 out nocopy JTF_DATE_TABLE
960 , p5_a5 out nocopy JTF_NUMBER_TABLE
961 , p5_a6 out nocopy JTF_VARCHAR2_TABLE_100
962 , p5_a7 out nocopy JTF_VARCHAR2_TABLE_100
963 , p5_a8 out nocopy JTF_VARCHAR2_TABLE_2000
964 , p5_a9 out nocopy JTF_VARCHAR2_TABLE_4000
965 , p5_a10 out nocopy JTF_VARCHAR2_TABLE_100
966 , p5_a11 out nocopy JTF_DATE_TABLE
967 , p5_a12 out nocopy JTF_DATE_TABLE
968 , p5_a13 out nocopy JTF_DATE_TABLE
969 , p5_a14 out nocopy JTF_DATE_TABLE
970 , p5_a15 out nocopy JTF_DATE_TABLE
971 , p5_a16 out nocopy JTF_DATE_TABLE
972 , p5_a17 out nocopy JTF_NUMBER_TABLE
973 , p5_a18 out nocopy JTF_NUMBER_TABLE
974 , p5_a19 out nocopy JTF_VARCHAR2_TABLE_100
975 , p5_a20 out nocopy JTF_DATE_TABLE
976 , p5_a21 out nocopy JTF_VARCHAR2_TABLE_100
977 , p5_a22 out nocopy JTF_VARCHAR2_TABLE_300
978 , p5_a23 out nocopy JTF_NUMBER_TABLE
979 , p5_a24 out nocopy JTF_VARCHAR2_TABLE_2000
980 , p5_a25 out nocopy JTF_NUMBER_TABLE
981 , p5_a26 out nocopy JTF_NUMBER_TABLE
982 , p5_a27 out nocopy JTF_VARCHAR2_TABLE_300
983 , p5_a28 out nocopy JTF_VARCHAR2_TABLE_2000
984 , p5_a29 out nocopy JTF_VARCHAR2_TABLE_100
985 , p5_a30 out nocopy JTF_NUMBER_TABLE
986 , p5_a31 out nocopy JTF_DATE_TABLE
987 , p5_a32 out nocopy JTF_DATE_TABLE
988 , p5_a33 out nocopy JTF_VARCHAR2_TABLE_100
989 , p5_a34 out nocopy JTF_VARCHAR2_TABLE_100
990 , p5_a35 out nocopy JTF_VARCHAR2_TABLE_100
991 , p5_a36 out nocopy JTF_VARCHAR2_TABLE_100
992 , p5_a37 out nocopy JTF_VARCHAR2_TABLE_100
993 , p5_a38 out nocopy JTF_VARCHAR2_TABLE_100
994 , p5_a39 out nocopy JTF_VARCHAR2_TABLE_100
995 , p5_a40 out nocopy JTF_NUMBER_TABLE
996 , p5_a41 out nocopy JTF_NUMBER_TABLE
997 , p5_a42 out nocopy JTF_VARCHAR2_TABLE_4000
998 , p5_a43 out nocopy JTF_NUMBER_TABLE
999 , p5_a44 out nocopy JTF_VARCHAR2_TABLE_100
1000 , p5_a45 out nocopy JTF_VARCHAR2_TABLE_100
1001 , p6_a0 out nocopy JTF_NUMBER_TABLE
1002 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_2000
1003 , p6_a2 out nocopy JTF_NUMBER_TABLE
1004 , p6_a3 out nocopy JTF_NUMBER_TABLE
1005 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_2000
1006 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_200
1007 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
1008 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_200
1009 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
1010 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_100
1011 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
1012 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
1013 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_2000
1014 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1015 )
1016
1017 as
1018 ddp_syncanchor date;
1019 ddx_data cac_sync_task.task_tbl;
1020 ddx_exclusion_data cac_sync_task.exclusion_tbl;
1021 ddx_attendee_data cac_sync_task.attendee_tbl;
1022 ddindx binary_integer; indx binary_integer;
1023 begin
1024
1025 -- copy data to the local IN or IN-OUT args, if any
1026
1027 ddp_syncanchor := rosetta_g_miss_date_in_map(p_syncanchor);
1028
1029
1030
1031
1032
1033
1034 -- here's the delegated call to the old PL/SQL routine
1035 cac_sync_task.get_list(p_request_type,
1036 ddp_syncanchor,
1037 p_principal_id,
1038 p_sync_type,
1039 ddx_data,
1040 ddx_exclusion_data,
1041 ddx_attendee_data);
1042
1043 -- copy data back from the local variables to OUT or IN-OUT args, if any
1044
1045
1046
1047
1048 cac_sync_task_w.rosetta_table_copy_out_p3(ddx_data, p4_a0
1049 , p4_a1
1050 , p4_a2
1051 , p4_a3
1052 , p4_a4
1053 , p4_a5
1054 , p4_a6
1055 , p4_a7
1056 , p4_a8
1057 , p4_a9
1058 , p4_a10
1059 , p4_a11
1060 , p4_a12
1061 , p4_a13
1062 , p4_a14
1063 , p4_a15
1064 , p4_a16
1065 , p4_a17
1066 , p4_a18
1067 , p4_a19
1068 , p4_a20
1069 , p4_a21
1070 , p4_a22
1071 , p4_a23
1072 , p4_a24
1073 , p4_a25
1074 , p4_a26
1075 , p4_a27
1076 , p4_a28
1077 , p4_a29
1078 , p4_a30
1079 , p4_a31
1080 , p4_a32
1081 , p4_a33
1082 , p4_a34
1083 , p4_a35
1084 , p4_a36
1085 , p4_a37
1086 , p4_a38
1087 , p4_a39
1088 , p4_a40
1089 , p4_a41
1090 , p4_a42
1091 , p4_a43
1092 , p4_a44
1093 );
1094
1095 cac_sync_task_w.rosetta_table_copy_out_p4(ddx_exclusion_data, p5_a0
1096 , p5_a1
1097 , p5_a2
1098 , p5_a3
1099 , p5_a4
1100 , p5_a5
1101 , p5_a6
1102 , p5_a7
1103 , p5_a8
1104 , p5_a9
1105 , p5_a10
1106 , p5_a11
1107 , p5_a12
1108 , p5_a13
1109 , p5_a14
1110 , p5_a15
1111 , p5_a16
1112 , p5_a17
1113 , p5_a18
1114 , p5_a19
1115 , p5_a20
1116 , p5_a21
1117 , p5_a22
1118 , p5_a23
1119 , p5_a24
1120 , p5_a25
1121 , p5_a26
1122 , p5_a27
1123 , p5_a28
1124 , p5_a29
1125 , p5_a30
1126 , p5_a31
1127 , p5_a32
1128 , p5_a33
1129 , p5_a34
1130 , p5_a35
1131 , p5_a36
1132 , p5_a37
1133 , p5_a38
1134 , p5_a39
1135 , p5_a40
1136 , p5_a41
1137 , p5_a42
1138 , p5_a43
1139 , p5_a44
1140 , p5_a45
1141 );
1142
1143 cac_sync_task_w.rosetta_table_copy_out_p6(ddx_attendee_data, p6_a0
1144 , p6_a1
1145 , p6_a2
1146 , p6_a3
1147 , p6_a4
1148 , p6_a5
1149 , p6_a6
1150 , p6_a7
1151 , p6_a8
1152 , p6_a9
1153 , p6_a10
1154 , p6_a11
1155 , p6_a12
1156 , p6_a13
1157 );
1158 end;
1159
1160 procedure create_ids(p_num_req NUMBER
1161 , p1_a0 in out nocopy JTF_NUMBER_TABLE
1162 , p1_a1 in out nocopy JTF_NUMBER_TABLE
1163 , p1_a2 in out nocopy JTF_NUMBER_TABLE
1164 , p1_a3 in out nocopy JTF_DATE_TABLE
1165 , p1_a4 in out nocopy JTF_NUMBER_TABLE
1166 , p1_a5 in out nocopy JTF_VARCHAR2_TABLE_100
1167 , p1_a6 in out nocopy JTF_VARCHAR2_TABLE_100
1168 , p1_a7 in out nocopy JTF_VARCHAR2_TABLE_2000
1169 , p1_a8 in out nocopy JTF_VARCHAR2_TABLE_4000
1170 , p1_a9 in out nocopy JTF_VARCHAR2_TABLE_100
1171 , p1_a10 in out nocopy JTF_DATE_TABLE
1172 , p1_a11 in out nocopy JTF_DATE_TABLE
1173 , p1_a12 in out nocopy JTF_DATE_TABLE
1174 , p1_a13 in out nocopy JTF_DATE_TABLE
1175 , p1_a14 in out nocopy JTF_DATE_TABLE
1176 , p1_a15 in out nocopy JTF_DATE_TABLE
1177 , p1_a16 in out nocopy JTF_NUMBER_TABLE
1178 , p1_a17 in out nocopy JTF_NUMBER_TABLE
1179 , p1_a18 in out nocopy JTF_VARCHAR2_TABLE_100
1180 , p1_a19 in out nocopy JTF_DATE_TABLE
1181 , p1_a20 in out nocopy JTF_VARCHAR2_TABLE_100
1182 , p1_a21 in out nocopy JTF_VARCHAR2_TABLE_300
1183 , p1_a22 in out nocopy JTF_NUMBER_TABLE
1184 , p1_a23 in out nocopy JTF_VARCHAR2_TABLE_2000
1185 , p1_a24 in out nocopy JTF_NUMBER_TABLE
1186 , p1_a25 in out nocopy JTF_NUMBER_TABLE
1187 , p1_a26 in out nocopy JTF_VARCHAR2_TABLE_300
1188 , p1_a27 in out nocopy JTF_VARCHAR2_TABLE_2000
1189 , p1_a28 in out nocopy JTF_VARCHAR2_TABLE_100
1190 , p1_a29 in out nocopy JTF_NUMBER_TABLE
1191 , p1_a30 in out nocopy JTF_DATE_TABLE
1192 , p1_a31 in out nocopy JTF_DATE_TABLE
1193 , p1_a32 in out nocopy JTF_VARCHAR2_TABLE_100
1194 , p1_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1195 , p1_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1196 , p1_a35 in out nocopy JTF_VARCHAR2_TABLE_100
1197 , p1_a36 in out nocopy JTF_VARCHAR2_TABLE_100
1198 , p1_a37 in out nocopy JTF_VARCHAR2_TABLE_100
1199 , p1_a38 in out nocopy JTF_VARCHAR2_TABLE_100
1200 , p1_a39 in out nocopy JTF_NUMBER_TABLE
1201 , p1_a40 in out nocopy JTF_NUMBER_TABLE
1202 , p1_a41 in out nocopy JTF_VARCHAR2_TABLE_4000
1203 , p1_a42 in out nocopy JTF_NUMBER_TABLE
1204 , p1_a43 in out nocopy JTF_VARCHAR2_TABLE_100
1205 , p1_a44 in out nocopy JTF_VARCHAR2_TABLE_100
1206 )
1207
1208 as
1209 ddx_results cac_sync_task.task_tbl;
1210 ddindx binary_integer; indx binary_integer;
1211 begin
1212
1213 -- copy data to the local IN or IN-OUT args, if any
1214
1215 cac_sync_task_w.rosetta_table_copy_in_p3(ddx_results, p1_a0
1216 , p1_a1
1217 , p1_a2
1218 , p1_a3
1219 , p1_a4
1220 , p1_a5
1221 , p1_a6
1222 , p1_a7
1223 , p1_a8
1224 , p1_a9
1225 , p1_a10
1226 , p1_a11
1227 , p1_a12
1228 , p1_a13
1229 , p1_a14
1230 , p1_a15
1231 , p1_a16
1232 , p1_a17
1233 , p1_a18
1234 , p1_a19
1235 , p1_a20
1236 , p1_a21
1237 , p1_a22
1238 , p1_a23
1239 , p1_a24
1240 , p1_a25
1241 , p1_a26
1242 , p1_a27
1243 , p1_a28
1244 , p1_a29
1245 , p1_a30
1246 , p1_a31
1247 , p1_a32
1248 , p1_a33
1249 , p1_a34
1250 , p1_a35
1251 , p1_a36
1252 , p1_a37
1253 , p1_a38
1254 , p1_a39
1255 , p1_a40
1256 , p1_a41
1257 , p1_a42
1258 , p1_a43
1259 , p1_a44
1260 );
1261
1262 -- here's the delegated call to the old PL/SQL routine
1263 cac_sync_task.create_ids(p_num_req,
1264 ddx_results);
1265
1266 -- copy data back from the local variables to OUT or IN-OUT args, if any
1267
1268 cac_sync_task_w.rosetta_table_copy_out_p3(ddx_results, p1_a0
1269 , p1_a1
1270 , p1_a2
1271 , p1_a3
1272 , p1_a4
1273 , p1_a5
1274 , p1_a6
1275 , p1_a7
1276 , p1_a8
1277 , p1_a9
1278 , p1_a10
1279 , p1_a11
1280 , p1_a12
1281 , p1_a13
1282 , p1_a14
1283 , p1_a15
1284 , p1_a16
1285 , p1_a17
1286 , p1_a18
1287 , p1_a19
1288 , p1_a20
1289 , p1_a21
1290 , p1_a22
1291 , p1_a23
1292 , p1_a24
1293 , p1_a25
1294 , p1_a26
1295 , p1_a27
1296 , p1_a28
1297 , p1_a29
1298 , p1_a30
1299 , p1_a31
1300 , p1_a32
1301 , p1_a33
1302 , p1_a34
1303 , p1_a35
1304 , p1_a36
1305 , p1_a37
1306 , p1_a38
1307 , p1_a39
1308 , p1_a40
1309 , p1_a41
1310 , p1_a42
1311 , p1_a43
1312 , p1_a44
1313 );
1314 end;
1315
1316 procedure update_data(p0_a0 in out nocopy JTF_NUMBER_TABLE
1317 , p0_a1 in out nocopy JTF_NUMBER_TABLE
1318 , p0_a2 in out nocopy JTF_NUMBER_TABLE
1319 , p0_a3 in out nocopy JTF_DATE_TABLE
1320 , p0_a4 in out nocopy JTF_NUMBER_TABLE
1321 , p0_a5 in out nocopy JTF_VARCHAR2_TABLE_100
1322 , p0_a6 in out nocopy JTF_VARCHAR2_TABLE_100
1323 , p0_a7 in out nocopy JTF_VARCHAR2_TABLE_2000
1324 , p0_a8 in out nocopy JTF_VARCHAR2_TABLE_4000
1325 , p0_a9 in out nocopy JTF_VARCHAR2_TABLE_100
1326 , p0_a10 in out nocopy JTF_DATE_TABLE
1327 , p0_a11 in out nocopy JTF_DATE_TABLE
1328 , p0_a12 in out nocopy JTF_DATE_TABLE
1329 , p0_a13 in out nocopy JTF_DATE_TABLE
1330 , p0_a14 in out nocopy JTF_DATE_TABLE
1331 , p0_a15 in out nocopy JTF_DATE_TABLE
1332 , p0_a16 in out nocopy JTF_NUMBER_TABLE
1333 , p0_a17 in out nocopy JTF_NUMBER_TABLE
1334 , p0_a18 in out nocopy JTF_VARCHAR2_TABLE_100
1335 , p0_a19 in out nocopy JTF_DATE_TABLE
1336 , p0_a20 in out nocopy JTF_VARCHAR2_TABLE_100
1337 , p0_a21 in out nocopy JTF_VARCHAR2_TABLE_300
1338 , p0_a22 in out nocopy JTF_NUMBER_TABLE
1339 , p0_a23 in out nocopy JTF_VARCHAR2_TABLE_2000
1340 , p0_a24 in out nocopy JTF_NUMBER_TABLE
1341 , p0_a25 in out nocopy JTF_NUMBER_TABLE
1342 , p0_a26 in out nocopy JTF_VARCHAR2_TABLE_300
1343 , p0_a27 in out nocopy JTF_VARCHAR2_TABLE_2000
1344 , p0_a28 in out nocopy JTF_VARCHAR2_TABLE_100
1345 , p0_a29 in out nocopy JTF_NUMBER_TABLE
1346 , p0_a30 in out nocopy JTF_DATE_TABLE
1347 , p0_a31 in out nocopy JTF_DATE_TABLE
1348 , p0_a32 in out nocopy JTF_VARCHAR2_TABLE_100
1349 , p0_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1350 , p0_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1351 , p0_a35 in out nocopy JTF_VARCHAR2_TABLE_100
1352 , p0_a36 in out nocopy JTF_VARCHAR2_TABLE_100
1353 , p0_a37 in out nocopy JTF_VARCHAR2_TABLE_100
1354 , p0_a38 in out nocopy JTF_VARCHAR2_TABLE_100
1355 , p0_a39 in out nocopy JTF_NUMBER_TABLE
1356 , p0_a40 in out nocopy JTF_NUMBER_TABLE
1357 , p0_a41 in out nocopy JTF_VARCHAR2_TABLE_4000
1358 , p0_a42 in out nocopy JTF_NUMBER_TABLE
1359 , p0_a43 in out nocopy JTF_VARCHAR2_TABLE_100
1360 , p0_a44 in out nocopy JTF_VARCHAR2_TABLE_100
1361 , p1_a0 in out nocopy JTF_NUMBER_TABLE
1362 , p1_a1 in out nocopy JTF_DATE_TABLE
1363 , p1_a2 in out nocopy JTF_NUMBER_TABLE
1364 , p1_a3 in out nocopy JTF_NUMBER_TABLE
1365 , p1_a4 in out nocopy JTF_DATE_TABLE
1366 , p1_a5 in out nocopy JTF_NUMBER_TABLE
1367 , p1_a6 in out nocopy JTF_VARCHAR2_TABLE_100
1368 , p1_a7 in out nocopy JTF_VARCHAR2_TABLE_100
1369 , p1_a8 in out nocopy JTF_VARCHAR2_TABLE_2000
1370 , p1_a9 in out nocopy JTF_VARCHAR2_TABLE_4000
1371 , p1_a10 in out nocopy JTF_VARCHAR2_TABLE_100
1372 , p1_a11 in out nocopy JTF_DATE_TABLE
1373 , p1_a12 in out nocopy JTF_DATE_TABLE
1374 , p1_a13 in out nocopy JTF_DATE_TABLE
1375 , p1_a14 in out nocopy JTF_DATE_TABLE
1376 , p1_a15 in out nocopy JTF_DATE_TABLE
1377 , p1_a16 in out nocopy JTF_DATE_TABLE
1378 , p1_a17 in out nocopy JTF_NUMBER_TABLE
1379 , p1_a18 in out nocopy JTF_NUMBER_TABLE
1380 , p1_a19 in out nocopy JTF_VARCHAR2_TABLE_100
1381 , p1_a20 in out nocopy JTF_DATE_TABLE
1382 , p1_a21 in out nocopy JTF_VARCHAR2_TABLE_100
1383 , p1_a22 in out nocopy JTF_VARCHAR2_TABLE_300
1384 , p1_a23 in out nocopy JTF_NUMBER_TABLE
1385 , p1_a24 in out nocopy JTF_VARCHAR2_TABLE_2000
1386 , p1_a25 in out nocopy JTF_NUMBER_TABLE
1387 , p1_a26 in out nocopy JTF_NUMBER_TABLE
1388 , p1_a27 in out nocopy JTF_VARCHAR2_TABLE_300
1389 , p1_a28 in out nocopy JTF_VARCHAR2_TABLE_2000
1390 , p1_a29 in out nocopy JTF_VARCHAR2_TABLE_100
1391 , p1_a30 in out nocopy JTF_NUMBER_TABLE
1392 , p1_a31 in out nocopy JTF_DATE_TABLE
1393 , p1_a32 in out nocopy JTF_DATE_TABLE
1394 , p1_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1395 , p1_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1396 , p1_a35 in out nocopy JTF_VARCHAR2_TABLE_100
1397 , p1_a36 in out nocopy JTF_VARCHAR2_TABLE_100
1398 , p1_a37 in out nocopy JTF_VARCHAR2_TABLE_100
1399 , p1_a38 in out nocopy JTF_VARCHAR2_TABLE_100
1400 , p1_a39 in out nocopy JTF_VARCHAR2_TABLE_100
1401 , p1_a40 in out nocopy JTF_NUMBER_TABLE
1402 , p1_a41 in out nocopy JTF_NUMBER_TABLE
1403 , p1_a42 in out nocopy JTF_VARCHAR2_TABLE_4000
1404 , p1_a43 in out nocopy JTF_NUMBER_TABLE
1405 , p1_a44 in out nocopy JTF_VARCHAR2_TABLE_100
1406 , p1_a45 in out nocopy JTF_VARCHAR2_TABLE_100
1407 )
1408
1409 as
1410 ddp_tasks cac_sync_task.task_tbl;
1411 ddp_exclusions cac_sync_task.exclusion_tbl;
1412 ddindx binary_integer; indx binary_integer;
1413 begin
1414
1415 -- copy data to the local IN or IN-OUT args, if any
1416 cac_sync_task_w.rosetta_table_copy_in_p3(ddp_tasks, p0_a0
1417 , p0_a1
1418 , p0_a2
1419 , p0_a3
1420 , p0_a4
1421 , p0_a5
1422 , p0_a6
1423 , p0_a7
1424 , p0_a8
1425 , p0_a9
1426 , p0_a10
1427 , p0_a11
1428 , p0_a12
1429 , p0_a13
1430 , p0_a14
1431 , p0_a15
1432 , p0_a16
1433 , p0_a17
1434 , p0_a18
1435 , p0_a19
1436 , p0_a20
1437 , p0_a21
1438 , p0_a22
1439 , p0_a23
1440 , p0_a24
1441 , p0_a25
1442 , p0_a26
1443 , p0_a27
1444 , p0_a28
1445 , p0_a29
1446 , p0_a30
1447 , p0_a31
1448 , p0_a32
1449 , p0_a33
1450 , p0_a34
1451 , p0_a35
1452 , p0_a36
1453 , p0_a37
1454 , p0_a38
1455 , p0_a39
1456 , p0_a40
1457 , p0_a41
1458 , p0_a42
1459 , p0_a43
1460 , p0_a44
1461 );
1462
1463 cac_sync_task_w.rosetta_table_copy_in_p4(ddp_exclusions, p1_a0
1464 , p1_a1
1465 , p1_a2
1466 , p1_a3
1467 , p1_a4
1468 , p1_a5
1469 , p1_a6
1470 , p1_a7
1471 , p1_a8
1472 , p1_a9
1473 , p1_a10
1474 , p1_a11
1475 , p1_a12
1476 , p1_a13
1477 , p1_a14
1478 , p1_a15
1479 , p1_a16
1480 , p1_a17
1481 , p1_a18
1482 , p1_a19
1483 , p1_a20
1484 , p1_a21
1485 , p1_a22
1486 , p1_a23
1487 , p1_a24
1488 , p1_a25
1489 , p1_a26
1490 , p1_a27
1491 , p1_a28
1492 , p1_a29
1493 , p1_a30
1494 , p1_a31
1495 , p1_a32
1496 , p1_a33
1497 , p1_a34
1498 , p1_a35
1499 , p1_a36
1500 , p1_a37
1501 , p1_a38
1502 , p1_a39
1503 , p1_a40
1504 , p1_a41
1505 , p1_a42
1506 , p1_a43
1507 , p1_a44
1508 , p1_a45
1509 );
1510
1511 -- here's the delegated call to the old PL/SQL routine
1512 cac_sync_task.update_data(ddp_tasks,
1513 ddp_exclusions);
1514
1515 -- copy data back from the local variables to OUT or IN-OUT args, if any
1516 cac_sync_task_w.rosetta_table_copy_out_p3(ddp_tasks, p0_a0
1517 , p0_a1
1518 , p0_a2
1519 , p0_a3
1520 , p0_a4
1521 , p0_a5
1522 , p0_a6
1523 , p0_a7
1524 , p0_a8
1525 , p0_a9
1526 , p0_a10
1527 , p0_a11
1528 , p0_a12
1529 , p0_a13
1530 , p0_a14
1531 , p0_a15
1532 , p0_a16
1533 , p0_a17
1534 , p0_a18
1535 , p0_a19
1536 , p0_a20
1537 , p0_a21
1538 , p0_a22
1539 , p0_a23
1540 , p0_a24
1541 , p0_a25
1542 , p0_a26
1543 , p0_a27
1544 , p0_a28
1545 , p0_a29
1546 , p0_a30
1547 , p0_a31
1548 , p0_a32
1549 , p0_a33
1550 , p0_a34
1551 , p0_a35
1552 , p0_a36
1553 , p0_a37
1554 , p0_a38
1555 , p0_a39
1556 , p0_a40
1557 , p0_a41
1558 , p0_a42
1559 , p0_a43
1560 , p0_a44
1561 );
1562
1563 cac_sync_task_w.rosetta_table_copy_out_p4(ddp_exclusions, p1_a0
1564 , p1_a1
1565 , p1_a2
1566 , p1_a3
1567 , p1_a4
1568 , p1_a5
1569 , p1_a6
1570 , p1_a7
1571 , p1_a8
1572 , p1_a9
1573 , p1_a10
1574 , p1_a11
1575 , p1_a12
1576 , p1_a13
1577 , p1_a14
1578 , p1_a15
1579 , p1_a16
1580 , p1_a17
1581 , p1_a18
1582 , p1_a19
1583 , p1_a20
1584 , p1_a21
1585 , p1_a22
1586 , p1_a23
1587 , p1_a24
1588 , p1_a25
1589 , p1_a26
1590 , p1_a27
1591 , p1_a28
1592 , p1_a29
1593 , p1_a30
1594 , p1_a31
1595 , p1_a32
1596 , p1_a33
1597 , p1_a34
1598 , p1_a35
1599 , p1_a36
1600 , p1_a37
1601 , p1_a38
1602 , p1_a39
1603 , p1_a40
1604 , p1_a41
1605 , p1_a42
1606 , p1_a43
1607 , p1_a44
1608 , p1_a45
1609 );
1610 end;
1611
1612 procedure delete_data(p0_a0 in out nocopy JTF_NUMBER_TABLE
1613 , p0_a1 in out nocopy JTF_NUMBER_TABLE
1614 , p0_a2 in out nocopy JTF_NUMBER_TABLE
1615 , p0_a3 in out nocopy JTF_DATE_TABLE
1616 , p0_a4 in out nocopy JTF_NUMBER_TABLE
1617 , p0_a5 in out nocopy JTF_VARCHAR2_TABLE_100
1618 , p0_a6 in out nocopy JTF_VARCHAR2_TABLE_100
1619 , p0_a7 in out nocopy JTF_VARCHAR2_TABLE_2000
1620 , p0_a8 in out nocopy JTF_VARCHAR2_TABLE_4000
1621 , p0_a9 in out nocopy JTF_VARCHAR2_TABLE_100
1622 , p0_a10 in out nocopy JTF_DATE_TABLE
1623 , p0_a11 in out nocopy JTF_DATE_TABLE
1624 , p0_a12 in out nocopy JTF_DATE_TABLE
1625 , p0_a13 in out nocopy JTF_DATE_TABLE
1626 , p0_a14 in out nocopy JTF_DATE_TABLE
1627 , p0_a15 in out nocopy JTF_DATE_TABLE
1628 , p0_a16 in out nocopy JTF_NUMBER_TABLE
1629 , p0_a17 in out nocopy JTF_NUMBER_TABLE
1630 , p0_a18 in out nocopy JTF_VARCHAR2_TABLE_100
1631 , p0_a19 in out nocopy JTF_DATE_TABLE
1632 , p0_a20 in out nocopy JTF_VARCHAR2_TABLE_100
1633 , p0_a21 in out nocopy JTF_VARCHAR2_TABLE_300
1634 , p0_a22 in out nocopy JTF_NUMBER_TABLE
1635 , p0_a23 in out nocopy JTF_VARCHAR2_TABLE_2000
1636 , p0_a24 in out nocopy JTF_NUMBER_TABLE
1637 , p0_a25 in out nocopy JTF_NUMBER_TABLE
1638 , p0_a26 in out nocopy JTF_VARCHAR2_TABLE_300
1639 , p0_a27 in out nocopy JTF_VARCHAR2_TABLE_2000
1640 , p0_a28 in out nocopy JTF_VARCHAR2_TABLE_100
1641 , p0_a29 in out nocopy JTF_NUMBER_TABLE
1642 , p0_a30 in out nocopy JTF_DATE_TABLE
1643 , p0_a31 in out nocopy JTF_DATE_TABLE
1644 , p0_a32 in out nocopy JTF_VARCHAR2_TABLE_100
1645 , p0_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1646 , p0_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1647 , p0_a35 in out nocopy JTF_VARCHAR2_TABLE_100
1648 , p0_a36 in out nocopy JTF_VARCHAR2_TABLE_100
1649 , p0_a37 in out nocopy JTF_VARCHAR2_TABLE_100
1650 , p0_a38 in out nocopy JTF_VARCHAR2_TABLE_100
1651 , p0_a39 in out nocopy JTF_NUMBER_TABLE
1652 , p0_a40 in out nocopy JTF_NUMBER_TABLE
1653 , p0_a41 in out nocopy JTF_VARCHAR2_TABLE_4000
1654 , p0_a42 in out nocopy JTF_NUMBER_TABLE
1655 , p0_a43 in out nocopy JTF_VARCHAR2_TABLE_100
1656 , p0_a44 in out nocopy JTF_VARCHAR2_TABLE_100
1657 )
1658
1659 as
1660 ddp_tasks cac_sync_task.task_tbl;
1661 ddindx binary_integer; indx binary_integer;
1662 begin
1663
1664 -- copy data to the local IN or IN-OUT args, if any
1665 cac_sync_task_w.rosetta_table_copy_in_p3(ddp_tasks, p0_a0
1666 , p0_a1
1667 , p0_a2
1668 , p0_a3
1669 , p0_a4
1670 , p0_a5
1671 , p0_a6
1672 , p0_a7
1673 , p0_a8
1674 , p0_a9
1675 , p0_a10
1676 , p0_a11
1677 , p0_a12
1678 , p0_a13
1679 , p0_a14
1680 , p0_a15
1681 , p0_a16
1682 , p0_a17
1683 , p0_a18
1684 , p0_a19
1685 , p0_a20
1686 , p0_a21
1687 , p0_a22
1688 , p0_a23
1689 , p0_a24
1690 , p0_a25
1691 , p0_a26
1692 , p0_a27
1693 , p0_a28
1694 , p0_a29
1695 , p0_a30
1696 , p0_a31
1697 , p0_a32
1698 , p0_a33
1699 , p0_a34
1700 , p0_a35
1701 , p0_a36
1702 , p0_a37
1703 , p0_a38
1704 , p0_a39
1705 , p0_a40
1706 , p0_a41
1707 , p0_a42
1708 , p0_a43
1709 , p0_a44
1710 );
1711
1712 -- here's the delegated call to the old PL/SQL routine
1713 cac_sync_task.delete_data(ddp_tasks);
1714
1715 -- copy data back from the local variables to OUT or IN-OUT args, if any
1716 cac_sync_task_w.rosetta_table_copy_out_p3(ddp_tasks, p0_a0
1717 , p0_a1
1718 , p0_a2
1719 , p0_a3
1720 , p0_a4
1721 , p0_a5
1722 , p0_a6
1723 , p0_a7
1724 , p0_a8
1725 , p0_a9
1726 , p0_a10
1727 , p0_a11
1728 , p0_a12
1729 , p0_a13
1730 , p0_a14
1731 , p0_a15
1732 , p0_a16
1733 , p0_a17
1734 , p0_a18
1735 , p0_a19
1736 , p0_a20
1737 , p0_a21
1738 , p0_a22
1739 , p0_a23
1740 , p0_a24
1741 , p0_a25
1742 , p0_a26
1743 , p0_a27
1744 , p0_a28
1745 , p0_a29
1746 , p0_a30
1747 , p0_a31
1748 , p0_a32
1749 , p0_a33
1750 , p0_a34
1751 , p0_a35
1752 , p0_a36
1753 , p0_a37
1754 , p0_a38
1755 , p0_a39
1756 , p0_a40
1757 , p0_a41
1758 , p0_a42
1759 , p0_a43
1760 , p0_a44
1761 );
1762 end;
1763
1764 end cac_sync_task_w;