DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_FE_STD_RATE_TMPL_PUB_W

Source


1 package body okl_fe_std_rate_tmpl_pub_w as
2   /* $Header: OKLUSRTB.pls 120.0 2005/07/07 10:46:41 viselvar noship $ */
3   procedure get_version(p_api_version  NUMBER
4     , p_init_msg_list  VARCHAR2
5     , x_return_status out nocopy  VARCHAR2
6     , x_msg_count out nocopy  NUMBER
7     , x_msg_data out nocopy  VARCHAR2
8     , p_srt_id  NUMBER
9     , p_version_number  NUMBER
10     , p7_a0 out nocopy  NUMBER
11     , p7_a1 out nocopy  VARCHAR2
12     , p7_a2 out nocopy  VARCHAR2
13     , p7_a3 out nocopy  NUMBER
14     , p7_a4 out nocopy  NUMBER
15     , p7_a5 out nocopy  VARCHAR2
16     , p7_a6 out nocopy  VARCHAR2
17     , p7_a7 out nocopy  VARCHAR2
18     , p7_a8 out nocopy  NUMBER
19     , p7_a9 out nocopy  VARCHAR2
20     , p7_a10 out nocopy  VARCHAR2
21     , p7_a11 out nocopy  NUMBER
22     , p7_a12 out nocopy  VARCHAR2
23     , p7_a13 out nocopy  VARCHAR2
24     , p7_a14 out nocopy  DATE
25     , p7_a15 out nocopy  DATE
26     , p7_a16 out nocopy  NUMBER
27     , p7_a17 out nocopy  VARCHAR2
28     , p7_a18 out nocopy  VARCHAR2
29     , p7_a19 out nocopy  VARCHAR2
30     , p7_a20 out nocopy  VARCHAR2
31     , p7_a21 out nocopy  VARCHAR2
32     , p7_a22 out nocopy  VARCHAR2
33     , p7_a23 out nocopy  VARCHAR2
34     , p7_a24 out nocopy  VARCHAR2
35     , p7_a25 out nocopy  VARCHAR2
36     , p7_a26 out nocopy  VARCHAR2
37     , p7_a27 out nocopy  VARCHAR2
38     , p7_a28 out nocopy  VARCHAR2
39     , p7_a29 out nocopy  VARCHAR2
40     , p7_a30 out nocopy  VARCHAR2
41     , p7_a31 out nocopy  VARCHAR2
42     , p7_a32 out nocopy  VARCHAR2
43     , p7_a33 out nocopy  NUMBER
44     , p7_a34 out nocopy  DATE
45     , p7_a35 out nocopy  NUMBER
46     , p7_a36 out nocopy  DATE
47     , p7_a37 out nocopy  NUMBER
48     , p8_a0 out nocopy  NUMBER
49     , p8_a1 out nocopy  NUMBER
50     , p8_a2 out nocopy  VARCHAR2
51     , p8_a3 out nocopy  NUMBER
52     , p8_a4 out nocopy  DATE
53     , p8_a5 out nocopy  DATE
54     , p8_a6 out nocopy  VARCHAR2
55     , p8_a7 out nocopy  NUMBER
56     , p8_a8 out nocopy  NUMBER
57     , p8_a9 out nocopy  NUMBER
58     , p8_a10 out nocopy  VARCHAR2
59     , p8_a11 out nocopy  NUMBER
60     , p8_a12 out nocopy  NUMBER
61     , p8_a13 out nocopy  VARCHAR2
62     , p8_a14 out nocopy  VARCHAR2
63     , p8_a15 out nocopy  VARCHAR2
64     , p8_a16 out nocopy  VARCHAR2
65     , p8_a17 out nocopy  VARCHAR2
66     , p8_a18 out nocopy  VARCHAR2
67     , p8_a19 out nocopy  VARCHAR2
68     , p8_a20 out nocopy  VARCHAR2
69     , p8_a21 out nocopy  VARCHAR2
70     , p8_a22 out nocopy  VARCHAR2
71     , p8_a23 out nocopy  VARCHAR2
72     , p8_a24 out nocopy  VARCHAR2
73     , p8_a25 out nocopy  VARCHAR2
74     , p8_a26 out nocopy  VARCHAR2
75     , p8_a27 out nocopy  VARCHAR2
76     , p8_a28 out nocopy  VARCHAR2
77     , p8_a29 out nocopy  NUMBER
78     , p8_a30 out nocopy  DATE
79     , p8_a31 out nocopy  NUMBER
80     , p8_a32 out nocopy  DATE
81     , p8_a33 out nocopy  NUMBER
82     , p9_a0 out nocopy  NUMBER
83     , p9_a1 out nocopy  NUMBER
84     , p9_a2 out nocopy  NUMBER
85     , p9_a3 out nocopy  VARCHAR2
86     , p9_a4 out nocopy  VARCHAR2
87     , p9_a5 out nocopy  VARCHAR2
88     , p9_a6 out nocopy  NUMBER
89     , p9_a7 out nocopy  DATE
90     , p9_a8 out nocopy  NUMBER
91     , p9_a9 out nocopy  DATE
92     , p9_a10 out nocopy  NUMBER
93     , p10_a0 out nocopy JTF_NUMBER_TABLE
94     , p10_a1 out nocopy JTF_NUMBER_TABLE
95     , p10_a2 out nocopy JTF_NUMBER_TABLE
96     , p10_a3 out nocopy JTF_NUMBER_TABLE
97     , p10_a4 out nocopy JTF_DATE_TABLE
98     , p10_a5 out nocopy JTF_DATE_TABLE
99     , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
100     , p10_a7 out nocopy JTF_VARCHAR2_TABLE_100
101     , p10_a8 out nocopy JTF_NUMBER_TABLE
102     , p10_a9 out nocopy JTF_DATE_TABLE
103     , p10_a10 out nocopy JTF_NUMBER_TABLE
104     , p10_a11 out nocopy JTF_DATE_TABLE
105     , p10_a12 out nocopy JTF_NUMBER_TABLE
106     , p11_a0 out nocopy JTF_NUMBER_TABLE
107     , p11_a1 out nocopy JTF_NUMBER_TABLE
108     , p11_a2 out nocopy JTF_NUMBER_TABLE
109     , p11_a3 out nocopy JTF_VARCHAR2_TABLE_100
110     , p11_a4 out nocopy JTF_VARCHAR2_TABLE_100
111     , p11_a5 out nocopy JTF_VARCHAR2_TABLE_100
112     , p11_a6 out nocopy JTF_VARCHAR2_TABLE_100
113     , p11_a7 out nocopy JTF_VARCHAR2_TABLE_300
114     , p11_a8 out nocopy JTF_VARCHAR2_TABLE_300
115     , p11_a9 out nocopy JTF_NUMBER_TABLE
116     , p11_a10 out nocopy JTF_NUMBER_TABLE
117     , p11_a11 out nocopy JTF_DATE_TABLE
118     , p11_a12 out nocopy JTF_DATE_TABLE
119     , p11_a13 out nocopy JTF_VARCHAR2_TABLE_100
120     , p11_a14 out nocopy JTF_NUMBER_TABLE
121     , p11_a15 out nocopy JTF_NUMBER_TABLE
122     , p11_a16 out nocopy JTF_DATE_TABLE
123     , p11_a17 out nocopy JTF_NUMBER_TABLE
124     , p11_a18 out nocopy JTF_DATE_TABLE
125     , p11_a19 out nocopy JTF_NUMBER_TABLE
126     , p11_a20 out nocopy JTF_VARCHAR2_TABLE_100
127     , p11_a21 out nocopy JTF_VARCHAR2_TABLE_500
128     , p11_a22 out nocopy JTF_VARCHAR2_TABLE_500
129     , p11_a23 out nocopy JTF_VARCHAR2_TABLE_500
130     , p11_a24 out nocopy JTF_VARCHAR2_TABLE_500
131     , p11_a25 out nocopy JTF_VARCHAR2_TABLE_500
132     , p11_a26 out nocopy JTF_VARCHAR2_TABLE_500
133     , p11_a27 out nocopy JTF_VARCHAR2_TABLE_500
134     , p11_a28 out nocopy JTF_VARCHAR2_TABLE_500
135     , p11_a29 out nocopy JTF_VARCHAR2_TABLE_500
136     , p11_a30 out nocopy JTF_VARCHAR2_TABLE_500
137     , p11_a31 out nocopy JTF_VARCHAR2_TABLE_500
138     , p11_a32 out nocopy JTF_VARCHAR2_TABLE_500
139     , p11_a33 out nocopy JTF_VARCHAR2_TABLE_500
140     , p11_a34 out nocopy JTF_VARCHAR2_TABLE_500
141     , p11_a35 out nocopy JTF_VARCHAR2_TABLE_500
142   )
143 
144   as
145     ddx_srtv_rec okl_fe_std_rate_tmpl_pub.okl_srtv_rec;
146     ddx_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
147     ddx_ech_rec okl_fe_std_rate_tmpl_pub.okl_ech_rec;
148     ddx_ecl_tbl okl_fe_std_rate_tmpl_pub.okl_ecl_tbl;
149     ddx_ecv_tbl okl_fe_std_rate_tmpl_pub.okl_ecv_tbl;
150     ddindx binary_integer; indx binary_integer;
151   begin
152 
153     -- copy data to the local IN or IN-OUT args, if any
154 
155 
156 
157 
158 
159 
160 
161 
162 
163 
164 
165 
166     -- here's the delegated call to the old PL/SQL routine
167     okl_fe_std_rate_tmpl_pub.get_version(p_api_version,
168       p_init_msg_list,
169       x_return_status,
170       x_msg_count,
171       x_msg_data,
172       p_srt_id,
173       p_version_number,
174       ddx_srtv_rec,
175       ddx_srv_rec,
176       ddx_ech_rec,
177       ddx_ecl_tbl,
178       ddx_ecv_tbl);
179 
180     -- copy data back from the local variables to OUT or IN-OUT args, if any
181 
182 
183 
184 
185 
186 
187 
188     p7_a0 := ddx_srtv_rec.std_rate_tmpl_id;
189     p7_a1 := ddx_srtv_rec.template_name;
190     p7_a2 := ddx_srtv_rec.template_desc;
191     p7_a3 := ddx_srtv_rec.object_version_number;
192     p7_a4 := ddx_srtv_rec.org_id;
193     p7_a5 := ddx_srtv_rec.currency_code;
194     p7_a6 := ddx_srtv_rec.rate_card_yn;
195     p7_a7 := ddx_srtv_rec.pricing_engine_code;
196     p7_a8 := ddx_srtv_rec.orig_std_rate_tmpl_id;
197     p7_a9 := ddx_srtv_rec.rate_type_code;
198     p7_a10 := ddx_srtv_rec.frequency_code;
199     p7_a11 := ddx_srtv_rec.index_id;
200     p7_a12 := ddx_srtv_rec.default_yn;
201     p7_a13 := ddx_srtv_rec.sts_code;
202     p7_a14 := ddx_srtv_rec.effective_from_date;
203     p7_a15 := ddx_srtv_rec.effective_to_date;
204     p7_a16 := ddx_srtv_rec.srt_rate;
205     p7_a17 := ddx_srtv_rec.attribute_category;
206     p7_a18 := ddx_srtv_rec.attribute1;
207     p7_a19 := ddx_srtv_rec.attribute2;
208     p7_a20 := ddx_srtv_rec.attribute3;
209     p7_a21 := ddx_srtv_rec.attribute4;
210     p7_a22 := ddx_srtv_rec.attribute5;
211     p7_a23 := ddx_srtv_rec.attribute6;
212     p7_a24 := ddx_srtv_rec.attribute7;
213     p7_a25 := ddx_srtv_rec.attribute8;
214     p7_a26 := ddx_srtv_rec.attribute9;
215     p7_a27 := ddx_srtv_rec.attribute10;
216     p7_a28 := ddx_srtv_rec.attribute11;
217     p7_a29 := ddx_srtv_rec.attribute12;
218     p7_a30 := ddx_srtv_rec.attribute13;
219     p7_a31 := ddx_srtv_rec.attribute14;
220     p7_a32 := ddx_srtv_rec.attribute15;
221     p7_a33 := ddx_srtv_rec.created_by;
222     p7_a34 := ddx_srtv_rec.creation_date;
223     p7_a35 := ddx_srtv_rec.last_updated_by;
224     p7_a36 := ddx_srtv_rec.last_update_date;
225     p7_a37 := ddx_srtv_rec.last_update_login;
226 
227     p8_a0 := ddx_srv_rec.std_rate_tmpl_ver_id;
228     p8_a1 := ddx_srv_rec.object_version_number;
229     p8_a2 := ddx_srv_rec.version_number;
230     p8_a3 := ddx_srv_rec.std_rate_tmpl_id;
231     p8_a4 := ddx_srv_rec.effective_from_date;
232     p8_a5 := ddx_srv_rec.effective_to_date;
233     p8_a6 := ddx_srv_rec.sts_code;
234     p8_a7 := ddx_srv_rec.adj_mat_version_id;
235     p8_a8 := ddx_srv_rec.srt_rate;
236     p8_a9 := ddx_srv_rec.spread;
237     p8_a10 := ddx_srv_rec.day_convention_code;
238     p8_a11 := ddx_srv_rec.min_adj_rate;
239     p8_a12 := ddx_srv_rec.max_adj_rate;
240     p8_a13 := ddx_srv_rec.attribute_category;
241     p8_a14 := ddx_srv_rec.attribute1;
242     p8_a15 := ddx_srv_rec.attribute2;
243     p8_a16 := ddx_srv_rec.attribute3;
244     p8_a17 := ddx_srv_rec.attribute4;
245     p8_a18 := ddx_srv_rec.attribute5;
246     p8_a19 := ddx_srv_rec.attribute6;
247     p8_a20 := ddx_srv_rec.attribute7;
248     p8_a21 := ddx_srv_rec.attribute8;
249     p8_a22 := ddx_srv_rec.attribute9;
250     p8_a23 := ddx_srv_rec.attribute10;
251     p8_a24 := ddx_srv_rec.attribute11;
252     p8_a25 := ddx_srv_rec.attribute12;
253     p8_a26 := ddx_srv_rec.attribute13;
254     p8_a27 := ddx_srv_rec.attribute14;
255     p8_a28 := ddx_srv_rec.attribute15;
256     p8_a29 := ddx_srv_rec.created_by;
257     p8_a30 := ddx_srv_rec.creation_date;
258     p8_a31 := ddx_srv_rec.last_updated_by;
259     p8_a32 := ddx_srv_rec.last_update_date;
260     p8_a33 := ddx_srv_rec.last_update_login;
261 
262     p9_a0 := ddx_ech_rec.criteria_set_id;
263     p9_a1 := ddx_ech_rec.object_version_number;
264     p9_a2 := ddx_ech_rec.source_id;
265     p9_a3 := ddx_ech_rec.source_object_code;
266     p9_a4 := ddx_ech_rec.match_criteria_code;
267     p9_a5 := ddx_ech_rec.validation_code;
268     p9_a6 := ddx_ech_rec.created_by;
269     p9_a7 := ddx_ech_rec.creation_date;
270     p9_a8 := ddx_ech_rec.last_updated_by;
271     p9_a9 := ddx_ech_rec.last_update_date;
272     p9_a10 := ddx_ech_rec.last_update_login;
273 
274     okl_ecl_pvt_w.rosetta_table_copy_out_p1(ddx_ecl_tbl, p10_a0
275       , p10_a1
276       , p10_a2
277       , p10_a3
278       , p10_a4
279       , p10_a5
280       , p10_a6
281       , p10_a7
282       , p10_a8
283       , p10_a9
284       , p10_a10
285       , p10_a11
286       , p10_a12
287       );
288 
289     okl_ecv_pvt_w.rosetta_table_copy_out_p1(ddx_ecv_tbl, p11_a0
290       , p11_a1
291       , p11_a2
292       , p11_a3
293       , p11_a4
294       , p11_a5
295       , p11_a6
296       , p11_a7
297       , p11_a8
298       , p11_a9
299       , p11_a10
300       , p11_a11
301       , p11_a12
302       , p11_a13
303       , p11_a14
304       , p11_a15
305       , p11_a16
306       , p11_a17
307       , p11_a18
308       , p11_a19
309       , p11_a20
310       , p11_a21
311       , p11_a22
312       , p11_a23
313       , p11_a24
314       , p11_a25
315       , p11_a26
316       , p11_a27
317       , p11_a28
318       , p11_a29
319       , p11_a30
320       , p11_a31
321       , p11_a32
322       , p11_a33
323       , p11_a34
324       , p11_a35
325       );
326   end;
327 
328   procedure get_version(p_api_version  NUMBER
329     , p_init_msg_list  VARCHAR2
330     , x_return_status out nocopy  VARCHAR2
331     , x_msg_count out nocopy  NUMBER
332     , x_msg_data out nocopy  VARCHAR2
333     , p_srt_id  NUMBER
334     , p6_a0 out nocopy  NUMBER
335     , p6_a1 out nocopy  VARCHAR2
336     , p6_a2 out nocopy  VARCHAR2
337     , p6_a3 out nocopy  NUMBER
338     , p6_a4 out nocopy  NUMBER
339     , p6_a5 out nocopy  VARCHAR2
340     , p6_a6 out nocopy  VARCHAR2
341     , p6_a7 out nocopy  VARCHAR2
342     , p6_a8 out nocopy  NUMBER
343     , p6_a9 out nocopy  VARCHAR2
344     , p6_a10 out nocopy  VARCHAR2
345     , p6_a11 out nocopy  NUMBER
346     , p6_a12 out nocopy  VARCHAR2
347     , p6_a13 out nocopy  VARCHAR2
348     , p6_a14 out nocopy  DATE
349     , p6_a15 out nocopy  DATE
350     , p6_a16 out nocopy  NUMBER
351     , p6_a17 out nocopy  VARCHAR2
352     , p6_a18 out nocopy  VARCHAR2
353     , p6_a19 out nocopy  VARCHAR2
354     , p6_a20 out nocopy  VARCHAR2
355     , p6_a21 out nocopy  VARCHAR2
356     , p6_a22 out nocopy  VARCHAR2
357     , p6_a23 out nocopy  VARCHAR2
358     , p6_a24 out nocopy  VARCHAR2
359     , p6_a25 out nocopy  VARCHAR2
360     , p6_a26 out nocopy  VARCHAR2
361     , p6_a27 out nocopy  VARCHAR2
362     , p6_a28 out nocopy  VARCHAR2
363     , p6_a29 out nocopy  VARCHAR2
364     , p6_a30 out nocopy  VARCHAR2
365     , p6_a31 out nocopy  VARCHAR2
366     , p6_a32 out nocopy  VARCHAR2
367     , p6_a33 out nocopy  NUMBER
368     , p6_a34 out nocopy  DATE
369     , p6_a35 out nocopy  NUMBER
370     , p6_a36 out nocopy  DATE
371     , p6_a37 out nocopy  NUMBER
372     , p7_a0 out nocopy  NUMBER
373     , p7_a1 out nocopy  NUMBER
374     , p7_a2 out nocopy  VARCHAR2
375     , p7_a3 out nocopy  NUMBER
376     , p7_a4 out nocopy  DATE
377     , p7_a5 out nocopy  DATE
378     , p7_a6 out nocopy  VARCHAR2
379     , p7_a7 out nocopy  NUMBER
380     , p7_a8 out nocopy  NUMBER
381     , p7_a9 out nocopy  NUMBER
382     , p7_a10 out nocopy  VARCHAR2
383     , p7_a11 out nocopy  NUMBER
384     , p7_a12 out nocopy  NUMBER
385     , p7_a13 out nocopy  VARCHAR2
386     , p7_a14 out nocopy  VARCHAR2
387     , p7_a15 out nocopy  VARCHAR2
388     , p7_a16 out nocopy  VARCHAR2
389     , p7_a17 out nocopy  VARCHAR2
390     , p7_a18 out nocopy  VARCHAR2
391     , p7_a19 out nocopy  VARCHAR2
392     , p7_a20 out nocopy  VARCHAR2
393     , p7_a21 out nocopy  VARCHAR2
394     , p7_a22 out nocopy  VARCHAR2
395     , p7_a23 out nocopy  VARCHAR2
396     , p7_a24 out nocopy  VARCHAR2
397     , p7_a25 out nocopy  VARCHAR2
398     , p7_a26 out nocopy  VARCHAR2
399     , p7_a27 out nocopy  VARCHAR2
400     , p7_a28 out nocopy  VARCHAR2
401     , p7_a29 out nocopy  NUMBER
402     , p7_a30 out nocopy  DATE
403     , p7_a31 out nocopy  NUMBER
404     , p7_a32 out nocopy  DATE
405     , p7_a33 out nocopy  NUMBER
406     , p8_a0 out nocopy  NUMBER
407     , p8_a1 out nocopy  NUMBER
408     , p8_a2 out nocopy  NUMBER
409     , p8_a3 out nocopy  VARCHAR2
410     , p8_a4 out nocopy  VARCHAR2
411     , p8_a5 out nocopy  VARCHAR2
412     , p8_a6 out nocopy  NUMBER
413     , p8_a7 out nocopy  DATE
414     , p8_a8 out nocopy  NUMBER
415     , p8_a9 out nocopy  DATE
416     , p8_a10 out nocopy  NUMBER
417     , p9_a0 out nocopy JTF_NUMBER_TABLE
418     , p9_a1 out nocopy JTF_NUMBER_TABLE
419     , p9_a2 out nocopy JTF_NUMBER_TABLE
420     , p9_a3 out nocopy JTF_NUMBER_TABLE
421     , p9_a4 out nocopy JTF_DATE_TABLE
422     , p9_a5 out nocopy JTF_DATE_TABLE
423     , p9_a6 out nocopy JTF_VARCHAR2_TABLE_100
424     , p9_a7 out nocopy JTF_VARCHAR2_TABLE_100
425     , p9_a8 out nocopy JTF_NUMBER_TABLE
426     , p9_a9 out nocopy JTF_DATE_TABLE
427     , p9_a10 out nocopy JTF_NUMBER_TABLE
428     , p9_a11 out nocopy JTF_DATE_TABLE
429     , p9_a12 out nocopy JTF_NUMBER_TABLE
430     , p10_a0 out nocopy JTF_NUMBER_TABLE
431     , p10_a1 out nocopy JTF_NUMBER_TABLE
432     , p10_a2 out nocopy JTF_NUMBER_TABLE
433     , p10_a3 out nocopy JTF_VARCHAR2_TABLE_100
434     , p10_a4 out nocopy JTF_VARCHAR2_TABLE_100
435     , p10_a5 out nocopy JTF_VARCHAR2_TABLE_100
436     , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
437     , p10_a7 out nocopy JTF_VARCHAR2_TABLE_300
438     , p10_a8 out nocopy JTF_VARCHAR2_TABLE_300
439     , p10_a9 out nocopy JTF_NUMBER_TABLE
440     , p10_a10 out nocopy JTF_NUMBER_TABLE
441     , p10_a11 out nocopy JTF_DATE_TABLE
442     , p10_a12 out nocopy JTF_DATE_TABLE
443     , p10_a13 out nocopy JTF_VARCHAR2_TABLE_100
444     , p10_a14 out nocopy JTF_NUMBER_TABLE
445     , p10_a15 out nocopy JTF_NUMBER_TABLE
446     , p10_a16 out nocopy JTF_DATE_TABLE
447     , p10_a17 out nocopy JTF_NUMBER_TABLE
448     , p10_a18 out nocopy JTF_DATE_TABLE
449     , p10_a19 out nocopy JTF_NUMBER_TABLE
450     , p10_a20 out nocopy JTF_VARCHAR2_TABLE_100
451     , p10_a21 out nocopy JTF_VARCHAR2_TABLE_500
452     , p10_a22 out nocopy JTF_VARCHAR2_TABLE_500
453     , p10_a23 out nocopy JTF_VARCHAR2_TABLE_500
454     , p10_a24 out nocopy JTF_VARCHAR2_TABLE_500
455     , p10_a25 out nocopy JTF_VARCHAR2_TABLE_500
456     , p10_a26 out nocopy JTF_VARCHAR2_TABLE_500
457     , p10_a27 out nocopy JTF_VARCHAR2_TABLE_500
458     , p10_a28 out nocopy JTF_VARCHAR2_TABLE_500
459     , p10_a29 out nocopy JTF_VARCHAR2_TABLE_500
460     , p10_a30 out nocopy JTF_VARCHAR2_TABLE_500
461     , p10_a31 out nocopy JTF_VARCHAR2_TABLE_500
462     , p10_a32 out nocopy JTF_VARCHAR2_TABLE_500
463     , p10_a33 out nocopy JTF_VARCHAR2_TABLE_500
464     , p10_a34 out nocopy JTF_VARCHAR2_TABLE_500
465     , p10_a35 out nocopy JTF_VARCHAR2_TABLE_500
466   )
467 
468   as
469     ddx_srtv_rec okl_fe_std_rate_tmpl_pub.okl_srtv_rec;
470     ddx_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
471     ddx_ech_rec okl_fe_std_rate_tmpl_pub.okl_ech_rec;
472     ddx_ecl_tbl okl_fe_std_rate_tmpl_pub.okl_ecl_tbl;
473     ddx_ecv_tbl okl_fe_std_rate_tmpl_pub.okl_ecv_tbl;
474     ddindx binary_integer; indx binary_integer;
475   begin
476 
477     -- copy data to the local IN or IN-OUT args, if any
478 
479 
480 
481 
482 
483 
484 
485 
486 
487 
488 
489     -- here's the delegated call to the old PL/SQL routine
490     okl_fe_std_rate_tmpl_pub.get_version(p_api_version,
491       p_init_msg_list,
492       x_return_status,
493       x_msg_count,
494       x_msg_data,
495       p_srt_id,
496       ddx_srtv_rec,
497       ddx_srv_rec,
498       ddx_ech_rec,
499       ddx_ecl_tbl,
500       ddx_ecv_tbl);
501 
502     -- copy data back from the local variables to OUT or IN-OUT args, if any
503 
504 
505 
506 
507 
508 
509     p6_a0 := ddx_srtv_rec.std_rate_tmpl_id;
510     p6_a1 := ddx_srtv_rec.template_name;
511     p6_a2 := ddx_srtv_rec.template_desc;
512     p6_a3 := ddx_srtv_rec.object_version_number;
513     p6_a4 := ddx_srtv_rec.org_id;
514     p6_a5 := ddx_srtv_rec.currency_code;
515     p6_a6 := ddx_srtv_rec.rate_card_yn;
516     p6_a7 := ddx_srtv_rec.pricing_engine_code;
517     p6_a8 := ddx_srtv_rec.orig_std_rate_tmpl_id;
518     p6_a9 := ddx_srtv_rec.rate_type_code;
519     p6_a10 := ddx_srtv_rec.frequency_code;
520     p6_a11 := ddx_srtv_rec.index_id;
521     p6_a12 := ddx_srtv_rec.default_yn;
522     p6_a13 := ddx_srtv_rec.sts_code;
523     p6_a14 := ddx_srtv_rec.effective_from_date;
524     p6_a15 := ddx_srtv_rec.effective_to_date;
525     p6_a16 := ddx_srtv_rec.srt_rate;
526     p6_a17 := ddx_srtv_rec.attribute_category;
527     p6_a18 := ddx_srtv_rec.attribute1;
528     p6_a19 := ddx_srtv_rec.attribute2;
529     p6_a20 := ddx_srtv_rec.attribute3;
530     p6_a21 := ddx_srtv_rec.attribute4;
531     p6_a22 := ddx_srtv_rec.attribute5;
532     p6_a23 := ddx_srtv_rec.attribute6;
533     p6_a24 := ddx_srtv_rec.attribute7;
534     p6_a25 := ddx_srtv_rec.attribute8;
535     p6_a26 := ddx_srtv_rec.attribute9;
536     p6_a27 := ddx_srtv_rec.attribute10;
537     p6_a28 := ddx_srtv_rec.attribute11;
538     p6_a29 := ddx_srtv_rec.attribute12;
539     p6_a30 := ddx_srtv_rec.attribute13;
540     p6_a31 := ddx_srtv_rec.attribute14;
541     p6_a32 := ddx_srtv_rec.attribute15;
542     p6_a33 := ddx_srtv_rec.created_by;
543     p6_a34 := ddx_srtv_rec.creation_date;
544     p6_a35 := ddx_srtv_rec.last_updated_by;
545     p6_a36 := ddx_srtv_rec.last_update_date;
546     p6_a37 := ddx_srtv_rec.last_update_login;
547 
548     p7_a0 := ddx_srv_rec.std_rate_tmpl_ver_id;
549     p7_a1 := ddx_srv_rec.object_version_number;
550     p7_a2 := ddx_srv_rec.version_number;
551     p7_a3 := ddx_srv_rec.std_rate_tmpl_id;
552     p7_a4 := ddx_srv_rec.effective_from_date;
553     p7_a5 := ddx_srv_rec.effective_to_date;
554     p7_a6 := ddx_srv_rec.sts_code;
555     p7_a7 := ddx_srv_rec.adj_mat_version_id;
556     p7_a8 := ddx_srv_rec.srt_rate;
557     p7_a9 := ddx_srv_rec.spread;
558     p7_a10 := ddx_srv_rec.day_convention_code;
559     p7_a11 := ddx_srv_rec.min_adj_rate;
560     p7_a12 := ddx_srv_rec.max_adj_rate;
561     p7_a13 := ddx_srv_rec.attribute_category;
562     p7_a14 := ddx_srv_rec.attribute1;
563     p7_a15 := ddx_srv_rec.attribute2;
564     p7_a16 := ddx_srv_rec.attribute3;
565     p7_a17 := ddx_srv_rec.attribute4;
566     p7_a18 := ddx_srv_rec.attribute5;
567     p7_a19 := ddx_srv_rec.attribute6;
568     p7_a20 := ddx_srv_rec.attribute7;
569     p7_a21 := ddx_srv_rec.attribute8;
570     p7_a22 := ddx_srv_rec.attribute9;
571     p7_a23 := ddx_srv_rec.attribute10;
572     p7_a24 := ddx_srv_rec.attribute11;
573     p7_a25 := ddx_srv_rec.attribute12;
574     p7_a26 := ddx_srv_rec.attribute13;
575     p7_a27 := ddx_srv_rec.attribute14;
576     p7_a28 := ddx_srv_rec.attribute15;
577     p7_a29 := ddx_srv_rec.created_by;
578     p7_a30 := ddx_srv_rec.creation_date;
579     p7_a31 := ddx_srv_rec.last_updated_by;
580     p7_a32 := ddx_srv_rec.last_update_date;
581     p7_a33 := ddx_srv_rec.last_update_login;
582 
583     p8_a0 := ddx_ech_rec.criteria_set_id;
584     p8_a1 := ddx_ech_rec.object_version_number;
585     p8_a2 := ddx_ech_rec.source_id;
586     p8_a3 := ddx_ech_rec.source_object_code;
587     p8_a4 := ddx_ech_rec.match_criteria_code;
588     p8_a5 := ddx_ech_rec.validation_code;
589     p8_a6 := ddx_ech_rec.created_by;
590     p8_a7 := ddx_ech_rec.creation_date;
591     p8_a8 := ddx_ech_rec.last_updated_by;
592     p8_a9 := ddx_ech_rec.last_update_date;
593     p8_a10 := ddx_ech_rec.last_update_login;
594 
595     okl_ecl_pvt_w.rosetta_table_copy_out_p1(ddx_ecl_tbl, p9_a0
596       , p9_a1
597       , p9_a2
598       , p9_a3
599       , p9_a4
600       , p9_a5
601       , p9_a6
602       , p9_a7
603       , p9_a8
604       , p9_a9
605       , p9_a10
606       , p9_a11
607       , p9_a12
608       );
609 
610     okl_ecv_pvt_w.rosetta_table_copy_out_p1(ddx_ecv_tbl, p10_a0
611       , p10_a1
612       , p10_a2
613       , p10_a3
614       , p10_a4
615       , p10_a5
616       , p10_a6
617       , p10_a7
618       , p10_a8
619       , p10_a9
620       , p10_a10
621       , p10_a11
622       , p10_a12
623       , p10_a13
624       , p10_a14
625       , p10_a15
626       , p10_a16
627       , p10_a17
628       , p10_a18
629       , p10_a19
630       , p10_a20
631       , p10_a21
632       , p10_a22
633       , p10_a23
634       , p10_a24
635       , p10_a25
636       , p10_a26
637       , p10_a27
638       , p10_a28
639       , p10_a29
640       , p10_a30
641       , p10_a31
642       , p10_a32
643       , p10_a33
644       , p10_a34
645       , p10_a35
646       );
647   end;
648 
649   procedure create_version(p_api_version  NUMBER
650     , p_init_msg_list  VARCHAR2
651     , x_return_status out nocopy  VARCHAR2
652     , x_msg_count out nocopy  NUMBER
653     , x_msg_data out nocopy  VARCHAR2
654     , p5_a0  NUMBER
655     , p5_a1  NUMBER
656     , p5_a2  VARCHAR2
657     , p5_a3  NUMBER
658     , p5_a4  DATE
659     , p5_a5  DATE
660     , p5_a6  VARCHAR2
661     , p5_a7  NUMBER
662     , p5_a8  NUMBER
663     , p5_a9  NUMBER
664     , p5_a10  VARCHAR2
665     , p5_a11  NUMBER
666     , p5_a12  NUMBER
667     , p5_a13  VARCHAR2
668     , p5_a14  VARCHAR2
669     , p5_a15  VARCHAR2
670     , p5_a16  VARCHAR2
671     , p5_a17  VARCHAR2
672     , p5_a18  VARCHAR2
673     , p5_a19  VARCHAR2
674     , p5_a20  VARCHAR2
675     , p5_a21  VARCHAR2
676     , p5_a22  VARCHAR2
677     , p5_a23  VARCHAR2
678     , p5_a24  VARCHAR2
679     , p5_a25  VARCHAR2
680     , p5_a26  VARCHAR2
681     , p5_a27  VARCHAR2
682     , p5_a28  VARCHAR2
683     , p5_a29  NUMBER
684     , p5_a30  DATE
685     , p5_a31  NUMBER
686     , p5_a32  DATE
687     , p5_a33  NUMBER
688     , p6_a0 out nocopy  NUMBER
689     , p6_a1 out nocopy  NUMBER
690     , p6_a2 out nocopy  VARCHAR2
691     , p6_a3 out nocopy  NUMBER
692     , p6_a4 out nocopy  DATE
693     , p6_a5 out nocopy  DATE
694     , p6_a6 out nocopy  VARCHAR2
695     , p6_a7 out nocopy  NUMBER
696     , p6_a8 out nocopy  NUMBER
697     , p6_a9 out nocopy  NUMBER
698     , p6_a10 out nocopy  VARCHAR2
699     , p6_a11 out nocopy  NUMBER
700     , p6_a12 out nocopy  NUMBER
701     , p6_a13 out nocopy  VARCHAR2
702     , p6_a14 out nocopy  VARCHAR2
703     , p6_a15 out nocopy  VARCHAR2
704     , p6_a16 out nocopy  VARCHAR2
705     , p6_a17 out nocopy  VARCHAR2
706     , p6_a18 out nocopy  VARCHAR2
707     , p6_a19 out nocopy  VARCHAR2
708     , p6_a20 out nocopy  VARCHAR2
709     , p6_a21 out nocopy  VARCHAR2
710     , p6_a22 out nocopy  VARCHAR2
711     , p6_a23 out nocopy  VARCHAR2
712     , p6_a24 out nocopy  VARCHAR2
713     , p6_a25 out nocopy  VARCHAR2
714     , p6_a26 out nocopy  VARCHAR2
715     , p6_a27 out nocopy  VARCHAR2
716     , p6_a28 out nocopy  VARCHAR2
717     , p6_a29 out nocopy  NUMBER
718     , p6_a30 out nocopy  DATE
719     , p6_a31 out nocopy  NUMBER
720     , p6_a32 out nocopy  DATE
721     , p6_a33 out nocopy  NUMBER
722   )
723 
724   as
725     ddp_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
726     ddx_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
727     ddindx binary_integer; indx binary_integer;
728   begin
729 
730     -- copy data to the local IN or IN-OUT args, if any
731 
732 
733 
734 
735 
736     ddp_srv_rec.std_rate_tmpl_ver_id := p5_a0;
737     ddp_srv_rec.object_version_number := p5_a1;
738     ddp_srv_rec.version_number := p5_a2;
739     ddp_srv_rec.std_rate_tmpl_id := p5_a3;
740     ddp_srv_rec.effective_from_date := p5_a4;
741     ddp_srv_rec.effective_to_date := p5_a5;
742     ddp_srv_rec.sts_code := p5_a6;
743     ddp_srv_rec.adj_mat_version_id := p5_a7;
744     ddp_srv_rec.srt_rate := p5_a8;
745     ddp_srv_rec.spread := p5_a9;
746     ddp_srv_rec.day_convention_code := p5_a10;
747     ddp_srv_rec.min_adj_rate := p5_a11;
748     ddp_srv_rec.max_adj_rate := p5_a12;
749     ddp_srv_rec.attribute_category := p5_a13;
750     ddp_srv_rec.attribute1 := p5_a14;
751     ddp_srv_rec.attribute2 := p5_a15;
752     ddp_srv_rec.attribute3 := p5_a16;
753     ddp_srv_rec.attribute4 := p5_a17;
754     ddp_srv_rec.attribute5 := p5_a18;
755     ddp_srv_rec.attribute6 := p5_a19;
756     ddp_srv_rec.attribute7 := p5_a20;
757     ddp_srv_rec.attribute8 := p5_a21;
758     ddp_srv_rec.attribute9 := p5_a22;
759     ddp_srv_rec.attribute10 := p5_a23;
760     ddp_srv_rec.attribute11 := p5_a24;
761     ddp_srv_rec.attribute12 := p5_a25;
762     ddp_srv_rec.attribute13 := p5_a26;
763     ddp_srv_rec.attribute14 := p5_a27;
764     ddp_srv_rec.attribute15 := p5_a28;
765     ddp_srv_rec.created_by := p5_a29;
766     ddp_srv_rec.creation_date := p5_a30;
767     ddp_srv_rec.last_updated_by := p5_a31;
768     ddp_srv_rec.last_update_date := p5_a32;
769     ddp_srv_rec.last_update_login := p5_a33;
770 
771 
772     -- here's the delegated call to the old PL/SQL routine
773     okl_fe_std_rate_tmpl_pub.create_version(p_api_version,
774       p_init_msg_list,
775       x_return_status,
776       x_msg_count,
777       x_msg_data,
778       ddp_srv_rec,
779       ddx_srv_rec);
780 
781     -- copy data back from the local variables to OUT or IN-OUT args, if any
782 
783 
784 
785 
786 
787 
788     p6_a0 := ddx_srv_rec.std_rate_tmpl_ver_id;
789     p6_a1 := ddx_srv_rec.object_version_number;
790     p6_a2 := ddx_srv_rec.version_number;
791     p6_a3 := ddx_srv_rec.std_rate_tmpl_id;
792     p6_a4 := ddx_srv_rec.effective_from_date;
793     p6_a5 := ddx_srv_rec.effective_to_date;
794     p6_a6 := ddx_srv_rec.sts_code;
795     p6_a7 := ddx_srv_rec.adj_mat_version_id;
796     p6_a8 := ddx_srv_rec.srt_rate;
797     p6_a9 := ddx_srv_rec.spread;
798     p6_a10 := ddx_srv_rec.day_convention_code;
799     p6_a11 := ddx_srv_rec.min_adj_rate;
800     p6_a12 := ddx_srv_rec.max_adj_rate;
801     p6_a13 := ddx_srv_rec.attribute_category;
802     p6_a14 := ddx_srv_rec.attribute1;
803     p6_a15 := ddx_srv_rec.attribute2;
804     p6_a16 := ddx_srv_rec.attribute3;
805     p6_a17 := ddx_srv_rec.attribute4;
806     p6_a18 := ddx_srv_rec.attribute5;
807     p6_a19 := ddx_srv_rec.attribute6;
808     p6_a20 := ddx_srv_rec.attribute7;
809     p6_a21 := ddx_srv_rec.attribute8;
810     p6_a22 := ddx_srv_rec.attribute9;
811     p6_a23 := ddx_srv_rec.attribute10;
812     p6_a24 := ddx_srv_rec.attribute11;
813     p6_a25 := ddx_srv_rec.attribute12;
814     p6_a26 := ddx_srv_rec.attribute13;
815     p6_a27 := ddx_srv_rec.attribute14;
816     p6_a28 := ddx_srv_rec.attribute15;
817     p6_a29 := ddx_srv_rec.created_by;
818     p6_a30 := ddx_srv_rec.creation_date;
819     p6_a31 := ddx_srv_rec.last_updated_by;
820     p6_a32 := ddx_srv_rec.last_update_date;
821     p6_a33 := ddx_srv_rec.last_update_login;
822   end;
823 
824   procedure insert_srt(p_api_version  NUMBER
825     , p_init_msg_list  VARCHAR2
826     , x_return_status out nocopy  VARCHAR2
827     , x_msg_count out nocopy  NUMBER
828     , x_msg_data out nocopy  VARCHAR2
829     , p5_a0  NUMBER
830     , p5_a1  VARCHAR2
831     , p5_a2  VARCHAR2
832     , p5_a3  NUMBER
833     , p5_a4  NUMBER
834     , p5_a5  VARCHAR2
835     , p5_a6  VARCHAR2
836     , p5_a7  VARCHAR2
837     , p5_a8  NUMBER
838     , p5_a9  VARCHAR2
839     , p5_a10  VARCHAR2
840     , p5_a11  NUMBER
841     , p5_a12  VARCHAR2
842     , p5_a13  VARCHAR2
843     , p5_a14  DATE
844     , p5_a15  DATE
845     , p5_a16  NUMBER
846     , p5_a17  VARCHAR2
847     , p5_a18  VARCHAR2
848     , p5_a19  VARCHAR2
849     , p5_a20  VARCHAR2
850     , p5_a21  VARCHAR2
851     , p5_a22  VARCHAR2
852     , p5_a23  VARCHAR2
853     , p5_a24  VARCHAR2
854     , p5_a25  VARCHAR2
855     , p5_a26  VARCHAR2
856     , p5_a27  VARCHAR2
857     , p5_a28  VARCHAR2
858     , p5_a29  VARCHAR2
859     , p5_a30  VARCHAR2
860     , p5_a31  VARCHAR2
861     , p5_a32  VARCHAR2
862     , p5_a33  NUMBER
863     , p5_a34  DATE
864     , p5_a35  NUMBER
865     , p5_a36  DATE
866     , p5_a37  NUMBER
867     , p6_a0  NUMBER
868     , p6_a1  NUMBER
869     , p6_a2  VARCHAR2
870     , p6_a3  NUMBER
871     , p6_a4  DATE
872     , p6_a5  DATE
873     , p6_a6  VARCHAR2
874     , p6_a7  NUMBER
875     , p6_a8  NUMBER
876     , p6_a9  NUMBER
877     , p6_a10  VARCHAR2
878     , p6_a11  NUMBER
879     , p6_a12  NUMBER
880     , p6_a13  VARCHAR2
881     , p6_a14  VARCHAR2
882     , p6_a15  VARCHAR2
883     , p6_a16  VARCHAR2
884     , p6_a17  VARCHAR2
885     , p6_a18  VARCHAR2
886     , p6_a19  VARCHAR2
887     , p6_a20  VARCHAR2
888     , p6_a21  VARCHAR2
889     , p6_a22  VARCHAR2
890     , p6_a23  VARCHAR2
891     , p6_a24  VARCHAR2
892     , p6_a25  VARCHAR2
893     , p6_a26  VARCHAR2
894     , p6_a27  VARCHAR2
895     , p6_a28  VARCHAR2
896     , p6_a29  NUMBER
897     , p6_a30  DATE
898     , p6_a31  NUMBER
899     , p6_a32  DATE
900     , p6_a33  NUMBER
901     , p7_a0 out nocopy  NUMBER
902     , p7_a1 out nocopy  VARCHAR2
903     , p7_a2 out nocopy  VARCHAR2
904     , p7_a3 out nocopy  NUMBER
905     , p7_a4 out nocopy  NUMBER
906     , p7_a5 out nocopy  VARCHAR2
907     , p7_a6 out nocopy  VARCHAR2
908     , p7_a7 out nocopy  VARCHAR2
909     , p7_a8 out nocopy  NUMBER
910     , p7_a9 out nocopy  VARCHAR2
911     , p7_a10 out nocopy  VARCHAR2
912     , p7_a11 out nocopy  NUMBER
913     , p7_a12 out nocopy  VARCHAR2
914     , p7_a13 out nocopy  VARCHAR2
915     , p7_a14 out nocopy  DATE
916     , p7_a15 out nocopy  DATE
917     , p7_a16 out nocopy  NUMBER
918     , p7_a17 out nocopy  VARCHAR2
919     , p7_a18 out nocopy  VARCHAR2
920     , p7_a19 out nocopy  VARCHAR2
921     , p7_a20 out nocopy  VARCHAR2
922     , p7_a21 out nocopy  VARCHAR2
923     , p7_a22 out nocopy  VARCHAR2
924     , p7_a23 out nocopy  VARCHAR2
925     , p7_a24 out nocopy  VARCHAR2
926     , p7_a25 out nocopy  VARCHAR2
927     , p7_a26 out nocopy  VARCHAR2
928     , p7_a27 out nocopy  VARCHAR2
929     , p7_a28 out nocopy  VARCHAR2
930     , p7_a29 out nocopy  VARCHAR2
931     , p7_a30 out nocopy  VARCHAR2
932     , p7_a31 out nocopy  VARCHAR2
933     , p7_a32 out nocopy  VARCHAR2
934     , p7_a33 out nocopy  NUMBER
935     , p7_a34 out nocopy  DATE
936     , p7_a35 out nocopy  NUMBER
937     , p7_a36 out nocopy  DATE
938     , p7_a37 out nocopy  NUMBER
939     , p8_a0 out nocopy  NUMBER
940     , p8_a1 out nocopy  NUMBER
941     , p8_a2 out nocopy  VARCHAR2
942     , p8_a3 out nocopy  NUMBER
943     , p8_a4 out nocopy  DATE
944     , p8_a5 out nocopy  DATE
945     , p8_a6 out nocopy  VARCHAR2
946     , p8_a7 out nocopy  NUMBER
947     , p8_a8 out nocopy  NUMBER
948     , p8_a9 out nocopy  NUMBER
949     , p8_a10 out nocopy  VARCHAR2
950     , p8_a11 out nocopy  NUMBER
951     , p8_a12 out nocopy  NUMBER
952     , p8_a13 out nocopy  VARCHAR2
953     , p8_a14 out nocopy  VARCHAR2
954     , p8_a15 out nocopy  VARCHAR2
955     , p8_a16 out nocopy  VARCHAR2
956     , p8_a17 out nocopy  VARCHAR2
957     , p8_a18 out nocopy  VARCHAR2
958     , p8_a19 out nocopy  VARCHAR2
959     , p8_a20 out nocopy  VARCHAR2
960     , p8_a21 out nocopy  VARCHAR2
961     , p8_a22 out nocopy  VARCHAR2
962     , p8_a23 out nocopy  VARCHAR2
963     , p8_a24 out nocopy  VARCHAR2
964     , p8_a25 out nocopy  VARCHAR2
965     , p8_a26 out nocopy  VARCHAR2
966     , p8_a27 out nocopy  VARCHAR2
967     , p8_a28 out nocopy  VARCHAR2
968     , p8_a29 out nocopy  NUMBER
969     , p8_a30 out nocopy  DATE
970     , p8_a31 out nocopy  NUMBER
971     , p8_a32 out nocopy  DATE
972     , p8_a33 out nocopy  NUMBER
973   )
974 
975   as
976     ddp_srtv_rec okl_fe_std_rate_tmpl_pub.okl_srtv_rec;
977     ddp_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
978     ddx_srtv_rec okl_fe_std_rate_tmpl_pub.okl_srtv_rec;
979     ddx_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
980     ddindx binary_integer; indx binary_integer;
981   begin
982 
983     -- copy data to the local IN or IN-OUT args, if any
984 
985 
986 
987 
988 
989     ddp_srtv_rec.std_rate_tmpl_id := p5_a0;
990     ddp_srtv_rec.template_name := p5_a1;
991     ddp_srtv_rec.template_desc := p5_a2;
992     ddp_srtv_rec.object_version_number := p5_a3;
993     ddp_srtv_rec.org_id := p5_a4;
994     ddp_srtv_rec.currency_code := p5_a5;
995     ddp_srtv_rec.rate_card_yn := p5_a6;
996     ddp_srtv_rec.pricing_engine_code := p5_a7;
997     ddp_srtv_rec.orig_std_rate_tmpl_id := p5_a8;
998     ddp_srtv_rec.rate_type_code := p5_a9;
999     ddp_srtv_rec.frequency_code := p5_a10;
1000     ddp_srtv_rec.index_id := p5_a11;
1001     ddp_srtv_rec.default_yn := p5_a12;
1002     ddp_srtv_rec.sts_code := p5_a13;
1003     ddp_srtv_rec.effective_from_date := p5_a14;
1004     ddp_srtv_rec.effective_to_date := p5_a15;
1005     ddp_srtv_rec.srt_rate := p5_a16;
1006     ddp_srtv_rec.attribute_category := p5_a17;
1007     ddp_srtv_rec.attribute1 := p5_a18;
1008     ddp_srtv_rec.attribute2 := p5_a19;
1009     ddp_srtv_rec.attribute3 := p5_a20;
1010     ddp_srtv_rec.attribute4 := p5_a21;
1011     ddp_srtv_rec.attribute5 := p5_a22;
1012     ddp_srtv_rec.attribute6 := p5_a23;
1013     ddp_srtv_rec.attribute7 := p5_a24;
1014     ddp_srtv_rec.attribute8 := p5_a25;
1015     ddp_srtv_rec.attribute9 := p5_a26;
1016     ddp_srtv_rec.attribute10 := p5_a27;
1017     ddp_srtv_rec.attribute11 := p5_a28;
1018     ddp_srtv_rec.attribute12 := p5_a29;
1019     ddp_srtv_rec.attribute13 := p5_a30;
1020     ddp_srtv_rec.attribute14 := p5_a31;
1021     ddp_srtv_rec.attribute15 := p5_a32;
1022     ddp_srtv_rec.created_by := p5_a33;
1023     ddp_srtv_rec.creation_date := p5_a34;
1024     ddp_srtv_rec.last_updated_by := p5_a35;
1025     ddp_srtv_rec.last_update_date := p5_a36;
1026     ddp_srtv_rec.last_update_login := p5_a37;
1027 
1028     ddp_srv_rec.std_rate_tmpl_ver_id := p6_a0;
1029     ddp_srv_rec.object_version_number := p6_a1;
1030     ddp_srv_rec.version_number := p6_a2;
1031     ddp_srv_rec.std_rate_tmpl_id := p6_a3;
1032     ddp_srv_rec.effective_from_date := p6_a4;
1033     ddp_srv_rec.effective_to_date := p6_a5;
1034     ddp_srv_rec.sts_code := p6_a6;
1035     ddp_srv_rec.adj_mat_version_id := p6_a7;
1036     ddp_srv_rec.srt_rate := p6_a8;
1037     ddp_srv_rec.spread := p6_a9;
1038     ddp_srv_rec.day_convention_code := p6_a10;
1039     ddp_srv_rec.min_adj_rate := p6_a11;
1040     ddp_srv_rec.max_adj_rate := p6_a12;
1041     ddp_srv_rec.attribute_category := p6_a13;
1042     ddp_srv_rec.attribute1 := p6_a14;
1043     ddp_srv_rec.attribute2 := p6_a15;
1044     ddp_srv_rec.attribute3 := p6_a16;
1045     ddp_srv_rec.attribute4 := p6_a17;
1046     ddp_srv_rec.attribute5 := p6_a18;
1047     ddp_srv_rec.attribute6 := p6_a19;
1048     ddp_srv_rec.attribute7 := p6_a20;
1049     ddp_srv_rec.attribute8 := p6_a21;
1050     ddp_srv_rec.attribute9 := p6_a22;
1051     ddp_srv_rec.attribute10 := p6_a23;
1052     ddp_srv_rec.attribute11 := p6_a24;
1053     ddp_srv_rec.attribute12 := p6_a25;
1054     ddp_srv_rec.attribute13 := p6_a26;
1055     ddp_srv_rec.attribute14 := p6_a27;
1056     ddp_srv_rec.attribute15 := p6_a28;
1057     ddp_srv_rec.created_by := p6_a29;
1058     ddp_srv_rec.creation_date := p6_a30;
1059     ddp_srv_rec.last_updated_by := p6_a31;
1060     ddp_srv_rec.last_update_date := p6_a32;
1061     ddp_srv_rec.last_update_login := p6_a33;
1062 
1063 
1064 
1065     -- here's the delegated call to the old PL/SQL routine
1066     okl_fe_std_rate_tmpl_pub.insert_srt(p_api_version,
1067       p_init_msg_list,
1068       x_return_status,
1069       x_msg_count,
1070       x_msg_data,
1071       ddp_srtv_rec,
1072       ddp_srv_rec,
1073       ddx_srtv_rec,
1074       ddx_srv_rec);
1075 
1076     -- copy data back from the local variables to OUT or IN-OUT args, if any
1077 
1078 
1079 
1080 
1081 
1082 
1083 
1084     p7_a0 := ddx_srtv_rec.std_rate_tmpl_id;
1085     p7_a1 := ddx_srtv_rec.template_name;
1086     p7_a2 := ddx_srtv_rec.template_desc;
1087     p7_a3 := ddx_srtv_rec.object_version_number;
1088     p7_a4 := ddx_srtv_rec.org_id;
1089     p7_a5 := ddx_srtv_rec.currency_code;
1090     p7_a6 := ddx_srtv_rec.rate_card_yn;
1091     p7_a7 := ddx_srtv_rec.pricing_engine_code;
1092     p7_a8 := ddx_srtv_rec.orig_std_rate_tmpl_id;
1093     p7_a9 := ddx_srtv_rec.rate_type_code;
1094     p7_a10 := ddx_srtv_rec.frequency_code;
1095     p7_a11 := ddx_srtv_rec.index_id;
1096     p7_a12 := ddx_srtv_rec.default_yn;
1097     p7_a13 := ddx_srtv_rec.sts_code;
1098     p7_a14 := ddx_srtv_rec.effective_from_date;
1099     p7_a15 := ddx_srtv_rec.effective_to_date;
1100     p7_a16 := ddx_srtv_rec.srt_rate;
1101     p7_a17 := ddx_srtv_rec.attribute_category;
1102     p7_a18 := ddx_srtv_rec.attribute1;
1103     p7_a19 := ddx_srtv_rec.attribute2;
1104     p7_a20 := ddx_srtv_rec.attribute3;
1105     p7_a21 := ddx_srtv_rec.attribute4;
1106     p7_a22 := ddx_srtv_rec.attribute5;
1107     p7_a23 := ddx_srtv_rec.attribute6;
1108     p7_a24 := ddx_srtv_rec.attribute7;
1109     p7_a25 := ddx_srtv_rec.attribute8;
1110     p7_a26 := ddx_srtv_rec.attribute9;
1111     p7_a27 := ddx_srtv_rec.attribute10;
1112     p7_a28 := ddx_srtv_rec.attribute11;
1113     p7_a29 := ddx_srtv_rec.attribute12;
1114     p7_a30 := ddx_srtv_rec.attribute13;
1115     p7_a31 := ddx_srtv_rec.attribute14;
1116     p7_a32 := ddx_srtv_rec.attribute15;
1117     p7_a33 := ddx_srtv_rec.created_by;
1118     p7_a34 := ddx_srtv_rec.creation_date;
1119     p7_a35 := ddx_srtv_rec.last_updated_by;
1120     p7_a36 := ddx_srtv_rec.last_update_date;
1121     p7_a37 := ddx_srtv_rec.last_update_login;
1122 
1123     p8_a0 := ddx_srv_rec.std_rate_tmpl_ver_id;
1124     p8_a1 := ddx_srv_rec.object_version_number;
1125     p8_a2 := ddx_srv_rec.version_number;
1126     p8_a3 := ddx_srv_rec.std_rate_tmpl_id;
1127     p8_a4 := ddx_srv_rec.effective_from_date;
1128     p8_a5 := ddx_srv_rec.effective_to_date;
1129     p8_a6 := ddx_srv_rec.sts_code;
1130     p8_a7 := ddx_srv_rec.adj_mat_version_id;
1131     p8_a8 := ddx_srv_rec.srt_rate;
1132     p8_a9 := ddx_srv_rec.spread;
1133     p8_a10 := ddx_srv_rec.day_convention_code;
1134     p8_a11 := ddx_srv_rec.min_adj_rate;
1135     p8_a12 := ddx_srv_rec.max_adj_rate;
1136     p8_a13 := ddx_srv_rec.attribute_category;
1137     p8_a14 := ddx_srv_rec.attribute1;
1138     p8_a15 := ddx_srv_rec.attribute2;
1139     p8_a16 := ddx_srv_rec.attribute3;
1140     p8_a17 := ddx_srv_rec.attribute4;
1141     p8_a18 := ddx_srv_rec.attribute5;
1142     p8_a19 := ddx_srv_rec.attribute6;
1143     p8_a20 := ddx_srv_rec.attribute7;
1144     p8_a21 := ddx_srv_rec.attribute8;
1145     p8_a22 := ddx_srv_rec.attribute9;
1146     p8_a23 := ddx_srv_rec.attribute10;
1147     p8_a24 := ddx_srv_rec.attribute11;
1148     p8_a25 := ddx_srv_rec.attribute12;
1149     p8_a26 := ddx_srv_rec.attribute13;
1150     p8_a27 := ddx_srv_rec.attribute14;
1151     p8_a28 := ddx_srv_rec.attribute15;
1152     p8_a29 := ddx_srv_rec.created_by;
1153     p8_a30 := ddx_srv_rec.creation_date;
1154     p8_a31 := ddx_srv_rec.last_updated_by;
1155     p8_a32 := ddx_srv_rec.last_update_date;
1156     p8_a33 := ddx_srv_rec.last_update_login;
1157   end;
1158 
1159   procedure update_srt(p_api_version  NUMBER
1160     , p_init_msg_list  VARCHAR2
1161     , x_return_status out nocopy  VARCHAR2
1162     , x_msg_count out nocopy  NUMBER
1163     , x_msg_data out nocopy  VARCHAR2
1164     , p5_a0  NUMBER
1165     , p5_a1  NUMBER
1166     , p5_a2  VARCHAR2
1167     , p5_a3  NUMBER
1168     , p5_a4  DATE
1169     , p5_a5  DATE
1170     , p5_a6  VARCHAR2
1171     , p5_a7  NUMBER
1172     , p5_a8  NUMBER
1173     , p5_a9  NUMBER
1174     , p5_a10  VARCHAR2
1175     , p5_a11  NUMBER
1176     , p5_a12  NUMBER
1177     , p5_a13  VARCHAR2
1178     , p5_a14  VARCHAR2
1179     , p5_a15  VARCHAR2
1180     , p5_a16  VARCHAR2
1181     , p5_a17  VARCHAR2
1182     , p5_a18  VARCHAR2
1183     , p5_a19  VARCHAR2
1184     , p5_a20  VARCHAR2
1185     , p5_a21  VARCHAR2
1186     , p5_a22  VARCHAR2
1187     , p5_a23  VARCHAR2
1188     , p5_a24  VARCHAR2
1189     , p5_a25  VARCHAR2
1190     , p5_a26  VARCHAR2
1191     , p5_a27  VARCHAR2
1192     , p5_a28  VARCHAR2
1193     , p5_a29  NUMBER
1194     , p5_a30  DATE
1195     , p5_a31  NUMBER
1196     , p5_a32  DATE
1197     , p5_a33  NUMBER
1198     , p6_a0 out nocopy  NUMBER
1199     , p6_a1 out nocopy  NUMBER
1200     , p6_a2 out nocopy  VARCHAR2
1201     , p6_a3 out nocopy  NUMBER
1202     , p6_a4 out nocopy  DATE
1203     , p6_a5 out nocopy  DATE
1204     , p6_a6 out nocopy  VARCHAR2
1205     , p6_a7 out nocopy  NUMBER
1206     , p6_a8 out nocopy  NUMBER
1207     , p6_a9 out nocopy  NUMBER
1208     , p6_a10 out nocopy  VARCHAR2
1209     , p6_a11 out nocopy  NUMBER
1210     , p6_a12 out nocopy  NUMBER
1211     , p6_a13 out nocopy  VARCHAR2
1212     , p6_a14 out nocopy  VARCHAR2
1213     , p6_a15 out nocopy  VARCHAR2
1214     , p6_a16 out nocopy  VARCHAR2
1215     , p6_a17 out nocopy  VARCHAR2
1216     , p6_a18 out nocopy  VARCHAR2
1217     , p6_a19 out nocopy  VARCHAR2
1218     , p6_a20 out nocopy  VARCHAR2
1219     , p6_a21 out nocopy  VARCHAR2
1220     , p6_a22 out nocopy  VARCHAR2
1221     , p6_a23 out nocopy  VARCHAR2
1222     , p6_a24 out nocopy  VARCHAR2
1223     , p6_a25 out nocopy  VARCHAR2
1224     , p6_a26 out nocopy  VARCHAR2
1225     , p6_a27 out nocopy  VARCHAR2
1226     , p6_a28 out nocopy  VARCHAR2
1227     , p6_a29 out nocopy  NUMBER
1228     , p6_a30 out nocopy  DATE
1229     , p6_a31 out nocopy  NUMBER
1230     , p6_a32 out nocopy  DATE
1231     , p6_a33 out nocopy  NUMBER
1232   )
1233 
1234   as
1235     ddp_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
1236     ddx_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
1237     ddindx binary_integer; indx binary_integer;
1238   begin
1239 
1240     -- copy data to the local IN or IN-OUT args, if any
1241 
1242 
1243 
1244 
1245 
1246     ddp_srv_rec.std_rate_tmpl_ver_id := p5_a0;
1247     ddp_srv_rec.object_version_number := p5_a1;
1248     ddp_srv_rec.version_number := p5_a2;
1249     ddp_srv_rec.std_rate_tmpl_id := p5_a3;
1250     ddp_srv_rec.effective_from_date := p5_a4;
1251     ddp_srv_rec.effective_to_date := p5_a5;
1252     ddp_srv_rec.sts_code := p5_a6;
1253     ddp_srv_rec.adj_mat_version_id := p5_a7;
1254     ddp_srv_rec.srt_rate := p5_a8;
1255     ddp_srv_rec.spread := p5_a9;
1256     ddp_srv_rec.day_convention_code := p5_a10;
1257     ddp_srv_rec.min_adj_rate := p5_a11;
1258     ddp_srv_rec.max_adj_rate := p5_a12;
1259     ddp_srv_rec.attribute_category := p5_a13;
1260     ddp_srv_rec.attribute1 := p5_a14;
1261     ddp_srv_rec.attribute2 := p5_a15;
1262     ddp_srv_rec.attribute3 := p5_a16;
1263     ddp_srv_rec.attribute4 := p5_a17;
1264     ddp_srv_rec.attribute5 := p5_a18;
1265     ddp_srv_rec.attribute6 := p5_a19;
1266     ddp_srv_rec.attribute7 := p5_a20;
1267     ddp_srv_rec.attribute8 := p5_a21;
1268     ddp_srv_rec.attribute9 := p5_a22;
1269     ddp_srv_rec.attribute10 := p5_a23;
1270     ddp_srv_rec.attribute11 := p5_a24;
1271     ddp_srv_rec.attribute12 := p5_a25;
1272     ddp_srv_rec.attribute13 := p5_a26;
1273     ddp_srv_rec.attribute14 := p5_a27;
1274     ddp_srv_rec.attribute15 := p5_a28;
1275     ddp_srv_rec.created_by := p5_a29;
1276     ddp_srv_rec.creation_date := p5_a30;
1277     ddp_srv_rec.last_updated_by := p5_a31;
1278     ddp_srv_rec.last_update_date := p5_a32;
1279     ddp_srv_rec.last_update_login := p5_a33;
1280 
1281 
1282     -- here's the delegated call to the old PL/SQL routine
1283     okl_fe_std_rate_tmpl_pub.update_srt(p_api_version,
1284       p_init_msg_list,
1285       x_return_status,
1286       x_msg_count,
1287       x_msg_data,
1288       ddp_srv_rec,
1289       ddx_srv_rec);
1290 
1291     -- copy data back from the local variables to OUT or IN-OUT args, if any
1292 
1293 
1294 
1295 
1296 
1297 
1298     p6_a0 := ddx_srv_rec.std_rate_tmpl_ver_id;
1299     p6_a1 := ddx_srv_rec.object_version_number;
1300     p6_a2 := ddx_srv_rec.version_number;
1301     p6_a3 := ddx_srv_rec.std_rate_tmpl_id;
1302     p6_a4 := ddx_srv_rec.effective_from_date;
1303     p6_a5 := ddx_srv_rec.effective_to_date;
1304     p6_a6 := ddx_srv_rec.sts_code;
1305     p6_a7 := ddx_srv_rec.adj_mat_version_id;
1306     p6_a8 := ddx_srv_rec.srt_rate;
1307     p6_a9 := ddx_srv_rec.spread;
1308     p6_a10 := ddx_srv_rec.day_convention_code;
1309     p6_a11 := ddx_srv_rec.min_adj_rate;
1310     p6_a12 := ddx_srv_rec.max_adj_rate;
1311     p6_a13 := ddx_srv_rec.attribute_category;
1312     p6_a14 := ddx_srv_rec.attribute1;
1313     p6_a15 := ddx_srv_rec.attribute2;
1314     p6_a16 := ddx_srv_rec.attribute3;
1315     p6_a17 := ddx_srv_rec.attribute4;
1316     p6_a18 := ddx_srv_rec.attribute5;
1317     p6_a19 := ddx_srv_rec.attribute6;
1318     p6_a20 := ddx_srv_rec.attribute7;
1319     p6_a21 := ddx_srv_rec.attribute8;
1320     p6_a22 := ddx_srv_rec.attribute9;
1321     p6_a23 := ddx_srv_rec.attribute10;
1322     p6_a24 := ddx_srv_rec.attribute11;
1323     p6_a25 := ddx_srv_rec.attribute12;
1324     p6_a26 := ddx_srv_rec.attribute13;
1325     p6_a27 := ddx_srv_rec.attribute14;
1326     p6_a28 := ddx_srv_rec.attribute15;
1327     p6_a29 := ddx_srv_rec.created_by;
1328     p6_a30 := ddx_srv_rec.creation_date;
1329     p6_a31 := ddx_srv_rec.last_updated_by;
1330     p6_a32 := ddx_srv_rec.last_update_date;
1331     p6_a33 := ddx_srv_rec.last_update_login;
1332   end;
1333 
1334   procedure invalid_objects(p_api_version  NUMBER
1335     , p_init_msg_list  VARCHAR2
1336     , x_return_status out nocopy  VARCHAR2
1337     , x_msg_count out nocopy  NUMBER
1338     , x_msg_data out nocopy  VARCHAR2
1339     , p_version_id  NUMBER
1340     , p6_a0 out nocopy JTF_NUMBER_TABLE
1341     , p6_a1 out nocopy JTF_VARCHAR2_TABLE_300
1342     , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1343     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1344   )
1345 
1346   as
1347     ddx_obj_tbl okl_fe_std_rate_tmpl_pub.invalid_object_tbl;
1348     ddindx binary_integer; indx binary_integer;
1349   begin
1350 
1351     -- copy data to the local IN or IN-OUT args, if any
1352 
1353 
1354 
1355 
1356 
1357 
1358 
1359     -- here's the delegated call to the old PL/SQL routine
1360     okl_fe_std_rate_tmpl_pub.invalid_objects(p_api_version,
1361       p_init_msg_list,
1362       x_return_status,
1363       x_msg_count,
1364       x_msg_data,
1365       p_version_id,
1366       ddx_obj_tbl);
1367 
1368     -- copy data back from the local variables to OUT or IN-OUT args, if any
1369 
1370 
1371 
1372 
1373 
1374 
1375     okl_fe_std_rate_tmpl_pvt_w.rosetta_table_copy_out_p8(ddx_obj_tbl, p6_a0
1376       , p6_a1
1377       , p6_a2
1378       , p6_a3
1379       );
1380   end;
1381 
1382   procedure calc_start_date(p_api_version  NUMBER
1383     , p_init_msg_list  VARCHAR2
1384     , x_return_status out nocopy  VARCHAR2
1385     , x_msg_count out nocopy  NUMBER
1386     , x_msg_data out nocopy  VARCHAR2
1387     , p5_a0  NUMBER
1388     , p5_a1  NUMBER
1389     , p5_a2  VARCHAR2
1390     , p5_a3  NUMBER
1391     , p5_a4  DATE
1392     , p5_a5  DATE
1393     , p5_a6  VARCHAR2
1394     , p5_a7  NUMBER
1395     , p5_a8  NUMBER
1396     , p5_a9  NUMBER
1397     , p5_a10  VARCHAR2
1398     , p5_a11  NUMBER
1399     , p5_a12  NUMBER
1400     , p5_a13  VARCHAR2
1401     , p5_a14  VARCHAR2
1402     , p5_a15  VARCHAR2
1403     , p5_a16  VARCHAR2
1404     , p5_a17  VARCHAR2
1405     , p5_a18  VARCHAR2
1406     , p5_a19  VARCHAR2
1407     , p5_a20  VARCHAR2
1408     , p5_a21  VARCHAR2
1409     , p5_a22  VARCHAR2
1410     , p5_a23  VARCHAR2
1411     , p5_a24  VARCHAR2
1412     , p5_a25  VARCHAR2
1413     , p5_a26  VARCHAR2
1414     , p5_a27  VARCHAR2
1415     , p5_a28  VARCHAR2
1416     , p5_a29  NUMBER
1417     , p5_a30  DATE
1418     , p5_a31  NUMBER
1419     , p5_a32  DATE
1420     , p5_a33  NUMBER
1421     , x_cal_eff_from out nocopy  DATE
1422   )
1423 
1424   as
1425     ddp_srv_rec okl_fe_std_rate_tmpl_pub.okl_srv_rec;
1426     ddindx binary_integer; indx binary_integer;
1427   begin
1428 
1429     -- copy data to the local IN or IN-OUT args, if any
1430 
1431 
1432 
1433 
1434 
1435     ddp_srv_rec.std_rate_tmpl_ver_id := p5_a0;
1436     ddp_srv_rec.object_version_number := p5_a1;
1437     ddp_srv_rec.version_number := p5_a2;
1438     ddp_srv_rec.std_rate_tmpl_id := p5_a3;
1439     ddp_srv_rec.effective_from_date := p5_a4;
1440     ddp_srv_rec.effective_to_date := p5_a5;
1441     ddp_srv_rec.sts_code := p5_a6;
1442     ddp_srv_rec.adj_mat_version_id := p5_a7;
1443     ddp_srv_rec.srt_rate := p5_a8;
1444     ddp_srv_rec.spread := p5_a9;
1445     ddp_srv_rec.day_convention_code := p5_a10;
1446     ddp_srv_rec.min_adj_rate := p5_a11;
1447     ddp_srv_rec.max_adj_rate := p5_a12;
1448     ddp_srv_rec.attribute_category := p5_a13;
1449     ddp_srv_rec.attribute1 := p5_a14;
1450     ddp_srv_rec.attribute2 := p5_a15;
1451     ddp_srv_rec.attribute3 := p5_a16;
1452     ddp_srv_rec.attribute4 := p5_a17;
1453     ddp_srv_rec.attribute5 := p5_a18;
1454     ddp_srv_rec.attribute6 := p5_a19;
1455     ddp_srv_rec.attribute7 := p5_a20;
1456     ddp_srv_rec.attribute8 := p5_a21;
1457     ddp_srv_rec.attribute9 := p5_a22;
1458     ddp_srv_rec.attribute10 := p5_a23;
1459     ddp_srv_rec.attribute11 := p5_a24;
1460     ddp_srv_rec.attribute12 := p5_a25;
1461     ddp_srv_rec.attribute13 := p5_a26;
1462     ddp_srv_rec.attribute14 := p5_a27;
1463     ddp_srv_rec.attribute15 := p5_a28;
1464     ddp_srv_rec.created_by := p5_a29;
1465     ddp_srv_rec.creation_date := p5_a30;
1466     ddp_srv_rec.last_updated_by := p5_a31;
1467     ddp_srv_rec.last_update_date := p5_a32;
1468     ddp_srv_rec.last_update_login := p5_a33;
1469 
1470 
1471     -- here's the delegated call to the old PL/SQL routine
1472     okl_fe_std_rate_tmpl_pub.calc_start_date(p_api_version,
1473       p_init_msg_list,
1474       x_return_status,
1475       x_msg_count,
1476       x_msg_data,
1477       ddp_srv_rec,
1478       x_cal_eff_from);
1479 
1480     -- copy data back from the local variables to OUT or IN-OUT args, if any
1481 
1482 
1483 
1484 
1485 
1486 
1487   end;
1488 
1489 end okl_fe_std_rate_tmpl_pub_w;