DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_KRP_PVT_W

Source


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