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