DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_IPY_PVT_W

Source


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