[Home] [Help]
PACKAGE BODY: APPS.CN_UN_PROC_PUB_W
Source
1 package body cn_un_proc_pub_w as
2 /* $Header: cnwnprob.pls 115.6 2002/11/26 01:35:49 mblum 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
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 cn_un_proc_pub.adj_tbl_type, a0 JTF_VARCHAR2_TABLE_100
14 , a1 JTF_DATE_TABLE
15 , a2 JTF_NUMBER_TABLE
16 , a3 JTF_DATE_TABLE
17 , a4 JTF_DATE_TABLE
18 , a5 JTF_DATE_TABLE
19 , a6 JTF_VARCHAR2_TABLE_100
20 , a7 JTF_VARCHAR2_TABLE_100
21 , a8 JTF_VARCHAR2_TABLE_100
22 , a9 JTF_VARCHAR2_TABLE_100
23 , a10 JTF_VARCHAR2_TABLE_100
24 , a11 JTF_NUMBER_TABLE
25 , a12 JTF_NUMBER_TABLE
26 , a13 JTF_DATE_TABLE
27 , a14 JTF_VARCHAR2_TABLE_300
28 , a15 JTF_VARCHAR2_TABLE_300
29 , a16 JTF_VARCHAR2_TABLE_300
30 , a17 JTF_VARCHAR2_TABLE_300
31 , a18 JTF_VARCHAR2_TABLE_300
32 , a19 JTF_VARCHAR2_TABLE_300
33 , a20 JTF_VARCHAR2_TABLE_300
34 , a21 JTF_VARCHAR2_TABLE_300
35 , a22 JTF_VARCHAR2_TABLE_300
36 , a23 JTF_VARCHAR2_TABLE_300
37 , a24 JTF_VARCHAR2_TABLE_300
38 , a25 JTF_VARCHAR2_TABLE_300
39 , a26 JTF_VARCHAR2_TABLE_300
40 , a27 JTF_VARCHAR2_TABLE_300
41 , a28 JTF_VARCHAR2_TABLE_300
42 , a29 JTF_VARCHAR2_TABLE_300
43 , a30 JTF_VARCHAR2_TABLE_300
44 , a31 JTF_VARCHAR2_TABLE_300
45 , a32 JTF_VARCHAR2_TABLE_300
46 , a33 JTF_VARCHAR2_TABLE_300
47 , a34 JTF_VARCHAR2_TABLE_300
48 , a35 JTF_VARCHAR2_TABLE_300
49 , a36 JTF_VARCHAR2_TABLE_300
50 , a37 JTF_VARCHAR2_TABLE_300
51 , a38 JTF_VARCHAR2_TABLE_300
52 , a39 JTF_VARCHAR2_TABLE_300
53 , a40 JTF_VARCHAR2_TABLE_300
54 , a41 JTF_VARCHAR2_TABLE_300
55 , a42 JTF_VARCHAR2_TABLE_300
56 , a43 JTF_VARCHAR2_TABLE_300
57 , a44 JTF_VARCHAR2_TABLE_300
58 , a45 JTF_VARCHAR2_TABLE_300
59 , a46 JTF_VARCHAR2_TABLE_300
60 , a47 JTF_VARCHAR2_TABLE_300
61 , a48 JTF_VARCHAR2_TABLE_300
62 , a49 JTF_VARCHAR2_TABLE_300
63 , a50 JTF_VARCHAR2_TABLE_300
64 , a51 JTF_VARCHAR2_TABLE_300
65 , a52 JTF_VARCHAR2_TABLE_300
66 , a53 JTF_VARCHAR2_TABLE_300
67 , a54 JTF_VARCHAR2_TABLE_300
68 , a55 JTF_VARCHAR2_TABLE_300
69 , a56 JTF_VARCHAR2_TABLE_300
70 , a57 JTF_VARCHAR2_TABLE_300
71 , a58 JTF_VARCHAR2_TABLE_300
72 , a59 JTF_VARCHAR2_TABLE_300
73 , a60 JTF_VARCHAR2_TABLE_300
74 , a61 JTF_VARCHAR2_TABLE_300
75 , a62 JTF_VARCHAR2_TABLE_300
76 , a63 JTF_VARCHAR2_TABLE_300
77 , a64 JTF_VARCHAR2_TABLE_300
78 , a65 JTF_VARCHAR2_TABLE_300
79 , a66 JTF_VARCHAR2_TABLE_300
80 , a67 JTF_VARCHAR2_TABLE_300
81 , a68 JTF_VARCHAR2_TABLE_300
82 , a69 JTF_VARCHAR2_TABLE_300
83 , a70 JTF_VARCHAR2_TABLE_300
84 , a71 JTF_VARCHAR2_TABLE_300
85 , a72 JTF_VARCHAR2_TABLE_300
86 , a73 JTF_VARCHAR2_TABLE_300
87 , a74 JTF_VARCHAR2_TABLE_300
88 , a75 JTF_VARCHAR2_TABLE_300
89 , a76 JTF_VARCHAR2_TABLE_300
90 , a77 JTF_VARCHAR2_TABLE_300
91 , a78 JTF_VARCHAR2_TABLE_300
92 , a79 JTF_VARCHAR2_TABLE_300
93 , a80 JTF_VARCHAR2_TABLE_300
94 , a81 JTF_VARCHAR2_TABLE_300
95 , a82 JTF_VARCHAR2_TABLE_300
96 , a83 JTF_VARCHAR2_TABLE_300
97 , a84 JTF_VARCHAR2_TABLE_300
98 , a85 JTF_VARCHAR2_TABLE_300
99 , a86 JTF_VARCHAR2_TABLE_300
100 , a87 JTF_VARCHAR2_TABLE_300
101 , a88 JTF_VARCHAR2_TABLE_300
102 , a89 JTF_VARCHAR2_TABLE_300
103 , a90 JTF_VARCHAR2_TABLE_300
104 , a91 JTF_VARCHAR2_TABLE_300
105 , a92 JTF_VARCHAR2_TABLE_300
106 , a93 JTF_VARCHAR2_TABLE_300
107 , a94 JTF_VARCHAR2_TABLE_300
108 , a95 JTF_VARCHAR2_TABLE_300
109 , a96 JTF_VARCHAR2_TABLE_300
110 , a97 JTF_VARCHAR2_TABLE_300
111 , a98 JTF_VARCHAR2_TABLE_300
112 , a99 JTF_VARCHAR2_TABLE_300
113 , a100 JTF_VARCHAR2_TABLE_300
114 , a101 JTF_VARCHAR2_TABLE_300
115 , a102 JTF_VARCHAR2_TABLE_300
116 , a103 JTF_VARCHAR2_TABLE_300
117 , a104 JTF_VARCHAR2_TABLE_300
118 , a105 JTF_VARCHAR2_TABLE_300
119 , a106 JTF_VARCHAR2_TABLE_300
120 , a107 JTF_VARCHAR2_TABLE_300
121 , a108 JTF_VARCHAR2_TABLE_300
122 , a109 JTF_VARCHAR2_TABLE_300
123 , a110 JTF_VARCHAR2_TABLE_300
124 , a111 JTF_VARCHAR2_TABLE_300
125 , a112 JTF_VARCHAR2_TABLE_300
126 , a113 JTF_VARCHAR2_TABLE_300
127 ) as
128 ddindx binary_integer; indx binary_integer;
129 begin
130 if a0 is not null and a0.count > 0 then
131 if a0.count > 0 then
132 indx := a0.first;
133 ddindx := 1;
134 while true loop
135 t(ddindx).invoice_number := a0(indx);
136 t(ddindx).invoice_date := rosetta_g_miss_date_in_map(a1(indx));
137 t(ddindx).order_number := a2(indx);
138 t(ddindx).order_date := rosetta_g_miss_date_in_map(a3(indx));
139 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a4(indx));
140 t(ddindx).processed_date := rosetta_g_miss_date_in_map(a5(indx));
141 t(ddindx).trx_type_disp := a6(indx);
142 t(ddindx).adjust_status_disp := a7(indx);
143 t(ddindx).adjusted_by := a8(indx);
144 t(ddindx).load_status := a9(indx);
145 t(ddindx).calc_status_disp := a10(indx);
146 t(ddindx).sales_credit := a11(indx);
147 t(ddindx).commission := a12(indx);
148 t(ddindx).adjust_date := rosetta_g_miss_date_in_map(a13(indx));
149 t(ddindx).attribute1 := a14(indx);
150 t(ddindx).attribute2 := a15(indx);
151 t(ddindx).attribute3 := a16(indx);
152 t(ddindx).attribute4 := a17(indx);
153 t(ddindx).attribute5 := a18(indx);
154 t(ddindx).attribute6 := a19(indx);
155 t(ddindx).attribute7 := a20(indx);
156 t(ddindx).attribute8 := a21(indx);
157 t(ddindx).attribute9 := a22(indx);
158 t(ddindx).attribute10 := a23(indx);
159 t(ddindx).attribute11 := a24(indx);
160 t(ddindx).attribute12 := a25(indx);
161 t(ddindx).attribute13 := a26(indx);
162 t(ddindx).attribute14 := a27(indx);
163 t(ddindx).attribute15 := a28(indx);
164 t(ddindx).attribute16 := a29(indx);
165 t(ddindx).attribute17 := a30(indx);
166 t(ddindx).attribute18 := a31(indx);
167 t(ddindx).attribute19 := a32(indx);
168 t(ddindx).attribute20 := a33(indx);
169 t(ddindx).attribute21 := a34(indx);
170 t(ddindx).attribute22 := a35(indx);
171 t(ddindx).attribute23 := a36(indx);
172 t(ddindx).attribute24 := a37(indx);
173 t(ddindx).attribute25 := a38(indx);
174 t(ddindx).attribute26 := a39(indx);
175 t(ddindx).attribute27 := a40(indx);
176 t(ddindx).attribute28 := a41(indx);
177 t(ddindx).attribute29 := a42(indx);
178 t(ddindx).attribute30 := a43(indx);
179 t(ddindx).attribute31 := a44(indx);
180 t(ddindx).attribute32 := a45(indx);
181 t(ddindx).attribute33 := a46(indx);
182 t(ddindx).attribute34 := a47(indx);
183 t(ddindx).attribute35 := a48(indx);
184 t(ddindx).attribute36 := a49(indx);
185 t(ddindx).attribute37 := a50(indx);
186 t(ddindx).attribute38 := a51(indx);
187 t(ddindx).attribute39 := a52(indx);
188 t(ddindx).attribute40 := a53(indx);
189 t(ddindx).attribute41 := a54(indx);
190 t(ddindx).attribute42 := a55(indx);
191 t(ddindx).attribute43 := a56(indx);
192 t(ddindx).attribute44 := a57(indx);
193 t(ddindx).attribute45 := a58(indx);
194 t(ddindx).attribute46 := a59(indx);
195 t(ddindx).attribute47 := a60(indx);
196 t(ddindx).attribute48 := a61(indx);
197 t(ddindx).attribute49 := a62(indx);
198 t(ddindx).attribute50 := a63(indx);
199 t(ddindx).attribute51 := a64(indx);
200 t(ddindx).attribute52 := a65(indx);
201 t(ddindx).attribute53 := a66(indx);
202 t(ddindx).attribute54 := a67(indx);
203 t(ddindx).attribute55 := a68(indx);
204 t(ddindx).attribute56 := a69(indx);
205 t(ddindx).attribute57 := a70(indx);
206 t(ddindx).attribute58 := a71(indx);
207 t(ddindx).attribute59 := a72(indx);
208 t(ddindx).attribute60 := a73(indx);
209 t(ddindx).attribute61 := a74(indx);
210 t(ddindx).attribute62 := a75(indx);
211 t(ddindx).attribute63 := a76(indx);
212 t(ddindx).attribute64 := a77(indx);
213 t(ddindx).attribute65 := a78(indx);
214 t(ddindx).attribute66 := a79(indx);
215 t(ddindx).attribute67 := a80(indx);
216 t(ddindx).attribute68 := a81(indx);
217 t(ddindx).attribute69 := a82(indx);
218 t(ddindx).attribute70 := a83(indx);
219 t(ddindx).attribute71 := a84(indx);
220 t(ddindx).attribute72 := a85(indx);
221 t(ddindx).attribute73 := a86(indx);
222 t(ddindx).attribute74 := a87(indx);
223 t(ddindx).attribute75 := a88(indx);
224 t(ddindx).attribute76 := a89(indx);
225 t(ddindx).attribute77 := a90(indx);
226 t(ddindx).attribute78 := a91(indx);
227 t(ddindx).attribute79 := a92(indx);
228 t(ddindx).attribute80 := a93(indx);
229 t(ddindx).attribute81 := a94(indx);
230 t(ddindx).attribute82 := a95(indx);
231 t(ddindx).attribute83 := a96(indx);
232 t(ddindx).attribute84 := a97(indx);
233 t(ddindx).attribute85 := a98(indx);
234 t(ddindx).attribute86 := a99(indx);
235 t(ddindx).attribute87 := a100(indx);
236 t(ddindx).attribute88 := a101(indx);
237 t(ddindx).attribute89 := a102(indx);
238 t(ddindx).attribute90 := a103(indx);
239 t(ddindx).attribute91 := a104(indx);
240 t(ddindx).attribute92 := a105(indx);
241 t(ddindx).attribute93 := a106(indx);
242 t(ddindx).attribute94 := a107(indx);
243 t(ddindx).attribute95 := a108(indx);
244 t(ddindx).attribute96 := a109(indx);
245 t(ddindx).attribute97 := a110(indx);
246 t(ddindx).attribute98 := a111(indx);
247 t(ddindx).attribute99 := a112(indx);
248 t(ddindx).attribute100 := a113(indx);
249 ddindx := ddindx+1;
250 if a0.last =indx
251 then exit;
252 end if;
253 indx := a0.next(indx);
254 end loop;
255 end if;
256 end if;
257 end rosetta_table_copy_in_p1;
258 procedure rosetta_table_copy_out_p1(t cn_un_proc_pub.adj_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
259 , a1 out nocopy JTF_DATE_TABLE
260 , a2 out nocopy JTF_NUMBER_TABLE
261 , a3 out nocopy JTF_DATE_TABLE
262 , a4 out nocopy JTF_DATE_TABLE
263 , a5 out nocopy JTF_DATE_TABLE
264 , a6 out nocopy JTF_VARCHAR2_TABLE_100
265 , a7 out nocopy JTF_VARCHAR2_TABLE_100
266 , a8 out nocopy JTF_VARCHAR2_TABLE_100
267 , a9 out nocopy JTF_VARCHAR2_TABLE_100
268 , a10 out nocopy JTF_VARCHAR2_TABLE_100
269 , a11 out nocopy JTF_NUMBER_TABLE
270 , a12 out nocopy JTF_NUMBER_TABLE
271 , a13 out nocopy JTF_DATE_TABLE
272 , a14 out nocopy JTF_VARCHAR2_TABLE_300
273 , a15 out nocopy JTF_VARCHAR2_TABLE_300
274 , a16 out nocopy JTF_VARCHAR2_TABLE_300
275 , a17 out nocopy JTF_VARCHAR2_TABLE_300
276 , a18 out nocopy JTF_VARCHAR2_TABLE_300
277 , a19 out nocopy JTF_VARCHAR2_TABLE_300
278 , a20 out nocopy JTF_VARCHAR2_TABLE_300
279 , a21 out nocopy JTF_VARCHAR2_TABLE_300
280 , a22 out nocopy JTF_VARCHAR2_TABLE_300
281 , a23 out nocopy JTF_VARCHAR2_TABLE_300
282 , a24 out nocopy JTF_VARCHAR2_TABLE_300
283 , a25 out nocopy JTF_VARCHAR2_TABLE_300
284 , a26 out nocopy JTF_VARCHAR2_TABLE_300
285 , a27 out nocopy JTF_VARCHAR2_TABLE_300
286 , a28 out nocopy JTF_VARCHAR2_TABLE_300
287 , a29 out nocopy JTF_VARCHAR2_TABLE_300
288 , a30 out nocopy JTF_VARCHAR2_TABLE_300
289 , a31 out nocopy JTF_VARCHAR2_TABLE_300
290 , a32 out nocopy JTF_VARCHAR2_TABLE_300
291 , a33 out nocopy JTF_VARCHAR2_TABLE_300
292 , a34 out nocopy JTF_VARCHAR2_TABLE_300
293 , a35 out nocopy JTF_VARCHAR2_TABLE_300
294 , a36 out nocopy JTF_VARCHAR2_TABLE_300
295 , a37 out nocopy JTF_VARCHAR2_TABLE_300
296 , a38 out nocopy JTF_VARCHAR2_TABLE_300
297 , a39 out nocopy JTF_VARCHAR2_TABLE_300
298 , a40 out nocopy JTF_VARCHAR2_TABLE_300
299 , a41 out nocopy JTF_VARCHAR2_TABLE_300
300 , a42 out nocopy JTF_VARCHAR2_TABLE_300
301 , a43 out nocopy JTF_VARCHAR2_TABLE_300
302 , a44 out nocopy JTF_VARCHAR2_TABLE_300
303 , a45 out nocopy JTF_VARCHAR2_TABLE_300
304 , a46 out nocopy JTF_VARCHAR2_TABLE_300
305 , a47 out nocopy JTF_VARCHAR2_TABLE_300
306 , a48 out nocopy JTF_VARCHAR2_TABLE_300
307 , a49 out nocopy JTF_VARCHAR2_TABLE_300
308 , a50 out nocopy JTF_VARCHAR2_TABLE_300
309 , a51 out nocopy JTF_VARCHAR2_TABLE_300
310 , a52 out nocopy JTF_VARCHAR2_TABLE_300
311 , a53 out nocopy JTF_VARCHAR2_TABLE_300
312 , a54 out nocopy JTF_VARCHAR2_TABLE_300
313 , a55 out nocopy JTF_VARCHAR2_TABLE_300
314 , a56 out nocopy JTF_VARCHAR2_TABLE_300
315 , a57 out nocopy JTF_VARCHAR2_TABLE_300
316 , a58 out nocopy JTF_VARCHAR2_TABLE_300
317 , a59 out nocopy JTF_VARCHAR2_TABLE_300
318 , a60 out nocopy JTF_VARCHAR2_TABLE_300
319 , a61 out nocopy JTF_VARCHAR2_TABLE_300
320 , a62 out nocopy JTF_VARCHAR2_TABLE_300
321 , a63 out nocopy JTF_VARCHAR2_TABLE_300
322 , a64 out nocopy JTF_VARCHAR2_TABLE_300
323 , a65 out nocopy JTF_VARCHAR2_TABLE_300
324 , a66 out nocopy JTF_VARCHAR2_TABLE_300
325 , a67 out nocopy JTF_VARCHAR2_TABLE_300
326 , a68 out nocopy JTF_VARCHAR2_TABLE_300
327 , a69 out nocopy JTF_VARCHAR2_TABLE_300
328 , a70 out nocopy JTF_VARCHAR2_TABLE_300
329 , a71 out nocopy JTF_VARCHAR2_TABLE_300
330 , a72 out nocopy JTF_VARCHAR2_TABLE_300
331 , a73 out nocopy JTF_VARCHAR2_TABLE_300
332 , a74 out nocopy JTF_VARCHAR2_TABLE_300
333 , a75 out nocopy JTF_VARCHAR2_TABLE_300
334 , a76 out nocopy JTF_VARCHAR2_TABLE_300
335 , a77 out nocopy JTF_VARCHAR2_TABLE_300
336 , a78 out nocopy JTF_VARCHAR2_TABLE_300
337 , a79 out nocopy JTF_VARCHAR2_TABLE_300
338 , a80 out nocopy JTF_VARCHAR2_TABLE_300
339 , a81 out nocopy JTF_VARCHAR2_TABLE_300
340 , a82 out nocopy JTF_VARCHAR2_TABLE_300
341 , a83 out nocopy JTF_VARCHAR2_TABLE_300
342 , a84 out nocopy JTF_VARCHAR2_TABLE_300
343 , a85 out nocopy JTF_VARCHAR2_TABLE_300
344 , a86 out nocopy JTF_VARCHAR2_TABLE_300
345 , a87 out nocopy JTF_VARCHAR2_TABLE_300
346 , a88 out nocopy JTF_VARCHAR2_TABLE_300
347 , a89 out nocopy JTF_VARCHAR2_TABLE_300
348 , a90 out nocopy JTF_VARCHAR2_TABLE_300
349 , a91 out nocopy JTF_VARCHAR2_TABLE_300
350 , a92 out nocopy JTF_VARCHAR2_TABLE_300
351 , a93 out nocopy JTF_VARCHAR2_TABLE_300
352 , a94 out nocopy JTF_VARCHAR2_TABLE_300
353 , a95 out nocopy JTF_VARCHAR2_TABLE_300
354 , a96 out nocopy JTF_VARCHAR2_TABLE_300
355 , a97 out nocopy JTF_VARCHAR2_TABLE_300
356 , a98 out nocopy JTF_VARCHAR2_TABLE_300
357 , a99 out nocopy JTF_VARCHAR2_TABLE_300
358 , a100 out nocopy JTF_VARCHAR2_TABLE_300
359 , a101 out nocopy JTF_VARCHAR2_TABLE_300
360 , a102 out nocopy JTF_VARCHAR2_TABLE_300
361 , a103 out nocopy JTF_VARCHAR2_TABLE_300
362 , a104 out nocopy JTF_VARCHAR2_TABLE_300
363 , a105 out nocopy JTF_VARCHAR2_TABLE_300
364 , a106 out nocopy JTF_VARCHAR2_TABLE_300
365 , a107 out nocopy JTF_VARCHAR2_TABLE_300
366 , a108 out nocopy JTF_VARCHAR2_TABLE_300
367 , a109 out nocopy JTF_VARCHAR2_TABLE_300
368 , a110 out nocopy JTF_VARCHAR2_TABLE_300
369 , a111 out nocopy JTF_VARCHAR2_TABLE_300
370 , a112 out nocopy JTF_VARCHAR2_TABLE_300
371 , a113 out nocopy JTF_VARCHAR2_TABLE_300
372 ) as
373 ddindx binary_integer; indx binary_integer;
374 begin
375 if t is null or t.count = 0 then
376 a0 := JTF_VARCHAR2_TABLE_100();
377 a1 := JTF_DATE_TABLE();
378 a2 := JTF_NUMBER_TABLE();
379 a3 := JTF_DATE_TABLE();
380 a4 := JTF_DATE_TABLE();
381 a5 := JTF_DATE_TABLE();
382 a6 := JTF_VARCHAR2_TABLE_100();
383 a7 := JTF_VARCHAR2_TABLE_100();
384 a8 := JTF_VARCHAR2_TABLE_100();
385 a9 := JTF_VARCHAR2_TABLE_100();
386 a10 := JTF_VARCHAR2_TABLE_100();
387 a11 := JTF_NUMBER_TABLE();
388 a12 := JTF_NUMBER_TABLE();
389 a13 := JTF_DATE_TABLE();
390 a14 := JTF_VARCHAR2_TABLE_300();
391 a15 := JTF_VARCHAR2_TABLE_300();
392 a16 := JTF_VARCHAR2_TABLE_300();
393 a17 := JTF_VARCHAR2_TABLE_300();
394 a18 := JTF_VARCHAR2_TABLE_300();
395 a19 := JTF_VARCHAR2_TABLE_300();
396 a20 := JTF_VARCHAR2_TABLE_300();
397 a21 := JTF_VARCHAR2_TABLE_300();
398 a22 := JTF_VARCHAR2_TABLE_300();
399 a23 := JTF_VARCHAR2_TABLE_300();
400 a24 := JTF_VARCHAR2_TABLE_300();
401 a25 := JTF_VARCHAR2_TABLE_300();
402 a26 := JTF_VARCHAR2_TABLE_300();
403 a27 := JTF_VARCHAR2_TABLE_300();
404 a28 := JTF_VARCHAR2_TABLE_300();
405 a29 := JTF_VARCHAR2_TABLE_300();
406 a30 := JTF_VARCHAR2_TABLE_300();
407 a31 := JTF_VARCHAR2_TABLE_300();
408 a32 := JTF_VARCHAR2_TABLE_300();
409 a33 := JTF_VARCHAR2_TABLE_300();
410 a34 := JTF_VARCHAR2_TABLE_300();
411 a35 := JTF_VARCHAR2_TABLE_300();
412 a36 := JTF_VARCHAR2_TABLE_300();
413 a37 := JTF_VARCHAR2_TABLE_300();
414 a38 := JTF_VARCHAR2_TABLE_300();
415 a39 := JTF_VARCHAR2_TABLE_300();
416 a40 := JTF_VARCHAR2_TABLE_300();
417 a41 := JTF_VARCHAR2_TABLE_300();
418 a42 := JTF_VARCHAR2_TABLE_300();
419 a43 := JTF_VARCHAR2_TABLE_300();
420 a44 := JTF_VARCHAR2_TABLE_300();
421 a45 := JTF_VARCHAR2_TABLE_300();
422 a46 := JTF_VARCHAR2_TABLE_300();
423 a47 := JTF_VARCHAR2_TABLE_300();
424 a48 := JTF_VARCHAR2_TABLE_300();
425 a49 := JTF_VARCHAR2_TABLE_300();
426 a50 := JTF_VARCHAR2_TABLE_300();
427 a51 := JTF_VARCHAR2_TABLE_300();
428 a52 := JTF_VARCHAR2_TABLE_300();
429 a53 := JTF_VARCHAR2_TABLE_300();
430 a54 := JTF_VARCHAR2_TABLE_300();
431 a55 := JTF_VARCHAR2_TABLE_300();
432 a56 := JTF_VARCHAR2_TABLE_300();
433 a57 := JTF_VARCHAR2_TABLE_300();
434 a58 := JTF_VARCHAR2_TABLE_300();
435 a59 := JTF_VARCHAR2_TABLE_300();
436 a60 := JTF_VARCHAR2_TABLE_300();
437 a61 := JTF_VARCHAR2_TABLE_300();
438 a62 := JTF_VARCHAR2_TABLE_300();
439 a63 := JTF_VARCHAR2_TABLE_300();
440 a64 := JTF_VARCHAR2_TABLE_300();
441 a65 := JTF_VARCHAR2_TABLE_300();
442 a66 := JTF_VARCHAR2_TABLE_300();
443 a67 := JTF_VARCHAR2_TABLE_300();
444 a68 := JTF_VARCHAR2_TABLE_300();
445 a69 := JTF_VARCHAR2_TABLE_300();
446 a70 := JTF_VARCHAR2_TABLE_300();
447 a71 := JTF_VARCHAR2_TABLE_300();
448 a72 := JTF_VARCHAR2_TABLE_300();
449 a73 := JTF_VARCHAR2_TABLE_300();
450 a74 := JTF_VARCHAR2_TABLE_300();
451 a75 := JTF_VARCHAR2_TABLE_300();
452 a76 := JTF_VARCHAR2_TABLE_300();
453 a77 := JTF_VARCHAR2_TABLE_300();
454 a78 := JTF_VARCHAR2_TABLE_300();
455 a79 := JTF_VARCHAR2_TABLE_300();
456 a80 := JTF_VARCHAR2_TABLE_300();
457 a81 := JTF_VARCHAR2_TABLE_300();
458 a82 := JTF_VARCHAR2_TABLE_300();
459 a83 := JTF_VARCHAR2_TABLE_300();
460 a84 := JTF_VARCHAR2_TABLE_300();
461 a85 := JTF_VARCHAR2_TABLE_300();
462 a86 := JTF_VARCHAR2_TABLE_300();
463 a87 := JTF_VARCHAR2_TABLE_300();
464 a88 := JTF_VARCHAR2_TABLE_300();
465 a89 := JTF_VARCHAR2_TABLE_300();
466 a90 := JTF_VARCHAR2_TABLE_300();
467 a91 := JTF_VARCHAR2_TABLE_300();
468 a92 := JTF_VARCHAR2_TABLE_300();
469 a93 := JTF_VARCHAR2_TABLE_300();
470 a94 := JTF_VARCHAR2_TABLE_300();
471 a95 := JTF_VARCHAR2_TABLE_300();
472 a96 := JTF_VARCHAR2_TABLE_300();
473 a97 := JTF_VARCHAR2_TABLE_300();
474 a98 := JTF_VARCHAR2_TABLE_300();
475 a99 := JTF_VARCHAR2_TABLE_300();
476 a100 := JTF_VARCHAR2_TABLE_300();
477 a101 := JTF_VARCHAR2_TABLE_300();
478 a102 := JTF_VARCHAR2_TABLE_300();
479 a103 := JTF_VARCHAR2_TABLE_300();
480 a104 := JTF_VARCHAR2_TABLE_300();
481 a105 := JTF_VARCHAR2_TABLE_300();
482 a106 := JTF_VARCHAR2_TABLE_300();
483 a107 := JTF_VARCHAR2_TABLE_300();
484 a108 := JTF_VARCHAR2_TABLE_300();
485 a109 := JTF_VARCHAR2_TABLE_300();
486 a110 := JTF_VARCHAR2_TABLE_300();
487 a111 := JTF_VARCHAR2_TABLE_300();
488 a112 := JTF_VARCHAR2_TABLE_300();
489 a113 := JTF_VARCHAR2_TABLE_300();
490 else
491 a0 := JTF_VARCHAR2_TABLE_100();
492 a1 := JTF_DATE_TABLE();
493 a2 := JTF_NUMBER_TABLE();
494 a3 := JTF_DATE_TABLE();
495 a4 := JTF_DATE_TABLE();
496 a5 := JTF_DATE_TABLE();
497 a6 := JTF_VARCHAR2_TABLE_100();
498 a7 := JTF_VARCHAR2_TABLE_100();
499 a8 := JTF_VARCHAR2_TABLE_100();
500 a9 := JTF_VARCHAR2_TABLE_100();
501 a10 := JTF_VARCHAR2_TABLE_100();
502 a11 := JTF_NUMBER_TABLE();
503 a12 := JTF_NUMBER_TABLE();
504 a13 := JTF_DATE_TABLE();
505 a14 := JTF_VARCHAR2_TABLE_300();
506 a15 := JTF_VARCHAR2_TABLE_300();
507 a16 := JTF_VARCHAR2_TABLE_300();
508 a17 := JTF_VARCHAR2_TABLE_300();
509 a18 := JTF_VARCHAR2_TABLE_300();
510 a19 := JTF_VARCHAR2_TABLE_300();
511 a20 := JTF_VARCHAR2_TABLE_300();
512 a21 := JTF_VARCHAR2_TABLE_300();
513 a22 := JTF_VARCHAR2_TABLE_300();
514 a23 := JTF_VARCHAR2_TABLE_300();
515 a24 := JTF_VARCHAR2_TABLE_300();
516 a25 := JTF_VARCHAR2_TABLE_300();
517 a26 := JTF_VARCHAR2_TABLE_300();
518 a27 := JTF_VARCHAR2_TABLE_300();
519 a28 := JTF_VARCHAR2_TABLE_300();
520 a29 := JTF_VARCHAR2_TABLE_300();
521 a30 := JTF_VARCHAR2_TABLE_300();
522 a31 := JTF_VARCHAR2_TABLE_300();
523 a32 := JTF_VARCHAR2_TABLE_300();
524 a33 := JTF_VARCHAR2_TABLE_300();
525 a34 := JTF_VARCHAR2_TABLE_300();
526 a35 := JTF_VARCHAR2_TABLE_300();
527 a36 := JTF_VARCHAR2_TABLE_300();
528 a37 := JTF_VARCHAR2_TABLE_300();
529 a38 := JTF_VARCHAR2_TABLE_300();
530 a39 := JTF_VARCHAR2_TABLE_300();
531 a40 := JTF_VARCHAR2_TABLE_300();
532 a41 := JTF_VARCHAR2_TABLE_300();
533 a42 := JTF_VARCHAR2_TABLE_300();
534 a43 := JTF_VARCHAR2_TABLE_300();
535 a44 := JTF_VARCHAR2_TABLE_300();
536 a45 := JTF_VARCHAR2_TABLE_300();
537 a46 := JTF_VARCHAR2_TABLE_300();
538 a47 := JTF_VARCHAR2_TABLE_300();
539 a48 := JTF_VARCHAR2_TABLE_300();
540 a49 := JTF_VARCHAR2_TABLE_300();
541 a50 := JTF_VARCHAR2_TABLE_300();
542 a51 := JTF_VARCHAR2_TABLE_300();
543 a52 := JTF_VARCHAR2_TABLE_300();
544 a53 := JTF_VARCHAR2_TABLE_300();
545 a54 := JTF_VARCHAR2_TABLE_300();
546 a55 := JTF_VARCHAR2_TABLE_300();
547 a56 := JTF_VARCHAR2_TABLE_300();
548 a57 := JTF_VARCHAR2_TABLE_300();
549 a58 := JTF_VARCHAR2_TABLE_300();
550 a59 := JTF_VARCHAR2_TABLE_300();
551 a60 := JTF_VARCHAR2_TABLE_300();
552 a61 := JTF_VARCHAR2_TABLE_300();
553 a62 := JTF_VARCHAR2_TABLE_300();
554 a63 := JTF_VARCHAR2_TABLE_300();
555 a64 := JTF_VARCHAR2_TABLE_300();
556 a65 := JTF_VARCHAR2_TABLE_300();
557 a66 := JTF_VARCHAR2_TABLE_300();
558 a67 := JTF_VARCHAR2_TABLE_300();
559 a68 := JTF_VARCHAR2_TABLE_300();
560 a69 := JTF_VARCHAR2_TABLE_300();
561 a70 := JTF_VARCHAR2_TABLE_300();
562 a71 := JTF_VARCHAR2_TABLE_300();
563 a72 := JTF_VARCHAR2_TABLE_300();
564 a73 := JTF_VARCHAR2_TABLE_300();
565 a74 := JTF_VARCHAR2_TABLE_300();
566 a75 := JTF_VARCHAR2_TABLE_300();
567 a76 := JTF_VARCHAR2_TABLE_300();
568 a77 := JTF_VARCHAR2_TABLE_300();
569 a78 := JTF_VARCHAR2_TABLE_300();
570 a79 := JTF_VARCHAR2_TABLE_300();
571 a80 := JTF_VARCHAR2_TABLE_300();
572 a81 := JTF_VARCHAR2_TABLE_300();
573 a82 := JTF_VARCHAR2_TABLE_300();
574 a83 := JTF_VARCHAR2_TABLE_300();
575 a84 := JTF_VARCHAR2_TABLE_300();
576 a85 := JTF_VARCHAR2_TABLE_300();
577 a86 := JTF_VARCHAR2_TABLE_300();
578 a87 := JTF_VARCHAR2_TABLE_300();
579 a88 := JTF_VARCHAR2_TABLE_300();
580 a89 := JTF_VARCHAR2_TABLE_300();
581 a90 := JTF_VARCHAR2_TABLE_300();
582 a91 := JTF_VARCHAR2_TABLE_300();
583 a92 := JTF_VARCHAR2_TABLE_300();
584 a93 := JTF_VARCHAR2_TABLE_300();
585 a94 := JTF_VARCHAR2_TABLE_300();
586 a95 := JTF_VARCHAR2_TABLE_300();
587 a96 := JTF_VARCHAR2_TABLE_300();
588 a97 := JTF_VARCHAR2_TABLE_300();
589 a98 := JTF_VARCHAR2_TABLE_300();
590 a99 := JTF_VARCHAR2_TABLE_300();
591 a100 := JTF_VARCHAR2_TABLE_300();
592 a101 := JTF_VARCHAR2_TABLE_300();
593 a102 := JTF_VARCHAR2_TABLE_300();
594 a103 := JTF_VARCHAR2_TABLE_300();
595 a104 := JTF_VARCHAR2_TABLE_300();
596 a105 := JTF_VARCHAR2_TABLE_300();
597 a106 := JTF_VARCHAR2_TABLE_300();
598 a107 := JTF_VARCHAR2_TABLE_300();
599 a108 := JTF_VARCHAR2_TABLE_300();
600 a109 := JTF_VARCHAR2_TABLE_300();
601 a110 := JTF_VARCHAR2_TABLE_300();
602 a111 := JTF_VARCHAR2_TABLE_300();
603 a112 := JTF_VARCHAR2_TABLE_300();
604 a113 := JTF_VARCHAR2_TABLE_300();
605 if t.count > 0 then
606 a0.extend(t.count);
607 a1.extend(t.count);
608 a2.extend(t.count);
609 a3.extend(t.count);
610 a4.extend(t.count);
611 a5.extend(t.count);
612 a6.extend(t.count);
613 a7.extend(t.count);
614 a8.extend(t.count);
615 a9.extend(t.count);
616 a10.extend(t.count);
617 a11.extend(t.count);
618 a12.extend(t.count);
619 a13.extend(t.count);
620 a14.extend(t.count);
621 a15.extend(t.count);
622 a16.extend(t.count);
623 a17.extend(t.count);
624 a18.extend(t.count);
625 a19.extend(t.count);
626 a20.extend(t.count);
627 a21.extend(t.count);
628 a22.extend(t.count);
629 a23.extend(t.count);
630 a24.extend(t.count);
631 a25.extend(t.count);
632 a26.extend(t.count);
633 a27.extend(t.count);
634 a28.extend(t.count);
635 a29.extend(t.count);
636 a30.extend(t.count);
637 a31.extend(t.count);
638 a32.extend(t.count);
639 a33.extend(t.count);
640 a34.extend(t.count);
641 a35.extend(t.count);
642 a36.extend(t.count);
643 a37.extend(t.count);
644 a38.extend(t.count);
645 a39.extend(t.count);
646 a40.extend(t.count);
647 a41.extend(t.count);
648 a42.extend(t.count);
649 a43.extend(t.count);
650 a44.extend(t.count);
651 a45.extend(t.count);
652 a46.extend(t.count);
653 a47.extend(t.count);
654 a48.extend(t.count);
655 a49.extend(t.count);
656 a50.extend(t.count);
657 a51.extend(t.count);
658 a52.extend(t.count);
659 a53.extend(t.count);
660 a54.extend(t.count);
661 a55.extend(t.count);
662 a56.extend(t.count);
663 a57.extend(t.count);
664 a58.extend(t.count);
665 a59.extend(t.count);
666 a60.extend(t.count);
667 a61.extend(t.count);
668 a62.extend(t.count);
669 a63.extend(t.count);
670 a64.extend(t.count);
671 a65.extend(t.count);
672 a66.extend(t.count);
673 a67.extend(t.count);
674 a68.extend(t.count);
675 a69.extend(t.count);
676 a70.extend(t.count);
677 a71.extend(t.count);
678 a72.extend(t.count);
679 a73.extend(t.count);
680 a74.extend(t.count);
681 a75.extend(t.count);
682 a76.extend(t.count);
683 a77.extend(t.count);
684 a78.extend(t.count);
685 a79.extend(t.count);
686 a80.extend(t.count);
687 a81.extend(t.count);
688 a82.extend(t.count);
689 a83.extend(t.count);
690 a84.extend(t.count);
691 a85.extend(t.count);
692 a86.extend(t.count);
693 a87.extend(t.count);
694 a88.extend(t.count);
695 a89.extend(t.count);
696 a90.extend(t.count);
697 a91.extend(t.count);
698 a92.extend(t.count);
699 a93.extend(t.count);
700 a94.extend(t.count);
701 a95.extend(t.count);
702 a96.extend(t.count);
703 a97.extend(t.count);
704 a98.extend(t.count);
705 a99.extend(t.count);
706 a100.extend(t.count);
707 a101.extend(t.count);
708 a102.extend(t.count);
709 a103.extend(t.count);
710 a104.extend(t.count);
711 a105.extend(t.count);
712 a106.extend(t.count);
713 a107.extend(t.count);
714 a108.extend(t.count);
715 a109.extend(t.count);
716 a110.extend(t.count);
717 a111.extend(t.count);
718 a112.extend(t.count);
719 a113.extend(t.count);
720 ddindx := t.first;
721 indx := 1;
722 while true loop
723 a0(indx) := t(ddindx).invoice_number;
724 a1(indx) := t(ddindx).invoice_date;
725 a2(indx) := t(ddindx).order_number;
726 a3(indx) := t(ddindx).order_date;
727 a4(indx) := t(ddindx).creation_date;
728 a5(indx) := t(ddindx).processed_date;
729 a6(indx) := t(ddindx).trx_type_disp;
730 a7(indx) := t(ddindx).adjust_status_disp;
731 a8(indx) := t(ddindx).adjusted_by;
732 a9(indx) := t(ddindx).load_status;
733 a10(indx) := t(ddindx).calc_status_disp;
734 a11(indx) := t(ddindx).sales_credit;
735 a12(indx) := t(ddindx).commission;
736 a13(indx) := t(ddindx).adjust_date;
737 a14(indx) := t(ddindx).attribute1;
738 a15(indx) := t(ddindx).attribute2;
739 a16(indx) := t(ddindx).attribute3;
740 a17(indx) := t(ddindx).attribute4;
741 a18(indx) := t(ddindx).attribute5;
742 a19(indx) := t(ddindx).attribute6;
743 a20(indx) := t(ddindx).attribute7;
744 a21(indx) := t(ddindx).attribute8;
745 a22(indx) := t(ddindx).attribute9;
746 a23(indx) := t(ddindx).attribute10;
747 a24(indx) := t(ddindx).attribute11;
748 a25(indx) := t(ddindx).attribute12;
749 a26(indx) := t(ddindx).attribute13;
750 a27(indx) := t(ddindx).attribute14;
751 a28(indx) := t(ddindx).attribute15;
752 a29(indx) := t(ddindx).attribute16;
753 a30(indx) := t(ddindx).attribute17;
754 a31(indx) := t(ddindx).attribute18;
755 a32(indx) := t(ddindx).attribute19;
756 a33(indx) := t(ddindx).attribute20;
757 a34(indx) := t(ddindx).attribute21;
758 a35(indx) := t(ddindx).attribute22;
759 a36(indx) := t(ddindx).attribute23;
760 a37(indx) := t(ddindx).attribute24;
761 a38(indx) := t(ddindx).attribute25;
762 a39(indx) := t(ddindx).attribute26;
763 a40(indx) := t(ddindx).attribute27;
764 a41(indx) := t(ddindx).attribute28;
765 a42(indx) := t(ddindx).attribute29;
766 a43(indx) := t(ddindx).attribute30;
767 a44(indx) := t(ddindx).attribute31;
768 a45(indx) := t(ddindx).attribute32;
769 a46(indx) := t(ddindx).attribute33;
770 a47(indx) := t(ddindx).attribute34;
771 a48(indx) := t(ddindx).attribute35;
772 a49(indx) := t(ddindx).attribute36;
773 a50(indx) := t(ddindx).attribute37;
774 a51(indx) := t(ddindx).attribute38;
775 a52(indx) := t(ddindx).attribute39;
776 a53(indx) := t(ddindx).attribute40;
777 a54(indx) := t(ddindx).attribute41;
778 a55(indx) := t(ddindx).attribute42;
779 a56(indx) := t(ddindx).attribute43;
780 a57(indx) := t(ddindx).attribute44;
781 a58(indx) := t(ddindx).attribute45;
782 a59(indx) := t(ddindx).attribute46;
783 a60(indx) := t(ddindx).attribute47;
784 a61(indx) := t(ddindx).attribute48;
785 a62(indx) := t(ddindx).attribute49;
786 a63(indx) := t(ddindx).attribute50;
787 a64(indx) := t(ddindx).attribute51;
788 a65(indx) := t(ddindx).attribute52;
789 a66(indx) := t(ddindx).attribute53;
790 a67(indx) := t(ddindx).attribute54;
791 a68(indx) := t(ddindx).attribute55;
792 a69(indx) := t(ddindx).attribute56;
793 a70(indx) := t(ddindx).attribute57;
794 a71(indx) := t(ddindx).attribute58;
795 a72(indx) := t(ddindx).attribute59;
796 a73(indx) := t(ddindx).attribute60;
797 a74(indx) := t(ddindx).attribute61;
798 a75(indx) := t(ddindx).attribute62;
799 a76(indx) := t(ddindx).attribute63;
800 a77(indx) := t(ddindx).attribute64;
801 a78(indx) := t(ddindx).attribute65;
802 a79(indx) := t(ddindx).attribute66;
803 a80(indx) := t(ddindx).attribute67;
804 a81(indx) := t(ddindx).attribute68;
805 a82(indx) := t(ddindx).attribute69;
806 a83(indx) := t(ddindx).attribute70;
807 a84(indx) := t(ddindx).attribute71;
808 a85(indx) := t(ddindx).attribute72;
809 a86(indx) := t(ddindx).attribute73;
810 a87(indx) := t(ddindx).attribute74;
811 a88(indx) := t(ddindx).attribute75;
812 a89(indx) := t(ddindx).attribute76;
813 a90(indx) := t(ddindx).attribute77;
814 a91(indx) := t(ddindx).attribute78;
815 a92(indx) := t(ddindx).attribute79;
816 a93(indx) := t(ddindx).attribute80;
817 a94(indx) := t(ddindx).attribute81;
818 a95(indx) := t(ddindx).attribute82;
819 a96(indx) := t(ddindx).attribute83;
820 a97(indx) := t(ddindx).attribute84;
821 a98(indx) := t(ddindx).attribute85;
822 a99(indx) := t(ddindx).attribute86;
823 a100(indx) := t(ddindx).attribute87;
824 a101(indx) := t(ddindx).attribute88;
825 a102(indx) := t(ddindx).attribute89;
826 a103(indx) := t(ddindx).attribute90;
827 a104(indx) := t(ddindx).attribute91;
828 a105(indx) := t(ddindx).attribute92;
829 a106(indx) := t(ddindx).attribute93;
830 a107(indx) := t(ddindx).attribute94;
831 a108(indx) := t(ddindx).attribute95;
832 a109(indx) := t(ddindx).attribute96;
833 a110(indx) := t(ddindx).attribute97;
834 a111(indx) := t(ddindx).attribute98;
835 a112(indx) := t(ddindx).attribute99;
836 a113(indx) := t(ddindx).attribute100;
837 indx := indx+1;
838 if t.last =ddindx
839 then exit;
840 end if;
841 ddindx := t.next(ddindx);
842 end loop;
843 end if;
844 end if;
845 end rosetta_table_copy_out_p1;
846
847 procedure get_adj(p_api_version NUMBER
848 , p_init_msg_list VARCHAR2
849 , p_validation_level VARCHAR2
850 , x_return_status out nocopy VARCHAR2
851 , x_msg_count out nocopy NUMBER
852 , x_msg_data out nocopy VARCHAR2
853 , x_loading_status out nocopy VARCHAR2
854 , p_salesrep_id NUMBER
855 , p_pr_date_from date
856 , p_pr_date_to date
857 , p_invoice_num VARCHAR2
858 , p_order_num NUMBER
859 , p_adjust_status VARCHAR2
860 , p_adjust_date date
861 , p_trx_type VARCHAR2
862 , p_calc_status VARCHAR2
863 , p_load_status VARCHAR2
864 , p_date_pattern date
865 , p_start_record NUMBER
866 , p_increment_count NUMBER
867 , p20_a0 out nocopy JTF_VARCHAR2_TABLE_100
868 , p20_a1 out nocopy JTF_DATE_TABLE
869 , p20_a2 out nocopy JTF_NUMBER_TABLE
870 , p20_a3 out nocopy JTF_DATE_TABLE
871 , p20_a4 out nocopy JTF_DATE_TABLE
872 , p20_a5 out nocopy JTF_DATE_TABLE
873 , p20_a6 out nocopy JTF_VARCHAR2_TABLE_100
874 , p20_a7 out nocopy JTF_VARCHAR2_TABLE_100
875 , p20_a8 out nocopy JTF_VARCHAR2_TABLE_100
876 , p20_a9 out nocopy JTF_VARCHAR2_TABLE_100
877 , p20_a10 out nocopy JTF_VARCHAR2_TABLE_100
878 , p20_a11 out nocopy JTF_NUMBER_TABLE
879 , p20_a12 out nocopy JTF_NUMBER_TABLE
880 , p20_a13 out nocopy JTF_DATE_TABLE
881 , p20_a14 out nocopy JTF_VARCHAR2_TABLE_300
882 , p20_a15 out nocopy JTF_VARCHAR2_TABLE_300
883 , p20_a16 out nocopy JTF_VARCHAR2_TABLE_300
884 , p20_a17 out nocopy JTF_VARCHAR2_TABLE_300
885 , p20_a18 out nocopy JTF_VARCHAR2_TABLE_300
886 , p20_a19 out nocopy JTF_VARCHAR2_TABLE_300
887 , p20_a20 out nocopy JTF_VARCHAR2_TABLE_300
888 , p20_a21 out nocopy JTF_VARCHAR2_TABLE_300
889 , p20_a22 out nocopy JTF_VARCHAR2_TABLE_300
890 , p20_a23 out nocopy JTF_VARCHAR2_TABLE_300
891 , p20_a24 out nocopy JTF_VARCHAR2_TABLE_300
892 , p20_a25 out nocopy JTF_VARCHAR2_TABLE_300
893 , p20_a26 out nocopy JTF_VARCHAR2_TABLE_300
894 , p20_a27 out nocopy JTF_VARCHAR2_TABLE_300
895 , p20_a28 out nocopy JTF_VARCHAR2_TABLE_300
896 , p20_a29 out nocopy JTF_VARCHAR2_TABLE_300
897 , p20_a30 out nocopy JTF_VARCHAR2_TABLE_300
898 , p20_a31 out nocopy JTF_VARCHAR2_TABLE_300
899 , p20_a32 out nocopy JTF_VARCHAR2_TABLE_300
900 , p20_a33 out nocopy JTF_VARCHAR2_TABLE_300
901 , p20_a34 out nocopy JTF_VARCHAR2_TABLE_300
902 , p20_a35 out nocopy JTF_VARCHAR2_TABLE_300
903 , p20_a36 out nocopy JTF_VARCHAR2_TABLE_300
904 , p20_a37 out nocopy JTF_VARCHAR2_TABLE_300
905 , p20_a38 out nocopy JTF_VARCHAR2_TABLE_300
906 , p20_a39 out nocopy JTF_VARCHAR2_TABLE_300
907 , p20_a40 out nocopy JTF_VARCHAR2_TABLE_300
908 , p20_a41 out nocopy JTF_VARCHAR2_TABLE_300
909 , p20_a42 out nocopy JTF_VARCHAR2_TABLE_300
910 , p20_a43 out nocopy JTF_VARCHAR2_TABLE_300
911 , p20_a44 out nocopy JTF_VARCHAR2_TABLE_300
912 , p20_a45 out nocopy JTF_VARCHAR2_TABLE_300
913 , p20_a46 out nocopy JTF_VARCHAR2_TABLE_300
914 , p20_a47 out nocopy JTF_VARCHAR2_TABLE_300
915 , p20_a48 out nocopy JTF_VARCHAR2_TABLE_300
916 , p20_a49 out nocopy JTF_VARCHAR2_TABLE_300
917 , p20_a50 out nocopy JTF_VARCHAR2_TABLE_300
918 , p20_a51 out nocopy JTF_VARCHAR2_TABLE_300
919 , p20_a52 out nocopy JTF_VARCHAR2_TABLE_300
920 , p20_a53 out nocopy JTF_VARCHAR2_TABLE_300
921 , p20_a54 out nocopy JTF_VARCHAR2_TABLE_300
922 , p20_a55 out nocopy JTF_VARCHAR2_TABLE_300
923 , p20_a56 out nocopy JTF_VARCHAR2_TABLE_300
924 , p20_a57 out nocopy JTF_VARCHAR2_TABLE_300
925 , p20_a58 out nocopy JTF_VARCHAR2_TABLE_300
926 , p20_a59 out nocopy JTF_VARCHAR2_TABLE_300
927 , p20_a60 out nocopy JTF_VARCHAR2_TABLE_300
928 , p20_a61 out nocopy JTF_VARCHAR2_TABLE_300
929 , p20_a62 out nocopy JTF_VARCHAR2_TABLE_300
930 , p20_a63 out nocopy JTF_VARCHAR2_TABLE_300
931 , p20_a64 out nocopy JTF_VARCHAR2_TABLE_300
932 , p20_a65 out nocopy JTF_VARCHAR2_TABLE_300
933 , p20_a66 out nocopy JTF_VARCHAR2_TABLE_300
934 , p20_a67 out nocopy JTF_VARCHAR2_TABLE_300
935 , p20_a68 out nocopy JTF_VARCHAR2_TABLE_300
936 , p20_a69 out nocopy JTF_VARCHAR2_TABLE_300
937 , p20_a70 out nocopy JTF_VARCHAR2_TABLE_300
938 , p20_a71 out nocopy JTF_VARCHAR2_TABLE_300
939 , p20_a72 out nocopy JTF_VARCHAR2_TABLE_300
940 , p20_a73 out nocopy JTF_VARCHAR2_TABLE_300
941 , p20_a74 out nocopy JTF_VARCHAR2_TABLE_300
942 , p20_a75 out nocopy JTF_VARCHAR2_TABLE_300
943 , p20_a76 out nocopy JTF_VARCHAR2_TABLE_300
944 , p20_a77 out nocopy JTF_VARCHAR2_TABLE_300
945 , p20_a78 out nocopy JTF_VARCHAR2_TABLE_300
946 , p20_a79 out nocopy JTF_VARCHAR2_TABLE_300
947 , p20_a80 out nocopy JTF_VARCHAR2_TABLE_300
948 , p20_a81 out nocopy JTF_VARCHAR2_TABLE_300
949 , p20_a82 out nocopy JTF_VARCHAR2_TABLE_300
950 , p20_a83 out nocopy JTF_VARCHAR2_TABLE_300
951 , p20_a84 out nocopy JTF_VARCHAR2_TABLE_300
952 , p20_a85 out nocopy JTF_VARCHAR2_TABLE_300
953 , p20_a86 out nocopy JTF_VARCHAR2_TABLE_300
954 , p20_a87 out nocopy JTF_VARCHAR2_TABLE_300
955 , p20_a88 out nocopy JTF_VARCHAR2_TABLE_300
956 , p20_a89 out nocopy JTF_VARCHAR2_TABLE_300
957 , p20_a90 out nocopy JTF_VARCHAR2_TABLE_300
958 , p20_a91 out nocopy JTF_VARCHAR2_TABLE_300
959 , p20_a92 out nocopy JTF_VARCHAR2_TABLE_300
960 , p20_a93 out nocopy JTF_VARCHAR2_TABLE_300
961 , p20_a94 out nocopy JTF_VARCHAR2_TABLE_300
962 , p20_a95 out nocopy JTF_VARCHAR2_TABLE_300
963 , p20_a96 out nocopy JTF_VARCHAR2_TABLE_300
964 , p20_a97 out nocopy JTF_VARCHAR2_TABLE_300
965 , p20_a98 out nocopy JTF_VARCHAR2_TABLE_300
966 , p20_a99 out nocopy JTF_VARCHAR2_TABLE_300
967 , p20_a100 out nocopy JTF_VARCHAR2_TABLE_300
968 , p20_a101 out nocopy JTF_VARCHAR2_TABLE_300
969 , p20_a102 out nocopy JTF_VARCHAR2_TABLE_300
970 , p20_a103 out nocopy JTF_VARCHAR2_TABLE_300
971 , p20_a104 out nocopy JTF_VARCHAR2_TABLE_300
972 , p20_a105 out nocopy JTF_VARCHAR2_TABLE_300
973 , p20_a106 out nocopy JTF_VARCHAR2_TABLE_300
974 , p20_a107 out nocopy JTF_VARCHAR2_TABLE_300
975 , p20_a108 out nocopy JTF_VARCHAR2_TABLE_300
976 , p20_a109 out nocopy JTF_VARCHAR2_TABLE_300
977 , p20_a110 out nocopy JTF_VARCHAR2_TABLE_300
978 , p20_a111 out nocopy JTF_VARCHAR2_TABLE_300
979 , p20_a112 out nocopy JTF_VARCHAR2_TABLE_300
980 , p20_a113 out nocopy JTF_VARCHAR2_TABLE_300
981 , x_adj_count out nocopy NUMBER
982 , x_total_sales_credit out nocopy NUMBER
983 , x_total_commission out nocopy NUMBER
984 )
985
986 as
987 ddp_pr_date_from date;
988 ddp_pr_date_to date;
989 ddp_adjust_date date;
990 ddp_date_pattern date;
991 ddx_adj_tbl cn_un_proc_pub.adj_tbl_type;
992 ddindx binary_integer; indx binary_integer;
993 begin
994
995 -- copy data to the local IN or IN-OUT args, if any
996
997
998
999
1000
1001
1002
1003
1004 ddp_pr_date_from := rosetta_g_miss_date_in_map(p_pr_date_from);
1005
1006 ddp_pr_date_to := rosetta_g_miss_date_in_map(p_pr_date_to);
1007
1008
1009
1010
1011 ddp_adjust_date := rosetta_g_miss_date_in_map(p_adjust_date);
1012
1013
1014
1015
1016 ddp_date_pattern := rosetta_g_miss_date_in_map(p_date_pattern);
1017
1018
1019
1020
1021
1022
1023
1024 -- here's the delegated call to the old PL/SQL routine
1025 cn_un_proc_pub.get_adj(p_api_version,
1026 p_init_msg_list,
1027 p_validation_level,
1028 x_return_status,
1029 x_msg_count,
1030 x_msg_data,
1031 x_loading_status,
1032 p_salesrep_id,
1033 ddp_pr_date_from,
1034 ddp_pr_date_to,
1035 p_invoice_num,
1036 p_order_num,
1037 p_adjust_status,
1038 ddp_adjust_date,
1039 p_trx_type,
1040 p_calc_status,
1041 p_load_status,
1042 ddp_date_pattern,
1043 p_start_record,
1044 p_increment_count,
1045 ddx_adj_tbl,
1046 x_adj_count,
1047 x_total_sales_credit,
1048 x_total_commission);
1049
1050 -- copy data back from the local variables to OUT or IN-OUT args, if any
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071 cn_un_proc_pub_w.rosetta_table_copy_out_p1(ddx_adj_tbl, p20_a0
1072 , p20_a1
1073 , p20_a2
1074 , p20_a3
1075 , p20_a4
1076 , p20_a5
1077 , p20_a6
1078 , p20_a7
1079 , p20_a8
1080 , p20_a9
1081 , p20_a10
1082 , p20_a11
1083 , p20_a12
1084 , p20_a13
1085 , p20_a14
1086 , p20_a15
1087 , p20_a16
1088 , p20_a17
1089 , p20_a18
1090 , p20_a19
1091 , p20_a20
1092 , p20_a21
1093 , p20_a22
1094 , p20_a23
1095 , p20_a24
1096 , p20_a25
1097 , p20_a26
1098 , p20_a27
1099 , p20_a28
1100 , p20_a29
1101 , p20_a30
1102 , p20_a31
1103 , p20_a32
1104 , p20_a33
1105 , p20_a34
1106 , p20_a35
1107 , p20_a36
1108 , p20_a37
1109 , p20_a38
1110 , p20_a39
1111 , p20_a40
1112 , p20_a41
1113 , p20_a42
1114 , p20_a43
1115 , p20_a44
1116 , p20_a45
1117 , p20_a46
1118 , p20_a47
1119 , p20_a48
1120 , p20_a49
1121 , p20_a50
1122 , p20_a51
1123 , p20_a52
1124 , p20_a53
1125 , p20_a54
1126 , p20_a55
1127 , p20_a56
1128 , p20_a57
1129 , p20_a58
1130 , p20_a59
1131 , p20_a60
1132 , p20_a61
1133 , p20_a62
1134 , p20_a63
1135 , p20_a64
1136 , p20_a65
1137 , p20_a66
1138 , p20_a67
1139 , p20_a68
1140 , p20_a69
1141 , p20_a70
1142 , p20_a71
1143 , p20_a72
1144 , p20_a73
1145 , p20_a74
1146 , p20_a75
1147 , p20_a76
1148 , p20_a77
1149 , p20_a78
1150 , p20_a79
1151 , p20_a80
1152 , p20_a81
1153 , p20_a82
1154 , p20_a83
1155 , p20_a84
1156 , p20_a85
1157 , p20_a86
1158 , p20_a87
1159 , p20_a88
1160 , p20_a89
1161 , p20_a90
1162 , p20_a91
1163 , p20_a92
1164 , p20_a93
1165 , p20_a94
1166 , p20_a95
1167 , p20_a96
1168 , p20_a97
1169 , p20_a98
1170 , p20_a99
1171 , p20_a100
1172 , p20_a101
1173 , p20_a102
1174 , p20_a103
1175 , p20_a104
1176 , p20_a105
1177 , p20_a106
1178 , p20_a107
1179 , p20_a108
1180 , p20_a109
1181 , p20_a110
1182 , p20_a111
1183 , p20_a112
1184 , p20_a113
1185 );
1186
1187
1188
1189 end;
1190
1191 end cn_un_proc_pub_w;