DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_TIL_PVT_W

Source


1 package body okl_til_pvt_w as
2   /* $Header: OKLITILB.pls 120.4 2007/07/20 09:42:01 akrangan 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_til_pvt.til_tbl_type, a0 JTF_NUMBER_TABLE
26     , a1 JTF_VARCHAR2_TABLE_100
27     , a2 JTF_NUMBER_TABLE
28     , a3 JTF_NUMBER_TABLE
29     , a4 JTF_NUMBER_TABLE
30     , a5 JTF_NUMBER_TABLE
31     , a6 JTF_NUMBER_TABLE
32     , a7 JTF_NUMBER_TABLE
33     , a8 JTF_NUMBER_TABLE
34     , a9 JTF_NUMBER_TABLE
35     , a10 JTF_NUMBER_TABLE
36     , a11 JTF_NUMBER_TABLE
37     , a12 JTF_NUMBER_TABLE
38     , a13 JTF_NUMBER_TABLE
39     , a14 JTF_DATE_TABLE
40     , a15 JTF_DATE_TABLE
41     , a16 JTF_NUMBER_TABLE
42     , a17 JTF_NUMBER_TABLE
43     , a18 JTF_NUMBER_TABLE
44     , a19 JTF_DATE_TABLE
45     , a20 JTF_NUMBER_TABLE
46     , a21 JTF_NUMBER_TABLE
47     , a22 JTF_NUMBER_TABLE
48     , a23 JTF_NUMBER_TABLE
49     , a24 JTF_NUMBER_TABLE
50     , a25 JTF_NUMBER_TABLE
51     , a26 JTF_NUMBER_TABLE
52     , a27 JTF_NUMBER_TABLE
53     , a28 JTF_NUMBER_TABLE
54     , a29 JTF_NUMBER_TABLE
55     , a30 JTF_VARCHAR2_TABLE_100
56     , a31 JTF_VARCHAR2_TABLE_500
57     , a32 JTF_VARCHAR2_TABLE_500
58     , a33 JTF_VARCHAR2_TABLE_500
59     , a34 JTF_VARCHAR2_TABLE_500
60     , a35 JTF_VARCHAR2_TABLE_500
61     , a36 JTF_VARCHAR2_TABLE_500
62     , a37 JTF_VARCHAR2_TABLE_500
63     , a38 JTF_VARCHAR2_TABLE_500
64     , a39 JTF_VARCHAR2_TABLE_500
65     , a40 JTF_VARCHAR2_TABLE_500
66     , a41 JTF_VARCHAR2_TABLE_500
67     , a42 JTF_VARCHAR2_TABLE_500
68     , a43 JTF_VARCHAR2_TABLE_500
69     , a44 JTF_VARCHAR2_TABLE_500
70     , a45 JTF_VARCHAR2_TABLE_500
71     , a46 JTF_NUMBER_TABLE
72     , a47 JTF_DATE_TABLE
73     , a48 JTF_NUMBER_TABLE
74     , a49 JTF_DATE_TABLE
75     , a50 JTF_NUMBER_TABLE
76     , a51 JTF_NUMBER_TABLE
77     , a52 JTF_NUMBER_TABLE
78     ) as
79     ddindx binary_integer; indx binary_integer;
80   begin
81   if a0 is not null and a0.count > 0 then
82       if a0.count > 0 then
83         indx := a0.first;
84         ddindx := 1;
85         while true loop
86           t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
87           t(ddindx).inv_receiv_line_code := a1(indx);
88           t(ddindx).tai_id := rosetta_g_miss_num_map(a2(indx));
89           t(ddindx).kle_id := rosetta_g_miss_num_map(a3(indx));
90           t(ddindx).tpl_id := rosetta_g_miss_num_map(a4(indx));
91           t(ddindx).sty_id := rosetta_g_miss_num_map(a5(indx));
92           t(ddindx).acn_id_cost := rosetta_g_miss_num_map(a6(indx));
93           t(ddindx).til_id_reverses := rosetta_g_miss_num_map(a7(indx));
94           t(ddindx).line_number := rosetta_g_miss_num_map(a8(indx));
95           t(ddindx).object_version_number := rosetta_g_miss_num_map(a9(indx));
96           t(ddindx).amount := rosetta_g_miss_num_map(a10(indx));
97           t(ddindx).quantity := rosetta_g_miss_num_map(a11(indx));
98           t(ddindx).receivables_invoice_id := rosetta_g_miss_num_map(a12(indx));
99           t(ddindx).amount_applied := rosetta_g_miss_num_map(a13(indx));
100           t(ddindx).date_bill_period_start := rosetta_g_miss_date_in_map(a14(indx));
101           t(ddindx).date_bill_period_end := rosetta_g_miss_date_in_map(a15(indx));
102           t(ddindx).request_id := rosetta_g_miss_num_map(a16(indx));
103           t(ddindx).program_application_id := rosetta_g_miss_num_map(a17(indx));
104           t(ddindx).program_id := rosetta_g_miss_num_map(a18(indx));
105           t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a19(indx));
106           t(ddindx).org_id := rosetta_g_miss_num_map(a20(indx));
107           t(ddindx).inventory_org_id := rosetta_g_miss_num_map(a21(indx));
108           t(ddindx).isl_id := rosetta_g_miss_num_map(a22(indx));
109           t(ddindx).ibt_id := rosetta_g_miss_num_map(a23(indx));
110           t(ddindx).late_charge_rec_id := rosetta_g_miss_num_map(a24(indx));
111           t(ddindx).cll_id := rosetta_g_miss_num_map(a25(indx));
112           t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a26(indx));
113           t(ddindx).qte_line_id := rosetta_g_miss_num_map(a27(indx));
114           t(ddindx).txs_trx_id := rosetta_g_miss_num_map(a28(indx));
115           t(ddindx).bank_acct_id := rosetta_g_miss_num_map(a29(indx));
116           t(ddindx).attribute_category := a30(indx);
117           t(ddindx).attribute1 := a31(indx);
118           t(ddindx).attribute2 := a32(indx);
119           t(ddindx).attribute3 := a33(indx);
120           t(ddindx).attribute4 := a34(indx);
121           t(ddindx).attribute5 := a35(indx);
122           t(ddindx).attribute6 := a36(indx);
123           t(ddindx).attribute7 := a37(indx);
124           t(ddindx).attribute8 := a38(indx);
125           t(ddindx).attribute9 := a39(indx);
126           t(ddindx).attribute10 := a40(indx);
127           t(ddindx).attribute11 := a41(indx);
128           t(ddindx).attribute12 := a42(indx);
129           t(ddindx).attribute13 := a43(indx);
130           t(ddindx).attribute14 := a44(indx);
131           t(ddindx).attribute15 := a45(indx);
132           t(ddindx).created_by := rosetta_g_miss_num_map(a46(indx));
133           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a47(indx));
134           t(ddindx).last_updated_by := rosetta_g_miss_num_map(a48(indx));
135           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a49(indx));
136           t(ddindx).last_update_login := rosetta_g_miss_num_map(a50(indx));
137           t(ddindx).txl_ar_line_number := rosetta_g_miss_num_map(a51(indx));
138           t(ddindx).txs_trx_line_id := rosetta_g_miss_num_map(a52(indx));
139           ddindx := ddindx+1;
140           if a0.last =indx
141             then exit;
142           end if;
143           indx := a0.next(indx);
144         end loop;
145       end if;
146    end if;
147   end rosetta_table_copy_in_p2;
148   procedure rosetta_table_copy_out_p2(t okl_til_pvt.til_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
149     , a1 out nocopy JTF_VARCHAR2_TABLE_100
150     , a2 out nocopy JTF_NUMBER_TABLE
151     , a3 out nocopy JTF_NUMBER_TABLE
152     , a4 out nocopy JTF_NUMBER_TABLE
153     , a5 out nocopy JTF_NUMBER_TABLE
154     , a6 out nocopy JTF_NUMBER_TABLE
155     , a7 out nocopy JTF_NUMBER_TABLE
156     , a8 out nocopy JTF_NUMBER_TABLE
157     , a9 out nocopy JTF_NUMBER_TABLE
158     , a10 out nocopy JTF_NUMBER_TABLE
159     , a11 out nocopy JTF_NUMBER_TABLE
160     , a12 out nocopy JTF_NUMBER_TABLE
161     , a13 out nocopy JTF_NUMBER_TABLE
162     , a14 out nocopy JTF_DATE_TABLE
163     , a15 out nocopy JTF_DATE_TABLE
164     , a16 out nocopy JTF_NUMBER_TABLE
165     , a17 out nocopy JTF_NUMBER_TABLE
166     , a18 out nocopy JTF_NUMBER_TABLE
167     , a19 out nocopy JTF_DATE_TABLE
168     , a20 out nocopy JTF_NUMBER_TABLE
169     , a21 out nocopy JTF_NUMBER_TABLE
170     , a22 out nocopy JTF_NUMBER_TABLE
171     , a23 out nocopy JTF_NUMBER_TABLE
172     , a24 out nocopy JTF_NUMBER_TABLE
173     , a25 out nocopy JTF_NUMBER_TABLE
174     , a26 out nocopy JTF_NUMBER_TABLE
175     , a27 out nocopy JTF_NUMBER_TABLE
176     , a28 out nocopy JTF_NUMBER_TABLE
177     , a29 out nocopy JTF_NUMBER_TABLE
178     , a30 out nocopy JTF_VARCHAR2_TABLE_100
179     , a31 out nocopy JTF_VARCHAR2_TABLE_500
180     , a32 out nocopy JTF_VARCHAR2_TABLE_500
181     , a33 out nocopy JTF_VARCHAR2_TABLE_500
182     , a34 out nocopy JTF_VARCHAR2_TABLE_500
183     , a35 out nocopy JTF_VARCHAR2_TABLE_500
184     , a36 out nocopy JTF_VARCHAR2_TABLE_500
185     , a37 out nocopy JTF_VARCHAR2_TABLE_500
186     , a38 out nocopy JTF_VARCHAR2_TABLE_500
187     , a39 out nocopy JTF_VARCHAR2_TABLE_500
188     , a40 out nocopy JTF_VARCHAR2_TABLE_500
189     , a41 out nocopy JTF_VARCHAR2_TABLE_500
190     , a42 out nocopy JTF_VARCHAR2_TABLE_500
191     , a43 out nocopy JTF_VARCHAR2_TABLE_500
192     , a44 out nocopy JTF_VARCHAR2_TABLE_500
193     , a45 out nocopy JTF_VARCHAR2_TABLE_500
194     , a46 out nocopy JTF_NUMBER_TABLE
195     , a47 out nocopy JTF_DATE_TABLE
196     , a48 out nocopy JTF_NUMBER_TABLE
197     , a49 out nocopy JTF_DATE_TABLE
198     , a50 out nocopy JTF_NUMBER_TABLE
199     , a51 out nocopy JTF_NUMBER_TABLE
200     , a52 out nocopy JTF_NUMBER_TABLE
201     ) as
202     ddindx binary_integer; indx binary_integer;
203   begin
204   if t is null or t.count = 0 then
205     a0 := JTF_NUMBER_TABLE();
206     a1 := JTF_VARCHAR2_TABLE_100();
207     a2 := JTF_NUMBER_TABLE();
208     a3 := JTF_NUMBER_TABLE();
209     a4 := JTF_NUMBER_TABLE();
210     a5 := JTF_NUMBER_TABLE();
211     a6 := JTF_NUMBER_TABLE();
212     a7 := JTF_NUMBER_TABLE();
213     a8 := JTF_NUMBER_TABLE();
214     a9 := JTF_NUMBER_TABLE();
215     a10 := JTF_NUMBER_TABLE();
216     a11 := JTF_NUMBER_TABLE();
217     a12 := JTF_NUMBER_TABLE();
218     a13 := JTF_NUMBER_TABLE();
219     a14 := JTF_DATE_TABLE();
220     a15 := JTF_DATE_TABLE();
221     a16 := JTF_NUMBER_TABLE();
222     a17 := JTF_NUMBER_TABLE();
223     a18 := JTF_NUMBER_TABLE();
224     a19 := JTF_DATE_TABLE();
225     a20 := JTF_NUMBER_TABLE();
226     a21 := JTF_NUMBER_TABLE();
227     a22 := JTF_NUMBER_TABLE();
228     a23 := JTF_NUMBER_TABLE();
229     a24 := JTF_NUMBER_TABLE();
230     a25 := JTF_NUMBER_TABLE();
231     a26 := JTF_NUMBER_TABLE();
232     a27 := JTF_NUMBER_TABLE();
233     a28 := JTF_NUMBER_TABLE();
234     a29 := JTF_NUMBER_TABLE();
235     a30 := JTF_VARCHAR2_TABLE_100();
236     a31 := JTF_VARCHAR2_TABLE_500();
237     a32 := JTF_VARCHAR2_TABLE_500();
238     a33 := JTF_VARCHAR2_TABLE_500();
239     a34 := JTF_VARCHAR2_TABLE_500();
240     a35 := JTF_VARCHAR2_TABLE_500();
241     a36 := JTF_VARCHAR2_TABLE_500();
242     a37 := JTF_VARCHAR2_TABLE_500();
243     a38 := JTF_VARCHAR2_TABLE_500();
244     a39 := JTF_VARCHAR2_TABLE_500();
245     a40 := JTF_VARCHAR2_TABLE_500();
246     a41 := JTF_VARCHAR2_TABLE_500();
247     a42 := JTF_VARCHAR2_TABLE_500();
248     a43 := JTF_VARCHAR2_TABLE_500();
249     a44 := JTF_VARCHAR2_TABLE_500();
250     a45 := JTF_VARCHAR2_TABLE_500();
251     a46 := JTF_NUMBER_TABLE();
252     a47 := JTF_DATE_TABLE();
253     a48 := JTF_NUMBER_TABLE();
254     a49 := JTF_DATE_TABLE();
255     a50 := JTF_NUMBER_TABLE();
256     a51 := JTF_NUMBER_TABLE();
257     a52 := JTF_NUMBER_TABLE();
258   else
259       a0 := JTF_NUMBER_TABLE();
260       a1 := JTF_VARCHAR2_TABLE_100();
261       a2 := JTF_NUMBER_TABLE();
262       a3 := JTF_NUMBER_TABLE();
263       a4 := JTF_NUMBER_TABLE();
264       a5 := JTF_NUMBER_TABLE();
265       a6 := JTF_NUMBER_TABLE();
266       a7 := JTF_NUMBER_TABLE();
267       a8 := JTF_NUMBER_TABLE();
268       a9 := JTF_NUMBER_TABLE();
269       a10 := JTF_NUMBER_TABLE();
270       a11 := JTF_NUMBER_TABLE();
271       a12 := JTF_NUMBER_TABLE();
272       a13 := JTF_NUMBER_TABLE();
273       a14 := JTF_DATE_TABLE();
274       a15 := JTF_DATE_TABLE();
275       a16 := JTF_NUMBER_TABLE();
276       a17 := JTF_NUMBER_TABLE();
277       a18 := JTF_NUMBER_TABLE();
278       a19 := JTF_DATE_TABLE();
279       a20 := JTF_NUMBER_TABLE();
280       a21 := JTF_NUMBER_TABLE();
281       a22 := JTF_NUMBER_TABLE();
282       a23 := JTF_NUMBER_TABLE();
283       a24 := JTF_NUMBER_TABLE();
284       a25 := JTF_NUMBER_TABLE();
285       a26 := JTF_NUMBER_TABLE();
286       a27 := JTF_NUMBER_TABLE();
287       a28 := JTF_NUMBER_TABLE();
288       a29 := JTF_NUMBER_TABLE();
289       a30 := JTF_VARCHAR2_TABLE_100();
290       a31 := JTF_VARCHAR2_TABLE_500();
291       a32 := JTF_VARCHAR2_TABLE_500();
292       a33 := JTF_VARCHAR2_TABLE_500();
293       a34 := JTF_VARCHAR2_TABLE_500();
294       a35 := JTF_VARCHAR2_TABLE_500();
295       a36 := JTF_VARCHAR2_TABLE_500();
296       a37 := JTF_VARCHAR2_TABLE_500();
297       a38 := JTF_VARCHAR2_TABLE_500();
298       a39 := JTF_VARCHAR2_TABLE_500();
299       a40 := JTF_VARCHAR2_TABLE_500();
300       a41 := JTF_VARCHAR2_TABLE_500();
301       a42 := JTF_VARCHAR2_TABLE_500();
302       a43 := JTF_VARCHAR2_TABLE_500();
303       a44 := JTF_VARCHAR2_TABLE_500();
304       a45 := JTF_VARCHAR2_TABLE_500();
305       a46 := JTF_NUMBER_TABLE();
306       a47 := JTF_DATE_TABLE();
307       a48 := JTF_NUMBER_TABLE();
308       a49 := JTF_DATE_TABLE();
309       a50 := JTF_NUMBER_TABLE();
310       a51 := JTF_NUMBER_TABLE();
311       a52 := JTF_NUMBER_TABLE();
312       if t.count > 0 then
313         a0.extend(t.count);
314         a1.extend(t.count);
315         a2.extend(t.count);
316         a3.extend(t.count);
317         a4.extend(t.count);
318         a5.extend(t.count);
319         a6.extend(t.count);
320         a7.extend(t.count);
321         a8.extend(t.count);
322         a9.extend(t.count);
323         a10.extend(t.count);
324         a11.extend(t.count);
325         a12.extend(t.count);
326         a13.extend(t.count);
327         a14.extend(t.count);
328         a15.extend(t.count);
329         a16.extend(t.count);
330         a17.extend(t.count);
331         a18.extend(t.count);
332         a19.extend(t.count);
333         a20.extend(t.count);
334         a21.extend(t.count);
335         a22.extend(t.count);
336         a23.extend(t.count);
337         a24.extend(t.count);
338         a25.extend(t.count);
339         a26.extend(t.count);
340         a27.extend(t.count);
341         a28.extend(t.count);
342         a29.extend(t.count);
343         a30.extend(t.count);
344         a31.extend(t.count);
345         a32.extend(t.count);
346         a33.extend(t.count);
347         a34.extend(t.count);
348         a35.extend(t.count);
349         a36.extend(t.count);
350         a37.extend(t.count);
351         a38.extend(t.count);
352         a39.extend(t.count);
353         a40.extend(t.count);
354         a41.extend(t.count);
355         a42.extend(t.count);
356         a43.extend(t.count);
357         a44.extend(t.count);
358         a45.extend(t.count);
359         a46.extend(t.count);
360         a47.extend(t.count);
361         a48.extend(t.count);
362         a49.extend(t.count);
363         a50.extend(t.count);
364         a51.extend(t.count);
365         a52.extend(t.count);
366         ddindx := t.first;
367         indx := 1;
368         while true loop
369           a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
370           a1(indx) := t(ddindx).inv_receiv_line_code;
371           a2(indx) := rosetta_g_miss_num_map(t(ddindx).tai_id);
372           a3(indx) := rosetta_g_miss_num_map(t(ddindx).kle_id);
373           a4(indx) := rosetta_g_miss_num_map(t(ddindx).tpl_id);
374           a5(indx) := rosetta_g_miss_num_map(t(ddindx).sty_id);
375           a6(indx) := rosetta_g_miss_num_map(t(ddindx).acn_id_cost);
376           a7(indx) := rosetta_g_miss_num_map(t(ddindx).til_id_reverses);
377           a8(indx) := rosetta_g_miss_num_map(t(ddindx).line_number);
378           a9(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
379           a10(indx) := rosetta_g_miss_num_map(t(ddindx).amount);
380           a11(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
381           a12(indx) := rosetta_g_miss_num_map(t(ddindx).receivables_invoice_id);
382           a13(indx) := rosetta_g_miss_num_map(t(ddindx).amount_applied);
383           a14(indx) := t(ddindx).date_bill_period_start;
384           a15(indx) := t(ddindx).date_bill_period_end;
385           a16(indx) := rosetta_g_miss_num_map(t(ddindx).request_id);
386           a17(indx) := rosetta_g_miss_num_map(t(ddindx).program_application_id);
387           a18(indx) := rosetta_g_miss_num_map(t(ddindx).program_id);
388           a19(indx) := t(ddindx).program_update_date;
389           a20(indx) := rosetta_g_miss_num_map(t(ddindx).org_id);
390           a21(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_org_id);
391           a22(indx) := rosetta_g_miss_num_map(t(ddindx).isl_id);
392           a23(indx) := rosetta_g_miss_num_map(t(ddindx).ibt_id);
393           a24(indx) := rosetta_g_miss_num_map(t(ddindx).late_charge_rec_id);
394           a25(indx) := rosetta_g_miss_num_map(t(ddindx).cll_id);
395           a26(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
396           a27(indx) := rosetta_g_miss_num_map(t(ddindx).qte_line_id);
397           a28(indx) := rosetta_g_miss_num_map(t(ddindx).txs_trx_id);
398           a29(indx) := rosetta_g_miss_num_map(t(ddindx).bank_acct_id);
399           a30(indx) := t(ddindx).attribute_category;
400           a31(indx) := t(ddindx).attribute1;
401           a32(indx) := t(ddindx).attribute2;
402           a33(indx) := t(ddindx).attribute3;
403           a34(indx) := t(ddindx).attribute4;
404           a35(indx) := t(ddindx).attribute5;
405           a36(indx) := t(ddindx).attribute6;
406           a37(indx) := t(ddindx).attribute7;
407           a38(indx) := t(ddindx).attribute8;
408           a39(indx) := t(ddindx).attribute9;
409           a40(indx) := t(ddindx).attribute10;
410           a41(indx) := t(ddindx).attribute11;
411           a42(indx) := t(ddindx).attribute12;
412           a43(indx) := t(ddindx).attribute13;
413           a44(indx) := t(ddindx).attribute14;
414           a45(indx) := t(ddindx).attribute15;
415           a46(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
416           a47(indx) := t(ddindx).creation_date;
417           a48(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
418           a49(indx) := t(ddindx).last_update_date;
419           a50(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
420           a51(indx) := rosetta_g_miss_num_map(t(ddindx).txl_ar_line_number);
421           a52(indx) := rosetta_g_miss_num_map(t(ddindx).txs_trx_line_id);
422           indx := indx+1;
423           if t.last =ddindx
424             then exit;
425           end if;
426           ddindx := t.next(ddindx);
427         end loop;
428       end if;
429    end if;
430   end rosetta_table_copy_out_p2;
431 
432   procedure rosetta_table_copy_in_p5(t out nocopy okl_til_pvt.okl_txl_ar_inv_lns_tl_tbl_type, a0 JTF_NUMBER_TABLE
433     , a1 JTF_VARCHAR2_TABLE_100
434     , a2 JTF_VARCHAR2_TABLE_100
435     , a3 JTF_VARCHAR2_TABLE_3000
436     , a4 JTF_VARCHAR2_TABLE_100
437     , a5 JTF_VARCHAR2_TABLE_2000
438     , a6 JTF_NUMBER_TABLE
439     , a7 JTF_DATE_TABLE
440     , a8 JTF_NUMBER_TABLE
441     , a9 JTF_DATE_TABLE
442     , a10 JTF_NUMBER_TABLE
443     ) as
444     ddindx binary_integer; indx binary_integer;
445   begin
446   if a0 is not null and a0.count > 0 then
447       if a0.count > 0 then
448         indx := a0.first;
449         ddindx := 1;
450         while true loop
451           t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
452           t(ddindx).language := a1(indx);
453           t(ddindx).source_lang := a2(indx);
454           t(ddindx).error_message := a3(indx);
455           t(ddindx).sfwt_flag := a4(indx);
456           t(ddindx).description := a5(indx);
457           t(ddindx).created_by := rosetta_g_miss_num_map(a6(indx));
458           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a7(indx));
459           t(ddindx).last_updated_by := rosetta_g_miss_num_map(a8(indx));
460           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a9(indx));
461           t(ddindx).last_update_login := rosetta_g_miss_num_map(a10(indx));
462           ddindx := ddindx+1;
463           if a0.last =indx
464             then exit;
465           end if;
466           indx := a0.next(indx);
467         end loop;
468       end if;
469    end if;
470   end rosetta_table_copy_in_p5;
471   procedure rosetta_table_copy_out_p5(t okl_til_pvt.okl_txl_ar_inv_lns_tl_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
472     , a1 out nocopy JTF_VARCHAR2_TABLE_100
473     , a2 out nocopy JTF_VARCHAR2_TABLE_100
474     , a3 out nocopy JTF_VARCHAR2_TABLE_3000
475     , a4 out nocopy JTF_VARCHAR2_TABLE_100
476     , a5 out nocopy JTF_VARCHAR2_TABLE_2000
477     , a6 out nocopy JTF_NUMBER_TABLE
478     , a7 out nocopy JTF_DATE_TABLE
479     , a8 out nocopy JTF_NUMBER_TABLE
480     , a9 out nocopy JTF_DATE_TABLE
481     , a10 out nocopy JTF_NUMBER_TABLE
482     ) as
483     ddindx binary_integer; indx binary_integer;
484   begin
485   if t is null or t.count = 0 then
486     a0 := JTF_NUMBER_TABLE();
487     a1 := JTF_VARCHAR2_TABLE_100();
488     a2 := JTF_VARCHAR2_TABLE_100();
489     a3 := JTF_VARCHAR2_TABLE_3000();
490     a4 := JTF_VARCHAR2_TABLE_100();
491     a5 := JTF_VARCHAR2_TABLE_2000();
492     a6 := JTF_NUMBER_TABLE();
493     a7 := JTF_DATE_TABLE();
494     a8 := JTF_NUMBER_TABLE();
495     a9 := JTF_DATE_TABLE();
496     a10 := JTF_NUMBER_TABLE();
497   else
498       a0 := JTF_NUMBER_TABLE();
499       a1 := JTF_VARCHAR2_TABLE_100();
500       a2 := JTF_VARCHAR2_TABLE_100();
501       a3 := JTF_VARCHAR2_TABLE_3000();
502       a4 := JTF_VARCHAR2_TABLE_100();
503       a5 := JTF_VARCHAR2_TABLE_2000();
504       a6 := JTF_NUMBER_TABLE();
505       a7 := JTF_DATE_TABLE();
506       a8 := JTF_NUMBER_TABLE();
507       a9 := JTF_DATE_TABLE();
508       a10 := JTF_NUMBER_TABLE();
509       if t.count > 0 then
510         a0.extend(t.count);
511         a1.extend(t.count);
512         a2.extend(t.count);
513         a3.extend(t.count);
514         a4.extend(t.count);
515         a5.extend(t.count);
516         a6.extend(t.count);
517         a7.extend(t.count);
518         a8.extend(t.count);
519         a9.extend(t.count);
520         a10.extend(t.count);
521         ddindx := t.first;
522         indx := 1;
523         while true loop
524           a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
525           a1(indx) := t(ddindx).language;
526           a2(indx) := t(ddindx).source_lang;
527           a3(indx) := t(ddindx).error_message;
528           a4(indx) := t(ddindx).sfwt_flag;
529           a5(indx) := t(ddindx).description;
530           a6(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
531           a7(indx) := t(ddindx).creation_date;
532           a8(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
533           a9(indx) := t(ddindx).last_update_date;
534           a10(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
535           indx := indx+1;
536           if t.last =ddindx
537             then exit;
538           end if;
539           ddindx := t.next(ddindx);
540         end loop;
541       end if;
542    end if;
543   end rosetta_table_copy_out_p5;
544 
545   procedure rosetta_table_copy_in_p8(t out nocopy okl_til_pvt.tilv_tbl_type, a0 JTF_NUMBER_TABLE
546     , a1 JTF_NUMBER_TABLE
547     , a2 JTF_VARCHAR2_TABLE_3000
548     , a3 JTF_VARCHAR2_TABLE_100
549     , a4 JTF_NUMBER_TABLE
550     , a5 JTF_NUMBER_TABLE
551     , a6 JTF_NUMBER_TABLE
552     , a7 JTF_VARCHAR2_TABLE_100
553     , a8 JTF_NUMBER_TABLE
554     , a9 JTF_NUMBER_TABLE
555     , a10 JTF_NUMBER_TABLE
556     , a11 JTF_NUMBER_TABLE
557     , a12 JTF_NUMBER_TABLE
558     , a13 JTF_NUMBER_TABLE
559     , a14 JTF_VARCHAR2_TABLE_2000
560     , a15 JTF_NUMBER_TABLE
561     , a16 JTF_DATE_TABLE
562     , a17 JTF_NUMBER_TABLE
563     , a18 JTF_DATE_TABLE
564     , a19 JTF_NUMBER_TABLE
565     , a20 JTF_NUMBER_TABLE
566     , a21 JTF_NUMBER_TABLE
567     , a22 JTF_NUMBER_TABLE
568     , a23 JTF_NUMBER_TABLE
569     , a24 JTF_NUMBER_TABLE
570     , a25 JTF_NUMBER_TABLE
571     , a26 JTF_NUMBER_TABLE
572     , a27 JTF_VARCHAR2_TABLE_100
573     , a28 JTF_VARCHAR2_TABLE_500
574     , a29 JTF_VARCHAR2_TABLE_500
575     , a30 JTF_VARCHAR2_TABLE_500
576     , a31 JTF_VARCHAR2_TABLE_500
577     , a32 JTF_VARCHAR2_TABLE_500
578     , a33 JTF_VARCHAR2_TABLE_500
579     , a34 JTF_VARCHAR2_TABLE_500
580     , a35 JTF_VARCHAR2_TABLE_500
581     , a36 JTF_VARCHAR2_TABLE_500
582     , a37 JTF_VARCHAR2_TABLE_500
583     , a38 JTF_VARCHAR2_TABLE_500
584     , a39 JTF_VARCHAR2_TABLE_500
585     , a40 JTF_VARCHAR2_TABLE_500
586     , a41 JTF_VARCHAR2_TABLE_500
587     , a42 JTF_VARCHAR2_TABLE_500
588     , a43 JTF_NUMBER_TABLE
589     , a44 JTF_NUMBER_TABLE
590     , a45 JTF_NUMBER_TABLE
591     , a46 JTF_DATE_TABLE
592     , a47 JTF_NUMBER_TABLE
593     , a48 JTF_NUMBER_TABLE
594     , a49 JTF_NUMBER_TABLE
595     , a50 JTF_DATE_TABLE
596     , a51 JTF_NUMBER_TABLE
597     , a52 JTF_DATE_TABLE
598     , a53 JTF_NUMBER_TABLE
599     , a54 JTF_NUMBER_TABLE
600     , a55 JTF_NUMBER_TABLE
601     ) as
602     ddindx binary_integer; indx binary_integer;
603   begin
604   if a0 is not null and a0.count > 0 then
605       if a0.count > 0 then
606         indx := a0.first;
607         ddindx := 1;
608         while true loop
609           t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
610           t(ddindx).object_version_number := rosetta_g_miss_num_map(a1(indx));
611           t(ddindx).error_message := a2(indx);
612           t(ddindx).sfwt_flag := a3(indx);
613           t(ddindx).kle_id := rosetta_g_miss_num_map(a4(indx));
614           t(ddindx).tpl_id := rosetta_g_miss_num_map(a5(indx));
615           t(ddindx).til_id_reverses := rosetta_g_miss_num_map(a6(indx));
616           t(ddindx).inv_receiv_line_code := a7(indx);
617           t(ddindx).sty_id := rosetta_g_miss_num_map(a8(indx));
618           t(ddindx).tai_id := rosetta_g_miss_num_map(a9(indx));
619           t(ddindx).acn_id_cost := rosetta_g_miss_num_map(a10(indx));
620           t(ddindx).amount := rosetta_g_miss_num_map(a11(indx));
621           t(ddindx).line_number := rosetta_g_miss_num_map(a12(indx));
622           t(ddindx).quantity := rosetta_g_miss_num_map(a13(indx));
623           t(ddindx).description := a14(indx);
624           t(ddindx).receivables_invoice_id := rosetta_g_miss_num_map(a15(indx));
625           t(ddindx).date_bill_period_start := rosetta_g_miss_date_in_map(a16(indx));
626           t(ddindx).amount_applied := rosetta_g_miss_num_map(a17(indx));
627           t(ddindx).date_bill_period_end := rosetta_g_miss_date_in_map(a18(indx));
628           t(ddindx).isl_id := rosetta_g_miss_num_map(a19(indx));
629           t(ddindx).ibt_id := rosetta_g_miss_num_map(a20(indx));
630           t(ddindx).late_charge_rec_id := rosetta_g_miss_num_map(a21(indx));
631           t(ddindx).cll_id := rosetta_g_miss_num_map(a22(indx));
632           t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a23(indx));
633           t(ddindx).qte_line_id := rosetta_g_miss_num_map(a24(indx));
634           t(ddindx).txs_trx_id := rosetta_g_miss_num_map(a25(indx));
635           t(ddindx).bank_acct_id := rosetta_g_miss_num_map(a26(indx));
636           t(ddindx).attribute_category := a27(indx);
637           t(ddindx).attribute1 := a28(indx);
638           t(ddindx).attribute2 := a29(indx);
639           t(ddindx).attribute3 := a30(indx);
640           t(ddindx).attribute4 := a31(indx);
641           t(ddindx).attribute5 := a32(indx);
642           t(ddindx).attribute6 := a33(indx);
643           t(ddindx).attribute7 := a34(indx);
644           t(ddindx).attribute8 := a35(indx);
645           t(ddindx).attribute9 := a36(indx);
646           t(ddindx).attribute10 := a37(indx);
647           t(ddindx).attribute11 := a38(indx);
648           t(ddindx).attribute12 := a39(indx);
649           t(ddindx).attribute13 := a40(indx);
650           t(ddindx).attribute14 := a41(indx);
651           t(ddindx).attribute15 := a42(indx);
652           t(ddindx).request_id := rosetta_g_miss_num_map(a43(indx));
653           t(ddindx).program_application_id := rosetta_g_miss_num_map(a44(indx));
654           t(ddindx).program_id := rosetta_g_miss_num_map(a45(indx));
655           t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a46(indx));
656           t(ddindx).org_id := rosetta_g_miss_num_map(a47(indx));
657           t(ddindx).inventory_org_id := rosetta_g_miss_num_map(a48(indx));
658           t(ddindx).created_by := rosetta_g_miss_num_map(a49(indx));
659           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a50(indx));
660           t(ddindx).last_updated_by := rosetta_g_miss_num_map(a51(indx));
661           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a52(indx));
662           t(ddindx).last_update_login := rosetta_g_miss_num_map(a53(indx));
663           t(ddindx).txl_ar_line_number := rosetta_g_miss_num_map(a54(indx));
664           t(ddindx).txs_trx_line_id := rosetta_g_miss_num_map(a55(indx));
665           ddindx := ddindx+1;
666           if a0.last =indx
667             then exit;
668           end if;
669           indx := a0.next(indx);
670         end loop;
671       end if;
672    end if;
673   end rosetta_table_copy_in_p8;
674   procedure rosetta_table_copy_out_p8(t okl_til_pvt.tilv_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
675     , a1 out nocopy JTF_NUMBER_TABLE
676     , a2 out nocopy JTF_VARCHAR2_TABLE_3000
677     , a3 out nocopy JTF_VARCHAR2_TABLE_100
678     , a4 out nocopy JTF_NUMBER_TABLE
679     , a5 out nocopy JTF_NUMBER_TABLE
680     , a6 out nocopy JTF_NUMBER_TABLE
681     , a7 out nocopy JTF_VARCHAR2_TABLE_100
682     , a8 out nocopy JTF_NUMBER_TABLE
683     , a9 out nocopy JTF_NUMBER_TABLE
684     , a10 out nocopy JTF_NUMBER_TABLE
685     , a11 out nocopy JTF_NUMBER_TABLE
686     , a12 out nocopy JTF_NUMBER_TABLE
687     , a13 out nocopy JTF_NUMBER_TABLE
688     , a14 out nocopy JTF_VARCHAR2_TABLE_2000
689     , a15 out nocopy JTF_NUMBER_TABLE
690     , a16 out nocopy JTF_DATE_TABLE
691     , a17 out nocopy JTF_NUMBER_TABLE
692     , a18 out nocopy JTF_DATE_TABLE
693     , a19 out nocopy JTF_NUMBER_TABLE
694     , a20 out nocopy JTF_NUMBER_TABLE
695     , a21 out nocopy JTF_NUMBER_TABLE
696     , a22 out nocopy JTF_NUMBER_TABLE
697     , a23 out nocopy JTF_NUMBER_TABLE
698     , a24 out nocopy JTF_NUMBER_TABLE
699     , a25 out nocopy JTF_NUMBER_TABLE
700     , a26 out nocopy JTF_NUMBER_TABLE
701     , a27 out nocopy JTF_VARCHAR2_TABLE_100
702     , a28 out nocopy JTF_VARCHAR2_TABLE_500
703     , a29 out nocopy JTF_VARCHAR2_TABLE_500
704     , a30 out nocopy JTF_VARCHAR2_TABLE_500
705     , a31 out nocopy JTF_VARCHAR2_TABLE_500
706     , a32 out nocopy JTF_VARCHAR2_TABLE_500
707     , a33 out nocopy JTF_VARCHAR2_TABLE_500
708     , a34 out nocopy JTF_VARCHAR2_TABLE_500
709     , a35 out nocopy JTF_VARCHAR2_TABLE_500
710     , a36 out nocopy JTF_VARCHAR2_TABLE_500
711     , a37 out nocopy JTF_VARCHAR2_TABLE_500
712     , a38 out nocopy JTF_VARCHAR2_TABLE_500
713     , a39 out nocopy JTF_VARCHAR2_TABLE_500
714     , a40 out nocopy JTF_VARCHAR2_TABLE_500
715     , a41 out nocopy JTF_VARCHAR2_TABLE_500
716     , a42 out nocopy JTF_VARCHAR2_TABLE_500
717     , a43 out nocopy JTF_NUMBER_TABLE
718     , a44 out nocopy JTF_NUMBER_TABLE
719     , a45 out nocopy JTF_NUMBER_TABLE
720     , a46 out nocopy JTF_DATE_TABLE
721     , a47 out nocopy JTF_NUMBER_TABLE
722     , a48 out nocopy JTF_NUMBER_TABLE
723     , a49 out nocopy JTF_NUMBER_TABLE
724     , a50 out nocopy JTF_DATE_TABLE
725     , a51 out nocopy JTF_NUMBER_TABLE
726     , a52 out nocopy JTF_DATE_TABLE
727     , a53 out nocopy JTF_NUMBER_TABLE
728     , a54 out nocopy JTF_NUMBER_TABLE
729     , a55 out nocopy JTF_NUMBER_TABLE
730     ) as
731     ddindx binary_integer; indx binary_integer;
732   begin
733   if t is null or t.count = 0 then
734     a0 := JTF_NUMBER_TABLE();
735     a1 := JTF_NUMBER_TABLE();
736     a2 := JTF_VARCHAR2_TABLE_3000();
737     a3 := JTF_VARCHAR2_TABLE_100();
738     a4 := JTF_NUMBER_TABLE();
739     a5 := JTF_NUMBER_TABLE();
740     a6 := JTF_NUMBER_TABLE();
741     a7 := JTF_VARCHAR2_TABLE_100();
742     a8 := JTF_NUMBER_TABLE();
743     a9 := JTF_NUMBER_TABLE();
744     a10 := JTF_NUMBER_TABLE();
745     a11 := JTF_NUMBER_TABLE();
746     a12 := JTF_NUMBER_TABLE();
747     a13 := JTF_NUMBER_TABLE();
748     a14 := JTF_VARCHAR2_TABLE_2000();
749     a15 := JTF_NUMBER_TABLE();
750     a16 := JTF_DATE_TABLE();
751     a17 := JTF_NUMBER_TABLE();
752     a18 := JTF_DATE_TABLE();
753     a19 := JTF_NUMBER_TABLE();
754     a20 := JTF_NUMBER_TABLE();
755     a21 := JTF_NUMBER_TABLE();
756     a22 := JTF_NUMBER_TABLE();
757     a23 := JTF_NUMBER_TABLE();
758     a24 := JTF_NUMBER_TABLE();
759     a25 := JTF_NUMBER_TABLE();
760     a26 := JTF_NUMBER_TABLE();
761     a27 := JTF_VARCHAR2_TABLE_100();
762     a28 := JTF_VARCHAR2_TABLE_500();
763     a29 := JTF_VARCHAR2_TABLE_500();
764     a30 := JTF_VARCHAR2_TABLE_500();
765     a31 := JTF_VARCHAR2_TABLE_500();
766     a32 := JTF_VARCHAR2_TABLE_500();
767     a33 := JTF_VARCHAR2_TABLE_500();
768     a34 := JTF_VARCHAR2_TABLE_500();
769     a35 := JTF_VARCHAR2_TABLE_500();
770     a36 := JTF_VARCHAR2_TABLE_500();
771     a37 := JTF_VARCHAR2_TABLE_500();
772     a38 := JTF_VARCHAR2_TABLE_500();
773     a39 := JTF_VARCHAR2_TABLE_500();
774     a40 := JTF_VARCHAR2_TABLE_500();
775     a41 := JTF_VARCHAR2_TABLE_500();
776     a42 := JTF_VARCHAR2_TABLE_500();
777     a43 := JTF_NUMBER_TABLE();
778     a44 := JTF_NUMBER_TABLE();
779     a45 := JTF_NUMBER_TABLE();
780     a46 := JTF_DATE_TABLE();
781     a47 := JTF_NUMBER_TABLE();
782     a48 := JTF_NUMBER_TABLE();
783     a49 := JTF_NUMBER_TABLE();
784     a50 := JTF_DATE_TABLE();
785     a51 := JTF_NUMBER_TABLE();
786     a52 := JTF_DATE_TABLE();
787     a53 := JTF_NUMBER_TABLE();
788     a54 := JTF_NUMBER_TABLE();
789     a55 := JTF_NUMBER_TABLE();
790   else
791       a0 := JTF_NUMBER_TABLE();
792       a1 := JTF_NUMBER_TABLE();
793       a2 := JTF_VARCHAR2_TABLE_3000();
794       a3 := JTF_VARCHAR2_TABLE_100();
795       a4 := JTF_NUMBER_TABLE();
796       a5 := JTF_NUMBER_TABLE();
797       a6 := JTF_NUMBER_TABLE();
798       a7 := JTF_VARCHAR2_TABLE_100();
799       a8 := JTF_NUMBER_TABLE();
800       a9 := JTF_NUMBER_TABLE();
801       a10 := JTF_NUMBER_TABLE();
802       a11 := JTF_NUMBER_TABLE();
803       a12 := JTF_NUMBER_TABLE();
804       a13 := JTF_NUMBER_TABLE();
805       a14 := JTF_VARCHAR2_TABLE_2000();
806       a15 := JTF_NUMBER_TABLE();
807       a16 := JTF_DATE_TABLE();
808       a17 := JTF_NUMBER_TABLE();
809       a18 := JTF_DATE_TABLE();
810       a19 := JTF_NUMBER_TABLE();
811       a20 := JTF_NUMBER_TABLE();
812       a21 := JTF_NUMBER_TABLE();
813       a22 := JTF_NUMBER_TABLE();
814       a23 := JTF_NUMBER_TABLE();
815       a24 := JTF_NUMBER_TABLE();
816       a25 := JTF_NUMBER_TABLE();
817       a26 := JTF_NUMBER_TABLE();
818       a27 := JTF_VARCHAR2_TABLE_100();
819       a28 := JTF_VARCHAR2_TABLE_500();
820       a29 := JTF_VARCHAR2_TABLE_500();
821       a30 := JTF_VARCHAR2_TABLE_500();
822       a31 := JTF_VARCHAR2_TABLE_500();
823       a32 := JTF_VARCHAR2_TABLE_500();
824       a33 := JTF_VARCHAR2_TABLE_500();
825       a34 := JTF_VARCHAR2_TABLE_500();
826       a35 := JTF_VARCHAR2_TABLE_500();
827       a36 := JTF_VARCHAR2_TABLE_500();
828       a37 := JTF_VARCHAR2_TABLE_500();
829       a38 := JTF_VARCHAR2_TABLE_500();
830       a39 := JTF_VARCHAR2_TABLE_500();
831       a40 := JTF_VARCHAR2_TABLE_500();
832       a41 := JTF_VARCHAR2_TABLE_500();
833       a42 := JTF_VARCHAR2_TABLE_500();
834       a43 := JTF_NUMBER_TABLE();
835       a44 := JTF_NUMBER_TABLE();
836       a45 := JTF_NUMBER_TABLE();
837       a46 := JTF_DATE_TABLE();
838       a47 := JTF_NUMBER_TABLE();
839       a48 := JTF_NUMBER_TABLE();
840       a49 := JTF_NUMBER_TABLE();
841       a50 := JTF_DATE_TABLE();
842       a51 := JTF_NUMBER_TABLE();
843       a52 := JTF_DATE_TABLE();
844       a53 := JTF_NUMBER_TABLE();
845       a54 := JTF_NUMBER_TABLE();
846       a55 := JTF_NUMBER_TABLE();
847       if t.count > 0 then
848         a0.extend(t.count);
849         a1.extend(t.count);
850         a2.extend(t.count);
851         a3.extend(t.count);
852         a4.extend(t.count);
853         a5.extend(t.count);
854         a6.extend(t.count);
855         a7.extend(t.count);
856         a8.extend(t.count);
857         a9.extend(t.count);
858         a10.extend(t.count);
859         a11.extend(t.count);
860         a12.extend(t.count);
861         a13.extend(t.count);
862         a14.extend(t.count);
863         a15.extend(t.count);
864         a16.extend(t.count);
865         a17.extend(t.count);
866         a18.extend(t.count);
867         a19.extend(t.count);
868         a20.extend(t.count);
869         a21.extend(t.count);
870         a22.extend(t.count);
871         a23.extend(t.count);
872         a24.extend(t.count);
873         a25.extend(t.count);
874         a26.extend(t.count);
875         a27.extend(t.count);
876         a28.extend(t.count);
877         a29.extend(t.count);
878         a30.extend(t.count);
879         a31.extend(t.count);
880         a32.extend(t.count);
881         a33.extend(t.count);
882         a34.extend(t.count);
883         a35.extend(t.count);
884         a36.extend(t.count);
885         a37.extend(t.count);
886         a38.extend(t.count);
887         a39.extend(t.count);
888         a40.extend(t.count);
889         a41.extend(t.count);
890         a42.extend(t.count);
891         a43.extend(t.count);
892         a44.extend(t.count);
893         a45.extend(t.count);
894         a46.extend(t.count);
895         a47.extend(t.count);
896         a48.extend(t.count);
897         a49.extend(t.count);
898         a50.extend(t.count);
899         a51.extend(t.count);
900         a52.extend(t.count);
901         a53.extend(t.count);
902         a54.extend(t.count);
903         a55.extend(t.count);
904         ddindx := t.first;
905         indx := 1;
906         while true loop
907           a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
908           a1(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
909           a2(indx) := t(ddindx).error_message;
910           a3(indx) := t(ddindx).sfwt_flag;
911           a4(indx) := rosetta_g_miss_num_map(t(ddindx).kle_id);
912           a5(indx) := rosetta_g_miss_num_map(t(ddindx).tpl_id);
913           a6(indx) := rosetta_g_miss_num_map(t(ddindx).til_id_reverses);
914           a7(indx) := t(ddindx).inv_receiv_line_code;
915           a8(indx) := rosetta_g_miss_num_map(t(ddindx).sty_id);
916           a9(indx) := rosetta_g_miss_num_map(t(ddindx).tai_id);
917           a10(indx) := rosetta_g_miss_num_map(t(ddindx).acn_id_cost);
918           a11(indx) := rosetta_g_miss_num_map(t(ddindx).amount);
919           a12(indx) := rosetta_g_miss_num_map(t(ddindx).line_number);
920           a13(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
921           a14(indx) := t(ddindx).description;
922           a15(indx) := rosetta_g_miss_num_map(t(ddindx).receivables_invoice_id);
923           a16(indx) := t(ddindx).date_bill_period_start;
924           a17(indx) := rosetta_g_miss_num_map(t(ddindx).amount_applied);
925           a18(indx) := t(ddindx).date_bill_period_end;
926           a19(indx) := rosetta_g_miss_num_map(t(ddindx).isl_id);
927           a20(indx) := rosetta_g_miss_num_map(t(ddindx).ibt_id);
928           a21(indx) := rosetta_g_miss_num_map(t(ddindx).late_charge_rec_id);
929           a22(indx) := rosetta_g_miss_num_map(t(ddindx).cll_id);
930           a23(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
931           a24(indx) := rosetta_g_miss_num_map(t(ddindx).qte_line_id);
932           a25(indx) := rosetta_g_miss_num_map(t(ddindx).txs_trx_id);
933           a26(indx) := rosetta_g_miss_num_map(t(ddindx).bank_acct_id);
934           a27(indx) := t(ddindx).attribute_category;
935           a28(indx) := t(ddindx).attribute1;
936           a29(indx) := t(ddindx).attribute2;
937           a30(indx) := t(ddindx).attribute3;
938           a31(indx) := t(ddindx).attribute4;
939           a32(indx) := t(ddindx).attribute5;
940           a33(indx) := t(ddindx).attribute6;
941           a34(indx) := t(ddindx).attribute7;
942           a35(indx) := t(ddindx).attribute8;
943           a36(indx) := t(ddindx).attribute9;
944           a37(indx) := t(ddindx).attribute10;
945           a38(indx) := t(ddindx).attribute11;
946           a39(indx) := t(ddindx).attribute12;
947           a40(indx) := t(ddindx).attribute13;
948           a41(indx) := t(ddindx).attribute14;
949           a42(indx) := t(ddindx).attribute15;
950           a43(indx) := rosetta_g_miss_num_map(t(ddindx).request_id);
951           a44(indx) := rosetta_g_miss_num_map(t(ddindx).program_application_id);
952           a45(indx) := rosetta_g_miss_num_map(t(ddindx).program_id);
953           a46(indx) := t(ddindx).program_update_date;
954           a47(indx) := rosetta_g_miss_num_map(t(ddindx).org_id);
955           a48(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_org_id);
956           a49(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
957           a50(indx) := t(ddindx).creation_date;
958           a51(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
959           a52(indx) := t(ddindx).last_update_date;
960           a53(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
961           a54(indx) := rosetta_g_miss_num_map(t(ddindx).txl_ar_line_number);
962           a55(indx) := rosetta_g_miss_num_map(t(ddindx).txs_trx_line_id);
963           indx := indx+1;
964           if t.last =ddindx
965             then exit;
966           end if;
967           ddindx := t.next(ddindx);
968         end loop;
969       end if;
970    end if;
971   end rosetta_table_copy_out_p8;
972 
973   procedure insert_row(p_api_version  NUMBER
974     , p_init_msg_list  VARCHAR2
975     , x_return_status out nocopy  VARCHAR2
976     , x_msg_count out nocopy  NUMBER
977     , x_msg_data out nocopy  VARCHAR2
978     , p6_a0 out nocopy  NUMBER
979     , p6_a1 out nocopy  NUMBER
980     , p6_a2 out nocopy  VARCHAR2
981     , p6_a3 out nocopy  VARCHAR2
982     , p6_a4 out nocopy  NUMBER
983     , p6_a5 out nocopy  NUMBER
984     , p6_a6 out nocopy  NUMBER
985     , p6_a7 out nocopy  VARCHAR2
986     , p6_a8 out nocopy  NUMBER
987     , p6_a9 out nocopy  NUMBER
988     , p6_a10 out nocopy  NUMBER
989     , p6_a11 out nocopy  NUMBER
990     , p6_a12 out nocopy  NUMBER
991     , p6_a13 out nocopy  NUMBER
992     , p6_a14 out nocopy  VARCHAR2
993     , p6_a15 out nocopy  NUMBER
994     , p6_a16 out nocopy  DATE
995     , p6_a17 out nocopy  NUMBER
996     , p6_a18 out nocopy  DATE
997     , p6_a19 out nocopy  NUMBER
998     , p6_a20 out nocopy  NUMBER
999     , p6_a21 out nocopy  NUMBER
1000     , p6_a22 out nocopy  NUMBER
1001     , p6_a23 out nocopy  NUMBER
1002     , p6_a24 out nocopy  NUMBER
1003     , p6_a25 out nocopy  NUMBER
1004     , p6_a26 out nocopy  NUMBER
1005     , p6_a27 out nocopy  VARCHAR2
1006     , p6_a28 out nocopy  VARCHAR2
1007     , p6_a29 out nocopy  VARCHAR2
1008     , p6_a30 out nocopy  VARCHAR2
1009     , p6_a31 out nocopy  VARCHAR2
1010     , p6_a32 out nocopy  VARCHAR2
1011     , p6_a33 out nocopy  VARCHAR2
1012     , p6_a34 out nocopy  VARCHAR2
1013     , p6_a35 out nocopy  VARCHAR2
1014     , p6_a36 out nocopy  VARCHAR2
1015     , p6_a37 out nocopy  VARCHAR2
1016     , p6_a38 out nocopy  VARCHAR2
1017     , p6_a39 out nocopy  VARCHAR2
1018     , p6_a40 out nocopy  VARCHAR2
1019     , p6_a41 out nocopy  VARCHAR2
1020     , p6_a42 out nocopy  VARCHAR2
1021     , p6_a43 out nocopy  NUMBER
1022     , p6_a44 out nocopy  NUMBER
1023     , p6_a45 out nocopy  NUMBER
1024     , p6_a46 out nocopy  DATE
1025     , p6_a47 out nocopy  NUMBER
1026     , p6_a48 out nocopy  NUMBER
1027     , p6_a49 out nocopy  NUMBER
1028     , p6_a50 out nocopy  DATE
1029     , p6_a51 out nocopy  NUMBER
1030     , p6_a52 out nocopy  DATE
1031     , p6_a53 out nocopy  NUMBER
1032     , p6_a54 out nocopy  NUMBER
1033     , p6_a55 out nocopy  NUMBER
1034     , p5_a0  NUMBER := 0-1962.0724
1035     , p5_a1  NUMBER := 0-1962.0724
1036     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1037     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1038     , p5_a4  NUMBER := 0-1962.0724
1039     , p5_a5  NUMBER := 0-1962.0724
1040     , p5_a6  NUMBER := 0-1962.0724
1041     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1042     , p5_a8  NUMBER := 0-1962.0724
1043     , p5_a9  NUMBER := 0-1962.0724
1044     , p5_a10  NUMBER := 0-1962.0724
1045     , p5_a11  NUMBER := 0-1962.0724
1046     , p5_a12  NUMBER := 0-1962.0724
1047     , p5_a13  NUMBER := 0-1962.0724
1048     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1049     , p5_a15  NUMBER := 0-1962.0724
1050     , p5_a16  DATE := fnd_api.g_miss_date
1051     , p5_a17  NUMBER := 0-1962.0724
1052     , p5_a18  DATE := fnd_api.g_miss_date
1053     , p5_a19  NUMBER := 0-1962.0724
1054     , p5_a20  NUMBER := 0-1962.0724
1055     , p5_a21  NUMBER := 0-1962.0724
1056     , p5_a22  NUMBER := 0-1962.0724
1057     , p5_a23  NUMBER := 0-1962.0724
1058     , p5_a24  NUMBER := 0-1962.0724
1059     , p5_a25  NUMBER := 0-1962.0724
1060     , p5_a26  NUMBER := 0-1962.0724
1061     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1062     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1063     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1064     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1065     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1066     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1067     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1068     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1069     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
1070     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
1071     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
1072     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1073     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1074     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
1075     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
1076     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1077     , p5_a43  NUMBER := 0-1962.0724
1078     , p5_a44  NUMBER := 0-1962.0724
1079     , p5_a45  NUMBER := 0-1962.0724
1080     , p5_a46  DATE := fnd_api.g_miss_date
1081     , p5_a47  NUMBER := 0-1962.0724
1082     , p5_a48  NUMBER := 0-1962.0724
1083     , p5_a49  NUMBER := 0-1962.0724
1084     , p5_a50  DATE := fnd_api.g_miss_date
1085     , p5_a51  NUMBER := 0-1962.0724
1086     , p5_a52  DATE := fnd_api.g_miss_date
1087     , p5_a53  NUMBER := 0-1962.0724
1088     , p5_a54  NUMBER := 0-1962.0724
1089     , p5_a55  NUMBER := 0-1962.0724
1090   )
1091 
1092   as
1093     ddp_tilv_rec okl_til_pvt.tilv_rec_type;
1094     ddx_tilv_rec okl_til_pvt.tilv_rec_type;
1095     ddindx binary_integer; indx binary_integer;
1096   begin
1097 
1098     -- copy data to the local IN or IN-OUT args, if any
1099 
1100 
1101 
1102 
1103 
1104     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
1105     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1106     ddp_tilv_rec.error_message := p5_a2;
1107     ddp_tilv_rec.sfwt_flag := p5_a3;
1108     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1109     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
1110     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
1111     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
1112     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
1113     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
1114     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
1115     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
1116     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
1117     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
1118     ddp_tilv_rec.description := p5_a14;
1119     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
1120     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
1121     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
1122     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
1123     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
1124     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
1125     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
1126     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
1127     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
1128     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
1129     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
1130     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
1131     ddp_tilv_rec.attribute_category := p5_a27;
1132     ddp_tilv_rec.attribute1 := p5_a28;
1133     ddp_tilv_rec.attribute2 := p5_a29;
1134     ddp_tilv_rec.attribute3 := p5_a30;
1135     ddp_tilv_rec.attribute4 := p5_a31;
1136     ddp_tilv_rec.attribute5 := p5_a32;
1137     ddp_tilv_rec.attribute6 := p5_a33;
1138     ddp_tilv_rec.attribute7 := p5_a34;
1139     ddp_tilv_rec.attribute8 := p5_a35;
1140     ddp_tilv_rec.attribute9 := p5_a36;
1141     ddp_tilv_rec.attribute10 := p5_a37;
1142     ddp_tilv_rec.attribute11 := p5_a38;
1143     ddp_tilv_rec.attribute12 := p5_a39;
1144     ddp_tilv_rec.attribute13 := p5_a40;
1145     ddp_tilv_rec.attribute14 := p5_a41;
1146     ddp_tilv_rec.attribute15 := p5_a42;
1147     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
1148     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
1149     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
1150     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
1151     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
1152     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
1153     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1154     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
1155     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
1156     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1157     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1158     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
1159     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
1160 
1161 
1162     -- here's the delegated call to the old PL/SQL routine
1163     okl_til_pvt.insert_row(p_api_version,
1164       p_init_msg_list,
1165       x_return_status,
1166       x_msg_count,
1167       x_msg_data,
1168       ddp_tilv_rec,
1169       ddx_tilv_rec);
1170 
1171     -- copy data back from the local variables to OUT or IN-OUT args, if any
1172 
1173 
1174 
1175 
1176 
1177 
1178     p6_a0 := rosetta_g_miss_num_map(ddx_tilv_rec.id);
1179     p6_a1 := rosetta_g_miss_num_map(ddx_tilv_rec.object_version_number);
1180     p6_a2 := ddx_tilv_rec.error_message;
1181     p6_a3 := ddx_tilv_rec.sfwt_flag;
1182     p6_a4 := rosetta_g_miss_num_map(ddx_tilv_rec.kle_id);
1183     p6_a5 := rosetta_g_miss_num_map(ddx_tilv_rec.tpl_id);
1184     p6_a6 := rosetta_g_miss_num_map(ddx_tilv_rec.til_id_reverses);
1185     p6_a7 := ddx_tilv_rec.inv_receiv_line_code;
1186     p6_a8 := rosetta_g_miss_num_map(ddx_tilv_rec.sty_id);
1187     p6_a9 := rosetta_g_miss_num_map(ddx_tilv_rec.tai_id);
1188     p6_a10 := rosetta_g_miss_num_map(ddx_tilv_rec.acn_id_cost);
1189     p6_a11 := rosetta_g_miss_num_map(ddx_tilv_rec.amount);
1190     p6_a12 := rosetta_g_miss_num_map(ddx_tilv_rec.line_number);
1191     p6_a13 := rosetta_g_miss_num_map(ddx_tilv_rec.quantity);
1192     p6_a14 := ddx_tilv_rec.description;
1193     p6_a15 := rosetta_g_miss_num_map(ddx_tilv_rec.receivables_invoice_id);
1194     p6_a16 := ddx_tilv_rec.date_bill_period_start;
1195     p6_a17 := rosetta_g_miss_num_map(ddx_tilv_rec.amount_applied);
1196     p6_a18 := ddx_tilv_rec.date_bill_period_end;
1197     p6_a19 := rosetta_g_miss_num_map(ddx_tilv_rec.isl_id);
1198     p6_a20 := rosetta_g_miss_num_map(ddx_tilv_rec.ibt_id);
1199     p6_a21 := rosetta_g_miss_num_map(ddx_tilv_rec.late_charge_rec_id);
1200     p6_a22 := rosetta_g_miss_num_map(ddx_tilv_rec.cll_id);
1201     p6_a23 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_item_id);
1202     p6_a24 := rosetta_g_miss_num_map(ddx_tilv_rec.qte_line_id);
1203     p6_a25 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_id);
1204     p6_a26 := rosetta_g_miss_num_map(ddx_tilv_rec.bank_acct_id);
1205     p6_a27 := ddx_tilv_rec.attribute_category;
1206     p6_a28 := ddx_tilv_rec.attribute1;
1207     p6_a29 := ddx_tilv_rec.attribute2;
1208     p6_a30 := ddx_tilv_rec.attribute3;
1209     p6_a31 := ddx_tilv_rec.attribute4;
1210     p6_a32 := ddx_tilv_rec.attribute5;
1211     p6_a33 := ddx_tilv_rec.attribute6;
1212     p6_a34 := ddx_tilv_rec.attribute7;
1213     p6_a35 := ddx_tilv_rec.attribute8;
1214     p6_a36 := ddx_tilv_rec.attribute9;
1215     p6_a37 := ddx_tilv_rec.attribute10;
1216     p6_a38 := ddx_tilv_rec.attribute11;
1217     p6_a39 := ddx_tilv_rec.attribute12;
1218     p6_a40 := ddx_tilv_rec.attribute13;
1219     p6_a41 := ddx_tilv_rec.attribute14;
1220     p6_a42 := ddx_tilv_rec.attribute15;
1221     p6_a43 := rosetta_g_miss_num_map(ddx_tilv_rec.request_id);
1222     p6_a44 := rosetta_g_miss_num_map(ddx_tilv_rec.program_application_id);
1223     p6_a45 := rosetta_g_miss_num_map(ddx_tilv_rec.program_id);
1224     p6_a46 := ddx_tilv_rec.program_update_date;
1225     p6_a47 := rosetta_g_miss_num_map(ddx_tilv_rec.org_id);
1226     p6_a48 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_org_id);
1227     p6_a49 := rosetta_g_miss_num_map(ddx_tilv_rec.created_by);
1228     p6_a50 := ddx_tilv_rec.creation_date;
1229     p6_a51 := rosetta_g_miss_num_map(ddx_tilv_rec.last_updated_by);
1230     p6_a52 := ddx_tilv_rec.last_update_date;
1231     p6_a53 := rosetta_g_miss_num_map(ddx_tilv_rec.last_update_login);
1232     p6_a54 := rosetta_g_miss_num_map(ddx_tilv_rec.txl_ar_line_number);
1233     p6_a55 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_line_id);
1234   end;
1235 
1236   procedure insert_row(p_api_version  NUMBER
1237     , p_init_msg_list  VARCHAR2
1238     , x_return_status out nocopy  VARCHAR2
1239     , x_msg_count out nocopy  NUMBER
1240     , x_msg_data out nocopy  VARCHAR2
1241     , p5_a0 JTF_NUMBER_TABLE
1242     , p5_a1 JTF_NUMBER_TABLE
1243     , p5_a2 JTF_VARCHAR2_TABLE_3000
1244     , p5_a3 JTF_VARCHAR2_TABLE_100
1245     , p5_a4 JTF_NUMBER_TABLE
1246     , p5_a5 JTF_NUMBER_TABLE
1247     , p5_a6 JTF_NUMBER_TABLE
1248     , p5_a7 JTF_VARCHAR2_TABLE_100
1249     , p5_a8 JTF_NUMBER_TABLE
1250     , p5_a9 JTF_NUMBER_TABLE
1251     , p5_a10 JTF_NUMBER_TABLE
1252     , p5_a11 JTF_NUMBER_TABLE
1253     , p5_a12 JTF_NUMBER_TABLE
1254     , p5_a13 JTF_NUMBER_TABLE
1255     , p5_a14 JTF_VARCHAR2_TABLE_2000
1256     , p5_a15 JTF_NUMBER_TABLE
1257     , p5_a16 JTF_DATE_TABLE
1258     , p5_a17 JTF_NUMBER_TABLE
1259     , p5_a18 JTF_DATE_TABLE
1260     , p5_a19 JTF_NUMBER_TABLE
1261     , p5_a20 JTF_NUMBER_TABLE
1262     , p5_a21 JTF_NUMBER_TABLE
1263     , p5_a22 JTF_NUMBER_TABLE
1264     , p5_a23 JTF_NUMBER_TABLE
1265     , p5_a24 JTF_NUMBER_TABLE
1266     , p5_a25 JTF_NUMBER_TABLE
1267     , p5_a26 JTF_NUMBER_TABLE
1268     , p5_a27 JTF_VARCHAR2_TABLE_100
1269     , p5_a28 JTF_VARCHAR2_TABLE_500
1270     , p5_a29 JTF_VARCHAR2_TABLE_500
1271     , p5_a30 JTF_VARCHAR2_TABLE_500
1272     , p5_a31 JTF_VARCHAR2_TABLE_500
1273     , p5_a32 JTF_VARCHAR2_TABLE_500
1274     , p5_a33 JTF_VARCHAR2_TABLE_500
1275     , p5_a34 JTF_VARCHAR2_TABLE_500
1276     , p5_a35 JTF_VARCHAR2_TABLE_500
1277     , p5_a36 JTF_VARCHAR2_TABLE_500
1278     , p5_a37 JTF_VARCHAR2_TABLE_500
1279     , p5_a38 JTF_VARCHAR2_TABLE_500
1280     , p5_a39 JTF_VARCHAR2_TABLE_500
1281     , p5_a40 JTF_VARCHAR2_TABLE_500
1282     , p5_a41 JTF_VARCHAR2_TABLE_500
1283     , p5_a42 JTF_VARCHAR2_TABLE_500
1284     , p5_a43 JTF_NUMBER_TABLE
1285     , p5_a44 JTF_NUMBER_TABLE
1286     , p5_a45 JTF_NUMBER_TABLE
1287     , p5_a46 JTF_DATE_TABLE
1288     , p5_a47 JTF_NUMBER_TABLE
1289     , p5_a48 JTF_NUMBER_TABLE
1290     , p5_a49 JTF_NUMBER_TABLE
1291     , p5_a50 JTF_DATE_TABLE
1292     , p5_a51 JTF_NUMBER_TABLE
1293     , p5_a52 JTF_DATE_TABLE
1294     , p5_a53 JTF_NUMBER_TABLE
1295     , p5_a54 JTF_NUMBER_TABLE
1296     , p5_a55 JTF_NUMBER_TABLE
1297     , p6_a0 out nocopy JTF_NUMBER_TABLE
1298     , p6_a1 out nocopy JTF_NUMBER_TABLE
1299     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_3000
1300     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1301     , p6_a4 out nocopy JTF_NUMBER_TABLE
1302     , p6_a5 out nocopy JTF_NUMBER_TABLE
1303     , p6_a6 out nocopy JTF_NUMBER_TABLE
1304     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
1305     , p6_a8 out nocopy JTF_NUMBER_TABLE
1306     , p6_a9 out nocopy JTF_NUMBER_TABLE
1307     , p6_a10 out nocopy JTF_NUMBER_TABLE
1308     , p6_a11 out nocopy JTF_NUMBER_TABLE
1309     , p6_a12 out nocopy JTF_NUMBER_TABLE
1310     , p6_a13 out nocopy JTF_NUMBER_TABLE
1311     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_2000
1312     , p6_a15 out nocopy JTF_NUMBER_TABLE
1313     , p6_a16 out nocopy JTF_DATE_TABLE
1314     , p6_a17 out nocopy JTF_NUMBER_TABLE
1315     , p6_a18 out nocopy JTF_DATE_TABLE
1316     , p6_a19 out nocopy JTF_NUMBER_TABLE
1317     , p6_a20 out nocopy JTF_NUMBER_TABLE
1318     , p6_a21 out nocopy JTF_NUMBER_TABLE
1319     , p6_a22 out nocopy JTF_NUMBER_TABLE
1320     , p6_a23 out nocopy JTF_NUMBER_TABLE
1321     , p6_a24 out nocopy JTF_NUMBER_TABLE
1322     , p6_a25 out nocopy JTF_NUMBER_TABLE
1323     , p6_a26 out nocopy JTF_NUMBER_TABLE
1324     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
1325     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
1326     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
1327     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
1328     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
1329     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
1330     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
1331     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
1332     , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
1333     , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
1334     , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
1335     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
1336     , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
1337     , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
1338     , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
1339     , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
1340     , p6_a43 out nocopy JTF_NUMBER_TABLE
1341     , p6_a44 out nocopy JTF_NUMBER_TABLE
1342     , p6_a45 out nocopy JTF_NUMBER_TABLE
1343     , p6_a46 out nocopy JTF_DATE_TABLE
1344     , p6_a47 out nocopy JTF_NUMBER_TABLE
1345     , p6_a48 out nocopy JTF_NUMBER_TABLE
1346     , p6_a49 out nocopy JTF_NUMBER_TABLE
1347     , p6_a50 out nocopy JTF_DATE_TABLE
1348     , p6_a51 out nocopy JTF_NUMBER_TABLE
1349     , p6_a52 out nocopy JTF_DATE_TABLE
1350     , p6_a53 out nocopy JTF_NUMBER_TABLE
1351     , p6_a54 out nocopy JTF_NUMBER_TABLE
1352     , p6_a55 out nocopy JTF_NUMBER_TABLE
1353   )
1354 
1355   as
1356     ddp_tilv_tbl okl_til_pvt.tilv_tbl_type;
1357     ddx_tilv_tbl okl_til_pvt.tilv_tbl_type;
1358     ddindx binary_integer; indx binary_integer;
1359   begin
1360 
1361     -- copy data to the local IN or IN-OUT args, if any
1362 
1363 
1364 
1365 
1366 
1367     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
1368       , p5_a1
1369       , p5_a2
1370       , p5_a3
1371       , p5_a4
1372       , p5_a5
1373       , p5_a6
1374       , p5_a7
1375       , p5_a8
1376       , p5_a9
1377       , p5_a10
1378       , p5_a11
1379       , p5_a12
1380       , p5_a13
1381       , p5_a14
1382       , p5_a15
1383       , p5_a16
1384       , p5_a17
1385       , p5_a18
1386       , p5_a19
1387       , p5_a20
1388       , p5_a21
1389       , p5_a22
1390       , p5_a23
1391       , p5_a24
1392       , p5_a25
1393       , p5_a26
1394       , p5_a27
1395       , p5_a28
1396       , p5_a29
1397       , p5_a30
1398       , p5_a31
1399       , p5_a32
1400       , p5_a33
1401       , p5_a34
1402       , p5_a35
1403       , p5_a36
1404       , p5_a37
1405       , p5_a38
1406       , p5_a39
1407       , p5_a40
1408       , p5_a41
1409       , p5_a42
1410       , p5_a43
1411       , p5_a44
1412       , p5_a45
1413       , p5_a46
1414       , p5_a47
1415       , p5_a48
1416       , p5_a49
1417       , p5_a50
1418       , p5_a51
1419       , p5_a52
1420       , p5_a53
1421       , p5_a54
1422       , p5_a55
1423       );
1424 
1425 
1426     -- here's the delegated call to the old PL/SQL routine
1427     okl_til_pvt.insert_row(p_api_version,
1428       p_init_msg_list,
1429       x_return_status,
1430       x_msg_count,
1431       x_msg_data,
1432       ddp_tilv_tbl,
1433       ddx_tilv_tbl);
1434 
1435     -- copy data back from the local variables to OUT or IN-OUT args, if any
1436 
1437 
1438 
1439 
1440 
1441 
1442     okl_til_pvt_w.rosetta_table_copy_out_p8(ddx_tilv_tbl, p6_a0
1443       , p6_a1
1444       , p6_a2
1445       , p6_a3
1446       , p6_a4
1447       , p6_a5
1448       , p6_a6
1449       , p6_a7
1450       , p6_a8
1451       , p6_a9
1452       , p6_a10
1453       , p6_a11
1454       , p6_a12
1455       , p6_a13
1456       , p6_a14
1457       , p6_a15
1458       , p6_a16
1459       , p6_a17
1460       , p6_a18
1461       , p6_a19
1462       , p6_a20
1463       , p6_a21
1464       , p6_a22
1465       , p6_a23
1466       , p6_a24
1467       , p6_a25
1468       , p6_a26
1469       , p6_a27
1470       , p6_a28
1471       , p6_a29
1472       , p6_a30
1473       , p6_a31
1474       , p6_a32
1475       , p6_a33
1476       , p6_a34
1477       , p6_a35
1478       , p6_a36
1479       , p6_a37
1480       , p6_a38
1481       , p6_a39
1482       , p6_a40
1483       , p6_a41
1484       , p6_a42
1485       , p6_a43
1486       , p6_a44
1487       , p6_a45
1488       , p6_a46
1489       , p6_a47
1490       , p6_a48
1491       , p6_a49
1492       , p6_a50
1493       , p6_a51
1494       , p6_a52
1495       , p6_a53
1496       , p6_a54
1497       , p6_a55
1498       );
1499   end;
1500 
1501   procedure lock_row(p_api_version  NUMBER
1502     , p_init_msg_list  VARCHAR2
1503     , x_return_status out nocopy  VARCHAR2
1504     , x_msg_count out nocopy  NUMBER
1505     , x_msg_data out nocopy  VARCHAR2
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  NUMBER := 0-1962.0724
1511     , p5_a5  NUMBER := 0-1962.0724
1512     , p5_a6  NUMBER := 0-1962.0724
1513     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1514     , p5_a8  NUMBER := 0-1962.0724
1515     , p5_a9  NUMBER := 0-1962.0724
1516     , p5_a10  NUMBER := 0-1962.0724
1517     , p5_a11  NUMBER := 0-1962.0724
1518     , p5_a12  NUMBER := 0-1962.0724
1519     , p5_a13  NUMBER := 0-1962.0724
1520     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1521     , p5_a15  NUMBER := 0-1962.0724
1522     , p5_a16  DATE := fnd_api.g_miss_date
1523     , p5_a17  NUMBER := 0-1962.0724
1524     , p5_a18  DATE := fnd_api.g_miss_date
1525     , p5_a19  NUMBER := 0-1962.0724
1526     , p5_a20  NUMBER := 0-1962.0724
1527     , p5_a21  NUMBER := 0-1962.0724
1528     , p5_a22  NUMBER := 0-1962.0724
1529     , p5_a23  NUMBER := 0-1962.0724
1530     , p5_a24  NUMBER := 0-1962.0724
1531     , p5_a25  NUMBER := 0-1962.0724
1532     , p5_a26  NUMBER := 0-1962.0724
1533     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1534     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1535     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1536     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1537     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1538     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1539     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1540     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1541     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
1542     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
1543     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
1544     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1545     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1546     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
1547     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
1548     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1549     , p5_a43  NUMBER := 0-1962.0724
1550     , p5_a44  NUMBER := 0-1962.0724
1551     , p5_a45  NUMBER := 0-1962.0724
1552     , p5_a46  DATE := fnd_api.g_miss_date
1553     , p5_a47  NUMBER := 0-1962.0724
1554     , p5_a48  NUMBER := 0-1962.0724
1555     , p5_a49  NUMBER := 0-1962.0724
1556     , p5_a50  DATE := fnd_api.g_miss_date
1557     , p5_a51  NUMBER := 0-1962.0724
1558     , p5_a52  DATE := fnd_api.g_miss_date
1559     , p5_a53  NUMBER := 0-1962.0724
1560     , p5_a54  NUMBER := 0-1962.0724
1561     , p5_a55  NUMBER := 0-1962.0724
1562   )
1563 
1564   as
1565     ddp_tilv_rec okl_til_pvt.tilv_rec_type;
1566     ddindx binary_integer; indx binary_integer;
1567   begin
1568 
1569     -- copy data to the local IN or IN-OUT args, if any
1570 
1571 
1572 
1573 
1574 
1575     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
1576     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1577     ddp_tilv_rec.error_message := p5_a2;
1578     ddp_tilv_rec.sfwt_flag := p5_a3;
1579     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1580     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
1581     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
1582     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
1583     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
1584     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
1585     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
1586     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
1587     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
1588     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
1589     ddp_tilv_rec.description := p5_a14;
1590     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
1591     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
1592     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
1593     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
1594     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
1595     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
1596     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
1597     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
1598     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
1599     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
1600     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
1601     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
1602     ddp_tilv_rec.attribute_category := p5_a27;
1603     ddp_tilv_rec.attribute1 := p5_a28;
1604     ddp_tilv_rec.attribute2 := p5_a29;
1605     ddp_tilv_rec.attribute3 := p5_a30;
1606     ddp_tilv_rec.attribute4 := p5_a31;
1607     ddp_tilv_rec.attribute5 := p5_a32;
1608     ddp_tilv_rec.attribute6 := p5_a33;
1609     ddp_tilv_rec.attribute7 := p5_a34;
1610     ddp_tilv_rec.attribute8 := p5_a35;
1611     ddp_tilv_rec.attribute9 := p5_a36;
1612     ddp_tilv_rec.attribute10 := p5_a37;
1613     ddp_tilv_rec.attribute11 := p5_a38;
1614     ddp_tilv_rec.attribute12 := p5_a39;
1615     ddp_tilv_rec.attribute13 := p5_a40;
1616     ddp_tilv_rec.attribute14 := p5_a41;
1617     ddp_tilv_rec.attribute15 := p5_a42;
1618     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
1619     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
1620     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
1621     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
1622     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
1623     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
1624     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1625     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
1626     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
1627     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1628     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1629     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
1630     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
1631 
1632     -- here's the delegated call to the old PL/SQL routine
1633     okl_til_pvt.lock_row(p_api_version,
1634       p_init_msg_list,
1635       x_return_status,
1636       x_msg_count,
1637       x_msg_data,
1638       ddp_tilv_rec);
1639 
1640     -- copy data back from the local variables to OUT or IN-OUT args, if any
1641 
1642 
1643 
1644 
1645 
1646   end;
1647 
1648   procedure lock_row(p_api_version  NUMBER
1649     , p_init_msg_list  VARCHAR2
1650     , x_return_status out nocopy  VARCHAR2
1651     , x_msg_count out nocopy  NUMBER
1652     , x_msg_data out nocopy  VARCHAR2
1653     , p5_a0 JTF_NUMBER_TABLE
1654     , p5_a1 JTF_NUMBER_TABLE
1655     , p5_a2 JTF_VARCHAR2_TABLE_3000
1656     , p5_a3 JTF_VARCHAR2_TABLE_100
1657     , p5_a4 JTF_NUMBER_TABLE
1658     , p5_a5 JTF_NUMBER_TABLE
1659     , p5_a6 JTF_NUMBER_TABLE
1660     , p5_a7 JTF_VARCHAR2_TABLE_100
1661     , p5_a8 JTF_NUMBER_TABLE
1662     , p5_a9 JTF_NUMBER_TABLE
1663     , p5_a10 JTF_NUMBER_TABLE
1664     , p5_a11 JTF_NUMBER_TABLE
1665     , p5_a12 JTF_NUMBER_TABLE
1666     , p5_a13 JTF_NUMBER_TABLE
1667     , p5_a14 JTF_VARCHAR2_TABLE_2000
1668     , p5_a15 JTF_NUMBER_TABLE
1669     , p5_a16 JTF_DATE_TABLE
1670     , p5_a17 JTF_NUMBER_TABLE
1671     , p5_a18 JTF_DATE_TABLE
1672     , p5_a19 JTF_NUMBER_TABLE
1673     , p5_a20 JTF_NUMBER_TABLE
1674     , p5_a21 JTF_NUMBER_TABLE
1675     , p5_a22 JTF_NUMBER_TABLE
1676     , p5_a23 JTF_NUMBER_TABLE
1677     , p5_a24 JTF_NUMBER_TABLE
1678     , p5_a25 JTF_NUMBER_TABLE
1679     , p5_a26 JTF_NUMBER_TABLE
1680     , p5_a27 JTF_VARCHAR2_TABLE_100
1681     , p5_a28 JTF_VARCHAR2_TABLE_500
1682     , p5_a29 JTF_VARCHAR2_TABLE_500
1683     , p5_a30 JTF_VARCHAR2_TABLE_500
1684     , p5_a31 JTF_VARCHAR2_TABLE_500
1685     , p5_a32 JTF_VARCHAR2_TABLE_500
1686     , p5_a33 JTF_VARCHAR2_TABLE_500
1687     , p5_a34 JTF_VARCHAR2_TABLE_500
1688     , p5_a35 JTF_VARCHAR2_TABLE_500
1689     , p5_a36 JTF_VARCHAR2_TABLE_500
1690     , p5_a37 JTF_VARCHAR2_TABLE_500
1691     , p5_a38 JTF_VARCHAR2_TABLE_500
1692     , p5_a39 JTF_VARCHAR2_TABLE_500
1693     , p5_a40 JTF_VARCHAR2_TABLE_500
1694     , p5_a41 JTF_VARCHAR2_TABLE_500
1695     , p5_a42 JTF_VARCHAR2_TABLE_500
1696     , p5_a43 JTF_NUMBER_TABLE
1697     , p5_a44 JTF_NUMBER_TABLE
1698     , p5_a45 JTF_NUMBER_TABLE
1699     , p5_a46 JTF_DATE_TABLE
1700     , p5_a47 JTF_NUMBER_TABLE
1701     , p5_a48 JTF_NUMBER_TABLE
1702     , p5_a49 JTF_NUMBER_TABLE
1703     , p5_a50 JTF_DATE_TABLE
1704     , p5_a51 JTF_NUMBER_TABLE
1705     , p5_a52 JTF_DATE_TABLE
1706     , p5_a53 JTF_NUMBER_TABLE
1707     , p5_a54 JTF_NUMBER_TABLE
1708     , p5_a55 JTF_NUMBER_TABLE
1709   )
1710 
1711   as
1712     ddp_tilv_tbl okl_til_pvt.tilv_tbl_type;
1713     ddindx binary_integer; indx binary_integer;
1714   begin
1715 
1716     -- copy data to the local IN or IN-OUT args, if any
1717 
1718 
1719 
1720 
1721 
1722     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
1723       , p5_a1
1724       , p5_a2
1725       , p5_a3
1726       , p5_a4
1727       , p5_a5
1728       , p5_a6
1729       , p5_a7
1730       , p5_a8
1731       , p5_a9
1732       , p5_a10
1733       , p5_a11
1734       , p5_a12
1735       , p5_a13
1736       , p5_a14
1737       , p5_a15
1738       , p5_a16
1739       , p5_a17
1740       , p5_a18
1741       , p5_a19
1742       , p5_a20
1743       , p5_a21
1744       , p5_a22
1745       , p5_a23
1746       , p5_a24
1747       , p5_a25
1748       , p5_a26
1749       , p5_a27
1750       , p5_a28
1751       , p5_a29
1752       , p5_a30
1753       , p5_a31
1754       , p5_a32
1755       , p5_a33
1756       , p5_a34
1757       , p5_a35
1758       , p5_a36
1759       , p5_a37
1760       , p5_a38
1761       , p5_a39
1762       , p5_a40
1763       , p5_a41
1764       , p5_a42
1765       , p5_a43
1766       , p5_a44
1767       , p5_a45
1768       , p5_a46
1769       , p5_a47
1770       , p5_a48
1771       , p5_a49
1772       , p5_a50
1773       , p5_a51
1774       , p5_a52
1775       , p5_a53
1776       , p5_a54
1777       , p5_a55
1778       );
1779 
1780     -- here's the delegated call to the old PL/SQL routine
1781     okl_til_pvt.lock_row(p_api_version,
1782       p_init_msg_list,
1783       x_return_status,
1784       x_msg_count,
1785       x_msg_data,
1786       ddp_tilv_tbl);
1787 
1788     -- copy data back from the local variables to OUT or IN-OUT args, if any
1789 
1790 
1791 
1792 
1793 
1794   end;
1795 
1796   procedure update_row(p_api_version  NUMBER
1797     , p_init_msg_list  VARCHAR2
1798     , x_return_status out nocopy  VARCHAR2
1799     , x_msg_count out nocopy  NUMBER
1800     , x_msg_data out nocopy  VARCHAR2
1801     , p6_a0 out nocopy  NUMBER
1802     , p6_a1 out nocopy  NUMBER
1803     , p6_a2 out nocopy  VARCHAR2
1804     , p6_a3 out nocopy  VARCHAR2
1805     , p6_a4 out nocopy  NUMBER
1806     , p6_a5 out nocopy  NUMBER
1807     , p6_a6 out nocopy  NUMBER
1808     , p6_a7 out nocopy  VARCHAR2
1809     , p6_a8 out nocopy  NUMBER
1810     , p6_a9 out nocopy  NUMBER
1811     , p6_a10 out nocopy  NUMBER
1812     , p6_a11 out nocopy  NUMBER
1813     , p6_a12 out nocopy  NUMBER
1814     , p6_a13 out nocopy  NUMBER
1815     , p6_a14 out nocopy  VARCHAR2
1816     , p6_a15 out nocopy  NUMBER
1817     , p6_a16 out nocopy  DATE
1818     , p6_a17 out nocopy  NUMBER
1819     , p6_a18 out nocopy  DATE
1820     , p6_a19 out nocopy  NUMBER
1821     , p6_a20 out nocopy  NUMBER
1822     , p6_a21 out nocopy  NUMBER
1823     , p6_a22 out nocopy  NUMBER
1824     , p6_a23 out nocopy  NUMBER
1825     , p6_a24 out nocopy  NUMBER
1826     , p6_a25 out nocopy  NUMBER
1827     , p6_a26 out nocopy  NUMBER
1828     , p6_a27 out nocopy  VARCHAR2
1829     , p6_a28 out nocopy  VARCHAR2
1830     , p6_a29 out nocopy  VARCHAR2
1831     , p6_a30 out nocopy  VARCHAR2
1832     , p6_a31 out nocopy  VARCHAR2
1833     , p6_a32 out nocopy  VARCHAR2
1834     , p6_a33 out nocopy  VARCHAR2
1835     , p6_a34 out nocopy  VARCHAR2
1836     , p6_a35 out nocopy  VARCHAR2
1837     , p6_a36 out nocopy  VARCHAR2
1838     , p6_a37 out nocopy  VARCHAR2
1839     , p6_a38 out nocopy  VARCHAR2
1840     , p6_a39 out nocopy  VARCHAR2
1841     , p6_a40 out nocopy  VARCHAR2
1842     , p6_a41 out nocopy  VARCHAR2
1843     , p6_a42 out nocopy  VARCHAR2
1844     , p6_a43 out nocopy  NUMBER
1845     , p6_a44 out nocopy  NUMBER
1846     , p6_a45 out nocopy  NUMBER
1847     , p6_a46 out nocopy  DATE
1848     , p6_a47 out nocopy  NUMBER
1849     , p6_a48 out nocopy  NUMBER
1850     , p6_a49 out nocopy  NUMBER
1851     , p6_a50 out nocopy  DATE
1852     , p6_a51 out nocopy  NUMBER
1853     , p6_a52 out nocopy  DATE
1854     , p6_a53 out nocopy  NUMBER
1855     , p6_a54 out nocopy  NUMBER
1856     , p6_a55 out nocopy  NUMBER
1857     , p5_a0  NUMBER := 0-1962.0724
1858     , p5_a1  NUMBER := 0-1962.0724
1859     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1860     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1861     , p5_a4  NUMBER := 0-1962.0724
1862     , p5_a5  NUMBER := 0-1962.0724
1863     , p5_a6  NUMBER := 0-1962.0724
1864     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1865     , p5_a8  NUMBER := 0-1962.0724
1866     , p5_a9  NUMBER := 0-1962.0724
1867     , p5_a10  NUMBER := 0-1962.0724
1868     , p5_a11  NUMBER := 0-1962.0724
1869     , p5_a12  NUMBER := 0-1962.0724
1870     , p5_a13  NUMBER := 0-1962.0724
1871     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1872     , p5_a15  NUMBER := 0-1962.0724
1873     , p5_a16  DATE := fnd_api.g_miss_date
1874     , p5_a17  NUMBER := 0-1962.0724
1875     , p5_a18  DATE := fnd_api.g_miss_date
1876     , p5_a19  NUMBER := 0-1962.0724
1877     , p5_a20  NUMBER := 0-1962.0724
1878     , p5_a21  NUMBER := 0-1962.0724
1879     , p5_a22  NUMBER := 0-1962.0724
1880     , p5_a23  NUMBER := 0-1962.0724
1881     , p5_a24  NUMBER := 0-1962.0724
1882     , p5_a25  NUMBER := 0-1962.0724
1883     , p5_a26  NUMBER := 0-1962.0724
1884     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1885     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1886     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1887     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1888     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1889     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1890     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1891     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1892     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
1893     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
1894     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
1895     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1896     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1897     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
1898     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
1899     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1900     , p5_a43  NUMBER := 0-1962.0724
1901     , p5_a44  NUMBER := 0-1962.0724
1902     , p5_a45  NUMBER := 0-1962.0724
1903     , p5_a46  DATE := fnd_api.g_miss_date
1904     , p5_a47  NUMBER := 0-1962.0724
1905     , p5_a48  NUMBER := 0-1962.0724
1906     , p5_a49  NUMBER := 0-1962.0724
1907     , p5_a50  DATE := fnd_api.g_miss_date
1908     , p5_a51  NUMBER := 0-1962.0724
1909     , p5_a52  DATE := fnd_api.g_miss_date
1910     , p5_a53  NUMBER := 0-1962.0724
1911     , p5_a54  NUMBER := 0-1962.0724
1912     , p5_a55  NUMBER := 0-1962.0724
1913   )
1914 
1915   as
1916     ddp_tilv_rec okl_til_pvt.tilv_rec_type;
1917     ddx_tilv_rec okl_til_pvt.tilv_rec_type;
1918     ddindx binary_integer; indx binary_integer;
1919   begin
1920 
1921     -- copy data to the local IN or IN-OUT args, if any
1922 
1923 
1924 
1925 
1926 
1927     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
1928     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1929     ddp_tilv_rec.error_message := p5_a2;
1930     ddp_tilv_rec.sfwt_flag := p5_a3;
1931     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1932     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
1933     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
1934     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
1935     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
1936     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
1937     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
1938     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
1939     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
1940     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
1941     ddp_tilv_rec.description := p5_a14;
1942     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
1943     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
1944     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
1945     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
1946     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
1947     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
1948     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
1949     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
1950     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
1951     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
1952     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
1953     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
1954     ddp_tilv_rec.attribute_category := p5_a27;
1955     ddp_tilv_rec.attribute1 := p5_a28;
1956     ddp_tilv_rec.attribute2 := p5_a29;
1957     ddp_tilv_rec.attribute3 := p5_a30;
1958     ddp_tilv_rec.attribute4 := p5_a31;
1959     ddp_tilv_rec.attribute5 := p5_a32;
1960     ddp_tilv_rec.attribute6 := p5_a33;
1961     ddp_tilv_rec.attribute7 := p5_a34;
1962     ddp_tilv_rec.attribute8 := p5_a35;
1963     ddp_tilv_rec.attribute9 := p5_a36;
1964     ddp_tilv_rec.attribute10 := p5_a37;
1965     ddp_tilv_rec.attribute11 := p5_a38;
1966     ddp_tilv_rec.attribute12 := p5_a39;
1967     ddp_tilv_rec.attribute13 := p5_a40;
1968     ddp_tilv_rec.attribute14 := p5_a41;
1969     ddp_tilv_rec.attribute15 := p5_a42;
1970     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
1971     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
1972     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
1973     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
1974     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
1975     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
1976     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1977     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
1978     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
1979     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1980     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1981     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
1982     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
1983 
1984 
1985     -- here's the delegated call to the old PL/SQL routine
1986     okl_til_pvt.update_row(p_api_version,
1987       p_init_msg_list,
1988       x_return_status,
1989       x_msg_count,
1990       x_msg_data,
1991       ddp_tilv_rec,
1992       ddx_tilv_rec);
1993 
1994     -- copy data back from the local variables to OUT or IN-OUT args, if any
1995 
1996 
1997 
1998 
1999 
2000 
2001     p6_a0 := rosetta_g_miss_num_map(ddx_tilv_rec.id);
2002     p6_a1 := rosetta_g_miss_num_map(ddx_tilv_rec.object_version_number);
2003     p6_a2 := ddx_tilv_rec.error_message;
2004     p6_a3 := ddx_tilv_rec.sfwt_flag;
2005     p6_a4 := rosetta_g_miss_num_map(ddx_tilv_rec.kle_id);
2006     p6_a5 := rosetta_g_miss_num_map(ddx_tilv_rec.tpl_id);
2007     p6_a6 := rosetta_g_miss_num_map(ddx_tilv_rec.til_id_reverses);
2008     p6_a7 := ddx_tilv_rec.inv_receiv_line_code;
2009     p6_a8 := rosetta_g_miss_num_map(ddx_tilv_rec.sty_id);
2010     p6_a9 := rosetta_g_miss_num_map(ddx_tilv_rec.tai_id);
2011     p6_a10 := rosetta_g_miss_num_map(ddx_tilv_rec.acn_id_cost);
2012     p6_a11 := rosetta_g_miss_num_map(ddx_tilv_rec.amount);
2013     p6_a12 := rosetta_g_miss_num_map(ddx_tilv_rec.line_number);
2014     p6_a13 := rosetta_g_miss_num_map(ddx_tilv_rec.quantity);
2015     p6_a14 := ddx_tilv_rec.description;
2016     p6_a15 := rosetta_g_miss_num_map(ddx_tilv_rec.receivables_invoice_id);
2017     p6_a16 := ddx_tilv_rec.date_bill_period_start;
2018     p6_a17 := rosetta_g_miss_num_map(ddx_tilv_rec.amount_applied);
2019     p6_a18 := ddx_tilv_rec.date_bill_period_end;
2020     p6_a19 := rosetta_g_miss_num_map(ddx_tilv_rec.isl_id);
2021     p6_a20 := rosetta_g_miss_num_map(ddx_tilv_rec.ibt_id);
2022     p6_a21 := rosetta_g_miss_num_map(ddx_tilv_rec.late_charge_rec_id);
2023     p6_a22 := rosetta_g_miss_num_map(ddx_tilv_rec.cll_id);
2024     p6_a23 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_item_id);
2025     p6_a24 := rosetta_g_miss_num_map(ddx_tilv_rec.qte_line_id);
2026     p6_a25 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_id);
2027     p6_a26 := rosetta_g_miss_num_map(ddx_tilv_rec.bank_acct_id);
2028     p6_a27 := ddx_tilv_rec.attribute_category;
2029     p6_a28 := ddx_tilv_rec.attribute1;
2030     p6_a29 := ddx_tilv_rec.attribute2;
2031     p6_a30 := ddx_tilv_rec.attribute3;
2032     p6_a31 := ddx_tilv_rec.attribute4;
2033     p6_a32 := ddx_tilv_rec.attribute5;
2034     p6_a33 := ddx_tilv_rec.attribute6;
2035     p6_a34 := ddx_tilv_rec.attribute7;
2036     p6_a35 := ddx_tilv_rec.attribute8;
2037     p6_a36 := ddx_tilv_rec.attribute9;
2038     p6_a37 := ddx_tilv_rec.attribute10;
2039     p6_a38 := ddx_tilv_rec.attribute11;
2040     p6_a39 := ddx_tilv_rec.attribute12;
2041     p6_a40 := ddx_tilv_rec.attribute13;
2042     p6_a41 := ddx_tilv_rec.attribute14;
2043     p6_a42 := ddx_tilv_rec.attribute15;
2044     p6_a43 := rosetta_g_miss_num_map(ddx_tilv_rec.request_id);
2045     p6_a44 := rosetta_g_miss_num_map(ddx_tilv_rec.program_application_id);
2046     p6_a45 := rosetta_g_miss_num_map(ddx_tilv_rec.program_id);
2047     p6_a46 := ddx_tilv_rec.program_update_date;
2048     p6_a47 := rosetta_g_miss_num_map(ddx_tilv_rec.org_id);
2049     p6_a48 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_org_id);
2050     p6_a49 := rosetta_g_miss_num_map(ddx_tilv_rec.created_by);
2051     p6_a50 := ddx_tilv_rec.creation_date;
2052     p6_a51 := rosetta_g_miss_num_map(ddx_tilv_rec.last_updated_by);
2053     p6_a52 := ddx_tilv_rec.last_update_date;
2054     p6_a53 := rosetta_g_miss_num_map(ddx_tilv_rec.last_update_login);
2055     p6_a54 := rosetta_g_miss_num_map(ddx_tilv_rec.txl_ar_line_number);
2056     p6_a55 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_line_id);
2057   end;
2058 
2059   procedure update_row(p_api_version  NUMBER
2060     , p_init_msg_list  VARCHAR2
2061     , x_return_status out nocopy  VARCHAR2
2062     , x_msg_count out nocopy  NUMBER
2063     , x_msg_data out nocopy  VARCHAR2
2064     , p5_a0 JTF_NUMBER_TABLE
2065     , p5_a1 JTF_NUMBER_TABLE
2066     , p5_a2 JTF_VARCHAR2_TABLE_3000
2067     , p5_a3 JTF_VARCHAR2_TABLE_100
2068     , p5_a4 JTF_NUMBER_TABLE
2069     , p5_a5 JTF_NUMBER_TABLE
2070     , p5_a6 JTF_NUMBER_TABLE
2071     , p5_a7 JTF_VARCHAR2_TABLE_100
2072     , p5_a8 JTF_NUMBER_TABLE
2073     , p5_a9 JTF_NUMBER_TABLE
2074     , p5_a10 JTF_NUMBER_TABLE
2075     , p5_a11 JTF_NUMBER_TABLE
2076     , p5_a12 JTF_NUMBER_TABLE
2077     , p5_a13 JTF_NUMBER_TABLE
2078     , p5_a14 JTF_VARCHAR2_TABLE_2000
2079     , p5_a15 JTF_NUMBER_TABLE
2080     , p5_a16 JTF_DATE_TABLE
2081     , p5_a17 JTF_NUMBER_TABLE
2082     , p5_a18 JTF_DATE_TABLE
2083     , p5_a19 JTF_NUMBER_TABLE
2084     , p5_a20 JTF_NUMBER_TABLE
2085     , p5_a21 JTF_NUMBER_TABLE
2086     , p5_a22 JTF_NUMBER_TABLE
2087     , p5_a23 JTF_NUMBER_TABLE
2088     , p5_a24 JTF_NUMBER_TABLE
2089     , p5_a25 JTF_NUMBER_TABLE
2090     , p5_a26 JTF_NUMBER_TABLE
2091     , p5_a27 JTF_VARCHAR2_TABLE_100
2092     , p5_a28 JTF_VARCHAR2_TABLE_500
2093     , p5_a29 JTF_VARCHAR2_TABLE_500
2094     , p5_a30 JTF_VARCHAR2_TABLE_500
2095     , p5_a31 JTF_VARCHAR2_TABLE_500
2096     , p5_a32 JTF_VARCHAR2_TABLE_500
2097     , p5_a33 JTF_VARCHAR2_TABLE_500
2098     , p5_a34 JTF_VARCHAR2_TABLE_500
2099     , p5_a35 JTF_VARCHAR2_TABLE_500
2100     , p5_a36 JTF_VARCHAR2_TABLE_500
2101     , p5_a37 JTF_VARCHAR2_TABLE_500
2102     , p5_a38 JTF_VARCHAR2_TABLE_500
2103     , p5_a39 JTF_VARCHAR2_TABLE_500
2104     , p5_a40 JTF_VARCHAR2_TABLE_500
2105     , p5_a41 JTF_VARCHAR2_TABLE_500
2106     , p5_a42 JTF_VARCHAR2_TABLE_500
2107     , p5_a43 JTF_NUMBER_TABLE
2108     , p5_a44 JTF_NUMBER_TABLE
2109     , p5_a45 JTF_NUMBER_TABLE
2110     , p5_a46 JTF_DATE_TABLE
2111     , p5_a47 JTF_NUMBER_TABLE
2112     , p5_a48 JTF_NUMBER_TABLE
2113     , p5_a49 JTF_NUMBER_TABLE
2114     , p5_a50 JTF_DATE_TABLE
2115     , p5_a51 JTF_NUMBER_TABLE
2116     , p5_a52 JTF_DATE_TABLE
2117     , p5_a53 JTF_NUMBER_TABLE
2118     , p5_a54 JTF_NUMBER_TABLE
2119     , p5_a55 JTF_NUMBER_TABLE
2120     , p6_a0 out nocopy JTF_NUMBER_TABLE
2121     , p6_a1 out nocopy JTF_NUMBER_TABLE
2122     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_3000
2123     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
2124     , p6_a4 out nocopy JTF_NUMBER_TABLE
2125     , p6_a5 out nocopy JTF_NUMBER_TABLE
2126     , p6_a6 out nocopy JTF_NUMBER_TABLE
2127     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
2128     , p6_a8 out nocopy JTF_NUMBER_TABLE
2129     , p6_a9 out nocopy JTF_NUMBER_TABLE
2130     , p6_a10 out nocopy JTF_NUMBER_TABLE
2131     , p6_a11 out nocopy JTF_NUMBER_TABLE
2132     , p6_a12 out nocopy JTF_NUMBER_TABLE
2133     , p6_a13 out nocopy JTF_NUMBER_TABLE
2134     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_2000
2135     , p6_a15 out nocopy JTF_NUMBER_TABLE
2136     , p6_a16 out nocopy JTF_DATE_TABLE
2137     , p6_a17 out nocopy JTF_NUMBER_TABLE
2138     , p6_a18 out nocopy JTF_DATE_TABLE
2139     , p6_a19 out nocopy JTF_NUMBER_TABLE
2140     , p6_a20 out nocopy JTF_NUMBER_TABLE
2141     , p6_a21 out nocopy JTF_NUMBER_TABLE
2142     , p6_a22 out nocopy JTF_NUMBER_TABLE
2143     , p6_a23 out nocopy JTF_NUMBER_TABLE
2144     , p6_a24 out nocopy JTF_NUMBER_TABLE
2145     , p6_a25 out nocopy JTF_NUMBER_TABLE
2146     , p6_a26 out nocopy JTF_NUMBER_TABLE
2147     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
2148     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
2149     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
2150     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
2151     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
2152     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
2153     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
2154     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
2155     , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
2156     , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
2157     , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
2158     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
2159     , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
2160     , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
2161     , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
2162     , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
2163     , p6_a43 out nocopy JTF_NUMBER_TABLE
2164     , p6_a44 out nocopy JTF_NUMBER_TABLE
2165     , p6_a45 out nocopy JTF_NUMBER_TABLE
2166     , p6_a46 out nocopy JTF_DATE_TABLE
2167     , p6_a47 out nocopy JTF_NUMBER_TABLE
2168     , p6_a48 out nocopy JTF_NUMBER_TABLE
2169     , p6_a49 out nocopy JTF_NUMBER_TABLE
2170     , p6_a50 out nocopy JTF_DATE_TABLE
2171     , p6_a51 out nocopy JTF_NUMBER_TABLE
2172     , p6_a52 out nocopy JTF_DATE_TABLE
2173     , p6_a53 out nocopy JTF_NUMBER_TABLE
2174     , p6_a54 out nocopy JTF_NUMBER_TABLE
2175     , p6_a55 out nocopy JTF_NUMBER_TABLE
2176   )
2177 
2178   as
2179     ddp_tilv_tbl okl_til_pvt.tilv_tbl_type;
2180     ddx_tilv_tbl okl_til_pvt.tilv_tbl_type;
2181     ddindx binary_integer; indx binary_integer;
2182   begin
2183 
2184     -- copy data to the local IN or IN-OUT args, if any
2185 
2186 
2187 
2188 
2189 
2190     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
2191       , p5_a1
2192       , p5_a2
2193       , p5_a3
2194       , p5_a4
2195       , p5_a5
2196       , p5_a6
2197       , p5_a7
2198       , p5_a8
2199       , p5_a9
2200       , p5_a10
2201       , p5_a11
2202       , p5_a12
2203       , p5_a13
2204       , p5_a14
2205       , p5_a15
2206       , p5_a16
2207       , p5_a17
2208       , p5_a18
2209       , p5_a19
2210       , p5_a20
2211       , p5_a21
2212       , p5_a22
2213       , p5_a23
2214       , p5_a24
2215       , p5_a25
2216       , p5_a26
2217       , p5_a27
2218       , p5_a28
2219       , p5_a29
2220       , p5_a30
2221       , p5_a31
2222       , p5_a32
2223       , p5_a33
2224       , p5_a34
2225       , p5_a35
2226       , p5_a36
2227       , p5_a37
2228       , p5_a38
2229       , p5_a39
2230       , p5_a40
2231       , p5_a41
2232       , p5_a42
2233       , p5_a43
2234       , p5_a44
2235       , p5_a45
2236       , p5_a46
2237       , p5_a47
2238       , p5_a48
2239       , p5_a49
2240       , p5_a50
2241       , p5_a51
2242       , p5_a52
2243       , p5_a53
2244       , p5_a54
2245       , p5_a55
2246       );
2247 
2248 
2249     -- here's the delegated call to the old PL/SQL routine
2250     okl_til_pvt.update_row(p_api_version,
2251       p_init_msg_list,
2252       x_return_status,
2253       x_msg_count,
2254       x_msg_data,
2255       ddp_tilv_tbl,
2256       ddx_tilv_tbl);
2257 
2258     -- copy data back from the local variables to OUT or IN-OUT args, if any
2259 
2260 
2261 
2262 
2263 
2264 
2265     okl_til_pvt_w.rosetta_table_copy_out_p8(ddx_tilv_tbl, p6_a0
2266       , p6_a1
2267       , p6_a2
2268       , p6_a3
2269       , p6_a4
2270       , p6_a5
2271       , p6_a6
2272       , p6_a7
2273       , p6_a8
2274       , p6_a9
2275       , p6_a10
2276       , p6_a11
2277       , p6_a12
2278       , p6_a13
2279       , p6_a14
2280       , p6_a15
2281       , p6_a16
2282       , p6_a17
2283       , p6_a18
2284       , p6_a19
2285       , p6_a20
2286       , p6_a21
2287       , p6_a22
2288       , p6_a23
2289       , p6_a24
2290       , p6_a25
2291       , p6_a26
2292       , p6_a27
2293       , p6_a28
2294       , p6_a29
2295       , p6_a30
2296       , p6_a31
2297       , p6_a32
2298       , p6_a33
2299       , p6_a34
2300       , p6_a35
2301       , p6_a36
2302       , p6_a37
2303       , p6_a38
2304       , p6_a39
2305       , p6_a40
2306       , p6_a41
2307       , p6_a42
2308       , p6_a43
2309       , p6_a44
2310       , p6_a45
2311       , p6_a46
2312       , p6_a47
2313       , p6_a48
2314       , p6_a49
2315       , p6_a50
2316       , p6_a51
2317       , p6_a52
2318       , p6_a53
2319       , p6_a54
2320       , p6_a55
2321       );
2322   end;
2323 
2324   procedure delete_row(p_api_version  NUMBER
2325     , p_init_msg_list  VARCHAR2
2326     , x_return_status out nocopy  VARCHAR2
2327     , x_msg_count out nocopy  NUMBER
2328     , x_msg_data out nocopy  VARCHAR2
2329     , p5_a0  NUMBER := 0-1962.0724
2330     , p5_a1  NUMBER := 0-1962.0724
2331     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
2332     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
2333     , p5_a4  NUMBER := 0-1962.0724
2334     , p5_a5  NUMBER := 0-1962.0724
2335     , p5_a6  NUMBER := 0-1962.0724
2336     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
2337     , p5_a8  NUMBER := 0-1962.0724
2338     , p5_a9  NUMBER := 0-1962.0724
2339     , p5_a10  NUMBER := 0-1962.0724
2340     , p5_a11  NUMBER := 0-1962.0724
2341     , p5_a12  NUMBER := 0-1962.0724
2342     , p5_a13  NUMBER := 0-1962.0724
2343     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
2344     , p5_a15  NUMBER := 0-1962.0724
2345     , p5_a16  DATE := fnd_api.g_miss_date
2346     , p5_a17  NUMBER := 0-1962.0724
2347     , p5_a18  DATE := fnd_api.g_miss_date
2348     , p5_a19  NUMBER := 0-1962.0724
2349     , p5_a20  NUMBER := 0-1962.0724
2350     , p5_a21  NUMBER := 0-1962.0724
2351     , p5_a22  NUMBER := 0-1962.0724
2352     , p5_a23  NUMBER := 0-1962.0724
2353     , p5_a24  NUMBER := 0-1962.0724
2354     , p5_a25  NUMBER := 0-1962.0724
2355     , p5_a26  NUMBER := 0-1962.0724
2356     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
2357     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
2358     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
2359     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
2360     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
2361     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
2362     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
2363     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
2364     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
2365     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
2366     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
2367     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
2368     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
2369     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
2370     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
2371     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
2372     , p5_a43  NUMBER := 0-1962.0724
2373     , p5_a44  NUMBER := 0-1962.0724
2374     , p5_a45  NUMBER := 0-1962.0724
2375     , p5_a46  DATE := fnd_api.g_miss_date
2376     , p5_a47  NUMBER := 0-1962.0724
2377     , p5_a48  NUMBER := 0-1962.0724
2378     , p5_a49  NUMBER := 0-1962.0724
2379     , p5_a50  DATE := fnd_api.g_miss_date
2380     , p5_a51  NUMBER := 0-1962.0724
2381     , p5_a52  DATE := fnd_api.g_miss_date
2382     , p5_a53  NUMBER := 0-1962.0724
2383     , p5_a54  NUMBER := 0-1962.0724
2384     , p5_a55  NUMBER := 0-1962.0724
2385   )
2386 
2387   as
2388     ddp_tilv_rec okl_til_pvt.tilv_rec_type;
2389     ddindx binary_integer; indx binary_integer;
2390   begin
2391 
2392     -- copy data to the local IN or IN-OUT args, if any
2393 
2394 
2395 
2396 
2397 
2398     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
2399     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2400     ddp_tilv_rec.error_message := p5_a2;
2401     ddp_tilv_rec.sfwt_flag := p5_a3;
2402     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
2403     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
2404     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
2405     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
2406     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
2407     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
2408     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
2409     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
2410     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
2411     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
2412     ddp_tilv_rec.description := p5_a14;
2413     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
2414     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
2415     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
2416     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
2417     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
2418     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
2419     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
2420     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
2421     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
2422     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
2423     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
2424     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
2425     ddp_tilv_rec.attribute_category := p5_a27;
2426     ddp_tilv_rec.attribute1 := p5_a28;
2427     ddp_tilv_rec.attribute2 := p5_a29;
2428     ddp_tilv_rec.attribute3 := p5_a30;
2429     ddp_tilv_rec.attribute4 := p5_a31;
2430     ddp_tilv_rec.attribute5 := p5_a32;
2431     ddp_tilv_rec.attribute6 := p5_a33;
2432     ddp_tilv_rec.attribute7 := p5_a34;
2433     ddp_tilv_rec.attribute8 := p5_a35;
2434     ddp_tilv_rec.attribute9 := p5_a36;
2435     ddp_tilv_rec.attribute10 := p5_a37;
2436     ddp_tilv_rec.attribute11 := p5_a38;
2437     ddp_tilv_rec.attribute12 := p5_a39;
2438     ddp_tilv_rec.attribute13 := p5_a40;
2439     ddp_tilv_rec.attribute14 := p5_a41;
2440     ddp_tilv_rec.attribute15 := p5_a42;
2441     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
2442     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
2443     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
2444     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
2445     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
2446     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
2447     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
2448     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
2449     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
2450     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
2451     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
2452     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
2453     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
2454 
2455     -- here's the delegated call to the old PL/SQL routine
2456     okl_til_pvt.delete_row(p_api_version,
2457       p_init_msg_list,
2458       x_return_status,
2459       x_msg_count,
2460       x_msg_data,
2461       ddp_tilv_rec);
2462 
2463     -- copy data back from the local variables to OUT or IN-OUT args, if any
2464 
2465 
2466 
2467 
2468 
2469   end;
2470 
2471   procedure delete_row(p_api_version  NUMBER
2472     , p_init_msg_list  VARCHAR2
2473     , x_return_status out nocopy  VARCHAR2
2474     , x_msg_count out nocopy  NUMBER
2475     , x_msg_data out nocopy  VARCHAR2
2476     , p5_a0 JTF_NUMBER_TABLE
2477     , p5_a1 JTF_NUMBER_TABLE
2478     , p5_a2 JTF_VARCHAR2_TABLE_3000
2479     , p5_a3 JTF_VARCHAR2_TABLE_100
2480     , p5_a4 JTF_NUMBER_TABLE
2481     , p5_a5 JTF_NUMBER_TABLE
2482     , p5_a6 JTF_NUMBER_TABLE
2483     , p5_a7 JTF_VARCHAR2_TABLE_100
2484     , p5_a8 JTF_NUMBER_TABLE
2485     , p5_a9 JTF_NUMBER_TABLE
2486     , p5_a10 JTF_NUMBER_TABLE
2487     , p5_a11 JTF_NUMBER_TABLE
2488     , p5_a12 JTF_NUMBER_TABLE
2489     , p5_a13 JTF_NUMBER_TABLE
2490     , p5_a14 JTF_VARCHAR2_TABLE_2000
2491     , p5_a15 JTF_NUMBER_TABLE
2492     , p5_a16 JTF_DATE_TABLE
2493     , p5_a17 JTF_NUMBER_TABLE
2494     , p5_a18 JTF_DATE_TABLE
2495     , p5_a19 JTF_NUMBER_TABLE
2496     , p5_a20 JTF_NUMBER_TABLE
2497     , p5_a21 JTF_NUMBER_TABLE
2498     , p5_a22 JTF_NUMBER_TABLE
2499     , p5_a23 JTF_NUMBER_TABLE
2500     , p5_a24 JTF_NUMBER_TABLE
2501     , p5_a25 JTF_NUMBER_TABLE
2502     , p5_a26 JTF_NUMBER_TABLE
2503     , p5_a27 JTF_VARCHAR2_TABLE_100
2504     , p5_a28 JTF_VARCHAR2_TABLE_500
2505     , p5_a29 JTF_VARCHAR2_TABLE_500
2506     , p5_a30 JTF_VARCHAR2_TABLE_500
2507     , p5_a31 JTF_VARCHAR2_TABLE_500
2508     , p5_a32 JTF_VARCHAR2_TABLE_500
2509     , p5_a33 JTF_VARCHAR2_TABLE_500
2510     , p5_a34 JTF_VARCHAR2_TABLE_500
2511     , p5_a35 JTF_VARCHAR2_TABLE_500
2512     , p5_a36 JTF_VARCHAR2_TABLE_500
2513     , p5_a37 JTF_VARCHAR2_TABLE_500
2514     , p5_a38 JTF_VARCHAR2_TABLE_500
2515     , p5_a39 JTF_VARCHAR2_TABLE_500
2516     , p5_a40 JTF_VARCHAR2_TABLE_500
2517     , p5_a41 JTF_VARCHAR2_TABLE_500
2518     , p5_a42 JTF_VARCHAR2_TABLE_500
2519     , p5_a43 JTF_NUMBER_TABLE
2520     , p5_a44 JTF_NUMBER_TABLE
2521     , p5_a45 JTF_NUMBER_TABLE
2522     , p5_a46 JTF_DATE_TABLE
2523     , p5_a47 JTF_NUMBER_TABLE
2524     , p5_a48 JTF_NUMBER_TABLE
2525     , p5_a49 JTF_NUMBER_TABLE
2526     , p5_a50 JTF_DATE_TABLE
2527     , p5_a51 JTF_NUMBER_TABLE
2528     , p5_a52 JTF_DATE_TABLE
2529     , p5_a53 JTF_NUMBER_TABLE
2530     , p5_a54 JTF_NUMBER_TABLE
2531     , p5_a55 JTF_NUMBER_TABLE
2532   )
2533 
2534   as
2535     ddp_tilv_tbl okl_til_pvt.tilv_tbl_type;
2536     ddindx binary_integer; indx binary_integer;
2537   begin
2538 
2539     -- copy data to the local IN or IN-OUT args, if any
2540 
2541 
2542 
2543 
2544 
2545     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
2546       , p5_a1
2547       , p5_a2
2548       , p5_a3
2549       , p5_a4
2550       , p5_a5
2551       , p5_a6
2552       , p5_a7
2553       , p5_a8
2554       , p5_a9
2555       , p5_a10
2556       , p5_a11
2557       , p5_a12
2558       , p5_a13
2559       , p5_a14
2560       , p5_a15
2561       , p5_a16
2562       , p5_a17
2563       , p5_a18
2564       , p5_a19
2565       , p5_a20
2566       , p5_a21
2567       , p5_a22
2568       , p5_a23
2569       , p5_a24
2570       , p5_a25
2571       , p5_a26
2572       , p5_a27
2573       , p5_a28
2574       , p5_a29
2575       , p5_a30
2576       , p5_a31
2577       , p5_a32
2578       , p5_a33
2579       , p5_a34
2580       , p5_a35
2581       , p5_a36
2582       , p5_a37
2583       , p5_a38
2584       , p5_a39
2585       , p5_a40
2586       , p5_a41
2587       , p5_a42
2588       , p5_a43
2589       , p5_a44
2590       , p5_a45
2591       , p5_a46
2592       , p5_a47
2593       , p5_a48
2594       , p5_a49
2595       , p5_a50
2596       , p5_a51
2597       , p5_a52
2598       , p5_a53
2599       , p5_a54
2600       , p5_a55
2601       );
2602 
2603     -- here's the delegated call to the old PL/SQL routine
2604     okl_til_pvt.delete_row(p_api_version,
2605       p_init_msg_list,
2606       x_return_status,
2607       x_msg_count,
2608       x_msg_data,
2609       ddp_tilv_tbl);
2610 
2611     -- copy data back from the local variables to OUT or IN-OUT args, if any
2612 
2613 
2614 
2615 
2616 
2617   end;
2618 
2619   procedure validate_row(p_api_version  NUMBER
2620     , p_init_msg_list  VARCHAR2
2621     , x_return_status out nocopy  VARCHAR2
2622     , x_msg_count out nocopy  NUMBER
2623     , x_msg_data out nocopy  VARCHAR2
2624     , p5_a0  NUMBER := 0-1962.0724
2625     , p5_a1  NUMBER := 0-1962.0724
2626     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
2627     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
2628     , p5_a4  NUMBER := 0-1962.0724
2629     , p5_a5  NUMBER := 0-1962.0724
2630     , p5_a6  NUMBER := 0-1962.0724
2631     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
2632     , p5_a8  NUMBER := 0-1962.0724
2633     , p5_a9  NUMBER := 0-1962.0724
2634     , p5_a10  NUMBER := 0-1962.0724
2635     , p5_a11  NUMBER := 0-1962.0724
2636     , p5_a12  NUMBER := 0-1962.0724
2637     , p5_a13  NUMBER := 0-1962.0724
2638     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
2639     , p5_a15  NUMBER := 0-1962.0724
2640     , p5_a16  DATE := fnd_api.g_miss_date
2641     , p5_a17  NUMBER := 0-1962.0724
2642     , p5_a18  DATE := fnd_api.g_miss_date
2643     , p5_a19  NUMBER := 0-1962.0724
2644     , p5_a20  NUMBER := 0-1962.0724
2645     , p5_a21  NUMBER := 0-1962.0724
2646     , p5_a22  NUMBER := 0-1962.0724
2647     , p5_a23  NUMBER := 0-1962.0724
2648     , p5_a24  NUMBER := 0-1962.0724
2649     , p5_a25  NUMBER := 0-1962.0724
2650     , p5_a26  NUMBER := 0-1962.0724
2651     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
2652     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
2653     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
2654     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
2655     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
2656     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
2657     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
2658     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
2659     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
2660     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
2661     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
2662     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
2663     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
2664     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
2665     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
2666     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
2667     , p5_a43  NUMBER := 0-1962.0724
2668     , p5_a44  NUMBER := 0-1962.0724
2669     , p5_a45  NUMBER := 0-1962.0724
2670     , p5_a46  DATE := fnd_api.g_miss_date
2671     , p5_a47  NUMBER := 0-1962.0724
2672     , p5_a48  NUMBER := 0-1962.0724
2673     , p5_a49  NUMBER := 0-1962.0724
2674     , p5_a50  DATE := fnd_api.g_miss_date
2675     , p5_a51  NUMBER := 0-1962.0724
2676     , p5_a52  DATE := fnd_api.g_miss_date
2677     , p5_a53  NUMBER := 0-1962.0724
2678     , p5_a54  NUMBER := 0-1962.0724
2679     , p5_a55  NUMBER := 0-1962.0724
2680   )
2681 
2682   as
2683     ddp_tilv_rec okl_til_pvt.tilv_rec_type;
2684     ddindx binary_integer; indx binary_integer;
2685   begin
2686 
2687     -- copy data to the local IN or IN-OUT args, if any
2688 
2689 
2690 
2691 
2692 
2693     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
2694     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2695     ddp_tilv_rec.error_message := p5_a2;
2696     ddp_tilv_rec.sfwt_flag := p5_a3;
2697     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
2698     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
2699     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
2700     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
2701     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
2702     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
2703     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
2704     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
2705     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
2706     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
2707     ddp_tilv_rec.description := p5_a14;
2708     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
2709     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
2710     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
2711     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
2712     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
2713     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
2714     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
2715     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
2716     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
2717     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
2718     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
2719     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
2720     ddp_tilv_rec.attribute_category := p5_a27;
2721     ddp_tilv_rec.attribute1 := p5_a28;
2722     ddp_tilv_rec.attribute2 := p5_a29;
2723     ddp_tilv_rec.attribute3 := p5_a30;
2724     ddp_tilv_rec.attribute4 := p5_a31;
2725     ddp_tilv_rec.attribute5 := p5_a32;
2726     ddp_tilv_rec.attribute6 := p5_a33;
2727     ddp_tilv_rec.attribute7 := p5_a34;
2728     ddp_tilv_rec.attribute8 := p5_a35;
2729     ddp_tilv_rec.attribute9 := p5_a36;
2730     ddp_tilv_rec.attribute10 := p5_a37;
2731     ddp_tilv_rec.attribute11 := p5_a38;
2732     ddp_tilv_rec.attribute12 := p5_a39;
2733     ddp_tilv_rec.attribute13 := p5_a40;
2734     ddp_tilv_rec.attribute14 := p5_a41;
2735     ddp_tilv_rec.attribute15 := p5_a42;
2736     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
2737     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
2738     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
2739     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
2740     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
2741     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
2742     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
2743     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
2744     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
2745     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
2746     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
2747     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
2748     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
2749 
2750     -- here's the delegated call to the old PL/SQL routine
2751     okl_til_pvt.validate_row(p_api_version,
2752       p_init_msg_list,
2753       x_return_status,
2754       x_msg_count,
2755       x_msg_data,
2756       ddp_tilv_rec);
2757 
2758     -- copy data back from the local variables to OUT or IN-OUT args, if any
2759 
2760 
2761 
2762 
2763 
2764   end;
2765 
2766   procedure validate_row(p_api_version  NUMBER
2767     , p_init_msg_list  VARCHAR2
2768     , x_return_status out nocopy  VARCHAR2
2769     , x_msg_count out nocopy  NUMBER
2770     , x_msg_data out nocopy  VARCHAR2
2771     , p5_a0 JTF_NUMBER_TABLE
2772     , p5_a1 JTF_NUMBER_TABLE
2773     , p5_a2 JTF_VARCHAR2_TABLE_3000
2774     , p5_a3 JTF_VARCHAR2_TABLE_100
2775     , p5_a4 JTF_NUMBER_TABLE
2776     , p5_a5 JTF_NUMBER_TABLE
2777     , p5_a6 JTF_NUMBER_TABLE
2778     , p5_a7 JTF_VARCHAR2_TABLE_100
2779     , p5_a8 JTF_NUMBER_TABLE
2780     , p5_a9 JTF_NUMBER_TABLE
2781     , p5_a10 JTF_NUMBER_TABLE
2782     , p5_a11 JTF_NUMBER_TABLE
2783     , p5_a12 JTF_NUMBER_TABLE
2784     , p5_a13 JTF_NUMBER_TABLE
2785     , p5_a14 JTF_VARCHAR2_TABLE_2000
2786     , p5_a15 JTF_NUMBER_TABLE
2787     , p5_a16 JTF_DATE_TABLE
2788     , p5_a17 JTF_NUMBER_TABLE
2789     , p5_a18 JTF_DATE_TABLE
2790     , p5_a19 JTF_NUMBER_TABLE
2791     , p5_a20 JTF_NUMBER_TABLE
2792     , p5_a21 JTF_NUMBER_TABLE
2793     , p5_a22 JTF_NUMBER_TABLE
2794     , p5_a23 JTF_NUMBER_TABLE
2795     , p5_a24 JTF_NUMBER_TABLE
2796     , p5_a25 JTF_NUMBER_TABLE
2797     , p5_a26 JTF_NUMBER_TABLE
2798     , p5_a27 JTF_VARCHAR2_TABLE_100
2799     , p5_a28 JTF_VARCHAR2_TABLE_500
2800     , p5_a29 JTF_VARCHAR2_TABLE_500
2801     , p5_a30 JTF_VARCHAR2_TABLE_500
2802     , p5_a31 JTF_VARCHAR2_TABLE_500
2803     , p5_a32 JTF_VARCHAR2_TABLE_500
2804     , p5_a33 JTF_VARCHAR2_TABLE_500
2805     , p5_a34 JTF_VARCHAR2_TABLE_500
2806     , p5_a35 JTF_VARCHAR2_TABLE_500
2807     , p5_a36 JTF_VARCHAR2_TABLE_500
2808     , p5_a37 JTF_VARCHAR2_TABLE_500
2809     , p5_a38 JTF_VARCHAR2_TABLE_500
2810     , p5_a39 JTF_VARCHAR2_TABLE_500
2811     , p5_a40 JTF_VARCHAR2_TABLE_500
2812     , p5_a41 JTF_VARCHAR2_TABLE_500
2813     , p5_a42 JTF_VARCHAR2_TABLE_500
2814     , p5_a43 JTF_NUMBER_TABLE
2815     , p5_a44 JTF_NUMBER_TABLE
2816     , p5_a45 JTF_NUMBER_TABLE
2817     , p5_a46 JTF_DATE_TABLE
2818     , p5_a47 JTF_NUMBER_TABLE
2819     , p5_a48 JTF_NUMBER_TABLE
2820     , p5_a49 JTF_NUMBER_TABLE
2821     , p5_a50 JTF_DATE_TABLE
2822     , p5_a51 JTF_NUMBER_TABLE
2823     , p5_a52 JTF_DATE_TABLE
2824     , p5_a53 JTF_NUMBER_TABLE
2825     , p5_a54 JTF_NUMBER_TABLE
2826     , p5_a55 JTF_NUMBER_TABLE
2827   )
2828 
2829   as
2830     ddp_tilv_tbl okl_til_pvt.tilv_tbl_type;
2831     ddindx binary_integer; indx binary_integer;
2832   begin
2833 
2834     -- copy data to the local IN or IN-OUT args, if any
2835 
2836 
2837 
2838 
2839 
2840     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
2841       , p5_a1
2842       , p5_a2
2843       , p5_a3
2844       , p5_a4
2845       , p5_a5
2846       , p5_a6
2847       , p5_a7
2848       , p5_a8
2849       , p5_a9
2850       , p5_a10
2851       , p5_a11
2852       , p5_a12
2853       , p5_a13
2854       , p5_a14
2855       , p5_a15
2856       , p5_a16
2857       , p5_a17
2858       , p5_a18
2859       , p5_a19
2860       , p5_a20
2861       , p5_a21
2862       , p5_a22
2863       , p5_a23
2864       , p5_a24
2865       , p5_a25
2866       , p5_a26
2867       , p5_a27
2868       , p5_a28
2869       , p5_a29
2870       , p5_a30
2871       , p5_a31
2872       , p5_a32
2873       , p5_a33
2874       , p5_a34
2875       , p5_a35
2876       , p5_a36
2877       , p5_a37
2878       , p5_a38
2879       , p5_a39
2880       , p5_a40
2881       , p5_a41
2882       , p5_a42
2883       , p5_a43
2884       , p5_a44
2885       , p5_a45
2886       , p5_a46
2887       , p5_a47
2888       , p5_a48
2889       , p5_a49
2890       , p5_a50
2891       , p5_a51
2892       , p5_a52
2893       , p5_a53
2894       , p5_a54
2895       , p5_a55
2896       );
2897 
2898     -- here's the delegated call to the old PL/SQL routine
2899     okl_til_pvt.validate_row(p_api_version,
2900       p_init_msg_list,
2901       x_return_status,
2902       x_msg_count,
2903       x_msg_data,
2904       ddp_tilv_tbl);
2905 
2906     -- copy data back from the local variables to OUT or IN-OUT args, if any
2907 
2908 
2909 
2910 
2911 
2912   end;
2913 
2914 end okl_til_pvt_w;