DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_OPT_RUL_TMP_PUB_W

Source


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