DBA Data[Home] [Help]

PACKAGE BODY: APPS.QP_MODIFIERS_PUB_OA

Source


1 package body qp_modifiers_pub_oa as
2   /* $Header: ozfaqpmb.pls 120.0 2005/08/31 09:43 gramanat noship $ */
3   procedure rosetta_table_copy_in_p1(t out nocopy qp_modifiers_pub.pricing_attr_tbl_type, a0 JTF_NUMBER_TABLE
4     , a1 JTF_VARCHAR2_TABLE_100
5     , a2 JTF_NUMBER_TABLE
6     , a3 JTF_VARCHAR2_TABLE_100
7     , a4 JTF_VARCHAR2_TABLE_100
8     , a5 JTF_VARCHAR2_TABLE_300
9     , a6 JTF_VARCHAR2_TABLE_100
10     , a7 JTF_VARCHAR2_TABLE_100
11     , a8 JTF_VARCHAR2_TABLE_100
12     , a9 JTF_VARCHAR2_TABLE_300
13     , a10 JTF_VARCHAR2_TABLE_300
14     , a11 JTF_NUMBER_TABLE
15     , a12 JTF_VARCHAR2_TABLE_100
16     ) as
17     ddindx binary_integer; indx binary_integer;
18   begin
19   if a0 is not null and a0.count > 0 then
20       if a0.count > 0 then
21         indx := a0.first;
22         ddindx := 1;
23         while true loop
24           t(ddindx).list_line_id := a0(indx);
25           t(ddindx).excluder_flag := a1(indx);
26           t(ddindx).pricing_attribute_id := a2(indx);
27           t(ddindx).product_attribute_context := a3(indx);
28           t(ddindx).product_attribute := a4(indx);
29           t(ddindx).product_attr_value := a5(indx);
30           t(ddindx).product_uom_code := a6(indx);
31           t(ddindx).pricing_attribute_context := a7(indx);
32           t(ddindx).pricing_attribute := a8(indx);
33           t(ddindx).pricing_attr_value_from := a9(indx);
34           t(ddindx).pricing_attr_value_to := a10(indx);
35           t(ddindx).modifiers_index := a11(indx);
36           t(ddindx).operation := a12(indx);
37           ddindx := ddindx+1;
38           if a0.last =indx
39             then exit;
40           end if;
41           indx := a0.next(indx);
42         end loop;
43       end if;
44    end if;
45   end rosetta_table_copy_in_p1;
46   procedure rosetta_table_copy_out_p1(t qp_modifiers_pub.pricing_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
47     , a1 out nocopy JTF_VARCHAR2_TABLE_100
48     , a2 out nocopy JTF_NUMBER_TABLE
49     , a3 out nocopy JTF_VARCHAR2_TABLE_100
50     , a4 out nocopy JTF_VARCHAR2_TABLE_100
51     , a5 out nocopy JTF_VARCHAR2_TABLE_300
52     , a6 out nocopy JTF_VARCHAR2_TABLE_100
53     , a7 out nocopy JTF_VARCHAR2_TABLE_100
54     , a8 out nocopy JTF_VARCHAR2_TABLE_100
55     , a9 out nocopy JTF_VARCHAR2_TABLE_300
56     , a10 out nocopy JTF_VARCHAR2_TABLE_300
57     , a11 out nocopy JTF_NUMBER_TABLE
58     , a12 out nocopy JTF_VARCHAR2_TABLE_100
59     ) as
60     ddindx binary_integer; indx binary_integer;
61   begin
62   if t is null or t.count = 0 then
63     a0 := JTF_NUMBER_TABLE();
64     a1 := JTF_VARCHAR2_TABLE_100();
65     a2 := JTF_NUMBER_TABLE();
66     a3 := JTF_VARCHAR2_TABLE_100();
67     a4 := JTF_VARCHAR2_TABLE_100();
68     a5 := JTF_VARCHAR2_TABLE_300();
69     a6 := JTF_VARCHAR2_TABLE_100();
70     a7 := JTF_VARCHAR2_TABLE_100();
71     a8 := JTF_VARCHAR2_TABLE_100();
72     a9 := JTF_VARCHAR2_TABLE_300();
73     a10 := JTF_VARCHAR2_TABLE_300();
74     a11 := JTF_NUMBER_TABLE();
75     a12 := JTF_VARCHAR2_TABLE_100();
76   else
77       a0 := JTF_NUMBER_TABLE();
78       a1 := JTF_VARCHAR2_TABLE_100();
79       a2 := JTF_NUMBER_TABLE();
80       a3 := JTF_VARCHAR2_TABLE_100();
81       a4 := JTF_VARCHAR2_TABLE_100();
82       a5 := JTF_VARCHAR2_TABLE_300();
83       a6 := JTF_VARCHAR2_TABLE_100();
84       a7 := JTF_VARCHAR2_TABLE_100();
85       a8 := JTF_VARCHAR2_TABLE_100();
86       a9 := JTF_VARCHAR2_TABLE_300();
87       a10 := JTF_VARCHAR2_TABLE_300();
88       a11 := JTF_NUMBER_TABLE();
89       a12 := JTF_VARCHAR2_TABLE_100();
90       if t.count > 0 then
91         a0.extend(t.count);
92         a1.extend(t.count);
93         a2.extend(t.count);
94         a3.extend(t.count);
95         a4.extend(t.count);
96         a5.extend(t.count);
97         a6.extend(t.count);
98         a7.extend(t.count);
99         a8.extend(t.count);
100         a9.extend(t.count);
101         a10.extend(t.count);
102         a11.extend(t.count);
103         a12.extend(t.count);
104         ddindx := t.first;
105         indx := 1;
106         while true loop
107           a0(indx) := t(ddindx).list_line_id;
108           a1(indx) := t(ddindx).excluder_flag;
109           a2(indx) := t(ddindx).pricing_attribute_id;
110           a3(indx) := t(ddindx).product_attribute_context;
111           a4(indx) := t(ddindx).product_attribute;
112           a5(indx) := t(ddindx).product_attr_value;
113           a6(indx) := t(ddindx).product_uom_code;
114           a7(indx) := t(ddindx).pricing_attribute_context;
115           a8(indx) := t(ddindx).pricing_attribute;
116           a9(indx) := t(ddindx).pricing_attr_value_from;
117           a10(indx) := t(ddindx).pricing_attr_value_to;
118           a11(indx) := t(ddindx).modifiers_index;
119           a12(indx) := t(ddindx).operation;
120           indx := indx+1;
121           if t.last =ddindx
122             then exit;
123           end if;
124           ddindx := t.next(ddindx);
125         end loop;
126       end if;
127    end if;
128   end rosetta_table_copy_out_p1;
129 
130   procedure rosetta_table_copy_in_p3(t out nocopy qp_modifiers_pub.modifiers_tbl_type, a0 JTF_VARCHAR2_TABLE_100
131     , a1 JTF_VARCHAR2_TABLE_300
132     , a2 JTF_VARCHAR2_TABLE_300
133     , a3 JTF_VARCHAR2_TABLE_300
134     , a4 JTF_VARCHAR2_TABLE_300
135     , a5 JTF_VARCHAR2_TABLE_300
136     , a6 JTF_VARCHAR2_TABLE_300
137     , a7 JTF_VARCHAR2_TABLE_300
138     , a8 JTF_VARCHAR2_TABLE_300
139     , a9 JTF_VARCHAR2_TABLE_300
140     , a10 JTF_VARCHAR2_TABLE_300
141     , a11 JTF_VARCHAR2_TABLE_300
142     , a12 JTF_VARCHAR2_TABLE_300
143     , a13 JTF_VARCHAR2_TABLE_300
144     , a14 JTF_VARCHAR2_TABLE_300
145     , a15 JTF_VARCHAR2_TABLE_300
146     , a16 JTF_VARCHAR2_TABLE_100
147     , a17 JTF_VARCHAR2_TABLE_2000
148     , a18 JTF_VARCHAR2_TABLE_100
149     , a19 JTF_NUMBER_TABLE
150     , a20 JTF_DATE_TABLE
151     , a21 JTF_VARCHAR2_TABLE_100
152     , a22 JTF_DATE_TABLE
153     , a23 JTF_NUMBER_TABLE
154     , a24 JTF_NUMBER_TABLE
155     , a25 JTF_NUMBER_TABLE
156     , a26 JTF_NUMBER_TABLE
157     , a27 JTF_DATE_TABLE
158     , a28 JTF_NUMBER_TABLE
159     , a29 JTF_NUMBER_TABLE
160     , a30 JTF_NUMBER_TABLE
161     , a31 JTF_VARCHAR2_TABLE_100
162     , a32 JTF_NUMBER_TABLE
163     , a33 JTF_VARCHAR2_TABLE_100
164     , a34 JTF_NUMBER_TABLE
165     , a35 JTF_NUMBER_TABLE
166     , a36 JTF_NUMBER_TABLE
167     , a37 JTF_VARCHAR2_TABLE_100
168     , a38 JTF_NUMBER_TABLE
169     , a39 JTF_VARCHAR2_TABLE_100
170     , a40 JTF_NUMBER_TABLE
171     , a41 JTF_VARCHAR2_TABLE_100
172     , a42 JTF_VARCHAR2_TABLE_100
173     , a43 JTF_NUMBER_TABLE
174     , a44 JTF_NUMBER_TABLE
175     , a45 JTF_DATE_TABLE
176     , a46 JTF_VARCHAR2_TABLE_100
177     , a47 JTF_NUMBER_TABLE
178     , a48 JTF_NUMBER_TABLE
179     , a49 JTF_VARCHAR2_TABLE_100
180     , a50 JTF_NUMBER_TABLE
181     , a51 JTF_VARCHAR2_TABLE_100
182     , a52 JTF_DATE_TABLE
183     , a53 JTF_VARCHAR2_TABLE_100
184     , a54 JTF_DATE_TABLE
185     , a55 JTF_VARCHAR2_TABLE_100
186     , a56 JTF_VARCHAR2_TABLE_100
187     , a57 JTF_VARCHAR2_TABLE_300
188     , a58 JTF_VARCHAR2_TABLE_100
189     , a59 JTF_NUMBER_TABLE
190     , a60 JTF_VARCHAR2_TABLE_100
191     , a61 JTF_VARCHAR2_TABLE_100
192     , a62 JTF_NUMBER_TABLE
193     , a63 JTF_NUMBER_TABLE
194     , a64 JTF_NUMBER_TABLE
195     , a65 JTF_NUMBER_TABLE
196     , a66 JTF_VARCHAR2_TABLE_100
197     , a67 JTF_NUMBER_TABLE
198     , a68 JTF_NUMBER_TABLE
199     , a69 JTF_DATE_TABLE
200     , a70 JTF_NUMBER_TABLE
201     , a71 JTF_VARCHAR2_TABLE_100
202     , a72 JTF_DATE_TABLE
203     , a73 JTF_NUMBER_TABLE
204     , a74 JTF_NUMBER_TABLE
205     , a75 JTF_NUMBER_TABLE
206     , a76 JTF_VARCHAR2_TABLE_100
207     , a77 JTF_VARCHAR2_TABLE_100
208     , a78 JTF_NUMBER_TABLE
209     , a79 JTF_VARCHAR2_TABLE_100
210     , a80 JTF_NUMBER_TABLE
211     , a81 JTF_VARCHAR2_TABLE_100
212     , a82 JTF_VARCHAR2_TABLE_100
213     , a83 JTF_VARCHAR2_TABLE_100
214     , a84 JTF_VARCHAR2_TABLE_100
215     , a85 JTF_VARCHAR2_TABLE_100
216     , a86 JTF_NUMBER_TABLE
217     , a87 JTF_NUMBER_TABLE
218     , a88 JTF_VARCHAR2_TABLE_100
219     , a89 JTF_VARCHAR2_TABLE_300
220     ) as
221     ddindx binary_integer; indx binary_integer;
222   begin
223   if a0 is not null and a0.count > 0 then
224       if a0.count > 0 then
225         indx := a0.first;
226         ddindx := 1;
227         while true loop
228           t(ddindx).arithmetic_operator := a0(indx);
229           t(ddindx).attribute1 := a1(indx);
230           t(ddindx).attribute10 := a2(indx);
231           t(ddindx).attribute11 := a3(indx);
232           t(ddindx).attribute12 := a4(indx);
233           t(ddindx).attribute13 := a5(indx);
234           t(ddindx).attribute14 := a6(indx);
235           t(ddindx).attribute15 := a7(indx);
236           t(ddindx).attribute2 := a8(indx);
237           t(ddindx).attribute3 := a9(indx);
238           t(ddindx).attribute4 := a10(indx);
239           t(ddindx).attribute5 := a11(indx);
240           t(ddindx).attribute6 := a12(indx);
241           t(ddindx).attribute7 := a13(indx);
242           t(ddindx).attribute8 := a14(indx);
243           t(ddindx).attribute9 := a15(indx);
244           t(ddindx).automatic_flag := a16(indx);
245           t(ddindx).comments := a17(indx);
246           t(ddindx).context := a18(indx);
247           t(ddindx).created_by := a19(indx);
248           t(ddindx).creation_date := a20(indx);
249           t(ddindx).effective_period_uom := a21(indx);
250           t(ddindx).end_date_active := a22(indx);
251           t(ddindx).estim_accrual_rate := a23(indx);
252           t(ddindx).generate_using_formula_id := a24(indx);
253           t(ddindx).inventory_item_id := a25(indx);
254           t(ddindx).last_updated_by := a26(indx);
255           t(ddindx).last_update_date := a27(indx);
256           t(ddindx).last_update_login := a28(indx);
257           t(ddindx).list_header_id := a29(indx);
258           t(ddindx).list_line_id := a30(indx);
259           t(ddindx).list_line_type_code := a31(indx);
260           t(ddindx).list_price := a32(indx);
261           t(ddindx).modifier_level_code := a33(indx);
262           t(ddindx).number_effective_periods := a34(indx);
263           t(ddindx).operand := a35(indx);
264           t(ddindx).organization_id := a36(indx);
265           t(ddindx).override_flag := a37(indx);
266           t(ddindx).percent_price := a38(indx);
267           t(ddindx).price_break_type_code := a39(indx);
268           t(ddindx).price_by_formula_id := a40(indx);
269           t(ddindx).primary_uom_flag := a41(indx);
270           t(ddindx).print_on_invoice_flag := a42(indx);
271           t(ddindx).program_application_id := a43(indx);
272           t(ddindx).program_id := a44(indx);
273           t(ddindx).program_update_date := a45(indx);
274           t(ddindx).rebate_trxn_type_code := a46(indx);
275           t(ddindx).related_item_id := a47(indx);
276           t(ddindx).relationship_type_id := a48(indx);
277           t(ddindx).reprice_flag := a49(indx);
278           t(ddindx).request_id := a50(indx);
279           t(ddindx).revision := a51(indx);
280           t(ddindx).revision_date := a52(indx);
281           t(ddindx).revision_reason_code := a53(indx);
282           t(ddindx).start_date_active := a54(indx);
283           t(ddindx).substitution_attribute := a55(indx);
284           t(ddindx).substitution_context := a56(indx);
285           t(ddindx).substitution_value := a57(indx);
286           t(ddindx).accrual_flag := a58(indx);
287           t(ddindx).pricing_group_sequence := a59(indx);
288           t(ddindx).incompatibility_grp_code := a60(indx);
289           t(ddindx).list_line_no := a61(indx);
290           t(ddindx).rltd_modifier_id := a62(indx);
291           t(ddindx).from_rltd_modifier_id := a63(indx);
292           t(ddindx).to_rltd_modifier_id := a64(indx);
293           t(ddindx).rltd_modifier_grp_no := a65(indx);
294           t(ddindx).rltd_modifier_grp_type := a66(indx);
295           t(ddindx).pricing_phase_id := a67(indx);
296           t(ddindx).product_precedence := a68(indx);
297           t(ddindx).expiration_period_start_date := a69(indx);
298           t(ddindx).number_expiration_periods := a70(indx);
299           t(ddindx).expiration_period_uom := a71(indx);
300           t(ddindx).expiration_date := a72(indx);
301           t(ddindx).estim_gl_value := a73(indx);
302           t(ddindx).benefit_price_list_line_id := a74(indx);
303           t(ddindx).benefit_limit := a75(indx);
304           t(ddindx).charge_type_code := a76(indx);
305           t(ddindx).charge_subtype_code := a77(indx);
306           t(ddindx).benefit_qty := a78(indx);
307           t(ddindx).benefit_uom_code := a79(indx);
308           t(ddindx).accrual_conversion_rate := a80(indx);
309           t(ddindx).proration_type_code := a81(indx);
310           t(ddindx).include_on_returns_flag := a82(indx);
311           t(ddindx).return_status := a83(indx);
312           t(ddindx).db_flag := a84(indx);
313           t(ddindx).operation := a85(indx);
314           t(ddindx).modifier_parent_index := a86(indx);
315           t(ddindx).qualification_ind := a87(indx);
316           t(ddindx).net_amount_flag := a88(indx);
317           t(ddindx).accum_attribute := a89(indx);
318           ddindx := ddindx+1;
319           if a0.last =indx
320             then exit;
321           end if;
322           indx := a0.next(indx);
323         end loop;
324       end if;
325    end if;
326   end rosetta_table_copy_in_p3;
327   procedure rosetta_table_copy_out_p3(t qp_modifiers_pub.modifiers_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
328     , a1 out nocopy JTF_VARCHAR2_TABLE_300
329     , a2 out nocopy JTF_VARCHAR2_TABLE_300
330     , a3 out nocopy JTF_VARCHAR2_TABLE_300
331     , a4 out nocopy JTF_VARCHAR2_TABLE_300
332     , a5 out nocopy JTF_VARCHAR2_TABLE_300
333     , a6 out nocopy JTF_VARCHAR2_TABLE_300
334     , a7 out nocopy JTF_VARCHAR2_TABLE_300
335     , a8 out nocopy JTF_VARCHAR2_TABLE_300
336     , a9 out nocopy JTF_VARCHAR2_TABLE_300
337     , a10 out nocopy JTF_VARCHAR2_TABLE_300
338     , a11 out nocopy JTF_VARCHAR2_TABLE_300
339     , a12 out nocopy JTF_VARCHAR2_TABLE_300
340     , a13 out nocopy JTF_VARCHAR2_TABLE_300
341     , a14 out nocopy JTF_VARCHAR2_TABLE_300
342     , a15 out nocopy JTF_VARCHAR2_TABLE_300
343     , a16 out nocopy JTF_VARCHAR2_TABLE_100
344     , a17 out nocopy JTF_VARCHAR2_TABLE_2000
345     , a18 out nocopy JTF_VARCHAR2_TABLE_100
346     , a19 out nocopy JTF_NUMBER_TABLE
347     , a20 out nocopy JTF_DATE_TABLE
348     , a21 out nocopy JTF_VARCHAR2_TABLE_100
349     , a22 out nocopy JTF_DATE_TABLE
350     , a23 out nocopy JTF_NUMBER_TABLE
351     , a24 out nocopy JTF_NUMBER_TABLE
352     , a25 out nocopy JTF_NUMBER_TABLE
353     , a26 out nocopy JTF_NUMBER_TABLE
354     , a27 out nocopy JTF_DATE_TABLE
355     , a28 out nocopy JTF_NUMBER_TABLE
356     , a29 out nocopy JTF_NUMBER_TABLE
357     , a30 out nocopy JTF_NUMBER_TABLE
358     , a31 out nocopy JTF_VARCHAR2_TABLE_100
359     , a32 out nocopy JTF_NUMBER_TABLE
360     , a33 out nocopy JTF_VARCHAR2_TABLE_100
361     , a34 out nocopy JTF_NUMBER_TABLE
362     , a35 out nocopy JTF_NUMBER_TABLE
363     , a36 out nocopy JTF_NUMBER_TABLE
364     , a37 out nocopy JTF_VARCHAR2_TABLE_100
365     , a38 out nocopy JTF_NUMBER_TABLE
366     , a39 out nocopy JTF_VARCHAR2_TABLE_100
367     , a40 out nocopy JTF_NUMBER_TABLE
368     , a41 out nocopy JTF_VARCHAR2_TABLE_100
369     , a42 out nocopy JTF_VARCHAR2_TABLE_100
370     , a43 out nocopy JTF_NUMBER_TABLE
371     , a44 out nocopy JTF_NUMBER_TABLE
372     , a45 out nocopy JTF_DATE_TABLE
373     , a46 out nocopy JTF_VARCHAR2_TABLE_100
374     , a47 out nocopy JTF_NUMBER_TABLE
375     , a48 out nocopy JTF_NUMBER_TABLE
376     , a49 out nocopy JTF_VARCHAR2_TABLE_100
377     , a50 out nocopy JTF_NUMBER_TABLE
378     , a51 out nocopy JTF_VARCHAR2_TABLE_100
379     , a52 out nocopy JTF_DATE_TABLE
380     , a53 out nocopy JTF_VARCHAR2_TABLE_100
381     , a54 out nocopy JTF_DATE_TABLE
382     , a55 out nocopy JTF_VARCHAR2_TABLE_100
383     , a56 out nocopy JTF_VARCHAR2_TABLE_100
384     , a57 out nocopy JTF_VARCHAR2_TABLE_300
385     , a58 out nocopy JTF_VARCHAR2_TABLE_100
386     , a59 out nocopy JTF_NUMBER_TABLE
387     , a60 out nocopy JTF_VARCHAR2_TABLE_100
388     , a61 out nocopy JTF_VARCHAR2_TABLE_100
389     , a62 out nocopy JTF_NUMBER_TABLE
390     , a63 out nocopy JTF_NUMBER_TABLE
391     , a64 out nocopy JTF_NUMBER_TABLE
392     , a65 out nocopy JTF_NUMBER_TABLE
393     , a66 out nocopy JTF_VARCHAR2_TABLE_100
394     , a67 out nocopy JTF_NUMBER_TABLE
395     , a68 out nocopy JTF_NUMBER_TABLE
396     , a69 out nocopy JTF_DATE_TABLE
397     , a70 out nocopy JTF_NUMBER_TABLE
398     , a71 out nocopy JTF_VARCHAR2_TABLE_100
399     , a72 out nocopy JTF_DATE_TABLE
400     , a73 out nocopy JTF_NUMBER_TABLE
401     , a74 out nocopy JTF_NUMBER_TABLE
402     , a75 out nocopy JTF_NUMBER_TABLE
403     , a76 out nocopy JTF_VARCHAR2_TABLE_100
404     , a77 out nocopy JTF_VARCHAR2_TABLE_100
405     , a78 out nocopy JTF_NUMBER_TABLE
406     , a79 out nocopy JTF_VARCHAR2_TABLE_100
407     , a80 out nocopy JTF_NUMBER_TABLE
408     , a81 out nocopy JTF_VARCHAR2_TABLE_100
409     , a82 out nocopy JTF_VARCHAR2_TABLE_100
410     , a83 out nocopy JTF_VARCHAR2_TABLE_100
411     , a84 out nocopy JTF_VARCHAR2_TABLE_100
412     , a85 out nocopy JTF_VARCHAR2_TABLE_100
413     , a86 out nocopy JTF_NUMBER_TABLE
414     , a87 out nocopy JTF_NUMBER_TABLE
415     , a88 out nocopy JTF_VARCHAR2_TABLE_100
416     , a89 out nocopy JTF_VARCHAR2_TABLE_300
417     ) as
418     ddindx binary_integer; indx binary_integer;
419   begin
420   if t is null or t.count = 0 then
421     a0 := JTF_VARCHAR2_TABLE_100();
422     a1 := JTF_VARCHAR2_TABLE_300();
423     a2 := JTF_VARCHAR2_TABLE_300();
424     a3 := JTF_VARCHAR2_TABLE_300();
425     a4 := JTF_VARCHAR2_TABLE_300();
426     a5 := JTF_VARCHAR2_TABLE_300();
427     a6 := JTF_VARCHAR2_TABLE_300();
428     a7 := JTF_VARCHAR2_TABLE_300();
429     a8 := JTF_VARCHAR2_TABLE_300();
430     a9 := JTF_VARCHAR2_TABLE_300();
431     a10 := JTF_VARCHAR2_TABLE_300();
432     a11 := JTF_VARCHAR2_TABLE_300();
433     a12 := JTF_VARCHAR2_TABLE_300();
434     a13 := JTF_VARCHAR2_TABLE_300();
435     a14 := JTF_VARCHAR2_TABLE_300();
436     a15 := JTF_VARCHAR2_TABLE_300();
437     a16 := JTF_VARCHAR2_TABLE_100();
438     a17 := JTF_VARCHAR2_TABLE_2000();
439     a18 := JTF_VARCHAR2_TABLE_100();
440     a19 := JTF_NUMBER_TABLE();
441     a20 := JTF_DATE_TABLE();
442     a21 := JTF_VARCHAR2_TABLE_100();
443     a22 := JTF_DATE_TABLE();
444     a23 := JTF_NUMBER_TABLE();
445     a24 := JTF_NUMBER_TABLE();
446     a25 := JTF_NUMBER_TABLE();
447     a26 := JTF_NUMBER_TABLE();
448     a27 := JTF_DATE_TABLE();
449     a28 := JTF_NUMBER_TABLE();
450     a29 := JTF_NUMBER_TABLE();
451     a30 := JTF_NUMBER_TABLE();
452     a31 := JTF_VARCHAR2_TABLE_100();
453     a32 := JTF_NUMBER_TABLE();
454     a33 := JTF_VARCHAR2_TABLE_100();
455     a34 := JTF_NUMBER_TABLE();
456     a35 := JTF_NUMBER_TABLE();
457     a36 := JTF_NUMBER_TABLE();
458     a37 := JTF_VARCHAR2_TABLE_100();
459     a38 := JTF_NUMBER_TABLE();
460     a39 := JTF_VARCHAR2_TABLE_100();
461     a40 := JTF_NUMBER_TABLE();
462     a41 := JTF_VARCHAR2_TABLE_100();
463     a42 := JTF_VARCHAR2_TABLE_100();
464     a43 := JTF_NUMBER_TABLE();
465     a44 := JTF_NUMBER_TABLE();
466     a45 := JTF_DATE_TABLE();
467     a46 := JTF_VARCHAR2_TABLE_100();
468     a47 := JTF_NUMBER_TABLE();
469     a48 := JTF_NUMBER_TABLE();
470     a49 := JTF_VARCHAR2_TABLE_100();
471     a50 := JTF_NUMBER_TABLE();
472     a51 := JTF_VARCHAR2_TABLE_100();
473     a52 := JTF_DATE_TABLE();
474     a53 := JTF_VARCHAR2_TABLE_100();
475     a54 := JTF_DATE_TABLE();
476     a55 := JTF_VARCHAR2_TABLE_100();
477     a56 := JTF_VARCHAR2_TABLE_100();
478     a57 := JTF_VARCHAR2_TABLE_300();
479     a58 := JTF_VARCHAR2_TABLE_100();
480     a59 := JTF_NUMBER_TABLE();
481     a60 := JTF_VARCHAR2_TABLE_100();
482     a61 := JTF_VARCHAR2_TABLE_100();
483     a62 := JTF_NUMBER_TABLE();
484     a63 := JTF_NUMBER_TABLE();
485     a64 := JTF_NUMBER_TABLE();
486     a65 := JTF_NUMBER_TABLE();
487     a66 := JTF_VARCHAR2_TABLE_100();
488     a67 := JTF_NUMBER_TABLE();
489     a68 := JTF_NUMBER_TABLE();
490     a69 := JTF_DATE_TABLE();
491     a70 := JTF_NUMBER_TABLE();
492     a71 := JTF_VARCHAR2_TABLE_100();
493     a72 := JTF_DATE_TABLE();
494     a73 := JTF_NUMBER_TABLE();
495     a74 := JTF_NUMBER_TABLE();
496     a75 := JTF_NUMBER_TABLE();
497     a76 := JTF_VARCHAR2_TABLE_100();
498     a77 := JTF_VARCHAR2_TABLE_100();
499     a78 := JTF_NUMBER_TABLE();
500     a79 := JTF_VARCHAR2_TABLE_100();
501     a80 := JTF_NUMBER_TABLE();
502     a81 := JTF_VARCHAR2_TABLE_100();
503     a82 := JTF_VARCHAR2_TABLE_100();
504     a83 := JTF_VARCHAR2_TABLE_100();
505     a84 := JTF_VARCHAR2_TABLE_100();
506     a85 := JTF_VARCHAR2_TABLE_100();
507     a86 := JTF_NUMBER_TABLE();
508     a87 := JTF_NUMBER_TABLE();
509     a88 := JTF_VARCHAR2_TABLE_100();
510     a89 := JTF_VARCHAR2_TABLE_300();
511   else
512       a0 := JTF_VARCHAR2_TABLE_100();
513       a1 := JTF_VARCHAR2_TABLE_300();
514       a2 := JTF_VARCHAR2_TABLE_300();
515       a3 := JTF_VARCHAR2_TABLE_300();
516       a4 := JTF_VARCHAR2_TABLE_300();
517       a5 := JTF_VARCHAR2_TABLE_300();
518       a6 := JTF_VARCHAR2_TABLE_300();
519       a7 := JTF_VARCHAR2_TABLE_300();
520       a8 := JTF_VARCHAR2_TABLE_300();
521       a9 := JTF_VARCHAR2_TABLE_300();
522       a10 := JTF_VARCHAR2_TABLE_300();
523       a11 := JTF_VARCHAR2_TABLE_300();
524       a12 := JTF_VARCHAR2_TABLE_300();
525       a13 := JTF_VARCHAR2_TABLE_300();
526       a14 := JTF_VARCHAR2_TABLE_300();
527       a15 := JTF_VARCHAR2_TABLE_300();
528       a16 := JTF_VARCHAR2_TABLE_100();
529       a17 := JTF_VARCHAR2_TABLE_2000();
530       a18 := JTF_VARCHAR2_TABLE_100();
531       a19 := JTF_NUMBER_TABLE();
532       a20 := JTF_DATE_TABLE();
533       a21 := JTF_VARCHAR2_TABLE_100();
534       a22 := JTF_DATE_TABLE();
535       a23 := JTF_NUMBER_TABLE();
536       a24 := JTF_NUMBER_TABLE();
537       a25 := JTF_NUMBER_TABLE();
538       a26 := JTF_NUMBER_TABLE();
539       a27 := JTF_DATE_TABLE();
540       a28 := JTF_NUMBER_TABLE();
541       a29 := JTF_NUMBER_TABLE();
542       a30 := JTF_NUMBER_TABLE();
543       a31 := JTF_VARCHAR2_TABLE_100();
544       a32 := JTF_NUMBER_TABLE();
545       a33 := JTF_VARCHAR2_TABLE_100();
546       a34 := JTF_NUMBER_TABLE();
547       a35 := JTF_NUMBER_TABLE();
548       a36 := JTF_NUMBER_TABLE();
549       a37 := JTF_VARCHAR2_TABLE_100();
550       a38 := JTF_NUMBER_TABLE();
551       a39 := JTF_VARCHAR2_TABLE_100();
552       a40 := JTF_NUMBER_TABLE();
553       a41 := JTF_VARCHAR2_TABLE_100();
554       a42 := JTF_VARCHAR2_TABLE_100();
555       a43 := JTF_NUMBER_TABLE();
556       a44 := JTF_NUMBER_TABLE();
557       a45 := JTF_DATE_TABLE();
558       a46 := JTF_VARCHAR2_TABLE_100();
559       a47 := JTF_NUMBER_TABLE();
560       a48 := JTF_NUMBER_TABLE();
561       a49 := JTF_VARCHAR2_TABLE_100();
562       a50 := JTF_NUMBER_TABLE();
563       a51 := JTF_VARCHAR2_TABLE_100();
564       a52 := JTF_DATE_TABLE();
565       a53 := JTF_VARCHAR2_TABLE_100();
566       a54 := JTF_DATE_TABLE();
567       a55 := JTF_VARCHAR2_TABLE_100();
568       a56 := JTF_VARCHAR2_TABLE_100();
569       a57 := JTF_VARCHAR2_TABLE_300();
570       a58 := JTF_VARCHAR2_TABLE_100();
571       a59 := JTF_NUMBER_TABLE();
572       a60 := JTF_VARCHAR2_TABLE_100();
573       a61 := JTF_VARCHAR2_TABLE_100();
574       a62 := JTF_NUMBER_TABLE();
575       a63 := JTF_NUMBER_TABLE();
576       a64 := JTF_NUMBER_TABLE();
577       a65 := JTF_NUMBER_TABLE();
578       a66 := JTF_VARCHAR2_TABLE_100();
579       a67 := JTF_NUMBER_TABLE();
580       a68 := JTF_NUMBER_TABLE();
581       a69 := JTF_DATE_TABLE();
582       a70 := JTF_NUMBER_TABLE();
583       a71 := JTF_VARCHAR2_TABLE_100();
584       a72 := JTF_DATE_TABLE();
585       a73 := JTF_NUMBER_TABLE();
586       a74 := JTF_NUMBER_TABLE();
587       a75 := JTF_NUMBER_TABLE();
588       a76 := JTF_VARCHAR2_TABLE_100();
589       a77 := JTF_VARCHAR2_TABLE_100();
590       a78 := JTF_NUMBER_TABLE();
591       a79 := JTF_VARCHAR2_TABLE_100();
592       a80 := JTF_NUMBER_TABLE();
593       a81 := JTF_VARCHAR2_TABLE_100();
594       a82 := JTF_VARCHAR2_TABLE_100();
595       a83 := JTF_VARCHAR2_TABLE_100();
596       a84 := JTF_VARCHAR2_TABLE_100();
597       a85 := JTF_VARCHAR2_TABLE_100();
598       a86 := JTF_NUMBER_TABLE();
599       a87 := JTF_NUMBER_TABLE();
600       a88 := JTF_VARCHAR2_TABLE_100();
601       a89 := JTF_VARCHAR2_TABLE_300();
602       if t.count > 0 then
603         a0.extend(t.count);
604         a1.extend(t.count);
605         a2.extend(t.count);
606         a3.extend(t.count);
607         a4.extend(t.count);
608         a5.extend(t.count);
609         a6.extend(t.count);
610         a7.extend(t.count);
611         a8.extend(t.count);
612         a9.extend(t.count);
613         a10.extend(t.count);
614         a11.extend(t.count);
615         a12.extend(t.count);
616         a13.extend(t.count);
617         a14.extend(t.count);
618         a15.extend(t.count);
619         a16.extend(t.count);
620         a17.extend(t.count);
621         a18.extend(t.count);
622         a19.extend(t.count);
623         a20.extend(t.count);
624         a21.extend(t.count);
625         a22.extend(t.count);
626         a23.extend(t.count);
627         a24.extend(t.count);
628         a25.extend(t.count);
629         a26.extend(t.count);
630         a27.extend(t.count);
631         a28.extend(t.count);
632         a29.extend(t.count);
633         a30.extend(t.count);
634         a31.extend(t.count);
635         a32.extend(t.count);
636         a33.extend(t.count);
637         a34.extend(t.count);
638         a35.extend(t.count);
639         a36.extend(t.count);
640         a37.extend(t.count);
641         a38.extend(t.count);
642         a39.extend(t.count);
643         a40.extend(t.count);
644         a41.extend(t.count);
645         a42.extend(t.count);
646         a43.extend(t.count);
647         a44.extend(t.count);
648         a45.extend(t.count);
649         a46.extend(t.count);
650         a47.extend(t.count);
651         a48.extend(t.count);
652         a49.extend(t.count);
653         a50.extend(t.count);
654         a51.extend(t.count);
655         a52.extend(t.count);
656         a53.extend(t.count);
657         a54.extend(t.count);
658         a55.extend(t.count);
659         a56.extend(t.count);
660         a57.extend(t.count);
661         a58.extend(t.count);
662         a59.extend(t.count);
663         a60.extend(t.count);
664         a61.extend(t.count);
665         a62.extend(t.count);
666         a63.extend(t.count);
667         a64.extend(t.count);
668         a65.extend(t.count);
669         a66.extend(t.count);
670         a67.extend(t.count);
671         a68.extend(t.count);
672         a69.extend(t.count);
673         a70.extend(t.count);
674         a71.extend(t.count);
675         a72.extend(t.count);
676         a73.extend(t.count);
677         a74.extend(t.count);
678         a75.extend(t.count);
679         a76.extend(t.count);
680         a77.extend(t.count);
681         a78.extend(t.count);
682         a79.extend(t.count);
683         a80.extend(t.count);
684         a81.extend(t.count);
685         a82.extend(t.count);
686         a83.extend(t.count);
687         a84.extend(t.count);
688         a85.extend(t.count);
689         a86.extend(t.count);
690         a87.extend(t.count);
691         a88.extend(t.count);
692         a89.extend(t.count);
693         ddindx := t.first;
694         indx := 1;
695         while true loop
696           a0(indx) := t(ddindx).arithmetic_operator;
697           a1(indx) := t(ddindx).attribute1;
698           a2(indx) := t(ddindx).attribute10;
699           a3(indx) := t(ddindx).attribute11;
700           a4(indx) := t(ddindx).attribute12;
701           a5(indx) := t(ddindx).attribute13;
702           a6(indx) := t(ddindx).attribute14;
703           a7(indx) := t(ddindx).attribute15;
704           a8(indx) := t(ddindx).attribute2;
705           a9(indx) := t(ddindx).attribute3;
706           a10(indx) := t(ddindx).attribute4;
707           a11(indx) := t(ddindx).attribute5;
708           a12(indx) := t(ddindx).attribute6;
709           a13(indx) := t(ddindx).attribute7;
710           a14(indx) := t(ddindx).attribute8;
711           a15(indx) := t(ddindx).attribute9;
712           a16(indx) := t(ddindx).automatic_flag;
713           a17(indx) := t(ddindx).comments;
714           a18(indx) := t(ddindx).context;
715           a19(indx) := t(ddindx).created_by;
716           a20(indx) := t(ddindx).creation_date;
717           a21(indx) := t(ddindx).effective_period_uom;
718           a22(indx) := t(ddindx).end_date_active;
719           a23(indx) := t(ddindx).estim_accrual_rate;
720           a24(indx) := t(ddindx).generate_using_formula_id;
721           a25(indx) := t(ddindx).inventory_item_id;
722           a26(indx) := t(ddindx).last_updated_by;
723           a27(indx) := t(ddindx).last_update_date;
724           a28(indx) := t(ddindx).last_update_login;
725           a29(indx) := t(ddindx).list_header_id;
726           a30(indx) := t(ddindx).list_line_id;
727           a31(indx) := t(ddindx).list_line_type_code;
728           a32(indx) := t(ddindx).list_price;
729           a33(indx) := t(ddindx).modifier_level_code;
730           a34(indx) := t(ddindx).number_effective_periods;
731           a35(indx) := t(ddindx).operand;
732           a36(indx) := t(ddindx).organization_id;
733           a37(indx) := t(ddindx).override_flag;
734           a38(indx) := t(ddindx).percent_price;
735           a39(indx) := t(ddindx).price_break_type_code;
736           a40(indx) := t(ddindx).price_by_formula_id;
737           a41(indx) := t(ddindx).primary_uom_flag;
738           a42(indx) := t(ddindx).print_on_invoice_flag;
739           a43(indx) := t(ddindx).program_application_id;
740           a44(indx) := t(ddindx).program_id;
741           a45(indx) := t(ddindx).program_update_date;
742           a46(indx) := t(ddindx).rebate_trxn_type_code;
743           a47(indx) := t(ddindx).related_item_id;
744           a48(indx) := t(ddindx).relationship_type_id;
745           a49(indx) := t(ddindx).reprice_flag;
746           a50(indx) := t(ddindx).request_id;
747           a51(indx) := t(ddindx).revision;
748           a52(indx) := t(ddindx).revision_date;
749           a53(indx) := t(ddindx).revision_reason_code;
750           a54(indx) := t(ddindx).start_date_active;
751           a55(indx) := t(ddindx).substitution_attribute;
752           a56(indx) := t(ddindx).substitution_context;
753           a57(indx) := t(ddindx).substitution_value;
754           a58(indx) := t(ddindx).accrual_flag;
755           a59(indx) := t(ddindx).pricing_group_sequence;
756           a60(indx) := t(ddindx).incompatibility_grp_code;
757           a61(indx) := t(ddindx).list_line_no;
758           a62(indx) := t(ddindx).rltd_modifier_id;
759           a63(indx) := t(ddindx).from_rltd_modifier_id;
760           a64(indx) := t(ddindx).to_rltd_modifier_id;
761           a65(indx) := t(ddindx).rltd_modifier_grp_no;
762           a66(indx) := t(ddindx).rltd_modifier_grp_type;
763           a67(indx) := t(ddindx).pricing_phase_id;
764           a68(indx) := t(ddindx).product_precedence;
765           a69(indx) := t(ddindx).expiration_period_start_date;
766           a70(indx) := t(ddindx).number_expiration_periods;
767           a71(indx) := t(ddindx).expiration_period_uom;
768           a72(indx) := t(ddindx).expiration_date;
769           a73(indx) := t(ddindx).estim_gl_value;
770           a74(indx) := t(ddindx).benefit_price_list_line_id;
771           a75(indx) := t(ddindx).benefit_limit;
772           a76(indx) := t(ddindx).charge_type_code;
773           a77(indx) := t(ddindx).charge_subtype_code;
774           a78(indx) := t(ddindx).benefit_qty;
775           a79(indx) := t(ddindx).benefit_uom_code;
776           a80(indx) := t(ddindx).accrual_conversion_rate;
777           a81(indx) := t(ddindx).proration_type_code;
778           a82(indx) := t(ddindx).include_on_returns_flag;
779           a83(indx) := t(ddindx).return_status;
780           a84(indx) := t(ddindx).db_flag;
781           a85(indx) := t(ddindx).operation;
782           a86(indx) := t(ddindx).modifier_parent_index;
783           a87(indx) := t(ddindx).qualification_ind;
784           a88(indx) := t(ddindx).net_amount_flag;
785           a89(indx) := t(ddindx).accum_attribute;
786           indx := indx+1;
787           if t.last =ddindx
788             then exit;
789           end if;
790           ddindx := t.next(ddindx);
791         end loop;
792       end if;
793    end if;
794   end rosetta_table_copy_out_p3;
795 
796 end qp_modifiers_pub_oa;