DBA Data[Home] [Help]

PACKAGE BODY: APPS.CN_RT_QUOTA_ASGN_PVT_W

Source


1 package body cn_rt_quota_asgn_pvt_w as
2   /* $Header: cnwrtqab.pls 120.2 2005/09/14 04:29 rarajara ship $ */
3   procedure rosetta_table_copy_in_p1(t out nocopy cn_rt_quota_asgn_pvt.calc_formulas_tbl_type, a0 JTF_VARCHAR2_TABLE_100
4     , a1 JTF_NUMBER_TABLE
5     ) as
6     ddindx binary_integer; indx binary_integer;
7   begin
8   if a0 is not null and a0.count > 0 then
9       if a0.count > 0 then
10         indx := a0.first;
11         ddindx := 1;
12         while true loop
13           t(ddindx).name := a0(indx);
14           t(ddindx).calc_formula_id := a1(indx);
15           ddindx := ddindx+1;
16           if a0.last =indx
17             then exit;
18           end if;
19           indx := a0.next(indx);
20         end loop;
21       end if;
22    end if;
23   end rosetta_table_copy_in_p1;
24   procedure rosetta_table_copy_out_p1(t cn_rt_quota_asgn_pvt.calc_formulas_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
25     , a1 out nocopy JTF_NUMBER_TABLE
26     ) as
27     ddindx binary_integer; indx binary_integer;
28   begin
29   if t is null or t.count = 0 then
30     a0 := JTF_VARCHAR2_TABLE_100();
31     a1 := JTF_NUMBER_TABLE();
32   else
33       a0 := JTF_VARCHAR2_TABLE_100();
34       a1 := JTF_NUMBER_TABLE();
35       if t.count > 0 then
36         a0.extend(t.count);
37         a1.extend(t.count);
38         ddindx := t.first;
39         indx := 1;
40         while true loop
41           a0(indx) := t(ddindx).name;
42           a1(indx) := t(ddindx).calc_formula_id;
43           indx := indx+1;
44           if t.last =ddindx
45             then exit;
46           end if;
47           ddindx := t.next(ddindx);
48         end loop;
49       end if;
50    end if;
51   end rosetta_table_copy_out_p1;
52 
53   procedure rosetta_table_copy_in_p3(t out nocopy cn_rt_quota_asgn_pvt.rt_quota_asgn_tbl_type, a0 JTF_VARCHAR2_TABLE_100
54     , a1 JTF_NUMBER_TABLE
55     , a2 JTF_NUMBER_TABLE
56     , a3 JTF_NUMBER_TABLE
57     , a4 JTF_DATE_TABLE
58     , a5 JTF_DATE_TABLE
59     , a6 JTF_NUMBER_TABLE
60     , a7 JTF_NUMBER_TABLE
61     , a8 JTF_VARCHAR2_TABLE_100
62     , a9 JTF_VARCHAR2_TABLE_100
63     , a10 JTF_VARCHAR2_TABLE_200
64     , a11 JTF_VARCHAR2_TABLE_200
65     , a12 JTF_VARCHAR2_TABLE_200
66     , a13 JTF_VARCHAR2_TABLE_200
67     , a14 JTF_VARCHAR2_TABLE_200
68     , a15 JTF_VARCHAR2_TABLE_200
69     , a16 JTF_VARCHAR2_TABLE_200
70     , a17 JTF_VARCHAR2_TABLE_200
71     , a18 JTF_VARCHAR2_TABLE_200
72     , a19 JTF_VARCHAR2_TABLE_200
73     , a20 JTF_VARCHAR2_TABLE_200
74     , a21 JTF_VARCHAR2_TABLE_200
75     , a22 JTF_VARCHAR2_TABLE_200
76     , a23 JTF_VARCHAR2_TABLE_200
77     , a24 JTF_VARCHAR2_TABLE_200
78     , a25 JTF_NUMBER_TABLE
79     , a26 JTF_NUMBER_TABLE
80     , a27 JTF_DATE_TABLE
81     , a28 JTF_NUMBER_TABLE
82     , a29 JTF_DATE_TABLE
83     , a30 JTF_NUMBER_TABLE
84     ) as
85     ddindx binary_integer; indx binary_integer;
86   begin
87   if a0 is not null and a0.count > 0 then
88       if a0.count > 0 then
89         indx := a0.first;
90         ddindx := 1;
91         while true loop
92           t(ddindx).name := a0(indx);
93           t(ddindx).org_id := a1(indx);
94           t(ddindx).rt_quota_asgn_id := a2(indx);
95           t(ddindx).quota_id := a3(indx);
96           t(ddindx).start_date := a4(indx);
97           t(ddindx).end_date := a5(indx);
98           t(ddindx).rate_schedule_id := a6(indx);
99           t(ddindx).calc_formula_id := a7(indx);
100           t(ddindx).calc_formula_name := a8(indx);
101           t(ddindx).attribute_category := a9(indx);
102           t(ddindx).attribute1 := a10(indx);
103           t(ddindx).attribute2 := a11(indx);
104           t(ddindx).attribute3 := a12(indx);
105           t(ddindx).attribute4 := a13(indx);
106           t(ddindx).attribute5 := a14(indx);
107           t(ddindx).attribute6 := a15(indx);
108           t(ddindx).attribute7 := a16(indx);
109           t(ddindx).attribute8 := a17(indx);
110           t(ddindx).attribute9 := a18(indx);
111           t(ddindx).attribute10 := a19(indx);
112           t(ddindx).attribute11 := a20(indx);
113           t(ddindx).attribute12 := a21(indx);
114           t(ddindx).attribute13 := a22(indx);
115           t(ddindx).attribute14 := a23(indx);
116           t(ddindx).attribute15 := a24(indx);
117           t(ddindx).object_version_number := a25(indx);
118           t(ddindx).created_by := a26(indx);
119           t(ddindx).creation_date := a27(indx);
120           t(ddindx).last_update_login := a28(indx);
121           t(ddindx).last_update_date := a29(indx);
122           t(ddindx).last_updated_by := a30(indx);
123           ddindx := ddindx+1;
124           if a0.last =indx
125             then exit;
126           end if;
127           indx := a0.next(indx);
128         end loop;
129       end if;
130    end if;
131   end rosetta_table_copy_in_p3;
132   procedure rosetta_table_copy_out_p3(t cn_rt_quota_asgn_pvt.rt_quota_asgn_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
133     , a1 out nocopy JTF_NUMBER_TABLE
134     , a2 out nocopy JTF_NUMBER_TABLE
135     , a3 out nocopy JTF_NUMBER_TABLE
136     , a4 out nocopy JTF_DATE_TABLE
137     , a5 out nocopy JTF_DATE_TABLE
138     , a6 out nocopy JTF_NUMBER_TABLE
139     , a7 out nocopy JTF_NUMBER_TABLE
140     , a8 out nocopy JTF_VARCHAR2_TABLE_100
141     , a9 out nocopy JTF_VARCHAR2_TABLE_100
142     , a10 out nocopy JTF_VARCHAR2_TABLE_200
143     , a11 out nocopy JTF_VARCHAR2_TABLE_200
144     , a12 out nocopy JTF_VARCHAR2_TABLE_200
145     , a13 out nocopy JTF_VARCHAR2_TABLE_200
146     , a14 out nocopy JTF_VARCHAR2_TABLE_200
147     , a15 out nocopy JTF_VARCHAR2_TABLE_200
148     , a16 out nocopy JTF_VARCHAR2_TABLE_200
149     , a17 out nocopy JTF_VARCHAR2_TABLE_200
150     , a18 out nocopy JTF_VARCHAR2_TABLE_200
151     , a19 out nocopy JTF_VARCHAR2_TABLE_200
152     , a20 out nocopy JTF_VARCHAR2_TABLE_200
153     , a21 out nocopy JTF_VARCHAR2_TABLE_200
154     , a22 out nocopy JTF_VARCHAR2_TABLE_200
155     , a23 out nocopy JTF_VARCHAR2_TABLE_200
156     , a24 out nocopy JTF_VARCHAR2_TABLE_200
157     , a25 out nocopy JTF_NUMBER_TABLE
158     , a26 out nocopy JTF_NUMBER_TABLE
159     , a27 out nocopy JTF_DATE_TABLE
160     , a28 out nocopy JTF_NUMBER_TABLE
161     , a29 out nocopy JTF_DATE_TABLE
162     , a30 out nocopy JTF_NUMBER_TABLE
163     ) as
164     ddindx binary_integer; indx binary_integer;
165   begin
166   if t is null or t.count = 0 then
167     a0 := JTF_VARCHAR2_TABLE_100();
168     a1 := JTF_NUMBER_TABLE();
169     a2 := JTF_NUMBER_TABLE();
170     a3 := JTF_NUMBER_TABLE();
171     a4 := JTF_DATE_TABLE();
172     a5 := JTF_DATE_TABLE();
173     a6 := JTF_NUMBER_TABLE();
174     a7 := JTF_NUMBER_TABLE();
175     a8 := JTF_VARCHAR2_TABLE_100();
176     a9 := JTF_VARCHAR2_TABLE_100();
177     a10 := JTF_VARCHAR2_TABLE_200();
178     a11 := JTF_VARCHAR2_TABLE_200();
179     a12 := JTF_VARCHAR2_TABLE_200();
180     a13 := JTF_VARCHAR2_TABLE_200();
181     a14 := JTF_VARCHAR2_TABLE_200();
182     a15 := JTF_VARCHAR2_TABLE_200();
183     a16 := JTF_VARCHAR2_TABLE_200();
184     a17 := JTF_VARCHAR2_TABLE_200();
185     a18 := JTF_VARCHAR2_TABLE_200();
186     a19 := JTF_VARCHAR2_TABLE_200();
187     a20 := JTF_VARCHAR2_TABLE_200();
188     a21 := JTF_VARCHAR2_TABLE_200();
189     a22 := JTF_VARCHAR2_TABLE_200();
190     a23 := JTF_VARCHAR2_TABLE_200();
191     a24 := JTF_VARCHAR2_TABLE_200();
192     a25 := JTF_NUMBER_TABLE();
193     a26 := JTF_NUMBER_TABLE();
194     a27 := JTF_DATE_TABLE();
195     a28 := JTF_NUMBER_TABLE();
196     a29 := JTF_DATE_TABLE();
197     a30 := JTF_NUMBER_TABLE();
198   else
199       a0 := JTF_VARCHAR2_TABLE_100();
200       a1 := JTF_NUMBER_TABLE();
201       a2 := JTF_NUMBER_TABLE();
202       a3 := JTF_NUMBER_TABLE();
203       a4 := JTF_DATE_TABLE();
204       a5 := JTF_DATE_TABLE();
205       a6 := JTF_NUMBER_TABLE();
206       a7 := JTF_NUMBER_TABLE();
207       a8 := JTF_VARCHAR2_TABLE_100();
208       a9 := JTF_VARCHAR2_TABLE_100();
209       a10 := JTF_VARCHAR2_TABLE_200();
210       a11 := JTF_VARCHAR2_TABLE_200();
211       a12 := JTF_VARCHAR2_TABLE_200();
212       a13 := JTF_VARCHAR2_TABLE_200();
213       a14 := JTF_VARCHAR2_TABLE_200();
214       a15 := JTF_VARCHAR2_TABLE_200();
215       a16 := JTF_VARCHAR2_TABLE_200();
216       a17 := JTF_VARCHAR2_TABLE_200();
217       a18 := JTF_VARCHAR2_TABLE_200();
218       a19 := JTF_VARCHAR2_TABLE_200();
219       a20 := JTF_VARCHAR2_TABLE_200();
220       a21 := JTF_VARCHAR2_TABLE_200();
221       a22 := JTF_VARCHAR2_TABLE_200();
222       a23 := JTF_VARCHAR2_TABLE_200();
223       a24 := JTF_VARCHAR2_TABLE_200();
224       a25 := JTF_NUMBER_TABLE();
225       a26 := JTF_NUMBER_TABLE();
226       a27 := JTF_DATE_TABLE();
227       a28 := JTF_NUMBER_TABLE();
228       a29 := JTF_DATE_TABLE();
229       a30 := JTF_NUMBER_TABLE();
230       if t.count > 0 then
231         a0.extend(t.count);
232         a1.extend(t.count);
233         a2.extend(t.count);
234         a3.extend(t.count);
235         a4.extend(t.count);
236         a5.extend(t.count);
237         a6.extend(t.count);
238         a7.extend(t.count);
239         a8.extend(t.count);
240         a9.extend(t.count);
241         a10.extend(t.count);
242         a11.extend(t.count);
243         a12.extend(t.count);
244         a13.extend(t.count);
245         a14.extend(t.count);
246         a15.extend(t.count);
247         a16.extend(t.count);
248         a17.extend(t.count);
249         a18.extend(t.count);
250         a19.extend(t.count);
251         a20.extend(t.count);
252         a21.extend(t.count);
253         a22.extend(t.count);
254         a23.extend(t.count);
255         a24.extend(t.count);
256         a25.extend(t.count);
257         a26.extend(t.count);
258         a27.extend(t.count);
259         a28.extend(t.count);
260         a29.extend(t.count);
261         a30.extend(t.count);
262         ddindx := t.first;
263         indx := 1;
264         while true loop
265           a0(indx) := t(ddindx).name;
266           a1(indx) := t(ddindx).org_id;
267           a2(indx) := t(ddindx).rt_quota_asgn_id;
268           a3(indx) := t(ddindx).quota_id;
269           a4(indx) := t(ddindx).start_date;
270           a5(indx) := t(ddindx).end_date;
271           a6(indx) := t(ddindx).rate_schedule_id;
272           a7(indx) := t(ddindx).calc_formula_id;
273           a8(indx) := t(ddindx).calc_formula_name;
274           a9(indx) := t(ddindx).attribute_category;
275           a10(indx) := t(ddindx).attribute1;
276           a11(indx) := t(ddindx).attribute2;
277           a12(indx) := t(ddindx).attribute3;
278           a13(indx) := t(ddindx).attribute4;
279           a14(indx) := t(ddindx).attribute5;
280           a15(indx) := t(ddindx).attribute6;
281           a16(indx) := t(ddindx).attribute7;
282           a17(indx) := t(ddindx).attribute8;
283           a18(indx) := t(ddindx).attribute9;
284           a19(indx) := t(ddindx).attribute10;
285           a20(indx) := t(ddindx).attribute11;
286           a21(indx) := t(ddindx).attribute12;
287           a22(indx) := t(ddindx).attribute13;
288           a23(indx) := t(ddindx).attribute14;
289           a24(indx) := t(ddindx).attribute15;
290           a25(indx) := t(ddindx).object_version_number;
291           a26(indx) := t(ddindx).created_by;
292           a27(indx) := t(ddindx).creation_date;
293           a28(indx) := t(ddindx).last_update_login;
294           a29(indx) := t(ddindx).last_update_date;
295           a30(indx) := t(ddindx).last_updated_by;
296           indx := indx+1;
297           if t.last =ddindx
298             then exit;
299           end if;
300           ddindx := t.next(ddindx);
301         end loop;
302       end if;
303    end if;
304   end rosetta_table_copy_out_p3;
305 
306   procedure create_rate_table_assignment(p_api_version  NUMBER
307     , p_init_msg_list  VARCHAR2
308     , p_commit  VARCHAR2
309     , p_validation_level  NUMBER
310     , p4_a0 in out nocopy  VARCHAR2
311     , p4_a1 in out nocopy  NUMBER
312     , p4_a2 in out nocopy  NUMBER
313     , p4_a3 in out nocopy  NUMBER
314     , p4_a4 in out nocopy  DATE
315     , p4_a5 in out nocopy  DATE
316     , p4_a6 in out nocopy  NUMBER
317     , p4_a7 in out nocopy  NUMBER
318     , p4_a8 in out nocopy  VARCHAR2
319     , p4_a9 in out nocopy  VARCHAR2
320     , p4_a10 in out nocopy  VARCHAR2
321     , p4_a11 in out nocopy  VARCHAR2
322     , p4_a12 in out nocopy  VARCHAR2
323     , p4_a13 in out nocopy  VARCHAR2
324     , p4_a14 in out nocopy  VARCHAR2
325     , p4_a15 in out nocopy  VARCHAR2
326     , p4_a16 in out nocopy  VARCHAR2
327     , p4_a17 in out nocopy  VARCHAR2
328     , p4_a18 in out nocopy  VARCHAR2
329     , p4_a19 in out nocopy  VARCHAR2
330     , p4_a20 in out nocopy  VARCHAR2
331     , p4_a21 in out nocopy  VARCHAR2
332     , p4_a22 in out nocopy  VARCHAR2
333     , p4_a23 in out nocopy  VARCHAR2
334     , p4_a24 in out nocopy  VARCHAR2
335     , p4_a25 in out nocopy  NUMBER
336     , p4_a26 in out nocopy  NUMBER
337     , p4_a27 in out nocopy  DATE
338     , p4_a28 in out nocopy  NUMBER
339     , p4_a29 in out nocopy  DATE
340     , p4_a30 in out nocopy  NUMBER
341     , x_return_status out nocopy  VARCHAR2
342     , x_msg_count out nocopy  NUMBER
343     , x_msg_data out nocopy  VARCHAR2
344   )
345 
346   as
347     ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
348     ddindx binary_integer; indx binary_integer;
349   begin
350 
351     -- copy data to the local IN or IN-OUT args, if any
352 
353 
354 
355 
356     ddp_rt_quota_asgn.name := p4_a0;
357     ddp_rt_quota_asgn.org_id := p4_a1;
358     ddp_rt_quota_asgn.rt_quota_asgn_id := p4_a2;
359     ddp_rt_quota_asgn.quota_id := p4_a3;
360     ddp_rt_quota_asgn.start_date := p4_a4;
361     ddp_rt_quota_asgn.end_date := p4_a5;
362     ddp_rt_quota_asgn.rate_schedule_id := p4_a6;
363     ddp_rt_quota_asgn.calc_formula_id := p4_a7;
364     ddp_rt_quota_asgn.calc_formula_name := p4_a8;
365     ddp_rt_quota_asgn.attribute_category := p4_a9;
366     ddp_rt_quota_asgn.attribute1 := p4_a10;
367     ddp_rt_quota_asgn.attribute2 := p4_a11;
368     ddp_rt_quota_asgn.attribute3 := p4_a12;
369     ddp_rt_quota_asgn.attribute4 := p4_a13;
370     ddp_rt_quota_asgn.attribute5 := p4_a14;
371     ddp_rt_quota_asgn.attribute6 := p4_a15;
372     ddp_rt_quota_asgn.attribute7 := p4_a16;
373     ddp_rt_quota_asgn.attribute8 := p4_a17;
374     ddp_rt_quota_asgn.attribute9 := p4_a18;
375     ddp_rt_quota_asgn.attribute10 := p4_a19;
376     ddp_rt_quota_asgn.attribute11 := p4_a20;
377     ddp_rt_quota_asgn.attribute12 := p4_a21;
378     ddp_rt_quota_asgn.attribute13 := p4_a22;
379     ddp_rt_quota_asgn.attribute14 := p4_a23;
380     ddp_rt_quota_asgn.attribute15 := p4_a24;
381     ddp_rt_quota_asgn.object_version_number := p4_a25;
382     ddp_rt_quota_asgn.created_by := p4_a26;
383     ddp_rt_quota_asgn.creation_date := p4_a27;
384     ddp_rt_quota_asgn.last_update_login := p4_a28;
385     ddp_rt_quota_asgn.last_update_date := p4_a29;
386     ddp_rt_quota_asgn.last_updated_by := p4_a30;
387 
388 
389 
390 
391     -- here's the delegated call to the old PL/SQL routine
392     cn_rt_quota_asgn_pvt.create_rate_table_assignment(p_api_version,
393       p_init_msg_list,
394       p_commit,
395       p_validation_level,
396       ddp_rt_quota_asgn,
397       x_return_status,
398       x_msg_count,
399       x_msg_data);
400 
401     -- copy data back from the local variables to OUT or IN-OUT args, if any
402 
403 
404 
405 
406     p4_a0 := ddp_rt_quota_asgn.name;
407     p4_a1 := ddp_rt_quota_asgn.org_id;
408     p4_a2 := ddp_rt_quota_asgn.rt_quota_asgn_id;
409     p4_a3 := ddp_rt_quota_asgn.quota_id;
410     p4_a4 := ddp_rt_quota_asgn.start_date;
411     p4_a5 := ddp_rt_quota_asgn.end_date;
412     p4_a6 := ddp_rt_quota_asgn.rate_schedule_id;
413     p4_a7 := ddp_rt_quota_asgn.calc_formula_id;
414     p4_a8 := ddp_rt_quota_asgn.calc_formula_name;
415     p4_a9 := ddp_rt_quota_asgn.attribute_category;
416     p4_a10 := ddp_rt_quota_asgn.attribute1;
417     p4_a11 := ddp_rt_quota_asgn.attribute2;
418     p4_a12 := ddp_rt_quota_asgn.attribute3;
419     p4_a13 := ddp_rt_quota_asgn.attribute4;
420     p4_a14 := ddp_rt_quota_asgn.attribute5;
421     p4_a15 := ddp_rt_quota_asgn.attribute6;
422     p4_a16 := ddp_rt_quota_asgn.attribute7;
423     p4_a17 := ddp_rt_quota_asgn.attribute8;
424     p4_a18 := ddp_rt_quota_asgn.attribute9;
425     p4_a19 := ddp_rt_quota_asgn.attribute10;
426     p4_a20 := ddp_rt_quota_asgn.attribute11;
427     p4_a21 := ddp_rt_quota_asgn.attribute12;
428     p4_a22 := ddp_rt_quota_asgn.attribute13;
429     p4_a23 := ddp_rt_quota_asgn.attribute14;
430     p4_a24 := ddp_rt_quota_asgn.attribute15;
431     p4_a25 := ddp_rt_quota_asgn.object_version_number;
432     p4_a26 := ddp_rt_quota_asgn.created_by;
433     p4_a27 := ddp_rt_quota_asgn.creation_date;
434     p4_a28 := ddp_rt_quota_asgn.last_update_login;
435     p4_a29 := ddp_rt_quota_asgn.last_update_date;
436     p4_a30 := ddp_rt_quota_asgn.last_updated_by;
437 
438 
439 
440   end;
441 
442   procedure update_rate_table_assignment(p_api_version  NUMBER
443     , p_init_msg_list  VARCHAR2
444     , p_commit  VARCHAR2
445     , p_validation_level  NUMBER
446     , p4_a0 in out nocopy  VARCHAR2
447     , p4_a1 in out nocopy  NUMBER
448     , p4_a2 in out nocopy  NUMBER
449     , p4_a3 in out nocopy  NUMBER
450     , p4_a4 in out nocopy  DATE
451     , p4_a5 in out nocopy  DATE
452     , p4_a6 in out nocopy  NUMBER
453     , p4_a7 in out nocopy  NUMBER
454     , p4_a8 in out nocopy  VARCHAR2
455     , p4_a9 in out nocopy  VARCHAR2
456     , p4_a10 in out nocopy  VARCHAR2
457     , p4_a11 in out nocopy  VARCHAR2
458     , p4_a12 in out nocopy  VARCHAR2
459     , p4_a13 in out nocopy  VARCHAR2
460     , p4_a14 in out nocopy  VARCHAR2
461     , p4_a15 in out nocopy  VARCHAR2
462     , p4_a16 in out nocopy  VARCHAR2
463     , p4_a17 in out nocopy  VARCHAR2
464     , p4_a18 in out nocopy  VARCHAR2
465     , p4_a19 in out nocopy  VARCHAR2
466     , p4_a20 in out nocopy  VARCHAR2
467     , p4_a21 in out nocopy  VARCHAR2
468     , p4_a22 in out nocopy  VARCHAR2
469     , p4_a23 in out nocopy  VARCHAR2
470     , p4_a24 in out nocopy  VARCHAR2
471     , p4_a25 in out nocopy  NUMBER
472     , p4_a26 in out nocopy  NUMBER
473     , p4_a27 in out nocopy  DATE
474     , p4_a28 in out nocopy  NUMBER
475     , p4_a29 in out nocopy  DATE
476     , p4_a30 in out nocopy  NUMBER
477     , x_return_status out nocopy  VARCHAR2
478     , x_msg_count out nocopy  NUMBER
479     , x_msg_data out nocopy  VARCHAR2
480   )
481 
482   as
483     ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
484     ddindx binary_integer; indx binary_integer;
485   begin
486 
487     -- copy data to the local IN or IN-OUT args, if any
488 
489 
490 
491 
492     ddp_rt_quota_asgn.name := p4_a0;
493     ddp_rt_quota_asgn.org_id := p4_a1;
494     ddp_rt_quota_asgn.rt_quota_asgn_id := p4_a2;
495     ddp_rt_quota_asgn.quota_id := p4_a3;
496     ddp_rt_quota_asgn.start_date := p4_a4;
497     ddp_rt_quota_asgn.end_date := p4_a5;
498     ddp_rt_quota_asgn.rate_schedule_id := p4_a6;
499     ddp_rt_quota_asgn.calc_formula_id := p4_a7;
500     ddp_rt_quota_asgn.calc_formula_name := p4_a8;
501     ddp_rt_quota_asgn.attribute_category := p4_a9;
502     ddp_rt_quota_asgn.attribute1 := p4_a10;
503     ddp_rt_quota_asgn.attribute2 := p4_a11;
504     ddp_rt_quota_asgn.attribute3 := p4_a12;
505     ddp_rt_quota_asgn.attribute4 := p4_a13;
506     ddp_rt_quota_asgn.attribute5 := p4_a14;
507     ddp_rt_quota_asgn.attribute6 := p4_a15;
508     ddp_rt_quota_asgn.attribute7 := p4_a16;
509     ddp_rt_quota_asgn.attribute8 := p4_a17;
510     ddp_rt_quota_asgn.attribute9 := p4_a18;
511     ddp_rt_quota_asgn.attribute10 := p4_a19;
512     ddp_rt_quota_asgn.attribute11 := p4_a20;
513     ddp_rt_quota_asgn.attribute12 := p4_a21;
514     ddp_rt_quota_asgn.attribute13 := p4_a22;
515     ddp_rt_quota_asgn.attribute14 := p4_a23;
516     ddp_rt_quota_asgn.attribute15 := p4_a24;
517     ddp_rt_quota_asgn.object_version_number := p4_a25;
518     ddp_rt_quota_asgn.created_by := p4_a26;
519     ddp_rt_quota_asgn.creation_date := p4_a27;
520     ddp_rt_quota_asgn.last_update_login := p4_a28;
521     ddp_rt_quota_asgn.last_update_date := p4_a29;
522     ddp_rt_quota_asgn.last_updated_by := p4_a30;
523 
524 
525 
526 
527     -- here's the delegated call to the old PL/SQL routine
528     cn_rt_quota_asgn_pvt.update_rate_table_assignment(p_api_version,
529       p_init_msg_list,
530       p_commit,
531       p_validation_level,
532       ddp_rt_quota_asgn,
533       x_return_status,
534       x_msg_count,
535       x_msg_data);
536 
537     -- copy data back from the local variables to OUT or IN-OUT args, if any
538 
539 
540 
541 
542     p4_a0 := ddp_rt_quota_asgn.name;
543     p4_a1 := ddp_rt_quota_asgn.org_id;
544     p4_a2 := ddp_rt_quota_asgn.rt_quota_asgn_id;
545     p4_a3 := ddp_rt_quota_asgn.quota_id;
546     p4_a4 := ddp_rt_quota_asgn.start_date;
547     p4_a5 := ddp_rt_quota_asgn.end_date;
548     p4_a6 := ddp_rt_quota_asgn.rate_schedule_id;
549     p4_a7 := ddp_rt_quota_asgn.calc_formula_id;
550     p4_a8 := ddp_rt_quota_asgn.calc_formula_name;
551     p4_a9 := ddp_rt_quota_asgn.attribute_category;
552     p4_a10 := ddp_rt_quota_asgn.attribute1;
553     p4_a11 := ddp_rt_quota_asgn.attribute2;
554     p4_a12 := ddp_rt_quota_asgn.attribute3;
555     p4_a13 := ddp_rt_quota_asgn.attribute4;
556     p4_a14 := ddp_rt_quota_asgn.attribute5;
557     p4_a15 := ddp_rt_quota_asgn.attribute6;
558     p4_a16 := ddp_rt_quota_asgn.attribute7;
559     p4_a17 := ddp_rt_quota_asgn.attribute8;
560     p4_a18 := ddp_rt_quota_asgn.attribute9;
561     p4_a19 := ddp_rt_quota_asgn.attribute10;
562     p4_a20 := ddp_rt_quota_asgn.attribute11;
563     p4_a21 := ddp_rt_quota_asgn.attribute12;
564     p4_a22 := ddp_rt_quota_asgn.attribute13;
565     p4_a23 := ddp_rt_quota_asgn.attribute14;
566     p4_a24 := ddp_rt_quota_asgn.attribute15;
567     p4_a25 := ddp_rt_quota_asgn.object_version_number;
568     p4_a26 := ddp_rt_quota_asgn.created_by;
569     p4_a27 := ddp_rt_quota_asgn.creation_date;
570     p4_a28 := ddp_rt_quota_asgn.last_update_login;
571     p4_a29 := ddp_rt_quota_asgn.last_update_date;
572     p4_a30 := ddp_rt_quota_asgn.last_updated_by;
573 
574 
575 
576   end;
577 
578   procedure delete_rate_table_assignment(p_api_version  NUMBER
579     , p_init_msg_list  VARCHAR2
580     , p_commit  VARCHAR2
581     , p_validation_level  NUMBER
582     , p4_a0 in out nocopy  VARCHAR2
583     , p4_a1 in out nocopy  NUMBER
584     , p4_a2 in out nocopy  NUMBER
585     , p4_a3 in out nocopy  NUMBER
586     , p4_a4 in out nocopy  DATE
587     , p4_a5 in out nocopy  DATE
588     , p4_a6 in out nocopy  NUMBER
589     , p4_a7 in out nocopy  NUMBER
590     , p4_a8 in out nocopy  VARCHAR2
591     , p4_a9 in out nocopy  VARCHAR2
592     , p4_a10 in out nocopy  VARCHAR2
593     , p4_a11 in out nocopy  VARCHAR2
594     , p4_a12 in out nocopy  VARCHAR2
595     , p4_a13 in out nocopy  VARCHAR2
596     , p4_a14 in out nocopy  VARCHAR2
597     , p4_a15 in out nocopy  VARCHAR2
598     , p4_a16 in out nocopy  VARCHAR2
599     , p4_a17 in out nocopy  VARCHAR2
600     , p4_a18 in out nocopy  VARCHAR2
601     , p4_a19 in out nocopy  VARCHAR2
602     , p4_a20 in out nocopy  VARCHAR2
603     , p4_a21 in out nocopy  VARCHAR2
604     , p4_a22 in out nocopy  VARCHAR2
605     , p4_a23 in out nocopy  VARCHAR2
606     , p4_a24 in out nocopy  VARCHAR2
607     , p4_a25 in out nocopy  NUMBER
608     , p4_a26 in out nocopy  NUMBER
609     , p4_a27 in out nocopy  DATE
610     , p4_a28 in out nocopy  NUMBER
611     , p4_a29 in out nocopy  DATE
612     , p4_a30 in out nocopy  NUMBER
613     , x_return_status out nocopy  VARCHAR2
614     , x_msg_count out nocopy  NUMBER
615     , x_msg_data out nocopy  VARCHAR2
616   )
617 
618   as
619     ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
620     ddindx binary_integer; indx binary_integer;
621   begin
622 
623     -- copy data to the local IN or IN-OUT args, if any
624 
625 
626 
627 
628     ddp_rt_quota_asgn.name := p4_a0;
629     ddp_rt_quota_asgn.org_id := p4_a1;
630     ddp_rt_quota_asgn.rt_quota_asgn_id := p4_a2;
631     ddp_rt_quota_asgn.quota_id := p4_a3;
632     ddp_rt_quota_asgn.start_date := p4_a4;
633     ddp_rt_quota_asgn.end_date := p4_a5;
634     ddp_rt_quota_asgn.rate_schedule_id := p4_a6;
635     ddp_rt_quota_asgn.calc_formula_id := p4_a7;
636     ddp_rt_quota_asgn.calc_formula_name := p4_a8;
637     ddp_rt_quota_asgn.attribute_category := p4_a9;
638     ddp_rt_quota_asgn.attribute1 := p4_a10;
639     ddp_rt_quota_asgn.attribute2 := p4_a11;
640     ddp_rt_quota_asgn.attribute3 := p4_a12;
641     ddp_rt_quota_asgn.attribute4 := p4_a13;
642     ddp_rt_quota_asgn.attribute5 := p4_a14;
643     ddp_rt_quota_asgn.attribute6 := p4_a15;
644     ddp_rt_quota_asgn.attribute7 := p4_a16;
645     ddp_rt_quota_asgn.attribute8 := p4_a17;
646     ddp_rt_quota_asgn.attribute9 := p4_a18;
647     ddp_rt_quota_asgn.attribute10 := p4_a19;
648     ddp_rt_quota_asgn.attribute11 := p4_a20;
649     ddp_rt_quota_asgn.attribute12 := p4_a21;
650     ddp_rt_quota_asgn.attribute13 := p4_a22;
651     ddp_rt_quota_asgn.attribute14 := p4_a23;
652     ddp_rt_quota_asgn.attribute15 := p4_a24;
653     ddp_rt_quota_asgn.object_version_number := p4_a25;
654     ddp_rt_quota_asgn.created_by := p4_a26;
655     ddp_rt_quota_asgn.creation_date := p4_a27;
656     ddp_rt_quota_asgn.last_update_login := p4_a28;
657     ddp_rt_quota_asgn.last_update_date := p4_a29;
658     ddp_rt_quota_asgn.last_updated_by := p4_a30;
659 
660 
661 
662 
663     -- here's the delegated call to the old PL/SQL routine
664     cn_rt_quota_asgn_pvt.delete_rate_table_assignment(p_api_version,
665       p_init_msg_list,
666       p_commit,
667       p_validation_level,
668       ddp_rt_quota_asgn,
669       x_return_status,
670       x_msg_count,
671       x_msg_data);
672 
673     -- copy data back from the local variables to OUT or IN-OUT args, if any
674 
675 
676 
677 
678     p4_a0 := ddp_rt_quota_asgn.name;
679     p4_a1 := ddp_rt_quota_asgn.org_id;
680     p4_a2 := ddp_rt_quota_asgn.rt_quota_asgn_id;
681     p4_a3 := ddp_rt_quota_asgn.quota_id;
682     p4_a4 := ddp_rt_quota_asgn.start_date;
683     p4_a5 := ddp_rt_quota_asgn.end_date;
684     p4_a6 := ddp_rt_quota_asgn.rate_schedule_id;
685     p4_a7 := ddp_rt_quota_asgn.calc_formula_id;
686     p4_a8 := ddp_rt_quota_asgn.calc_formula_name;
687     p4_a9 := ddp_rt_quota_asgn.attribute_category;
688     p4_a10 := ddp_rt_quota_asgn.attribute1;
689     p4_a11 := ddp_rt_quota_asgn.attribute2;
690     p4_a12 := ddp_rt_quota_asgn.attribute3;
691     p4_a13 := ddp_rt_quota_asgn.attribute4;
692     p4_a14 := ddp_rt_quota_asgn.attribute5;
693     p4_a15 := ddp_rt_quota_asgn.attribute6;
694     p4_a16 := ddp_rt_quota_asgn.attribute7;
695     p4_a17 := ddp_rt_quota_asgn.attribute8;
696     p4_a18 := ddp_rt_quota_asgn.attribute9;
697     p4_a19 := ddp_rt_quota_asgn.attribute10;
698     p4_a20 := ddp_rt_quota_asgn.attribute11;
699     p4_a21 := ddp_rt_quota_asgn.attribute12;
700     p4_a22 := ddp_rt_quota_asgn.attribute13;
701     p4_a23 := ddp_rt_quota_asgn.attribute14;
702     p4_a24 := ddp_rt_quota_asgn.attribute15;
703     p4_a25 := ddp_rt_quota_asgn.object_version_number;
704     p4_a26 := ddp_rt_quota_asgn.created_by;
705     p4_a27 := ddp_rt_quota_asgn.creation_date;
706     p4_a28 := ddp_rt_quota_asgn.last_update_login;
707     p4_a29 := ddp_rt_quota_asgn.last_update_date;
708     p4_a30 := ddp_rt_quota_asgn.last_updated_by;
709 
710 
711 
712   end;
713 
714   procedure get_formula_rate_tables(p_api_version  NUMBER
715     , p_init_msg_list  VARCHAR2
716     , p_commit  VARCHAR2
717     , p_validation_level  NUMBER
718     , p_type  VARCHAR2
719     , p_quota_id  NUMBER
720     , p_calc_formula_id  NUMBER
721     , p7_a0 out nocopy JTF_VARCHAR2_TABLE_100
722     , p7_a1 out nocopy JTF_NUMBER_TABLE
723     , p8_a0 out nocopy JTF_VARCHAR2_TABLE_100
724     , p8_a1 out nocopy JTF_NUMBER_TABLE
725     , p8_a2 out nocopy JTF_NUMBER_TABLE
726     , p8_a3 out nocopy JTF_NUMBER_TABLE
727     , p8_a4 out nocopy JTF_DATE_TABLE
728     , p8_a5 out nocopy JTF_DATE_TABLE
729     , p8_a6 out nocopy JTF_NUMBER_TABLE
730     , p8_a7 out nocopy JTF_NUMBER_TABLE
731     , p8_a8 out nocopy JTF_VARCHAR2_TABLE_100
732     , p8_a9 out nocopy JTF_VARCHAR2_TABLE_100
733     , p8_a10 out nocopy JTF_VARCHAR2_TABLE_200
734     , p8_a11 out nocopy JTF_VARCHAR2_TABLE_200
735     , p8_a12 out nocopy JTF_VARCHAR2_TABLE_200
736     , p8_a13 out nocopy JTF_VARCHAR2_TABLE_200
737     , p8_a14 out nocopy JTF_VARCHAR2_TABLE_200
738     , p8_a15 out nocopy JTF_VARCHAR2_TABLE_200
739     , p8_a16 out nocopy JTF_VARCHAR2_TABLE_200
740     , p8_a17 out nocopy JTF_VARCHAR2_TABLE_200
741     , p8_a18 out nocopy JTF_VARCHAR2_TABLE_200
742     , p8_a19 out nocopy JTF_VARCHAR2_TABLE_200
743     , p8_a20 out nocopy JTF_VARCHAR2_TABLE_200
744     , p8_a21 out nocopy JTF_VARCHAR2_TABLE_200
745     , p8_a22 out nocopy JTF_VARCHAR2_TABLE_200
746     , p8_a23 out nocopy JTF_VARCHAR2_TABLE_200
747     , p8_a24 out nocopy JTF_VARCHAR2_TABLE_200
748     , p8_a25 out nocopy JTF_NUMBER_TABLE
749     , p8_a26 out nocopy JTF_NUMBER_TABLE
750     , p8_a27 out nocopy JTF_DATE_TABLE
751     , p8_a28 out nocopy JTF_NUMBER_TABLE
752     , p8_a29 out nocopy JTF_DATE_TABLE
753     , p8_a30 out nocopy JTF_NUMBER_TABLE
754     , x_return_status out nocopy  VARCHAR2
755     , x_msg_count out nocopy  NUMBER
756     , x_msg_data out nocopy  VARCHAR2
757   )
758 
759   as
760     ddx_calc_formulas cn_rt_quota_asgn_pvt.calc_formulas_tbl_type;
761     ddx_rate_tables cn_rt_quota_asgn_pvt.rt_quota_asgn_tbl_type;
762     ddindx binary_integer; indx binary_integer;
763   begin
764 
765     -- copy data to the local IN or IN-OUT args, if any
766 
767 
768 
769 
770 
771 
772 
773 
774 
775 
776 
777 
778     -- here's the delegated call to the old PL/SQL routine
779     cn_rt_quota_asgn_pvt.get_formula_rate_tables(p_api_version,
780       p_init_msg_list,
781       p_commit,
782       p_validation_level,
783       p_type,
784       p_quota_id,
785       p_calc_formula_id,
786       ddx_calc_formulas,
787       ddx_rate_tables,
788       x_return_status,
789       x_msg_count,
790       x_msg_data);
791 
792     -- copy data back from the local variables to OUT or IN-OUT args, if any
793 
794 
795 
796 
797 
798 
799 
800     cn_rt_quota_asgn_pvt_w.rosetta_table_copy_out_p1(ddx_calc_formulas, p7_a0
801       , p7_a1
802       );
803 
804     cn_rt_quota_asgn_pvt_w.rosetta_table_copy_out_p3(ddx_rate_tables, p8_a0
805       , p8_a1
806       , p8_a2
807       , p8_a3
808       , p8_a4
809       , p8_a5
810       , p8_a6
811       , p8_a7
812       , p8_a8
813       , p8_a9
814       , p8_a10
815       , p8_a11
816       , p8_a12
817       , p8_a13
818       , p8_a14
819       , p8_a15
820       , p8_a16
821       , p8_a17
822       , p8_a18
823       , p8_a19
824       , p8_a20
825       , p8_a21
826       , p8_a22
827       , p8_a23
828       , p8_a24
829       , p8_a25
830       , p8_a26
831       , p8_a27
832       , p8_a28
833       , p8_a29
834       , p8_a30
835       );
836 
837 
838 
839   end;
840 
841   procedure validate_rate_table_assignment(p_api_version  NUMBER
842     , p_init_msg_list  VARCHAR2
843     , p_commit  VARCHAR2
844     , p_validation_level  NUMBER
845     , p_action  VARCHAR2
846     , p5_a0 in out nocopy  VARCHAR2
847     , p5_a1 in out nocopy  NUMBER
848     , p5_a2 in out nocopy  NUMBER
849     , p5_a3 in out nocopy  NUMBER
850     , p5_a4 in out nocopy  DATE
851     , p5_a5 in out nocopy  DATE
852     , p5_a6 in out nocopy  NUMBER
853     , p5_a7 in out nocopy  NUMBER
854     , p5_a8 in out nocopy  VARCHAR2
855     , p5_a9 in out nocopy  VARCHAR2
856     , p5_a10 in out nocopy  VARCHAR2
857     , p5_a11 in out nocopy  VARCHAR2
858     , p5_a12 in out nocopy  VARCHAR2
859     , p5_a13 in out nocopy  VARCHAR2
860     , p5_a14 in out nocopy  VARCHAR2
861     , p5_a15 in out nocopy  VARCHAR2
862     , p5_a16 in out nocopy  VARCHAR2
863     , p5_a17 in out nocopy  VARCHAR2
864     , p5_a18 in out nocopy  VARCHAR2
865     , p5_a19 in out nocopy  VARCHAR2
866     , p5_a20 in out nocopy  VARCHAR2
867     , p5_a21 in out nocopy  VARCHAR2
868     , p5_a22 in out nocopy  VARCHAR2
869     , p5_a23 in out nocopy  VARCHAR2
870     , p5_a24 in out nocopy  VARCHAR2
871     , p5_a25 in out nocopy  NUMBER
872     , p5_a26 in out nocopy  NUMBER
873     , p5_a27 in out nocopy  DATE
874     , p5_a28 in out nocopy  NUMBER
875     , p5_a29 in out nocopy  DATE
876     , p5_a30 in out nocopy  NUMBER
877     , p6_a0  VARCHAR2
878     , p6_a1  NUMBER
879     , p6_a2  NUMBER
880     , p6_a3  NUMBER
881     , p6_a4  DATE
882     , p6_a5  DATE
883     , p6_a6  NUMBER
884     , p6_a7  NUMBER
885     , p6_a8  VARCHAR2
886     , p6_a9  VARCHAR2
887     , p6_a10  VARCHAR2
888     , p6_a11  VARCHAR2
889     , p6_a12  VARCHAR2
890     , p6_a13  VARCHAR2
891     , p6_a14  VARCHAR2
892     , p6_a15  VARCHAR2
893     , p6_a16  VARCHAR2
894     , p6_a17  VARCHAR2
895     , p6_a18  VARCHAR2
896     , p6_a19  VARCHAR2
897     , p6_a20  VARCHAR2
898     , p6_a21  VARCHAR2
899     , p6_a22  VARCHAR2
900     , p6_a23  VARCHAR2
901     , p6_a24  VARCHAR2
902     , p6_a25  NUMBER
903     , p6_a26  NUMBER
904     , p6_a27  DATE
905     , p6_a28  NUMBER
906     , p6_a29  DATE
907     , p6_a30  NUMBER
908     , x_return_status out nocopy  VARCHAR2
909     , x_msg_count out nocopy  NUMBER
910     , x_msg_data out nocopy  VARCHAR2
911   )
912 
913   as
914     ddp_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
915     ddp_old_rt_quota_asgn cn_rt_quota_asgn_pvt.rt_quota_asgn_rec_type;
916     ddindx binary_integer; indx binary_integer;
917   begin
918 
919     -- copy data to the local IN or IN-OUT args, if any
920 
921 
922 
923 
924 
925     ddp_rt_quota_asgn.name := p5_a0;
926     ddp_rt_quota_asgn.org_id := p5_a1;
927     ddp_rt_quota_asgn.rt_quota_asgn_id := p5_a2;
928     ddp_rt_quota_asgn.quota_id := p5_a3;
929     ddp_rt_quota_asgn.start_date := p5_a4;
930     ddp_rt_quota_asgn.end_date := p5_a5;
931     ddp_rt_quota_asgn.rate_schedule_id := p5_a6;
932     ddp_rt_quota_asgn.calc_formula_id := p5_a7;
933     ddp_rt_quota_asgn.calc_formula_name := p5_a8;
934     ddp_rt_quota_asgn.attribute_category := p5_a9;
935     ddp_rt_quota_asgn.attribute1 := p5_a10;
936     ddp_rt_quota_asgn.attribute2 := p5_a11;
937     ddp_rt_quota_asgn.attribute3 := p5_a12;
938     ddp_rt_quota_asgn.attribute4 := p5_a13;
939     ddp_rt_quota_asgn.attribute5 := p5_a14;
940     ddp_rt_quota_asgn.attribute6 := p5_a15;
941     ddp_rt_quota_asgn.attribute7 := p5_a16;
942     ddp_rt_quota_asgn.attribute8 := p5_a17;
943     ddp_rt_quota_asgn.attribute9 := p5_a18;
944     ddp_rt_quota_asgn.attribute10 := p5_a19;
945     ddp_rt_quota_asgn.attribute11 := p5_a20;
946     ddp_rt_quota_asgn.attribute12 := p5_a21;
947     ddp_rt_quota_asgn.attribute13 := p5_a22;
948     ddp_rt_quota_asgn.attribute14 := p5_a23;
949     ddp_rt_quota_asgn.attribute15 := p5_a24;
950     ddp_rt_quota_asgn.object_version_number := p5_a25;
951     ddp_rt_quota_asgn.created_by := p5_a26;
952     ddp_rt_quota_asgn.creation_date := p5_a27;
953     ddp_rt_quota_asgn.last_update_login := p5_a28;
954     ddp_rt_quota_asgn.last_update_date := p5_a29;
955     ddp_rt_quota_asgn.last_updated_by := p5_a30;
956 
957     ddp_old_rt_quota_asgn.name := p6_a0;
958     ddp_old_rt_quota_asgn.org_id := p6_a1;
959     ddp_old_rt_quota_asgn.rt_quota_asgn_id := p6_a2;
960     ddp_old_rt_quota_asgn.quota_id := p6_a3;
961     ddp_old_rt_quota_asgn.start_date := p6_a4;
962     ddp_old_rt_quota_asgn.end_date := p6_a5;
963     ddp_old_rt_quota_asgn.rate_schedule_id := p6_a6;
964     ddp_old_rt_quota_asgn.calc_formula_id := p6_a7;
965     ddp_old_rt_quota_asgn.calc_formula_name := p6_a8;
966     ddp_old_rt_quota_asgn.attribute_category := p6_a9;
967     ddp_old_rt_quota_asgn.attribute1 := p6_a10;
968     ddp_old_rt_quota_asgn.attribute2 := p6_a11;
969     ddp_old_rt_quota_asgn.attribute3 := p6_a12;
970     ddp_old_rt_quota_asgn.attribute4 := p6_a13;
971     ddp_old_rt_quota_asgn.attribute5 := p6_a14;
972     ddp_old_rt_quota_asgn.attribute6 := p6_a15;
973     ddp_old_rt_quota_asgn.attribute7 := p6_a16;
974     ddp_old_rt_quota_asgn.attribute8 := p6_a17;
975     ddp_old_rt_quota_asgn.attribute9 := p6_a18;
976     ddp_old_rt_quota_asgn.attribute10 := p6_a19;
977     ddp_old_rt_quota_asgn.attribute11 := p6_a20;
978     ddp_old_rt_quota_asgn.attribute12 := p6_a21;
979     ddp_old_rt_quota_asgn.attribute13 := p6_a22;
980     ddp_old_rt_quota_asgn.attribute14 := p6_a23;
981     ddp_old_rt_quota_asgn.attribute15 := p6_a24;
982     ddp_old_rt_quota_asgn.object_version_number := p6_a25;
983     ddp_old_rt_quota_asgn.created_by := p6_a26;
984     ddp_old_rt_quota_asgn.creation_date := p6_a27;
985     ddp_old_rt_quota_asgn.last_update_login := p6_a28;
986     ddp_old_rt_quota_asgn.last_update_date := p6_a29;
987     ddp_old_rt_quota_asgn.last_updated_by := p6_a30;
988 
989 
990 
991 
992     -- here's the delegated call to the old PL/SQL routine
993     cn_rt_quota_asgn_pvt.validate_rate_table_assignment(p_api_version,
994       p_init_msg_list,
995       p_commit,
996       p_validation_level,
997       p_action,
998       ddp_rt_quota_asgn,
999       ddp_old_rt_quota_asgn,
1000       x_return_status,
1001       x_msg_count,
1002       x_msg_data);
1003 
1004     -- copy data back from the local variables to OUT or IN-OUT args, if any
1005 
1006 
1007 
1008 
1009 
1010     p5_a0 := ddp_rt_quota_asgn.name;
1011     p5_a1 := ddp_rt_quota_asgn.org_id;
1012     p5_a2 := ddp_rt_quota_asgn.rt_quota_asgn_id;
1013     p5_a3 := ddp_rt_quota_asgn.quota_id;
1014     p5_a4 := ddp_rt_quota_asgn.start_date;
1015     p5_a5 := ddp_rt_quota_asgn.end_date;
1016     p5_a6 := ddp_rt_quota_asgn.rate_schedule_id;
1017     p5_a7 := ddp_rt_quota_asgn.calc_formula_id;
1018     p5_a8 := ddp_rt_quota_asgn.calc_formula_name;
1019     p5_a9 := ddp_rt_quota_asgn.attribute_category;
1020     p5_a10 := ddp_rt_quota_asgn.attribute1;
1021     p5_a11 := ddp_rt_quota_asgn.attribute2;
1022     p5_a12 := ddp_rt_quota_asgn.attribute3;
1023     p5_a13 := ddp_rt_quota_asgn.attribute4;
1024     p5_a14 := ddp_rt_quota_asgn.attribute5;
1025     p5_a15 := ddp_rt_quota_asgn.attribute6;
1026     p5_a16 := ddp_rt_quota_asgn.attribute7;
1027     p5_a17 := ddp_rt_quota_asgn.attribute8;
1028     p5_a18 := ddp_rt_quota_asgn.attribute9;
1029     p5_a19 := ddp_rt_quota_asgn.attribute10;
1030     p5_a20 := ddp_rt_quota_asgn.attribute11;
1031     p5_a21 := ddp_rt_quota_asgn.attribute12;
1032     p5_a22 := ddp_rt_quota_asgn.attribute13;
1033     p5_a23 := ddp_rt_quota_asgn.attribute14;
1034     p5_a24 := ddp_rt_quota_asgn.attribute15;
1035     p5_a25 := ddp_rt_quota_asgn.object_version_number;
1036     p5_a26 := ddp_rt_quota_asgn.created_by;
1037     p5_a27 := ddp_rt_quota_asgn.creation_date;
1038     p5_a28 := ddp_rt_quota_asgn.last_update_login;
1039     p5_a29 := ddp_rt_quota_asgn.last_update_date;
1040     p5_a30 := ddp_rt_quota_asgn.last_updated_by;
1041 
1042 
1043 
1044 
1045   end;
1046 
1047 end cn_rt_quota_asgn_pvt_w;