DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_OPT_RUL_TMP_PVT_W

Source


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