DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_LSQ_PVT_W

Source


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