DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_BTC_PVT_W

Source


1 package body okl_btc_pvt_w as
2   /* $Header: OKLEBTCB.pls 120.4 2007/09/28 06:49:11 varangan 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   function rosetta_g_miss_num_map(n number) return number as
17     a number := fnd_api.g_miss_num;
18     b number := 0-1962.0724;
19   begin
20     if n=a then return b; end if;
21     if n=b then return a; end if;
22     return n;
23   end;
24 
25   procedure rosetta_table_copy_in_p2(t out nocopy okl_btc_pvt.btc_tbl_type, a0 JTF_NUMBER_TABLE
26     , a1 JTF_NUMBER_TABLE
27     , a2 JTF_DATE_TABLE
28     , a3 JTF_DATE_TABLE
29     , a4 JTF_DATE_TABLE
30     , a5 JTF_NUMBER_TABLE
31     , a6 JTF_NUMBER_TABLE
32     , a7 JTF_VARCHAR2_TABLE_100
33     , a8 JTF_NUMBER_TABLE
34     , a9 JTF_NUMBER_TABLE
35     , a10 JTF_NUMBER_TABLE
36     , a11 JTF_NUMBER_TABLE
37     , a12 JTF_DATE_TABLE
38     , a13 JTF_NUMBER_TABLE
39     , a14 JTF_VARCHAR2_TABLE_100
40     , a15 JTF_VARCHAR2_TABLE_500
41     , a16 JTF_VARCHAR2_TABLE_500
42     , a17 JTF_VARCHAR2_TABLE_500
43     , a18 JTF_VARCHAR2_TABLE_500
44     , a19 JTF_VARCHAR2_TABLE_500
45     , a20 JTF_VARCHAR2_TABLE_500
46     , a21 JTF_VARCHAR2_TABLE_500
47     , a22 JTF_VARCHAR2_TABLE_500
48     , a23 JTF_VARCHAR2_TABLE_500
49     , a24 JTF_VARCHAR2_TABLE_500
50     , a25 JTF_VARCHAR2_TABLE_500
51     , a26 JTF_VARCHAR2_TABLE_500
52     , a27 JTF_VARCHAR2_TABLE_500
53     , a28 JTF_VARCHAR2_TABLE_500
54     , a29 JTF_VARCHAR2_TABLE_500
55     , a30 JTF_NUMBER_TABLE
56     , a31 JTF_DATE_TABLE
57     , a32 JTF_NUMBER_TABLE
58     , a33 JTF_DATE_TABLE
59     , a34 JTF_NUMBER_TABLE
60     , a35 JTF_VARCHAR2_TABLE_100
61     , a36 JTF_VARCHAR2_TABLE_100
62     , a37 JTF_NUMBER_TABLE
63     , a38 JTF_DATE_TABLE
64     , a39 JTF_NUMBER_TABLE
65     ) as
66     ddindx binary_integer; indx binary_integer;
67   begin
68   if a0 is not null and a0.count > 0 then
69       if a0.count > 0 then
70         indx := a0.first;
71         ddindx := 1;
72         while true loop
73           t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
74           t(ddindx).object_version_number := rosetta_g_miss_num_map(a1(indx));
75           t(ddindx).date_entered := rosetta_g_miss_date_in_map(a2(indx));
76           t(ddindx).date_gl_requested := rosetta_g_miss_date_in_map(a3(indx));
77           t(ddindx).date_deposit := rosetta_g_miss_date_in_map(a4(indx));
78           t(ddindx).batch_qty := rosetta_g_miss_num_map(a5(indx));
79           t(ddindx).batch_total := rosetta_g_miss_num_map(a6(indx));
80           t(ddindx).batch_currency := a7(indx);
81           t(ddindx).irm_id := rosetta_g_miss_num_map(a8(indx));
82           t(ddindx).request_id := rosetta_g_miss_num_map(a9(indx));
83           t(ddindx).program_application_id := rosetta_g_miss_num_map(a10(indx));
84           t(ddindx).program_id := rosetta_g_miss_num_map(a11(indx));
85           t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a12(indx));
86           t(ddindx).org_id := rosetta_g_miss_num_map(a13(indx));
87           t(ddindx).attribute_category := a14(indx);
88           t(ddindx).attribute1 := a15(indx);
89           t(ddindx).attribute2 := a16(indx);
90           t(ddindx).attribute3 := a17(indx);
91           t(ddindx).attribute4 := a18(indx);
92           t(ddindx).attribute5 := a19(indx);
93           t(ddindx).attribute6 := a20(indx);
94           t(ddindx).attribute7 := a21(indx);
95           t(ddindx).attribute8 := a22(indx);
96           t(ddindx).attribute9 := a23(indx);
97           t(ddindx).attribute10 := a24(indx);
98           t(ddindx).attribute11 := a25(indx);
99           t(ddindx).attribute12 := a26(indx);
100           t(ddindx).attribute13 := a27(indx);
101           t(ddindx).attribute14 := a28(indx);
102           t(ddindx).attribute15 := a29(indx);
103           t(ddindx).created_by := rosetta_g_miss_num_map(a30(indx));
104           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a31(indx));
105           t(ddindx).last_updated_by := rosetta_g_miss_num_map(a32(indx));
106           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a33(indx));
107           t(ddindx).last_update_login := rosetta_g_miss_num_map(a34(indx));
108           t(ddindx).trx_status_code := a35(indx);
109           t(ddindx).currency_conversion_type := a36(indx);
110           t(ddindx).currency_conversion_rate := rosetta_g_miss_num_map(a37(indx));
111           t(ddindx).currency_conversion_date := rosetta_g_miss_date_in_map(a38(indx));
112           t(ddindx).remit_bank_id := rosetta_g_miss_num_map(a39(indx));
113           ddindx := ddindx+1;
114           if a0.last =indx
115             then exit;
116           end if;
117           indx := a0.next(indx);
118         end loop;
119       end if;
120    end if;
121   end rosetta_table_copy_in_p2;
122   procedure rosetta_table_copy_out_p2(t okl_btc_pvt.btc_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
123     , a1 out nocopy JTF_NUMBER_TABLE
124     , a2 out nocopy JTF_DATE_TABLE
125     , a3 out nocopy JTF_DATE_TABLE
126     , a4 out nocopy JTF_DATE_TABLE
127     , a5 out nocopy JTF_NUMBER_TABLE
128     , a6 out nocopy JTF_NUMBER_TABLE
129     , a7 out nocopy JTF_VARCHAR2_TABLE_100
130     , a8 out nocopy JTF_NUMBER_TABLE
131     , a9 out nocopy JTF_NUMBER_TABLE
132     , a10 out nocopy JTF_NUMBER_TABLE
133     , a11 out nocopy JTF_NUMBER_TABLE
134     , a12 out nocopy JTF_DATE_TABLE
135     , a13 out nocopy JTF_NUMBER_TABLE
136     , a14 out nocopy JTF_VARCHAR2_TABLE_100
137     , a15 out nocopy JTF_VARCHAR2_TABLE_500
138     , a16 out nocopy JTF_VARCHAR2_TABLE_500
139     , a17 out nocopy JTF_VARCHAR2_TABLE_500
140     , a18 out nocopy JTF_VARCHAR2_TABLE_500
141     , a19 out nocopy JTF_VARCHAR2_TABLE_500
142     , a20 out nocopy JTF_VARCHAR2_TABLE_500
143     , a21 out nocopy JTF_VARCHAR2_TABLE_500
144     , a22 out nocopy JTF_VARCHAR2_TABLE_500
145     , a23 out nocopy JTF_VARCHAR2_TABLE_500
146     , a24 out nocopy JTF_VARCHAR2_TABLE_500
147     , a25 out nocopy JTF_VARCHAR2_TABLE_500
148     , a26 out nocopy JTF_VARCHAR2_TABLE_500
149     , a27 out nocopy JTF_VARCHAR2_TABLE_500
150     , a28 out nocopy JTF_VARCHAR2_TABLE_500
151     , a29 out nocopy JTF_VARCHAR2_TABLE_500
152     , a30 out nocopy JTF_NUMBER_TABLE
153     , a31 out nocopy JTF_DATE_TABLE
154     , a32 out nocopy JTF_NUMBER_TABLE
155     , a33 out nocopy JTF_DATE_TABLE
156     , a34 out nocopy JTF_NUMBER_TABLE
157     , a35 out nocopy JTF_VARCHAR2_TABLE_100
158     , a36 out nocopy JTF_VARCHAR2_TABLE_100
159     , a37 out nocopy JTF_NUMBER_TABLE
160     , a38 out nocopy JTF_DATE_TABLE
161     , a39 out nocopy JTF_NUMBER_TABLE
162     ) as
163     ddindx binary_integer; indx binary_integer;
164   begin
165   if t is null or t.count = 0 then
166     a0 := JTF_NUMBER_TABLE();
167     a1 := JTF_NUMBER_TABLE();
168     a2 := JTF_DATE_TABLE();
169     a3 := JTF_DATE_TABLE();
170     a4 := JTF_DATE_TABLE();
171     a5 := JTF_NUMBER_TABLE();
172     a6 := JTF_NUMBER_TABLE();
173     a7 := JTF_VARCHAR2_TABLE_100();
174     a8 := JTF_NUMBER_TABLE();
175     a9 := JTF_NUMBER_TABLE();
176     a10 := JTF_NUMBER_TABLE();
177     a11 := JTF_NUMBER_TABLE();
178     a12 := JTF_DATE_TABLE();
179     a13 := JTF_NUMBER_TABLE();
180     a14 := JTF_VARCHAR2_TABLE_100();
181     a15 := JTF_VARCHAR2_TABLE_500();
182     a16 := JTF_VARCHAR2_TABLE_500();
183     a17 := JTF_VARCHAR2_TABLE_500();
184     a18 := JTF_VARCHAR2_TABLE_500();
185     a19 := JTF_VARCHAR2_TABLE_500();
186     a20 := JTF_VARCHAR2_TABLE_500();
187     a21 := JTF_VARCHAR2_TABLE_500();
188     a22 := JTF_VARCHAR2_TABLE_500();
189     a23 := JTF_VARCHAR2_TABLE_500();
190     a24 := JTF_VARCHAR2_TABLE_500();
191     a25 := JTF_VARCHAR2_TABLE_500();
192     a26 := JTF_VARCHAR2_TABLE_500();
193     a27 := JTF_VARCHAR2_TABLE_500();
194     a28 := JTF_VARCHAR2_TABLE_500();
195     a29 := JTF_VARCHAR2_TABLE_500();
196     a30 := JTF_NUMBER_TABLE();
197     a31 := JTF_DATE_TABLE();
198     a32 := JTF_NUMBER_TABLE();
199     a33 := JTF_DATE_TABLE();
200     a34 := JTF_NUMBER_TABLE();
201     a35 := JTF_VARCHAR2_TABLE_100();
202     a36 := JTF_VARCHAR2_TABLE_100();
203     a37 := JTF_NUMBER_TABLE();
204     a38 := JTF_DATE_TABLE();
205     a39 := JTF_NUMBER_TABLE();
206   else
207       a0 := JTF_NUMBER_TABLE();
208       a1 := JTF_NUMBER_TABLE();
209       a2 := JTF_DATE_TABLE();
210       a3 := JTF_DATE_TABLE();
211       a4 := JTF_DATE_TABLE();
212       a5 := JTF_NUMBER_TABLE();
213       a6 := JTF_NUMBER_TABLE();
214       a7 := JTF_VARCHAR2_TABLE_100();
215       a8 := JTF_NUMBER_TABLE();
216       a9 := JTF_NUMBER_TABLE();
217       a10 := JTF_NUMBER_TABLE();
218       a11 := JTF_NUMBER_TABLE();
219       a12 := JTF_DATE_TABLE();
220       a13 := JTF_NUMBER_TABLE();
221       a14 := JTF_VARCHAR2_TABLE_100();
222       a15 := JTF_VARCHAR2_TABLE_500();
223       a16 := JTF_VARCHAR2_TABLE_500();
224       a17 := JTF_VARCHAR2_TABLE_500();
225       a18 := JTF_VARCHAR2_TABLE_500();
226       a19 := JTF_VARCHAR2_TABLE_500();
227       a20 := JTF_VARCHAR2_TABLE_500();
228       a21 := JTF_VARCHAR2_TABLE_500();
229       a22 := JTF_VARCHAR2_TABLE_500();
230       a23 := JTF_VARCHAR2_TABLE_500();
231       a24 := JTF_VARCHAR2_TABLE_500();
232       a25 := JTF_VARCHAR2_TABLE_500();
233       a26 := JTF_VARCHAR2_TABLE_500();
234       a27 := JTF_VARCHAR2_TABLE_500();
235       a28 := JTF_VARCHAR2_TABLE_500();
236       a29 := JTF_VARCHAR2_TABLE_500();
237       a30 := JTF_NUMBER_TABLE();
238       a31 := JTF_DATE_TABLE();
239       a32 := JTF_NUMBER_TABLE();
240       a33 := JTF_DATE_TABLE();
241       a34 := JTF_NUMBER_TABLE();
242       a35 := JTF_VARCHAR2_TABLE_100();
243       a36 := JTF_VARCHAR2_TABLE_100();
244       a37 := JTF_NUMBER_TABLE();
245       a38 := JTF_DATE_TABLE();
246       a39 := JTF_NUMBER_TABLE();
247       if t.count > 0 then
248         a0.extend(t.count);
249         a1.extend(t.count);
250         a2.extend(t.count);
251         a3.extend(t.count);
252         a4.extend(t.count);
253         a5.extend(t.count);
254         a6.extend(t.count);
255         a7.extend(t.count);
256         a8.extend(t.count);
257         a9.extend(t.count);
258         a10.extend(t.count);
259         a11.extend(t.count);
260         a12.extend(t.count);
261         a13.extend(t.count);
262         a14.extend(t.count);
263         a15.extend(t.count);
264         a16.extend(t.count);
265         a17.extend(t.count);
266         a18.extend(t.count);
267         a19.extend(t.count);
268         a20.extend(t.count);
269         a21.extend(t.count);
270         a22.extend(t.count);
271         a23.extend(t.count);
272         a24.extend(t.count);
273         a25.extend(t.count);
274         a26.extend(t.count);
275         a27.extend(t.count);
276         a28.extend(t.count);
277         a29.extend(t.count);
278         a30.extend(t.count);
279         a31.extend(t.count);
280         a32.extend(t.count);
281         a33.extend(t.count);
282         a34.extend(t.count);
283         a35.extend(t.count);
284         a36.extend(t.count);
285         a37.extend(t.count);
286         a38.extend(t.count);
287         a39.extend(t.count);
288         ddindx := t.first;
289         indx := 1;
290         while true loop
291           a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
292           a1(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
293           a2(indx) := t(ddindx).date_entered;
294           a3(indx) := t(ddindx).date_gl_requested;
295           a4(indx) := t(ddindx).date_deposit;
296           a5(indx) := rosetta_g_miss_num_map(t(ddindx).batch_qty);
297           a6(indx) := rosetta_g_miss_num_map(t(ddindx).batch_total);
298           a7(indx) := t(ddindx).batch_currency;
299           a8(indx) := rosetta_g_miss_num_map(t(ddindx).irm_id);
300           a9(indx) := rosetta_g_miss_num_map(t(ddindx).request_id);
301           a10(indx) := rosetta_g_miss_num_map(t(ddindx).program_application_id);
302           a11(indx) := rosetta_g_miss_num_map(t(ddindx).program_id);
303           a12(indx) := t(ddindx).program_update_date;
304           a13(indx) := rosetta_g_miss_num_map(t(ddindx).org_id);
305           a14(indx) := t(ddindx).attribute_category;
306           a15(indx) := t(ddindx).attribute1;
307           a16(indx) := t(ddindx).attribute2;
308           a17(indx) := t(ddindx).attribute3;
309           a18(indx) := t(ddindx).attribute4;
310           a19(indx) := t(ddindx).attribute5;
311           a20(indx) := t(ddindx).attribute6;
312           a21(indx) := t(ddindx).attribute7;
313           a22(indx) := t(ddindx).attribute8;
314           a23(indx) := t(ddindx).attribute9;
315           a24(indx) := t(ddindx).attribute10;
316           a25(indx) := t(ddindx).attribute11;
317           a26(indx) := t(ddindx).attribute12;
318           a27(indx) := t(ddindx).attribute13;
319           a28(indx) := t(ddindx).attribute14;
320           a29(indx) := t(ddindx).attribute15;
321           a30(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
322           a31(indx) := t(ddindx).creation_date;
323           a32(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
324           a33(indx) := t(ddindx).last_update_date;
325           a34(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
326           a35(indx) := t(ddindx).trx_status_code;
327           a36(indx) := t(ddindx).currency_conversion_type;
328           a37(indx) := rosetta_g_miss_num_map(t(ddindx).currency_conversion_rate);
329           a38(indx) := t(ddindx).currency_conversion_date;
330           a39(indx) := rosetta_g_miss_num_map(t(ddindx).remit_bank_id);
331           indx := indx+1;
332           if t.last =ddindx
333             then exit;
334           end if;
335           ddindx := t.next(ddindx);
336         end loop;
337       end if;
338    end if;
339   end rosetta_table_copy_out_p2;
340 
341   procedure rosetta_table_copy_in_p5(t out nocopy okl_btc_pvt.okl_trx_csh_batch_tl_tbl_type, a0 JTF_NUMBER_TABLE
342     , a1 JTF_VARCHAR2_TABLE_100
343     , a2 JTF_VARCHAR2_TABLE_100
344     , a3 JTF_VARCHAR2_TABLE_100
345     , a4 JTF_VARCHAR2_TABLE_200
346     , a5 JTF_VARCHAR2_TABLE_2000
347     , a6 JTF_NUMBER_TABLE
348     , a7 JTF_DATE_TABLE
349     , a8 JTF_NUMBER_TABLE
350     , a9 JTF_DATE_TABLE
351     , a10 JTF_NUMBER_TABLE
352     ) as
353     ddindx binary_integer; indx binary_integer;
354   begin
355   if a0 is not null and a0.count > 0 then
356       if a0.count > 0 then
357         indx := a0.first;
358         ddindx := 1;
359         while true loop
360           t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
361           t(ddindx).language := a1(indx);
362           t(ddindx).source_lang := a2(indx);
363           t(ddindx).sfwt_flag := a3(indx);
364           t(ddindx).name := a4(indx);
365           t(ddindx).description := a5(indx);
366           t(ddindx).created_by := rosetta_g_miss_num_map(a6(indx));
367           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a7(indx));
368           t(ddindx).last_updated_by := rosetta_g_miss_num_map(a8(indx));
369           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a9(indx));
370           t(ddindx).last_update_login := rosetta_g_miss_num_map(a10(indx));
371           ddindx := ddindx+1;
372           if a0.last =indx
373             then exit;
374           end if;
375           indx := a0.next(indx);
376         end loop;
377       end if;
378    end if;
379   end rosetta_table_copy_in_p5;
380   procedure rosetta_table_copy_out_p5(t okl_btc_pvt.okl_trx_csh_batch_tl_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
381     , a1 out nocopy JTF_VARCHAR2_TABLE_100
382     , a2 out nocopy JTF_VARCHAR2_TABLE_100
383     , a3 out nocopy JTF_VARCHAR2_TABLE_100
384     , a4 out nocopy JTF_VARCHAR2_TABLE_200
385     , a5 out nocopy JTF_VARCHAR2_TABLE_2000
386     , a6 out nocopy JTF_NUMBER_TABLE
387     , a7 out nocopy JTF_DATE_TABLE
388     , a8 out nocopy JTF_NUMBER_TABLE
389     , a9 out nocopy JTF_DATE_TABLE
390     , a10 out nocopy JTF_NUMBER_TABLE
391     ) as
392     ddindx binary_integer; indx binary_integer;
393   begin
394   if t is null or t.count = 0 then
395     a0 := JTF_NUMBER_TABLE();
396     a1 := JTF_VARCHAR2_TABLE_100();
397     a2 := JTF_VARCHAR2_TABLE_100();
398     a3 := JTF_VARCHAR2_TABLE_100();
399     a4 := JTF_VARCHAR2_TABLE_200();
400     a5 := JTF_VARCHAR2_TABLE_2000();
401     a6 := JTF_NUMBER_TABLE();
402     a7 := JTF_DATE_TABLE();
403     a8 := JTF_NUMBER_TABLE();
404     a9 := JTF_DATE_TABLE();
405     a10 := JTF_NUMBER_TABLE();
406   else
407       a0 := JTF_NUMBER_TABLE();
408       a1 := JTF_VARCHAR2_TABLE_100();
409       a2 := JTF_VARCHAR2_TABLE_100();
410       a3 := JTF_VARCHAR2_TABLE_100();
411       a4 := JTF_VARCHAR2_TABLE_200();
412       a5 := JTF_VARCHAR2_TABLE_2000();
413       a6 := JTF_NUMBER_TABLE();
414       a7 := JTF_DATE_TABLE();
415       a8 := JTF_NUMBER_TABLE();
416       a9 := JTF_DATE_TABLE();
417       a10 := JTF_NUMBER_TABLE();
418       if t.count > 0 then
419         a0.extend(t.count);
420         a1.extend(t.count);
421         a2.extend(t.count);
422         a3.extend(t.count);
423         a4.extend(t.count);
424         a5.extend(t.count);
425         a6.extend(t.count);
426         a7.extend(t.count);
427         a8.extend(t.count);
428         a9.extend(t.count);
429         a10.extend(t.count);
430         ddindx := t.first;
431         indx := 1;
432         while true loop
433           a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
434           a1(indx) := t(ddindx).language;
435           a2(indx) := t(ddindx).source_lang;
436           a3(indx) := t(ddindx).sfwt_flag;
437           a4(indx) := t(ddindx).name;
438           a5(indx) := t(ddindx).description;
439           a6(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
440           a7(indx) := t(ddindx).creation_date;
441           a8(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
442           a9(indx) := t(ddindx).last_update_date;
443           a10(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
444           indx := indx+1;
445           if t.last =ddindx
446             then exit;
447           end if;
448           ddindx := t.next(ddindx);
449         end loop;
450       end if;
451    end if;
452   end rosetta_table_copy_out_p5;
453 
454   procedure rosetta_table_copy_in_p8(t out nocopy okl_btc_pvt.btcv_tbl_type, a0 JTF_NUMBER_TABLE
455     , a1 JTF_NUMBER_TABLE
456     , a2 JTF_VARCHAR2_TABLE_100
457     , a3 JTF_VARCHAR2_TABLE_200
458     , a4 JTF_DATE_TABLE
459     , a5 JTF_DATE_TABLE
460     , a6 JTF_DATE_TABLE
461     , a7 JTF_NUMBER_TABLE
462     , a8 JTF_NUMBER_TABLE
463     , a9 JTF_VARCHAR2_TABLE_100
464     , a10 JTF_NUMBER_TABLE
465     , a11 JTF_VARCHAR2_TABLE_2000
466     , a12 JTF_VARCHAR2_TABLE_100
467     , a13 JTF_VARCHAR2_TABLE_500
468     , a14 JTF_VARCHAR2_TABLE_500
469     , a15 JTF_VARCHAR2_TABLE_500
470     , a16 JTF_VARCHAR2_TABLE_500
471     , a17 JTF_VARCHAR2_TABLE_500
472     , a18 JTF_VARCHAR2_TABLE_500
473     , a19 JTF_VARCHAR2_TABLE_500
474     , a20 JTF_VARCHAR2_TABLE_500
475     , a21 JTF_VARCHAR2_TABLE_500
476     , a22 JTF_VARCHAR2_TABLE_500
477     , a23 JTF_VARCHAR2_TABLE_500
478     , a24 JTF_VARCHAR2_TABLE_500
479     , a25 JTF_VARCHAR2_TABLE_500
480     , a26 JTF_VARCHAR2_TABLE_500
481     , a27 JTF_VARCHAR2_TABLE_500
482     , a28 JTF_NUMBER_TABLE
483     , a29 JTF_NUMBER_TABLE
484     , a30 JTF_NUMBER_TABLE
485     , a31 JTF_DATE_TABLE
486     , a32 JTF_NUMBER_TABLE
487     , a33 JTF_NUMBER_TABLE
488     , a34 JTF_DATE_TABLE
489     , a35 JTF_NUMBER_TABLE
490     , a36 JTF_DATE_TABLE
491     , a37 JTF_NUMBER_TABLE
492     , a38 JTF_VARCHAR2_TABLE_100
493     , a39 JTF_VARCHAR2_TABLE_100
494     , a40 JTF_NUMBER_TABLE
495     , a41 JTF_DATE_TABLE
496     , a42 JTF_NUMBER_TABLE
497     ) as
498     ddindx binary_integer; indx binary_integer;
499   begin
500   if a0 is not null and a0.count > 0 then
501       if a0.count > 0 then
502         indx := a0.first;
503         ddindx := 1;
504         while true loop
505           t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
506           t(ddindx).object_version_number := rosetta_g_miss_num_map(a1(indx));
507           t(ddindx).sfwt_flag := a2(indx);
508           t(ddindx).name := a3(indx);
509           t(ddindx).date_entered := rosetta_g_miss_date_in_map(a4(indx));
510           t(ddindx).date_gl_requested := rosetta_g_miss_date_in_map(a5(indx));
511           t(ddindx).date_deposit := rosetta_g_miss_date_in_map(a6(indx));
512           t(ddindx).batch_qty := rosetta_g_miss_num_map(a7(indx));
513           t(ddindx).batch_total := rosetta_g_miss_num_map(a8(indx));
514           t(ddindx).batch_currency := a9(indx);
515           t(ddindx).irm_id := rosetta_g_miss_num_map(a10(indx));
516           t(ddindx).description := a11(indx);
517           t(ddindx).attribute_category := a12(indx);
518           t(ddindx).attribute1 := a13(indx);
519           t(ddindx).attribute2 := a14(indx);
520           t(ddindx).attribute3 := a15(indx);
521           t(ddindx).attribute4 := a16(indx);
522           t(ddindx).attribute5 := a17(indx);
523           t(ddindx).attribute6 := a18(indx);
524           t(ddindx).attribute7 := a19(indx);
525           t(ddindx).attribute8 := a20(indx);
526           t(ddindx).attribute9 := a21(indx);
527           t(ddindx).attribute10 := a22(indx);
528           t(ddindx).attribute11 := a23(indx);
529           t(ddindx).attribute12 := a24(indx);
530           t(ddindx).attribute13 := a25(indx);
531           t(ddindx).attribute14 := a26(indx);
532           t(ddindx).attribute15 := a27(indx);
533           t(ddindx).request_id := rosetta_g_miss_num_map(a28(indx));
534           t(ddindx).program_application_id := rosetta_g_miss_num_map(a29(indx));
535           t(ddindx).program_id := rosetta_g_miss_num_map(a30(indx));
536           t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a31(indx));
537           t(ddindx).org_id := rosetta_g_miss_num_map(a32(indx));
538           t(ddindx).created_by := rosetta_g_miss_num_map(a33(indx));
539           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a34(indx));
540           t(ddindx).last_updated_by := rosetta_g_miss_num_map(a35(indx));
541           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a36(indx));
542           t(ddindx).last_update_login := rosetta_g_miss_num_map(a37(indx));
543           t(ddindx).trx_status_code := a38(indx);
544           t(ddindx).currency_conversion_type := a39(indx);
545           t(ddindx).currency_conversion_rate := rosetta_g_miss_num_map(a40(indx));
546           t(ddindx).currency_conversion_date := rosetta_g_miss_date_in_map(a41(indx));
547           t(ddindx).remit_bank_id := rosetta_g_miss_num_map(a42(indx));
548           ddindx := ddindx+1;
549           if a0.last =indx
550             then exit;
551           end if;
552           indx := a0.next(indx);
553         end loop;
554       end if;
555    end if;
556   end rosetta_table_copy_in_p8;
557   procedure rosetta_table_copy_out_p8(t okl_btc_pvt.btcv_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
558     , a1 out nocopy JTF_NUMBER_TABLE
559     , a2 out nocopy JTF_VARCHAR2_TABLE_100
560     , a3 out nocopy JTF_VARCHAR2_TABLE_200
561     , a4 out nocopy JTF_DATE_TABLE
562     , a5 out nocopy JTF_DATE_TABLE
563     , a6 out nocopy JTF_DATE_TABLE
564     , a7 out nocopy JTF_NUMBER_TABLE
565     , a8 out nocopy JTF_NUMBER_TABLE
566     , a9 out nocopy JTF_VARCHAR2_TABLE_100
567     , a10 out nocopy JTF_NUMBER_TABLE
568     , a11 out nocopy JTF_VARCHAR2_TABLE_2000
569     , a12 out nocopy JTF_VARCHAR2_TABLE_100
570     , a13 out nocopy JTF_VARCHAR2_TABLE_500
571     , a14 out nocopy JTF_VARCHAR2_TABLE_500
572     , a15 out nocopy JTF_VARCHAR2_TABLE_500
573     , a16 out nocopy JTF_VARCHAR2_TABLE_500
574     , a17 out nocopy JTF_VARCHAR2_TABLE_500
575     , a18 out nocopy JTF_VARCHAR2_TABLE_500
576     , a19 out nocopy JTF_VARCHAR2_TABLE_500
577     , a20 out nocopy JTF_VARCHAR2_TABLE_500
578     , a21 out nocopy JTF_VARCHAR2_TABLE_500
579     , a22 out nocopy JTF_VARCHAR2_TABLE_500
580     , a23 out nocopy JTF_VARCHAR2_TABLE_500
581     , a24 out nocopy JTF_VARCHAR2_TABLE_500
582     , a25 out nocopy JTF_VARCHAR2_TABLE_500
583     , a26 out nocopy JTF_VARCHAR2_TABLE_500
584     , a27 out nocopy JTF_VARCHAR2_TABLE_500
585     , a28 out nocopy JTF_NUMBER_TABLE
586     , a29 out nocopy JTF_NUMBER_TABLE
587     , a30 out nocopy JTF_NUMBER_TABLE
588     , a31 out nocopy JTF_DATE_TABLE
589     , a32 out nocopy JTF_NUMBER_TABLE
590     , a33 out nocopy JTF_NUMBER_TABLE
591     , a34 out nocopy JTF_DATE_TABLE
592     , a35 out nocopy JTF_NUMBER_TABLE
593     , a36 out nocopy JTF_DATE_TABLE
594     , a37 out nocopy JTF_NUMBER_TABLE
595     , a38 out nocopy JTF_VARCHAR2_TABLE_100
596     , a39 out nocopy JTF_VARCHAR2_TABLE_100
597     , a40 out nocopy JTF_NUMBER_TABLE
598     , a41 out nocopy JTF_DATE_TABLE
599     , a42 out nocopy JTF_NUMBER_TABLE
600     ) as
601     ddindx binary_integer; indx binary_integer;
602   begin
603   if t is null or t.count = 0 then
604     a0 := JTF_NUMBER_TABLE();
605     a1 := JTF_NUMBER_TABLE();
606     a2 := JTF_VARCHAR2_TABLE_100();
607     a3 := JTF_VARCHAR2_TABLE_200();
608     a4 := JTF_DATE_TABLE();
609     a5 := JTF_DATE_TABLE();
610     a6 := JTF_DATE_TABLE();
611     a7 := JTF_NUMBER_TABLE();
612     a8 := JTF_NUMBER_TABLE();
613     a9 := JTF_VARCHAR2_TABLE_100();
614     a10 := JTF_NUMBER_TABLE();
615     a11 := JTF_VARCHAR2_TABLE_2000();
616     a12 := JTF_VARCHAR2_TABLE_100();
617     a13 := JTF_VARCHAR2_TABLE_500();
618     a14 := JTF_VARCHAR2_TABLE_500();
619     a15 := JTF_VARCHAR2_TABLE_500();
620     a16 := JTF_VARCHAR2_TABLE_500();
621     a17 := JTF_VARCHAR2_TABLE_500();
622     a18 := JTF_VARCHAR2_TABLE_500();
623     a19 := JTF_VARCHAR2_TABLE_500();
624     a20 := JTF_VARCHAR2_TABLE_500();
625     a21 := JTF_VARCHAR2_TABLE_500();
626     a22 := JTF_VARCHAR2_TABLE_500();
627     a23 := JTF_VARCHAR2_TABLE_500();
628     a24 := JTF_VARCHAR2_TABLE_500();
629     a25 := JTF_VARCHAR2_TABLE_500();
630     a26 := JTF_VARCHAR2_TABLE_500();
631     a27 := JTF_VARCHAR2_TABLE_500();
632     a28 := JTF_NUMBER_TABLE();
633     a29 := JTF_NUMBER_TABLE();
634     a30 := JTF_NUMBER_TABLE();
635     a31 := JTF_DATE_TABLE();
636     a32 := JTF_NUMBER_TABLE();
637     a33 := JTF_NUMBER_TABLE();
638     a34 := JTF_DATE_TABLE();
639     a35 := JTF_NUMBER_TABLE();
640     a36 := JTF_DATE_TABLE();
641     a37 := JTF_NUMBER_TABLE();
642     a38 := JTF_VARCHAR2_TABLE_100();
643     a39 := JTF_VARCHAR2_TABLE_100();
644     a40 := JTF_NUMBER_TABLE();
645     a41 := JTF_DATE_TABLE();
646     a42 := JTF_NUMBER_TABLE();
647   else
648       a0 := JTF_NUMBER_TABLE();
649       a1 := JTF_NUMBER_TABLE();
650       a2 := JTF_VARCHAR2_TABLE_100();
651       a3 := JTF_VARCHAR2_TABLE_200();
652       a4 := JTF_DATE_TABLE();
653       a5 := JTF_DATE_TABLE();
654       a6 := JTF_DATE_TABLE();
655       a7 := JTF_NUMBER_TABLE();
656       a8 := JTF_NUMBER_TABLE();
657       a9 := JTF_VARCHAR2_TABLE_100();
658       a10 := JTF_NUMBER_TABLE();
659       a11 := JTF_VARCHAR2_TABLE_2000();
660       a12 := JTF_VARCHAR2_TABLE_100();
661       a13 := JTF_VARCHAR2_TABLE_500();
662       a14 := JTF_VARCHAR2_TABLE_500();
663       a15 := JTF_VARCHAR2_TABLE_500();
664       a16 := JTF_VARCHAR2_TABLE_500();
665       a17 := JTF_VARCHAR2_TABLE_500();
666       a18 := JTF_VARCHAR2_TABLE_500();
667       a19 := JTF_VARCHAR2_TABLE_500();
668       a20 := JTF_VARCHAR2_TABLE_500();
669       a21 := JTF_VARCHAR2_TABLE_500();
670       a22 := JTF_VARCHAR2_TABLE_500();
671       a23 := JTF_VARCHAR2_TABLE_500();
672       a24 := JTF_VARCHAR2_TABLE_500();
673       a25 := JTF_VARCHAR2_TABLE_500();
674       a26 := JTF_VARCHAR2_TABLE_500();
675       a27 := JTF_VARCHAR2_TABLE_500();
676       a28 := JTF_NUMBER_TABLE();
677       a29 := JTF_NUMBER_TABLE();
678       a30 := JTF_NUMBER_TABLE();
679       a31 := JTF_DATE_TABLE();
680       a32 := JTF_NUMBER_TABLE();
681       a33 := JTF_NUMBER_TABLE();
682       a34 := JTF_DATE_TABLE();
683       a35 := JTF_NUMBER_TABLE();
684       a36 := JTF_DATE_TABLE();
685       a37 := JTF_NUMBER_TABLE();
686       a38 := JTF_VARCHAR2_TABLE_100();
687       a39 := JTF_VARCHAR2_TABLE_100();
688       a40 := JTF_NUMBER_TABLE();
689       a41 := JTF_DATE_TABLE();
690       a42 := JTF_NUMBER_TABLE();
691       if t.count > 0 then
692         a0.extend(t.count);
693         a1.extend(t.count);
694         a2.extend(t.count);
695         a3.extend(t.count);
696         a4.extend(t.count);
697         a5.extend(t.count);
698         a6.extend(t.count);
699         a7.extend(t.count);
700         a8.extend(t.count);
701         a9.extend(t.count);
702         a10.extend(t.count);
703         a11.extend(t.count);
704         a12.extend(t.count);
705         a13.extend(t.count);
706         a14.extend(t.count);
707         a15.extend(t.count);
708         a16.extend(t.count);
709         a17.extend(t.count);
710         a18.extend(t.count);
711         a19.extend(t.count);
712         a20.extend(t.count);
713         a21.extend(t.count);
714         a22.extend(t.count);
715         a23.extend(t.count);
716         a24.extend(t.count);
717         a25.extend(t.count);
718         a26.extend(t.count);
719         a27.extend(t.count);
720         a28.extend(t.count);
721         a29.extend(t.count);
722         a30.extend(t.count);
723         a31.extend(t.count);
724         a32.extend(t.count);
725         a33.extend(t.count);
726         a34.extend(t.count);
727         a35.extend(t.count);
728         a36.extend(t.count);
729         a37.extend(t.count);
730         a38.extend(t.count);
731         a39.extend(t.count);
732         a40.extend(t.count);
733         a41.extend(t.count);
734         a42.extend(t.count);
735         ddindx := t.first;
736         indx := 1;
737         while true loop
738           a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
739           a1(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
740           a2(indx) := t(ddindx).sfwt_flag;
741           a3(indx) := t(ddindx).name;
742           a4(indx) := t(ddindx).date_entered;
743           a5(indx) := t(ddindx).date_gl_requested;
744           a6(indx) := t(ddindx).date_deposit;
745           a7(indx) := rosetta_g_miss_num_map(t(ddindx).batch_qty);
746           a8(indx) := rosetta_g_miss_num_map(t(ddindx).batch_total);
747           a9(indx) := t(ddindx).batch_currency;
748           a10(indx) := rosetta_g_miss_num_map(t(ddindx).irm_id);
749           a11(indx) := t(ddindx).description;
750           a12(indx) := t(ddindx).attribute_category;
751           a13(indx) := t(ddindx).attribute1;
752           a14(indx) := t(ddindx).attribute2;
753           a15(indx) := t(ddindx).attribute3;
754           a16(indx) := t(ddindx).attribute4;
755           a17(indx) := t(ddindx).attribute5;
756           a18(indx) := t(ddindx).attribute6;
757           a19(indx) := t(ddindx).attribute7;
758           a20(indx) := t(ddindx).attribute8;
759           a21(indx) := t(ddindx).attribute9;
760           a22(indx) := t(ddindx).attribute10;
761           a23(indx) := t(ddindx).attribute11;
762           a24(indx) := t(ddindx).attribute12;
763           a25(indx) := t(ddindx).attribute13;
764           a26(indx) := t(ddindx).attribute14;
765           a27(indx) := t(ddindx).attribute15;
766           a28(indx) := rosetta_g_miss_num_map(t(ddindx).request_id);
767           a29(indx) := rosetta_g_miss_num_map(t(ddindx).program_application_id);
768           a30(indx) := rosetta_g_miss_num_map(t(ddindx).program_id);
769           a31(indx) := t(ddindx).program_update_date;
770           a32(indx) := rosetta_g_miss_num_map(t(ddindx).org_id);
771           a33(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
772           a34(indx) := t(ddindx).creation_date;
773           a35(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
774           a36(indx) := t(ddindx).last_update_date;
775           a37(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
776           a38(indx) := t(ddindx).trx_status_code;
777           a39(indx) := t(ddindx).currency_conversion_type;
778           a40(indx) := rosetta_g_miss_num_map(t(ddindx).currency_conversion_rate);
779           a41(indx) := t(ddindx).currency_conversion_date;
780           a42(indx) := rosetta_g_miss_num_map(t(ddindx).remit_bank_id);
781           indx := indx+1;
782           if t.last =ddindx
783             then exit;
784           end if;
785           ddindx := t.next(ddindx);
786         end loop;
787       end if;
788    end if;
789   end rosetta_table_copy_out_p8;
790 
791   procedure insert_row(p_api_version  NUMBER
792     , p_init_msg_list  VARCHAR2
793     , x_return_status out nocopy  VARCHAR2
794     , x_msg_count out nocopy  NUMBER
795     , x_msg_data out nocopy  VARCHAR2
796     , p6_a0 out nocopy  NUMBER
797     , p6_a1 out nocopy  NUMBER
798     , p6_a2 out nocopy  VARCHAR2
799     , p6_a3 out nocopy  VARCHAR2
800     , p6_a4 out nocopy  DATE
801     , p6_a5 out nocopy  DATE
802     , p6_a6 out nocopy  DATE
803     , p6_a7 out nocopy  NUMBER
804     , p6_a8 out nocopy  NUMBER
805     , p6_a9 out nocopy  VARCHAR2
806     , p6_a10 out nocopy  NUMBER
807     , p6_a11 out nocopy  VARCHAR2
808     , p6_a12 out nocopy  VARCHAR2
809     , p6_a13 out nocopy  VARCHAR2
810     , p6_a14 out nocopy  VARCHAR2
811     , p6_a15 out nocopy  VARCHAR2
812     , p6_a16 out nocopy  VARCHAR2
813     , p6_a17 out nocopy  VARCHAR2
814     , p6_a18 out nocopy  VARCHAR2
815     , p6_a19 out nocopy  VARCHAR2
816     , p6_a20 out nocopy  VARCHAR2
817     , p6_a21 out nocopy  VARCHAR2
818     , p6_a22 out nocopy  VARCHAR2
819     , p6_a23 out nocopy  VARCHAR2
820     , p6_a24 out nocopy  VARCHAR2
821     , p6_a25 out nocopy  VARCHAR2
822     , p6_a26 out nocopy  VARCHAR2
823     , p6_a27 out nocopy  VARCHAR2
824     , p6_a28 out nocopy  NUMBER
825     , p6_a29 out nocopy  NUMBER
826     , p6_a30 out nocopy  NUMBER
827     , p6_a31 out nocopy  DATE
828     , p6_a32 out nocopy  NUMBER
829     , p6_a33 out nocopy  NUMBER
830     , p6_a34 out nocopy  DATE
831     , p6_a35 out nocopy  NUMBER
832     , p6_a36 out nocopy  DATE
833     , p6_a37 out nocopy  NUMBER
834     , p6_a38 out nocopy  VARCHAR2
835     , p6_a39 out nocopy  VARCHAR2
836     , p6_a40 out nocopy  NUMBER
837     , p6_a41 out nocopy  DATE
838     , p6_a42 out nocopy  NUMBER
839     , p5_a0  NUMBER := 0-1962.0724
840     , p5_a1  NUMBER := 0-1962.0724
841     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
842     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
843     , p5_a4  DATE := fnd_api.g_miss_date
844     , p5_a5  DATE := fnd_api.g_miss_date
845     , p5_a6  DATE := fnd_api.g_miss_date
846     , p5_a7  NUMBER := 0-1962.0724
847     , p5_a8  NUMBER := 0-1962.0724
848     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
849     , p5_a10  NUMBER := 0-1962.0724
850     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
851     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
852     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
853     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
854     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
855     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
856     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
857     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
858     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
859     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
860     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
861     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
862     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
863     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
864     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
865     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
866     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
867     , p5_a28  NUMBER := 0-1962.0724
868     , p5_a29  NUMBER := 0-1962.0724
869     , p5_a30  NUMBER := 0-1962.0724
870     , p5_a31  DATE := fnd_api.g_miss_date
871     , p5_a32  NUMBER := 0-1962.0724
872     , p5_a33  NUMBER := 0-1962.0724
873     , p5_a34  DATE := fnd_api.g_miss_date
874     , p5_a35  NUMBER := 0-1962.0724
875     , p5_a36  DATE := fnd_api.g_miss_date
876     , p5_a37  NUMBER := 0-1962.0724
877     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
878     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
879     , p5_a40  NUMBER := 0-1962.0724
880     , p5_a41  DATE := fnd_api.g_miss_date
881     , p5_a42  NUMBER := 0-1962.0724
882   )
883 
884   as
885     ddp_btcv_rec okl_btc_pvt.btcv_rec_type;
886     ddx_btcv_rec okl_btc_pvt.btcv_rec_type;
887     ddindx binary_integer; indx binary_integer;
888   begin
889 
890     -- copy data to the local IN or IN-OUT args, if any
891 
892 
893 
894 
895 
896     ddp_btcv_rec.id := rosetta_g_miss_num_map(p5_a0);
897     ddp_btcv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
898     ddp_btcv_rec.sfwt_flag := p5_a2;
899     ddp_btcv_rec.name := p5_a3;
900     ddp_btcv_rec.date_entered := rosetta_g_miss_date_in_map(p5_a4);
901     ddp_btcv_rec.date_gl_requested := rosetta_g_miss_date_in_map(p5_a5);
902     ddp_btcv_rec.date_deposit := rosetta_g_miss_date_in_map(p5_a6);
903     ddp_btcv_rec.batch_qty := rosetta_g_miss_num_map(p5_a7);
904     ddp_btcv_rec.batch_total := rosetta_g_miss_num_map(p5_a8);
905     ddp_btcv_rec.batch_currency := p5_a9;
906     ddp_btcv_rec.irm_id := rosetta_g_miss_num_map(p5_a10);
907     ddp_btcv_rec.description := p5_a11;
908     ddp_btcv_rec.attribute_category := p5_a12;
909     ddp_btcv_rec.attribute1 := p5_a13;
910     ddp_btcv_rec.attribute2 := p5_a14;
911     ddp_btcv_rec.attribute3 := p5_a15;
912     ddp_btcv_rec.attribute4 := p5_a16;
913     ddp_btcv_rec.attribute5 := p5_a17;
914     ddp_btcv_rec.attribute6 := p5_a18;
915     ddp_btcv_rec.attribute7 := p5_a19;
916     ddp_btcv_rec.attribute8 := p5_a20;
917     ddp_btcv_rec.attribute9 := p5_a21;
918     ddp_btcv_rec.attribute10 := p5_a22;
919     ddp_btcv_rec.attribute11 := p5_a23;
920     ddp_btcv_rec.attribute12 := p5_a24;
921     ddp_btcv_rec.attribute13 := p5_a25;
922     ddp_btcv_rec.attribute14 := p5_a26;
923     ddp_btcv_rec.attribute15 := p5_a27;
924     ddp_btcv_rec.request_id := rosetta_g_miss_num_map(p5_a28);
925     ddp_btcv_rec.program_application_id := rosetta_g_miss_num_map(p5_a29);
926     ddp_btcv_rec.program_id := rosetta_g_miss_num_map(p5_a30);
927     ddp_btcv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a31);
928     ddp_btcv_rec.org_id := rosetta_g_miss_num_map(p5_a32);
929     ddp_btcv_rec.created_by := rosetta_g_miss_num_map(p5_a33);
930     ddp_btcv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a34);
931     ddp_btcv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a35);
932     ddp_btcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a36);
933     ddp_btcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a37);
934     ddp_btcv_rec.trx_status_code := p5_a38;
935     ddp_btcv_rec.currency_conversion_type := p5_a39;
936     ddp_btcv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
937     ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
938     ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
939 
940 
941     -- here's the delegated call to the old PL/SQL routine
942     okl_btc_pvt.insert_row(p_api_version,
943       p_init_msg_list,
944       x_return_status,
945       x_msg_count,
946       x_msg_data,
947       ddp_btcv_rec,
948       ddx_btcv_rec);
949 
950     -- copy data back from the local variables to OUT or IN-OUT args, if any
951 
952 
953 
954 
955 
956 
957     p6_a0 := rosetta_g_miss_num_map(ddx_btcv_rec.id);
958     p6_a1 := rosetta_g_miss_num_map(ddx_btcv_rec.object_version_number);
959     p6_a2 := ddx_btcv_rec.sfwt_flag;
960     p6_a3 := ddx_btcv_rec.name;
961     p6_a4 := ddx_btcv_rec.date_entered;
962     p6_a5 := ddx_btcv_rec.date_gl_requested;
963     p6_a6 := ddx_btcv_rec.date_deposit;
964     p6_a7 := rosetta_g_miss_num_map(ddx_btcv_rec.batch_qty);
965     p6_a8 := rosetta_g_miss_num_map(ddx_btcv_rec.batch_total);
966     p6_a9 := ddx_btcv_rec.batch_currency;
967     p6_a10 := rosetta_g_miss_num_map(ddx_btcv_rec.irm_id);
968     p6_a11 := ddx_btcv_rec.description;
969     p6_a12 := ddx_btcv_rec.attribute_category;
970     p6_a13 := ddx_btcv_rec.attribute1;
971     p6_a14 := ddx_btcv_rec.attribute2;
972     p6_a15 := ddx_btcv_rec.attribute3;
973     p6_a16 := ddx_btcv_rec.attribute4;
974     p6_a17 := ddx_btcv_rec.attribute5;
975     p6_a18 := ddx_btcv_rec.attribute6;
976     p6_a19 := ddx_btcv_rec.attribute7;
977     p6_a20 := ddx_btcv_rec.attribute8;
978     p6_a21 := ddx_btcv_rec.attribute9;
979     p6_a22 := ddx_btcv_rec.attribute10;
980     p6_a23 := ddx_btcv_rec.attribute11;
981     p6_a24 := ddx_btcv_rec.attribute12;
982     p6_a25 := ddx_btcv_rec.attribute13;
983     p6_a26 := ddx_btcv_rec.attribute14;
984     p6_a27 := ddx_btcv_rec.attribute15;
985     p6_a28 := rosetta_g_miss_num_map(ddx_btcv_rec.request_id);
986     p6_a29 := rosetta_g_miss_num_map(ddx_btcv_rec.program_application_id);
987     p6_a30 := rosetta_g_miss_num_map(ddx_btcv_rec.program_id);
988     p6_a31 := ddx_btcv_rec.program_update_date;
989     p6_a32 := rosetta_g_miss_num_map(ddx_btcv_rec.org_id);
990     p6_a33 := rosetta_g_miss_num_map(ddx_btcv_rec.created_by);
991     p6_a34 := ddx_btcv_rec.creation_date;
992     p6_a35 := rosetta_g_miss_num_map(ddx_btcv_rec.last_updated_by);
993     p6_a36 := ddx_btcv_rec.last_update_date;
994     p6_a37 := rosetta_g_miss_num_map(ddx_btcv_rec.last_update_login);
995     p6_a38 := ddx_btcv_rec.trx_status_code;
996     p6_a39 := ddx_btcv_rec.currency_conversion_type;
997     p6_a40 := rosetta_g_miss_num_map(ddx_btcv_rec.currency_conversion_rate);
998     p6_a41 := ddx_btcv_rec.currency_conversion_date;
999     p6_a42 := rosetta_g_miss_num_map(ddx_btcv_rec.remit_bank_id);
1000   end;
1001 
1002   procedure insert_row(p_api_version  NUMBER
1003     , p_init_msg_list  VARCHAR2
1004     , x_return_status out nocopy  VARCHAR2
1005     , x_msg_count out nocopy  NUMBER
1006     , x_msg_data out nocopy  VARCHAR2
1007     , p5_a0 JTF_NUMBER_TABLE
1008     , p5_a1 JTF_NUMBER_TABLE
1009     , p5_a2 JTF_VARCHAR2_TABLE_100
1010     , p5_a3 JTF_VARCHAR2_TABLE_200
1011     , p5_a4 JTF_DATE_TABLE
1012     , p5_a5 JTF_DATE_TABLE
1013     , p5_a6 JTF_DATE_TABLE
1014     , p5_a7 JTF_NUMBER_TABLE
1015     , p5_a8 JTF_NUMBER_TABLE
1016     , p5_a9 JTF_VARCHAR2_TABLE_100
1017     , p5_a10 JTF_NUMBER_TABLE
1018     , p5_a11 JTF_VARCHAR2_TABLE_2000
1019     , p5_a12 JTF_VARCHAR2_TABLE_100
1020     , p5_a13 JTF_VARCHAR2_TABLE_500
1021     , p5_a14 JTF_VARCHAR2_TABLE_500
1022     , p5_a15 JTF_VARCHAR2_TABLE_500
1023     , p5_a16 JTF_VARCHAR2_TABLE_500
1024     , p5_a17 JTF_VARCHAR2_TABLE_500
1025     , p5_a18 JTF_VARCHAR2_TABLE_500
1026     , p5_a19 JTF_VARCHAR2_TABLE_500
1027     , p5_a20 JTF_VARCHAR2_TABLE_500
1028     , p5_a21 JTF_VARCHAR2_TABLE_500
1029     , p5_a22 JTF_VARCHAR2_TABLE_500
1030     , p5_a23 JTF_VARCHAR2_TABLE_500
1031     , p5_a24 JTF_VARCHAR2_TABLE_500
1032     , p5_a25 JTF_VARCHAR2_TABLE_500
1033     , p5_a26 JTF_VARCHAR2_TABLE_500
1034     , p5_a27 JTF_VARCHAR2_TABLE_500
1035     , p5_a28 JTF_NUMBER_TABLE
1036     , p5_a29 JTF_NUMBER_TABLE
1037     , p5_a30 JTF_NUMBER_TABLE
1038     , p5_a31 JTF_DATE_TABLE
1039     , p5_a32 JTF_NUMBER_TABLE
1040     , p5_a33 JTF_NUMBER_TABLE
1041     , p5_a34 JTF_DATE_TABLE
1042     , p5_a35 JTF_NUMBER_TABLE
1043     , p5_a36 JTF_DATE_TABLE
1044     , p5_a37 JTF_NUMBER_TABLE
1045     , p5_a38 JTF_VARCHAR2_TABLE_100
1046     , p5_a39 JTF_VARCHAR2_TABLE_100
1047     , p5_a40 JTF_NUMBER_TABLE
1048     , p5_a41 JTF_DATE_TABLE
1049     , p5_a42 JTF_NUMBER_TABLE
1050     , p6_a0 out nocopy JTF_NUMBER_TABLE
1051     , p6_a1 out nocopy JTF_NUMBER_TABLE
1052     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1053     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_200
1054     , p6_a4 out nocopy JTF_DATE_TABLE
1055     , p6_a5 out nocopy JTF_DATE_TABLE
1056     , p6_a6 out nocopy JTF_DATE_TABLE
1057     , p6_a7 out nocopy JTF_NUMBER_TABLE
1058     , p6_a8 out nocopy JTF_NUMBER_TABLE
1059     , p6_a9 out nocopy JTF_VARCHAR2_TABLE_100
1060     , p6_a10 out nocopy JTF_NUMBER_TABLE
1061     , p6_a11 out nocopy JTF_VARCHAR2_TABLE_2000
1062     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
1063     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
1064     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1065     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1066     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1067     , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1068     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1069     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1070     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1071     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1072     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
1073     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
1074     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
1075     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
1076     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
1077     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
1078     , p6_a28 out nocopy JTF_NUMBER_TABLE
1079     , p6_a29 out nocopy JTF_NUMBER_TABLE
1080     , p6_a30 out nocopy JTF_NUMBER_TABLE
1081     , p6_a31 out nocopy JTF_DATE_TABLE
1082     , p6_a32 out nocopy JTF_NUMBER_TABLE
1083     , p6_a33 out nocopy JTF_NUMBER_TABLE
1084     , p6_a34 out nocopy JTF_DATE_TABLE
1085     , p6_a35 out nocopy JTF_NUMBER_TABLE
1086     , p6_a36 out nocopy JTF_DATE_TABLE
1087     , p6_a37 out nocopy JTF_NUMBER_TABLE
1088     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
1089     , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
1090     , p6_a40 out nocopy JTF_NUMBER_TABLE
1091     , p6_a41 out nocopy JTF_DATE_TABLE
1092     , p6_a42 out nocopy JTF_NUMBER_TABLE
1093   )
1094 
1095   as
1096     ddp_btcv_tbl okl_btc_pvt.btcv_tbl_type;
1097     ddx_btcv_tbl okl_btc_pvt.btcv_tbl_type;
1098     ddindx binary_integer; indx binary_integer;
1099   begin
1100 
1101     -- copy data to the local IN or IN-OUT args, if any
1102 
1103 
1104 
1105 
1106 
1107     okl_btc_pvt_w.rosetta_table_copy_in_p8(ddp_btcv_tbl, p5_a0
1108       , p5_a1
1109       , p5_a2
1110       , p5_a3
1111       , p5_a4
1112       , p5_a5
1113       , p5_a6
1114       , p5_a7
1115       , p5_a8
1116       , p5_a9
1117       , p5_a10
1118       , p5_a11
1119       , p5_a12
1120       , p5_a13
1121       , p5_a14
1122       , p5_a15
1123       , p5_a16
1124       , p5_a17
1125       , p5_a18
1126       , p5_a19
1127       , p5_a20
1128       , p5_a21
1129       , p5_a22
1130       , p5_a23
1131       , p5_a24
1132       , p5_a25
1133       , p5_a26
1134       , p5_a27
1135       , p5_a28
1136       , p5_a29
1137       , p5_a30
1138       , p5_a31
1139       , p5_a32
1140       , p5_a33
1141       , p5_a34
1142       , p5_a35
1143       , p5_a36
1144       , p5_a37
1145       , p5_a38
1146       , p5_a39
1147       , p5_a40
1148       , p5_a41
1149       , p5_a42
1150       );
1151 
1152 
1153     -- here's the delegated call to the old PL/SQL routine
1154     okl_btc_pvt.insert_row(p_api_version,
1155       p_init_msg_list,
1156       x_return_status,
1157       x_msg_count,
1158       x_msg_data,
1159       ddp_btcv_tbl,
1160       ddx_btcv_tbl);
1161 
1162     -- copy data back from the local variables to OUT or IN-OUT args, if any
1163 
1164 
1165 
1166 
1167 
1168 
1169     okl_btc_pvt_w.rosetta_table_copy_out_p8(ddx_btcv_tbl, p6_a0
1170       , p6_a1
1171       , p6_a2
1172       , p6_a3
1173       , p6_a4
1174       , p6_a5
1175       , p6_a6
1176       , p6_a7
1177       , p6_a8
1178       , p6_a9
1179       , p6_a10
1180       , p6_a11
1181       , p6_a12
1182       , p6_a13
1183       , p6_a14
1184       , p6_a15
1185       , p6_a16
1186       , p6_a17
1187       , p6_a18
1188       , p6_a19
1189       , p6_a20
1190       , p6_a21
1191       , p6_a22
1192       , p6_a23
1193       , p6_a24
1194       , p6_a25
1195       , p6_a26
1196       , p6_a27
1197       , p6_a28
1198       , p6_a29
1199       , p6_a30
1200       , p6_a31
1201       , p6_a32
1202       , p6_a33
1203       , p6_a34
1204       , p6_a35
1205       , p6_a36
1206       , p6_a37
1207       , p6_a38
1208       , p6_a39
1209       , p6_a40
1210       , p6_a41
1211       , p6_a42
1212       );
1213   end;
1214 
1215   procedure lock_row(p_api_version  NUMBER
1216     , p_init_msg_list  VARCHAR2
1217     , x_return_status out nocopy  VARCHAR2
1218     , x_msg_count out nocopy  NUMBER
1219     , x_msg_data out nocopy  VARCHAR2
1220     , p5_a0  NUMBER := 0-1962.0724
1221     , p5_a1  NUMBER := 0-1962.0724
1222     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1223     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1224     , p5_a4  DATE := fnd_api.g_miss_date
1225     , p5_a5  DATE := fnd_api.g_miss_date
1226     , p5_a6  DATE := fnd_api.g_miss_date
1227     , p5_a7  NUMBER := 0-1962.0724
1228     , p5_a8  NUMBER := 0-1962.0724
1229     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
1230     , p5_a10  NUMBER := 0-1962.0724
1231     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
1232     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
1233     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1234     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1235     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1236     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1237     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
1238     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
1239     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
1240     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
1241     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
1242     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
1243     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
1244     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
1245     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
1246     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
1247     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1248     , p5_a28  NUMBER := 0-1962.0724
1249     , p5_a29  NUMBER := 0-1962.0724
1250     , p5_a30  NUMBER := 0-1962.0724
1251     , p5_a31  DATE := fnd_api.g_miss_date
1252     , p5_a32  NUMBER := 0-1962.0724
1253     , p5_a33  NUMBER := 0-1962.0724
1254     , p5_a34  DATE := fnd_api.g_miss_date
1255     , p5_a35  NUMBER := 0-1962.0724
1256     , p5_a36  DATE := fnd_api.g_miss_date
1257     , p5_a37  NUMBER := 0-1962.0724
1258     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1259     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1260     , p5_a40  NUMBER := 0-1962.0724
1261     , p5_a41  DATE := fnd_api.g_miss_date
1262     , p5_a42  NUMBER := 0-1962.0724
1263   )
1264 
1265   as
1266     ddp_btcv_rec okl_btc_pvt.btcv_rec_type;
1267     ddindx binary_integer; indx binary_integer;
1268   begin
1269 
1270     -- copy data to the local IN or IN-OUT args, if any
1271 
1272 
1273 
1274 
1275 
1276     ddp_btcv_rec.id := rosetta_g_miss_num_map(p5_a0);
1277     ddp_btcv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1278     ddp_btcv_rec.sfwt_flag := p5_a2;
1279     ddp_btcv_rec.name := p5_a3;
1280     ddp_btcv_rec.date_entered := rosetta_g_miss_date_in_map(p5_a4);
1281     ddp_btcv_rec.date_gl_requested := rosetta_g_miss_date_in_map(p5_a5);
1282     ddp_btcv_rec.date_deposit := rosetta_g_miss_date_in_map(p5_a6);
1283     ddp_btcv_rec.batch_qty := rosetta_g_miss_num_map(p5_a7);
1284     ddp_btcv_rec.batch_total := rosetta_g_miss_num_map(p5_a8);
1285     ddp_btcv_rec.batch_currency := p5_a9;
1286     ddp_btcv_rec.irm_id := rosetta_g_miss_num_map(p5_a10);
1287     ddp_btcv_rec.description := p5_a11;
1288     ddp_btcv_rec.attribute_category := p5_a12;
1289     ddp_btcv_rec.attribute1 := p5_a13;
1290     ddp_btcv_rec.attribute2 := p5_a14;
1291     ddp_btcv_rec.attribute3 := p5_a15;
1292     ddp_btcv_rec.attribute4 := p5_a16;
1293     ddp_btcv_rec.attribute5 := p5_a17;
1294     ddp_btcv_rec.attribute6 := p5_a18;
1295     ddp_btcv_rec.attribute7 := p5_a19;
1296     ddp_btcv_rec.attribute8 := p5_a20;
1297     ddp_btcv_rec.attribute9 := p5_a21;
1298     ddp_btcv_rec.attribute10 := p5_a22;
1299     ddp_btcv_rec.attribute11 := p5_a23;
1300     ddp_btcv_rec.attribute12 := p5_a24;
1301     ddp_btcv_rec.attribute13 := p5_a25;
1302     ddp_btcv_rec.attribute14 := p5_a26;
1303     ddp_btcv_rec.attribute15 := p5_a27;
1304     ddp_btcv_rec.request_id := rosetta_g_miss_num_map(p5_a28);
1305     ddp_btcv_rec.program_application_id := rosetta_g_miss_num_map(p5_a29);
1306     ddp_btcv_rec.program_id := rosetta_g_miss_num_map(p5_a30);
1307     ddp_btcv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a31);
1308     ddp_btcv_rec.org_id := rosetta_g_miss_num_map(p5_a32);
1309     ddp_btcv_rec.created_by := rosetta_g_miss_num_map(p5_a33);
1310     ddp_btcv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a34);
1311     ddp_btcv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a35);
1312     ddp_btcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a36);
1313     ddp_btcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a37);
1314     ddp_btcv_rec.trx_status_code := p5_a38;
1315     ddp_btcv_rec.currency_conversion_type := p5_a39;
1316     ddp_btcv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
1317     ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
1318     ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
1319 
1320     -- here's the delegated call to the old PL/SQL routine
1321     okl_btc_pvt.lock_row(p_api_version,
1322       p_init_msg_list,
1323       x_return_status,
1324       x_msg_count,
1325       x_msg_data,
1326       ddp_btcv_rec);
1327 
1328     -- copy data back from the local variables to OUT or IN-OUT args, if any
1329 
1330 
1331 
1332 
1333 
1334   end;
1335 
1336   procedure lock_row(p_api_version  NUMBER
1337     , p_init_msg_list  VARCHAR2
1338     , x_return_status out nocopy  VARCHAR2
1339     , x_msg_count out nocopy  NUMBER
1340     , x_msg_data out nocopy  VARCHAR2
1341     , p5_a0 JTF_NUMBER_TABLE
1342     , p5_a1 JTF_NUMBER_TABLE
1343     , p5_a2 JTF_VARCHAR2_TABLE_100
1344     , p5_a3 JTF_VARCHAR2_TABLE_200
1345     , p5_a4 JTF_DATE_TABLE
1346     , p5_a5 JTF_DATE_TABLE
1347     , p5_a6 JTF_DATE_TABLE
1348     , p5_a7 JTF_NUMBER_TABLE
1349     , p5_a8 JTF_NUMBER_TABLE
1350     , p5_a9 JTF_VARCHAR2_TABLE_100
1351     , p5_a10 JTF_NUMBER_TABLE
1352     , p5_a11 JTF_VARCHAR2_TABLE_2000
1353     , p5_a12 JTF_VARCHAR2_TABLE_100
1354     , p5_a13 JTF_VARCHAR2_TABLE_500
1355     , p5_a14 JTF_VARCHAR2_TABLE_500
1356     , p5_a15 JTF_VARCHAR2_TABLE_500
1357     , p5_a16 JTF_VARCHAR2_TABLE_500
1358     , p5_a17 JTF_VARCHAR2_TABLE_500
1359     , p5_a18 JTF_VARCHAR2_TABLE_500
1360     , p5_a19 JTF_VARCHAR2_TABLE_500
1361     , p5_a20 JTF_VARCHAR2_TABLE_500
1362     , p5_a21 JTF_VARCHAR2_TABLE_500
1363     , p5_a22 JTF_VARCHAR2_TABLE_500
1364     , p5_a23 JTF_VARCHAR2_TABLE_500
1365     , p5_a24 JTF_VARCHAR2_TABLE_500
1366     , p5_a25 JTF_VARCHAR2_TABLE_500
1367     , p5_a26 JTF_VARCHAR2_TABLE_500
1368     , p5_a27 JTF_VARCHAR2_TABLE_500
1369     , p5_a28 JTF_NUMBER_TABLE
1370     , p5_a29 JTF_NUMBER_TABLE
1371     , p5_a30 JTF_NUMBER_TABLE
1372     , p5_a31 JTF_DATE_TABLE
1373     , p5_a32 JTF_NUMBER_TABLE
1374     , p5_a33 JTF_NUMBER_TABLE
1375     , p5_a34 JTF_DATE_TABLE
1376     , p5_a35 JTF_NUMBER_TABLE
1377     , p5_a36 JTF_DATE_TABLE
1378     , p5_a37 JTF_NUMBER_TABLE
1379     , p5_a38 JTF_VARCHAR2_TABLE_100
1380     , p5_a39 JTF_VARCHAR2_TABLE_100
1381     , p5_a40 JTF_NUMBER_TABLE
1382     , p5_a41 JTF_DATE_TABLE
1383     , p5_a42 JTF_NUMBER_TABLE
1384   )
1385 
1386   as
1387     ddp_btcv_tbl okl_btc_pvt.btcv_tbl_type;
1388     ddindx binary_integer; indx binary_integer;
1389   begin
1390 
1391     -- copy data to the local IN or IN-OUT args, if any
1392 
1393 
1394 
1395 
1396 
1397     okl_btc_pvt_w.rosetta_table_copy_in_p8(ddp_btcv_tbl, p5_a0
1398       , p5_a1
1399       , p5_a2
1400       , p5_a3
1401       , p5_a4
1402       , p5_a5
1403       , p5_a6
1404       , p5_a7
1405       , p5_a8
1406       , p5_a9
1407       , p5_a10
1408       , p5_a11
1409       , p5_a12
1410       , p5_a13
1411       , p5_a14
1412       , p5_a15
1413       , p5_a16
1414       , p5_a17
1415       , p5_a18
1416       , p5_a19
1417       , p5_a20
1418       , p5_a21
1419       , p5_a22
1420       , p5_a23
1421       , p5_a24
1422       , p5_a25
1423       , p5_a26
1424       , p5_a27
1425       , p5_a28
1426       , p5_a29
1427       , p5_a30
1428       , p5_a31
1429       , p5_a32
1430       , p5_a33
1431       , p5_a34
1432       , p5_a35
1433       , p5_a36
1434       , p5_a37
1435       , p5_a38
1436       , p5_a39
1437       , p5_a40
1438       , p5_a41
1439       , p5_a42
1440       );
1441 
1442     -- here's the delegated call to the old PL/SQL routine
1443     okl_btc_pvt.lock_row(p_api_version,
1444       p_init_msg_list,
1445       x_return_status,
1446       x_msg_count,
1447       x_msg_data,
1448       ddp_btcv_tbl);
1449 
1450     -- copy data back from the local variables to OUT or IN-OUT args, if any
1451 
1452 
1453 
1454 
1455 
1456   end;
1457 
1458   procedure update_row(p_api_version  NUMBER
1459     , p_init_msg_list  VARCHAR2
1460     , x_return_status out nocopy  VARCHAR2
1461     , x_msg_count out nocopy  NUMBER
1462     , x_msg_data out nocopy  VARCHAR2
1463     , p6_a0 out nocopy  NUMBER
1464     , p6_a1 out nocopy  NUMBER
1465     , p6_a2 out nocopy  VARCHAR2
1466     , p6_a3 out nocopy  VARCHAR2
1467     , p6_a4 out nocopy  DATE
1468     , p6_a5 out nocopy  DATE
1469     , p6_a6 out nocopy  DATE
1470     , p6_a7 out nocopy  NUMBER
1471     , p6_a8 out nocopy  NUMBER
1472     , p6_a9 out nocopy  VARCHAR2
1473     , p6_a10 out nocopy  NUMBER
1474     , p6_a11 out nocopy  VARCHAR2
1475     , p6_a12 out nocopy  VARCHAR2
1476     , p6_a13 out nocopy  VARCHAR2
1477     , p6_a14 out nocopy  VARCHAR2
1478     , p6_a15 out nocopy  VARCHAR2
1479     , p6_a16 out nocopy  VARCHAR2
1480     , p6_a17 out nocopy  VARCHAR2
1481     , p6_a18 out nocopy  VARCHAR2
1482     , p6_a19 out nocopy  VARCHAR2
1483     , p6_a20 out nocopy  VARCHAR2
1484     , p6_a21 out nocopy  VARCHAR2
1485     , p6_a22 out nocopy  VARCHAR2
1486     , p6_a23 out nocopy  VARCHAR2
1487     , p6_a24 out nocopy  VARCHAR2
1488     , p6_a25 out nocopy  VARCHAR2
1489     , p6_a26 out nocopy  VARCHAR2
1490     , p6_a27 out nocopy  VARCHAR2
1491     , p6_a28 out nocopy  NUMBER
1492     , p6_a29 out nocopy  NUMBER
1493     , p6_a30 out nocopy  NUMBER
1494     , p6_a31 out nocopy  DATE
1495     , p6_a32 out nocopy  NUMBER
1496     , p6_a33 out nocopy  NUMBER
1497     , p6_a34 out nocopy  DATE
1498     , p6_a35 out nocopy  NUMBER
1499     , p6_a36 out nocopy  DATE
1500     , p6_a37 out nocopy  NUMBER
1501     , p6_a38 out nocopy  VARCHAR2
1502     , p6_a39 out nocopy  VARCHAR2
1503     , p6_a40 out nocopy  NUMBER
1504     , p6_a41 out nocopy  DATE
1505     , p6_a42 out nocopy  NUMBER
1506     , p5_a0  NUMBER := 0-1962.0724
1507     , p5_a1  NUMBER := 0-1962.0724
1508     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1509     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1510     , p5_a4  DATE := fnd_api.g_miss_date
1511     , p5_a5  DATE := fnd_api.g_miss_date
1512     , p5_a6  DATE := fnd_api.g_miss_date
1513     , p5_a7  NUMBER := 0-1962.0724
1514     , p5_a8  NUMBER := 0-1962.0724
1515     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
1516     , p5_a10  NUMBER := 0-1962.0724
1517     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
1518     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
1519     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1520     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1521     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1522     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1523     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
1524     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
1525     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
1526     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
1527     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
1528     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
1529     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
1530     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
1531     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
1532     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
1533     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1534     , p5_a28  NUMBER := 0-1962.0724
1535     , p5_a29  NUMBER := 0-1962.0724
1536     , p5_a30  NUMBER := 0-1962.0724
1537     , p5_a31  DATE := fnd_api.g_miss_date
1538     , p5_a32  NUMBER := 0-1962.0724
1539     , p5_a33  NUMBER := 0-1962.0724
1540     , p5_a34  DATE := fnd_api.g_miss_date
1541     , p5_a35  NUMBER := 0-1962.0724
1542     , p5_a36  DATE := fnd_api.g_miss_date
1543     , p5_a37  NUMBER := 0-1962.0724
1544     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1545     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1546     , p5_a40  NUMBER := 0-1962.0724
1547     , p5_a41  DATE := fnd_api.g_miss_date
1548     , p5_a42  NUMBER := 0-1962.0724
1549   )
1550 
1551   as
1552     ddp_btcv_rec okl_btc_pvt.btcv_rec_type;
1553     ddx_btcv_rec okl_btc_pvt.btcv_rec_type;
1554     ddindx binary_integer; indx binary_integer;
1555   begin
1556 
1557     -- copy data to the local IN or IN-OUT args, if any
1558 
1559 
1560 
1561 
1562 
1563     ddp_btcv_rec.id := rosetta_g_miss_num_map(p5_a0);
1564     ddp_btcv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1565     ddp_btcv_rec.sfwt_flag := p5_a2;
1566     ddp_btcv_rec.name := p5_a3;
1567     ddp_btcv_rec.date_entered := rosetta_g_miss_date_in_map(p5_a4);
1568     ddp_btcv_rec.date_gl_requested := rosetta_g_miss_date_in_map(p5_a5);
1569     ddp_btcv_rec.date_deposit := rosetta_g_miss_date_in_map(p5_a6);
1570     ddp_btcv_rec.batch_qty := rosetta_g_miss_num_map(p5_a7);
1571     ddp_btcv_rec.batch_total := rosetta_g_miss_num_map(p5_a8);
1572     ddp_btcv_rec.batch_currency := p5_a9;
1573     ddp_btcv_rec.irm_id := rosetta_g_miss_num_map(p5_a10);
1574     ddp_btcv_rec.description := p5_a11;
1575     ddp_btcv_rec.attribute_category := p5_a12;
1576     ddp_btcv_rec.attribute1 := p5_a13;
1577     ddp_btcv_rec.attribute2 := p5_a14;
1578     ddp_btcv_rec.attribute3 := p5_a15;
1579     ddp_btcv_rec.attribute4 := p5_a16;
1580     ddp_btcv_rec.attribute5 := p5_a17;
1581     ddp_btcv_rec.attribute6 := p5_a18;
1582     ddp_btcv_rec.attribute7 := p5_a19;
1583     ddp_btcv_rec.attribute8 := p5_a20;
1584     ddp_btcv_rec.attribute9 := p5_a21;
1585     ddp_btcv_rec.attribute10 := p5_a22;
1586     ddp_btcv_rec.attribute11 := p5_a23;
1587     ddp_btcv_rec.attribute12 := p5_a24;
1588     ddp_btcv_rec.attribute13 := p5_a25;
1589     ddp_btcv_rec.attribute14 := p5_a26;
1590     ddp_btcv_rec.attribute15 := p5_a27;
1591     ddp_btcv_rec.request_id := rosetta_g_miss_num_map(p5_a28);
1592     ddp_btcv_rec.program_application_id := rosetta_g_miss_num_map(p5_a29);
1593     ddp_btcv_rec.program_id := rosetta_g_miss_num_map(p5_a30);
1594     ddp_btcv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a31);
1595     ddp_btcv_rec.org_id := rosetta_g_miss_num_map(p5_a32);
1596     ddp_btcv_rec.created_by := rosetta_g_miss_num_map(p5_a33);
1597     ddp_btcv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a34);
1598     ddp_btcv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a35);
1599     ddp_btcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a36);
1600     ddp_btcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a37);
1601     ddp_btcv_rec.trx_status_code := p5_a38;
1602     ddp_btcv_rec.currency_conversion_type := p5_a39;
1603     ddp_btcv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
1604     ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
1605     ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
1606 
1607 
1608     -- here's the delegated call to the old PL/SQL routine
1609     okl_btc_pvt.update_row(p_api_version,
1610       p_init_msg_list,
1611       x_return_status,
1612       x_msg_count,
1613       x_msg_data,
1614       ddp_btcv_rec,
1615       ddx_btcv_rec);
1616 
1617     -- copy data back from the local variables to OUT or IN-OUT args, if any
1618 
1619 
1620 
1621 
1622 
1623 
1624     p6_a0 := rosetta_g_miss_num_map(ddx_btcv_rec.id);
1625     p6_a1 := rosetta_g_miss_num_map(ddx_btcv_rec.object_version_number);
1626     p6_a2 := ddx_btcv_rec.sfwt_flag;
1627     p6_a3 := ddx_btcv_rec.name;
1628     p6_a4 := ddx_btcv_rec.date_entered;
1629     p6_a5 := ddx_btcv_rec.date_gl_requested;
1630     p6_a6 := ddx_btcv_rec.date_deposit;
1631     p6_a7 := rosetta_g_miss_num_map(ddx_btcv_rec.batch_qty);
1632     p6_a8 := rosetta_g_miss_num_map(ddx_btcv_rec.batch_total);
1633     p6_a9 := ddx_btcv_rec.batch_currency;
1634     p6_a10 := rosetta_g_miss_num_map(ddx_btcv_rec.irm_id);
1635     p6_a11 := ddx_btcv_rec.description;
1636     p6_a12 := ddx_btcv_rec.attribute_category;
1637     p6_a13 := ddx_btcv_rec.attribute1;
1638     p6_a14 := ddx_btcv_rec.attribute2;
1639     p6_a15 := ddx_btcv_rec.attribute3;
1640     p6_a16 := ddx_btcv_rec.attribute4;
1641     p6_a17 := ddx_btcv_rec.attribute5;
1642     p6_a18 := ddx_btcv_rec.attribute6;
1643     p6_a19 := ddx_btcv_rec.attribute7;
1644     p6_a20 := ddx_btcv_rec.attribute8;
1645     p6_a21 := ddx_btcv_rec.attribute9;
1646     p6_a22 := ddx_btcv_rec.attribute10;
1647     p6_a23 := ddx_btcv_rec.attribute11;
1648     p6_a24 := ddx_btcv_rec.attribute12;
1649     p6_a25 := ddx_btcv_rec.attribute13;
1650     p6_a26 := ddx_btcv_rec.attribute14;
1651     p6_a27 := ddx_btcv_rec.attribute15;
1652     p6_a28 := rosetta_g_miss_num_map(ddx_btcv_rec.request_id);
1653     p6_a29 := rosetta_g_miss_num_map(ddx_btcv_rec.program_application_id);
1654     p6_a30 := rosetta_g_miss_num_map(ddx_btcv_rec.program_id);
1655     p6_a31 := ddx_btcv_rec.program_update_date;
1656     p6_a32 := rosetta_g_miss_num_map(ddx_btcv_rec.org_id);
1657     p6_a33 := rosetta_g_miss_num_map(ddx_btcv_rec.created_by);
1658     p6_a34 := ddx_btcv_rec.creation_date;
1659     p6_a35 := rosetta_g_miss_num_map(ddx_btcv_rec.last_updated_by);
1660     p6_a36 := ddx_btcv_rec.last_update_date;
1661     p6_a37 := rosetta_g_miss_num_map(ddx_btcv_rec.last_update_login);
1662     p6_a38 := ddx_btcv_rec.trx_status_code;
1663     p6_a39 := ddx_btcv_rec.currency_conversion_type;
1664     p6_a40 := rosetta_g_miss_num_map(ddx_btcv_rec.currency_conversion_rate);
1665     p6_a41 := ddx_btcv_rec.currency_conversion_date;
1666     p6_a42 := rosetta_g_miss_num_map(ddx_btcv_rec.remit_bank_id);
1667   end;
1668 
1669   procedure update_row(p_api_version  NUMBER
1670     , p_init_msg_list  VARCHAR2
1671     , x_return_status out nocopy  VARCHAR2
1672     , x_msg_count out nocopy  NUMBER
1673     , x_msg_data out nocopy  VARCHAR2
1674     , p5_a0 JTF_NUMBER_TABLE
1675     , p5_a1 JTF_NUMBER_TABLE
1676     , p5_a2 JTF_VARCHAR2_TABLE_100
1677     , p5_a3 JTF_VARCHAR2_TABLE_200
1678     , p5_a4 JTF_DATE_TABLE
1679     , p5_a5 JTF_DATE_TABLE
1680     , p5_a6 JTF_DATE_TABLE
1681     , p5_a7 JTF_NUMBER_TABLE
1682     , p5_a8 JTF_NUMBER_TABLE
1683     , p5_a9 JTF_VARCHAR2_TABLE_100
1684     , p5_a10 JTF_NUMBER_TABLE
1685     , p5_a11 JTF_VARCHAR2_TABLE_2000
1686     , p5_a12 JTF_VARCHAR2_TABLE_100
1687     , p5_a13 JTF_VARCHAR2_TABLE_500
1688     , p5_a14 JTF_VARCHAR2_TABLE_500
1689     , p5_a15 JTF_VARCHAR2_TABLE_500
1690     , p5_a16 JTF_VARCHAR2_TABLE_500
1691     , p5_a17 JTF_VARCHAR2_TABLE_500
1692     , p5_a18 JTF_VARCHAR2_TABLE_500
1693     , p5_a19 JTF_VARCHAR2_TABLE_500
1694     , p5_a20 JTF_VARCHAR2_TABLE_500
1695     , p5_a21 JTF_VARCHAR2_TABLE_500
1696     , p5_a22 JTF_VARCHAR2_TABLE_500
1697     , p5_a23 JTF_VARCHAR2_TABLE_500
1698     , p5_a24 JTF_VARCHAR2_TABLE_500
1699     , p5_a25 JTF_VARCHAR2_TABLE_500
1700     , p5_a26 JTF_VARCHAR2_TABLE_500
1701     , p5_a27 JTF_VARCHAR2_TABLE_500
1702     , p5_a28 JTF_NUMBER_TABLE
1703     , p5_a29 JTF_NUMBER_TABLE
1704     , p5_a30 JTF_NUMBER_TABLE
1705     , p5_a31 JTF_DATE_TABLE
1706     , p5_a32 JTF_NUMBER_TABLE
1707     , p5_a33 JTF_NUMBER_TABLE
1708     , p5_a34 JTF_DATE_TABLE
1709     , p5_a35 JTF_NUMBER_TABLE
1710     , p5_a36 JTF_DATE_TABLE
1711     , p5_a37 JTF_NUMBER_TABLE
1712     , p5_a38 JTF_VARCHAR2_TABLE_100
1713     , p5_a39 JTF_VARCHAR2_TABLE_100
1714     , p5_a40 JTF_NUMBER_TABLE
1715     , p5_a41 JTF_DATE_TABLE
1716     , p5_a42 JTF_NUMBER_TABLE
1717     , p6_a0 out nocopy JTF_NUMBER_TABLE
1718     , p6_a1 out nocopy JTF_NUMBER_TABLE
1719     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1720     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_200
1721     , p6_a4 out nocopy JTF_DATE_TABLE
1722     , p6_a5 out nocopy JTF_DATE_TABLE
1723     , p6_a6 out nocopy JTF_DATE_TABLE
1724     , p6_a7 out nocopy JTF_NUMBER_TABLE
1725     , p6_a8 out nocopy JTF_NUMBER_TABLE
1726     , p6_a9 out nocopy JTF_VARCHAR2_TABLE_100
1727     , p6_a10 out nocopy JTF_NUMBER_TABLE
1728     , p6_a11 out nocopy JTF_VARCHAR2_TABLE_2000
1729     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
1730     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
1731     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1732     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1733     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1734     , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1735     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1736     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1737     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1738     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1739     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
1740     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
1741     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
1742     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
1743     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
1744     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
1745     , p6_a28 out nocopy JTF_NUMBER_TABLE
1746     , p6_a29 out nocopy JTF_NUMBER_TABLE
1747     , p6_a30 out nocopy JTF_NUMBER_TABLE
1748     , p6_a31 out nocopy JTF_DATE_TABLE
1749     , p6_a32 out nocopy JTF_NUMBER_TABLE
1750     , p6_a33 out nocopy JTF_NUMBER_TABLE
1751     , p6_a34 out nocopy JTF_DATE_TABLE
1752     , p6_a35 out nocopy JTF_NUMBER_TABLE
1753     , p6_a36 out nocopy JTF_DATE_TABLE
1754     , p6_a37 out nocopy JTF_NUMBER_TABLE
1755     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
1756     , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
1757     , p6_a40 out nocopy JTF_NUMBER_TABLE
1758     , p6_a41 out nocopy JTF_DATE_TABLE
1759     , p6_a42 out nocopy JTF_NUMBER_TABLE
1760   )
1761 
1762   as
1763     ddp_btcv_tbl okl_btc_pvt.btcv_tbl_type;
1764     ddx_btcv_tbl okl_btc_pvt.btcv_tbl_type;
1765     ddindx binary_integer; indx binary_integer;
1766   begin
1767 
1768     -- copy data to the local IN or IN-OUT args, if any
1769 
1770 
1771 
1772 
1773 
1774     okl_btc_pvt_w.rosetta_table_copy_in_p8(ddp_btcv_tbl, p5_a0
1775       , p5_a1
1776       , p5_a2
1777       , p5_a3
1778       , p5_a4
1779       , p5_a5
1780       , p5_a6
1781       , p5_a7
1782       , p5_a8
1783       , p5_a9
1784       , p5_a10
1785       , p5_a11
1786       , p5_a12
1787       , p5_a13
1788       , p5_a14
1789       , p5_a15
1790       , p5_a16
1791       , p5_a17
1792       , p5_a18
1793       , p5_a19
1794       , p5_a20
1795       , p5_a21
1796       , p5_a22
1797       , p5_a23
1798       , p5_a24
1799       , p5_a25
1800       , p5_a26
1801       , p5_a27
1802       , p5_a28
1803       , p5_a29
1804       , p5_a30
1805       , p5_a31
1806       , p5_a32
1807       , p5_a33
1808       , p5_a34
1809       , p5_a35
1810       , p5_a36
1811       , p5_a37
1812       , p5_a38
1813       , p5_a39
1814       , p5_a40
1815       , p5_a41
1816       , p5_a42
1817       );
1818 
1819 
1820     -- here's the delegated call to the old PL/SQL routine
1821     okl_btc_pvt.update_row(p_api_version,
1822       p_init_msg_list,
1823       x_return_status,
1824       x_msg_count,
1825       x_msg_data,
1826       ddp_btcv_tbl,
1827       ddx_btcv_tbl);
1828 
1829     -- copy data back from the local variables to OUT or IN-OUT args, if any
1830 
1831 
1832 
1833 
1834 
1835 
1836     okl_btc_pvt_w.rosetta_table_copy_out_p8(ddx_btcv_tbl, p6_a0
1837       , p6_a1
1838       , p6_a2
1839       , p6_a3
1840       , p6_a4
1841       , p6_a5
1842       , p6_a6
1843       , p6_a7
1844       , p6_a8
1845       , p6_a9
1846       , p6_a10
1847       , p6_a11
1848       , p6_a12
1849       , p6_a13
1850       , p6_a14
1851       , p6_a15
1852       , p6_a16
1853       , p6_a17
1854       , p6_a18
1855       , p6_a19
1856       , p6_a20
1857       , p6_a21
1858       , p6_a22
1859       , p6_a23
1860       , p6_a24
1861       , p6_a25
1862       , p6_a26
1863       , p6_a27
1864       , p6_a28
1865       , p6_a29
1866       , p6_a30
1867       , p6_a31
1868       , p6_a32
1869       , p6_a33
1870       , p6_a34
1871       , p6_a35
1872       , p6_a36
1873       , p6_a37
1874       , p6_a38
1875       , p6_a39
1876       , p6_a40
1877       , p6_a41
1878       , p6_a42
1879       );
1880   end;
1881 
1882   procedure delete_row(p_api_version  NUMBER
1883     , p_init_msg_list  VARCHAR2
1884     , x_return_status out nocopy  VARCHAR2
1885     , x_msg_count out nocopy  NUMBER
1886     , x_msg_data out nocopy  VARCHAR2
1887     , p5_a0  NUMBER := 0-1962.0724
1888     , p5_a1  NUMBER := 0-1962.0724
1889     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1890     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1891     , p5_a4  DATE := fnd_api.g_miss_date
1892     , p5_a5  DATE := fnd_api.g_miss_date
1893     , p5_a6  DATE := fnd_api.g_miss_date
1894     , p5_a7  NUMBER := 0-1962.0724
1895     , p5_a8  NUMBER := 0-1962.0724
1896     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
1897     , p5_a10  NUMBER := 0-1962.0724
1898     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
1899     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
1900     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1901     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1902     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1903     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1904     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
1905     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
1906     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
1907     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
1908     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
1909     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
1910     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
1911     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
1912     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
1913     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
1914     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1915     , p5_a28  NUMBER := 0-1962.0724
1916     , p5_a29  NUMBER := 0-1962.0724
1917     , p5_a30  NUMBER := 0-1962.0724
1918     , p5_a31  DATE := fnd_api.g_miss_date
1919     , p5_a32  NUMBER := 0-1962.0724
1920     , p5_a33  NUMBER := 0-1962.0724
1921     , p5_a34  DATE := fnd_api.g_miss_date
1922     , p5_a35  NUMBER := 0-1962.0724
1923     , p5_a36  DATE := fnd_api.g_miss_date
1924     , p5_a37  NUMBER := 0-1962.0724
1925     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1926     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1927     , p5_a40  NUMBER := 0-1962.0724
1928     , p5_a41  DATE := fnd_api.g_miss_date
1929     , p5_a42  NUMBER := 0-1962.0724
1930   )
1931 
1932   as
1933     ddp_btcv_rec okl_btc_pvt.btcv_rec_type;
1934     ddindx binary_integer; indx binary_integer;
1935   begin
1936 
1937     -- copy data to the local IN or IN-OUT args, if any
1938 
1939 
1940 
1941 
1942 
1943     ddp_btcv_rec.id := rosetta_g_miss_num_map(p5_a0);
1944     ddp_btcv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1945     ddp_btcv_rec.sfwt_flag := p5_a2;
1946     ddp_btcv_rec.name := p5_a3;
1947     ddp_btcv_rec.date_entered := rosetta_g_miss_date_in_map(p5_a4);
1948     ddp_btcv_rec.date_gl_requested := rosetta_g_miss_date_in_map(p5_a5);
1949     ddp_btcv_rec.date_deposit := rosetta_g_miss_date_in_map(p5_a6);
1950     ddp_btcv_rec.batch_qty := rosetta_g_miss_num_map(p5_a7);
1951     ddp_btcv_rec.batch_total := rosetta_g_miss_num_map(p5_a8);
1952     ddp_btcv_rec.batch_currency := p5_a9;
1953     ddp_btcv_rec.irm_id := rosetta_g_miss_num_map(p5_a10);
1954     ddp_btcv_rec.description := p5_a11;
1955     ddp_btcv_rec.attribute_category := p5_a12;
1956     ddp_btcv_rec.attribute1 := p5_a13;
1957     ddp_btcv_rec.attribute2 := p5_a14;
1958     ddp_btcv_rec.attribute3 := p5_a15;
1959     ddp_btcv_rec.attribute4 := p5_a16;
1960     ddp_btcv_rec.attribute5 := p5_a17;
1961     ddp_btcv_rec.attribute6 := p5_a18;
1962     ddp_btcv_rec.attribute7 := p5_a19;
1963     ddp_btcv_rec.attribute8 := p5_a20;
1964     ddp_btcv_rec.attribute9 := p5_a21;
1965     ddp_btcv_rec.attribute10 := p5_a22;
1966     ddp_btcv_rec.attribute11 := p5_a23;
1967     ddp_btcv_rec.attribute12 := p5_a24;
1968     ddp_btcv_rec.attribute13 := p5_a25;
1969     ddp_btcv_rec.attribute14 := p5_a26;
1970     ddp_btcv_rec.attribute15 := p5_a27;
1971     ddp_btcv_rec.request_id := rosetta_g_miss_num_map(p5_a28);
1972     ddp_btcv_rec.program_application_id := rosetta_g_miss_num_map(p5_a29);
1973     ddp_btcv_rec.program_id := rosetta_g_miss_num_map(p5_a30);
1974     ddp_btcv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a31);
1975     ddp_btcv_rec.org_id := rosetta_g_miss_num_map(p5_a32);
1976     ddp_btcv_rec.created_by := rosetta_g_miss_num_map(p5_a33);
1977     ddp_btcv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a34);
1978     ddp_btcv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a35);
1979     ddp_btcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a36);
1980     ddp_btcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a37);
1981     ddp_btcv_rec.trx_status_code := p5_a38;
1982     ddp_btcv_rec.currency_conversion_type := p5_a39;
1983     ddp_btcv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
1984     ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
1985     ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
1986 
1987     -- here's the delegated call to the old PL/SQL routine
1988     okl_btc_pvt.delete_row(p_api_version,
1989       p_init_msg_list,
1990       x_return_status,
1991       x_msg_count,
1992       x_msg_data,
1993       ddp_btcv_rec);
1994 
1995     -- copy data back from the local variables to OUT or IN-OUT args, if any
1996 
1997 
1998 
1999 
2000 
2001   end;
2002 
2003   procedure delete_row(p_api_version  NUMBER
2004     , p_init_msg_list  VARCHAR2
2005     , x_return_status out nocopy  VARCHAR2
2006     , x_msg_count out nocopy  NUMBER
2007     , x_msg_data out nocopy  VARCHAR2
2008     , p5_a0 JTF_NUMBER_TABLE
2009     , p5_a1 JTF_NUMBER_TABLE
2010     , p5_a2 JTF_VARCHAR2_TABLE_100
2011     , p5_a3 JTF_VARCHAR2_TABLE_200
2012     , p5_a4 JTF_DATE_TABLE
2013     , p5_a5 JTF_DATE_TABLE
2014     , p5_a6 JTF_DATE_TABLE
2015     , p5_a7 JTF_NUMBER_TABLE
2016     , p5_a8 JTF_NUMBER_TABLE
2017     , p5_a9 JTF_VARCHAR2_TABLE_100
2018     , p5_a10 JTF_NUMBER_TABLE
2019     , p5_a11 JTF_VARCHAR2_TABLE_2000
2020     , p5_a12 JTF_VARCHAR2_TABLE_100
2021     , p5_a13 JTF_VARCHAR2_TABLE_500
2022     , p5_a14 JTF_VARCHAR2_TABLE_500
2023     , p5_a15 JTF_VARCHAR2_TABLE_500
2024     , p5_a16 JTF_VARCHAR2_TABLE_500
2025     , p5_a17 JTF_VARCHAR2_TABLE_500
2026     , p5_a18 JTF_VARCHAR2_TABLE_500
2027     , p5_a19 JTF_VARCHAR2_TABLE_500
2028     , p5_a20 JTF_VARCHAR2_TABLE_500
2029     , p5_a21 JTF_VARCHAR2_TABLE_500
2030     , p5_a22 JTF_VARCHAR2_TABLE_500
2031     , p5_a23 JTF_VARCHAR2_TABLE_500
2032     , p5_a24 JTF_VARCHAR2_TABLE_500
2033     , p5_a25 JTF_VARCHAR2_TABLE_500
2034     , p5_a26 JTF_VARCHAR2_TABLE_500
2035     , p5_a27 JTF_VARCHAR2_TABLE_500
2036     , p5_a28 JTF_NUMBER_TABLE
2037     , p5_a29 JTF_NUMBER_TABLE
2038     , p5_a30 JTF_NUMBER_TABLE
2039     , p5_a31 JTF_DATE_TABLE
2040     , p5_a32 JTF_NUMBER_TABLE
2041     , p5_a33 JTF_NUMBER_TABLE
2042     , p5_a34 JTF_DATE_TABLE
2043     , p5_a35 JTF_NUMBER_TABLE
2044     , p5_a36 JTF_DATE_TABLE
2045     , p5_a37 JTF_NUMBER_TABLE
2046     , p5_a38 JTF_VARCHAR2_TABLE_100
2047     , p5_a39 JTF_VARCHAR2_TABLE_100
2048     , p5_a40 JTF_NUMBER_TABLE
2049     , p5_a41 JTF_DATE_TABLE
2050     , p5_a42 JTF_NUMBER_TABLE
2051   )
2052 
2053   as
2054     ddp_btcv_tbl okl_btc_pvt.btcv_tbl_type;
2055     ddindx binary_integer; indx binary_integer;
2056   begin
2057 
2058     -- copy data to the local IN or IN-OUT args, if any
2059 
2060 
2061 
2062 
2063 
2064     okl_btc_pvt_w.rosetta_table_copy_in_p8(ddp_btcv_tbl, p5_a0
2065       , p5_a1
2066       , p5_a2
2067       , p5_a3
2068       , p5_a4
2069       , p5_a5
2070       , p5_a6
2071       , p5_a7
2072       , p5_a8
2073       , p5_a9
2074       , p5_a10
2075       , p5_a11
2076       , p5_a12
2077       , p5_a13
2078       , p5_a14
2079       , p5_a15
2080       , p5_a16
2081       , p5_a17
2082       , p5_a18
2083       , p5_a19
2084       , p5_a20
2085       , p5_a21
2086       , p5_a22
2087       , p5_a23
2088       , p5_a24
2089       , p5_a25
2090       , p5_a26
2091       , p5_a27
2092       , p5_a28
2093       , p5_a29
2094       , p5_a30
2095       , p5_a31
2096       , p5_a32
2097       , p5_a33
2098       , p5_a34
2099       , p5_a35
2100       , p5_a36
2101       , p5_a37
2102       , p5_a38
2103       , p5_a39
2104       , p5_a40
2105       , p5_a41
2106       , p5_a42
2107       );
2108 
2109     -- here's the delegated call to the old PL/SQL routine
2110     okl_btc_pvt.delete_row(p_api_version,
2111       p_init_msg_list,
2112       x_return_status,
2113       x_msg_count,
2114       x_msg_data,
2115       ddp_btcv_tbl);
2116 
2117     -- copy data back from the local variables to OUT or IN-OUT args, if any
2118 
2119 
2120 
2121 
2122 
2123   end;
2124 
2125   procedure validate_row(p_api_version  NUMBER
2126     , p_init_msg_list  VARCHAR2
2127     , x_return_status out nocopy  VARCHAR2
2128     , x_msg_count out nocopy  NUMBER
2129     , x_msg_data out nocopy  VARCHAR2
2130     , p5_a0  NUMBER := 0-1962.0724
2131     , p5_a1  NUMBER := 0-1962.0724
2132     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
2133     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
2134     , p5_a4  DATE := fnd_api.g_miss_date
2135     , p5_a5  DATE := fnd_api.g_miss_date
2136     , p5_a6  DATE := fnd_api.g_miss_date
2137     , p5_a7  NUMBER := 0-1962.0724
2138     , p5_a8  NUMBER := 0-1962.0724
2139     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
2140     , p5_a10  NUMBER := 0-1962.0724
2141     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
2142     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
2143     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
2144     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
2145     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
2146     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
2147     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
2148     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
2149     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
2150     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
2151     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
2152     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
2153     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
2154     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
2155     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
2156     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
2157     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
2158     , p5_a28  NUMBER := 0-1962.0724
2159     , p5_a29  NUMBER := 0-1962.0724
2160     , p5_a30  NUMBER := 0-1962.0724
2161     , p5_a31  DATE := fnd_api.g_miss_date
2162     , p5_a32  NUMBER := 0-1962.0724
2163     , p5_a33  NUMBER := 0-1962.0724
2164     , p5_a34  DATE := fnd_api.g_miss_date
2165     , p5_a35  NUMBER := 0-1962.0724
2166     , p5_a36  DATE := fnd_api.g_miss_date
2167     , p5_a37  NUMBER := 0-1962.0724
2168     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
2169     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
2170     , p5_a40  NUMBER := 0-1962.0724
2171     , p5_a41  DATE := fnd_api.g_miss_date
2172     , p5_a42  NUMBER := 0-1962.0724
2173   )
2174 
2175   as
2176     ddp_btcv_rec okl_btc_pvt.btcv_rec_type;
2177     ddindx binary_integer; indx binary_integer;
2178   begin
2179 
2180     -- copy data to the local IN or IN-OUT args, if any
2181 
2182 
2183 
2184 
2185 
2186     ddp_btcv_rec.id := rosetta_g_miss_num_map(p5_a0);
2187     ddp_btcv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2188     ddp_btcv_rec.sfwt_flag := p5_a2;
2189     ddp_btcv_rec.name := p5_a3;
2190     ddp_btcv_rec.date_entered := rosetta_g_miss_date_in_map(p5_a4);
2191     ddp_btcv_rec.date_gl_requested := rosetta_g_miss_date_in_map(p5_a5);
2192     ddp_btcv_rec.date_deposit := rosetta_g_miss_date_in_map(p5_a6);
2193     ddp_btcv_rec.batch_qty := rosetta_g_miss_num_map(p5_a7);
2194     ddp_btcv_rec.batch_total := rosetta_g_miss_num_map(p5_a8);
2195     ddp_btcv_rec.batch_currency := p5_a9;
2196     ddp_btcv_rec.irm_id := rosetta_g_miss_num_map(p5_a10);
2197     ddp_btcv_rec.description := p5_a11;
2198     ddp_btcv_rec.attribute_category := p5_a12;
2199     ddp_btcv_rec.attribute1 := p5_a13;
2200     ddp_btcv_rec.attribute2 := p5_a14;
2201     ddp_btcv_rec.attribute3 := p5_a15;
2202     ddp_btcv_rec.attribute4 := p5_a16;
2203     ddp_btcv_rec.attribute5 := p5_a17;
2204     ddp_btcv_rec.attribute6 := p5_a18;
2205     ddp_btcv_rec.attribute7 := p5_a19;
2206     ddp_btcv_rec.attribute8 := p5_a20;
2207     ddp_btcv_rec.attribute9 := p5_a21;
2208     ddp_btcv_rec.attribute10 := p5_a22;
2209     ddp_btcv_rec.attribute11 := p5_a23;
2210     ddp_btcv_rec.attribute12 := p5_a24;
2211     ddp_btcv_rec.attribute13 := p5_a25;
2212     ddp_btcv_rec.attribute14 := p5_a26;
2213     ddp_btcv_rec.attribute15 := p5_a27;
2214     ddp_btcv_rec.request_id := rosetta_g_miss_num_map(p5_a28);
2215     ddp_btcv_rec.program_application_id := rosetta_g_miss_num_map(p5_a29);
2216     ddp_btcv_rec.program_id := rosetta_g_miss_num_map(p5_a30);
2217     ddp_btcv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a31);
2218     ddp_btcv_rec.org_id := rosetta_g_miss_num_map(p5_a32);
2219     ddp_btcv_rec.created_by := rosetta_g_miss_num_map(p5_a33);
2220     ddp_btcv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a34);
2221     ddp_btcv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a35);
2222     ddp_btcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a36);
2223     ddp_btcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a37);
2224     ddp_btcv_rec.trx_status_code := p5_a38;
2225     ddp_btcv_rec.currency_conversion_type := p5_a39;
2226     ddp_btcv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
2227     ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
2228     ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
2229 
2230     -- here's the delegated call to the old PL/SQL routine
2231     okl_btc_pvt.validate_row(p_api_version,
2232       p_init_msg_list,
2233       x_return_status,
2234       x_msg_count,
2235       x_msg_data,
2236       ddp_btcv_rec);
2237 
2238     -- copy data back from the local variables to OUT or IN-OUT args, if any
2239 
2240 
2241 
2242 
2243 
2244   end;
2245 
2246   procedure validate_row(p_api_version  NUMBER
2247     , p_init_msg_list  VARCHAR2
2248     , x_return_status out nocopy  VARCHAR2
2249     , x_msg_count out nocopy  NUMBER
2250     , x_msg_data out nocopy  VARCHAR2
2251     , p5_a0 JTF_NUMBER_TABLE
2252     , p5_a1 JTF_NUMBER_TABLE
2253     , p5_a2 JTF_VARCHAR2_TABLE_100
2254     , p5_a3 JTF_VARCHAR2_TABLE_200
2255     , p5_a4 JTF_DATE_TABLE
2256     , p5_a5 JTF_DATE_TABLE
2257     , p5_a6 JTF_DATE_TABLE
2258     , p5_a7 JTF_NUMBER_TABLE
2259     , p5_a8 JTF_NUMBER_TABLE
2260     , p5_a9 JTF_VARCHAR2_TABLE_100
2261     , p5_a10 JTF_NUMBER_TABLE
2262     , p5_a11 JTF_VARCHAR2_TABLE_2000
2263     , p5_a12 JTF_VARCHAR2_TABLE_100
2264     , p5_a13 JTF_VARCHAR2_TABLE_500
2265     , p5_a14 JTF_VARCHAR2_TABLE_500
2266     , p5_a15 JTF_VARCHAR2_TABLE_500
2267     , p5_a16 JTF_VARCHAR2_TABLE_500
2268     , p5_a17 JTF_VARCHAR2_TABLE_500
2269     , p5_a18 JTF_VARCHAR2_TABLE_500
2270     , p5_a19 JTF_VARCHAR2_TABLE_500
2271     , p5_a20 JTF_VARCHAR2_TABLE_500
2272     , p5_a21 JTF_VARCHAR2_TABLE_500
2273     , p5_a22 JTF_VARCHAR2_TABLE_500
2274     , p5_a23 JTF_VARCHAR2_TABLE_500
2275     , p5_a24 JTF_VARCHAR2_TABLE_500
2276     , p5_a25 JTF_VARCHAR2_TABLE_500
2277     , p5_a26 JTF_VARCHAR2_TABLE_500
2278     , p5_a27 JTF_VARCHAR2_TABLE_500
2279     , p5_a28 JTF_NUMBER_TABLE
2280     , p5_a29 JTF_NUMBER_TABLE
2281     , p5_a30 JTF_NUMBER_TABLE
2282     , p5_a31 JTF_DATE_TABLE
2283     , p5_a32 JTF_NUMBER_TABLE
2284     , p5_a33 JTF_NUMBER_TABLE
2285     , p5_a34 JTF_DATE_TABLE
2286     , p5_a35 JTF_NUMBER_TABLE
2287     , p5_a36 JTF_DATE_TABLE
2288     , p5_a37 JTF_NUMBER_TABLE
2289     , p5_a38 JTF_VARCHAR2_TABLE_100
2290     , p5_a39 JTF_VARCHAR2_TABLE_100
2291     , p5_a40 JTF_NUMBER_TABLE
2292     , p5_a41 JTF_DATE_TABLE
2293     , p5_a42 JTF_NUMBER_TABLE
2294   )
2295 
2296   as
2297     ddp_btcv_tbl okl_btc_pvt.btcv_tbl_type;
2298     ddindx binary_integer; indx binary_integer;
2299   begin
2300 
2301     -- copy data to the local IN or IN-OUT args, if any
2302 
2303 
2304 
2305 
2306 
2307     okl_btc_pvt_w.rosetta_table_copy_in_p8(ddp_btcv_tbl, p5_a0
2308       , p5_a1
2309       , p5_a2
2310       , p5_a3
2311       , p5_a4
2312       , p5_a5
2313       , p5_a6
2314       , p5_a7
2315       , p5_a8
2316       , p5_a9
2317       , p5_a10
2318       , p5_a11
2319       , p5_a12
2320       , p5_a13
2321       , p5_a14
2322       , p5_a15
2323       , p5_a16
2324       , p5_a17
2325       , p5_a18
2326       , p5_a19
2327       , p5_a20
2328       , p5_a21
2329       , p5_a22
2330       , p5_a23
2331       , p5_a24
2332       , p5_a25
2333       , p5_a26
2334       , p5_a27
2335       , p5_a28
2336       , p5_a29
2337       , p5_a30
2338       , p5_a31
2339       , p5_a32
2340       , p5_a33
2341       , p5_a34
2342       , p5_a35
2343       , p5_a36
2344       , p5_a37
2345       , p5_a38
2346       , p5_a39
2347       , p5_a40
2348       , p5_a41
2349       , p5_a42
2350       );
2351 
2352     -- here's the delegated call to the old PL/SQL routine
2353     okl_btc_pvt.validate_row(p_api_version,
2354       p_init_msg_list,
2355       x_return_status,
2356       x_msg_count,
2357       x_msg_data,
2358       ddp_btcv_tbl);
2359 
2360     -- copy data back from the local variables to OUT or IN-OUT args, if any
2361 
2362 
2363 
2364 
2365 
2366   end;
2367 
2368 end okl_btc_pvt_w;