DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_TRANS_CONTRACTS_PVT_W

Source


1 package body okl_trans_contracts_pvt_w as
2   /* $Header: OKLETCTB.pls 120.8.12010000.3 2008/11/12 23:51:44 apaul 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 create_trx_contracts(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     , p6_a0 JTF_NUMBER_TABLE
31     , p6_a1 JTF_NUMBER_TABLE
32     , p6_a2 JTF_NUMBER_TABLE
33     , p6_a3 JTF_NUMBER_TABLE
34     , p6_a4 JTF_NUMBER_TABLE
35     , p6_a5 JTF_NUMBER_TABLE
36     , p6_a6 JTF_NUMBER_TABLE
37     , p6_a7 JTF_NUMBER_TABLE
38     , p6_a8 JTF_VARCHAR2_TABLE_100
39     , p6_a9 JTF_NUMBER_TABLE
40     , p6_a10 JTF_VARCHAR2_TABLE_2000
41     , p6_a11 JTF_NUMBER_TABLE
42     , p6_a12 JTF_VARCHAR2_TABLE_200
43     , p6_a13 JTF_VARCHAR2_TABLE_100
44     , p6_a14 JTF_VARCHAR2_TABLE_100
45     , p6_a15 JTF_VARCHAR2_TABLE_500
46     , p6_a16 JTF_VARCHAR2_TABLE_500
47     , p6_a17 JTF_VARCHAR2_TABLE_500
48     , p6_a18 JTF_VARCHAR2_TABLE_500
49     , p6_a19 JTF_VARCHAR2_TABLE_500
50     , p6_a20 JTF_VARCHAR2_TABLE_500
51     , p6_a21 JTF_VARCHAR2_TABLE_500
52     , p6_a22 JTF_VARCHAR2_TABLE_500
53     , p6_a23 JTF_VARCHAR2_TABLE_500
54     , p6_a24 JTF_VARCHAR2_TABLE_500
55     , p6_a25 JTF_VARCHAR2_TABLE_500
56     , p6_a26 JTF_VARCHAR2_TABLE_500
57     , p6_a27 JTF_VARCHAR2_TABLE_500
58     , p6_a28 JTF_VARCHAR2_TABLE_500
59     , p6_a29 JTF_VARCHAR2_TABLE_500
60     , p6_a30 JTF_VARCHAR2_TABLE_100
61     , p6_a31 JTF_NUMBER_TABLE
62     , p6_a32 JTF_DATE_TABLE
63     , p6_a33 JTF_NUMBER_TABLE
64     , p6_a34 JTF_DATE_TABLE
65     , p6_a35 JTF_NUMBER_TABLE
66     , p6_a36 JTF_NUMBER_TABLE
67     , p6_a37 JTF_NUMBER_TABLE
68     , p6_a38 JTF_NUMBER_TABLE
69     , p6_a39 JTF_DATE_TABLE
70     , p6_a40 JTF_NUMBER_TABLE
71     , p6_a41 JTF_NUMBER_TABLE
72     , p6_a42 JTF_NUMBER_TABLE
73     , p6_a43 JTF_NUMBER_TABLE
74     , p6_a44 JTF_NUMBER_TABLE
75     , p6_a45 JTF_VARCHAR2_TABLE_100
76     , p6_a46 JTF_VARCHAR2_TABLE_200
77     , p6_a47 JTF_NUMBER_TABLE
78     , p6_a48 JTF_VARCHAR2_TABLE_200
79     , p6_a49 JTF_NUMBER_TABLE
80     , p6_a50 JTF_VARCHAR2_TABLE_200
81     , p6_a51 JTF_NUMBER_TABLE
82     , p6_a52 JTF_DATE_TABLE
83     , p6_a53 JTF_NUMBER_TABLE
84     , p6_a54 JTF_VARCHAR2_TABLE_200
85     , p6_a55 JTF_VARCHAR2_TABLE_300
86     , p6_a56 JTF_VARCHAR2_TABLE_100
87     , p6_a57 JTF_VARCHAR2_TABLE_100
88     , p7_a0 out nocopy  NUMBER
89     , p7_a1 out nocopy  NUMBER
90     , p7_a2 out nocopy  VARCHAR2
91     , p7_a3 out nocopy  VARCHAR2
92     , p7_a4 out nocopy  VARCHAR2
93     , p7_a5 out nocopy  VARCHAR2
94     , p7_a6 out nocopy  NUMBER
95     , p7_a7 out nocopy  NUMBER
96     , p7_a8 out nocopy  NUMBER
97     , p7_a9 out nocopy  NUMBER
98     , p7_a10 out nocopy  NUMBER
99     , p7_a11 out nocopy  NUMBER
100     , p7_a12 out nocopy  VARCHAR2
101     , p7_a13 out nocopy  VARCHAR2
102     , p7_a14 out nocopy  DATE
103     , p7_a15 out nocopy  VARCHAR2
104     , p7_a16 out nocopy  VARCHAR2
105     , p7_a17 out nocopy  NUMBER
106     , p7_a18 out nocopy  VARCHAR2
107     , p7_a19 out nocopy  VARCHAR2
108     , p7_a20 out nocopy  VARCHAR2
109     , p7_a21 out nocopy  VARCHAR2
110     , p7_a22 out nocopy  VARCHAR2
111     , p7_a23 out nocopy  VARCHAR2
112     , p7_a24 out nocopy  VARCHAR2
113     , p7_a25 out nocopy  VARCHAR2
114     , p7_a26 out nocopy  VARCHAR2
115     , p7_a27 out nocopy  VARCHAR2
116     , p7_a28 out nocopy  VARCHAR2
117     , p7_a29 out nocopy  VARCHAR2
118     , p7_a30 out nocopy  VARCHAR2
119     , p7_a31 out nocopy  VARCHAR2
120     , p7_a32 out nocopy  VARCHAR2
121     , p7_a33 out nocopy  VARCHAR2
122     , p7_a34 out nocopy  VARCHAR2
123     , p7_a35 out nocopy  VARCHAR2
124     , p7_a36 out nocopy  VARCHAR2
125     , p7_a37 out nocopy  NUMBER
126     , p7_a38 out nocopy  VARCHAR2
127     , p7_a39 out nocopy  NUMBER
128     , p7_a40 out nocopy  VARCHAR2
129     , p7_a41 out nocopy  VARCHAR2
130     , p7_a42 out nocopy  NUMBER
131     , p7_a43 out nocopy  NUMBER
132     , p7_a44 out nocopy  NUMBER
133     , p7_a45 out nocopy  NUMBER
134     , p7_a46 out nocopy  NUMBER
135     , p7_a47 out nocopy  NUMBER
136     , p7_a48 out nocopy  DATE
137     , p7_a49 out nocopy  NUMBER
138     , p7_a50 out nocopy  DATE
139     , p7_a51 out nocopy  NUMBER
140     , p7_a52 out nocopy  DATE
141     , p7_a53 out nocopy  NUMBER
142     , p7_a54 out nocopy  NUMBER
143     , p7_a55 out nocopy  VARCHAR2
144     , p7_a56 out nocopy  NUMBER
145     , p7_a57 out nocopy  VARCHAR2
146     , p7_a58 out nocopy  DATE
147     , p7_a59 out nocopy  VARCHAR2
148     , p7_a60 out nocopy  VARCHAR2
149     , p7_a61 out nocopy  VARCHAR2
150     , p7_a62 out nocopy  VARCHAR2
151     , p7_a63 out nocopy  VARCHAR2
152     , p7_a64 out nocopy  VARCHAR2
153     , p7_a65 out nocopy  VARCHAR2
154     , p7_a66 out nocopy  VARCHAR2
155     , p7_a67 out nocopy  VARCHAR2
156     , p7_a68 out nocopy  VARCHAR2
157     , p7_a69 out nocopy  VARCHAR2
158     , p7_a70 out nocopy  VARCHAR2
159     , p7_a71 out nocopy  VARCHAR2
160     , p7_a72 out nocopy  VARCHAR2
161     , p7_a73 out nocopy  VARCHAR2
162     , p7_a74 out nocopy  VARCHAR2
163     , p7_a75 out nocopy  VARCHAR2
164     , p7_a76 out nocopy  VARCHAR2
165     , p7_a77 out nocopy  NUMBER
166     , p7_a78 out nocopy  DATE
167     , p7_a79 out nocopy  NUMBER
168     , p7_a80 out nocopy  NUMBER
169     , p7_a81 out nocopy  VARCHAR2
170     , p7_a82 out nocopy  DATE
171     , p7_a83 out nocopy  NUMBER
172     , p7_a84 out nocopy  DATE
173     , p7_a85 out nocopy  VARCHAR2
174     , p7_a86 out nocopy  VARCHAR2
175     , p7_a87 out nocopy  VARCHAR2
176     , p7_a88 out nocopy  VARCHAR2
177     , p7_a89 out nocopy  VARCHAR2
178     , p7_a90 out nocopy  VARCHAR2
179     , p7_a91 out nocopy  VARCHAR2
180     , p7_a92 out nocopy  VARCHAR2
181     , p7_a93 out nocopy  DATE
182     , p8_a0 out nocopy JTF_NUMBER_TABLE
183     , p8_a1 out nocopy JTF_NUMBER_TABLE
184     , p8_a2 out nocopy JTF_NUMBER_TABLE
185     , p8_a3 out nocopy JTF_NUMBER_TABLE
186     , p8_a4 out nocopy JTF_NUMBER_TABLE
187     , p8_a5 out nocopy JTF_NUMBER_TABLE
188     , p8_a6 out nocopy JTF_NUMBER_TABLE
189     , p8_a7 out nocopy JTF_NUMBER_TABLE
190     , p8_a8 out nocopy JTF_VARCHAR2_TABLE_100
191     , p8_a9 out nocopy JTF_NUMBER_TABLE
192     , p8_a10 out nocopy JTF_VARCHAR2_TABLE_2000
193     , p8_a11 out nocopy JTF_NUMBER_TABLE
194     , p8_a12 out nocopy JTF_VARCHAR2_TABLE_200
195     , p8_a13 out nocopy JTF_VARCHAR2_TABLE_100
196     , p8_a14 out nocopy JTF_VARCHAR2_TABLE_100
197     , p8_a15 out nocopy JTF_VARCHAR2_TABLE_500
198     , p8_a16 out nocopy JTF_VARCHAR2_TABLE_500
199     , p8_a17 out nocopy JTF_VARCHAR2_TABLE_500
200     , p8_a18 out nocopy JTF_VARCHAR2_TABLE_500
201     , p8_a19 out nocopy JTF_VARCHAR2_TABLE_500
202     , p8_a20 out nocopy JTF_VARCHAR2_TABLE_500
203     , p8_a21 out nocopy JTF_VARCHAR2_TABLE_500
204     , p8_a22 out nocopy JTF_VARCHAR2_TABLE_500
205     , p8_a23 out nocopy JTF_VARCHAR2_TABLE_500
206     , p8_a24 out nocopy JTF_VARCHAR2_TABLE_500
207     , p8_a25 out nocopy JTF_VARCHAR2_TABLE_500
208     , p8_a26 out nocopy JTF_VARCHAR2_TABLE_500
209     , p8_a27 out nocopy JTF_VARCHAR2_TABLE_500
210     , p8_a28 out nocopy JTF_VARCHAR2_TABLE_500
211     , p8_a29 out nocopy JTF_VARCHAR2_TABLE_500
212     , p8_a30 out nocopy JTF_VARCHAR2_TABLE_100
213     , p8_a31 out nocopy JTF_NUMBER_TABLE
214     , p8_a32 out nocopy JTF_DATE_TABLE
215     , p8_a33 out nocopy JTF_NUMBER_TABLE
216     , p8_a34 out nocopy JTF_DATE_TABLE
217     , p8_a35 out nocopy JTF_NUMBER_TABLE
218     , p8_a36 out nocopy JTF_NUMBER_TABLE
219     , p8_a37 out nocopy JTF_NUMBER_TABLE
220     , p8_a38 out nocopy JTF_NUMBER_TABLE
221     , p8_a39 out nocopy JTF_DATE_TABLE
222     , p8_a40 out nocopy JTF_NUMBER_TABLE
223     , p8_a41 out nocopy JTF_NUMBER_TABLE
224     , p8_a42 out nocopy JTF_NUMBER_TABLE
225     , p8_a43 out nocopy JTF_NUMBER_TABLE
226     , p8_a44 out nocopy JTF_NUMBER_TABLE
227     , p8_a45 out nocopy JTF_VARCHAR2_TABLE_100
228     , p8_a46 out nocopy JTF_VARCHAR2_TABLE_200
229     , p8_a47 out nocopy JTF_NUMBER_TABLE
230     , p8_a48 out nocopy JTF_VARCHAR2_TABLE_200
231     , p8_a49 out nocopy JTF_NUMBER_TABLE
232     , p8_a50 out nocopy JTF_VARCHAR2_TABLE_200
233     , p8_a51 out nocopy JTF_NUMBER_TABLE
234     , p8_a52 out nocopy JTF_DATE_TABLE
235     , p8_a53 out nocopy JTF_NUMBER_TABLE
236     , p8_a54 out nocopy JTF_VARCHAR2_TABLE_200
237     , p8_a55 out nocopy JTF_VARCHAR2_TABLE_300
238     , p8_a56 out nocopy JTF_VARCHAR2_TABLE_100
239     , p8_a57 out nocopy JTF_VARCHAR2_TABLE_100
240     , p5_a0  NUMBER := 0-1962.0724
241     , p5_a1  NUMBER := 0-1962.0724
242     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
243     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
244     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
245     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
246     , p5_a6  NUMBER := 0-1962.0724
247     , p5_a7  NUMBER := 0-1962.0724
248     , p5_a8  NUMBER := 0-1962.0724
249     , p5_a9  NUMBER := 0-1962.0724
250     , p5_a10  NUMBER := 0-1962.0724
251     , p5_a11  NUMBER := 0-1962.0724
252     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
253     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
254     , p5_a14  DATE := fnd_api.g_miss_date
255     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
256     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
257     , p5_a17  NUMBER := 0-1962.0724
258     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
259     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
260     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
261     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
262     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
263     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
264     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
265     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
266     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
267     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
268     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
269     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
270     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
271     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
272     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
273     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
274     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
275     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
276     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
277     , p5_a37  NUMBER := 0-1962.0724
278     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
279     , p5_a39  NUMBER := 0-1962.0724
280     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
281     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
282     , p5_a42  NUMBER := 0-1962.0724
283     , p5_a43  NUMBER := 0-1962.0724
284     , p5_a44  NUMBER := 0-1962.0724
285     , p5_a45  NUMBER := 0-1962.0724
286     , p5_a46  NUMBER := 0-1962.0724
287     , p5_a47  NUMBER := 0-1962.0724
288     , p5_a48  DATE := fnd_api.g_miss_date
289     , p5_a49  NUMBER := 0-1962.0724
290     , p5_a50  DATE := fnd_api.g_miss_date
291     , p5_a51  NUMBER := 0-1962.0724
292     , p5_a52  DATE := fnd_api.g_miss_date
293     , p5_a53  NUMBER := 0-1962.0724
294     , p5_a54  NUMBER := 0-1962.0724
295     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
296     , p5_a56  NUMBER := 0-1962.0724
297     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
298     , p5_a58  DATE := fnd_api.g_miss_date
299     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
300     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
301     , p5_a61  VARCHAR2 := fnd_api.g_miss_char
302     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
303     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
304     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
305     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
306     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
307     , p5_a67  VARCHAR2 := fnd_api.g_miss_char
308     , p5_a68  VARCHAR2 := fnd_api.g_miss_char
309     , p5_a69  VARCHAR2 := fnd_api.g_miss_char
310     , p5_a70  VARCHAR2 := fnd_api.g_miss_char
311     , p5_a71  VARCHAR2 := fnd_api.g_miss_char
312     , p5_a72  VARCHAR2 := fnd_api.g_miss_char
313     , p5_a73  VARCHAR2 := fnd_api.g_miss_char
314     , p5_a74  VARCHAR2 := fnd_api.g_miss_char
315     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
316     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
317     , p5_a77  NUMBER := 0-1962.0724
318     , p5_a78  DATE := fnd_api.g_miss_date
319     , p5_a79  NUMBER := 0-1962.0724
320     , p5_a80  NUMBER := 0-1962.0724
321     , p5_a81  VARCHAR2 := fnd_api.g_miss_char
322     , p5_a82  DATE := fnd_api.g_miss_date
323     , p5_a83  NUMBER := 0-1962.0724
324     , p5_a84  DATE := fnd_api.g_miss_date
325     , p5_a85  VARCHAR2 := fnd_api.g_miss_char
326     , p5_a86  VARCHAR2 := fnd_api.g_miss_char
327     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
328     , p5_a88  VARCHAR2 := fnd_api.g_miss_char
329     , p5_a89  VARCHAR2 := fnd_api.g_miss_char
330     , p5_a90  VARCHAR2 := fnd_api.g_miss_char
331     , p5_a91  VARCHAR2 := fnd_api.g_miss_char
332     , p5_a92  VARCHAR2 := fnd_api.g_miss_char
333     , p5_a93  DATE := fnd_api.g_miss_date
334   )
335 
336   as
337     ddp_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
338     ddp_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
339     ddx_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
340     ddx_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
341     ddindx binary_integer; indx binary_integer;
342   begin
343 
344     -- copy data to the local IN or IN-OUT args, if any
345 
346 
347 
348 
349 
350     ddp_tcnv_rec.id := rosetta_g_miss_num_map(p5_a0);
351     ddp_tcnv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
352     ddp_tcnv_rec.rbr_code := p5_a2;
353     ddp_tcnv_rec.rpy_code := p5_a3;
354     ddp_tcnv_rec.rvn_code := p5_a4;
355     ddp_tcnv_rec.trn_code := p5_a5;
356     ddp_tcnv_rec.khr_id_new := rosetta_g_miss_num_map(p5_a6);
357     ddp_tcnv_rec.pvn_id := rosetta_g_miss_num_map(p5_a7);
358     ddp_tcnv_rec.pdt_id := rosetta_g_miss_num_map(p5_a8);
359     ddp_tcnv_rec.qte_id := rosetta_g_miss_num_map(p5_a9);
360     ddp_tcnv_rec.aes_id := rosetta_g_miss_num_map(p5_a10);
361     ddp_tcnv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a11);
362     ddp_tcnv_rec.tax_deductible_local := p5_a12;
363     ddp_tcnv_rec.tax_deductible_corporate := p5_a13;
364     ddp_tcnv_rec.date_accrual := rosetta_g_miss_date_in_map(p5_a14);
365     ddp_tcnv_rec.accrual_status_yn := p5_a15;
366     ddp_tcnv_rec.update_status_yn := p5_a16;
367     ddp_tcnv_rec.amount := rosetta_g_miss_num_map(p5_a17);
368     ddp_tcnv_rec.currency_code := p5_a18;
369     ddp_tcnv_rec.attribute_category := p5_a19;
370     ddp_tcnv_rec.attribute1 := p5_a20;
371     ddp_tcnv_rec.attribute2 := p5_a21;
372     ddp_tcnv_rec.attribute3 := p5_a22;
373     ddp_tcnv_rec.attribute4 := p5_a23;
374     ddp_tcnv_rec.attribute5 := p5_a24;
375     ddp_tcnv_rec.attribute6 := p5_a25;
376     ddp_tcnv_rec.attribute7 := p5_a26;
377     ddp_tcnv_rec.attribute8 := p5_a27;
378     ddp_tcnv_rec.attribute9 := p5_a28;
379     ddp_tcnv_rec.attribute10 := p5_a29;
380     ddp_tcnv_rec.attribute11 := p5_a30;
381     ddp_tcnv_rec.attribute12 := p5_a31;
382     ddp_tcnv_rec.attribute13 := p5_a32;
383     ddp_tcnv_rec.attribute14 := p5_a33;
384     ddp_tcnv_rec.attribute15 := p5_a34;
385     ddp_tcnv_rec.tcn_type := p5_a35;
386     ddp_tcnv_rec.rjn_code := p5_a36;
387     ddp_tcnv_rec.party_rel_id1_old := rosetta_g_miss_num_map(p5_a37);
388     ddp_tcnv_rec.party_rel_id2_old := p5_a38;
389     ddp_tcnv_rec.party_rel_id1_new := rosetta_g_miss_num_map(p5_a39);
390     ddp_tcnv_rec.party_rel_id2_new := p5_a40;
391     ddp_tcnv_rec.complete_transfer_yn := p5_a41;
392     ddp_tcnv_rec.org_id := rosetta_g_miss_num_map(p5_a42);
393     ddp_tcnv_rec.khr_id := rosetta_g_miss_num_map(p5_a43);
394     ddp_tcnv_rec.request_id := rosetta_g_miss_num_map(p5_a44);
395     ddp_tcnv_rec.program_application_id := rosetta_g_miss_num_map(p5_a45);
396     ddp_tcnv_rec.khr_id_old := rosetta_g_miss_num_map(p5_a46);
397     ddp_tcnv_rec.program_id := rosetta_g_miss_num_map(p5_a47);
398     ddp_tcnv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a48);
399     ddp_tcnv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
400     ddp_tcnv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
401     ddp_tcnv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
402     ddp_tcnv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
403     ddp_tcnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
404     ddp_tcnv_rec.try_id := rosetta_g_miss_num_map(p5_a54);
405     ddp_tcnv_rec.tsu_code := p5_a55;
406     ddp_tcnv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a56);
407     ddp_tcnv_rec.description := p5_a57;
408     ddp_tcnv_rec.date_transaction_occurred := rosetta_g_miss_date_in_map(p5_a58);
409     ddp_tcnv_rec.trx_number := p5_a59;
410     ddp_tcnv_rec.tmt_evergreen_yn := p5_a60;
411     ddp_tcnv_rec.tmt_close_balances_yn := p5_a61;
412     ddp_tcnv_rec.tmt_accounting_entries_yn := p5_a62;
413     ddp_tcnv_rec.tmt_cancel_insurance_yn := p5_a63;
414     ddp_tcnv_rec.tmt_asset_disposition_yn := p5_a64;
415     ddp_tcnv_rec.tmt_amortization_yn := p5_a65;
416     ddp_tcnv_rec.tmt_asset_return_yn := p5_a66;
417     ddp_tcnv_rec.tmt_contract_updated_yn := p5_a67;
418     ddp_tcnv_rec.tmt_recycle_yn := p5_a68;
419     ddp_tcnv_rec.tmt_validated_yn := p5_a69;
420     ddp_tcnv_rec.tmt_streams_updated_yn := p5_a70;
421     ddp_tcnv_rec.accrual_activity := p5_a71;
422     ddp_tcnv_rec.tmt_split_asset_yn := p5_a72;
423     ddp_tcnv_rec.tmt_generic_flag1_yn := p5_a73;
424     ddp_tcnv_rec.tmt_generic_flag2_yn := p5_a74;
425     ddp_tcnv_rec.tmt_generic_flag3_yn := p5_a75;
426     ddp_tcnv_rec.currency_conversion_type := p5_a76;
427     ddp_tcnv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a77);
428     ddp_tcnv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a78);
429     ddp_tcnv_rec.chr_id := rosetta_g_miss_num_map(p5_a79);
430     ddp_tcnv_rec.source_trx_id := rosetta_g_miss_num_map(p5_a80);
431     ddp_tcnv_rec.source_trx_type := p5_a81;
432     ddp_tcnv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a82);
433     ddp_tcnv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a83);
434     ddp_tcnv_rec.accrual_reversal_date := rosetta_g_miss_date_in_map(p5_a84);
435     ddp_tcnv_rec.accounting_reversal_yn := p5_a85;
436     ddp_tcnv_rec.product_name := p5_a86;
437     ddp_tcnv_rec.book_classification_code := p5_a87;
438     ddp_tcnv_rec.tax_owner_code := p5_a88;
439     ddp_tcnv_rec.tmt_status_code := p5_a89;
440     ddp_tcnv_rec.representation_name := p5_a90;
441     ddp_tcnv_rec.representation_code := p5_a91;
442     ddp_tcnv_rec.upgrade_status_flag := p5_a92;
443     ddp_tcnv_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a93);
444 
445     okl_tcl_pvt_w.rosetta_table_copy_in_p5(ddp_tclv_tbl, p6_a0
446       , p6_a1
447       , p6_a2
448       , p6_a3
449       , p6_a4
450       , p6_a5
451       , p6_a6
452       , p6_a7
453       , p6_a8
454       , p6_a9
455       , p6_a10
456       , p6_a11
457       , p6_a12
458       , p6_a13
459       , p6_a14
460       , p6_a15
461       , p6_a16
462       , p6_a17
463       , p6_a18
464       , p6_a19
465       , p6_a20
466       , p6_a21
467       , p6_a22
468       , p6_a23
469       , p6_a24
470       , p6_a25
471       , p6_a26
472       , p6_a27
473       , p6_a28
474       , p6_a29
475       , p6_a30
476       , p6_a31
477       , p6_a32
478       , p6_a33
479       , p6_a34
480       , p6_a35
481       , p6_a36
482       , p6_a37
483       , p6_a38
484       , p6_a39
485       , p6_a40
486       , p6_a41
487       , p6_a42
488       , p6_a43
489       , p6_a44
490       , p6_a45
491       , p6_a46
492       , p6_a47
493       , p6_a48
494       , p6_a49
495       , p6_a50
496       , p6_a51
497       , p6_a52
498       , p6_a53
499       , p6_a54
500       , p6_a55
501       , p6_a56
502       , p6_a57
503       );
504 
505 
506 
507     -- here's the delegated call to the old PL/SQL routine
508     okl_trans_contracts_pvt.create_trx_contracts(p_api_version,
509       p_init_msg_list,
510       x_return_status,
511       x_msg_count,
512       x_msg_data,
513       ddp_tcnv_rec,
514       ddp_tclv_tbl,
515       ddx_tcnv_rec,
516       ddx_tclv_tbl);
517 
518     -- copy data back from the local variables to OUT or IN-OUT args, if any
519 
520 
521 
522 
523 
524 
525 
526     p7_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
527     p7_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
528     p7_a2 := ddx_tcnv_rec.rbr_code;
529     p7_a3 := ddx_tcnv_rec.rpy_code;
530     p7_a4 := ddx_tcnv_rec.rvn_code;
531     p7_a5 := ddx_tcnv_rec.trn_code;
532     p7_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
533     p7_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
534     p7_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
535     p7_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
536     p7_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
537     p7_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
538     p7_a12 := ddx_tcnv_rec.tax_deductible_local;
539     p7_a13 := ddx_tcnv_rec.tax_deductible_corporate;
540     p7_a14 := ddx_tcnv_rec.date_accrual;
541     p7_a15 := ddx_tcnv_rec.accrual_status_yn;
542     p7_a16 := ddx_tcnv_rec.update_status_yn;
543     p7_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
544     p7_a18 := ddx_tcnv_rec.currency_code;
545     p7_a19 := ddx_tcnv_rec.attribute_category;
546     p7_a20 := ddx_tcnv_rec.attribute1;
547     p7_a21 := ddx_tcnv_rec.attribute2;
548     p7_a22 := ddx_tcnv_rec.attribute3;
549     p7_a23 := ddx_tcnv_rec.attribute4;
550     p7_a24 := ddx_tcnv_rec.attribute5;
551     p7_a25 := ddx_tcnv_rec.attribute6;
552     p7_a26 := ddx_tcnv_rec.attribute7;
553     p7_a27 := ddx_tcnv_rec.attribute8;
554     p7_a28 := ddx_tcnv_rec.attribute9;
555     p7_a29 := ddx_tcnv_rec.attribute10;
556     p7_a30 := ddx_tcnv_rec.attribute11;
557     p7_a31 := ddx_tcnv_rec.attribute12;
558     p7_a32 := ddx_tcnv_rec.attribute13;
559     p7_a33 := ddx_tcnv_rec.attribute14;
560     p7_a34 := ddx_tcnv_rec.attribute15;
561     p7_a35 := ddx_tcnv_rec.tcn_type;
562     p7_a36 := ddx_tcnv_rec.rjn_code;
563     p7_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
564     p7_a38 := ddx_tcnv_rec.party_rel_id2_old;
565     p7_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
566     p7_a40 := ddx_tcnv_rec.party_rel_id2_new;
567     p7_a41 := ddx_tcnv_rec.complete_transfer_yn;
568     p7_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
569     p7_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
570     p7_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
571     p7_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
572     p7_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
573     p7_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
574     p7_a48 := ddx_tcnv_rec.program_update_date;
575     p7_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
576     p7_a50 := ddx_tcnv_rec.creation_date;
577     p7_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
578     p7_a52 := ddx_tcnv_rec.last_update_date;
579     p7_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
580     p7_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
581     p7_a55 := ddx_tcnv_rec.tsu_code;
582     p7_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
583     p7_a57 := ddx_tcnv_rec.description;
584     p7_a58 := ddx_tcnv_rec.date_transaction_occurred;
585     p7_a59 := ddx_tcnv_rec.trx_number;
586     p7_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
587     p7_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
588     p7_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
589     p7_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
590     p7_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
591     p7_a65 := ddx_tcnv_rec.tmt_amortization_yn;
592     p7_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
593     p7_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
594     p7_a68 := ddx_tcnv_rec.tmt_recycle_yn;
595     p7_a69 := ddx_tcnv_rec.tmt_validated_yn;
596     p7_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
597     p7_a71 := ddx_tcnv_rec.accrual_activity;
598     p7_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
599     p7_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
600     p7_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
601     p7_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
602     p7_a76 := ddx_tcnv_rec.currency_conversion_type;
603     p7_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
604     p7_a78 := ddx_tcnv_rec.currency_conversion_date;
605     p7_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
606     p7_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
607     p7_a81 := ddx_tcnv_rec.source_trx_type;
608     p7_a82 := ddx_tcnv_rec.canceled_date;
609     p7_a83 := rosetta_g_miss_num_map(ddx_tcnv_rec.legal_entity_id);
610     p7_a84 := ddx_tcnv_rec.accrual_reversal_date;
611     p7_a85 := ddx_tcnv_rec.accounting_reversal_yn;
612     p7_a86 := ddx_tcnv_rec.product_name;
613     p7_a87 := ddx_tcnv_rec.book_classification_code;
614     p7_a88 := ddx_tcnv_rec.tax_owner_code;
615     p7_a89 := ddx_tcnv_rec.tmt_status_code;
616     p7_a90 := ddx_tcnv_rec.representation_name;
617     p7_a91 := ddx_tcnv_rec.representation_code;
618     p7_a92 := ddx_tcnv_rec.upgrade_status_flag;
619     p7_a93 := ddx_tcnv_rec.transaction_date;
620 
621     okl_tcl_pvt_w.rosetta_table_copy_out_p5(ddx_tclv_tbl, p8_a0
622       , p8_a1
623       , p8_a2
624       , p8_a3
625       , p8_a4
626       , p8_a5
627       , p8_a6
628       , p8_a7
629       , p8_a8
630       , p8_a9
631       , p8_a10
632       , p8_a11
633       , p8_a12
634       , p8_a13
635       , p8_a14
636       , p8_a15
637       , p8_a16
638       , p8_a17
639       , p8_a18
640       , p8_a19
641       , p8_a20
642       , p8_a21
643       , p8_a22
644       , p8_a23
645       , p8_a24
646       , p8_a25
647       , p8_a26
648       , p8_a27
649       , p8_a28
650       , p8_a29
651       , p8_a30
652       , p8_a31
653       , p8_a32
654       , p8_a33
655       , p8_a34
656       , p8_a35
657       , p8_a36
658       , p8_a37
659       , p8_a38
660       , p8_a39
661       , p8_a40
662       , p8_a41
663       , p8_a42
664       , p8_a43
665       , p8_a44
666       , p8_a45
667       , p8_a46
668       , p8_a47
669       , p8_a48
670       , p8_a49
671       , p8_a50
672       , p8_a51
673       , p8_a52
674       , p8_a53
675       , p8_a54
676       , p8_a55
677       , p8_a56
678       , p8_a57
679       );
680   end;
681 
682   procedure create_trx_contracts(p_api_version  NUMBER
683     , p_init_msg_list  VARCHAR2
684     , x_return_status out nocopy  VARCHAR2
685     , x_msg_count out nocopy  NUMBER
686     , x_msg_data out nocopy  VARCHAR2
687     , p6_a0 out nocopy  NUMBER
688     , p6_a1 out nocopy  NUMBER
689     , p6_a2 out nocopy  VARCHAR2
690     , p6_a3 out nocopy  VARCHAR2
691     , p6_a4 out nocopy  VARCHAR2
692     , p6_a5 out nocopy  VARCHAR2
693     , p6_a6 out nocopy  NUMBER
694     , p6_a7 out nocopy  NUMBER
695     , p6_a8 out nocopy  NUMBER
696     , p6_a9 out nocopy  NUMBER
697     , p6_a10 out nocopy  NUMBER
698     , p6_a11 out nocopy  NUMBER
699     , p6_a12 out nocopy  VARCHAR2
700     , p6_a13 out nocopy  VARCHAR2
701     , p6_a14 out nocopy  DATE
702     , p6_a15 out nocopy  VARCHAR2
703     , p6_a16 out nocopy  VARCHAR2
704     , p6_a17 out nocopy  NUMBER
705     , p6_a18 out nocopy  VARCHAR2
706     , p6_a19 out nocopy  VARCHAR2
707     , p6_a20 out nocopy  VARCHAR2
708     , p6_a21 out nocopy  VARCHAR2
709     , p6_a22 out nocopy  VARCHAR2
710     , p6_a23 out nocopy  VARCHAR2
711     , p6_a24 out nocopy  VARCHAR2
712     , p6_a25 out nocopy  VARCHAR2
713     , p6_a26 out nocopy  VARCHAR2
714     , p6_a27 out nocopy  VARCHAR2
715     , p6_a28 out nocopy  VARCHAR2
716     , p6_a29 out nocopy  VARCHAR2
717     , p6_a30 out nocopy  VARCHAR2
718     , p6_a31 out nocopy  VARCHAR2
719     , p6_a32 out nocopy  VARCHAR2
720     , p6_a33 out nocopy  VARCHAR2
721     , p6_a34 out nocopy  VARCHAR2
722     , p6_a35 out nocopy  VARCHAR2
723     , p6_a36 out nocopy  VARCHAR2
724     , p6_a37 out nocopy  NUMBER
725     , p6_a38 out nocopy  VARCHAR2
726     , p6_a39 out nocopy  NUMBER
727     , p6_a40 out nocopy  VARCHAR2
728     , p6_a41 out nocopy  VARCHAR2
729     , p6_a42 out nocopy  NUMBER
730     , p6_a43 out nocopy  NUMBER
731     , p6_a44 out nocopy  NUMBER
732     , p6_a45 out nocopy  NUMBER
733     , p6_a46 out nocopy  NUMBER
734     , p6_a47 out nocopy  NUMBER
735     , p6_a48 out nocopy  DATE
736     , p6_a49 out nocopy  NUMBER
737     , p6_a50 out nocopy  DATE
738     , p6_a51 out nocopy  NUMBER
739     , p6_a52 out nocopy  DATE
740     , p6_a53 out nocopy  NUMBER
741     , p6_a54 out nocopy  NUMBER
742     , p6_a55 out nocopy  VARCHAR2
743     , p6_a56 out nocopy  NUMBER
744     , p6_a57 out nocopy  VARCHAR2
745     , p6_a58 out nocopy  DATE
746     , p6_a59 out nocopy  VARCHAR2
747     , p6_a60 out nocopy  VARCHAR2
748     , p6_a61 out nocopy  VARCHAR2
749     , p6_a62 out nocopy  VARCHAR2
750     , p6_a63 out nocopy  VARCHAR2
751     , p6_a64 out nocopy  VARCHAR2
752     , p6_a65 out nocopy  VARCHAR2
753     , p6_a66 out nocopy  VARCHAR2
754     , p6_a67 out nocopy  VARCHAR2
755     , p6_a68 out nocopy  VARCHAR2
756     , p6_a69 out nocopy  VARCHAR2
757     , p6_a70 out nocopy  VARCHAR2
758     , p6_a71 out nocopy  VARCHAR2
759     , p6_a72 out nocopy  VARCHAR2
760     , p6_a73 out nocopy  VARCHAR2
761     , p6_a74 out nocopy  VARCHAR2
762     , p6_a75 out nocopy  VARCHAR2
763     , p6_a76 out nocopy  VARCHAR2
764     , p6_a77 out nocopy  NUMBER
765     , p6_a78 out nocopy  DATE
766     , p6_a79 out nocopy  NUMBER
767     , p6_a80 out nocopy  NUMBER
768     , p6_a81 out nocopy  VARCHAR2
769     , p6_a82 out nocopy  DATE
770     , p6_a83 out nocopy  NUMBER
771     , p6_a84 out nocopy  DATE
772     , p6_a85 out nocopy  VARCHAR2
773     , p6_a86 out nocopy  VARCHAR2
774     , p6_a87 out nocopy  VARCHAR2
775     , p6_a88 out nocopy  VARCHAR2
776     , p6_a89 out nocopy  VARCHAR2
777     , p6_a90 out nocopy  VARCHAR2
778     , p6_a91 out nocopy  VARCHAR2
779     , p6_a92 out nocopy  VARCHAR2
780     , p6_a93 out nocopy  DATE
781     , p5_a0  NUMBER := 0-1962.0724
782     , p5_a1  NUMBER := 0-1962.0724
783     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
784     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
785     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
786     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
787     , p5_a6  NUMBER := 0-1962.0724
788     , p5_a7  NUMBER := 0-1962.0724
789     , p5_a8  NUMBER := 0-1962.0724
790     , p5_a9  NUMBER := 0-1962.0724
791     , p5_a10  NUMBER := 0-1962.0724
792     , p5_a11  NUMBER := 0-1962.0724
793     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
794     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
795     , p5_a14  DATE := fnd_api.g_miss_date
796     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
797     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
798     , p5_a17  NUMBER := 0-1962.0724
799     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
800     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
801     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
802     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
803     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
804     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
805     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
806     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
807     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
808     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
809     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
810     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
811     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
812     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
813     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
814     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
815     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
816     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
817     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
818     , p5_a37  NUMBER := 0-1962.0724
819     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
820     , p5_a39  NUMBER := 0-1962.0724
821     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
822     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
823     , p5_a42  NUMBER := 0-1962.0724
824     , p5_a43  NUMBER := 0-1962.0724
825     , p5_a44  NUMBER := 0-1962.0724
826     , p5_a45  NUMBER := 0-1962.0724
827     , p5_a46  NUMBER := 0-1962.0724
828     , p5_a47  NUMBER := 0-1962.0724
829     , p5_a48  DATE := fnd_api.g_miss_date
830     , p5_a49  NUMBER := 0-1962.0724
831     , p5_a50  DATE := fnd_api.g_miss_date
832     , p5_a51  NUMBER := 0-1962.0724
833     , p5_a52  DATE := fnd_api.g_miss_date
834     , p5_a53  NUMBER := 0-1962.0724
835     , p5_a54  NUMBER := 0-1962.0724
836     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
837     , p5_a56  NUMBER := 0-1962.0724
838     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
839     , p5_a58  DATE := fnd_api.g_miss_date
840     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
841     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
842     , p5_a61  VARCHAR2 := fnd_api.g_miss_char
843     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
844     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
845     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
846     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
847     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
848     , p5_a67  VARCHAR2 := fnd_api.g_miss_char
849     , p5_a68  VARCHAR2 := fnd_api.g_miss_char
850     , p5_a69  VARCHAR2 := fnd_api.g_miss_char
851     , p5_a70  VARCHAR2 := fnd_api.g_miss_char
852     , p5_a71  VARCHAR2 := fnd_api.g_miss_char
853     , p5_a72  VARCHAR2 := fnd_api.g_miss_char
854     , p5_a73  VARCHAR2 := fnd_api.g_miss_char
855     , p5_a74  VARCHAR2 := fnd_api.g_miss_char
856     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
857     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
858     , p5_a77  NUMBER := 0-1962.0724
859     , p5_a78  DATE := fnd_api.g_miss_date
860     , p5_a79  NUMBER := 0-1962.0724
861     , p5_a80  NUMBER := 0-1962.0724
862     , p5_a81  VARCHAR2 := fnd_api.g_miss_char
863     , p5_a82  DATE := fnd_api.g_miss_date
864     , p5_a83  NUMBER := 0-1962.0724
865     , p5_a84  DATE := fnd_api.g_miss_date
866     , p5_a85  VARCHAR2 := fnd_api.g_miss_char
867     , p5_a86  VARCHAR2 := fnd_api.g_miss_char
868     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
869     , p5_a88  VARCHAR2 := fnd_api.g_miss_char
870     , p5_a89  VARCHAR2 := fnd_api.g_miss_char
871     , p5_a90  VARCHAR2 := fnd_api.g_miss_char
872     , p5_a91  VARCHAR2 := fnd_api.g_miss_char
873     , p5_a92  VARCHAR2 := fnd_api.g_miss_char
874     , p5_a93  DATE := fnd_api.g_miss_date
875   )
876 
877   as
878     ddp_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
879     ddx_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
880     ddindx binary_integer; indx binary_integer;
881   begin
882 
883     -- copy data to the local IN or IN-OUT args, if any
884 
885 
886 
887 
888 
889     ddp_tcnv_rec.id := rosetta_g_miss_num_map(p5_a0);
890     ddp_tcnv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
891     ddp_tcnv_rec.rbr_code := p5_a2;
892     ddp_tcnv_rec.rpy_code := p5_a3;
893     ddp_tcnv_rec.rvn_code := p5_a4;
894     ddp_tcnv_rec.trn_code := p5_a5;
895     ddp_tcnv_rec.khr_id_new := rosetta_g_miss_num_map(p5_a6);
896     ddp_tcnv_rec.pvn_id := rosetta_g_miss_num_map(p5_a7);
897     ddp_tcnv_rec.pdt_id := rosetta_g_miss_num_map(p5_a8);
898     ddp_tcnv_rec.qte_id := rosetta_g_miss_num_map(p5_a9);
899     ddp_tcnv_rec.aes_id := rosetta_g_miss_num_map(p5_a10);
900     ddp_tcnv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a11);
901     ddp_tcnv_rec.tax_deductible_local := p5_a12;
902     ddp_tcnv_rec.tax_deductible_corporate := p5_a13;
903     ddp_tcnv_rec.date_accrual := rosetta_g_miss_date_in_map(p5_a14);
904     ddp_tcnv_rec.accrual_status_yn := p5_a15;
905     ddp_tcnv_rec.update_status_yn := p5_a16;
906     ddp_tcnv_rec.amount := rosetta_g_miss_num_map(p5_a17);
907     ddp_tcnv_rec.currency_code := p5_a18;
908     ddp_tcnv_rec.attribute_category := p5_a19;
909     ddp_tcnv_rec.attribute1 := p5_a20;
910     ddp_tcnv_rec.attribute2 := p5_a21;
911     ddp_tcnv_rec.attribute3 := p5_a22;
912     ddp_tcnv_rec.attribute4 := p5_a23;
913     ddp_tcnv_rec.attribute5 := p5_a24;
914     ddp_tcnv_rec.attribute6 := p5_a25;
915     ddp_tcnv_rec.attribute7 := p5_a26;
916     ddp_tcnv_rec.attribute8 := p5_a27;
917     ddp_tcnv_rec.attribute9 := p5_a28;
918     ddp_tcnv_rec.attribute10 := p5_a29;
919     ddp_tcnv_rec.attribute11 := p5_a30;
920     ddp_tcnv_rec.attribute12 := p5_a31;
921     ddp_tcnv_rec.attribute13 := p5_a32;
922     ddp_tcnv_rec.attribute14 := p5_a33;
923     ddp_tcnv_rec.attribute15 := p5_a34;
924     ddp_tcnv_rec.tcn_type := p5_a35;
925     ddp_tcnv_rec.rjn_code := p5_a36;
926     ddp_tcnv_rec.party_rel_id1_old := rosetta_g_miss_num_map(p5_a37);
927     ddp_tcnv_rec.party_rel_id2_old := p5_a38;
928     ddp_tcnv_rec.party_rel_id1_new := rosetta_g_miss_num_map(p5_a39);
929     ddp_tcnv_rec.party_rel_id2_new := p5_a40;
930     ddp_tcnv_rec.complete_transfer_yn := p5_a41;
931     ddp_tcnv_rec.org_id := rosetta_g_miss_num_map(p5_a42);
932     ddp_tcnv_rec.khr_id := rosetta_g_miss_num_map(p5_a43);
933     ddp_tcnv_rec.request_id := rosetta_g_miss_num_map(p5_a44);
934     ddp_tcnv_rec.program_application_id := rosetta_g_miss_num_map(p5_a45);
935     ddp_tcnv_rec.khr_id_old := rosetta_g_miss_num_map(p5_a46);
936     ddp_tcnv_rec.program_id := rosetta_g_miss_num_map(p5_a47);
937     ddp_tcnv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a48);
938     ddp_tcnv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
939     ddp_tcnv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
940     ddp_tcnv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
941     ddp_tcnv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
942     ddp_tcnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
943     ddp_tcnv_rec.try_id := rosetta_g_miss_num_map(p5_a54);
944     ddp_tcnv_rec.tsu_code := p5_a55;
945     ddp_tcnv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a56);
946     ddp_tcnv_rec.description := p5_a57;
947     ddp_tcnv_rec.date_transaction_occurred := rosetta_g_miss_date_in_map(p5_a58);
948     ddp_tcnv_rec.trx_number := p5_a59;
949     ddp_tcnv_rec.tmt_evergreen_yn := p5_a60;
950     ddp_tcnv_rec.tmt_close_balances_yn := p5_a61;
951     ddp_tcnv_rec.tmt_accounting_entries_yn := p5_a62;
952     ddp_tcnv_rec.tmt_cancel_insurance_yn := p5_a63;
953     ddp_tcnv_rec.tmt_asset_disposition_yn := p5_a64;
954     ddp_tcnv_rec.tmt_amortization_yn := p5_a65;
955     ddp_tcnv_rec.tmt_asset_return_yn := p5_a66;
956     ddp_tcnv_rec.tmt_contract_updated_yn := p5_a67;
957     ddp_tcnv_rec.tmt_recycle_yn := p5_a68;
958     ddp_tcnv_rec.tmt_validated_yn := p5_a69;
959     ddp_tcnv_rec.tmt_streams_updated_yn := p5_a70;
960     ddp_tcnv_rec.accrual_activity := p5_a71;
961     ddp_tcnv_rec.tmt_split_asset_yn := p5_a72;
962     ddp_tcnv_rec.tmt_generic_flag1_yn := p5_a73;
963     ddp_tcnv_rec.tmt_generic_flag2_yn := p5_a74;
964     ddp_tcnv_rec.tmt_generic_flag3_yn := p5_a75;
965     ddp_tcnv_rec.currency_conversion_type := p5_a76;
966     ddp_tcnv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a77);
967     ddp_tcnv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a78);
968     ddp_tcnv_rec.chr_id := rosetta_g_miss_num_map(p5_a79);
969     ddp_tcnv_rec.source_trx_id := rosetta_g_miss_num_map(p5_a80);
970     ddp_tcnv_rec.source_trx_type := p5_a81;
971     ddp_tcnv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a82);
972     ddp_tcnv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a83);
973     ddp_tcnv_rec.accrual_reversal_date := rosetta_g_miss_date_in_map(p5_a84);
974     ddp_tcnv_rec.accounting_reversal_yn := p5_a85;
975     ddp_tcnv_rec.product_name := p5_a86;
976     ddp_tcnv_rec.book_classification_code := p5_a87;
977     ddp_tcnv_rec.tax_owner_code := p5_a88;
978     ddp_tcnv_rec.tmt_status_code := p5_a89;
979     ddp_tcnv_rec.representation_name := p5_a90;
980     ddp_tcnv_rec.representation_code := p5_a91;
981     ddp_tcnv_rec.upgrade_status_flag := p5_a92;
982     ddp_tcnv_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a93);
983 
984 
985     -- here's the delegated call to the old PL/SQL routine
986     okl_trans_contracts_pvt.create_trx_contracts(p_api_version,
987       p_init_msg_list,
988       x_return_status,
989       x_msg_count,
990       x_msg_data,
991       ddp_tcnv_rec,
992       ddx_tcnv_rec);
993 
994     -- copy data back from the local variables to OUT or IN-OUT args, if any
995 
996 
997 
998 
999 
1000 
1001     p6_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
1002     p6_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
1003     p6_a2 := ddx_tcnv_rec.rbr_code;
1004     p6_a3 := ddx_tcnv_rec.rpy_code;
1005     p6_a4 := ddx_tcnv_rec.rvn_code;
1006     p6_a5 := ddx_tcnv_rec.trn_code;
1007     p6_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
1008     p6_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
1009     p6_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
1010     p6_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
1011     p6_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
1012     p6_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
1013     p6_a12 := ddx_tcnv_rec.tax_deductible_local;
1014     p6_a13 := ddx_tcnv_rec.tax_deductible_corporate;
1015     p6_a14 := ddx_tcnv_rec.date_accrual;
1016     p6_a15 := ddx_tcnv_rec.accrual_status_yn;
1017     p6_a16 := ddx_tcnv_rec.update_status_yn;
1018     p6_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
1019     p6_a18 := ddx_tcnv_rec.currency_code;
1020     p6_a19 := ddx_tcnv_rec.attribute_category;
1021     p6_a20 := ddx_tcnv_rec.attribute1;
1022     p6_a21 := ddx_tcnv_rec.attribute2;
1023     p6_a22 := ddx_tcnv_rec.attribute3;
1024     p6_a23 := ddx_tcnv_rec.attribute4;
1025     p6_a24 := ddx_tcnv_rec.attribute5;
1026     p6_a25 := ddx_tcnv_rec.attribute6;
1027     p6_a26 := ddx_tcnv_rec.attribute7;
1028     p6_a27 := ddx_tcnv_rec.attribute8;
1029     p6_a28 := ddx_tcnv_rec.attribute9;
1030     p6_a29 := ddx_tcnv_rec.attribute10;
1031     p6_a30 := ddx_tcnv_rec.attribute11;
1032     p6_a31 := ddx_tcnv_rec.attribute12;
1033     p6_a32 := ddx_tcnv_rec.attribute13;
1034     p6_a33 := ddx_tcnv_rec.attribute14;
1035     p6_a34 := ddx_tcnv_rec.attribute15;
1036     p6_a35 := ddx_tcnv_rec.tcn_type;
1037     p6_a36 := ddx_tcnv_rec.rjn_code;
1038     p6_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
1039     p6_a38 := ddx_tcnv_rec.party_rel_id2_old;
1040     p6_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
1041     p6_a40 := ddx_tcnv_rec.party_rel_id2_new;
1042     p6_a41 := ddx_tcnv_rec.complete_transfer_yn;
1043     p6_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
1044     p6_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
1045     p6_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
1046     p6_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
1047     p6_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
1048     p6_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
1049     p6_a48 := ddx_tcnv_rec.program_update_date;
1050     p6_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
1051     p6_a50 := ddx_tcnv_rec.creation_date;
1052     p6_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
1053     p6_a52 := ddx_tcnv_rec.last_update_date;
1054     p6_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
1055     p6_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
1056     p6_a55 := ddx_tcnv_rec.tsu_code;
1057     p6_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
1058     p6_a57 := ddx_tcnv_rec.description;
1059     p6_a58 := ddx_tcnv_rec.date_transaction_occurred;
1060     p6_a59 := ddx_tcnv_rec.trx_number;
1061     p6_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
1062     p6_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
1063     p6_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
1064     p6_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
1065     p6_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
1066     p6_a65 := ddx_tcnv_rec.tmt_amortization_yn;
1067     p6_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
1068     p6_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
1069     p6_a68 := ddx_tcnv_rec.tmt_recycle_yn;
1070     p6_a69 := ddx_tcnv_rec.tmt_validated_yn;
1071     p6_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
1072     p6_a71 := ddx_tcnv_rec.accrual_activity;
1073     p6_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
1074     p6_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
1075     p6_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
1076     p6_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
1077     p6_a76 := ddx_tcnv_rec.currency_conversion_type;
1078     p6_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
1079     p6_a78 := ddx_tcnv_rec.currency_conversion_date;
1080     p6_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
1081     p6_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
1082     p6_a81 := ddx_tcnv_rec.source_trx_type;
1083     p6_a82 := ddx_tcnv_rec.canceled_date;
1084     p6_a83 := rosetta_g_miss_num_map(ddx_tcnv_rec.legal_entity_id);
1085     p6_a84 := ddx_tcnv_rec.accrual_reversal_date;
1086     p6_a85 := ddx_tcnv_rec.accounting_reversal_yn;
1087     p6_a86 := ddx_tcnv_rec.product_name;
1088     p6_a87 := ddx_tcnv_rec.book_classification_code;
1089     p6_a88 := ddx_tcnv_rec.tax_owner_code;
1090     p6_a89 := ddx_tcnv_rec.tmt_status_code;
1091     p6_a90 := ddx_tcnv_rec.representation_name;
1092     p6_a91 := ddx_tcnv_rec.representation_code;
1093     p6_a92 := ddx_tcnv_rec.upgrade_status_flag;
1094     p6_a93 := ddx_tcnv_rec.transaction_date;
1095   end;
1096 
1097   procedure create_trx_contracts(p_api_version  NUMBER
1098     , p_init_msg_list  VARCHAR2
1099     , x_return_status out nocopy  VARCHAR2
1100     , x_msg_count out nocopy  NUMBER
1101     , x_msg_data out nocopy  VARCHAR2
1102     , p5_a0 JTF_NUMBER_TABLE
1103     , p5_a1 JTF_NUMBER_TABLE
1104     , p5_a2 JTF_VARCHAR2_TABLE_100
1105     , p5_a3 JTF_VARCHAR2_TABLE_100
1106     , p5_a4 JTF_VARCHAR2_TABLE_100
1107     , p5_a5 JTF_VARCHAR2_TABLE_100
1108     , p5_a6 JTF_NUMBER_TABLE
1109     , p5_a7 JTF_NUMBER_TABLE
1110     , p5_a8 JTF_NUMBER_TABLE
1111     , p5_a9 JTF_NUMBER_TABLE
1112     , p5_a10 JTF_NUMBER_TABLE
1113     , p5_a11 JTF_NUMBER_TABLE
1114     , p5_a12 JTF_VARCHAR2_TABLE_100
1115     , p5_a13 JTF_VARCHAR2_TABLE_100
1116     , p5_a14 JTF_DATE_TABLE
1117     , p5_a15 JTF_VARCHAR2_TABLE_100
1118     , p5_a16 JTF_VARCHAR2_TABLE_100
1119     , p5_a17 JTF_NUMBER_TABLE
1120     , p5_a18 JTF_VARCHAR2_TABLE_200
1121     , p5_a19 JTF_VARCHAR2_TABLE_100
1122     , p5_a20 JTF_VARCHAR2_TABLE_500
1123     , p5_a21 JTF_VARCHAR2_TABLE_500
1124     , p5_a22 JTF_VARCHAR2_TABLE_500
1125     , p5_a23 JTF_VARCHAR2_TABLE_500
1126     , p5_a24 JTF_VARCHAR2_TABLE_500
1127     , p5_a25 JTF_VARCHAR2_TABLE_500
1128     , p5_a26 JTF_VARCHAR2_TABLE_500
1129     , p5_a27 JTF_VARCHAR2_TABLE_500
1130     , p5_a28 JTF_VARCHAR2_TABLE_500
1131     , p5_a29 JTF_VARCHAR2_TABLE_500
1132     , p5_a30 JTF_VARCHAR2_TABLE_500
1133     , p5_a31 JTF_VARCHAR2_TABLE_500
1134     , p5_a32 JTF_VARCHAR2_TABLE_500
1135     , p5_a33 JTF_VARCHAR2_TABLE_500
1136     , p5_a34 JTF_VARCHAR2_TABLE_500
1137     , p5_a35 JTF_VARCHAR2_TABLE_100
1138     , p5_a36 JTF_VARCHAR2_TABLE_100
1139     , p5_a37 JTF_NUMBER_TABLE
1140     , p5_a38 JTF_VARCHAR2_TABLE_100
1141     , p5_a39 JTF_NUMBER_TABLE
1142     , p5_a40 JTF_VARCHAR2_TABLE_100
1143     , p5_a41 JTF_VARCHAR2_TABLE_100
1144     , p5_a42 JTF_NUMBER_TABLE
1145     , p5_a43 JTF_NUMBER_TABLE
1146     , p5_a44 JTF_NUMBER_TABLE
1147     , p5_a45 JTF_NUMBER_TABLE
1148     , p5_a46 JTF_NUMBER_TABLE
1149     , p5_a47 JTF_NUMBER_TABLE
1150     , p5_a48 JTF_DATE_TABLE
1151     , p5_a49 JTF_NUMBER_TABLE
1152     , p5_a50 JTF_DATE_TABLE
1153     , p5_a51 JTF_NUMBER_TABLE
1154     , p5_a52 JTF_DATE_TABLE
1155     , p5_a53 JTF_NUMBER_TABLE
1156     , p5_a54 JTF_NUMBER_TABLE
1157     , p5_a55 JTF_VARCHAR2_TABLE_100
1158     , p5_a56 JTF_NUMBER_TABLE
1159     , p5_a57 JTF_VARCHAR2_TABLE_2000
1160     , p5_a58 JTF_DATE_TABLE
1161     , p5_a59 JTF_VARCHAR2_TABLE_100
1162     , p5_a60 JTF_VARCHAR2_TABLE_100
1163     , p5_a61 JTF_VARCHAR2_TABLE_100
1164     , p5_a62 JTF_VARCHAR2_TABLE_100
1165     , p5_a63 JTF_VARCHAR2_TABLE_100
1166     , p5_a64 JTF_VARCHAR2_TABLE_100
1167     , p5_a65 JTF_VARCHAR2_TABLE_100
1168     , p5_a66 JTF_VARCHAR2_TABLE_100
1169     , p5_a67 JTF_VARCHAR2_TABLE_100
1170     , p5_a68 JTF_VARCHAR2_TABLE_100
1171     , p5_a69 JTF_VARCHAR2_TABLE_100
1172     , p5_a70 JTF_VARCHAR2_TABLE_100
1173     , p5_a71 JTF_VARCHAR2_TABLE_100
1174     , p5_a72 JTF_VARCHAR2_TABLE_100
1175     , p5_a73 JTF_VARCHAR2_TABLE_100
1176     , p5_a74 JTF_VARCHAR2_TABLE_100
1177     , p5_a75 JTF_VARCHAR2_TABLE_100
1178     , p5_a76 JTF_VARCHAR2_TABLE_100
1179     , p5_a77 JTF_NUMBER_TABLE
1180     , p5_a78 JTF_DATE_TABLE
1181     , p5_a79 JTF_NUMBER_TABLE
1182     , p5_a80 JTF_NUMBER_TABLE
1183     , p5_a81 JTF_VARCHAR2_TABLE_100
1184     , p5_a82 JTF_DATE_TABLE
1185     , p5_a83 JTF_NUMBER_TABLE
1186     , p5_a84 JTF_DATE_TABLE
1187     , p5_a85 JTF_VARCHAR2_TABLE_100
1188     , p5_a86 JTF_VARCHAR2_TABLE_200
1189     , p5_a87 JTF_VARCHAR2_TABLE_100
1190     , p5_a88 JTF_VARCHAR2_TABLE_200
1191     , p5_a89 JTF_VARCHAR2_TABLE_100
1192     , p5_a90 JTF_VARCHAR2_TABLE_100
1193     , p5_a91 JTF_VARCHAR2_TABLE_100
1194     , p5_a92 JTF_VARCHAR2_TABLE_100
1195     , p5_a93 JTF_DATE_TABLE
1196     , p6_a0 out nocopy JTF_NUMBER_TABLE
1197     , p6_a1 out nocopy JTF_NUMBER_TABLE
1198     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1199     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1200     , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
1201     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
1202     , p6_a6 out nocopy JTF_NUMBER_TABLE
1203     , p6_a7 out nocopy JTF_NUMBER_TABLE
1204     , p6_a8 out nocopy JTF_NUMBER_TABLE
1205     , p6_a9 out nocopy JTF_NUMBER_TABLE
1206     , p6_a10 out nocopy JTF_NUMBER_TABLE
1207     , p6_a11 out nocopy JTF_NUMBER_TABLE
1208     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
1209     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1210     , p6_a14 out nocopy JTF_DATE_TABLE
1211     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
1212     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_100
1213     , p6_a17 out nocopy JTF_NUMBER_TABLE
1214     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_200
1215     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_100
1216     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1217     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1218     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
1219     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
1220     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
1221     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
1222     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
1223     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
1224     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
1225     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
1226     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
1227     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
1228     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
1229     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
1230     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
1231     , p6_a35 out nocopy JTF_VARCHAR2_TABLE_100
1232     , p6_a36 out nocopy JTF_VARCHAR2_TABLE_100
1233     , p6_a37 out nocopy JTF_NUMBER_TABLE
1234     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
1235     , p6_a39 out nocopy JTF_NUMBER_TABLE
1236     , p6_a40 out nocopy JTF_VARCHAR2_TABLE_100
1237     , p6_a41 out nocopy JTF_VARCHAR2_TABLE_100
1238     , p6_a42 out nocopy JTF_NUMBER_TABLE
1239     , p6_a43 out nocopy JTF_NUMBER_TABLE
1240     , p6_a44 out nocopy JTF_NUMBER_TABLE
1241     , p6_a45 out nocopy JTF_NUMBER_TABLE
1242     , p6_a46 out nocopy JTF_NUMBER_TABLE
1243     , p6_a47 out nocopy JTF_NUMBER_TABLE
1244     , p6_a48 out nocopy JTF_DATE_TABLE
1245     , p6_a49 out nocopy JTF_NUMBER_TABLE
1246     , p6_a50 out nocopy JTF_DATE_TABLE
1247     , p6_a51 out nocopy JTF_NUMBER_TABLE
1248     , p6_a52 out nocopy JTF_DATE_TABLE
1249     , p6_a53 out nocopy JTF_NUMBER_TABLE
1250     , p6_a54 out nocopy JTF_NUMBER_TABLE
1251     , p6_a55 out nocopy JTF_VARCHAR2_TABLE_100
1252     , p6_a56 out nocopy JTF_NUMBER_TABLE
1253     , p6_a57 out nocopy JTF_VARCHAR2_TABLE_2000
1254     , p6_a58 out nocopy JTF_DATE_TABLE
1255     , p6_a59 out nocopy JTF_VARCHAR2_TABLE_100
1256     , p6_a60 out nocopy JTF_VARCHAR2_TABLE_100
1257     , p6_a61 out nocopy JTF_VARCHAR2_TABLE_100
1258     , p6_a62 out nocopy JTF_VARCHAR2_TABLE_100
1259     , p6_a63 out nocopy JTF_VARCHAR2_TABLE_100
1260     , p6_a64 out nocopy JTF_VARCHAR2_TABLE_100
1261     , p6_a65 out nocopy JTF_VARCHAR2_TABLE_100
1262     , p6_a66 out nocopy JTF_VARCHAR2_TABLE_100
1263     , p6_a67 out nocopy JTF_VARCHAR2_TABLE_100
1264     , p6_a68 out nocopy JTF_VARCHAR2_TABLE_100
1265     , p6_a69 out nocopy JTF_VARCHAR2_TABLE_100
1266     , p6_a70 out nocopy JTF_VARCHAR2_TABLE_100
1267     , p6_a71 out nocopy JTF_VARCHAR2_TABLE_100
1268     , p6_a72 out nocopy JTF_VARCHAR2_TABLE_100
1269     , p6_a73 out nocopy JTF_VARCHAR2_TABLE_100
1270     , p6_a74 out nocopy JTF_VARCHAR2_TABLE_100
1271     , p6_a75 out nocopy JTF_VARCHAR2_TABLE_100
1272     , p6_a76 out nocopy JTF_VARCHAR2_TABLE_100
1273     , p6_a77 out nocopy JTF_NUMBER_TABLE
1274     , p6_a78 out nocopy JTF_DATE_TABLE
1275     , p6_a79 out nocopy JTF_NUMBER_TABLE
1276     , p6_a80 out nocopy JTF_NUMBER_TABLE
1277     , p6_a81 out nocopy JTF_VARCHAR2_TABLE_100
1278     , p6_a82 out nocopy JTF_DATE_TABLE
1279     , p6_a83 out nocopy JTF_NUMBER_TABLE
1280     , p6_a84 out nocopy JTF_DATE_TABLE
1281     , p6_a85 out nocopy JTF_VARCHAR2_TABLE_100
1282     , p6_a86 out nocopy JTF_VARCHAR2_TABLE_200
1283     , p6_a87 out nocopy JTF_VARCHAR2_TABLE_100
1284     , p6_a88 out nocopy JTF_VARCHAR2_TABLE_200
1285     , p6_a89 out nocopy JTF_VARCHAR2_TABLE_100
1286     , p6_a90 out nocopy JTF_VARCHAR2_TABLE_100
1287     , p6_a91 out nocopy JTF_VARCHAR2_TABLE_100
1288     , p6_a92 out nocopy JTF_VARCHAR2_TABLE_100
1289     , p6_a93 out nocopy JTF_DATE_TABLE
1290   )
1291 
1292   as
1293     ddp_tcnv_tbl okl_trans_contracts_pvt.tcnv_tbl_type;
1294     ddx_tcnv_tbl okl_trans_contracts_pvt.tcnv_tbl_type;
1295     ddindx binary_integer; indx binary_integer;
1296   begin
1297 
1298     -- copy data to the local IN or IN-OUT args, if any
1299 
1300 
1301 
1302 
1303 
1304     okl_tcn_pvt_w.rosetta_table_copy_in_p5(ddp_tcnv_tbl, p5_a0
1305       , p5_a1
1306       , p5_a2
1307       , p5_a3
1308       , p5_a4
1309       , p5_a5
1310       , p5_a6
1311       , p5_a7
1312       , p5_a8
1313       , p5_a9
1314       , p5_a10
1315       , p5_a11
1316       , p5_a12
1317       , p5_a13
1318       , p5_a14
1319       , p5_a15
1320       , p5_a16
1321       , p5_a17
1322       , p5_a18
1323       , p5_a19
1324       , p5_a20
1325       , p5_a21
1326       , p5_a22
1327       , p5_a23
1328       , p5_a24
1329       , p5_a25
1330       , p5_a26
1331       , p5_a27
1332       , p5_a28
1333       , p5_a29
1334       , p5_a30
1335       , p5_a31
1336       , p5_a32
1337       , p5_a33
1338       , p5_a34
1339       , p5_a35
1340       , p5_a36
1341       , p5_a37
1342       , p5_a38
1343       , p5_a39
1344       , p5_a40
1345       , p5_a41
1346       , p5_a42
1347       , p5_a43
1348       , p5_a44
1349       , p5_a45
1350       , p5_a46
1351       , p5_a47
1352       , p5_a48
1353       , p5_a49
1354       , p5_a50
1355       , p5_a51
1356       , p5_a52
1357       , p5_a53
1358       , p5_a54
1359       , p5_a55
1360       , p5_a56
1361       , p5_a57
1362       , p5_a58
1363       , p5_a59
1364       , p5_a60
1365       , p5_a61
1366       , p5_a62
1367       , p5_a63
1368       , p5_a64
1369       , p5_a65
1370       , p5_a66
1371       , p5_a67
1372       , p5_a68
1373       , p5_a69
1374       , p5_a70
1375       , p5_a71
1376       , p5_a72
1377       , p5_a73
1378       , p5_a74
1379       , p5_a75
1380       , p5_a76
1381       , p5_a77
1382       , p5_a78
1383       , p5_a79
1384       , p5_a80
1385       , p5_a81
1386       , p5_a82
1387       , p5_a83
1388       , p5_a84
1389       , p5_a85
1390       , p5_a86
1391       , p5_a87
1392       , p5_a88
1393       , p5_a89
1394       , p5_a90
1395       , p5_a91
1396       , p5_a92
1397       , p5_a93
1398       );
1399 
1400 
1401     -- here's the delegated call to the old PL/SQL routine
1402     okl_trans_contracts_pvt.create_trx_contracts(p_api_version,
1403       p_init_msg_list,
1404       x_return_status,
1405       x_msg_count,
1406       x_msg_data,
1407       ddp_tcnv_tbl,
1408       ddx_tcnv_tbl);
1409 
1410     -- copy data back from the local variables to OUT or IN-OUT args, if any
1411 
1412 
1413 
1414 
1415 
1416 
1417     okl_tcn_pvt_w.rosetta_table_copy_out_p5(ddx_tcnv_tbl, p6_a0
1418       , p6_a1
1419       , p6_a2
1420       , p6_a3
1421       , p6_a4
1422       , p6_a5
1423       , p6_a6
1424       , p6_a7
1425       , p6_a8
1426       , p6_a9
1427       , p6_a10
1428       , p6_a11
1429       , p6_a12
1430       , p6_a13
1431       , p6_a14
1432       , p6_a15
1433       , p6_a16
1434       , p6_a17
1435       , p6_a18
1436       , p6_a19
1437       , p6_a20
1438       , p6_a21
1439       , p6_a22
1440       , p6_a23
1441       , p6_a24
1442       , p6_a25
1443       , p6_a26
1444       , p6_a27
1445       , p6_a28
1446       , p6_a29
1447       , p6_a30
1448       , p6_a31
1449       , p6_a32
1450       , p6_a33
1451       , p6_a34
1452       , p6_a35
1453       , p6_a36
1454       , p6_a37
1455       , p6_a38
1456       , p6_a39
1457       , p6_a40
1458       , p6_a41
1459       , p6_a42
1460       , p6_a43
1461       , p6_a44
1462       , p6_a45
1463       , p6_a46
1464       , p6_a47
1465       , p6_a48
1466       , p6_a49
1467       , p6_a50
1468       , p6_a51
1469       , p6_a52
1470       , p6_a53
1471       , p6_a54
1472       , p6_a55
1473       , p6_a56
1474       , p6_a57
1475       , p6_a58
1476       , p6_a59
1477       , p6_a60
1478       , p6_a61
1479       , p6_a62
1480       , p6_a63
1481       , p6_a64
1482       , p6_a65
1483       , p6_a66
1484       , p6_a67
1485       , p6_a68
1486       , p6_a69
1487       , p6_a70
1488       , p6_a71
1489       , p6_a72
1490       , p6_a73
1491       , p6_a74
1492       , p6_a75
1493       , p6_a76
1494       , p6_a77
1495       , p6_a78
1496       , p6_a79
1497       , p6_a80
1498       , p6_a81
1499       , p6_a82
1500       , p6_a83
1501       , p6_a84
1502       , p6_a85
1503       , p6_a86
1504       , p6_a87
1505       , p6_a88
1506       , p6_a89
1507       , p6_a90
1508       , p6_a91
1509       , p6_a92
1510       , p6_a93
1511       );
1512   end;
1513 
1514   procedure create_trx_cntrct_lines(p_api_version  NUMBER
1515     , p_init_msg_list  VARCHAR2
1516     , x_return_status out nocopy  VARCHAR2
1517     , x_msg_count out nocopy  NUMBER
1518     , x_msg_data out nocopy  VARCHAR2
1519     , p6_a0 out nocopy  NUMBER
1520     , p6_a1 out nocopy  NUMBER
1521     , p6_a2 out nocopy  NUMBER
1522     , p6_a3 out nocopy  NUMBER
1523     , p6_a4 out nocopy  NUMBER
1524     , p6_a5 out nocopy  NUMBER
1525     , p6_a6 out nocopy  NUMBER
1526     , p6_a7 out nocopy  NUMBER
1527     , p6_a8 out nocopy  VARCHAR2
1528     , p6_a9 out nocopy  NUMBER
1529     , p6_a10 out nocopy  VARCHAR2
1530     , p6_a11 out nocopy  NUMBER
1531     , p6_a12 out nocopy  VARCHAR2
1532     , p6_a13 out nocopy  VARCHAR2
1533     , p6_a14 out nocopy  VARCHAR2
1534     , p6_a15 out nocopy  VARCHAR2
1535     , p6_a16 out nocopy  VARCHAR2
1536     , p6_a17 out nocopy  VARCHAR2
1537     , p6_a18 out nocopy  VARCHAR2
1538     , p6_a19 out nocopy  VARCHAR2
1539     , p6_a20 out nocopy  VARCHAR2
1540     , p6_a21 out nocopy  VARCHAR2
1541     , p6_a22 out nocopy  VARCHAR2
1542     , p6_a23 out nocopy  VARCHAR2
1543     , p6_a24 out nocopy  VARCHAR2
1544     , p6_a25 out nocopy  VARCHAR2
1545     , p6_a26 out nocopy  VARCHAR2
1546     , p6_a27 out nocopy  VARCHAR2
1547     , p6_a28 out nocopy  VARCHAR2
1548     , p6_a29 out nocopy  VARCHAR2
1549     , p6_a30 out nocopy  VARCHAR2
1550     , p6_a31 out nocopy  NUMBER
1551     , p6_a32 out nocopy  DATE
1552     , p6_a33 out nocopy  NUMBER
1553     , p6_a34 out nocopy  DATE
1554     , p6_a35 out nocopy  NUMBER
1555     , p6_a36 out nocopy  NUMBER
1556     , p6_a37 out nocopy  NUMBER
1557     , p6_a38 out nocopy  NUMBER
1558     , p6_a39 out nocopy  DATE
1559     , p6_a40 out nocopy  NUMBER
1560     , p6_a41 out nocopy  NUMBER
1561     , p6_a42 out nocopy  NUMBER
1562     , p6_a43 out nocopy  NUMBER
1563     , p6_a44 out nocopy  NUMBER
1564     , p6_a45 out nocopy  VARCHAR2
1565     , p6_a46 out nocopy  VARCHAR2
1566     , p6_a47 out nocopy  NUMBER
1567     , p6_a48 out nocopy  VARCHAR2
1568     , p6_a49 out nocopy  NUMBER
1569     , p6_a50 out nocopy  VARCHAR2
1570     , p6_a51 out nocopy  NUMBER
1571     , p6_a52 out nocopy  DATE
1572     , p6_a53 out nocopy  NUMBER
1573     , p6_a54 out nocopy  VARCHAR2
1574     , p6_a55 out nocopy  VARCHAR2
1575     , p6_a56 out nocopy  VARCHAR2
1576     , p6_a57 out nocopy  VARCHAR2
1577     , p5_a0  NUMBER := 0-1962.0724
1578     , p5_a1  NUMBER := 0-1962.0724
1579     , p5_a2  NUMBER := 0-1962.0724
1580     , p5_a3  NUMBER := 0-1962.0724
1581     , p5_a4  NUMBER := 0-1962.0724
1582     , p5_a5  NUMBER := 0-1962.0724
1583     , p5_a6  NUMBER := 0-1962.0724
1584     , p5_a7  NUMBER := 0-1962.0724
1585     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
1586     , p5_a9  NUMBER := 0-1962.0724
1587     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
1588     , p5_a11  NUMBER := 0-1962.0724
1589     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
1590     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1591     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1592     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1593     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1594     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
1595     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
1596     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
1597     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
1598     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
1599     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
1600     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
1601     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
1602     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
1603     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
1604     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1605     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1606     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1607     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1608     , p5_a31  NUMBER := 0-1962.0724
1609     , p5_a32  DATE := fnd_api.g_miss_date
1610     , p5_a33  NUMBER := 0-1962.0724
1611     , p5_a34  DATE := fnd_api.g_miss_date
1612     , p5_a35  NUMBER := 0-1962.0724
1613     , p5_a36  NUMBER := 0-1962.0724
1614     , p5_a37  NUMBER := 0-1962.0724
1615     , p5_a38  NUMBER := 0-1962.0724
1616     , p5_a39  DATE := fnd_api.g_miss_date
1617     , p5_a40  NUMBER := 0-1962.0724
1618     , p5_a41  NUMBER := 0-1962.0724
1619     , p5_a42  NUMBER := 0-1962.0724
1620     , p5_a43  NUMBER := 0-1962.0724
1621     , p5_a44  NUMBER := 0-1962.0724
1622     , p5_a45  VARCHAR2 := fnd_api.g_miss_char
1623     , p5_a46  VARCHAR2 := fnd_api.g_miss_char
1624     , p5_a47  NUMBER := 0-1962.0724
1625     , p5_a48  VARCHAR2 := fnd_api.g_miss_char
1626     , p5_a49  NUMBER := 0-1962.0724
1627     , p5_a50  VARCHAR2 := fnd_api.g_miss_char
1628     , p5_a51  NUMBER := 0-1962.0724
1629     , p5_a52  DATE := fnd_api.g_miss_date
1630     , p5_a53  NUMBER := 0-1962.0724
1631     , p5_a54  VARCHAR2 := fnd_api.g_miss_char
1632     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
1633     , p5_a56  VARCHAR2 := fnd_api.g_miss_char
1634     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
1635   )
1636 
1637   as
1638     ddp_tclv_rec okl_trans_contracts_pvt.tclv_rec_type;
1639     ddx_tclv_rec okl_trans_contracts_pvt.tclv_rec_type;
1640     ddindx binary_integer; indx binary_integer;
1641   begin
1642 
1643     -- copy data to the local IN or IN-OUT args, if any
1644 
1645 
1646 
1647 
1648 
1649     ddp_tclv_rec.id := rosetta_g_miss_num_map(p5_a0);
1650     ddp_tclv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1651     ddp_tclv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
1652     ddp_tclv_rec.rct_id := rosetta_g_miss_num_map(p5_a3);
1653     ddp_tclv_rec.btc_id := rosetta_g_miss_num_map(p5_a4);
1654     ddp_tclv_rec.tcn_id := rosetta_g_miss_num_map(p5_a5);
1655     ddp_tclv_rec.khr_id := rosetta_g_miss_num_map(p5_a6);
1656     ddp_tclv_rec.kle_id := rosetta_g_miss_num_map(p5_a7);
1657     ddp_tclv_rec.before_transfer_yn := p5_a8;
1658     ddp_tclv_rec.line_number := rosetta_g_miss_num_map(p5_a9);
1659     ddp_tclv_rec.description := p5_a10;
1660     ddp_tclv_rec.amount := rosetta_g_miss_num_map(p5_a11);
1661     ddp_tclv_rec.currency_code := p5_a12;
1662     ddp_tclv_rec.gl_reversal_yn := p5_a13;
1663     ddp_tclv_rec.attribute_category := p5_a14;
1664     ddp_tclv_rec.attribute1 := p5_a15;
1665     ddp_tclv_rec.attribute2 := p5_a16;
1666     ddp_tclv_rec.attribute3 := p5_a17;
1667     ddp_tclv_rec.attribute4 := p5_a18;
1668     ddp_tclv_rec.attribute5 := p5_a19;
1669     ddp_tclv_rec.attribute6 := p5_a20;
1670     ddp_tclv_rec.attribute7 := p5_a21;
1671     ddp_tclv_rec.attribute8 := p5_a22;
1672     ddp_tclv_rec.attribute9 := p5_a23;
1673     ddp_tclv_rec.attribute10 := p5_a24;
1674     ddp_tclv_rec.attribute11 := p5_a25;
1675     ddp_tclv_rec.attribute12 := p5_a26;
1676     ddp_tclv_rec.attribute13 := p5_a27;
1677     ddp_tclv_rec.attribute14 := p5_a28;
1678     ddp_tclv_rec.attribute15 := p5_a29;
1679     ddp_tclv_rec.tcl_type := p5_a30;
1680     ddp_tclv_rec.created_by := rosetta_g_miss_num_map(p5_a31);
1681     ddp_tclv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a32);
1682     ddp_tclv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a33);
1683     ddp_tclv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a34);
1684     ddp_tclv_rec.org_id := rosetta_g_miss_num_map(p5_a35);
1685     ddp_tclv_rec.program_id := rosetta_g_miss_num_map(p5_a36);
1686     ddp_tclv_rec.program_application_id := rosetta_g_miss_num_map(p5_a37);
1687     ddp_tclv_rec.request_id := rosetta_g_miss_num_map(p5_a38);
1688     ddp_tclv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a39);
1689     ddp_tclv_rec.last_update_login := rosetta_g_miss_num_map(p5_a40);
1690     ddp_tclv_rec.avl_id := rosetta_g_miss_num_map(p5_a41);
1691     ddp_tclv_rec.bkt_id := rosetta_g_miss_num_map(p5_a42);
1692     ddp_tclv_rec.kle_id_new := rosetta_g_miss_num_map(p5_a43);
1693     ddp_tclv_rec.percentage := rosetta_g_miss_num_map(p5_a44);
1694     ddp_tclv_rec.accrual_rule_yn := p5_a45;
1695     ddp_tclv_rec.source_column_1 := p5_a46;
1696     ddp_tclv_rec.source_value_1 := rosetta_g_miss_num_map(p5_a47);
1697     ddp_tclv_rec.source_column_2 := p5_a48;
1698     ddp_tclv_rec.source_value_2 := rosetta_g_miss_num_map(p5_a49);
1699     ddp_tclv_rec.source_column_3 := p5_a50;
1700     ddp_tclv_rec.source_value_3 := rosetta_g_miss_num_map(p5_a51);
1701     ddp_tclv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a52);
1702     ddp_tclv_rec.tax_line_id := rosetta_g_miss_num_map(p5_a53);
1703     ddp_tclv_rec.stream_type_code := p5_a54;
1704     ddp_tclv_rec.stream_type_purpose := p5_a55;
1705     ddp_tclv_rec.asset_book_type_name := p5_a56;
1706     ddp_tclv_rec.upgrade_status_flag := p5_a57;
1707 
1708 
1709     -- here's the delegated call to the old PL/SQL routine
1710     okl_trans_contracts_pvt.create_trx_cntrct_lines(p_api_version,
1711       p_init_msg_list,
1712       x_return_status,
1713       x_msg_count,
1714       x_msg_data,
1715       ddp_tclv_rec,
1716       ddx_tclv_rec);
1717 
1718     -- copy data back from the local variables to OUT or IN-OUT args, if any
1719 
1720 
1721 
1722 
1723 
1724 
1725     p6_a0 := rosetta_g_miss_num_map(ddx_tclv_rec.id);
1726     p6_a1 := rosetta_g_miss_num_map(ddx_tclv_rec.object_version_number);
1727     p6_a2 := rosetta_g_miss_num_map(ddx_tclv_rec.sty_id);
1728     p6_a3 := rosetta_g_miss_num_map(ddx_tclv_rec.rct_id);
1729     p6_a4 := rosetta_g_miss_num_map(ddx_tclv_rec.btc_id);
1730     p6_a5 := rosetta_g_miss_num_map(ddx_tclv_rec.tcn_id);
1731     p6_a6 := rosetta_g_miss_num_map(ddx_tclv_rec.khr_id);
1732     p6_a7 := rosetta_g_miss_num_map(ddx_tclv_rec.kle_id);
1733     p6_a8 := ddx_tclv_rec.before_transfer_yn;
1734     p6_a9 := rosetta_g_miss_num_map(ddx_tclv_rec.line_number);
1735     p6_a10 := ddx_tclv_rec.description;
1736     p6_a11 := rosetta_g_miss_num_map(ddx_tclv_rec.amount);
1737     p6_a12 := ddx_tclv_rec.currency_code;
1738     p6_a13 := ddx_tclv_rec.gl_reversal_yn;
1739     p6_a14 := ddx_tclv_rec.attribute_category;
1740     p6_a15 := ddx_tclv_rec.attribute1;
1741     p6_a16 := ddx_tclv_rec.attribute2;
1742     p6_a17 := ddx_tclv_rec.attribute3;
1743     p6_a18 := ddx_tclv_rec.attribute4;
1744     p6_a19 := ddx_tclv_rec.attribute5;
1745     p6_a20 := ddx_tclv_rec.attribute6;
1746     p6_a21 := ddx_tclv_rec.attribute7;
1747     p6_a22 := ddx_tclv_rec.attribute8;
1748     p6_a23 := ddx_tclv_rec.attribute9;
1749     p6_a24 := ddx_tclv_rec.attribute10;
1750     p6_a25 := ddx_tclv_rec.attribute11;
1751     p6_a26 := ddx_tclv_rec.attribute12;
1752     p6_a27 := ddx_tclv_rec.attribute13;
1753     p6_a28 := ddx_tclv_rec.attribute14;
1754     p6_a29 := ddx_tclv_rec.attribute15;
1755     p6_a30 := ddx_tclv_rec.tcl_type;
1756     p6_a31 := rosetta_g_miss_num_map(ddx_tclv_rec.created_by);
1757     p6_a32 := ddx_tclv_rec.creation_date;
1758     p6_a33 := rosetta_g_miss_num_map(ddx_tclv_rec.last_updated_by);
1759     p6_a34 := ddx_tclv_rec.last_update_date;
1760     p6_a35 := rosetta_g_miss_num_map(ddx_tclv_rec.org_id);
1761     p6_a36 := rosetta_g_miss_num_map(ddx_tclv_rec.program_id);
1762     p6_a37 := rosetta_g_miss_num_map(ddx_tclv_rec.program_application_id);
1763     p6_a38 := rosetta_g_miss_num_map(ddx_tclv_rec.request_id);
1764     p6_a39 := ddx_tclv_rec.program_update_date;
1765     p6_a40 := rosetta_g_miss_num_map(ddx_tclv_rec.last_update_login);
1766     p6_a41 := rosetta_g_miss_num_map(ddx_tclv_rec.avl_id);
1767     p6_a42 := rosetta_g_miss_num_map(ddx_tclv_rec.bkt_id);
1768     p6_a43 := rosetta_g_miss_num_map(ddx_tclv_rec.kle_id_new);
1769     p6_a44 := rosetta_g_miss_num_map(ddx_tclv_rec.percentage);
1770     p6_a45 := ddx_tclv_rec.accrual_rule_yn;
1771     p6_a46 := ddx_tclv_rec.source_column_1;
1772     p6_a47 := rosetta_g_miss_num_map(ddx_tclv_rec.source_value_1);
1773     p6_a48 := ddx_tclv_rec.source_column_2;
1774     p6_a49 := rosetta_g_miss_num_map(ddx_tclv_rec.source_value_2);
1775     p6_a50 := ddx_tclv_rec.source_column_3;
1776     p6_a51 := rosetta_g_miss_num_map(ddx_tclv_rec.source_value_3);
1777     p6_a52 := ddx_tclv_rec.canceled_date;
1778     p6_a53 := rosetta_g_miss_num_map(ddx_tclv_rec.tax_line_id);
1779     p6_a54 := ddx_tclv_rec.stream_type_code;
1780     p6_a55 := ddx_tclv_rec.stream_type_purpose;
1781     p6_a56 := ddx_tclv_rec.asset_book_type_name;
1782     p6_a57 := ddx_tclv_rec.upgrade_status_flag;
1783   end;
1784 
1785   procedure create_trx_cntrct_lines(p_api_version  NUMBER
1786     , p_init_msg_list  VARCHAR2
1787     , x_return_status out nocopy  VARCHAR2
1788     , x_msg_count out nocopy  NUMBER
1789     , x_msg_data out nocopy  VARCHAR2
1790     , p5_a0 JTF_NUMBER_TABLE
1791     , p5_a1 JTF_NUMBER_TABLE
1792     , p5_a2 JTF_NUMBER_TABLE
1793     , p5_a3 JTF_NUMBER_TABLE
1794     , p5_a4 JTF_NUMBER_TABLE
1795     , p5_a5 JTF_NUMBER_TABLE
1796     , p5_a6 JTF_NUMBER_TABLE
1797     , p5_a7 JTF_NUMBER_TABLE
1798     , p5_a8 JTF_VARCHAR2_TABLE_100
1799     , p5_a9 JTF_NUMBER_TABLE
1800     , p5_a10 JTF_VARCHAR2_TABLE_2000
1801     , p5_a11 JTF_NUMBER_TABLE
1802     , p5_a12 JTF_VARCHAR2_TABLE_200
1803     , p5_a13 JTF_VARCHAR2_TABLE_100
1804     , p5_a14 JTF_VARCHAR2_TABLE_100
1805     , p5_a15 JTF_VARCHAR2_TABLE_500
1806     , p5_a16 JTF_VARCHAR2_TABLE_500
1807     , p5_a17 JTF_VARCHAR2_TABLE_500
1808     , p5_a18 JTF_VARCHAR2_TABLE_500
1809     , p5_a19 JTF_VARCHAR2_TABLE_500
1810     , p5_a20 JTF_VARCHAR2_TABLE_500
1811     , p5_a21 JTF_VARCHAR2_TABLE_500
1812     , p5_a22 JTF_VARCHAR2_TABLE_500
1813     , p5_a23 JTF_VARCHAR2_TABLE_500
1814     , p5_a24 JTF_VARCHAR2_TABLE_500
1815     , p5_a25 JTF_VARCHAR2_TABLE_500
1816     , p5_a26 JTF_VARCHAR2_TABLE_500
1817     , p5_a27 JTF_VARCHAR2_TABLE_500
1818     , p5_a28 JTF_VARCHAR2_TABLE_500
1819     , p5_a29 JTF_VARCHAR2_TABLE_500
1820     , p5_a30 JTF_VARCHAR2_TABLE_100
1821     , p5_a31 JTF_NUMBER_TABLE
1822     , p5_a32 JTF_DATE_TABLE
1823     , p5_a33 JTF_NUMBER_TABLE
1824     , p5_a34 JTF_DATE_TABLE
1825     , p5_a35 JTF_NUMBER_TABLE
1826     , p5_a36 JTF_NUMBER_TABLE
1827     , p5_a37 JTF_NUMBER_TABLE
1828     , p5_a38 JTF_NUMBER_TABLE
1829     , p5_a39 JTF_DATE_TABLE
1830     , p5_a40 JTF_NUMBER_TABLE
1831     , p5_a41 JTF_NUMBER_TABLE
1832     , p5_a42 JTF_NUMBER_TABLE
1833     , p5_a43 JTF_NUMBER_TABLE
1834     , p5_a44 JTF_NUMBER_TABLE
1835     , p5_a45 JTF_VARCHAR2_TABLE_100
1836     , p5_a46 JTF_VARCHAR2_TABLE_200
1837     , p5_a47 JTF_NUMBER_TABLE
1838     , p5_a48 JTF_VARCHAR2_TABLE_200
1839     , p5_a49 JTF_NUMBER_TABLE
1840     , p5_a50 JTF_VARCHAR2_TABLE_200
1841     , p5_a51 JTF_NUMBER_TABLE
1842     , p5_a52 JTF_DATE_TABLE
1843     , p5_a53 JTF_NUMBER_TABLE
1844     , p5_a54 JTF_VARCHAR2_TABLE_200
1845     , p5_a55 JTF_VARCHAR2_TABLE_300
1846     , p5_a56 JTF_VARCHAR2_TABLE_100
1847     , p5_a57 JTF_VARCHAR2_TABLE_100
1848     , p6_a0 out nocopy JTF_NUMBER_TABLE
1849     , p6_a1 out nocopy JTF_NUMBER_TABLE
1850     , p6_a2 out nocopy JTF_NUMBER_TABLE
1851     , p6_a3 out nocopy JTF_NUMBER_TABLE
1852     , p6_a4 out nocopy JTF_NUMBER_TABLE
1853     , p6_a5 out nocopy JTF_NUMBER_TABLE
1854     , p6_a6 out nocopy JTF_NUMBER_TABLE
1855     , p6_a7 out nocopy JTF_NUMBER_TABLE
1856     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
1857     , p6_a9 out nocopy JTF_NUMBER_TABLE
1858     , p6_a10 out nocopy JTF_VARCHAR2_TABLE_2000
1859     , p6_a11 out nocopy JTF_NUMBER_TABLE
1860     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_200
1861     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1862     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
1863     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1864     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1865     , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1866     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1867     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1868     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1869     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1870     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
1871     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
1872     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
1873     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
1874     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
1875     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
1876     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
1877     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
1878     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
1879     , p6_a31 out nocopy JTF_NUMBER_TABLE
1880     , p6_a32 out nocopy JTF_DATE_TABLE
1881     , p6_a33 out nocopy JTF_NUMBER_TABLE
1882     , p6_a34 out nocopy JTF_DATE_TABLE
1883     , p6_a35 out nocopy JTF_NUMBER_TABLE
1884     , p6_a36 out nocopy JTF_NUMBER_TABLE
1885     , p6_a37 out nocopy JTF_NUMBER_TABLE
1886     , p6_a38 out nocopy JTF_NUMBER_TABLE
1887     , p6_a39 out nocopy JTF_DATE_TABLE
1888     , p6_a40 out nocopy JTF_NUMBER_TABLE
1889     , p6_a41 out nocopy JTF_NUMBER_TABLE
1890     , p6_a42 out nocopy JTF_NUMBER_TABLE
1891     , p6_a43 out nocopy JTF_NUMBER_TABLE
1892     , p6_a44 out nocopy JTF_NUMBER_TABLE
1893     , p6_a45 out nocopy JTF_VARCHAR2_TABLE_100
1894     , p6_a46 out nocopy JTF_VARCHAR2_TABLE_200
1895     , p6_a47 out nocopy JTF_NUMBER_TABLE
1896     , p6_a48 out nocopy JTF_VARCHAR2_TABLE_200
1897     , p6_a49 out nocopy JTF_NUMBER_TABLE
1898     , p6_a50 out nocopy JTF_VARCHAR2_TABLE_200
1899     , p6_a51 out nocopy JTF_NUMBER_TABLE
1900     , p6_a52 out nocopy JTF_DATE_TABLE
1901     , p6_a53 out nocopy JTF_NUMBER_TABLE
1902     , p6_a54 out nocopy JTF_VARCHAR2_TABLE_200
1903     , p6_a55 out nocopy JTF_VARCHAR2_TABLE_300
1904     , p6_a56 out nocopy JTF_VARCHAR2_TABLE_100
1905     , p6_a57 out nocopy JTF_VARCHAR2_TABLE_100
1906   )
1907 
1908   as
1909     ddp_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
1910     ddx_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
1911     ddindx binary_integer; indx binary_integer;
1912   begin
1913 
1914     -- copy data to the local IN or IN-OUT args, if any
1915 
1916 
1917 
1918 
1919 
1920     okl_tcl_pvt_w.rosetta_table_copy_in_p5(ddp_tclv_tbl, p5_a0
1921       , p5_a1
1922       , p5_a2
1923       , p5_a3
1924       , p5_a4
1925       , p5_a5
1926       , p5_a6
1927       , p5_a7
1928       , p5_a8
1929       , p5_a9
1930       , p5_a10
1931       , p5_a11
1932       , p5_a12
1933       , p5_a13
1934       , p5_a14
1935       , p5_a15
1936       , p5_a16
1937       , p5_a17
1938       , p5_a18
1939       , p5_a19
1940       , p5_a20
1941       , p5_a21
1942       , p5_a22
1943       , p5_a23
1944       , p5_a24
1945       , p5_a25
1946       , p5_a26
1947       , p5_a27
1948       , p5_a28
1949       , p5_a29
1950       , p5_a30
1951       , p5_a31
1952       , p5_a32
1953       , p5_a33
1954       , p5_a34
1955       , p5_a35
1956       , p5_a36
1957       , p5_a37
1958       , p5_a38
1959       , p5_a39
1960       , p5_a40
1961       , p5_a41
1962       , p5_a42
1963       , p5_a43
1964       , p5_a44
1965       , p5_a45
1966       , p5_a46
1967       , p5_a47
1968       , p5_a48
1969       , p5_a49
1970       , p5_a50
1971       , p5_a51
1972       , p5_a52
1973       , p5_a53
1974       , p5_a54
1975       , p5_a55
1976       , p5_a56
1977       , p5_a57
1978       );
1979 
1980 
1981     -- here's the delegated call to the old PL/SQL routine
1982     okl_trans_contracts_pvt.create_trx_cntrct_lines(p_api_version,
1983       p_init_msg_list,
1984       x_return_status,
1985       x_msg_count,
1986       x_msg_data,
1987       ddp_tclv_tbl,
1988       ddx_tclv_tbl);
1989 
1990     -- copy data back from the local variables to OUT or IN-OUT args, if any
1991 
1992 
1993 
1994 
1995 
1996 
1997     okl_tcl_pvt_w.rosetta_table_copy_out_p5(ddx_tclv_tbl, p6_a0
1998       , p6_a1
1999       , p6_a2
2000       , p6_a3
2001       , p6_a4
2002       , p6_a5
2003       , p6_a6
2004       , p6_a7
2005       , p6_a8
2006       , p6_a9
2007       , p6_a10
2008       , p6_a11
2009       , p6_a12
2010       , p6_a13
2011       , p6_a14
2012       , p6_a15
2013       , p6_a16
2014       , p6_a17
2015       , p6_a18
2016       , p6_a19
2017       , p6_a20
2018       , p6_a21
2019       , p6_a22
2020       , p6_a23
2021       , p6_a24
2022       , p6_a25
2023       , p6_a26
2024       , p6_a27
2025       , p6_a28
2026       , p6_a29
2027       , p6_a30
2028       , p6_a31
2029       , p6_a32
2030       , p6_a33
2031       , p6_a34
2032       , p6_a35
2033       , p6_a36
2034       , p6_a37
2035       , p6_a38
2036       , p6_a39
2037       , p6_a40
2038       , p6_a41
2039       , p6_a42
2040       , p6_a43
2041       , p6_a44
2042       , p6_a45
2043       , p6_a46
2044       , p6_a47
2045       , p6_a48
2046       , p6_a49
2047       , p6_a50
2048       , p6_a51
2049       , p6_a52
2050       , p6_a53
2051       , p6_a54
2052       , p6_a55
2053       , p6_a56
2054       , p6_a57
2055       );
2056   end;
2057 
2058   procedure update_trx_contracts(p_api_version  NUMBER
2059     , p_init_msg_list  VARCHAR2
2060     , x_return_status out nocopy  VARCHAR2
2061     , x_msg_count out nocopy  NUMBER
2062     , x_msg_data out nocopy  VARCHAR2
2063     , p6_a0 JTF_NUMBER_TABLE
2064     , p6_a1 JTF_NUMBER_TABLE
2065     , p6_a2 JTF_NUMBER_TABLE
2066     , p6_a3 JTF_NUMBER_TABLE
2067     , p6_a4 JTF_NUMBER_TABLE
2068     , p6_a5 JTF_NUMBER_TABLE
2069     , p6_a6 JTF_NUMBER_TABLE
2070     , p6_a7 JTF_NUMBER_TABLE
2071     , p6_a8 JTF_VARCHAR2_TABLE_100
2072     , p6_a9 JTF_NUMBER_TABLE
2073     , p6_a10 JTF_VARCHAR2_TABLE_2000
2074     , p6_a11 JTF_NUMBER_TABLE
2075     , p6_a12 JTF_VARCHAR2_TABLE_200
2076     , p6_a13 JTF_VARCHAR2_TABLE_100
2077     , p6_a14 JTF_VARCHAR2_TABLE_100
2078     , p6_a15 JTF_VARCHAR2_TABLE_500
2079     , p6_a16 JTF_VARCHAR2_TABLE_500
2080     , p6_a17 JTF_VARCHAR2_TABLE_500
2081     , p6_a18 JTF_VARCHAR2_TABLE_500
2082     , p6_a19 JTF_VARCHAR2_TABLE_500
2083     , p6_a20 JTF_VARCHAR2_TABLE_500
2084     , p6_a21 JTF_VARCHAR2_TABLE_500
2085     , p6_a22 JTF_VARCHAR2_TABLE_500
2086     , p6_a23 JTF_VARCHAR2_TABLE_500
2087     , p6_a24 JTF_VARCHAR2_TABLE_500
2088     , p6_a25 JTF_VARCHAR2_TABLE_500
2089     , p6_a26 JTF_VARCHAR2_TABLE_500
2090     , p6_a27 JTF_VARCHAR2_TABLE_500
2091     , p6_a28 JTF_VARCHAR2_TABLE_500
2092     , p6_a29 JTF_VARCHAR2_TABLE_500
2093     , p6_a30 JTF_VARCHAR2_TABLE_100
2094     , p6_a31 JTF_NUMBER_TABLE
2095     , p6_a32 JTF_DATE_TABLE
2096     , p6_a33 JTF_NUMBER_TABLE
2097     , p6_a34 JTF_DATE_TABLE
2098     , p6_a35 JTF_NUMBER_TABLE
2099     , p6_a36 JTF_NUMBER_TABLE
2100     , p6_a37 JTF_NUMBER_TABLE
2101     , p6_a38 JTF_NUMBER_TABLE
2102     , p6_a39 JTF_DATE_TABLE
2103     , p6_a40 JTF_NUMBER_TABLE
2104     , p6_a41 JTF_NUMBER_TABLE
2105     , p6_a42 JTF_NUMBER_TABLE
2106     , p6_a43 JTF_NUMBER_TABLE
2107     , p6_a44 JTF_NUMBER_TABLE
2108     , p6_a45 JTF_VARCHAR2_TABLE_100
2109     , p6_a46 JTF_VARCHAR2_TABLE_200
2110     , p6_a47 JTF_NUMBER_TABLE
2111     , p6_a48 JTF_VARCHAR2_TABLE_200
2112     , p6_a49 JTF_NUMBER_TABLE
2113     , p6_a50 JTF_VARCHAR2_TABLE_200
2114     , p6_a51 JTF_NUMBER_TABLE
2115     , p6_a52 JTF_DATE_TABLE
2116     , p6_a53 JTF_NUMBER_TABLE
2117     , p6_a54 JTF_VARCHAR2_TABLE_200
2118     , p6_a55 JTF_VARCHAR2_TABLE_300
2119     , p6_a56 JTF_VARCHAR2_TABLE_100
2120     , p6_a57 JTF_VARCHAR2_TABLE_100
2121     , p7_a0 out nocopy  NUMBER
2122     , p7_a1 out nocopy  NUMBER
2123     , p7_a2 out nocopy  VARCHAR2
2124     , p7_a3 out nocopy  VARCHAR2
2125     , p7_a4 out nocopy  VARCHAR2
2126     , p7_a5 out nocopy  VARCHAR2
2127     , p7_a6 out nocopy  NUMBER
2128     , p7_a7 out nocopy  NUMBER
2129     , p7_a8 out nocopy  NUMBER
2130     , p7_a9 out nocopy  NUMBER
2131     , p7_a10 out nocopy  NUMBER
2132     , p7_a11 out nocopy  NUMBER
2133     , p7_a12 out nocopy  VARCHAR2
2134     , p7_a13 out nocopy  VARCHAR2
2135     , p7_a14 out nocopy  DATE
2136     , p7_a15 out nocopy  VARCHAR2
2137     , p7_a16 out nocopy  VARCHAR2
2138     , p7_a17 out nocopy  NUMBER
2139     , p7_a18 out nocopy  VARCHAR2
2140     , p7_a19 out nocopy  VARCHAR2
2141     , p7_a20 out nocopy  VARCHAR2
2142     , p7_a21 out nocopy  VARCHAR2
2143     , p7_a22 out nocopy  VARCHAR2
2144     , p7_a23 out nocopy  VARCHAR2
2145     , p7_a24 out nocopy  VARCHAR2
2146     , p7_a25 out nocopy  VARCHAR2
2147     , p7_a26 out nocopy  VARCHAR2
2148     , p7_a27 out nocopy  VARCHAR2
2149     , p7_a28 out nocopy  VARCHAR2
2150     , p7_a29 out nocopy  VARCHAR2
2151     , p7_a30 out nocopy  VARCHAR2
2152     , p7_a31 out nocopy  VARCHAR2
2153     , p7_a32 out nocopy  VARCHAR2
2154     , p7_a33 out nocopy  VARCHAR2
2155     , p7_a34 out nocopy  VARCHAR2
2156     , p7_a35 out nocopy  VARCHAR2
2157     , p7_a36 out nocopy  VARCHAR2
2158     , p7_a37 out nocopy  NUMBER
2159     , p7_a38 out nocopy  VARCHAR2
2160     , p7_a39 out nocopy  NUMBER
2161     , p7_a40 out nocopy  VARCHAR2
2162     , p7_a41 out nocopy  VARCHAR2
2163     , p7_a42 out nocopy  NUMBER
2164     , p7_a43 out nocopy  NUMBER
2165     , p7_a44 out nocopy  NUMBER
2166     , p7_a45 out nocopy  NUMBER
2167     , p7_a46 out nocopy  NUMBER
2168     , p7_a47 out nocopy  NUMBER
2169     , p7_a48 out nocopy  DATE
2170     , p7_a49 out nocopy  NUMBER
2171     , p7_a50 out nocopy  DATE
2172     , p7_a51 out nocopy  NUMBER
2173     , p7_a52 out nocopy  DATE
2174     , p7_a53 out nocopy  NUMBER
2175     , p7_a54 out nocopy  NUMBER
2176     , p7_a55 out nocopy  VARCHAR2
2177     , p7_a56 out nocopy  NUMBER
2178     , p7_a57 out nocopy  VARCHAR2
2179     , p7_a58 out nocopy  DATE
2180     , p7_a59 out nocopy  VARCHAR2
2181     , p7_a60 out nocopy  VARCHAR2
2182     , p7_a61 out nocopy  VARCHAR2
2183     , p7_a62 out nocopy  VARCHAR2
2184     , p7_a63 out nocopy  VARCHAR2
2185     , p7_a64 out nocopy  VARCHAR2
2186     , p7_a65 out nocopy  VARCHAR2
2187     , p7_a66 out nocopy  VARCHAR2
2188     , p7_a67 out nocopy  VARCHAR2
2189     , p7_a68 out nocopy  VARCHAR2
2190     , p7_a69 out nocopy  VARCHAR2
2191     , p7_a70 out nocopy  VARCHAR2
2192     , p7_a71 out nocopy  VARCHAR2
2193     , p7_a72 out nocopy  VARCHAR2
2194     , p7_a73 out nocopy  VARCHAR2
2195     , p7_a74 out nocopy  VARCHAR2
2196     , p7_a75 out nocopy  VARCHAR2
2197     , p7_a76 out nocopy  VARCHAR2
2198     , p7_a77 out nocopy  NUMBER
2199     , p7_a78 out nocopy  DATE
2200     , p7_a79 out nocopy  NUMBER
2201     , p7_a80 out nocopy  NUMBER
2202     , p7_a81 out nocopy  VARCHAR2
2203     , p7_a82 out nocopy  DATE
2204     , p7_a83 out nocopy  NUMBER
2205     , p7_a84 out nocopy  DATE
2206     , p7_a85 out nocopy  VARCHAR2
2207     , p7_a86 out nocopy  VARCHAR2
2208     , p7_a87 out nocopy  VARCHAR2
2209     , p7_a88 out nocopy  VARCHAR2
2210     , p7_a89 out nocopy  VARCHAR2
2211     , p7_a90 out nocopy  VARCHAR2
2212     , p7_a91 out nocopy  VARCHAR2
2213     , p7_a92 out nocopy  VARCHAR2
2214     , p7_a93 out nocopy  DATE
2215     , p8_a0 out nocopy JTF_NUMBER_TABLE
2216     , p8_a1 out nocopy JTF_NUMBER_TABLE
2217     , p8_a2 out nocopy JTF_NUMBER_TABLE
2218     , p8_a3 out nocopy JTF_NUMBER_TABLE
2219     , p8_a4 out nocopy JTF_NUMBER_TABLE
2220     , p8_a5 out nocopy JTF_NUMBER_TABLE
2221     , p8_a6 out nocopy JTF_NUMBER_TABLE
2222     , p8_a7 out nocopy JTF_NUMBER_TABLE
2223     , p8_a8 out nocopy JTF_VARCHAR2_TABLE_100
2224     , p8_a9 out nocopy JTF_NUMBER_TABLE
2225     , p8_a10 out nocopy JTF_VARCHAR2_TABLE_2000
2226     , p8_a11 out nocopy JTF_NUMBER_TABLE
2227     , p8_a12 out nocopy JTF_VARCHAR2_TABLE_200
2228     , p8_a13 out nocopy JTF_VARCHAR2_TABLE_100
2229     , p8_a14 out nocopy JTF_VARCHAR2_TABLE_100
2230     , p8_a15 out nocopy JTF_VARCHAR2_TABLE_500
2231     , p8_a16 out nocopy JTF_VARCHAR2_TABLE_500
2232     , p8_a17 out nocopy JTF_VARCHAR2_TABLE_500
2233     , p8_a18 out nocopy JTF_VARCHAR2_TABLE_500
2234     , p8_a19 out nocopy JTF_VARCHAR2_TABLE_500
2235     , p8_a20 out nocopy JTF_VARCHAR2_TABLE_500
2236     , p8_a21 out nocopy JTF_VARCHAR2_TABLE_500
2237     , p8_a22 out nocopy JTF_VARCHAR2_TABLE_500
2238     , p8_a23 out nocopy JTF_VARCHAR2_TABLE_500
2239     , p8_a24 out nocopy JTF_VARCHAR2_TABLE_500
2240     , p8_a25 out nocopy JTF_VARCHAR2_TABLE_500
2241     , p8_a26 out nocopy JTF_VARCHAR2_TABLE_500
2242     , p8_a27 out nocopy JTF_VARCHAR2_TABLE_500
2243     , p8_a28 out nocopy JTF_VARCHAR2_TABLE_500
2244     , p8_a29 out nocopy JTF_VARCHAR2_TABLE_500
2245     , p8_a30 out nocopy JTF_VARCHAR2_TABLE_100
2246     , p8_a31 out nocopy JTF_NUMBER_TABLE
2247     , p8_a32 out nocopy JTF_DATE_TABLE
2248     , p8_a33 out nocopy JTF_NUMBER_TABLE
2249     , p8_a34 out nocopy JTF_DATE_TABLE
2250     , p8_a35 out nocopy JTF_NUMBER_TABLE
2251     , p8_a36 out nocopy JTF_NUMBER_TABLE
2252     , p8_a37 out nocopy JTF_NUMBER_TABLE
2253     , p8_a38 out nocopy JTF_NUMBER_TABLE
2254     , p8_a39 out nocopy JTF_DATE_TABLE
2255     , p8_a40 out nocopy JTF_NUMBER_TABLE
2256     , p8_a41 out nocopy JTF_NUMBER_TABLE
2257     , p8_a42 out nocopy JTF_NUMBER_TABLE
2258     , p8_a43 out nocopy JTF_NUMBER_TABLE
2259     , p8_a44 out nocopy JTF_NUMBER_TABLE
2260     , p8_a45 out nocopy JTF_VARCHAR2_TABLE_100
2261     , p8_a46 out nocopy JTF_VARCHAR2_TABLE_200
2262     , p8_a47 out nocopy JTF_NUMBER_TABLE
2263     , p8_a48 out nocopy JTF_VARCHAR2_TABLE_200
2264     , p8_a49 out nocopy JTF_NUMBER_TABLE
2265     , p8_a50 out nocopy JTF_VARCHAR2_TABLE_200
2266     , p8_a51 out nocopy JTF_NUMBER_TABLE
2267     , p8_a52 out nocopy JTF_DATE_TABLE
2268     , p8_a53 out nocopy JTF_NUMBER_TABLE
2269     , p8_a54 out nocopy JTF_VARCHAR2_TABLE_200
2270     , p8_a55 out nocopy JTF_VARCHAR2_TABLE_300
2271     , p8_a56 out nocopy JTF_VARCHAR2_TABLE_100
2272     , p8_a57 out nocopy JTF_VARCHAR2_TABLE_100
2273     , p5_a0  NUMBER := 0-1962.0724
2274     , p5_a1  NUMBER := 0-1962.0724
2275     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
2276     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
2277     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
2278     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
2279     , p5_a6  NUMBER := 0-1962.0724
2280     , p5_a7  NUMBER := 0-1962.0724
2281     , p5_a8  NUMBER := 0-1962.0724
2282     , p5_a9  NUMBER := 0-1962.0724
2283     , p5_a10  NUMBER := 0-1962.0724
2284     , p5_a11  NUMBER := 0-1962.0724
2285     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
2286     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
2287     , p5_a14  DATE := fnd_api.g_miss_date
2288     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
2289     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
2290     , p5_a17  NUMBER := 0-1962.0724
2291     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
2292     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
2293     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
2294     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
2295     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
2296     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
2297     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
2298     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
2299     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
2300     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
2301     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
2302     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
2303     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
2304     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
2305     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
2306     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
2307     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
2308     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
2309     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
2310     , p5_a37  NUMBER := 0-1962.0724
2311     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
2312     , p5_a39  NUMBER := 0-1962.0724
2313     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
2314     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
2315     , p5_a42  NUMBER := 0-1962.0724
2316     , p5_a43  NUMBER := 0-1962.0724
2317     , p5_a44  NUMBER := 0-1962.0724
2318     , p5_a45  NUMBER := 0-1962.0724
2319     , p5_a46  NUMBER := 0-1962.0724
2320     , p5_a47  NUMBER := 0-1962.0724
2321     , p5_a48  DATE := fnd_api.g_miss_date
2322     , p5_a49  NUMBER := 0-1962.0724
2323     , p5_a50  DATE := fnd_api.g_miss_date
2324     , p5_a51  NUMBER := 0-1962.0724
2325     , p5_a52  DATE := fnd_api.g_miss_date
2326     , p5_a53  NUMBER := 0-1962.0724
2327     , p5_a54  NUMBER := 0-1962.0724
2328     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
2329     , p5_a56  NUMBER := 0-1962.0724
2330     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
2331     , p5_a58  DATE := fnd_api.g_miss_date
2332     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
2333     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
2334     , p5_a61  VARCHAR2 := fnd_api.g_miss_char
2335     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
2336     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
2337     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
2338     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
2339     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
2340     , p5_a67  VARCHAR2 := fnd_api.g_miss_char
2341     , p5_a68  VARCHAR2 := fnd_api.g_miss_char
2342     , p5_a69  VARCHAR2 := fnd_api.g_miss_char
2343     , p5_a70  VARCHAR2 := fnd_api.g_miss_char
2344     , p5_a71  VARCHAR2 := fnd_api.g_miss_char
2345     , p5_a72  VARCHAR2 := fnd_api.g_miss_char
2346     , p5_a73  VARCHAR2 := fnd_api.g_miss_char
2347     , p5_a74  VARCHAR2 := fnd_api.g_miss_char
2348     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
2349     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
2350     , p5_a77  NUMBER := 0-1962.0724
2351     , p5_a78  DATE := fnd_api.g_miss_date
2352     , p5_a79  NUMBER := 0-1962.0724
2353     , p5_a80  NUMBER := 0-1962.0724
2354     , p5_a81  VARCHAR2 := fnd_api.g_miss_char
2355     , p5_a82  DATE := fnd_api.g_miss_date
2356     , p5_a83  NUMBER := 0-1962.0724
2357     , p5_a84  DATE := fnd_api.g_miss_date
2358     , p5_a85  VARCHAR2 := fnd_api.g_miss_char
2359     , p5_a86  VARCHAR2 := fnd_api.g_miss_char
2360     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
2361     , p5_a88  VARCHAR2 := fnd_api.g_miss_char
2362     , p5_a89  VARCHAR2 := fnd_api.g_miss_char
2363     , p5_a90  VARCHAR2 := fnd_api.g_miss_char
2364     , p5_a91  VARCHAR2 := fnd_api.g_miss_char
2365     , p5_a92  VARCHAR2 := fnd_api.g_miss_char
2366     , p5_a93  DATE := fnd_api.g_miss_date
2367   )
2368 
2369   as
2370     ddp_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
2371     ddp_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
2372     ddx_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
2373     ddx_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
2374     ddindx binary_integer; indx binary_integer;
2375   begin
2376 
2377     -- copy data to the local IN or IN-OUT args, if any
2378 
2379 
2380 
2381 
2382 
2383     ddp_tcnv_rec.id := rosetta_g_miss_num_map(p5_a0);
2384     ddp_tcnv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2385     ddp_tcnv_rec.rbr_code := p5_a2;
2386     ddp_tcnv_rec.rpy_code := p5_a3;
2387     ddp_tcnv_rec.rvn_code := p5_a4;
2388     ddp_tcnv_rec.trn_code := p5_a5;
2389     ddp_tcnv_rec.khr_id_new := rosetta_g_miss_num_map(p5_a6);
2390     ddp_tcnv_rec.pvn_id := rosetta_g_miss_num_map(p5_a7);
2391     ddp_tcnv_rec.pdt_id := rosetta_g_miss_num_map(p5_a8);
2392     ddp_tcnv_rec.qte_id := rosetta_g_miss_num_map(p5_a9);
2393     ddp_tcnv_rec.aes_id := rosetta_g_miss_num_map(p5_a10);
2394     ddp_tcnv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a11);
2395     ddp_tcnv_rec.tax_deductible_local := p5_a12;
2396     ddp_tcnv_rec.tax_deductible_corporate := p5_a13;
2397     ddp_tcnv_rec.date_accrual := rosetta_g_miss_date_in_map(p5_a14);
2398     ddp_tcnv_rec.accrual_status_yn := p5_a15;
2399     ddp_tcnv_rec.update_status_yn := p5_a16;
2400     ddp_tcnv_rec.amount := rosetta_g_miss_num_map(p5_a17);
2401     ddp_tcnv_rec.currency_code := p5_a18;
2402     ddp_tcnv_rec.attribute_category := p5_a19;
2403     ddp_tcnv_rec.attribute1 := p5_a20;
2404     ddp_tcnv_rec.attribute2 := p5_a21;
2405     ddp_tcnv_rec.attribute3 := p5_a22;
2406     ddp_tcnv_rec.attribute4 := p5_a23;
2407     ddp_tcnv_rec.attribute5 := p5_a24;
2408     ddp_tcnv_rec.attribute6 := p5_a25;
2409     ddp_tcnv_rec.attribute7 := p5_a26;
2410     ddp_tcnv_rec.attribute8 := p5_a27;
2411     ddp_tcnv_rec.attribute9 := p5_a28;
2412     ddp_tcnv_rec.attribute10 := p5_a29;
2413     ddp_tcnv_rec.attribute11 := p5_a30;
2414     ddp_tcnv_rec.attribute12 := p5_a31;
2415     ddp_tcnv_rec.attribute13 := p5_a32;
2416     ddp_tcnv_rec.attribute14 := p5_a33;
2417     ddp_tcnv_rec.attribute15 := p5_a34;
2418     ddp_tcnv_rec.tcn_type := p5_a35;
2419     ddp_tcnv_rec.rjn_code := p5_a36;
2420     ddp_tcnv_rec.party_rel_id1_old := rosetta_g_miss_num_map(p5_a37);
2421     ddp_tcnv_rec.party_rel_id2_old := p5_a38;
2422     ddp_tcnv_rec.party_rel_id1_new := rosetta_g_miss_num_map(p5_a39);
2423     ddp_tcnv_rec.party_rel_id2_new := p5_a40;
2424     ddp_tcnv_rec.complete_transfer_yn := p5_a41;
2425     ddp_tcnv_rec.org_id := rosetta_g_miss_num_map(p5_a42);
2426     ddp_tcnv_rec.khr_id := rosetta_g_miss_num_map(p5_a43);
2427     ddp_tcnv_rec.request_id := rosetta_g_miss_num_map(p5_a44);
2428     ddp_tcnv_rec.program_application_id := rosetta_g_miss_num_map(p5_a45);
2429     ddp_tcnv_rec.khr_id_old := rosetta_g_miss_num_map(p5_a46);
2430     ddp_tcnv_rec.program_id := rosetta_g_miss_num_map(p5_a47);
2431     ddp_tcnv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a48);
2432     ddp_tcnv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
2433     ddp_tcnv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
2434     ddp_tcnv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
2435     ddp_tcnv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
2436     ddp_tcnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
2437     ddp_tcnv_rec.try_id := rosetta_g_miss_num_map(p5_a54);
2438     ddp_tcnv_rec.tsu_code := p5_a55;
2439     ddp_tcnv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a56);
2440     ddp_tcnv_rec.description := p5_a57;
2441     ddp_tcnv_rec.date_transaction_occurred := rosetta_g_miss_date_in_map(p5_a58);
2442     ddp_tcnv_rec.trx_number := p5_a59;
2443     ddp_tcnv_rec.tmt_evergreen_yn := p5_a60;
2444     ddp_tcnv_rec.tmt_close_balances_yn := p5_a61;
2445     ddp_tcnv_rec.tmt_accounting_entries_yn := p5_a62;
2446     ddp_tcnv_rec.tmt_cancel_insurance_yn := p5_a63;
2447     ddp_tcnv_rec.tmt_asset_disposition_yn := p5_a64;
2448     ddp_tcnv_rec.tmt_amortization_yn := p5_a65;
2449     ddp_tcnv_rec.tmt_asset_return_yn := p5_a66;
2450     ddp_tcnv_rec.tmt_contract_updated_yn := p5_a67;
2451     ddp_tcnv_rec.tmt_recycle_yn := p5_a68;
2452     ddp_tcnv_rec.tmt_validated_yn := p5_a69;
2453     ddp_tcnv_rec.tmt_streams_updated_yn := p5_a70;
2454     ddp_tcnv_rec.accrual_activity := p5_a71;
2455     ddp_tcnv_rec.tmt_split_asset_yn := p5_a72;
2456     ddp_tcnv_rec.tmt_generic_flag1_yn := p5_a73;
2457     ddp_tcnv_rec.tmt_generic_flag2_yn := p5_a74;
2458     ddp_tcnv_rec.tmt_generic_flag3_yn := p5_a75;
2459     ddp_tcnv_rec.currency_conversion_type := p5_a76;
2460     ddp_tcnv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a77);
2461     ddp_tcnv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a78);
2462     ddp_tcnv_rec.chr_id := rosetta_g_miss_num_map(p5_a79);
2463     ddp_tcnv_rec.source_trx_id := rosetta_g_miss_num_map(p5_a80);
2464     ddp_tcnv_rec.source_trx_type := p5_a81;
2465     ddp_tcnv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a82);
2466     ddp_tcnv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a83);
2467     ddp_tcnv_rec.accrual_reversal_date := rosetta_g_miss_date_in_map(p5_a84);
2468     ddp_tcnv_rec.accounting_reversal_yn := p5_a85;
2469     ddp_tcnv_rec.product_name := p5_a86;
2470     ddp_tcnv_rec.book_classification_code := p5_a87;
2471     ddp_tcnv_rec.tax_owner_code := p5_a88;
2472     ddp_tcnv_rec.tmt_status_code := p5_a89;
2473     ddp_tcnv_rec.representation_name := p5_a90;
2474     ddp_tcnv_rec.representation_code := p5_a91;
2475     ddp_tcnv_rec.upgrade_status_flag := p5_a92;
2476     ddp_tcnv_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a93);
2477 
2478     okl_tcl_pvt_w.rosetta_table_copy_in_p5(ddp_tclv_tbl, p6_a0
2479       , p6_a1
2480       , p6_a2
2481       , p6_a3
2482       , p6_a4
2483       , p6_a5
2484       , p6_a6
2485       , p6_a7
2486       , p6_a8
2487       , p6_a9
2488       , p6_a10
2489       , p6_a11
2490       , p6_a12
2491       , p6_a13
2492       , p6_a14
2493       , p6_a15
2494       , p6_a16
2495       , p6_a17
2496       , p6_a18
2497       , p6_a19
2498       , p6_a20
2499       , p6_a21
2500       , p6_a22
2501       , p6_a23
2502       , p6_a24
2503       , p6_a25
2504       , p6_a26
2505       , p6_a27
2506       , p6_a28
2507       , p6_a29
2508       , p6_a30
2509       , p6_a31
2510       , p6_a32
2511       , p6_a33
2512       , p6_a34
2513       , p6_a35
2514       , p6_a36
2515       , p6_a37
2516       , p6_a38
2517       , p6_a39
2518       , p6_a40
2519       , p6_a41
2520       , p6_a42
2521       , p6_a43
2522       , p6_a44
2523       , p6_a45
2524       , p6_a46
2525       , p6_a47
2526       , p6_a48
2527       , p6_a49
2528       , p6_a50
2529       , p6_a51
2530       , p6_a52
2531       , p6_a53
2532       , p6_a54
2533       , p6_a55
2534       , p6_a56
2535       , p6_a57
2536       );
2537 
2538 
2539 
2540     -- here's the delegated call to the old PL/SQL routine
2541     okl_trans_contracts_pvt.update_trx_contracts(p_api_version,
2542       p_init_msg_list,
2543       x_return_status,
2544       x_msg_count,
2545       x_msg_data,
2546       ddp_tcnv_rec,
2547       ddp_tclv_tbl,
2548       ddx_tcnv_rec,
2549       ddx_tclv_tbl);
2550 
2551     -- copy data back from the local variables to OUT or IN-OUT args, if any
2552 
2553 
2554 
2555 
2556 
2557 
2558 
2559     p7_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
2560     p7_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
2561     p7_a2 := ddx_tcnv_rec.rbr_code;
2562     p7_a3 := ddx_tcnv_rec.rpy_code;
2563     p7_a4 := ddx_tcnv_rec.rvn_code;
2564     p7_a5 := ddx_tcnv_rec.trn_code;
2565     p7_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
2566     p7_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
2567     p7_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
2568     p7_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
2569     p7_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
2570     p7_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
2571     p7_a12 := ddx_tcnv_rec.tax_deductible_local;
2572     p7_a13 := ddx_tcnv_rec.tax_deductible_corporate;
2573     p7_a14 := ddx_tcnv_rec.date_accrual;
2574     p7_a15 := ddx_tcnv_rec.accrual_status_yn;
2575     p7_a16 := ddx_tcnv_rec.update_status_yn;
2576     p7_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
2577     p7_a18 := ddx_tcnv_rec.currency_code;
2578     p7_a19 := ddx_tcnv_rec.attribute_category;
2579     p7_a20 := ddx_tcnv_rec.attribute1;
2580     p7_a21 := ddx_tcnv_rec.attribute2;
2581     p7_a22 := ddx_tcnv_rec.attribute3;
2582     p7_a23 := ddx_tcnv_rec.attribute4;
2583     p7_a24 := ddx_tcnv_rec.attribute5;
2584     p7_a25 := ddx_tcnv_rec.attribute6;
2585     p7_a26 := ddx_tcnv_rec.attribute7;
2586     p7_a27 := ddx_tcnv_rec.attribute8;
2587     p7_a28 := ddx_tcnv_rec.attribute9;
2588     p7_a29 := ddx_tcnv_rec.attribute10;
2589     p7_a30 := ddx_tcnv_rec.attribute11;
2590     p7_a31 := ddx_tcnv_rec.attribute12;
2591     p7_a32 := ddx_tcnv_rec.attribute13;
2592     p7_a33 := ddx_tcnv_rec.attribute14;
2593     p7_a34 := ddx_tcnv_rec.attribute15;
2594     p7_a35 := ddx_tcnv_rec.tcn_type;
2595     p7_a36 := ddx_tcnv_rec.rjn_code;
2596     p7_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
2597     p7_a38 := ddx_tcnv_rec.party_rel_id2_old;
2598     p7_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
2599     p7_a40 := ddx_tcnv_rec.party_rel_id2_new;
2600     p7_a41 := ddx_tcnv_rec.complete_transfer_yn;
2601     p7_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
2602     p7_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
2603     p7_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
2604     p7_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
2605     p7_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
2606     p7_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
2607     p7_a48 := ddx_tcnv_rec.program_update_date;
2608     p7_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
2609     p7_a50 := ddx_tcnv_rec.creation_date;
2610     p7_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
2611     p7_a52 := ddx_tcnv_rec.last_update_date;
2612     p7_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
2613     p7_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
2614     p7_a55 := ddx_tcnv_rec.tsu_code;
2615     p7_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
2616     p7_a57 := ddx_tcnv_rec.description;
2617     p7_a58 := ddx_tcnv_rec.date_transaction_occurred;
2618     p7_a59 := ddx_tcnv_rec.trx_number;
2619     p7_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
2620     p7_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
2621     p7_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
2622     p7_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
2623     p7_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
2624     p7_a65 := ddx_tcnv_rec.tmt_amortization_yn;
2625     p7_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
2626     p7_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
2627     p7_a68 := ddx_tcnv_rec.tmt_recycle_yn;
2628     p7_a69 := ddx_tcnv_rec.tmt_validated_yn;
2629     p7_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
2630     p7_a71 := ddx_tcnv_rec.accrual_activity;
2631     p7_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
2632     p7_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
2633     p7_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
2634     p7_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
2635     p7_a76 := ddx_tcnv_rec.currency_conversion_type;
2636     p7_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
2637     p7_a78 := ddx_tcnv_rec.currency_conversion_date;
2638     p7_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
2639     p7_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
2640     p7_a81 := ddx_tcnv_rec.source_trx_type;
2641     p7_a82 := ddx_tcnv_rec.canceled_date;
2642     p7_a83 := rosetta_g_miss_num_map(ddx_tcnv_rec.legal_entity_id);
2643     p7_a84 := ddx_tcnv_rec.accrual_reversal_date;
2644     p7_a85 := ddx_tcnv_rec.accounting_reversal_yn;
2645     p7_a86 := ddx_tcnv_rec.product_name;
2646     p7_a87 := ddx_tcnv_rec.book_classification_code;
2647     p7_a88 := ddx_tcnv_rec.tax_owner_code;
2648     p7_a89 := ddx_tcnv_rec.tmt_status_code;
2649     p7_a90 := ddx_tcnv_rec.representation_name;
2650     p7_a91 := ddx_tcnv_rec.representation_code;
2651     p7_a92 := ddx_tcnv_rec.upgrade_status_flag;
2652     p7_a93 := ddx_tcnv_rec.transaction_date;
2653 
2654     okl_tcl_pvt_w.rosetta_table_copy_out_p5(ddx_tclv_tbl, p8_a0
2655       , p8_a1
2656       , p8_a2
2657       , p8_a3
2658       , p8_a4
2659       , p8_a5
2660       , p8_a6
2661       , p8_a7
2662       , p8_a8
2663       , p8_a9
2664       , p8_a10
2665       , p8_a11
2666       , p8_a12
2667       , p8_a13
2668       , p8_a14
2669       , p8_a15
2670       , p8_a16
2671       , p8_a17
2672       , p8_a18
2673       , p8_a19
2674       , p8_a20
2675       , p8_a21
2676       , p8_a22
2677       , p8_a23
2678       , p8_a24
2679       , p8_a25
2680       , p8_a26
2681       , p8_a27
2682       , p8_a28
2683       , p8_a29
2684       , p8_a30
2685       , p8_a31
2686       , p8_a32
2687       , p8_a33
2688       , p8_a34
2689       , p8_a35
2690       , p8_a36
2691       , p8_a37
2692       , p8_a38
2693       , p8_a39
2694       , p8_a40
2695       , p8_a41
2696       , p8_a42
2697       , p8_a43
2698       , p8_a44
2699       , p8_a45
2700       , p8_a46
2701       , p8_a47
2702       , p8_a48
2703       , p8_a49
2704       , p8_a50
2705       , p8_a51
2706       , p8_a52
2707       , p8_a53
2708       , p8_a54
2709       , p8_a55
2710       , p8_a56
2711       , p8_a57
2712       );
2713   end;
2714 
2715   procedure update_trx_contracts(p_api_version  NUMBER
2716     , p_init_msg_list  VARCHAR2
2717     , x_return_status out nocopy  VARCHAR2
2718     , x_msg_count out nocopy  NUMBER
2719     , x_msg_data out nocopy  VARCHAR2
2720     , p6_a0 out nocopy  NUMBER
2721     , p6_a1 out nocopy  NUMBER
2722     , p6_a2 out nocopy  VARCHAR2
2723     , p6_a3 out nocopy  VARCHAR2
2724     , p6_a4 out nocopy  VARCHAR2
2725     , p6_a5 out nocopy  VARCHAR2
2726     , p6_a6 out nocopy  NUMBER
2727     , p6_a7 out nocopy  NUMBER
2728     , p6_a8 out nocopy  NUMBER
2729     , p6_a9 out nocopy  NUMBER
2730     , p6_a10 out nocopy  NUMBER
2731     , p6_a11 out nocopy  NUMBER
2732     , p6_a12 out nocopy  VARCHAR2
2733     , p6_a13 out nocopy  VARCHAR2
2734     , p6_a14 out nocopy  DATE
2735     , p6_a15 out nocopy  VARCHAR2
2736     , p6_a16 out nocopy  VARCHAR2
2737     , p6_a17 out nocopy  NUMBER
2738     , p6_a18 out nocopy  VARCHAR2
2739     , p6_a19 out nocopy  VARCHAR2
2740     , p6_a20 out nocopy  VARCHAR2
2741     , p6_a21 out nocopy  VARCHAR2
2742     , p6_a22 out nocopy  VARCHAR2
2743     , p6_a23 out nocopy  VARCHAR2
2744     , p6_a24 out nocopy  VARCHAR2
2745     , p6_a25 out nocopy  VARCHAR2
2746     , p6_a26 out nocopy  VARCHAR2
2747     , p6_a27 out nocopy  VARCHAR2
2748     , p6_a28 out nocopy  VARCHAR2
2749     , p6_a29 out nocopy  VARCHAR2
2750     , p6_a30 out nocopy  VARCHAR2
2751     , p6_a31 out nocopy  VARCHAR2
2752     , p6_a32 out nocopy  VARCHAR2
2753     , p6_a33 out nocopy  VARCHAR2
2754     , p6_a34 out nocopy  VARCHAR2
2755     , p6_a35 out nocopy  VARCHAR2
2756     , p6_a36 out nocopy  VARCHAR2
2757     , p6_a37 out nocopy  NUMBER
2758     , p6_a38 out nocopy  VARCHAR2
2759     , p6_a39 out nocopy  NUMBER
2760     , p6_a40 out nocopy  VARCHAR2
2761     , p6_a41 out nocopy  VARCHAR2
2762     , p6_a42 out nocopy  NUMBER
2763     , p6_a43 out nocopy  NUMBER
2764     , p6_a44 out nocopy  NUMBER
2765     , p6_a45 out nocopy  NUMBER
2766     , p6_a46 out nocopy  NUMBER
2767     , p6_a47 out nocopy  NUMBER
2768     , p6_a48 out nocopy  DATE
2769     , p6_a49 out nocopy  NUMBER
2770     , p6_a50 out nocopy  DATE
2771     , p6_a51 out nocopy  NUMBER
2772     , p6_a52 out nocopy  DATE
2773     , p6_a53 out nocopy  NUMBER
2774     , p6_a54 out nocopy  NUMBER
2775     , p6_a55 out nocopy  VARCHAR2
2776     , p6_a56 out nocopy  NUMBER
2777     , p6_a57 out nocopy  VARCHAR2
2778     , p6_a58 out nocopy  DATE
2779     , p6_a59 out nocopy  VARCHAR2
2780     , p6_a60 out nocopy  VARCHAR2
2781     , p6_a61 out nocopy  VARCHAR2
2782     , p6_a62 out nocopy  VARCHAR2
2783     , p6_a63 out nocopy  VARCHAR2
2784     , p6_a64 out nocopy  VARCHAR2
2785     , p6_a65 out nocopy  VARCHAR2
2786     , p6_a66 out nocopy  VARCHAR2
2787     , p6_a67 out nocopy  VARCHAR2
2788     , p6_a68 out nocopy  VARCHAR2
2789     , p6_a69 out nocopy  VARCHAR2
2790     , p6_a70 out nocopy  VARCHAR2
2791     , p6_a71 out nocopy  VARCHAR2
2792     , p6_a72 out nocopy  VARCHAR2
2793     , p6_a73 out nocopy  VARCHAR2
2794     , p6_a74 out nocopy  VARCHAR2
2795     , p6_a75 out nocopy  VARCHAR2
2796     , p6_a76 out nocopy  VARCHAR2
2797     , p6_a77 out nocopy  NUMBER
2798     , p6_a78 out nocopy  DATE
2799     , p6_a79 out nocopy  NUMBER
2800     , p6_a80 out nocopy  NUMBER
2801     , p6_a81 out nocopy  VARCHAR2
2802     , p6_a82 out nocopy  DATE
2803     , p6_a83 out nocopy  NUMBER
2804     , p6_a84 out nocopy  DATE
2805     , p6_a85 out nocopy  VARCHAR2
2806     , p6_a86 out nocopy  VARCHAR2
2807     , p6_a87 out nocopy  VARCHAR2
2808     , p6_a88 out nocopy  VARCHAR2
2809     , p6_a89 out nocopy  VARCHAR2
2810     , p6_a90 out nocopy  VARCHAR2
2811     , p6_a91 out nocopy  VARCHAR2
2812     , p6_a92 out nocopy  VARCHAR2
2813     , p6_a93 out nocopy  DATE
2814     , p5_a0  NUMBER := 0-1962.0724
2815     , p5_a1  NUMBER := 0-1962.0724
2816     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
2817     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
2818     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
2819     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
2820     , p5_a6  NUMBER := 0-1962.0724
2821     , p5_a7  NUMBER := 0-1962.0724
2822     , p5_a8  NUMBER := 0-1962.0724
2823     , p5_a9  NUMBER := 0-1962.0724
2824     , p5_a10  NUMBER := 0-1962.0724
2825     , p5_a11  NUMBER := 0-1962.0724
2826     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
2827     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
2828     , p5_a14  DATE := fnd_api.g_miss_date
2829     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
2830     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
2831     , p5_a17  NUMBER := 0-1962.0724
2832     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
2833     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
2834     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
2835     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
2836     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
2837     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
2838     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
2839     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
2840     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
2841     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
2842     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
2843     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
2844     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
2845     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
2846     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
2847     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
2848     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
2849     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
2850     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
2851     , p5_a37  NUMBER := 0-1962.0724
2852     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
2853     , p5_a39  NUMBER := 0-1962.0724
2854     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
2855     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
2856     , p5_a42  NUMBER := 0-1962.0724
2857     , p5_a43  NUMBER := 0-1962.0724
2858     , p5_a44  NUMBER := 0-1962.0724
2859     , p5_a45  NUMBER := 0-1962.0724
2860     , p5_a46  NUMBER := 0-1962.0724
2861     , p5_a47  NUMBER := 0-1962.0724
2862     , p5_a48  DATE := fnd_api.g_miss_date
2863     , p5_a49  NUMBER := 0-1962.0724
2864     , p5_a50  DATE := fnd_api.g_miss_date
2865     , p5_a51  NUMBER := 0-1962.0724
2866     , p5_a52  DATE := fnd_api.g_miss_date
2867     , p5_a53  NUMBER := 0-1962.0724
2868     , p5_a54  NUMBER := 0-1962.0724
2869     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
2870     , p5_a56  NUMBER := 0-1962.0724
2871     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
2872     , p5_a58  DATE := fnd_api.g_miss_date
2873     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
2874     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
2875     , p5_a61  VARCHAR2 := fnd_api.g_miss_char
2876     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
2877     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
2878     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
2879     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
2880     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
2881     , p5_a67  VARCHAR2 := fnd_api.g_miss_char
2882     , p5_a68  VARCHAR2 := fnd_api.g_miss_char
2883     , p5_a69  VARCHAR2 := fnd_api.g_miss_char
2884     , p5_a70  VARCHAR2 := fnd_api.g_miss_char
2885     , p5_a71  VARCHAR2 := fnd_api.g_miss_char
2886     , p5_a72  VARCHAR2 := fnd_api.g_miss_char
2887     , p5_a73  VARCHAR2 := fnd_api.g_miss_char
2888     , p5_a74  VARCHAR2 := fnd_api.g_miss_char
2889     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
2890     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
2891     , p5_a77  NUMBER := 0-1962.0724
2892     , p5_a78  DATE := fnd_api.g_miss_date
2893     , p5_a79  NUMBER := 0-1962.0724
2894     , p5_a80  NUMBER := 0-1962.0724
2895     , p5_a81  VARCHAR2 := fnd_api.g_miss_char
2896     , p5_a82  DATE := fnd_api.g_miss_date
2897     , p5_a83  NUMBER := 0-1962.0724
2898     , p5_a84  DATE := fnd_api.g_miss_date
2899     , p5_a85  VARCHAR2 := fnd_api.g_miss_char
2900     , p5_a86  VARCHAR2 := fnd_api.g_miss_char
2901     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
2902     , p5_a88  VARCHAR2 := fnd_api.g_miss_char
2903     , p5_a89  VARCHAR2 := fnd_api.g_miss_char
2904     , p5_a90  VARCHAR2 := fnd_api.g_miss_char
2905     , p5_a91  VARCHAR2 := fnd_api.g_miss_char
2906     , p5_a92  VARCHAR2 := fnd_api.g_miss_char
2907     , p5_a93  DATE := fnd_api.g_miss_date
2908   )
2909 
2910   as
2911     ddp_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
2912     ddx_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
2913     ddindx binary_integer; indx binary_integer;
2914   begin
2915 
2916     -- copy data to the local IN or IN-OUT args, if any
2917 
2918 
2919 
2920 
2921 
2922     ddp_tcnv_rec.id := rosetta_g_miss_num_map(p5_a0);
2923     ddp_tcnv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2924     ddp_tcnv_rec.rbr_code := p5_a2;
2925     ddp_tcnv_rec.rpy_code := p5_a3;
2926     ddp_tcnv_rec.rvn_code := p5_a4;
2927     ddp_tcnv_rec.trn_code := p5_a5;
2928     ddp_tcnv_rec.khr_id_new := rosetta_g_miss_num_map(p5_a6);
2929     ddp_tcnv_rec.pvn_id := rosetta_g_miss_num_map(p5_a7);
2930     ddp_tcnv_rec.pdt_id := rosetta_g_miss_num_map(p5_a8);
2931     ddp_tcnv_rec.qte_id := rosetta_g_miss_num_map(p5_a9);
2932     ddp_tcnv_rec.aes_id := rosetta_g_miss_num_map(p5_a10);
2933     ddp_tcnv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a11);
2934     ddp_tcnv_rec.tax_deductible_local := p5_a12;
2935     ddp_tcnv_rec.tax_deductible_corporate := p5_a13;
2936     ddp_tcnv_rec.date_accrual := rosetta_g_miss_date_in_map(p5_a14);
2937     ddp_tcnv_rec.accrual_status_yn := p5_a15;
2938     ddp_tcnv_rec.update_status_yn := p5_a16;
2939     ddp_tcnv_rec.amount := rosetta_g_miss_num_map(p5_a17);
2940     ddp_tcnv_rec.currency_code := p5_a18;
2941     ddp_tcnv_rec.attribute_category := p5_a19;
2942     ddp_tcnv_rec.attribute1 := p5_a20;
2943     ddp_tcnv_rec.attribute2 := p5_a21;
2944     ddp_tcnv_rec.attribute3 := p5_a22;
2945     ddp_tcnv_rec.attribute4 := p5_a23;
2946     ddp_tcnv_rec.attribute5 := p5_a24;
2947     ddp_tcnv_rec.attribute6 := p5_a25;
2948     ddp_tcnv_rec.attribute7 := p5_a26;
2949     ddp_tcnv_rec.attribute8 := p5_a27;
2950     ddp_tcnv_rec.attribute9 := p5_a28;
2951     ddp_tcnv_rec.attribute10 := p5_a29;
2952     ddp_tcnv_rec.attribute11 := p5_a30;
2953     ddp_tcnv_rec.attribute12 := p5_a31;
2954     ddp_tcnv_rec.attribute13 := p5_a32;
2955     ddp_tcnv_rec.attribute14 := p5_a33;
2956     ddp_tcnv_rec.attribute15 := p5_a34;
2957     ddp_tcnv_rec.tcn_type := p5_a35;
2958     ddp_tcnv_rec.rjn_code := p5_a36;
2959     ddp_tcnv_rec.party_rel_id1_old := rosetta_g_miss_num_map(p5_a37);
2960     ddp_tcnv_rec.party_rel_id2_old := p5_a38;
2961     ddp_tcnv_rec.party_rel_id1_new := rosetta_g_miss_num_map(p5_a39);
2962     ddp_tcnv_rec.party_rel_id2_new := p5_a40;
2963     ddp_tcnv_rec.complete_transfer_yn := p5_a41;
2964     ddp_tcnv_rec.org_id := rosetta_g_miss_num_map(p5_a42);
2965     ddp_tcnv_rec.khr_id := rosetta_g_miss_num_map(p5_a43);
2966     ddp_tcnv_rec.request_id := rosetta_g_miss_num_map(p5_a44);
2967     ddp_tcnv_rec.program_application_id := rosetta_g_miss_num_map(p5_a45);
2968     ddp_tcnv_rec.khr_id_old := rosetta_g_miss_num_map(p5_a46);
2969     ddp_tcnv_rec.program_id := rosetta_g_miss_num_map(p5_a47);
2970     ddp_tcnv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a48);
2971     ddp_tcnv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
2972     ddp_tcnv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
2973     ddp_tcnv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
2974     ddp_tcnv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
2975     ddp_tcnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
2976     ddp_tcnv_rec.try_id := rosetta_g_miss_num_map(p5_a54);
2977     ddp_tcnv_rec.tsu_code := p5_a55;
2978     ddp_tcnv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a56);
2979     ddp_tcnv_rec.description := p5_a57;
2980     ddp_tcnv_rec.date_transaction_occurred := rosetta_g_miss_date_in_map(p5_a58);
2981     ddp_tcnv_rec.trx_number := p5_a59;
2982     ddp_tcnv_rec.tmt_evergreen_yn := p5_a60;
2983     ddp_tcnv_rec.tmt_close_balances_yn := p5_a61;
2984     ddp_tcnv_rec.tmt_accounting_entries_yn := p5_a62;
2985     ddp_tcnv_rec.tmt_cancel_insurance_yn := p5_a63;
2986     ddp_tcnv_rec.tmt_asset_disposition_yn := p5_a64;
2987     ddp_tcnv_rec.tmt_amortization_yn := p5_a65;
2988     ddp_tcnv_rec.tmt_asset_return_yn := p5_a66;
2989     ddp_tcnv_rec.tmt_contract_updated_yn := p5_a67;
2990     ddp_tcnv_rec.tmt_recycle_yn := p5_a68;
2991     ddp_tcnv_rec.tmt_validated_yn := p5_a69;
2992     ddp_tcnv_rec.tmt_streams_updated_yn := p5_a70;
2993     ddp_tcnv_rec.accrual_activity := p5_a71;
2994     ddp_tcnv_rec.tmt_split_asset_yn := p5_a72;
2995     ddp_tcnv_rec.tmt_generic_flag1_yn := p5_a73;
2996     ddp_tcnv_rec.tmt_generic_flag2_yn := p5_a74;
2997     ddp_tcnv_rec.tmt_generic_flag3_yn := p5_a75;
2998     ddp_tcnv_rec.currency_conversion_type := p5_a76;
2999     ddp_tcnv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a77);
3000     ddp_tcnv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a78);
3001     ddp_tcnv_rec.chr_id := rosetta_g_miss_num_map(p5_a79);
3002     ddp_tcnv_rec.source_trx_id := rosetta_g_miss_num_map(p5_a80);
3003     ddp_tcnv_rec.source_trx_type := p5_a81;
3004     ddp_tcnv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a82);
3005     ddp_tcnv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a83);
3006     ddp_tcnv_rec.accrual_reversal_date := rosetta_g_miss_date_in_map(p5_a84);
3007     ddp_tcnv_rec.accounting_reversal_yn := p5_a85;
3008     ddp_tcnv_rec.product_name := p5_a86;
3009     ddp_tcnv_rec.book_classification_code := p5_a87;
3010     ddp_tcnv_rec.tax_owner_code := p5_a88;
3011     ddp_tcnv_rec.tmt_status_code := p5_a89;
3012     ddp_tcnv_rec.representation_name := p5_a90;
3013     ddp_tcnv_rec.representation_code := p5_a91;
3014     ddp_tcnv_rec.upgrade_status_flag := p5_a92;
3015     ddp_tcnv_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a93);
3016 
3017 
3018     -- here's the delegated call to the old PL/SQL routine
3019     okl_trans_contracts_pvt.update_trx_contracts(p_api_version,
3020       p_init_msg_list,
3021       x_return_status,
3022       x_msg_count,
3023       x_msg_data,
3024       ddp_tcnv_rec,
3025       ddx_tcnv_rec);
3026 
3027     -- copy data back from the local variables to OUT or IN-OUT args, if any
3028 
3029 
3030 
3031 
3032 
3033 
3034     p6_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
3035     p6_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
3036     p6_a2 := ddx_tcnv_rec.rbr_code;
3037     p6_a3 := ddx_tcnv_rec.rpy_code;
3038     p6_a4 := ddx_tcnv_rec.rvn_code;
3039     p6_a5 := ddx_tcnv_rec.trn_code;
3040     p6_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
3041     p6_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
3042     p6_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
3043     p6_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
3044     p6_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
3045     p6_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
3046     p6_a12 := ddx_tcnv_rec.tax_deductible_local;
3047     p6_a13 := ddx_tcnv_rec.tax_deductible_corporate;
3048     p6_a14 := ddx_tcnv_rec.date_accrual;
3049     p6_a15 := ddx_tcnv_rec.accrual_status_yn;
3050     p6_a16 := ddx_tcnv_rec.update_status_yn;
3051     p6_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
3052     p6_a18 := ddx_tcnv_rec.currency_code;
3053     p6_a19 := ddx_tcnv_rec.attribute_category;
3054     p6_a20 := ddx_tcnv_rec.attribute1;
3055     p6_a21 := ddx_tcnv_rec.attribute2;
3056     p6_a22 := ddx_tcnv_rec.attribute3;
3057     p6_a23 := ddx_tcnv_rec.attribute4;
3058     p6_a24 := ddx_tcnv_rec.attribute5;
3059     p6_a25 := ddx_tcnv_rec.attribute6;
3060     p6_a26 := ddx_tcnv_rec.attribute7;
3061     p6_a27 := ddx_tcnv_rec.attribute8;
3062     p6_a28 := ddx_tcnv_rec.attribute9;
3063     p6_a29 := ddx_tcnv_rec.attribute10;
3064     p6_a30 := ddx_tcnv_rec.attribute11;
3065     p6_a31 := ddx_tcnv_rec.attribute12;
3066     p6_a32 := ddx_tcnv_rec.attribute13;
3067     p6_a33 := ddx_tcnv_rec.attribute14;
3068     p6_a34 := ddx_tcnv_rec.attribute15;
3069     p6_a35 := ddx_tcnv_rec.tcn_type;
3070     p6_a36 := ddx_tcnv_rec.rjn_code;
3071     p6_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
3072     p6_a38 := ddx_tcnv_rec.party_rel_id2_old;
3073     p6_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
3074     p6_a40 := ddx_tcnv_rec.party_rel_id2_new;
3075     p6_a41 := ddx_tcnv_rec.complete_transfer_yn;
3076     p6_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
3077     p6_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
3078     p6_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
3079     p6_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
3080     p6_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
3081     p6_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
3082     p6_a48 := ddx_tcnv_rec.program_update_date;
3083     p6_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
3084     p6_a50 := ddx_tcnv_rec.creation_date;
3085     p6_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
3086     p6_a52 := ddx_tcnv_rec.last_update_date;
3087     p6_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
3088     p6_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
3089     p6_a55 := ddx_tcnv_rec.tsu_code;
3090     p6_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
3091     p6_a57 := ddx_tcnv_rec.description;
3092     p6_a58 := ddx_tcnv_rec.date_transaction_occurred;
3093     p6_a59 := ddx_tcnv_rec.trx_number;
3094     p6_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
3095     p6_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
3096     p6_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
3097     p6_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
3098     p6_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
3099     p6_a65 := ddx_tcnv_rec.tmt_amortization_yn;
3100     p6_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
3101     p6_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
3102     p6_a68 := ddx_tcnv_rec.tmt_recycle_yn;
3103     p6_a69 := ddx_tcnv_rec.tmt_validated_yn;
3104     p6_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
3105     p6_a71 := ddx_tcnv_rec.accrual_activity;
3106     p6_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
3107     p6_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
3108     p6_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
3109     p6_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
3110     p6_a76 := ddx_tcnv_rec.currency_conversion_type;
3111     p6_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
3112     p6_a78 := ddx_tcnv_rec.currency_conversion_date;
3113     p6_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
3114     p6_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
3115     p6_a81 := ddx_tcnv_rec.source_trx_type;
3116     p6_a82 := ddx_tcnv_rec.canceled_date;
3117     p6_a83 := rosetta_g_miss_num_map(ddx_tcnv_rec.legal_entity_id);
3118     p6_a84 := ddx_tcnv_rec.accrual_reversal_date;
3119     p6_a85 := ddx_tcnv_rec.accounting_reversal_yn;
3120     p6_a86 := ddx_tcnv_rec.product_name;
3121     p6_a87 := ddx_tcnv_rec.book_classification_code;
3122     p6_a88 := ddx_tcnv_rec.tax_owner_code;
3123     p6_a89 := ddx_tcnv_rec.tmt_status_code;
3124     p6_a90 := ddx_tcnv_rec.representation_name;
3125     p6_a91 := ddx_tcnv_rec.representation_code;
3126     p6_a92 := ddx_tcnv_rec.upgrade_status_flag;
3127     p6_a93 := ddx_tcnv_rec.transaction_date;
3128   end;
3129 
3130   procedure update_trx_contracts(p_api_version  NUMBER
3131     , p_init_msg_list  VARCHAR2
3132     , x_return_status out nocopy  VARCHAR2
3133     , x_msg_count out nocopy  NUMBER
3134     , x_msg_data out nocopy  VARCHAR2
3135     , p5_a0 JTF_NUMBER_TABLE
3136     , p5_a1 JTF_NUMBER_TABLE
3137     , p5_a2 JTF_VARCHAR2_TABLE_100
3138     , p5_a3 JTF_VARCHAR2_TABLE_100
3139     , p5_a4 JTF_VARCHAR2_TABLE_100
3140     , p5_a5 JTF_VARCHAR2_TABLE_100
3141     , p5_a6 JTF_NUMBER_TABLE
3142     , p5_a7 JTF_NUMBER_TABLE
3143     , p5_a8 JTF_NUMBER_TABLE
3144     , p5_a9 JTF_NUMBER_TABLE
3145     , p5_a10 JTF_NUMBER_TABLE
3146     , p5_a11 JTF_NUMBER_TABLE
3147     , p5_a12 JTF_VARCHAR2_TABLE_100
3148     , p5_a13 JTF_VARCHAR2_TABLE_100
3149     , p5_a14 JTF_DATE_TABLE
3150     , p5_a15 JTF_VARCHAR2_TABLE_100
3151     , p5_a16 JTF_VARCHAR2_TABLE_100
3152     , p5_a17 JTF_NUMBER_TABLE
3153     , p5_a18 JTF_VARCHAR2_TABLE_200
3154     , p5_a19 JTF_VARCHAR2_TABLE_100
3155     , p5_a20 JTF_VARCHAR2_TABLE_500
3156     , p5_a21 JTF_VARCHAR2_TABLE_500
3157     , p5_a22 JTF_VARCHAR2_TABLE_500
3158     , p5_a23 JTF_VARCHAR2_TABLE_500
3159     , p5_a24 JTF_VARCHAR2_TABLE_500
3160     , p5_a25 JTF_VARCHAR2_TABLE_500
3161     , p5_a26 JTF_VARCHAR2_TABLE_500
3162     , p5_a27 JTF_VARCHAR2_TABLE_500
3163     , p5_a28 JTF_VARCHAR2_TABLE_500
3164     , p5_a29 JTF_VARCHAR2_TABLE_500
3165     , p5_a30 JTF_VARCHAR2_TABLE_500
3166     , p5_a31 JTF_VARCHAR2_TABLE_500
3167     , p5_a32 JTF_VARCHAR2_TABLE_500
3168     , p5_a33 JTF_VARCHAR2_TABLE_500
3169     , p5_a34 JTF_VARCHAR2_TABLE_500
3170     , p5_a35 JTF_VARCHAR2_TABLE_100
3171     , p5_a36 JTF_VARCHAR2_TABLE_100
3172     , p5_a37 JTF_NUMBER_TABLE
3173     , p5_a38 JTF_VARCHAR2_TABLE_100
3174     , p5_a39 JTF_NUMBER_TABLE
3175     , p5_a40 JTF_VARCHAR2_TABLE_100
3176     , p5_a41 JTF_VARCHAR2_TABLE_100
3177     , p5_a42 JTF_NUMBER_TABLE
3178     , p5_a43 JTF_NUMBER_TABLE
3179     , p5_a44 JTF_NUMBER_TABLE
3180     , p5_a45 JTF_NUMBER_TABLE
3181     , p5_a46 JTF_NUMBER_TABLE
3182     , p5_a47 JTF_NUMBER_TABLE
3183     , p5_a48 JTF_DATE_TABLE
3184     , p5_a49 JTF_NUMBER_TABLE
3185     , p5_a50 JTF_DATE_TABLE
3186     , p5_a51 JTF_NUMBER_TABLE
3187     , p5_a52 JTF_DATE_TABLE
3188     , p5_a53 JTF_NUMBER_TABLE
3189     , p5_a54 JTF_NUMBER_TABLE
3190     , p5_a55 JTF_VARCHAR2_TABLE_100
3191     , p5_a56 JTF_NUMBER_TABLE
3192     , p5_a57 JTF_VARCHAR2_TABLE_2000
3193     , p5_a58 JTF_DATE_TABLE
3194     , p5_a59 JTF_VARCHAR2_TABLE_100
3195     , p5_a60 JTF_VARCHAR2_TABLE_100
3196     , p5_a61 JTF_VARCHAR2_TABLE_100
3197     , p5_a62 JTF_VARCHAR2_TABLE_100
3198     , p5_a63 JTF_VARCHAR2_TABLE_100
3199     , p5_a64 JTF_VARCHAR2_TABLE_100
3200     , p5_a65 JTF_VARCHAR2_TABLE_100
3201     , p5_a66 JTF_VARCHAR2_TABLE_100
3202     , p5_a67 JTF_VARCHAR2_TABLE_100
3203     , p5_a68 JTF_VARCHAR2_TABLE_100
3204     , p5_a69 JTF_VARCHAR2_TABLE_100
3205     , p5_a70 JTF_VARCHAR2_TABLE_100
3206     , p5_a71 JTF_VARCHAR2_TABLE_100
3207     , p5_a72 JTF_VARCHAR2_TABLE_100
3208     , p5_a73 JTF_VARCHAR2_TABLE_100
3209     , p5_a74 JTF_VARCHAR2_TABLE_100
3210     , p5_a75 JTF_VARCHAR2_TABLE_100
3211     , p5_a76 JTF_VARCHAR2_TABLE_100
3212     , p5_a77 JTF_NUMBER_TABLE
3213     , p5_a78 JTF_DATE_TABLE
3214     , p5_a79 JTF_NUMBER_TABLE
3215     , p5_a80 JTF_NUMBER_TABLE
3216     , p5_a81 JTF_VARCHAR2_TABLE_100
3217     , p5_a82 JTF_DATE_TABLE
3218     , p5_a83 JTF_NUMBER_TABLE
3219     , p5_a84 JTF_DATE_TABLE
3220     , p5_a85 JTF_VARCHAR2_TABLE_100
3221     , p5_a86 JTF_VARCHAR2_TABLE_200
3222     , p5_a87 JTF_VARCHAR2_TABLE_100
3223     , p5_a88 JTF_VARCHAR2_TABLE_200
3224     , p5_a89 JTF_VARCHAR2_TABLE_100
3225     , p5_a90 JTF_VARCHAR2_TABLE_100
3226     , p5_a91 JTF_VARCHAR2_TABLE_100
3227     , p5_a92 JTF_VARCHAR2_TABLE_100
3228     , p5_a93 JTF_DATE_TABLE
3229     , p6_a0 out nocopy JTF_NUMBER_TABLE
3230     , p6_a1 out nocopy JTF_NUMBER_TABLE
3231     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
3232     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
3233     , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
3234     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
3235     , p6_a6 out nocopy JTF_NUMBER_TABLE
3236     , p6_a7 out nocopy JTF_NUMBER_TABLE
3237     , p6_a8 out nocopy JTF_NUMBER_TABLE
3238     , p6_a9 out nocopy JTF_NUMBER_TABLE
3239     , p6_a10 out nocopy JTF_NUMBER_TABLE
3240     , p6_a11 out nocopy JTF_NUMBER_TABLE
3241     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
3242     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
3243     , p6_a14 out nocopy JTF_DATE_TABLE
3244     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
3245     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_100
3246     , p6_a17 out nocopy JTF_NUMBER_TABLE
3247     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_200
3248     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_100
3249     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
3250     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
3251     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
3252     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
3253     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
3254     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
3255     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
3256     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
3257     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
3258     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
3259     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
3260     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
3261     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
3262     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
3263     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
3264     , p6_a35 out nocopy JTF_VARCHAR2_TABLE_100
3265     , p6_a36 out nocopy JTF_VARCHAR2_TABLE_100
3266     , p6_a37 out nocopy JTF_NUMBER_TABLE
3267     , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
3268     , p6_a39 out nocopy JTF_NUMBER_TABLE
3269     , p6_a40 out nocopy JTF_VARCHAR2_TABLE_100
3270     , p6_a41 out nocopy JTF_VARCHAR2_TABLE_100
3271     , p6_a42 out nocopy JTF_NUMBER_TABLE
3272     , p6_a43 out nocopy JTF_NUMBER_TABLE
3273     , p6_a44 out nocopy JTF_NUMBER_TABLE
3274     , p6_a45 out nocopy JTF_NUMBER_TABLE
3275     , p6_a46 out nocopy JTF_NUMBER_TABLE
3276     , p6_a47 out nocopy JTF_NUMBER_TABLE
3277     , p6_a48 out nocopy JTF_DATE_TABLE
3278     , p6_a49 out nocopy JTF_NUMBER_TABLE
3279     , p6_a50 out nocopy JTF_DATE_TABLE
3280     , p6_a51 out nocopy JTF_NUMBER_TABLE
3281     , p6_a52 out nocopy JTF_DATE_TABLE
3282     , p6_a53 out nocopy JTF_NUMBER_TABLE
3283     , p6_a54 out nocopy JTF_NUMBER_TABLE
3284     , p6_a55 out nocopy JTF_VARCHAR2_TABLE_100
3285     , p6_a56 out nocopy JTF_NUMBER_TABLE
3286     , p6_a57 out nocopy JTF_VARCHAR2_TABLE_2000
3287     , p6_a58 out nocopy JTF_DATE_TABLE
3288     , p6_a59 out nocopy JTF_VARCHAR2_TABLE_100
3289     , p6_a60 out nocopy JTF_VARCHAR2_TABLE_100
3290     , p6_a61 out nocopy JTF_VARCHAR2_TABLE_100
3291     , p6_a62 out nocopy JTF_VARCHAR2_TABLE_100
3292     , p6_a63 out nocopy JTF_VARCHAR2_TABLE_100
3293     , p6_a64 out nocopy JTF_VARCHAR2_TABLE_100
3294     , p6_a65 out nocopy JTF_VARCHAR2_TABLE_100
3295     , p6_a66 out nocopy JTF_VARCHAR2_TABLE_100
3296     , p6_a67 out nocopy JTF_VARCHAR2_TABLE_100
3297     , p6_a68 out nocopy JTF_VARCHAR2_TABLE_100
3298     , p6_a69 out nocopy JTF_VARCHAR2_TABLE_100
3299     , p6_a70 out nocopy JTF_VARCHAR2_TABLE_100
3300     , p6_a71 out nocopy JTF_VARCHAR2_TABLE_100
3301     , p6_a72 out nocopy JTF_VARCHAR2_TABLE_100
3302     , p6_a73 out nocopy JTF_VARCHAR2_TABLE_100
3303     , p6_a74 out nocopy JTF_VARCHAR2_TABLE_100
3304     , p6_a75 out nocopy JTF_VARCHAR2_TABLE_100
3305     , p6_a76 out nocopy JTF_VARCHAR2_TABLE_100
3306     , p6_a77 out nocopy JTF_NUMBER_TABLE
3307     , p6_a78 out nocopy JTF_DATE_TABLE
3308     , p6_a79 out nocopy JTF_NUMBER_TABLE
3309     , p6_a80 out nocopy JTF_NUMBER_TABLE
3310     , p6_a81 out nocopy JTF_VARCHAR2_TABLE_100
3311     , p6_a82 out nocopy JTF_DATE_TABLE
3312     , p6_a83 out nocopy JTF_NUMBER_TABLE
3313     , p6_a84 out nocopy JTF_DATE_TABLE
3314     , p6_a85 out nocopy JTF_VARCHAR2_TABLE_100
3315     , p6_a86 out nocopy JTF_VARCHAR2_TABLE_200
3316     , p6_a87 out nocopy JTF_VARCHAR2_TABLE_100
3317     , p6_a88 out nocopy JTF_VARCHAR2_TABLE_200
3318     , p6_a89 out nocopy JTF_VARCHAR2_TABLE_100
3319     , p6_a90 out nocopy JTF_VARCHAR2_TABLE_100
3320     , p6_a91 out nocopy JTF_VARCHAR2_TABLE_100
3321     , p6_a92 out nocopy JTF_VARCHAR2_TABLE_100
3322     , p6_a93 out nocopy JTF_DATE_TABLE
3323   )
3324 
3325   as
3326     ddp_tcnv_tbl okl_trans_contracts_pvt.tcnv_tbl_type;
3327     ddx_tcnv_tbl okl_trans_contracts_pvt.tcnv_tbl_type;
3328     ddindx binary_integer; indx binary_integer;
3329   begin
3330 
3331     -- copy data to the local IN or IN-OUT args, if any
3332 
3333 
3334 
3335 
3336 
3337     okl_tcn_pvt_w.rosetta_table_copy_in_p5(ddp_tcnv_tbl, p5_a0
3338       , p5_a1
3339       , p5_a2
3340       , p5_a3
3341       , p5_a4
3342       , p5_a5
3343       , p5_a6
3344       , p5_a7
3345       , p5_a8
3346       , p5_a9
3347       , p5_a10
3348       , p5_a11
3349       , p5_a12
3350       , p5_a13
3351       , p5_a14
3352       , p5_a15
3353       , p5_a16
3354       , p5_a17
3355       , p5_a18
3356       , p5_a19
3357       , p5_a20
3358       , p5_a21
3359       , p5_a22
3360       , p5_a23
3361       , p5_a24
3362       , p5_a25
3363       , p5_a26
3364       , p5_a27
3365       , p5_a28
3366       , p5_a29
3367       , p5_a30
3368       , p5_a31
3369       , p5_a32
3370       , p5_a33
3371       , p5_a34
3372       , p5_a35
3373       , p5_a36
3374       , p5_a37
3375       , p5_a38
3376       , p5_a39
3377       , p5_a40
3378       , p5_a41
3379       , p5_a42
3380       , p5_a43
3381       , p5_a44
3382       , p5_a45
3383       , p5_a46
3384       , p5_a47
3385       , p5_a48
3386       , p5_a49
3387       , p5_a50
3388       , p5_a51
3389       , p5_a52
3390       , p5_a53
3391       , p5_a54
3392       , p5_a55
3393       , p5_a56
3394       , p5_a57
3395       , p5_a58
3396       , p5_a59
3397       , p5_a60
3398       , p5_a61
3399       , p5_a62
3400       , p5_a63
3401       , p5_a64
3402       , p5_a65
3403       , p5_a66
3404       , p5_a67
3405       , p5_a68
3406       , p5_a69
3407       , p5_a70
3408       , p5_a71
3409       , p5_a72
3410       , p5_a73
3411       , p5_a74
3412       , p5_a75
3413       , p5_a76
3414       , p5_a77
3415       , p5_a78
3416       , p5_a79
3417       , p5_a80
3418       , p5_a81
3419       , p5_a82
3420       , p5_a83
3421       , p5_a84
3422       , p5_a85
3423       , p5_a86
3424       , p5_a87
3425       , p5_a88
3426       , p5_a89
3427       , p5_a90
3428       , p5_a91
3429       , p5_a92
3430       , p5_a93
3431       );
3432 
3433 
3434     -- here's the delegated call to the old PL/SQL routine
3435     okl_trans_contracts_pvt.update_trx_contracts(p_api_version,
3436       p_init_msg_list,
3437       x_return_status,
3438       x_msg_count,
3439       x_msg_data,
3440       ddp_tcnv_tbl,
3441       ddx_tcnv_tbl);
3442 
3443     -- copy data back from the local variables to OUT or IN-OUT args, if any
3444 
3445 
3446 
3447 
3448 
3449 
3450     okl_tcn_pvt_w.rosetta_table_copy_out_p5(ddx_tcnv_tbl, p6_a0
3451       , p6_a1
3452       , p6_a2
3453       , p6_a3
3454       , p6_a4
3455       , p6_a5
3456       , p6_a6
3457       , p6_a7
3458       , p6_a8
3459       , p6_a9
3460       , p6_a10
3461       , p6_a11
3462       , p6_a12
3463       , p6_a13
3464       , p6_a14
3465       , p6_a15
3466       , p6_a16
3467       , p6_a17
3468       , p6_a18
3469       , p6_a19
3470       , p6_a20
3471       , p6_a21
3472       , p6_a22
3473       , p6_a23
3474       , p6_a24
3475       , p6_a25
3476       , p6_a26
3477       , p6_a27
3478       , p6_a28
3479       , p6_a29
3480       , p6_a30
3481       , p6_a31
3482       , p6_a32
3483       , p6_a33
3484       , p6_a34
3485       , p6_a35
3486       , p6_a36
3487       , p6_a37
3488       , p6_a38
3489       , p6_a39
3490       , p6_a40
3491       , p6_a41
3492       , p6_a42
3493       , p6_a43
3494       , p6_a44
3495       , p6_a45
3496       , p6_a46
3497       , p6_a47
3498       , p6_a48
3499       , p6_a49
3500       , p6_a50
3501       , p6_a51
3502       , p6_a52
3503       , p6_a53
3504       , p6_a54
3505       , p6_a55
3506       , p6_a56
3507       , p6_a57
3508       , p6_a58
3509       , p6_a59
3510       , p6_a60
3511       , p6_a61
3512       , p6_a62
3513       , p6_a63
3514       , p6_a64
3515       , p6_a65
3516       , p6_a66
3517       , p6_a67
3518       , p6_a68
3519       , p6_a69
3520       , p6_a70
3521       , p6_a71
3522       , p6_a72
3523       , p6_a73
3524       , p6_a74
3525       , p6_a75
3526       , p6_a76
3527       , p6_a77
3528       , p6_a78
3529       , p6_a79
3530       , p6_a80
3531       , p6_a81
3532       , p6_a82
3533       , p6_a83
3534       , p6_a84
3535       , p6_a85
3536       , p6_a86
3537       , p6_a87
3538       , p6_a88
3539       , p6_a89
3540       , p6_a90
3541       , p6_a91
3542       , p6_a92
3543       , p6_a93
3544       );
3545   end;
3546 
3547   procedure update_trx_cntrct_lines(p_api_version  NUMBER
3548     , p_init_msg_list  VARCHAR2
3549     , x_return_status out nocopy  VARCHAR2
3550     , x_msg_count out nocopy  NUMBER
3551     , x_msg_data out nocopy  VARCHAR2
3552     , p6_a0 out nocopy  NUMBER
3553     , p6_a1 out nocopy  NUMBER
3554     , p6_a2 out nocopy  NUMBER
3555     , p6_a3 out nocopy  NUMBER
3556     , p6_a4 out nocopy  NUMBER
3557     , p6_a5 out nocopy  NUMBER
3558     , p6_a6 out nocopy  NUMBER
3559     , p6_a7 out nocopy  NUMBER
3560     , p6_a8 out nocopy  VARCHAR2
3561     , p6_a9 out nocopy  NUMBER
3562     , p6_a10 out nocopy  VARCHAR2
3563     , p6_a11 out nocopy  NUMBER
3564     , p6_a12 out nocopy  VARCHAR2
3565     , p6_a13 out nocopy  VARCHAR2
3566     , p6_a14 out nocopy  VARCHAR2
3567     , p6_a15 out nocopy  VARCHAR2
3568     , p6_a16 out nocopy  VARCHAR2
3569     , p6_a17 out nocopy  VARCHAR2
3570     , p6_a18 out nocopy  VARCHAR2
3571     , p6_a19 out nocopy  VARCHAR2
3572     , p6_a20 out nocopy  VARCHAR2
3573     , p6_a21 out nocopy  VARCHAR2
3574     , p6_a22 out nocopy  VARCHAR2
3575     , p6_a23 out nocopy  VARCHAR2
3576     , p6_a24 out nocopy  VARCHAR2
3577     , p6_a25 out nocopy  VARCHAR2
3578     , p6_a26 out nocopy  VARCHAR2
3579     , p6_a27 out nocopy  VARCHAR2
3580     , p6_a28 out nocopy  VARCHAR2
3581     , p6_a29 out nocopy  VARCHAR2
3582     , p6_a30 out nocopy  VARCHAR2
3583     , p6_a31 out nocopy  NUMBER
3584     , p6_a32 out nocopy  DATE
3585     , p6_a33 out nocopy  NUMBER
3586     , p6_a34 out nocopy  DATE
3587     , p6_a35 out nocopy  NUMBER
3588     , p6_a36 out nocopy  NUMBER
3589     , p6_a37 out nocopy  NUMBER
3590     , p6_a38 out nocopy  NUMBER
3591     , p6_a39 out nocopy  DATE
3592     , p6_a40 out nocopy  NUMBER
3593     , p6_a41 out nocopy  NUMBER
3594     , p6_a42 out nocopy  NUMBER
3595     , p6_a43 out nocopy  NUMBER
3596     , p6_a44 out nocopy  NUMBER
3597     , p6_a45 out nocopy  VARCHAR2
3598     , p6_a46 out nocopy  VARCHAR2
3599     , p6_a47 out nocopy  NUMBER
3600     , p6_a48 out nocopy  VARCHAR2
3601     , p6_a49 out nocopy  NUMBER
3602     , p6_a50 out nocopy  VARCHAR2
3603     , p6_a51 out nocopy  NUMBER
3604     , p6_a52 out nocopy  DATE
3605     , p6_a53 out nocopy  NUMBER
3606     , p6_a54 out nocopy  VARCHAR2
3607     , p6_a55 out nocopy  VARCHAR2
3608     , p6_a56 out nocopy  VARCHAR2
3609     , p6_a57 out nocopy  VARCHAR2
3610     , p5_a0  NUMBER := 0-1962.0724
3611     , p5_a1  NUMBER := 0-1962.0724
3612     , p5_a2  NUMBER := 0-1962.0724
3613     , p5_a3  NUMBER := 0-1962.0724
3614     , p5_a4  NUMBER := 0-1962.0724
3615     , p5_a5  NUMBER := 0-1962.0724
3616     , p5_a6  NUMBER := 0-1962.0724
3617     , p5_a7  NUMBER := 0-1962.0724
3618     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
3619     , p5_a9  NUMBER := 0-1962.0724
3620     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
3621     , p5_a11  NUMBER := 0-1962.0724
3622     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
3623     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
3624     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
3625     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
3626     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
3627     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
3628     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
3629     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
3630     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
3631     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
3632     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
3633     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
3634     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
3635     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
3636     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
3637     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
3638     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
3639     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
3640     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
3641     , p5_a31  NUMBER := 0-1962.0724
3642     , p5_a32  DATE := fnd_api.g_miss_date
3643     , p5_a33  NUMBER := 0-1962.0724
3644     , p5_a34  DATE := fnd_api.g_miss_date
3645     , p5_a35  NUMBER := 0-1962.0724
3646     , p5_a36  NUMBER := 0-1962.0724
3647     , p5_a37  NUMBER := 0-1962.0724
3648     , p5_a38  NUMBER := 0-1962.0724
3649     , p5_a39  DATE := fnd_api.g_miss_date
3650     , p5_a40  NUMBER := 0-1962.0724
3651     , p5_a41  NUMBER := 0-1962.0724
3652     , p5_a42  NUMBER := 0-1962.0724
3653     , p5_a43  NUMBER := 0-1962.0724
3654     , p5_a44  NUMBER := 0-1962.0724
3655     , p5_a45  VARCHAR2 := fnd_api.g_miss_char
3656     , p5_a46  VARCHAR2 := fnd_api.g_miss_char
3657     , p5_a47  NUMBER := 0-1962.0724
3658     , p5_a48  VARCHAR2 := fnd_api.g_miss_char
3659     , p5_a49  NUMBER := 0-1962.0724
3660     , p5_a50  VARCHAR2 := fnd_api.g_miss_char
3661     , p5_a51  NUMBER := 0-1962.0724
3662     , p5_a52  DATE := fnd_api.g_miss_date
3663     , p5_a53  NUMBER := 0-1962.0724
3664     , p5_a54  VARCHAR2 := fnd_api.g_miss_char
3665     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
3666     , p5_a56  VARCHAR2 := fnd_api.g_miss_char
3667     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
3668   )
3669 
3670   as
3671     ddp_tclv_rec okl_trans_contracts_pvt.tclv_rec_type;
3672     ddx_tclv_rec okl_trans_contracts_pvt.tclv_rec_type;
3673     ddindx binary_integer; indx binary_integer;
3674   begin
3675 
3676     -- copy data to the local IN or IN-OUT args, if any
3677 
3678 
3679 
3680 
3681 
3682     ddp_tclv_rec.id := rosetta_g_miss_num_map(p5_a0);
3683     ddp_tclv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
3684     ddp_tclv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
3685     ddp_tclv_rec.rct_id := rosetta_g_miss_num_map(p5_a3);
3686     ddp_tclv_rec.btc_id := rosetta_g_miss_num_map(p5_a4);
3687     ddp_tclv_rec.tcn_id := rosetta_g_miss_num_map(p5_a5);
3688     ddp_tclv_rec.khr_id := rosetta_g_miss_num_map(p5_a6);
3689     ddp_tclv_rec.kle_id := rosetta_g_miss_num_map(p5_a7);
3690     ddp_tclv_rec.before_transfer_yn := p5_a8;
3691     ddp_tclv_rec.line_number := rosetta_g_miss_num_map(p5_a9);
3692     ddp_tclv_rec.description := p5_a10;
3693     ddp_tclv_rec.amount := rosetta_g_miss_num_map(p5_a11);
3694     ddp_tclv_rec.currency_code := p5_a12;
3695     ddp_tclv_rec.gl_reversal_yn := p5_a13;
3696     ddp_tclv_rec.attribute_category := p5_a14;
3697     ddp_tclv_rec.attribute1 := p5_a15;
3698     ddp_tclv_rec.attribute2 := p5_a16;
3699     ddp_tclv_rec.attribute3 := p5_a17;
3700     ddp_tclv_rec.attribute4 := p5_a18;
3701     ddp_tclv_rec.attribute5 := p5_a19;
3702     ddp_tclv_rec.attribute6 := p5_a20;
3703     ddp_tclv_rec.attribute7 := p5_a21;
3704     ddp_tclv_rec.attribute8 := p5_a22;
3705     ddp_tclv_rec.attribute9 := p5_a23;
3706     ddp_tclv_rec.attribute10 := p5_a24;
3707     ddp_tclv_rec.attribute11 := p5_a25;
3708     ddp_tclv_rec.attribute12 := p5_a26;
3709     ddp_tclv_rec.attribute13 := p5_a27;
3710     ddp_tclv_rec.attribute14 := p5_a28;
3711     ddp_tclv_rec.attribute15 := p5_a29;
3712     ddp_tclv_rec.tcl_type := p5_a30;
3713     ddp_tclv_rec.created_by := rosetta_g_miss_num_map(p5_a31);
3714     ddp_tclv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a32);
3715     ddp_tclv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a33);
3716     ddp_tclv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a34);
3717     ddp_tclv_rec.org_id := rosetta_g_miss_num_map(p5_a35);
3718     ddp_tclv_rec.program_id := rosetta_g_miss_num_map(p5_a36);
3719     ddp_tclv_rec.program_application_id := rosetta_g_miss_num_map(p5_a37);
3720     ddp_tclv_rec.request_id := rosetta_g_miss_num_map(p5_a38);
3721     ddp_tclv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a39);
3722     ddp_tclv_rec.last_update_login := rosetta_g_miss_num_map(p5_a40);
3723     ddp_tclv_rec.avl_id := rosetta_g_miss_num_map(p5_a41);
3724     ddp_tclv_rec.bkt_id := rosetta_g_miss_num_map(p5_a42);
3725     ddp_tclv_rec.kle_id_new := rosetta_g_miss_num_map(p5_a43);
3726     ddp_tclv_rec.percentage := rosetta_g_miss_num_map(p5_a44);
3727     ddp_tclv_rec.accrual_rule_yn := p5_a45;
3728     ddp_tclv_rec.source_column_1 := p5_a46;
3729     ddp_tclv_rec.source_value_1 := rosetta_g_miss_num_map(p5_a47);
3730     ddp_tclv_rec.source_column_2 := p5_a48;
3731     ddp_tclv_rec.source_value_2 := rosetta_g_miss_num_map(p5_a49);
3732     ddp_tclv_rec.source_column_3 := p5_a50;
3733     ddp_tclv_rec.source_value_3 := rosetta_g_miss_num_map(p5_a51);
3734     ddp_tclv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a52);
3735     ddp_tclv_rec.tax_line_id := rosetta_g_miss_num_map(p5_a53);
3736     ddp_tclv_rec.stream_type_code := p5_a54;
3737     ddp_tclv_rec.stream_type_purpose := p5_a55;
3738     ddp_tclv_rec.asset_book_type_name := p5_a56;
3739     ddp_tclv_rec.upgrade_status_flag := p5_a57;
3740 
3741 
3742     -- here's the delegated call to the old PL/SQL routine
3743     okl_trans_contracts_pvt.update_trx_cntrct_lines(p_api_version,
3744       p_init_msg_list,
3745       x_return_status,
3746       x_msg_count,
3747       x_msg_data,
3748       ddp_tclv_rec,
3749       ddx_tclv_rec);
3750 
3751     -- copy data back from the local variables to OUT or IN-OUT args, if any
3752 
3753 
3754 
3755 
3756 
3757 
3758     p6_a0 := rosetta_g_miss_num_map(ddx_tclv_rec.id);
3759     p6_a1 := rosetta_g_miss_num_map(ddx_tclv_rec.object_version_number);
3760     p6_a2 := rosetta_g_miss_num_map(ddx_tclv_rec.sty_id);
3761     p6_a3 := rosetta_g_miss_num_map(ddx_tclv_rec.rct_id);
3762     p6_a4 := rosetta_g_miss_num_map(ddx_tclv_rec.btc_id);
3763     p6_a5 := rosetta_g_miss_num_map(ddx_tclv_rec.tcn_id);
3764     p6_a6 := rosetta_g_miss_num_map(ddx_tclv_rec.khr_id);
3765     p6_a7 := rosetta_g_miss_num_map(ddx_tclv_rec.kle_id);
3766     p6_a8 := ddx_tclv_rec.before_transfer_yn;
3767     p6_a9 := rosetta_g_miss_num_map(ddx_tclv_rec.line_number);
3768     p6_a10 := ddx_tclv_rec.description;
3769     p6_a11 := rosetta_g_miss_num_map(ddx_tclv_rec.amount);
3770     p6_a12 := ddx_tclv_rec.currency_code;
3771     p6_a13 := ddx_tclv_rec.gl_reversal_yn;
3772     p6_a14 := ddx_tclv_rec.attribute_category;
3773     p6_a15 := ddx_tclv_rec.attribute1;
3774     p6_a16 := ddx_tclv_rec.attribute2;
3775     p6_a17 := ddx_tclv_rec.attribute3;
3776     p6_a18 := ddx_tclv_rec.attribute4;
3777     p6_a19 := ddx_tclv_rec.attribute5;
3778     p6_a20 := ddx_tclv_rec.attribute6;
3779     p6_a21 := ddx_tclv_rec.attribute7;
3780     p6_a22 := ddx_tclv_rec.attribute8;
3781     p6_a23 := ddx_tclv_rec.attribute9;
3782     p6_a24 := ddx_tclv_rec.attribute10;
3783     p6_a25 := ddx_tclv_rec.attribute11;
3784     p6_a26 := ddx_tclv_rec.attribute12;
3785     p6_a27 := ddx_tclv_rec.attribute13;
3786     p6_a28 := ddx_tclv_rec.attribute14;
3787     p6_a29 := ddx_tclv_rec.attribute15;
3788     p6_a30 := ddx_tclv_rec.tcl_type;
3789     p6_a31 := rosetta_g_miss_num_map(ddx_tclv_rec.created_by);
3790     p6_a32 := ddx_tclv_rec.creation_date;
3791     p6_a33 := rosetta_g_miss_num_map(ddx_tclv_rec.last_updated_by);
3792     p6_a34 := ddx_tclv_rec.last_update_date;
3793     p6_a35 := rosetta_g_miss_num_map(ddx_tclv_rec.org_id);
3794     p6_a36 := rosetta_g_miss_num_map(ddx_tclv_rec.program_id);
3795     p6_a37 := rosetta_g_miss_num_map(ddx_tclv_rec.program_application_id);
3796     p6_a38 := rosetta_g_miss_num_map(ddx_tclv_rec.request_id);
3797     p6_a39 := ddx_tclv_rec.program_update_date;
3798     p6_a40 := rosetta_g_miss_num_map(ddx_tclv_rec.last_update_login);
3799     p6_a41 := rosetta_g_miss_num_map(ddx_tclv_rec.avl_id);
3800     p6_a42 := rosetta_g_miss_num_map(ddx_tclv_rec.bkt_id);
3801     p6_a43 := rosetta_g_miss_num_map(ddx_tclv_rec.kle_id_new);
3802     p6_a44 := rosetta_g_miss_num_map(ddx_tclv_rec.percentage);
3803     p6_a45 := ddx_tclv_rec.accrual_rule_yn;
3804     p6_a46 := ddx_tclv_rec.source_column_1;
3805     p6_a47 := rosetta_g_miss_num_map(ddx_tclv_rec.source_value_1);
3806     p6_a48 := ddx_tclv_rec.source_column_2;
3807     p6_a49 := rosetta_g_miss_num_map(ddx_tclv_rec.source_value_2);
3808     p6_a50 := ddx_tclv_rec.source_column_3;
3809     p6_a51 := rosetta_g_miss_num_map(ddx_tclv_rec.source_value_3);
3810     p6_a52 := ddx_tclv_rec.canceled_date;
3811     p6_a53 := rosetta_g_miss_num_map(ddx_tclv_rec.tax_line_id);
3812     p6_a54 := ddx_tclv_rec.stream_type_code;
3813     p6_a55 := ddx_tclv_rec.stream_type_purpose;
3814     p6_a56 := ddx_tclv_rec.asset_book_type_name;
3815     p6_a57 := ddx_tclv_rec.upgrade_status_flag;
3816   end;
3817 
3818   procedure update_trx_cntrct_lines(p_api_version  NUMBER
3819     , p_init_msg_list  VARCHAR2
3820     , x_return_status out nocopy  VARCHAR2
3821     , x_msg_count out nocopy  NUMBER
3822     , x_msg_data out nocopy  VARCHAR2
3823     , p5_a0 JTF_NUMBER_TABLE
3824     , p5_a1 JTF_NUMBER_TABLE
3825     , p5_a2 JTF_NUMBER_TABLE
3826     , p5_a3 JTF_NUMBER_TABLE
3827     , p5_a4 JTF_NUMBER_TABLE
3828     , p5_a5 JTF_NUMBER_TABLE
3829     , p5_a6 JTF_NUMBER_TABLE
3830     , p5_a7 JTF_NUMBER_TABLE
3831     , p5_a8 JTF_VARCHAR2_TABLE_100
3832     , p5_a9 JTF_NUMBER_TABLE
3833     , p5_a10 JTF_VARCHAR2_TABLE_2000
3834     , p5_a11 JTF_NUMBER_TABLE
3835     , p5_a12 JTF_VARCHAR2_TABLE_200
3836     , p5_a13 JTF_VARCHAR2_TABLE_100
3837     , p5_a14 JTF_VARCHAR2_TABLE_100
3838     , p5_a15 JTF_VARCHAR2_TABLE_500
3839     , p5_a16 JTF_VARCHAR2_TABLE_500
3840     , p5_a17 JTF_VARCHAR2_TABLE_500
3841     , p5_a18 JTF_VARCHAR2_TABLE_500
3842     , p5_a19 JTF_VARCHAR2_TABLE_500
3843     , p5_a20 JTF_VARCHAR2_TABLE_500
3844     , p5_a21 JTF_VARCHAR2_TABLE_500
3845     , p5_a22 JTF_VARCHAR2_TABLE_500
3846     , p5_a23 JTF_VARCHAR2_TABLE_500
3847     , p5_a24 JTF_VARCHAR2_TABLE_500
3848     , p5_a25 JTF_VARCHAR2_TABLE_500
3849     , p5_a26 JTF_VARCHAR2_TABLE_500
3850     , p5_a27 JTF_VARCHAR2_TABLE_500
3851     , p5_a28 JTF_VARCHAR2_TABLE_500
3852     , p5_a29 JTF_VARCHAR2_TABLE_500
3853     , p5_a30 JTF_VARCHAR2_TABLE_100
3854     , p5_a31 JTF_NUMBER_TABLE
3855     , p5_a32 JTF_DATE_TABLE
3856     , p5_a33 JTF_NUMBER_TABLE
3857     , p5_a34 JTF_DATE_TABLE
3858     , p5_a35 JTF_NUMBER_TABLE
3859     , p5_a36 JTF_NUMBER_TABLE
3860     , p5_a37 JTF_NUMBER_TABLE
3861     , p5_a38 JTF_NUMBER_TABLE
3862     , p5_a39 JTF_DATE_TABLE
3863     , p5_a40 JTF_NUMBER_TABLE
3864     , p5_a41 JTF_NUMBER_TABLE
3865     , p5_a42 JTF_NUMBER_TABLE
3866     , p5_a43 JTF_NUMBER_TABLE
3867     , p5_a44 JTF_NUMBER_TABLE
3868     , p5_a45 JTF_VARCHAR2_TABLE_100
3869     , p5_a46 JTF_VARCHAR2_TABLE_200
3870     , p5_a47 JTF_NUMBER_TABLE
3871     , p5_a48 JTF_VARCHAR2_TABLE_200
3872     , p5_a49 JTF_NUMBER_TABLE
3873     , p5_a50 JTF_VARCHAR2_TABLE_200
3874     , p5_a51 JTF_NUMBER_TABLE
3875     , p5_a52 JTF_DATE_TABLE
3876     , p5_a53 JTF_NUMBER_TABLE
3877     , p5_a54 JTF_VARCHAR2_TABLE_200
3878     , p5_a55 JTF_VARCHAR2_TABLE_300
3879     , p5_a56 JTF_VARCHAR2_TABLE_100
3880     , p5_a57 JTF_VARCHAR2_TABLE_100
3881     , p6_a0 out nocopy JTF_NUMBER_TABLE
3882     , p6_a1 out nocopy JTF_NUMBER_TABLE
3883     , p6_a2 out nocopy JTF_NUMBER_TABLE
3884     , p6_a3 out nocopy JTF_NUMBER_TABLE
3885     , p6_a4 out nocopy JTF_NUMBER_TABLE
3886     , p6_a5 out nocopy JTF_NUMBER_TABLE
3887     , p6_a6 out nocopy JTF_NUMBER_TABLE
3888     , p6_a7 out nocopy JTF_NUMBER_TABLE
3889     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
3890     , p6_a9 out nocopy JTF_NUMBER_TABLE
3891     , p6_a10 out nocopy JTF_VARCHAR2_TABLE_2000
3892     , p6_a11 out nocopy JTF_NUMBER_TABLE
3893     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_200
3894     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
3895     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
3896     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
3897     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
3898     , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
3899     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
3900     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
3901     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
3902     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
3903     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
3904     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
3905     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
3906     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
3907     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
3908     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
3909     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
3910     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
3911     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
3912     , p6_a31 out nocopy JTF_NUMBER_TABLE
3913     , p6_a32 out nocopy JTF_DATE_TABLE
3914     , p6_a33 out nocopy JTF_NUMBER_TABLE
3915     , p6_a34 out nocopy JTF_DATE_TABLE
3916     , p6_a35 out nocopy JTF_NUMBER_TABLE
3917     , p6_a36 out nocopy JTF_NUMBER_TABLE
3918     , p6_a37 out nocopy JTF_NUMBER_TABLE
3919     , p6_a38 out nocopy JTF_NUMBER_TABLE
3920     , p6_a39 out nocopy JTF_DATE_TABLE
3921     , p6_a40 out nocopy JTF_NUMBER_TABLE
3922     , p6_a41 out nocopy JTF_NUMBER_TABLE
3923     , p6_a42 out nocopy JTF_NUMBER_TABLE
3924     , p6_a43 out nocopy JTF_NUMBER_TABLE
3925     , p6_a44 out nocopy JTF_NUMBER_TABLE
3926     , p6_a45 out nocopy JTF_VARCHAR2_TABLE_100
3927     , p6_a46 out nocopy JTF_VARCHAR2_TABLE_200
3928     , p6_a47 out nocopy JTF_NUMBER_TABLE
3929     , p6_a48 out nocopy JTF_VARCHAR2_TABLE_200
3930     , p6_a49 out nocopy JTF_NUMBER_TABLE
3931     , p6_a50 out nocopy JTF_VARCHAR2_TABLE_200
3932     , p6_a51 out nocopy JTF_NUMBER_TABLE
3933     , p6_a52 out nocopy JTF_DATE_TABLE
3934     , p6_a53 out nocopy JTF_NUMBER_TABLE
3935     , p6_a54 out nocopy JTF_VARCHAR2_TABLE_200
3936     , p6_a55 out nocopy JTF_VARCHAR2_TABLE_300
3937     , p6_a56 out nocopy JTF_VARCHAR2_TABLE_100
3938     , p6_a57 out nocopy JTF_VARCHAR2_TABLE_100
3939   )
3940 
3941   as
3942     ddp_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
3943     ddx_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
3944     ddindx binary_integer; indx binary_integer;
3945   begin
3946 
3947     -- copy data to the local IN or IN-OUT args, if any
3948 
3949 
3950 
3951 
3952 
3953     okl_tcl_pvt_w.rosetta_table_copy_in_p5(ddp_tclv_tbl, p5_a0
3954       , p5_a1
3955       , p5_a2
3956       , p5_a3
3957       , p5_a4
3958       , p5_a5
3959       , p5_a6
3960       , p5_a7
3961       , p5_a8
3962       , p5_a9
3963       , p5_a10
3964       , p5_a11
3965       , p5_a12
3966       , p5_a13
3967       , p5_a14
3968       , p5_a15
3969       , p5_a16
3970       , p5_a17
3971       , p5_a18
3972       , p5_a19
3973       , p5_a20
3974       , p5_a21
3975       , p5_a22
3976       , p5_a23
3977       , p5_a24
3978       , p5_a25
3979       , p5_a26
3980       , p5_a27
3981       , p5_a28
3982       , p5_a29
3983       , p5_a30
3984       , p5_a31
3985       , p5_a32
3986       , p5_a33
3987       , p5_a34
3988       , p5_a35
3989       , p5_a36
3990       , p5_a37
3991       , p5_a38
3992       , p5_a39
3993       , p5_a40
3994       , p5_a41
3995       , p5_a42
3996       , p5_a43
3997       , p5_a44
3998       , p5_a45
3999       , p5_a46
4000       , p5_a47
4001       , p5_a48
4002       , p5_a49
4003       , p5_a50
4004       , p5_a51
4005       , p5_a52
4006       , p5_a53
4007       , p5_a54
4008       , p5_a55
4009       , p5_a56
4010       , p5_a57
4011       );
4012 
4013 
4014     -- here's the delegated call to the old PL/SQL routine
4015     okl_trans_contracts_pvt.update_trx_cntrct_lines(p_api_version,
4016       p_init_msg_list,
4017       x_return_status,
4018       x_msg_count,
4019       x_msg_data,
4020       ddp_tclv_tbl,
4021       ddx_tclv_tbl);
4022 
4023     -- copy data back from the local variables to OUT or IN-OUT args, if any
4024 
4025 
4026 
4027 
4028 
4029 
4030     okl_tcl_pvt_w.rosetta_table_copy_out_p5(ddx_tclv_tbl, p6_a0
4031       , p6_a1
4032       , p6_a2
4033       , p6_a3
4034       , p6_a4
4035       , p6_a5
4036       , p6_a6
4037       , p6_a7
4038       , p6_a8
4039       , p6_a9
4040       , p6_a10
4041       , p6_a11
4042       , p6_a12
4043       , p6_a13
4044       , p6_a14
4045       , p6_a15
4046       , p6_a16
4047       , p6_a17
4048       , p6_a18
4049       , p6_a19
4050       , p6_a20
4051       , p6_a21
4052       , p6_a22
4053       , p6_a23
4054       , p6_a24
4055       , p6_a25
4056       , p6_a26
4057       , p6_a27
4058       , p6_a28
4059       , p6_a29
4060       , p6_a30
4061       , p6_a31
4062       , p6_a32
4063       , p6_a33
4064       , p6_a34
4065       , p6_a35
4066       , p6_a36
4067       , p6_a37
4068       , p6_a38
4069       , p6_a39
4070       , p6_a40
4071       , p6_a41
4072       , p6_a42
4073       , p6_a43
4074       , p6_a44
4075       , p6_a45
4076       , p6_a46
4077       , p6_a47
4078       , p6_a48
4079       , p6_a49
4080       , p6_a50
4081       , p6_a51
4082       , p6_a52
4083       , p6_a53
4084       , p6_a54
4085       , p6_a55
4086       , p6_a56
4087       , p6_a57
4088       );
4089   end;
4090 
4091   procedure delete_trx_contracts(p_api_version  NUMBER
4092     , p_init_msg_list  VARCHAR2
4093     , x_return_status out nocopy  VARCHAR2
4094     , x_msg_count out nocopy  NUMBER
4095     , x_msg_data out nocopy  VARCHAR2
4096     , p5_a0  NUMBER := 0-1962.0724
4097     , p5_a1  NUMBER := 0-1962.0724
4098     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
4099     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
4100     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
4101     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
4102     , p5_a6  NUMBER := 0-1962.0724
4103     , p5_a7  NUMBER := 0-1962.0724
4104     , p5_a8  NUMBER := 0-1962.0724
4105     , p5_a9  NUMBER := 0-1962.0724
4106     , p5_a10  NUMBER := 0-1962.0724
4107     , p5_a11  NUMBER := 0-1962.0724
4108     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
4109     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
4110     , p5_a14  DATE := fnd_api.g_miss_date
4111     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
4112     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
4113     , p5_a17  NUMBER := 0-1962.0724
4114     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
4115     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
4116     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
4117     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
4118     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
4119     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
4120     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
4121     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
4122     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
4123     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
4124     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
4125     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
4126     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
4127     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
4128     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
4129     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
4130     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
4131     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
4132     , p5_a36  VARCHAR2 := fnd_api.g_miss_char
4133     , p5_a37  NUMBER := 0-1962.0724
4134     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
4135     , p5_a39  NUMBER := 0-1962.0724
4136     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
4137     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
4138     , p5_a42  NUMBER := 0-1962.0724
4139     , p5_a43  NUMBER := 0-1962.0724
4140     , p5_a44  NUMBER := 0-1962.0724
4141     , p5_a45  NUMBER := 0-1962.0724
4142     , p5_a46  NUMBER := 0-1962.0724
4143     , p5_a47  NUMBER := 0-1962.0724
4144     , p5_a48  DATE := fnd_api.g_miss_date
4145     , p5_a49  NUMBER := 0-1962.0724
4146     , p5_a50  DATE := fnd_api.g_miss_date
4147     , p5_a51  NUMBER := 0-1962.0724
4148     , p5_a52  DATE := fnd_api.g_miss_date
4149     , p5_a53  NUMBER := 0-1962.0724
4150     , p5_a54  NUMBER := 0-1962.0724
4151     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
4152     , p5_a56  NUMBER := 0-1962.0724
4153     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
4154     , p5_a58  DATE := fnd_api.g_miss_date
4155     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
4156     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
4157     , p5_a61  VARCHAR2 := fnd_api.g_miss_char
4158     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
4159     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
4160     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
4161     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
4162     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
4163     , p5_a67  VARCHAR2 := fnd_api.g_miss_char
4164     , p5_a68  VARCHAR2 := fnd_api.g_miss_char
4165     , p5_a69  VARCHAR2 := fnd_api.g_miss_char
4166     , p5_a70  VARCHAR2 := fnd_api.g_miss_char
4167     , p5_a71  VARCHAR2 := fnd_api.g_miss_char
4168     , p5_a72  VARCHAR2 := fnd_api.g_miss_char
4169     , p5_a73  VARCHAR2 := fnd_api.g_miss_char
4170     , p5_a74  VARCHAR2 := fnd_api.g_miss_char
4171     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
4172     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
4173     , p5_a77  NUMBER := 0-1962.0724
4174     , p5_a78  DATE := fnd_api.g_miss_date
4175     , p5_a79  NUMBER := 0-1962.0724
4176     , p5_a80  NUMBER := 0-1962.0724
4177     , p5_a81  VARCHAR2 := fnd_api.g_miss_char
4178     , p5_a82  DATE := fnd_api.g_miss_date
4179     , p5_a83  NUMBER := 0-1962.0724
4180     , p5_a84  DATE := fnd_api.g_miss_date
4181     , p5_a85  VARCHAR2 := fnd_api.g_miss_char
4182     , p5_a86  VARCHAR2 := fnd_api.g_miss_char
4183     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
4184     , p5_a88  VARCHAR2 := fnd_api.g_miss_char
4185     , p5_a89  VARCHAR2 := fnd_api.g_miss_char
4186     , p5_a90  VARCHAR2 := fnd_api.g_miss_char
4187     , p5_a91  VARCHAR2 := fnd_api.g_miss_char
4188     , p5_a92  VARCHAR2 := fnd_api.g_miss_char
4189     , p5_a93  DATE := fnd_api.g_miss_date
4190   )
4191 
4192   as
4193     ddp_tcnv_rec okl_trans_contracts_pvt.tcnv_rec_type;
4194     ddindx binary_integer; indx binary_integer;
4195   begin
4196 
4197     -- copy data to the local IN or IN-OUT args, if any
4198 
4199 
4200 
4201 
4202 
4203     ddp_tcnv_rec.id := rosetta_g_miss_num_map(p5_a0);
4204     ddp_tcnv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
4205     ddp_tcnv_rec.rbr_code := p5_a2;
4206     ddp_tcnv_rec.rpy_code := p5_a3;
4207     ddp_tcnv_rec.rvn_code := p5_a4;
4208     ddp_tcnv_rec.trn_code := p5_a5;
4209     ddp_tcnv_rec.khr_id_new := rosetta_g_miss_num_map(p5_a6);
4210     ddp_tcnv_rec.pvn_id := rosetta_g_miss_num_map(p5_a7);
4211     ddp_tcnv_rec.pdt_id := rosetta_g_miss_num_map(p5_a8);
4212     ddp_tcnv_rec.qte_id := rosetta_g_miss_num_map(p5_a9);
4213     ddp_tcnv_rec.aes_id := rosetta_g_miss_num_map(p5_a10);
4214     ddp_tcnv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a11);
4215     ddp_tcnv_rec.tax_deductible_local := p5_a12;
4216     ddp_tcnv_rec.tax_deductible_corporate := p5_a13;
4217     ddp_tcnv_rec.date_accrual := rosetta_g_miss_date_in_map(p5_a14);
4218     ddp_tcnv_rec.accrual_status_yn := p5_a15;
4219     ddp_tcnv_rec.update_status_yn := p5_a16;
4220     ddp_tcnv_rec.amount := rosetta_g_miss_num_map(p5_a17);
4221     ddp_tcnv_rec.currency_code := p5_a18;
4222     ddp_tcnv_rec.attribute_category := p5_a19;
4223     ddp_tcnv_rec.attribute1 := p5_a20;
4224     ddp_tcnv_rec.attribute2 := p5_a21;
4225     ddp_tcnv_rec.attribute3 := p5_a22;
4226     ddp_tcnv_rec.attribute4 := p5_a23;
4227     ddp_tcnv_rec.attribute5 := p5_a24;
4228     ddp_tcnv_rec.attribute6 := p5_a25;
4229     ddp_tcnv_rec.attribute7 := p5_a26;
4230     ddp_tcnv_rec.attribute8 := p5_a27;
4231     ddp_tcnv_rec.attribute9 := p5_a28;
4232     ddp_tcnv_rec.attribute10 := p5_a29;
4233     ddp_tcnv_rec.attribute11 := p5_a30;
4234     ddp_tcnv_rec.attribute12 := p5_a31;
4235     ddp_tcnv_rec.attribute13 := p5_a32;
4236     ddp_tcnv_rec.attribute14 := p5_a33;
4237     ddp_tcnv_rec.attribute15 := p5_a34;
4238     ddp_tcnv_rec.tcn_type := p5_a35;
4239     ddp_tcnv_rec.rjn_code := p5_a36;
4240     ddp_tcnv_rec.party_rel_id1_old := rosetta_g_miss_num_map(p5_a37);
4241     ddp_tcnv_rec.party_rel_id2_old := p5_a38;
4242     ddp_tcnv_rec.party_rel_id1_new := rosetta_g_miss_num_map(p5_a39);
4243     ddp_tcnv_rec.party_rel_id2_new := p5_a40;
4244     ddp_tcnv_rec.complete_transfer_yn := p5_a41;
4245     ddp_tcnv_rec.org_id := rosetta_g_miss_num_map(p5_a42);
4246     ddp_tcnv_rec.khr_id := rosetta_g_miss_num_map(p5_a43);
4247     ddp_tcnv_rec.request_id := rosetta_g_miss_num_map(p5_a44);
4248     ddp_tcnv_rec.program_application_id := rosetta_g_miss_num_map(p5_a45);
4249     ddp_tcnv_rec.khr_id_old := rosetta_g_miss_num_map(p5_a46);
4250     ddp_tcnv_rec.program_id := rosetta_g_miss_num_map(p5_a47);
4251     ddp_tcnv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a48);
4252     ddp_tcnv_rec.created_by := rosetta_g_miss_num_map(p5_a49);
4253     ddp_tcnv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a50);
4254     ddp_tcnv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a51);
4255     ddp_tcnv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
4256     ddp_tcnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
4257     ddp_tcnv_rec.try_id := rosetta_g_miss_num_map(p5_a54);
4258     ddp_tcnv_rec.tsu_code := p5_a55;
4259     ddp_tcnv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a56);
4260     ddp_tcnv_rec.description := p5_a57;
4261     ddp_tcnv_rec.date_transaction_occurred := rosetta_g_miss_date_in_map(p5_a58);
4262     ddp_tcnv_rec.trx_number := p5_a59;
4263     ddp_tcnv_rec.tmt_evergreen_yn := p5_a60;
4264     ddp_tcnv_rec.tmt_close_balances_yn := p5_a61;
4265     ddp_tcnv_rec.tmt_accounting_entries_yn := p5_a62;
4266     ddp_tcnv_rec.tmt_cancel_insurance_yn := p5_a63;
4267     ddp_tcnv_rec.tmt_asset_disposition_yn := p5_a64;
4268     ddp_tcnv_rec.tmt_amortization_yn := p5_a65;
4269     ddp_tcnv_rec.tmt_asset_return_yn := p5_a66;
4270     ddp_tcnv_rec.tmt_contract_updated_yn := p5_a67;
4271     ddp_tcnv_rec.tmt_recycle_yn := p5_a68;
4272     ddp_tcnv_rec.tmt_validated_yn := p5_a69;
4273     ddp_tcnv_rec.tmt_streams_updated_yn := p5_a70;
4274     ddp_tcnv_rec.accrual_activity := p5_a71;
4275     ddp_tcnv_rec.tmt_split_asset_yn := p5_a72;
4276     ddp_tcnv_rec.tmt_generic_flag1_yn := p5_a73;
4277     ddp_tcnv_rec.tmt_generic_flag2_yn := p5_a74;
4278     ddp_tcnv_rec.tmt_generic_flag3_yn := p5_a75;
4279     ddp_tcnv_rec.currency_conversion_type := p5_a76;
4280     ddp_tcnv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a77);
4281     ddp_tcnv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a78);
4282     ddp_tcnv_rec.chr_id := rosetta_g_miss_num_map(p5_a79);
4283     ddp_tcnv_rec.source_trx_id := rosetta_g_miss_num_map(p5_a80);
4284     ddp_tcnv_rec.source_trx_type := p5_a81;
4285     ddp_tcnv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a82);
4286     ddp_tcnv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a83);
4287     ddp_tcnv_rec.accrual_reversal_date := rosetta_g_miss_date_in_map(p5_a84);
4288     ddp_tcnv_rec.accounting_reversal_yn := p5_a85;
4289     ddp_tcnv_rec.product_name := p5_a86;
4290     ddp_tcnv_rec.book_classification_code := p5_a87;
4291     ddp_tcnv_rec.tax_owner_code := p5_a88;
4292     ddp_tcnv_rec.tmt_status_code := p5_a89;
4293     ddp_tcnv_rec.representation_name := p5_a90;
4294     ddp_tcnv_rec.representation_code := p5_a91;
4295     ddp_tcnv_rec.upgrade_status_flag := p5_a92;
4296     ddp_tcnv_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a93);
4297 
4298     -- here's the delegated call to the old PL/SQL routine
4299     okl_trans_contracts_pvt.delete_trx_contracts(p_api_version,
4300       p_init_msg_list,
4301       x_return_status,
4302       x_msg_count,
4303       x_msg_data,
4304       ddp_tcnv_rec);
4305 
4306     -- copy data back from the local variables to OUT or IN-OUT args, if any
4307 
4308 
4309 
4310 
4311 
4312   end;
4313 
4314   procedure delete_trx_contracts(p_api_version  NUMBER
4315     , p_init_msg_list  VARCHAR2
4316     , x_return_status out nocopy  VARCHAR2
4317     , x_msg_count out nocopy  NUMBER
4318     , x_msg_data out nocopy  VARCHAR2
4319     , p5_a0 JTF_NUMBER_TABLE
4320     , p5_a1 JTF_NUMBER_TABLE
4321     , p5_a2 JTF_VARCHAR2_TABLE_100
4322     , p5_a3 JTF_VARCHAR2_TABLE_100
4323     , p5_a4 JTF_VARCHAR2_TABLE_100
4324     , p5_a5 JTF_VARCHAR2_TABLE_100
4325     , p5_a6 JTF_NUMBER_TABLE
4326     , p5_a7 JTF_NUMBER_TABLE
4327     , p5_a8 JTF_NUMBER_TABLE
4328     , p5_a9 JTF_NUMBER_TABLE
4329     , p5_a10 JTF_NUMBER_TABLE
4330     , p5_a11 JTF_NUMBER_TABLE
4331     , p5_a12 JTF_VARCHAR2_TABLE_100
4332     , p5_a13 JTF_VARCHAR2_TABLE_100
4333     , p5_a14 JTF_DATE_TABLE
4334     , p5_a15 JTF_VARCHAR2_TABLE_100
4335     , p5_a16 JTF_VARCHAR2_TABLE_100
4336     , p5_a17 JTF_NUMBER_TABLE
4337     , p5_a18 JTF_VARCHAR2_TABLE_200
4338     , p5_a19 JTF_VARCHAR2_TABLE_100
4339     , p5_a20 JTF_VARCHAR2_TABLE_500
4340     , p5_a21 JTF_VARCHAR2_TABLE_500
4341     , p5_a22 JTF_VARCHAR2_TABLE_500
4342     , p5_a23 JTF_VARCHAR2_TABLE_500
4343     , p5_a24 JTF_VARCHAR2_TABLE_500
4344     , p5_a25 JTF_VARCHAR2_TABLE_500
4345     , p5_a26 JTF_VARCHAR2_TABLE_500
4346     , p5_a27 JTF_VARCHAR2_TABLE_500
4347     , p5_a28 JTF_VARCHAR2_TABLE_500
4348     , p5_a29 JTF_VARCHAR2_TABLE_500
4349     , p5_a30 JTF_VARCHAR2_TABLE_500
4350     , p5_a31 JTF_VARCHAR2_TABLE_500
4351     , p5_a32 JTF_VARCHAR2_TABLE_500
4352     , p5_a33 JTF_VARCHAR2_TABLE_500
4353     , p5_a34 JTF_VARCHAR2_TABLE_500
4354     , p5_a35 JTF_VARCHAR2_TABLE_100
4355     , p5_a36 JTF_VARCHAR2_TABLE_100
4356     , p5_a37 JTF_NUMBER_TABLE
4357     , p5_a38 JTF_VARCHAR2_TABLE_100
4358     , p5_a39 JTF_NUMBER_TABLE
4359     , p5_a40 JTF_VARCHAR2_TABLE_100
4360     , p5_a41 JTF_VARCHAR2_TABLE_100
4361     , p5_a42 JTF_NUMBER_TABLE
4362     , p5_a43 JTF_NUMBER_TABLE
4363     , p5_a44 JTF_NUMBER_TABLE
4364     , p5_a45 JTF_NUMBER_TABLE
4365     , p5_a46 JTF_NUMBER_TABLE
4366     , p5_a47 JTF_NUMBER_TABLE
4367     , p5_a48 JTF_DATE_TABLE
4368     , p5_a49 JTF_NUMBER_TABLE
4369     , p5_a50 JTF_DATE_TABLE
4370     , p5_a51 JTF_NUMBER_TABLE
4371     , p5_a52 JTF_DATE_TABLE
4372     , p5_a53 JTF_NUMBER_TABLE
4373     , p5_a54 JTF_NUMBER_TABLE
4374     , p5_a55 JTF_VARCHAR2_TABLE_100
4375     , p5_a56 JTF_NUMBER_TABLE
4376     , p5_a57 JTF_VARCHAR2_TABLE_2000
4377     , p5_a58 JTF_DATE_TABLE
4378     , p5_a59 JTF_VARCHAR2_TABLE_100
4379     , p5_a60 JTF_VARCHAR2_TABLE_100
4380     , p5_a61 JTF_VARCHAR2_TABLE_100
4381     , p5_a62 JTF_VARCHAR2_TABLE_100
4382     , p5_a63 JTF_VARCHAR2_TABLE_100
4383     , p5_a64 JTF_VARCHAR2_TABLE_100
4384     , p5_a65 JTF_VARCHAR2_TABLE_100
4385     , p5_a66 JTF_VARCHAR2_TABLE_100
4386     , p5_a67 JTF_VARCHAR2_TABLE_100
4387     , p5_a68 JTF_VARCHAR2_TABLE_100
4388     , p5_a69 JTF_VARCHAR2_TABLE_100
4389     , p5_a70 JTF_VARCHAR2_TABLE_100
4390     , p5_a71 JTF_VARCHAR2_TABLE_100
4391     , p5_a72 JTF_VARCHAR2_TABLE_100
4392     , p5_a73 JTF_VARCHAR2_TABLE_100
4393     , p5_a74 JTF_VARCHAR2_TABLE_100
4394     , p5_a75 JTF_VARCHAR2_TABLE_100
4395     , p5_a76 JTF_VARCHAR2_TABLE_100
4396     , p5_a77 JTF_NUMBER_TABLE
4397     , p5_a78 JTF_DATE_TABLE
4398     , p5_a79 JTF_NUMBER_TABLE
4399     , p5_a80 JTF_NUMBER_TABLE
4400     , p5_a81 JTF_VARCHAR2_TABLE_100
4401     , p5_a82 JTF_DATE_TABLE
4402     , p5_a83 JTF_NUMBER_TABLE
4403     , p5_a84 JTF_DATE_TABLE
4404     , p5_a85 JTF_VARCHAR2_TABLE_100
4405     , p5_a86 JTF_VARCHAR2_TABLE_200
4406     , p5_a87 JTF_VARCHAR2_TABLE_100
4407     , p5_a88 JTF_VARCHAR2_TABLE_200
4408     , p5_a89 JTF_VARCHAR2_TABLE_100
4409     , p5_a90 JTF_VARCHAR2_TABLE_100
4410     , p5_a91 JTF_VARCHAR2_TABLE_100
4411     , p5_a92 JTF_VARCHAR2_TABLE_100
4412     , p5_a93 JTF_DATE_TABLE
4413   )
4414 
4415   as
4416     ddp_tcnv_tbl okl_trans_contracts_pvt.tcnv_tbl_type;
4417     ddindx binary_integer; indx binary_integer;
4418   begin
4419 
4420     -- copy data to the local IN or IN-OUT args, if any
4421 
4422 
4423 
4424 
4425 
4426     okl_tcn_pvt_w.rosetta_table_copy_in_p5(ddp_tcnv_tbl, p5_a0
4427       , p5_a1
4428       , p5_a2
4429       , p5_a3
4430       , p5_a4
4431       , p5_a5
4432       , p5_a6
4433       , p5_a7
4434       , p5_a8
4435       , p5_a9
4436       , p5_a10
4437       , p5_a11
4438       , p5_a12
4439       , p5_a13
4440       , p5_a14
4441       , p5_a15
4442       , p5_a16
4443       , p5_a17
4444       , p5_a18
4445       , p5_a19
4446       , p5_a20
4447       , p5_a21
4448       , p5_a22
4449       , p5_a23
4450       , p5_a24
4451       , p5_a25
4452       , p5_a26
4453       , p5_a27
4454       , p5_a28
4455       , p5_a29
4456       , p5_a30
4457       , p5_a31
4458       , p5_a32
4459       , p5_a33
4460       , p5_a34
4461       , p5_a35
4462       , p5_a36
4463       , p5_a37
4464       , p5_a38
4465       , p5_a39
4466       , p5_a40
4467       , p5_a41
4468       , p5_a42
4469       , p5_a43
4470       , p5_a44
4471       , p5_a45
4472       , p5_a46
4473       , p5_a47
4474       , p5_a48
4475       , p5_a49
4476       , p5_a50
4477       , p5_a51
4478       , p5_a52
4479       , p5_a53
4480       , p5_a54
4481       , p5_a55
4482       , p5_a56
4483       , p5_a57
4484       , p5_a58
4485       , p5_a59
4486       , p5_a60
4487       , p5_a61
4488       , p5_a62
4489       , p5_a63
4490       , p5_a64
4491       , p5_a65
4492       , p5_a66
4493       , p5_a67
4494       , p5_a68
4495       , p5_a69
4496       , p5_a70
4497       , p5_a71
4498       , p5_a72
4499       , p5_a73
4500       , p5_a74
4501       , p5_a75
4502       , p5_a76
4503       , p5_a77
4504       , p5_a78
4505       , p5_a79
4506       , p5_a80
4507       , p5_a81
4508       , p5_a82
4509       , p5_a83
4510       , p5_a84
4511       , p5_a85
4512       , p5_a86
4513       , p5_a87
4514       , p5_a88
4515       , p5_a89
4516       , p5_a90
4517       , p5_a91
4518       , p5_a92
4519       , p5_a93
4520       );
4521 
4522     -- here's the delegated call to the old PL/SQL routine
4523     okl_trans_contracts_pvt.delete_trx_contracts(p_api_version,
4524       p_init_msg_list,
4525       x_return_status,
4526       x_msg_count,
4527       x_msg_data,
4528       ddp_tcnv_tbl);
4529 
4530     -- copy data back from the local variables to OUT or IN-OUT args, if any
4531 
4532 
4533 
4534 
4535 
4536   end;
4537 
4538   procedure delete_trx_cntrct_lines(p_api_version  NUMBER
4539     , p_init_msg_list  VARCHAR2
4540     , x_return_status out nocopy  VARCHAR2
4541     , x_msg_count out nocopy  NUMBER
4542     , x_msg_data out nocopy  VARCHAR2
4543     , p5_a0  NUMBER := 0-1962.0724
4544     , p5_a1  NUMBER := 0-1962.0724
4545     , p5_a2  NUMBER := 0-1962.0724
4546     , p5_a3  NUMBER := 0-1962.0724
4547     , p5_a4  NUMBER := 0-1962.0724
4548     , p5_a5  NUMBER := 0-1962.0724
4549     , p5_a6  NUMBER := 0-1962.0724
4550     , p5_a7  NUMBER := 0-1962.0724
4551     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
4552     , p5_a9  NUMBER := 0-1962.0724
4553     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
4554     , p5_a11  NUMBER := 0-1962.0724
4555     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
4556     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
4557     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
4558     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
4559     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
4560     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
4561     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
4562     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
4563     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
4564     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
4565     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
4566     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
4567     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
4568     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
4569     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
4570     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
4571     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
4572     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
4573     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
4574     , p5_a31  NUMBER := 0-1962.0724
4575     , p5_a32  DATE := fnd_api.g_miss_date
4576     , p5_a33  NUMBER := 0-1962.0724
4577     , p5_a34  DATE := fnd_api.g_miss_date
4578     , p5_a35  NUMBER := 0-1962.0724
4579     , p5_a36  NUMBER := 0-1962.0724
4580     , p5_a37  NUMBER := 0-1962.0724
4581     , p5_a38  NUMBER := 0-1962.0724
4582     , p5_a39  DATE := fnd_api.g_miss_date
4583     , p5_a40  NUMBER := 0-1962.0724
4584     , p5_a41  NUMBER := 0-1962.0724
4585     , p5_a42  NUMBER := 0-1962.0724
4586     , p5_a43  NUMBER := 0-1962.0724
4587     , p5_a44  NUMBER := 0-1962.0724
4588     , p5_a45  VARCHAR2 := fnd_api.g_miss_char
4589     , p5_a46  VARCHAR2 := fnd_api.g_miss_char
4590     , p5_a47  NUMBER := 0-1962.0724
4591     , p5_a48  VARCHAR2 := fnd_api.g_miss_char
4592     , p5_a49  NUMBER := 0-1962.0724
4593     , p5_a50  VARCHAR2 := fnd_api.g_miss_char
4594     , p5_a51  NUMBER := 0-1962.0724
4595     , p5_a52  DATE := fnd_api.g_miss_date
4596     , p5_a53  NUMBER := 0-1962.0724
4597     , p5_a54  VARCHAR2 := fnd_api.g_miss_char
4598     , p5_a55  VARCHAR2 := fnd_api.g_miss_char
4599     , p5_a56  VARCHAR2 := fnd_api.g_miss_char
4600     , p5_a57  VARCHAR2 := fnd_api.g_miss_char
4601   )
4602 
4603   as
4604     ddp_tclv_rec okl_trans_contracts_pvt.tclv_rec_type;
4605     ddindx binary_integer; indx binary_integer;
4606   begin
4607 
4608     -- copy data to the local IN or IN-OUT args, if any
4609 
4610 
4611 
4612 
4613 
4614     ddp_tclv_rec.id := rosetta_g_miss_num_map(p5_a0);
4615     ddp_tclv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
4616     ddp_tclv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
4617     ddp_tclv_rec.rct_id := rosetta_g_miss_num_map(p5_a3);
4618     ddp_tclv_rec.btc_id := rosetta_g_miss_num_map(p5_a4);
4619     ddp_tclv_rec.tcn_id := rosetta_g_miss_num_map(p5_a5);
4620     ddp_tclv_rec.khr_id := rosetta_g_miss_num_map(p5_a6);
4621     ddp_tclv_rec.kle_id := rosetta_g_miss_num_map(p5_a7);
4622     ddp_tclv_rec.before_transfer_yn := p5_a8;
4623     ddp_tclv_rec.line_number := rosetta_g_miss_num_map(p5_a9);
4624     ddp_tclv_rec.description := p5_a10;
4625     ddp_tclv_rec.amount := rosetta_g_miss_num_map(p5_a11);
4626     ddp_tclv_rec.currency_code := p5_a12;
4627     ddp_tclv_rec.gl_reversal_yn := p5_a13;
4628     ddp_tclv_rec.attribute_category := p5_a14;
4629     ddp_tclv_rec.attribute1 := p5_a15;
4630     ddp_tclv_rec.attribute2 := p5_a16;
4631     ddp_tclv_rec.attribute3 := p5_a17;
4632     ddp_tclv_rec.attribute4 := p5_a18;
4633     ddp_tclv_rec.attribute5 := p5_a19;
4634     ddp_tclv_rec.attribute6 := p5_a20;
4635     ddp_tclv_rec.attribute7 := p5_a21;
4636     ddp_tclv_rec.attribute8 := p5_a22;
4637     ddp_tclv_rec.attribute9 := p5_a23;
4638     ddp_tclv_rec.attribute10 := p5_a24;
4639     ddp_tclv_rec.attribute11 := p5_a25;
4640     ddp_tclv_rec.attribute12 := p5_a26;
4641     ddp_tclv_rec.attribute13 := p5_a27;
4642     ddp_tclv_rec.attribute14 := p5_a28;
4643     ddp_tclv_rec.attribute15 := p5_a29;
4644     ddp_tclv_rec.tcl_type := p5_a30;
4645     ddp_tclv_rec.created_by := rosetta_g_miss_num_map(p5_a31);
4646     ddp_tclv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a32);
4647     ddp_tclv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a33);
4648     ddp_tclv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a34);
4649     ddp_tclv_rec.org_id := rosetta_g_miss_num_map(p5_a35);
4650     ddp_tclv_rec.program_id := rosetta_g_miss_num_map(p5_a36);
4651     ddp_tclv_rec.program_application_id := rosetta_g_miss_num_map(p5_a37);
4652     ddp_tclv_rec.request_id := rosetta_g_miss_num_map(p5_a38);
4653     ddp_tclv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a39);
4654     ddp_tclv_rec.last_update_login := rosetta_g_miss_num_map(p5_a40);
4655     ddp_tclv_rec.avl_id := rosetta_g_miss_num_map(p5_a41);
4656     ddp_tclv_rec.bkt_id := rosetta_g_miss_num_map(p5_a42);
4657     ddp_tclv_rec.kle_id_new := rosetta_g_miss_num_map(p5_a43);
4658     ddp_tclv_rec.percentage := rosetta_g_miss_num_map(p5_a44);
4659     ddp_tclv_rec.accrual_rule_yn := p5_a45;
4660     ddp_tclv_rec.source_column_1 := p5_a46;
4661     ddp_tclv_rec.source_value_1 := rosetta_g_miss_num_map(p5_a47);
4662     ddp_tclv_rec.source_column_2 := p5_a48;
4663     ddp_tclv_rec.source_value_2 := rosetta_g_miss_num_map(p5_a49);
4664     ddp_tclv_rec.source_column_3 := p5_a50;
4665     ddp_tclv_rec.source_value_3 := rosetta_g_miss_num_map(p5_a51);
4666     ddp_tclv_rec.canceled_date := rosetta_g_miss_date_in_map(p5_a52);
4667     ddp_tclv_rec.tax_line_id := rosetta_g_miss_num_map(p5_a53);
4668     ddp_tclv_rec.stream_type_code := p5_a54;
4669     ddp_tclv_rec.stream_type_purpose := p5_a55;
4670     ddp_tclv_rec.asset_book_type_name := p5_a56;
4671     ddp_tclv_rec.upgrade_status_flag := p5_a57;
4672 
4673     -- here's the delegated call to the old PL/SQL routine
4674     okl_trans_contracts_pvt.delete_trx_cntrct_lines(p_api_version,
4675       p_init_msg_list,
4676       x_return_status,
4677       x_msg_count,
4678       x_msg_data,
4679       ddp_tclv_rec);
4680 
4681     -- copy data back from the local variables to OUT or IN-OUT args, if any
4682 
4683 
4684 
4685 
4686 
4687   end;
4688 
4689   procedure delete_trx_cntrct_lines(p_api_version  NUMBER
4690     , p_init_msg_list  VARCHAR2
4691     , x_return_status out nocopy  VARCHAR2
4692     , x_msg_count out nocopy  NUMBER
4693     , x_msg_data out nocopy  VARCHAR2
4694     , p5_a0 JTF_NUMBER_TABLE
4695     , p5_a1 JTF_NUMBER_TABLE
4696     , p5_a2 JTF_NUMBER_TABLE
4697     , p5_a3 JTF_NUMBER_TABLE
4698     , p5_a4 JTF_NUMBER_TABLE
4699     , p5_a5 JTF_NUMBER_TABLE
4700     , p5_a6 JTF_NUMBER_TABLE
4701     , p5_a7 JTF_NUMBER_TABLE
4702     , p5_a8 JTF_VARCHAR2_TABLE_100
4703     , p5_a9 JTF_NUMBER_TABLE
4704     , p5_a10 JTF_VARCHAR2_TABLE_2000
4705     , p5_a11 JTF_NUMBER_TABLE
4706     , p5_a12 JTF_VARCHAR2_TABLE_200
4707     , p5_a13 JTF_VARCHAR2_TABLE_100
4708     , p5_a14 JTF_VARCHAR2_TABLE_100
4709     , p5_a15 JTF_VARCHAR2_TABLE_500
4710     , p5_a16 JTF_VARCHAR2_TABLE_500
4711     , p5_a17 JTF_VARCHAR2_TABLE_500
4712     , p5_a18 JTF_VARCHAR2_TABLE_500
4713     , p5_a19 JTF_VARCHAR2_TABLE_500
4714     , p5_a20 JTF_VARCHAR2_TABLE_500
4715     , p5_a21 JTF_VARCHAR2_TABLE_500
4716     , p5_a22 JTF_VARCHAR2_TABLE_500
4717     , p5_a23 JTF_VARCHAR2_TABLE_500
4718     , p5_a24 JTF_VARCHAR2_TABLE_500
4719     , p5_a25 JTF_VARCHAR2_TABLE_500
4720     , p5_a26 JTF_VARCHAR2_TABLE_500
4721     , p5_a27 JTF_VARCHAR2_TABLE_500
4722     , p5_a28 JTF_VARCHAR2_TABLE_500
4723     , p5_a29 JTF_VARCHAR2_TABLE_500
4724     , p5_a30 JTF_VARCHAR2_TABLE_100
4725     , p5_a31 JTF_NUMBER_TABLE
4726     , p5_a32 JTF_DATE_TABLE
4727     , p5_a33 JTF_NUMBER_TABLE
4728     , p5_a34 JTF_DATE_TABLE
4729     , p5_a35 JTF_NUMBER_TABLE
4730     , p5_a36 JTF_NUMBER_TABLE
4731     , p5_a37 JTF_NUMBER_TABLE
4732     , p5_a38 JTF_NUMBER_TABLE
4733     , p5_a39 JTF_DATE_TABLE
4734     , p5_a40 JTF_NUMBER_TABLE
4735     , p5_a41 JTF_NUMBER_TABLE
4736     , p5_a42 JTF_NUMBER_TABLE
4737     , p5_a43 JTF_NUMBER_TABLE
4738     , p5_a44 JTF_NUMBER_TABLE
4739     , p5_a45 JTF_VARCHAR2_TABLE_100
4740     , p5_a46 JTF_VARCHAR2_TABLE_200
4741     , p5_a47 JTF_NUMBER_TABLE
4742     , p5_a48 JTF_VARCHAR2_TABLE_200
4743     , p5_a49 JTF_NUMBER_TABLE
4744     , p5_a50 JTF_VARCHAR2_TABLE_200
4745     , p5_a51 JTF_NUMBER_TABLE
4746     , p5_a52 JTF_DATE_TABLE
4747     , p5_a53 JTF_NUMBER_TABLE
4748     , p5_a54 JTF_VARCHAR2_TABLE_200
4749     , p5_a55 JTF_VARCHAR2_TABLE_300
4750     , p5_a56 JTF_VARCHAR2_TABLE_100
4751     , p5_a57 JTF_VARCHAR2_TABLE_100
4752   )
4753 
4754   as
4755     ddp_tclv_tbl okl_trans_contracts_pvt.tclv_tbl_type;
4756     ddindx binary_integer; indx binary_integer;
4757   begin
4758 
4759     -- copy data to the local IN or IN-OUT args, if any
4760 
4761 
4762 
4763 
4764 
4765     okl_tcl_pvt_w.rosetta_table_copy_in_p5(ddp_tclv_tbl, p5_a0
4766       , p5_a1
4767       , p5_a2
4768       , p5_a3
4769       , p5_a4
4770       , p5_a5
4771       , p5_a6
4772       , p5_a7
4773       , p5_a8
4774       , p5_a9
4775       , p5_a10
4776       , p5_a11
4777       , p5_a12
4778       , p5_a13
4779       , p5_a14
4780       , p5_a15
4781       , p5_a16
4782       , p5_a17
4783       , p5_a18
4784       , p5_a19
4785       , p5_a20
4786       , p5_a21
4787       , p5_a22
4788       , p5_a23
4789       , p5_a24
4790       , p5_a25
4791       , p5_a26
4792       , p5_a27
4793       , p5_a28
4794       , p5_a29
4795       , p5_a30
4796       , p5_a31
4797       , p5_a32
4798       , p5_a33
4799       , p5_a34
4800       , p5_a35
4801       , p5_a36
4802       , p5_a37
4803       , p5_a38
4804       , p5_a39
4805       , p5_a40
4806       , p5_a41
4807       , p5_a42
4808       , p5_a43
4809       , p5_a44
4810       , p5_a45
4811       , p5_a46
4812       , p5_a47
4813       , p5_a48
4814       , p5_a49
4815       , p5_a50
4816       , p5_a51
4817       , p5_a52
4818       , p5_a53
4819       , p5_a54
4820       , p5_a55
4821       , p5_a56
4822       , p5_a57
4823       );
4824 
4825     -- here's the delegated call to the old PL/SQL routine
4826     okl_trans_contracts_pvt.delete_trx_cntrct_lines(p_api_version,
4827       p_init_msg_list,
4828       x_return_status,
4829       x_msg_count,
4830       x_msg_data,
4831       ddp_tclv_tbl);
4832 
4833     -- copy data back from the local variables to OUT or IN-OUT args, if any
4834 
4835 
4836 
4837 
4838 
4839   end;
4840 
4841 end okl_trans_contracts_pvt_w;