DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_TXL_AR_INV_LNS_PUB_W

Source


1 package body okl_txl_ar_inv_lns_pub_w as
2   /* $Header: OKLUTWLB.pls 120.3 2007/07/20 09:43:54 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 insert_txl_ar_inv_lns(p_api_version  NUMBER
26     , p_init_msg_list  VARCHAR2
27     , x_return_status out nocopy  VARCHAR2
28     , x_msg_count out nocopy  NUMBER
29     , x_msg_data out nocopy  VARCHAR2
30     , p5_a0 JTF_NUMBER_TABLE
31     , p5_a1 JTF_NUMBER_TABLE
32     , p5_a2 JTF_VARCHAR2_TABLE_3000
33     , p5_a3 JTF_VARCHAR2_TABLE_100
34     , p5_a4 JTF_NUMBER_TABLE
35     , p5_a5 JTF_NUMBER_TABLE
36     , p5_a6 JTF_NUMBER_TABLE
37     , p5_a7 JTF_VARCHAR2_TABLE_100
38     , p5_a8 JTF_NUMBER_TABLE
39     , p5_a9 JTF_NUMBER_TABLE
40     , p5_a10 JTF_NUMBER_TABLE
41     , p5_a11 JTF_NUMBER_TABLE
42     , p5_a12 JTF_NUMBER_TABLE
43     , p5_a13 JTF_NUMBER_TABLE
44     , p5_a14 JTF_VARCHAR2_TABLE_2000
45     , p5_a15 JTF_NUMBER_TABLE
46     , p5_a16 JTF_DATE_TABLE
47     , p5_a17 JTF_NUMBER_TABLE
48     , p5_a18 JTF_DATE_TABLE
49     , p5_a19 JTF_NUMBER_TABLE
50     , p5_a20 JTF_NUMBER_TABLE
51     , p5_a21 JTF_NUMBER_TABLE
52     , p5_a22 JTF_NUMBER_TABLE
53     , p5_a23 JTF_NUMBER_TABLE
54     , p5_a24 JTF_NUMBER_TABLE
55     , p5_a25 JTF_NUMBER_TABLE
56     , p5_a26 JTF_NUMBER_TABLE
57     , p5_a27 JTF_VARCHAR2_TABLE_100
58     , p5_a28 JTF_VARCHAR2_TABLE_500
59     , p5_a29 JTF_VARCHAR2_TABLE_500
60     , p5_a30 JTF_VARCHAR2_TABLE_500
61     , p5_a31 JTF_VARCHAR2_TABLE_500
62     , p5_a32 JTF_VARCHAR2_TABLE_500
63     , p5_a33 JTF_VARCHAR2_TABLE_500
64     , p5_a34 JTF_VARCHAR2_TABLE_500
65     , p5_a35 JTF_VARCHAR2_TABLE_500
66     , p5_a36 JTF_VARCHAR2_TABLE_500
67     , p5_a37 JTF_VARCHAR2_TABLE_500
68     , p5_a38 JTF_VARCHAR2_TABLE_500
69     , p5_a39 JTF_VARCHAR2_TABLE_500
70     , p5_a40 JTF_VARCHAR2_TABLE_500
71     , p5_a41 JTF_VARCHAR2_TABLE_500
72     , p5_a42 JTF_VARCHAR2_TABLE_500
73     , p5_a43 JTF_NUMBER_TABLE
74     , p5_a44 JTF_NUMBER_TABLE
75     , p5_a45 JTF_NUMBER_TABLE
76     , p5_a46 JTF_DATE_TABLE
77     , p5_a47 JTF_NUMBER_TABLE
78     , p5_a48 JTF_NUMBER_TABLE
79     , p5_a49 JTF_NUMBER_TABLE
80     , p5_a50 JTF_DATE_TABLE
81     , p5_a51 JTF_NUMBER_TABLE
82     , p5_a52 JTF_DATE_TABLE
83     , p5_a53 JTF_NUMBER_TABLE
84     , p5_a54 JTF_NUMBER_TABLE
85     , p5_a55 JTF_NUMBER_TABLE
86     , p6_a0 out nocopy JTF_NUMBER_TABLE
87     , p6_a1 out nocopy JTF_NUMBER_TABLE
88     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_3000
89     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
90     , p6_a4 out nocopy JTF_NUMBER_TABLE
91     , p6_a5 out nocopy JTF_NUMBER_TABLE
92     , p6_a6 out nocopy JTF_NUMBER_TABLE
93     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
94     , p6_a8 out nocopy JTF_NUMBER_TABLE
95     , p6_a9 out nocopy JTF_NUMBER_TABLE
96     , p6_a10 out nocopy JTF_NUMBER_TABLE
97     , p6_a11 out nocopy JTF_NUMBER_TABLE
98     , p6_a12 out nocopy JTF_NUMBER_TABLE
99     , p6_a13 out nocopy JTF_NUMBER_TABLE
100     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_2000
101     , p6_a15 out nocopy JTF_NUMBER_TABLE
102     , p6_a16 out nocopy JTF_DATE_TABLE
103     , p6_a17 out nocopy JTF_NUMBER_TABLE
104     , p6_a18 out nocopy JTF_DATE_TABLE
105     , p6_a19 out nocopy JTF_NUMBER_TABLE
106     , p6_a20 out nocopy JTF_NUMBER_TABLE
107     , p6_a21 out nocopy JTF_NUMBER_TABLE
108     , p6_a22 out nocopy JTF_NUMBER_TABLE
109     , p6_a23 out nocopy JTF_NUMBER_TABLE
110     , p6_a24 out nocopy JTF_NUMBER_TABLE
111     , p6_a25 out nocopy JTF_NUMBER_TABLE
112     , p6_a26 out nocopy JTF_NUMBER_TABLE
113     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
114     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
115     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
116     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
117     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
118     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
119     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
120     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
121     , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
122     , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
123     , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
124     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
125     , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
126     , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
127     , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
128     , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
129     , p6_a43 out nocopy JTF_NUMBER_TABLE
130     , p6_a44 out nocopy JTF_NUMBER_TABLE
131     , p6_a45 out nocopy JTF_NUMBER_TABLE
132     , p6_a46 out nocopy JTF_DATE_TABLE
133     , p6_a47 out nocopy JTF_NUMBER_TABLE
134     , p6_a48 out nocopy JTF_NUMBER_TABLE
135     , p6_a49 out nocopy JTF_NUMBER_TABLE
136     , p6_a50 out nocopy JTF_DATE_TABLE
137     , p6_a51 out nocopy JTF_NUMBER_TABLE
138     , p6_a52 out nocopy JTF_DATE_TABLE
139     , p6_a53 out nocopy JTF_NUMBER_TABLE
140     , p6_a54 out nocopy JTF_NUMBER_TABLE
141     , p6_a55 out nocopy JTF_NUMBER_TABLE
142   )
143 
144   as
145     ddp_tilv_tbl okl_txl_ar_inv_lns_pub.tilv_tbl_type;
146     ddx_tilv_tbl okl_txl_ar_inv_lns_pub.tilv_tbl_type;
147     ddindx binary_integer; indx binary_integer;
148   begin
149 
150     -- copy data to the local IN or IN-OUT args, if any
151 
152 
153 
154 
155 
156     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
157       , p5_a1
158       , p5_a2
159       , p5_a3
160       , p5_a4
161       , p5_a5
162       , p5_a6
163       , p5_a7
164       , p5_a8
165       , p5_a9
166       , p5_a10
167       , p5_a11
168       , p5_a12
169       , p5_a13
170       , p5_a14
171       , p5_a15
172       , p5_a16
173       , p5_a17
174       , p5_a18
175       , p5_a19
176       , p5_a20
177       , p5_a21
178       , p5_a22
179       , p5_a23
180       , p5_a24
181       , p5_a25
182       , p5_a26
183       , p5_a27
184       , p5_a28
185       , p5_a29
186       , p5_a30
187       , p5_a31
188       , p5_a32
189       , p5_a33
190       , p5_a34
191       , p5_a35
192       , p5_a36
193       , p5_a37
194       , p5_a38
195       , p5_a39
196       , p5_a40
197       , p5_a41
198       , p5_a42
199       , p5_a43
200       , p5_a44
201       , p5_a45
202       , p5_a46
203       , p5_a47
204       , p5_a48
205       , p5_a49
206       , p5_a50
207       , p5_a51
208       , p5_a52
209       , p5_a53
210       , p5_a54
211       , p5_a55
212       );
213 
214 
215     -- here's the delegated call to the old PL/SQL routine
216     okl_txl_ar_inv_lns_pub.insert_txl_ar_inv_lns(p_api_version,
217       p_init_msg_list,
218       x_return_status,
219       x_msg_count,
220       x_msg_data,
221       ddp_tilv_tbl,
222       ddx_tilv_tbl);
223 
224     -- copy data back from the local variables to OUT or IN-OUT args, if any
225 
226 
227 
228 
229 
230 
231     okl_til_pvt_w.rosetta_table_copy_out_p8(ddx_tilv_tbl, p6_a0
232       , p6_a1
233       , p6_a2
234       , p6_a3
235       , p6_a4
236       , p6_a5
237       , p6_a6
238       , p6_a7
239       , p6_a8
240       , p6_a9
241       , p6_a10
242       , p6_a11
243       , p6_a12
244       , p6_a13
245       , p6_a14
246       , p6_a15
247       , p6_a16
248       , p6_a17
249       , p6_a18
250       , p6_a19
251       , p6_a20
252       , p6_a21
253       , p6_a22
254       , p6_a23
255       , p6_a24
256       , p6_a25
257       , p6_a26
258       , p6_a27
259       , p6_a28
260       , p6_a29
261       , p6_a30
262       , p6_a31
263       , p6_a32
264       , p6_a33
265       , p6_a34
266       , p6_a35
267       , p6_a36
268       , p6_a37
269       , p6_a38
270       , p6_a39
271       , p6_a40
272       , p6_a41
273       , p6_a42
274       , p6_a43
275       , p6_a44
276       , p6_a45
277       , p6_a46
278       , p6_a47
279       , p6_a48
280       , p6_a49
281       , p6_a50
282       , p6_a51
283       , p6_a52
284       , p6_a53
285       , p6_a54
286       , p6_a55
287       );
288   end;
289 
290   procedure insert_txl_ar_inv_lns(p_api_version  NUMBER
291     , p_init_msg_list  VARCHAR2
292     , x_return_status out nocopy  VARCHAR2
293     , x_msg_count out nocopy  NUMBER
294     , x_msg_data out nocopy  VARCHAR2
295     , p6_a0 out nocopy  NUMBER
296     , p6_a1 out nocopy  NUMBER
297     , p6_a2 out nocopy  VARCHAR2
298     , p6_a3 out nocopy  VARCHAR2
299     , p6_a4 out nocopy  NUMBER
300     , p6_a5 out nocopy  NUMBER
301     , p6_a6 out nocopy  NUMBER
302     , p6_a7 out nocopy  VARCHAR2
303     , p6_a8 out nocopy  NUMBER
304     , p6_a9 out nocopy  NUMBER
305     , p6_a10 out nocopy  NUMBER
306     , p6_a11 out nocopy  NUMBER
307     , p6_a12 out nocopy  NUMBER
308     , p6_a13 out nocopy  NUMBER
309     , p6_a14 out nocopy  VARCHAR2
310     , p6_a15 out nocopy  NUMBER
311     , p6_a16 out nocopy  DATE
312     , p6_a17 out nocopy  NUMBER
313     , p6_a18 out nocopy  DATE
314     , p6_a19 out nocopy  NUMBER
315     , p6_a20 out nocopy  NUMBER
316     , p6_a21 out nocopy  NUMBER
317     , p6_a22 out nocopy  NUMBER
318     , p6_a23 out nocopy  NUMBER
319     , p6_a24 out nocopy  NUMBER
320     , p6_a25 out nocopy  NUMBER
321     , p6_a26 out nocopy  NUMBER
322     , p6_a27 out nocopy  VARCHAR2
323     , p6_a28 out nocopy  VARCHAR2
324     , p6_a29 out nocopy  VARCHAR2
325     , p6_a30 out nocopy  VARCHAR2
326     , p6_a31 out nocopy  VARCHAR2
327     , p6_a32 out nocopy  VARCHAR2
328     , p6_a33 out nocopy  VARCHAR2
329     , p6_a34 out nocopy  VARCHAR2
330     , p6_a35 out nocopy  VARCHAR2
331     , p6_a36 out nocopy  VARCHAR2
332     , p6_a37 out nocopy  VARCHAR2
333     , p6_a38 out nocopy  VARCHAR2
334     , p6_a39 out nocopy  VARCHAR2
335     , p6_a40 out nocopy  VARCHAR2
336     , p6_a41 out nocopy  VARCHAR2
337     , p6_a42 out nocopy  VARCHAR2
338     , p6_a43 out nocopy  NUMBER
339     , p6_a44 out nocopy  NUMBER
340     , p6_a45 out nocopy  NUMBER
341     , p6_a46 out nocopy  DATE
342     , p6_a47 out nocopy  NUMBER
343     , p6_a48 out nocopy  NUMBER
344     , p6_a49 out nocopy  NUMBER
345     , p6_a50 out nocopy  DATE
346     , p6_a51 out nocopy  NUMBER
347     , p6_a52 out nocopy  DATE
348     , p6_a53 out nocopy  NUMBER
349     , p6_a54 out nocopy  NUMBER
350     , p6_a55 out nocopy  NUMBER
351     , p5_a0  NUMBER := 0-1962.0724
352     , p5_a1  NUMBER := 0-1962.0724
353     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
354     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
355     , p5_a4  NUMBER := 0-1962.0724
356     , p5_a5  NUMBER := 0-1962.0724
357     , p5_a6  NUMBER := 0-1962.0724
358     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
359     , p5_a8  NUMBER := 0-1962.0724
360     , p5_a9  NUMBER := 0-1962.0724
361     , p5_a10  NUMBER := 0-1962.0724
362     , p5_a11  NUMBER := 0-1962.0724
363     , p5_a12  NUMBER := 0-1962.0724
364     , p5_a13  NUMBER := 0-1962.0724
365     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
366     , p5_a15  NUMBER := 0-1962.0724
367     , p5_a16  DATE := fnd_api.g_miss_date
368     , p5_a17  NUMBER := 0-1962.0724
369     , p5_a18  DATE := fnd_api.g_miss_date
370     , p5_a19  NUMBER := 0-1962.0724
371     , p5_a20  NUMBER := 0-1962.0724
372     , p5_a21  NUMBER := 0-1962.0724
373     , p5_a22  NUMBER := 0-1962.0724
374     , p5_a23  NUMBER := 0-1962.0724
375     , p5_a24  NUMBER := 0-1962.0724
376     , p5_a25  NUMBER := 0-1962.0724
377     , p5_a26  NUMBER := 0-1962.0724
378     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
379     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
380     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
381     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
382     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
383     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
384     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
385     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
386     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
387     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
388     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
389     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
390     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
391     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
392     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
393     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
394     , p5_a43  NUMBER := 0-1962.0724
395     , p5_a44  NUMBER := 0-1962.0724
396     , p5_a45  NUMBER := 0-1962.0724
397     , p5_a46  DATE := fnd_api.g_miss_date
398     , p5_a47  NUMBER := 0-1962.0724
399     , p5_a48  NUMBER := 0-1962.0724
400     , p5_a49  NUMBER := 0-1962.0724
401     , p5_a50  DATE := fnd_api.g_miss_date
402     , p5_a51  NUMBER := 0-1962.0724
403     , p5_a52  DATE := fnd_api.g_miss_date
404     , p5_a53  NUMBER := 0-1962.0724
405     , p5_a54  NUMBER := 0-1962.0724
406     , p5_a55  NUMBER := 0-1962.0724
407   )
408 
409   as
410     ddp_tilv_rec okl_txl_ar_inv_lns_pub.tilv_rec_type;
411     ddx_tilv_rec okl_txl_ar_inv_lns_pub.tilv_rec_type;
412     ddindx binary_integer; indx binary_integer;
413   begin
414 
415     -- copy data to the local IN or IN-OUT args, if any
416 
417 
418 
419 
420 
421     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
422     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
423     ddp_tilv_rec.error_message := p5_a2;
424     ddp_tilv_rec.sfwt_flag := p5_a3;
425     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
426     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
427     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
428     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
429     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
430     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
431     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
432     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
433     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
434     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
435     ddp_tilv_rec.description := p5_a14;
436     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
437     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
438     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
439     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
440     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
441     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
442     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
443     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
444     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
445     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
446     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
447     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
448     ddp_tilv_rec.attribute_category := p5_a27;
449     ddp_tilv_rec.attribute1 := p5_a28;
450     ddp_tilv_rec.attribute2 := p5_a29;
451     ddp_tilv_rec.attribute3 := p5_a30;
452     ddp_tilv_rec.attribute4 := p5_a31;
453     ddp_tilv_rec.attribute5 := p5_a32;
454     ddp_tilv_rec.attribute6 := p5_a33;
455     ddp_tilv_rec.attribute7 := p5_a34;
456     ddp_tilv_rec.attribute8 := p5_a35;
457     ddp_tilv_rec.attribute9 := p5_a36;
458     ddp_tilv_rec.attribute10 := p5_a37;
459     ddp_tilv_rec.attribute11 := p5_a38;
460     ddp_tilv_rec.attribute12 := p5_a39;
461     ddp_tilv_rec.attribute13 := p5_a40;
462     ddp_tilv_rec.attribute14 := p5_a41;
463     ddp_tilv_rec.attribute15 := p5_a42;
464     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
465     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
466     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
467     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
468     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
469     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
470     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
471     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
472     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
473     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
474     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
475     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
476     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
477 
478 
479     -- here's the delegated call to the old PL/SQL routine
480     okl_txl_ar_inv_lns_pub.insert_txl_ar_inv_lns(p_api_version,
481       p_init_msg_list,
482       x_return_status,
483       x_msg_count,
484       x_msg_data,
485       ddp_tilv_rec,
486       ddx_tilv_rec);
487 
488     -- copy data back from the local variables to OUT or IN-OUT args, if any
489 
490 
491 
492 
493 
494 
495     p6_a0 := rosetta_g_miss_num_map(ddx_tilv_rec.id);
496     p6_a1 := rosetta_g_miss_num_map(ddx_tilv_rec.object_version_number);
497     p6_a2 := ddx_tilv_rec.error_message;
498     p6_a3 := ddx_tilv_rec.sfwt_flag;
499     p6_a4 := rosetta_g_miss_num_map(ddx_tilv_rec.kle_id);
500     p6_a5 := rosetta_g_miss_num_map(ddx_tilv_rec.tpl_id);
501     p6_a6 := rosetta_g_miss_num_map(ddx_tilv_rec.til_id_reverses);
502     p6_a7 := ddx_tilv_rec.inv_receiv_line_code;
503     p6_a8 := rosetta_g_miss_num_map(ddx_tilv_rec.sty_id);
504     p6_a9 := rosetta_g_miss_num_map(ddx_tilv_rec.tai_id);
505     p6_a10 := rosetta_g_miss_num_map(ddx_tilv_rec.acn_id_cost);
506     p6_a11 := rosetta_g_miss_num_map(ddx_tilv_rec.amount);
507     p6_a12 := rosetta_g_miss_num_map(ddx_tilv_rec.line_number);
508     p6_a13 := rosetta_g_miss_num_map(ddx_tilv_rec.quantity);
509     p6_a14 := ddx_tilv_rec.description;
510     p6_a15 := rosetta_g_miss_num_map(ddx_tilv_rec.receivables_invoice_id);
511     p6_a16 := ddx_tilv_rec.date_bill_period_start;
512     p6_a17 := rosetta_g_miss_num_map(ddx_tilv_rec.amount_applied);
513     p6_a18 := ddx_tilv_rec.date_bill_period_end;
514     p6_a19 := rosetta_g_miss_num_map(ddx_tilv_rec.isl_id);
515     p6_a20 := rosetta_g_miss_num_map(ddx_tilv_rec.ibt_id);
516     p6_a21 := rosetta_g_miss_num_map(ddx_tilv_rec.late_charge_rec_id);
517     p6_a22 := rosetta_g_miss_num_map(ddx_tilv_rec.cll_id);
518     p6_a23 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_item_id);
519     p6_a24 := rosetta_g_miss_num_map(ddx_tilv_rec.qte_line_id);
520     p6_a25 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_id);
521     p6_a26 := rosetta_g_miss_num_map(ddx_tilv_rec.bank_acct_id);
522     p6_a27 := ddx_tilv_rec.attribute_category;
523     p6_a28 := ddx_tilv_rec.attribute1;
524     p6_a29 := ddx_tilv_rec.attribute2;
525     p6_a30 := ddx_tilv_rec.attribute3;
526     p6_a31 := ddx_tilv_rec.attribute4;
527     p6_a32 := ddx_tilv_rec.attribute5;
528     p6_a33 := ddx_tilv_rec.attribute6;
529     p6_a34 := ddx_tilv_rec.attribute7;
530     p6_a35 := ddx_tilv_rec.attribute8;
531     p6_a36 := ddx_tilv_rec.attribute9;
532     p6_a37 := ddx_tilv_rec.attribute10;
533     p6_a38 := ddx_tilv_rec.attribute11;
534     p6_a39 := ddx_tilv_rec.attribute12;
535     p6_a40 := ddx_tilv_rec.attribute13;
536     p6_a41 := ddx_tilv_rec.attribute14;
537     p6_a42 := ddx_tilv_rec.attribute15;
538     p6_a43 := rosetta_g_miss_num_map(ddx_tilv_rec.request_id);
539     p6_a44 := rosetta_g_miss_num_map(ddx_tilv_rec.program_application_id);
540     p6_a45 := rosetta_g_miss_num_map(ddx_tilv_rec.program_id);
541     p6_a46 := ddx_tilv_rec.program_update_date;
542     p6_a47 := rosetta_g_miss_num_map(ddx_tilv_rec.org_id);
543     p6_a48 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_org_id);
544     p6_a49 := rosetta_g_miss_num_map(ddx_tilv_rec.created_by);
545     p6_a50 := ddx_tilv_rec.creation_date;
546     p6_a51 := rosetta_g_miss_num_map(ddx_tilv_rec.last_updated_by);
547     p6_a52 := ddx_tilv_rec.last_update_date;
548     p6_a53 := rosetta_g_miss_num_map(ddx_tilv_rec.last_update_login);
549     p6_a54 := rosetta_g_miss_num_map(ddx_tilv_rec.txl_ar_line_number);
550     p6_a55 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_line_id);
551   end;
552 
553   procedure lock_txl_ar_inv_lns(p_api_version  NUMBER
554     , p_init_msg_list  VARCHAR2
555     , x_return_status out nocopy  VARCHAR2
556     , x_msg_count out nocopy  NUMBER
557     , x_msg_data out nocopy  VARCHAR2
558     , p5_a0 JTF_NUMBER_TABLE
559     , p5_a1 JTF_NUMBER_TABLE
560     , p5_a2 JTF_VARCHAR2_TABLE_3000
561     , p5_a3 JTF_VARCHAR2_TABLE_100
562     , p5_a4 JTF_NUMBER_TABLE
563     , p5_a5 JTF_NUMBER_TABLE
564     , p5_a6 JTF_NUMBER_TABLE
565     , p5_a7 JTF_VARCHAR2_TABLE_100
566     , p5_a8 JTF_NUMBER_TABLE
567     , p5_a9 JTF_NUMBER_TABLE
568     , p5_a10 JTF_NUMBER_TABLE
569     , p5_a11 JTF_NUMBER_TABLE
570     , p5_a12 JTF_NUMBER_TABLE
571     , p5_a13 JTF_NUMBER_TABLE
572     , p5_a14 JTF_VARCHAR2_TABLE_2000
573     , p5_a15 JTF_NUMBER_TABLE
574     , p5_a16 JTF_DATE_TABLE
575     , p5_a17 JTF_NUMBER_TABLE
576     , p5_a18 JTF_DATE_TABLE
577     , p5_a19 JTF_NUMBER_TABLE
578     , p5_a20 JTF_NUMBER_TABLE
579     , p5_a21 JTF_NUMBER_TABLE
580     , p5_a22 JTF_NUMBER_TABLE
581     , p5_a23 JTF_NUMBER_TABLE
582     , p5_a24 JTF_NUMBER_TABLE
583     , p5_a25 JTF_NUMBER_TABLE
584     , p5_a26 JTF_NUMBER_TABLE
585     , p5_a27 JTF_VARCHAR2_TABLE_100
586     , p5_a28 JTF_VARCHAR2_TABLE_500
587     , p5_a29 JTF_VARCHAR2_TABLE_500
588     , p5_a30 JTF_VARCHAR2_TABLE_500
589     , p5_a31 JTF_VARCHAR2_TABLE_500
590     , p5_a32 JTF_VARCHAR2_TABLE_500
591     , p5_a33 JTF_VARCHAR2_TABLE_500
592     , p5_a34 JTF_VARCHAR2_TABLE_500
593     , p5_a35 JTF_VARCHAR2_TABLE_500
594     , p5_a36 JTF_VARCHAR2_TABLE_500
595     , p5_a37 JTF_VARCHAR2_TABLE_500
596     , p5_a38 JTF_VARCHAR2_TABLE_500
597     , p5_a39 JTF_VARCHAR2_TABLE_500
598     , p5_a40 JTF_VARCHAR2_TABLE_500
599     , p5_a41 JTF_VARCHAR2_TABLE_500
600     , p5_a42 JTF_VARCHAR2_TABLE_500
601     , p5_a43 JTF_NUMBER_TABLE
602     , p5_a44 JTF_NUMBER_TABLE
603     , p5_a45 JTF_NUMBER_TABLE
604     , p5_a46 JTF_DATE_TABLE
605     , p5_a47 JTF_NUMBER_TABLE
606     , p5_a48 JTF_NUMBER_TABLE
607     , p5_a49 JTF_NUMBER_TABLE
608     , p5_a50 JTF_DATE_TABLE
609     , p5_a51 JTF_NUMBER_TABLE
610     , p5_a52 JTF_DATE_TABLE
611     , p5_a53 JTF_NUMBER_TABLE
612     , p5_a54 JTF_NUMBER_TABLE
613     , p5_a55 JTF_NUMBER_TABLE
614   )
615 
616   as
617     ddp_tilv_tbl okl_txl_ar_inv_lns_pub.tilv_tbl_type;
618     ddindx binary_integer; indx binary_integer;
619   begin
620 
621     -- copy data to the local IN or IN-OUT args, if any
622 
623 
624 
625 
626 
627     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
628       , p5_a1
629       , p5_a2
630       , p5_a3
631       , p5_a4
632       , p5_a5
633       , p5_a6
634       , p5_a7
635       , p5_a8
636       , p5_a9
637       , p5_a10
638       , p5_a11
639       , p5_a12
640       , p5_a13
641       , p5_a14
642       , p5_a15
643       , p5_a16
644       , p5_a17
645       , p5_a18
646       , p5_a19
647       , p5_a20
648       , p5_a21
649       , p5_a22
650       , p5_a23
651       , p5_a24
652       , p5_a25
653       , p5_a26
654       , p5_a27
655       , p5_a28
656       , p5_a29
657       , p5_a30
658       , p5_a31
659       , p5_a32
660       , p5_a33
661       , p5_a34
662       , p5_a35
663       , p5_a36
664       , p5_a37
665       , p5_a38
666       , p5_a39
667       , p5_a40
668       , p5_a41
669       , p5_a42
670       , p5_a43
671       , p5_a44
672       , p5_a45
673       , p5_a46
674       , p5_a47
675       , p5_a48
676       , p5_a49
677       , p5_a50
678       , p5_a51
679       , p5_a52
680       , p5_a53
681       , p5_a54
682       , p5_a55
683       );
684 
685     -- here's the delegated call to the old PL/SQL routine
686     okl_txl_ar_inv_lns_pub.lock_txl_ar_inv_lns(p_api_version,
687       p_init_msg_list,
688       x_return_status,
689       x_msg_count,
690       x_msg_data,
691       ddp_tilv_tbl);
692 
693     -- copy data back from the local variables to OUT or IN-OUT args, if any
694 
695 
696 
697 
698 
699   end;
700 
701   procedure lock_txl_ar_inv_lns(p_api_version  NUMBER
702     , p_init_msg_list  VARCHAR2
703     , x_return_status out nocopy  VARCHAR2
704     , x_msg_count out nocopy  NUMBER
705     , x_msg_data out nocopy  VARCHAR2
706     , p5_a0  NUMBER := 0-1962.0724
707     , p5_a1  NUMBER := 0-1962.0724
708     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
709     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
710     , p5_a4  NUMBER := 0-1962.0724
711     , p5_a5  NUMBER := 0-1962.0724
712     , p5_a6  NUMBER := 0-1962.0724
713     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
714     , p5_a8  NUMBER := 0-1962.0724
715     , p5_a9  NUMBER := 0-1962.0724
716     , p5_a10  NUMBER := 0-1962.0724
717     , p5_a11  NUMBER := 0-1962.0724
718     , p5_a12  NUMBER := 0-1962.0724
719     , p5_a13  NUMBER := 0-1962.0724
720     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
721     , p5_a15  NUMBER := 0-1962.0724
722     , p5_a16  DATE := fnd_api.g_miss_date
723     , p5_a17  NUMBER := 0-1962.0724
724     , p5_a18  DATE := fnd_api.g_miss_date
725     , p5_a19  NUMBER := 0-1962.0724
726     , p5_a20  NUMBER := 0-1962.0724
727     , p5_a21  NUMBER := 0-1962.0724
728     , p5_a22  NUMBER := 0-1962.0724
729     , p5_a23  NUMBER := 0-1962.0724
730     , p5_a24  NUMBER := 0-1962.0724
731     , p5_a25  NUMBER := 0-1962.0724
732     , p5_a26  NUMBER := 0-1962.0724
733     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
734     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
735     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
736     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
737     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
738     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
739     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
740     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
741     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
742     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
743     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
744     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
745     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
746     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
747     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
748     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
749     , p5_a43  NUMBER := 0-1962.0724
750     , p5_a44  NUMBER := 0-1962.0724
751     , p5_a45  NUMBER := 0-1962.0724
752     , p5_a46  DATE := fnd_api.g_miss_date
753     , p5_a47  NUMBER := 0-1962.0724
754     , p5_a48  NUMBER := 0-1962.0724
755     , p5_a49  NUMBER := 0-1962.0724
756     , p5_a50  DATE := fnd_api.g_miss_date
757     , p5_a51  NUMBER := 0-1962.0724
758     , p5_a52  DATE := fnd_api.g_miss_date
759     , p5_a53  NUMBER := 0-1962.0724
760     , p5_a54  NUMBER := 0-1962.0724
761     , p5_a55  NUMBER := 0-1962.0724
762   )
763 
764   as
765     ddp_tilv_rec okl_txl_ar_inv_lns_pub.tilv_rec_type;
766     ddindx binary_integer; indx binary_integer;
767   begin
768 
769     -- copy data to the local IN or IN-OUT args, if any
770 
771 
772 
773 
774 
775     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
776     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
777     ddp_tilv_rec.error_message := p5_a2;
778     ddp_tilv_rec.sfwt_flag := p5_a3;
779     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
780     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
781     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
782     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
783     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
784     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
785     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
786     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
787     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
788     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
789     ddp_tilv_rec.description := p5_a14;
790     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
791     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
792     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
793     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
794     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
795     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
796     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
797     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
798     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
799     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
800     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
801     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
802     ddp_tilv_rec.attribute_category := p5_a27;
803     ddp_tilv_rec.attribute1 := p5_a28;
804     ddp_tilv_rec.attribute2 := p5_a29;
805     ddp_tilv_rec.attribute3 := p5_a30;
806     ddp_tilv_rec.attribute4 := p5_a31;
807     ddp_tilv_rec.attribute5 := p5_a32;
808     ddp_tilv_rec.attribute6 := p5_a33;
809     ddp_tilv_rec.attribute7 := p5_a34;
810     ddp_tilv_rec.attribute8 := p5_a35;
811     ddp_tilv_rec.attribute9 := p5_a36;
812     ddp_tilv_rec.attribute10 := p5_a37;
813     ddp_tilv_rec.attribute11 := p5_a38;
814     ddp_tilv_rec.attribute12 := p5_a39;
815     ddp_tilv_rec.attribute13 := p5_a40;
816     ddp_tilv_rec.attribute14 := p5_a41;
817     ddp_tilv_rec.attribute15 := p5_a42;
818     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
819     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
820     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
821     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
822     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
823     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
824     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
825     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
826     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
827     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
828     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
829     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
830     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
831 
832     -- here's the delegated call to the old PL/SQL routine
833     okl_txl_ar_inv_lns_pub.lock_txl_ar_inv_lns(p_api_version,
834       p_init_msg_list,
835       x_return_status,
836       x_msg_count,
837       x_msg_data,
838       ddp_tilv_rec);
839 
840     -- copy data back from the local variables to OUT or IN-OUT args, if any
841 
842 
843 
844 
845 
846   end;
847 
848   procedure update_txl_ar_inv_lns(p_api_version  NUMBER
849     , p_init_msg_list  VARCHAR2
850     , x_return_status out nocopy  VARCHAR2
851     , x_msg_count out nocopy  NUMBER
852     , x_msg_data out nocopy  VARCHAR2
853     , p5_a0 JTF_NUMBER_TABLE
854     , p5_a1 JTF_NUMBER_TABLE
855     , p5_a2 JTF_VARCHAR2_TABLE_3000
856     , p5_a3 JTF_VARCHAR2_TABLE_100
857     , p5_a4 JTF_NUMBER_TABLE
858     , p5_a5 JTF_NUMBER_TABLE
859     , p5_a6 JTF_NUMBER_TABLE
860     , p5_a7 JTF_VARCHAR2_TABLE_100
861     , p5_a8 JTF_NUMBER_TABLE
862     , p5_a9 JTF_NUMBER_TABLE
863     , p5_a10 JTF_NUMBER_TABLE
864     , p5_a11 JTF_NUMBER_TABLE
865     , p5_a12 JTF_NUMBER_TABLE
866     , p5_a13 JTF_NUMBER_TABLE
867     , p5_a14 JTF_VARCHAR2_TABLE_2000
868     , p5_a15 JTF_NUMBER_TABLE
869     , p5_a16 JTF_DATE_TABLE
870     , p5_a17 JTF_NUMBER_TABLE
871     , p5_a18 JTF_DATE_TABLE
872     , p5_a19 JTF_NUMBER_TABLE
873     , p5_a20 JTF_NUMBER_TABLE
874     , p5_a21 JTF_NUMBER_TABLE
875     , p5_a22 JTF_NUMBER_TABLE
876     , p5_a23 JTF_NUMBER_TABLE
877     , p5_a24 JTF_NUMBER_TABLE
878     , p5_a25 JTF_NUMBER_TABLE
879     , p5_a26 JTF_NUMBER_TABLE
880     , p5_a27 JTF_VARCHAR2_TABLE_100
881     , p5_a28 JTF_VARCHAR2_TABLE_500
882     , p5_a29 JTF_VARCHAR2_TABLE_500
883     , p5_a30 JTF_VARCHAR2_TABLE_500
884     , p5_a31 JTF_VARCHAR2_TABLE_500
885     , p5_a32 JTF_VARCHAR2_TABLE_500
886     , p5_a33 JTF_VARCHAR2_TABLE_500
887     , p5_a34 JTF_VARCHAR2_TABLE_500
888     , p5_a35 JTF_VARCHAR2_TABLE_500
889     , p5_a36 JTF_VARCHAR2_TABLE_500
890     , p5_a37 JTF_VARCHAR2_TABLE_500
891     , p5_a38 JTF_VARCHAR2_TABLE_500
892     , p5_a39 JTF_VARCHAR2_TABLE_500
893     , p5_a40 JTF_VARCHAR2_TABLE_500
894     , p5_a41 JTF_VARCHAR2_TABLE_500
895     , p5_a42 JTF_VARCHAR2_TABLE_500
896     , p5_a43 JTF_NUMBER_TABLE
897     , p5_a44 JTF_NUMBER_TABLE
898     , p5_a45 JTF_NUMBER_TABLE
899     , p5_a46 JTF_DATE_TABLE
900     , p5_a47 JTF_NUMBER_TABLE
901     , p5_a48 JTF_NUMBER_TABLE
902     , p5_a49 JTF_NUMBER_TABLE
903     , p5_a50 JTF_DATE_TABLE
904     , p5_a51 JTF_NUMBER_TABLE
905     , p5_a52 JTF_DATE_TABLE
906     , p5_a53 JTF_NUMBER_TABLE
907     , p5_a54 JTF_NUMBER_TABLE
908     , p5_a55 JTF_NUMBER_TABLE
909     , p6_a0 out nocopy JTF_NUMBER_TABLE
910     , p6_a1 out nocopy JTF_NUMBER_TABLE
911     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_3000
912     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
913     , p6_a4 out nocopy JTF_NUMBER_TABLE
914     , p6_a5 out nocopy JTF_NUMBER_TABLE
915     , p6_a6 out nocopy JTF_NUMBER_TABLE
916     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
917     , p6_a8 out nocopy JTF_NUMBER_TABLE
918     , p6_a9 out nocopy JTF_NUMBER_TABLE
919     , p6_a10 out nocopy JTF_NUMBER_TABLE
920     , p6_a11 out nocopy JTF_NUMBER_TABLE
921     , p6_a12 out nocopy JTF_NUMBER_TABLE
922     , p6_a13 out nocopy JTF_NUMBER_TABLE
923     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_2000
924     , p6_a15 out nocopy JTF_NUMBER_TABLE
925     , p6_a16 out nocopy JTF_DATE_TABLE
926     , p6_a17 out nocopy JTF_NUMBER_TABLE
927     , p6_a18 out nocopy JTF_DATE_TABLE
928     , p6_a19 out nocopy JTF_NUMBER_TABLE
929     , p6_a20 out nocopy JTF_NUMBER_TABLE
930     , p6_a21 out nocopy JTF_NUMBER_TABLE
931     , p6_a22 out nocopy JTF_NUMBER_TABLE
932     , p6_a23 out nocopy JTF_NUMBER_TABLE
933     , p6_a24 out nocopy JTF_NUMBER_TABLE
934     , p6_a25 out nocopy JTF_NUMBER_TABLE
935     , p6_a26 out nocopy JTF_NUMBER_TABLE
936     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
937     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
938     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
939     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
940     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
941     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
942     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
943     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
944     , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
945     , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
946     , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
947     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
948     , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
949     , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
950     , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
951     , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
952     , p6_a43 out nocopy JTF_NUMBER_TABLE
953     , p6_a44 out nocopy JTF_NUMBER_TABLE
954     , p6_a45 out nocopy JTF_NUMBER_TABLE
955     , p6_a46 out nocopy JTF_DATE_TABLE
956     , p6_a47 out nocopy JTF_NUMBER_TABLE
957     , p6_a48 out nocopy JTF_NUMBER_TABLE
958     , p6_a49 out nocopy JTF_NUMBER_TABLE
959     , p6_a50 out nocopy JTF_DATE_TABLE
960     , p6_a51 out nocopy JTF_NUMBER_TABLE
961     , p6_a52 out nocopy JTF_DATE_TABLE
962     , p6_a53 out nocopy JTF_NUMBER_TABLE
963     , p6_a54 out nocopy JTF_NUMBER_TABLE
964     , p6_a55 out nocopy JTF_NUMBER_TABLE
965   )
966 
967   as
968     ddp_tilv_tbl okl_txl_ar_inv_lns_pub.tilv_tbl_type;
969     ddx_tilv_tbl okl_txl_ar_inv_lns_pub.tilv_tbl_type;
970     ddindx binary_integer; indx binary_integer;
971   begin
972 
973     -- copy data to the local IN or IN-OUT args, if any
974 
975 
976 
977 
978 
979     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
980       , p5_a1
981       , p5_a2
982       , p5_a3
983       , p5_a4
984       , p5_a5
985       , p5_a6
986       , p5_a7
987       , p5_a8
988       , p5_a9
989       , p5_a10
990       , p5_a11
991       , p5_a12
992       , p5_a13
993       , p5_a14
994       , p5_a15
995       , p5_a16
996       , p5_a17
997       , p5_a18
998       , p5_a19
999       , p5_a20
1000       , p5_a21
1001       , p5_a22
1002       , p5_a23
1003       , p5_a24
1004       , p5_a25
1005       , p5_a26
1006       , p5_a27
1007       , p5_a28
1008       , p5_a29
1009       , p5_a30
1010       , p5_a31
1011       , p5_a32
1012       , p5_a33
1013       , p5_a34
1014       , p5_a35
1015       , p5_a36
1016       , p5_a37
1017       , p5_a38
1018       , p5_a39
1019       , p5_a40
1020       , p5_a41
1021       , p5_a42
1022       , p5_a43
1023       , p5_a44
1024       , p5_a45
1025       , p5_a46
1026       , p5_a47
1027       , p5_a48
1028       , p5_a49
1029       , p5_a50
1030       , p5_a51
1031       , p5_a52
1032       , p5_a53
1033       , p5_a54
1034       , p5_a55
1035       );
1036 
1037 
1038     -- here's the delegated call to the old PL/SQL routine
1039     okl_txl_ar_inv_lns_pub.update_txl_ar_inv_lns(p_api_version,
1040       p_init_msg_list,
1041       x_return_status,
1042       x_msg_count,
1043       x_msg_data,
1044       ddp_tilv_tbl,
1045       ddx_tilv_tbl);
1046 
1047     -- copy data back from the local variables to OUT or IN-OUT args, if any
1048 
1049 
1050 
1051 
1052 
1053 
1054     okl_til_pvt_w.rosetta_table_copy_out_p8(ddx_tilv_tbl, p6_a0
1055       , p6_a1
1056       , p6_a2
1057       , p6_a3
1058       , p6_a4
1059       , p6_a5
1060       , p6_a6
1061       , p6_a7
1062       , p6_a8
1063       , p6_a9
1064       , p6_a10
1065       , p6_a11
1066       , p6_a12
1067       , p6_a13
1068       , p6_a14
1069       , p6_a15
1070       , p6_a16
1071       , p6_a17
1072       , p6_a18
1073       , p6_a19
1074       , p6_a20
1075       , p6_a21
1076       , p6_a22
1077       , p6_a23
1078       , p6_a24
1079       , p6_a25
1080       , p6_a26
1081       , p6_a27
1082       , p6_a28
1083       , p6_a29
1084       , p6_a30
1085       , p6_a31
1086       , p6_a32
1087       , p6_a33
1088       , p6_a34
1089       , p6_a35
1090       , p6_a36
1091       , p6_a37
1092       , p6_a38
1093       , p6_a39
1094       , p6_a40
1095       , p6_a41
1096       , p6_a42
1097       , p6_a43
1098       , p6_a44
1099       , p6_a45
1100       , p6_a46
1101       , p6_a47
1102       , p6_a48
1103       , p6_a49
1104       , p6_a50
1105       , p6_a51
1106       , p6_a52
1107       , p6_a53
1108       , p6_a54
1109       , p6_a55
1110       );
1111   end;
1112 
1113   procedure update_txl_ar_inv_lns(p_api_version  NUMBER
1114     , p_init_msg_list  VARCHAR2
1115     , x_return_status out nocopy  VARCHAR2
1116     , x_msg_count out nocopy  NUMBER
1117     , x_msg_data out nocopy  VARCHAR2
1118     , p6_a0 out nocopy  NUMBER
1119     , p6_a1 out nocopy  NUMBER
1120     , p6_a2 out nocopy  VARCHAR2
1121     , p6_a3 out nocopy  VARCHAR2
1122     , p6_a4 out nocopy  NUMBER
1123     , p6_a5 out nocopy  NUMBER
1124     , p6_a6 out nocopy  NUMBER
1125     , p6_a7 out nocopy  VARCHAR2
1126     , p6_a8 out nocopy  NUMBER
1127     , p6_a9 out nocopy  NUMBER
1128     , p6_a10 out nocopy  NUMBER
1129     , p6_a11 out nocopy  NUMBER
1130     , p6_a12 out nocopy  NUMBER
1131     , p6_a13 out nocopy  NUMBER
1132     , p6_a14 out nocopy  VARCHAR2
1133     , p6_a15 out nocopy  NUMBER
1134     , p6_a16 out nocopy  DATE
1135     , p6_a17 out nocopy  NUMBER
1136     , p6_a18 out nocopy  DATE
1137     , p6_a19 out nocopy  NUMBER
1138     , p6_a20 out nocopy  NUMBER
1139     , p6_a21 out nocopy  NUMBER
1140     , p6_a22 out nocopy  NUMBER
1141     , p6_a23 out nocopy  NUMBER
1142     , p6_a24 out nocopy  NUMBER
1143     , p6_a25 out nocopy  NUMBER
1144     , p6_a26 out nocopy  NUMBER
1145     , p6_a27 out nocopy  VARCHAR2
1146     , p6_a28 out nocopy  VARCHAR2
1147     , p6_a29 out nocopy  VARCHAR2
1148     , p6_a30 out nocopy  VARCHAR2
1149     , p6_a31 out nocopy  VARCHAR2
1150     , p6_a32 out nocopy  VARCHAR2
1151     , p6_a33 out nocopy  VARCHAR2
1152     , p6_a34 out nocopy  VARCHAR2
1153     , p6_a35 out nocopy  VARCHAR2
1154     , p6_a36 out nocopy  VARCHAR2
1155     , p6_a37 out nocopy  VARCHAR2
1156     , p6_a38 out nocopy  VARCHAR2
1157     , p6_a39 out nocopy  VARCHAR2
1158     , p6_a40 out nocopy  VARCHAR2
1159     , p6_a41 out nocopy  VARCHAR2
1160     , p6_a42 out nocopy  VARCHAR2
1161     , p6_a43 out nocopy  NUMBER
1162     , p6_a44 out nocopy  NUMBER
1163     , p6_a45 out nocopy  NUMBER
1164     , p6_a46 out nocopy  DATE
1165     , p6_a47 out nocopy  NUMBER
1166     , p6_a48 out nocopy  NUMBER
1167     , p6_a49 out nocopy  NUMBER
1168     , p6_a50 out nocopy  DATE
1169     , p6_a51 out nocopy  NUMBER
1170     , p6_a52 out nocopy  DATE
1171     , p6_a53 out nocopy  NUMBER
1172     , p6_a54 out nocopy  NUMBER
1173     , p6_a55 out nocopy  NUMBER
1174     , p5_a0  NUMBER := 0-1962.0724
1175     , p5_a1  NUMBER := 0-1962.0724
1176     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1177     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1178     , p5_a4  NUMBER := 0-1962.0724
1179     , p5_a5  NUMBER := 0-1962.0724
1180     , p5_a6  NUMBER := 0-1962.0724
1181     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1182     , p5_a8  NUMBER := 0-1962.0724
1183     , p5_a9  NUMBER := 0-1962.0724
1184     , p5_a10  NUMBER := 0-1962.0724
1185     , p5_a11  NUMBER := 0-1962.0724
1186     , p5_a12  NUMBER := 0-1962.0724
1187     , p5_a13  NUMBER := 0-1962.0724
1188     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1189     , p5_a15  NUMBER := 0-1962.0724
1190     , p5_a16  DATE := fnd_api.g_miss_date
1191     , p5_a17  NUMBER := 0-1962.0724
1192     , p5_a18  DATE := fnd_api.g_miss_date
1193     , p5_a19  NUMBER := 0-1962.0724
1194     , p5_a20  NUMBER := 0-1962.0724
1195     , p5_a21  NUMBER := 0-1962.0724
1196     , p5_a22  NUMBER := 0-1962.0724
1197     , p5_a23  NUMBER := 0-1962.0724
1198     , p5_a24  NUMBER := 0-1962.0724
1199     , p5_a25  NUMBER := 0-1962.0724
1200     , p5_a26  NUMBER := 0-1962.0724
1201     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1202     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1203     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1204     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1205     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1206     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1207     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1208     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1209     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
1210     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
1211     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
1212     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1213     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1214     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
1215     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
1216     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1217     , p5_a43  NUMBER := 0-1962.0724
1218     , p5_a44  NUMBER := 0-1962.0724
1219     , p5_a45  NUMBER := 0-1962.0724
1220     , p5_a46  DATE := fnd_api.g_miss_date
1221     , p5_a47  NUMBER := 0-1962.0724
1222     , p5_a48  NUMBER := 0-1962.0724
1223     , p5_a49  NUMBER := 0-1962.0724
1224     , p5_a50  DATE := fnd_api.g_miss_date
1225     , p5_a51  NUMBER := 0-1962.0724
1226     , p5_a52  DATE := fnd_api.g_miss_date
1227     , p5_a53  NUMBER := 0-1962.0724
1228     , p5_a54  NUMBER := 0-1962.0724
1229     , p5_a55  NUMBER := 0-1962.0724
1230   )
1231 
1232   as
1233     ddp_tilv_rec okl_txl_ar_inv_lns_pub.tilv_rec_type;
1234     ddx_tilv_rec okl_txl_ar_inv_lns_pub.tilv_rec_type;
1235     ddindx binary_integer; indx binary_integer;
1236   begin
1237 
1238     -- copy data to the local IN or IN-OUT args, if any
1239 
1240 
1241 
1242 
1243 
1244     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
1245     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1246     ddp_tilv_rec.error_message := p5_a2;
1247     ddp_tilv_rec.sfwt_flag := p5_a3;
1248     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1249     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
1250     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
1251     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
1252     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
1253     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
1254     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
1255     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
1256     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
1257     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
1258     ddp_tilv_rec.description := p5_a14;
1259     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
1260     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
1261     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
1262     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
1263     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
1264     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
1265     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
1266     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
1267     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
1268     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
1269     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
1270     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
1271     ddp_tilv_rec.attribute_category := p5_a27;
1272     ddp_tilv_rec.attribute1 := p5_a28;
1273     ddp_tilv_rec.attribute2 := p5_a29;
1274     ddp_tilv_rec.attribute3 := p5_a30;
1275     ddp_tilv_rec.attribute4 := p5_a31;
1276     ddp_tilv_rec.attribute5 := p5_a32;
1277     ddp_tilv_rec.attribute6 := p5_a33;
1278     ddp_tilv_rec.attribute7 := p5_a34;
1279     ddp_tilv_rec.attribute8 := p5_a35;
1280     ddp_tilv_rec.attribute9 := p5_a36;
1281     ddp_tilv_rec.attribute10 := p5_a37;
1282     ddp_tilv_rec.attribute11 := p5_a38;
1283     ddp_tilv_rec.attribute12 := p5_a39;
1284     ddp_tilv_rec.attribute13 := p5_a40;
1285     ddp_tilv_rec.attribute14 := p5_a41;
1286     ddp_tilv_rec.attribute15 := p5_a42;
1287     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
1288     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
1289     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
1290     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
1291     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
1292     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
1293     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1294     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
1295     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
1296     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1297     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1298     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
1299     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
1300 
1301 
1302     -- here's the delegated call to the old PL/SQL routine
1303     okl_txl_ar_inv_lns_pub.update_txl_ar_inv_lns(p_api_version,
1304       p_init_msg_list,
1305       x_return_status,
1306       x_msg_count,
1307       x_msg_data,
1308       ddp_tilv_rec,
1309       ddx_tilv_rec);
1310 
1311     -- copy data back from the local variables to OUT or IN-OUT args, if any
1312 
1313 
1314 
1315 
1316 
1317 
1318     p6_a0 := rosetta_g_miss_num_map(ddx_tilv_rec.id);
1319     p6_a1 := rosetta_g_miss_num_map(ddx_tilv_rec.object_version_number);
1320     p6_a2 := ddx_tilv_rec.error_message;
1321     p6_a3 := ddx_tilv_rec.sfwt_flag;
1322     p6_a4 := rosetta_g_miss_num_map(ddx_tilv_rec.kle_id);
1323     p6_a5 := rosetta_g_miss_num_map(ddx_tilv_rec.tpl_id);
1324     p6_a6 := rosetta_g_miss_num_map(ddx_tilv_rec.til_id_reverses);
1325     p6_a7 := ddx_tilv_rec.inv_receiv_line_code;
1326     p6_a8 := rosetta_g_miss_num_map(ddx_tilv_rec.sty_id);
1327     p6_a9 := rosetta_g_miss_num_map(ddx_tilv_rec.tai_id);
1328     p6_a10 := rosetta_g_miss_num_map(ddx_tilv_rec.acn_id_cost);
1329     p6_a11 := rosetta_g_miss_num_map(ddx_tilv_rec.amount);
1330     p6_a12 := rosetta_g_miss_num_map(ddx_tilv_rec.line_number);
1331     p6_a13 := rosetta_g_miss_num_map(ddx_tilv_rec.quantity);
1332     p6_a14 := ddx_tilv_rec.description;
1333     p6_a15 := rosetta_g_miss_num_map(ddx_tilv_rec.receivables_invoice_id);
1334     p6_a16 := ddx_tilv_rec.date_bill_period_start;
1335     p6_a17 := rosetta_g_miss_num_map(ddx_tilv_rec.amount_applied);
1336     p6_a18 := ddx_tilv_rec.date_bill_period_end;
1337     p6_a19 := rosetta_g_miss_num_map(ddx_tilv_rec.isl_id);
1338     p6_a20 := rosetta_g_miss_num_map(ddx_tilv_rec.ibt_id);
1339     p6_a21 := rosetta_g_miss_num_map(ddx_tilv_rec.late_charge_rec_id);
1340     p6_a22 := rosetta_g_miss_num_map(ddx_tilv_rec.cll_id);
1341     p6_a23 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_item_id);
1342     p6_a24 := rosetta_g_miss_num_map(ddx_tilv_rec.qte_line_id);
1343     p6_a25 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_id);
1344     p6_a26 := rosetta_g_miss_num_map(ddx_tilv_rec.bank_acct_id);
1345     p6_a27 := ddx_tilv_rec.attribute_category;
1346     p6_a28 := ddx_tilv_rec.attribute1;
1347     p6_a29 := ddx_tilv_rec.attribute2;
1348     p6_a30 := ddx_tilv_rec.attribute3;
1349     p6_a31 := ddx_tilv_rec.attribute4;
1350     p6_a32 := ddx_tilv_rec.attribute5;
1351     p6_a33 := ddx_tilv_rec.attribute6;
1352     p6_a34 := ddx_tilv_rec.attribute7;
1353     p6_a35 := ddx_tilv_rec.attribute8;
1354     p6_a36 := ddx_tilv_rec.attribute9;
1355     p6_a37 := ddx_tilv_rec.attribute10;
1356     p6_a38 := ddx_tilv_rec.attribute11;
1357     p6_a39 := ddx_tilv_rec.attribute12;
1358     p6_a40 := ddx_tilv_rec.attribute13;
1359     p6_a41 := ddx_tilv_rec.attribute14;
1360     p6_a42 := ddx_tilv_rec.attribute15;
1361     p6_a43 := rosetta_g_miss_num_map(ddx_tilv_rec.request_id);
1362     p6_a44 := rosetta_g_miss_num_map(ddx_tilv_rec.program_application_id);
1363     p6_a45 := rosetta_g_miss_num_map(ddx_tilv_rec.program_id);
1364     p6_a46 := ddx_tilv_rec.program_update_date;
1365     p6_a47 := rosetta_g_miss_num_map(ddx_tilv_rec.org_id);
1366     p6_a48 := rosetta_g_miss_num_map(ddx_tilv_rec.inventory_org_id);
1367     p6_a49 := rosetta_g_miss_num_map(ddx_tilv_rec.created_by);
1368     p6_a50 := ddx_tilv_rec.creation_date;
1369     p6_a51 := rosetta_g_miss_num_map(ddx_tilv_rec.last_updated_by);
1370     p6_a52 := ddx_tilv_rec.last_update_date;
1371     p6_a53 := rosetta_g_miss_num_map(ddx_tilv_rec.last_update_login);
1372     p6_a54 := rosetta_g_miss_num_map(ddx_tilv_rec.txl_ar_line_number);
1373     p6_a55 := rosetta_g_miss_num_map(ddx_tilv_rec.txs_trx_line_id);
1374   end;
1375 
1376   procedure delete_txl_ar_inv_lns(p_api_version  NUMBER
1377     , p_init_msg_list  VARCHAR2
1378     , x_return_status out nocopy  VARCHAR2
1379     , x_msg_count out nocopy  NUMBER
1380     , x_msg_data out nocopy  VARCHAR2
1381     , p5_a0 JTF_NUMBER_TABLE
1382     , p5_a1 JTF_NUMBER_TABLE
1383     , p5_a2 JTF_VARCHAR2_TABLE_3000
1384     , p5_a3 JTF_VARCHAR2_TABLE_100
1385     , p5_a4 JTF_NUMBER_TABLE
1386     , p5_a5 JTF_NUMBER_TABLE
1387     , p5_a6 JTF_NUMBER_TABLE
1388     , p5_a7 JTF_VARCHAR2_TABLE_100
1389     , p5_a8 JTF_NUMBER_TABLE
1390     , p5_a9 JTF_NUMBER_TABLE
1391     , p5_a10 JTF_NUMBER_TABLE
1392     , p5_a11 JTF_NUMBER_TABLE
1393     , p5_a12 JTF_NUMBER_TABLE
1394     , p5_a13 JTF_NUMBER_TABLE
1395     , p5_a14 JTF_VARCHAR2_TABLE_2000
1396     , p5_a15 JTF_NUMBER_TABLE
1397     , p5_a16 JTF_DATE_TABLE
1398     , p5_a17 JTF_NUMBER_TABLE
1399     , p5_a18 JTF_DATE_TABLE
1400     , p5_a19 JTF_NUMBER_TABLE
1401     , p5_a20 JTF_NUMBER_TABLE
1402     , p5_a21 JTF_NUMBER_TABLE
1403     , p5_a22 JTF_NUMBER_TABLE
1404     , p5_a23 JTF_NUMBER_TABLE
1405     , p5_a24 JTF_NUMBER_TABLE
1406     , p5_a25 JTF_NUMBER_TABLE
1407     , p5_a26 JTF_NUMBER_TABLE
1408     , p5_a27 JTF_VARCHAR2_TABLE_100
1409     , p5_a28 JTF_VARCHAR2_TABLE_500
1410     , p5_a29 JTF_VARCHAR2_TABLE_500
1411     , p5_a30 JTF_VARCHAR2_TABLE_500
1412     , p5_a31 JTF_VARCHAR2_TABLE_500
1413     , p5_a32 JTF_VARCHAR2_TABLE_500
1414     , p5_a33 JTF_VARCHAR2_TABLE_500
1415     , p5_a34 JTF_VARCHAR2_TABLE_500
1416     , p5_a35 JTF_VARCHAR2_TABLE_500
1417     , p5_a36 JTF_VARCHAR2_TABLE_500
1418     , p5_a37 JTF_VARCHAR2_TABLE_500
1419     , p5_a38 JTF_VARCHAR2_TABLE_500
1420     , p5_a39 JTF_VARCHAR2_TABLE_500
1421     , p5_a40 JTF_VARCHAR2_TABLE_500
1422     , p5_a41 JTF_VARCHAR2_TABLE_500
1423     , p5_a42 JTF_VARCHAR2_TABLE_500
1424     , p5_a43 JTF_NUMBER_TABLE
1425     , p5_a44 JTF_NUMBER_TABLE
1426     , p5_a45 JTF_NUMBER_TABLE
1427     , p5_a46 JTF_DATE_TABLE
1428     , p5_a47 JTF_NUMBER_TABLE
1429     , p5_a48 JTF_NUMBER_TABLE
1430     , p5_a49 JTF_NUMBER_TABLE
1431     , p5_a50 JTF_DATE_TABLE
1432     , p5_a51 JTF_NUMBER_TABLE
1433     , p5_a52 JTF_DATE_TABLE
1434     , p5_a53 JTF_NUMBER_TABLE
1435     , p5_a54 JTF_NUMBER_TABLE
1436     , p5_a55 JTF_NUMBER_TABLE
1437   )
1438 
1439   as
1440     ddp_tilv_tbl okl_txl_ar_inv_lns_pub.tilv_tbl_type;
1441     ddindx binary_integer; indx binary_integer;
1442   begin
1443 
1444     -- copy data to the local IN or IN-OUT args, if any
1445 
1446 
1447 
1448 
1449 
1450     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
1451       , p5_a1
1452       , p5_a2
1453       , p5_a3
1454       , p5_a4
1455       , p5_a5
1456       , p5_a6
1457       , p5_a7
1458       , p5_a8
1459       , p5_a9
1460       , p5_a10
1461       , p5_a11
1462       , p5_a12
1463       , p5_a13
1464       , p5_a14
1465       , p5_a15
1466       , p5_a16
1467       , p5_a17
1468       , p5_a18
1469       , p5_a19
1470       , p5_a20
1471       , p5_a21
1472       , p5_a22
1473       , p5_a23
1474       , p5_a24
1475       , p5_a25
1476       , p5_a26
1477       , p5_a27
1478       , p5_a28
1479       , p5_a29
1480       , p5_a30
1481       , p5_a31
1482       , p5_a32
1483       , p5_a33
1484       , p5_a34
1485       , p5_a35
1486       , p5_a36
1487       , p5_a37
1488       , p5_a38
1489       , p5_a39
1490       , p5_a40
1491       , p5_a41
1492       , p5_a42
1493       , p5_a43
1494       , p5_a44
1495       , p5_a45
1496       , p5_a46
1497       , p5_a47
1498       , p5_a48
1499       , p5_a49
1500       , p5_a50
1501       , p5_a51
1502       , p5_a52
1503       , p5_a53
1504       , p5_a54
1505       , p5_a55
1506       );
1507 
1508     -- here's the delegated call to the old PL/SQL routine
1509     okl_txl_ar_inv_lns_pub.delete_txl_ar_inv_lns(p_api_version,
1510       p_init_msg_list,
1511       x_return_status,
1512       x_msg_count,
1513       x_msg_data,
1514       ddp_tilv_tbl);
1515 
1516     -- copy data back from the local variables to OUT or IN-OUT args, if any
1517 
1518 
1519 
1520 
1521 
1522   end;
1523 
1524   procedure delete_txl_ar_inv_lns(p_api_version  NUMBER
1525     , p_init_msg_list  VARCHAR2
1526     , x_return_status out nocopy  VARCHAR2
1527     , x_msg_count out nocopy  NUMBER
1528     , x_msg_data out nocopy  VARCHAR2
1529     , p5_a0  NUMBER := 0-1962.0724
1530     , p5_a1  NUMBER := 0-1962.0724
1531     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1532     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1533     , p5_a4  NUMBER := 0-1962.0724
1534     , p5_a5  NUMBER := 0-1962.0724
1535     , p5_a6  NUMBER := 0-1962.0724
1536     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1537     , p5_a8  NUMBER := 0-1962.0724
1538     , p5_a9  NUMBER := 0-1962.0724
1539     , p5_a10  NUMBER := 0-1962.0724
1540     , p5_a11  NUMBER := 0-1962.0724
1541     , p5_a12  NUMBER := 0-1962.0724
1542     , p5_a13  NUMBER := 0-1962.0724
1543     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1544     , p5_a15  NUMBER := 0-1962.0724
1545     , p5_a16  DATE := fnd_api.g_miss_date
1546     , p5_a17  NUMBER := 0-1962.0724
1547     , p5_a18  DATE := fnd_api.g_miss_date
1548     , p5_a19  NUMBER := 0-1962.0724
1549     , p5_a20  NUMBER := 0-1962.0724
1550     , p5_a21  NUMBER := 0-1962.0724
1551     , p5_a22  NUMBER := 0-1962.0724
1552     , p5_a23  NUMBER := 0-1962.0724
1553     , p5_a24  NUMBER := 0-1962.0724
1554     , p5_a25  NUMBER := 0-1962.0724
1555     , p5_a26  NUMBER := 0-1962.0724
1556     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1557     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1558     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1559     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1560     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1561     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1562     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1563     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1564     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
1565     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
1566     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
1567     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1568     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1569     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
1570     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
1571     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1572     , p5_a43  NUMBER := 0-1962.0724
1573     , p5_a44  NUMBER := 0-1962.0724
1574     , p5_a45  NUMBER := 0-1962.0724
1575     , p5_a46  DATE := fnd_api.g_miss_date
1576     , p5_a47  NUMBER := 0-1962.0724
1577     , p5_a48  NUMBER := 0-1962.0724
1578     , p5_a49  NUMBER := 0-1962.0724
1579     , p5_a50  DATE := fnd_api.g_miss_date
1580     , p5_a51  NUMBER := 0-1962.0724
1581     , p5_a52  DATE := fnd_api.g_miss_date
1582     , p5_a53  NUMBER := 0-1962.0724
1583     , p5_a54  NUMBER := 0-1962.0724
1584     , p5_a55  NUMBER := 0-1962.0724
1585   )
1586 
1587   as
1588     ddp_tilv_rec okl_txl_ar_inv_lns_pub.tilv_rec_type;
1589     ddindx binary_integer; indx binary_integer;
1590   begin
1591 
1592     -- copy data to the local IN or IN-OUT args, if any
1593 
1594 
1595 
1596 
1597 
1598     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
1599     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1600     ddp_tilv_rec.error_message := p5_a2;
1601     ddp_tilv_rec.sfwt_flag := p5_a3;
1602     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1603     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
1604     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
1605     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
1606     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
1607     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
1608     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
1609     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
1610     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
1611     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
1612     ddp_tilv_rec.description := p5_a14;
1613     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
1614     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
1615     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
1616     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
1617     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
1618     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
1619     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
1620     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
1621     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
1622     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
1623     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
1624     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
1625     ddp_tilv_rec.attribute_category := p5_a27;
1626     ddp_tilv_rec.attribute1 := p5_a28;
1627     ddp_tilv_rec.attribute2 := p5_a29;
1628     ddp_tilv_rec.attribute3 := p5_a30;
1629     ddp_tilv_rec.attribute4 := p5_a31;
1630     ddp_tilv_rec.attribute5 := p5_a32;
1631     ddp_tilv_rec.attribute6 := p5_a33;
1632     ddp_tilv_rec.attribute7 := p5_a34;
1633     ddp_tilv_rec.attribute8 := p5_a35;
1634     ddp_tilv_rec.attribute9 := p5_a36;
1635     ddp_tilv_rec.attribute10 := p5_a37;
1636     ddp_tilv_rec.attribute11 := p5_a38;
1637     ddp_tilv_rec.attribute12 := p5_a39;
1638     ddp_tilv_rec.attribute13 := p5_a40;
1639     ddp_tilv_rec.attribute14 := p5_a41;
1640     ddp_tilv_rec.attribute15 := p5_a42;
1641     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
1642     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
1643     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
1644     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
1645     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
1646     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
1647     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1648     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
1649     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
1650     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1651     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1652     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
1653     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
1654 
1655     -- here's the delegated call to the old PL/SQL routine
1656     okl_txl_ar_inv_lns_pub.delete_txl_ar_inv_lns(p_api_version,
1657       p_init_msg_list,
1658       x_return_status,
1659       x_msg_count,
1660       x_msg_data,
1661       ddp_tilv_rec);
1662 
1663     -- copy data back from the local variables to OUT or IN-OUT args, if any
1664 
1665 
1666 
1667 
1668 
1669   end;
1670 
1671   procedure validate_txl_ar_inv_lns(p_api_version  NUMBER
1672     , p_init_msg_list  VARCHAR2
1673     , x_return_status out nocopy  VARCHAR2
1674     , x_msg_count out nocopy  NUMBER
1675     , x_msg_data out nocopy  VARCHAR2
1676     , p5_a0 JTF_NUMBER_TABLE
1677     , p5_a1 JTF_NUMBER_TABLE
1678     , p5_a2 JTF_VARCHAR2_TABLE_3000
1679     , p5_a3 JTF_VARCHAR2_TABLE_100
1680     , p5_a4 JTF_NUMBER_TABLE
1681     , p5_a5 JTF_NUMBER_TABLE
1682     , p5_a6 JTF_NUMBER_TABLE
1683     , p5_a7 JTF_VARCHAR2_TABLE_100
1684     , p5_a8 JTF_NUMBER_TABLE
1685     , p5_a9 JTF_NUMBER_TABLE
1686     , p5_a10 JTF_NUMBER_TABLE
1687     , p5_a11 JTF_NUMBER_TABLE
1688     , p5_a12 JTF_NUMBER_TABLE
1689     , p5_a13 JTF_NUMBER_TABLE
1690     , p5_a14 JTF_VARCHAR2_TABLE_2000
1691     , p5_a15 JTF_NUMBER_TABLE
1692     , p5_a16 JTF_DATE_TABLE
1693     , p5_a17 JTF_NUMBER_TABLE
1694     , p5_a18 JTF_DATE_TABLE
1695     , p5_a19 JTF_NUMBER_TABLE
1696     , p5_a20 JTF_NUMBER_TABLE
1697     , p5_a21 JTF_NUMBER_TABLE
1698     , p5_a22 JTF_NUMBER_TABLE
1699     , p5_a23 JTF_NUMBER_TABLE
1700     , p5_a24 JTF_NUMBER_TABLE
1701     , p5_a25 JTF_NUMBER_TABLE
1702     , p5_a26 JTF_NUMBER_TABLE
1703     , p5_a27 JTF_VARCHAR2_TABLE_100
1704     , p5_a28 JTF_VARCHAR2_TABLE_500
1705     , p5_a29 JTF_VARCHAR2_TABLE_500
1706     , p5_a30 JTF_VARCHAR2_TABLE_500
1707     , p5_a31 JTF_VARCHAR2_TABLE_500
1708     , p5_a32 JTF_VARCHAR2_TABLE_500
1709     , p5_a33 JTF_VARCHAR2_TABLE_500
1710     , p5_a34 JTF_VARCHAR2_TABLE_500
1711     , p5_a35 JTF_VARCHAR2_TABLE_500
1712     , p5_a36 JTF_VARCHAR2_TABLE_500
1713     , p5_a37 JTF_VARCHAR2_TABLE_500
1714     , p5_a38 JTF_VARCHAR2_TABLE_500
1715     , p5_a39 JTF_VARCHAR2_TABLE_500
1716     , p5_a40 JTF_VARCHAR2_TABLE_500
1717     , p5_a41 JTF_VARCHAR2_TABLE_500
1718     , p5_a42 JTF_VARCHAR2_TABLE_500
1719     , p5_a43 JTF_NUMBER_TABLE
1720     , p5_a44 JTF_NUMBER_TABLE
1721     , p5_a45 JTF_NUMBER_TABLE
1722     , p5_a46 JTF_DATE_TABLE
1723     , p5_a47 JTF_NUMBER_TABLE
1724     , p5_a48 JTF_NUMBER_TABLE
1725     , p5_a49 JTF_NUMBER_TABLE
1726     , p5_a50 JTF_DATE_TABLE
1727     , p5_a51 JTF_NUMBER_TABLE
1728     , p5_a52 JTF_DATE_TABLE
1729     , p5_a53 JTF_NUMBER_TABLE
1730     , p5_a54 JTF_NUMBER_TABLE
1731     , p5_a55 JTF_NUMBER_TABLE
1732   )
1733 
1734   as
1735     ddp_tilv_tbl okl_txl_ar_inv_lns_pub.tilv_tbl_type;
1736     ddindx binary_integer; indx binary_integer;
1737   begin
1738 
1739     -- copy data to the local IN or IN-OUT args, if any
1740 
1741 
1742 
1743 
1744 
1745     okl_til_pvt_w.rosetta_table_copy_in_p8(ddp_tilv_tbl, p5_a0
1746       , p5_a1
1747       , p5_a2
1748       , p5_a3
1749       , p5_a4
1750       , p5_a5
1751       , p5_a6
1752       , p5_a7
1753       , p5_a8
1754       , p5_a9
1755       , p5_a10
1756       , p5_a11
1757       , p5_a12
1758       , p5_a13
1759       , p5_a14
1760       , p5_a15
1761       , p5_a16
1762       , p5_a17
1763       , p5_a18
1764       , p5_a19
1765       , p5_a20
1766       , p5_a21
1767       , p5_a22
1768       , p5_a23
1769       , p5_a24
1770       , p5_a25
1771       , p5_a26
1772       , p5_a27
1773       , p5_a28
1774       , p5_a29
1775       , p5_a30
1776       , p5_a31
1777       , p5_a32
1778       , p5_a33
1779       , p5_a34
1780       , p5_a35
1781       , p5_a36
1782       , p5_a37
1783       , p5_a38
1784       , p5_a39
1785       , p5_a40
1786       , p5_a41
1787       , p5_a42
1788       , p5_a43
1789       , p5_a44
1790       , p5_a45
1791       , p5_a46
1792       , p5_a47
1793       , p5_a48
1794       , p5_a49
1795       , p5_a50
1796       , p5_a51
1797       , p5_a52
1798       , p5_a53
1799       , p5_a54
1800       , p5_a55
1801       );
1802 
1803     -- here's the delegated call to the old PL/SQL routine
1804     okl_txl_ar_inv_lns_pub.validate_txl_ar_inv_lns(p_api_version,
1805       p_init_msg_list,
1806       x_return_status,
1807       x_msg_count,
1808       x_msg_data,
1809       ddp_tilv_tbl);
1810 
1811     -- copy data back from the local variables to OUT or IN-OUT args, if any
1812 
1813 
1814 
1815 
1816 
1817   end;
1818 
1819   procedure validate_txl_ar_inv_lns(p_api_version  NUMBER
1820     , p_init_msg_list  VARCHAR2
1821     , x_return_status out nocopy  VARCHAR2
1822     , x_msg_count out nocopy  NUMBER
1823     , x_msg_data out nocopy  VARCHAR2
1824     , p5_a0  NUMBER := 0-1962.0724
1825     , p5_a1  NUMBER := 0-1962.0724
1826     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1827     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
1828     , p5_a4  NUMBER := 0-1962.0724
1829     , p5_a5  NUMBER := 0-1962.0724
1830     , p5_a6  NUMBER := 0-1962.0724
1831     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1832     , p5_a8  NUMBER := 0-1962.0724
1833     , p5_a9  NUMBER := 0-1962.0724
1834     , p5_a10  NUMBER := 0-1962.0724
1835     , p5_a11  NUMBER := 0-1962.0724
1836     , p5_a12  NUMBER := 0-1962.0724
1837     , p5_a13  NUMBER := 0-1962.0724
1838     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1839     , p5_a15  NUMBER := 0-1962.0724
1840     , p5_a16  DATE := fnd_api.g_miss_date
1841     , p5_a17  NUMBER := 0-1962.0724
1842     , p5_a18  DATE := fnd_api.g_miss_date
1843     , p5_a19  NUMBER := 0-1962.0724
1844     , p5_a20  NUMBER := 0-1962.0724
1845     , p5_a21  NUMBER := 0-1962.0724
1846     , p5_a22  NUMBER := 0-1962.0724
1847     , p5_a23  NUMBER := 0-1962.0724
1848     , p5_a24  NUMBER := 0-1962.0724
1849     , p5_a25  NUMBER := 0-1962.0724
1850     , p5_a26  NUMBER := 0-1962.0724
1851     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1852     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1853     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1854     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1855     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1856     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1857     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1858     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1859     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
1860     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
1861     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
1862     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1863     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1864     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
1865     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
1866     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1867     , p5_a43  NUMBER := 0-1962.0724
1868     , p5_a44  NUMBER := 0-1962.0724
1869     , p5_a45  NUMBER := 0-1962.0724
1870     , p5_a46  DATE := fnd_api.g_miss_date
1871     , p5_a47  NUMBER := 0-1962.0724
1872     , p5_a48  NUMBER := 0-1962.0724
1873     , p5_a49  NUMBER := 0-1962.0724
1874     , p5_a50  DATE := fnd_api.g_miss_date
1875     , p5_a51  NUMBER := 0-1962.0724
1876     , p5_a52  DATE := fnd_api.g_miss_date
1877     , p5_a53  NUMBER := 0-1962.0724
1878     , p5_a54  NUMBER := 0-1962.0724
1879     , p5_a55  NUMBER := 0-1962.0724
1880   )
1881 
1882   as
1883     ddp_tilv_rec okl_txl_ar_inv_lns_pub.tilv_rec_type;
1884     ddindx binary_integer; indx binary_integer;
1885   begin
1886 
1887     -- copy data to the local IN or IN-OUT args, if any
1888 
1889 
1890 
1891 
1892 
1893     ddp_tilv_rec.id := rosetta_g_miss_num_map(p5_a0);
1894     ddp_tilv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1895     ddp_tilv_rec.error_message := p5_a2;
1896     ddp_tilv_rec.sfwt_flag := p5_a3;
1897     ddp_tilv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1898     ddp_tilv_rec.tpl_id := rosetta_g_miss_num_map(p5_a5);
1899     ddp_tilv_rec.til_id_reverses := rosetta_g_miss_num_map(p5_a6);
1900     ddp_tilv_rec.inv_receiv_line_code := p5_a7;
1901     ddp_tilv_rec.sty_id := rosetta_g_miss_num_map(p5_a8);
1902     ddp_tilv_rec.tai_id := rosetta_g_miss_num_map(p5_a9);
1903     ddp_tilv_rec.acn_id_cost := rosetta_g_miss_num_map(p5_a10);
1904     ddp_tilv_rec.amount := rosetta_g_miss_num_map(p5_a11);
1905     ddp_tilv_rec.line_number := rosetta_g_miss_num_map(p5_a12);
1906     ddp_tilv_rec.quantity := rosetta_g_miss_num_map(p5_a13);
1907     ddp_tilv_rec.description := p5_a14;
1908     ddp_tilv_rec.receivables_invoice_id := rosetta_g_miss_num_map(p5_a15);
1909     ddp_tilv_rec.date_bill_period_start := rosetta_g_miss_date_in_map(p5_a16);
1910     ddp_tilv_rec.amount_applied := rosetta_g_miss_num_map(p5_a17);
1911     ddp_tilv_rec.date_bill_period_end := rosetta_g_miss_date_in_map(p5_a18);
1912     ddp_tilv_rec.isl_id := rosetta_g_miss_num_map(p5_a19);
1913     ddp_tilv_rec.ibt_id := rosetta_g_miss_num_map(p5_a20);
1914     ddp_tilv_rec.late_charge_rec_id := rosetta_g_miss_num_map(p5_a21);
1915     ddp_tilv_rec.cll_id := rosetta_g_miss_num_map(p5_a22);
1916     ddp_tilv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a23);
1917     ddp_tilv_rec.qte_line_id := rosetta_g_miss_num_map(p5_a24);
1918     ddp_tilv_rec.txs_trx_id := rosetta_g_miss_num_map(p5_a25);
1919     ddp_tilv_rec.bank_acct_id := rosetta_g_miss_num_map(p5_a26);
1920     ddp_tilv_rec.attribute_category := p5_a27;
1921     ddp_tilv_rec.attribute1 := p5_a28;
1922     ddp_tilv_rec.attribute2 := p5_a29;
1923     ddp_tilv_rec.attribute3 := p5_a30;
1924     ddp_tilv_rec.attribute4 := p5_a31;
1925     ddp_tilv_rec.attribute5 := p5_a32;
1926     ddp_tilv_rec.attribute6 := p5_a33;
1927     ddp_tilv_rec.attribute7 := p5_a34;
1928     ddp_tilv_rec.attribute8 := p5_a35;
1929     ddp_tilv_rec.attribute9 := p5_a36;
1930     ddp_tilv_rec.attribute10 := p5_a37;
1931     ddp_tilv_rec.attribute11 := p5_a38;
1932     ddp_tilv_rec.attribute12 := p5_a39;
1933     ddp_tilv_rec.attribute13 := p5_a40;
1934     ddp_tilv_rec.attribute14 := p5_a41;
1935     ddp_tilv_rec.attribute15 := p5_a42;
1936     ddp_tilv_rec.request_id := rosetta_g_miss_num_map(p5_a43);
1937     ddp_tilv_rec.program_application_id := rosetta_g_miss_num_map(p5_a44);
1938     ddp_tilv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
1939     ddp_tilv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a46);
1940     ddp_tilv_rec.org_id := rosetta_g_miss_num_map(p5_a47);
1941     ddp_tilv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a48);
1942     ddp_tilv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1943     ddp_tilv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
1944     ddp_tilv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
1945     ddp_tilv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1946     ddp_tilv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1947     ddp_tilv_rec.txl_ar_line_number := rosetta_g_miss_num_map(p5_a54);
1948     ddp_tilv_rec.txs_trx_line_id := rosetta_g_miss_num_map(p5_a55);
1949 
1950     -- here's the delegated call to the old PL/SQL routine
1951     okl_txl_ar_inv_lns_pub.validate_txl_ar_inv_lns(p_api_version,
1952       p_init_msg_list,
1953       x_return_status,
1954       x_msg_count,
1955       x_msg_data,
1956       ddp_tilv_rec);
1957 
1958     -- copy data back from the local variables to OUT or IN-OUT args, if any
1959 
1960 
1961 
1962 
1963 
1964   end;
1965 
1966 end okl_txl_ar_inv_lns_pub_w;