[Home] [Help]
PACKAGE BODY: APPS.QP_MODIFIERS_PUB_W
Source
1 package body qp_modifiers_pub_w as
2 /* $Header: ozfwqmpb.pls 120.0 2005/08/26 15:40 julou noship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure rosetta_table_copy_in_p1(t out nocopy qp_modifiers_pub.modifiers_tbl_type, a0 JTF_VARCHAR2_TABLE_100
23 , a1 JTF_VARCHAR2_TABLE_300
24 , a2 JTF_VARCHAR2_TABLE_300
25 , a3 JTF_VARCHAR2_TABLE_300
26 , a4 JTF_VARCHAR2_TABLE_300
27 , a5 JTF_VARCHAR2_TABLE_300
28 , a6 JTF_VARCHAR2_TABLE_300
29 , a7 JTF_VARCHAR2_TABLE_300
30 , a8 JTF_VARCHAR2_TABLE_300
31 , a9 JTF_VARCHAR2_TABLE_300
32 , a10 JTF_VARCHAR2_TABLE_300
33 , a11 JTF_VARCHAR2_TABLE_300
34 , a12 JTF_VARCHAR2_TABLE_300
35 , a13 JTF_VARCHAR2_TABLE_300
36 , a14 JTF_VARCHAR2_TABLE_300
37 , a15 JTF_VARCHAR2_TABLE_300
38 , a16 JTF_VARCHAR2_TABLE_100
39 , a17 JTF_VARCHAR2_TABLE_2000
40 , a18 JTF_VARCHAR2_TABLE_100
41 , a19 JTF_NUMBER_TABLE
42 , a20 JTF_DATE_TABLE
43 , a21 JTF_VARCHAR2_TABLE_100
44 , a22 JTF_DATE_TABLE
45 , a23 JTF_NUMBER_TABLE
46 , a24 JTF_NUMBER_TABLE
47 , a25 JTF_NUMBER_TABLE
48 , a26 JTF_NUMBER_TABLE
49 , a27 JTF_DATE_TABLE
50 , a28 JTF_NUMBER_TABLE
51 , a29 JTF_NUMBER_TABLE
52 , a30 JTF_NUMBER_TABLE
53 , a31 JTF_VARCHAR2_TABLE_100
54 , a32 JTF_NUMBER_TABLE
55 , a33 JTF_VARCHAR2_TABLE_100
56 , a34 JTF_NUMBER_TABLE
57 , a35 JTF_NUMBER_TABLE
58 , a36 JTF_NUMBER_TABLE
59 , a37 JTF_VARCHAR2_TABLE_100
60 , a38 JTF_NUMBER_TABLE
61 , a39 JTF_VARCHAR2_TABLE_100
62 , a40 JTF_NUMBER_TABLE
63 , a41 JTF_VARCHAR2_TABLE_100
64 , a42 JTF_VARCHAR2_TABLE_100
65 , a43 JTF_NUMBER_TABLE
66 , a44 JTF_NUMBER_TABLE
67 , a45 JTF_DATE_TABLE
68 , a46 JTF_VARCHAR2_TABLE_100
69 , a47 JTF_NUMBER_TABLE
70 , a48 JTF_NUMBER_TABLE
71 , a49 JTF_VARCHAR2_TABLE_100
72 , a50 JTF_NUMBER_TABLE
73 , a51 JTF_VARCHAR2_TABLE_100
74 , a52 JTF_DATE_TABLE
75 , a53 JTF_VARCHAR2_TABLE_100
76 , a54 JTF_DATE_TABLE
77 , a55 JTF_VARCHAR2_TABLE_100
78 , a56 JTF_VARCHAR2_TABLE_100
79 , a57 JTF_VARCHAR2_TABLE_300
80 , a58 JTF_VARCHAR2_TABLE_100
81 , a59 JTF_NUMBER_TABLE
82 , a60 JTF_VARCHAR2_TABLE_100
83 , a61 JTF_VARCHAR2_TABLE_100
84 , a62 JTF_NUMBER_TABLE
85 , a63 JTF_NUMBER_TABLE
86 , a64 JTF_NUMBER_TABLE
87 , a65 JTF_NUMBER_TABLE
88 , a66 JTF_VARCHAR2_TABLE_100
89 , a67 JTF_NUMBER_TABLE
90 , a68 JTF_NUMBER_TABLE
91 , a69 JTF_DATE_TABLE
92 , a70 JTF_NUMBER_TABLE
93 , a71 JTF_VARCHAR2_TABLE_100
94 , a72 JTF_DATE_TABLE
95 , a73 JTF_NUMBER_TABLE
96 , a74 JTF_NUMBER_TABLE
97 , a75 JTF_NUMBER_TABLE
98 , a76 JTF_VARCHAR2_TABLE_100
99 , a77 JTF_VARCHAR2_TABLE_100
100 , a78 JTF_NUMBER_TABLE
101 , a79 JTF_VARCHAR2_TABLE_100
102 , a80 JTF_NUMBER_TABLE
103 , a81 JTF_VARCHAR2_TABLE_100
104 , a82 JTF_VARCHAR2_TABLE_100
105 , a83 JTF_VARCHAR2_TABLE_100
106 , a84 JTF_VARCHAR2_TABLE_100
107 , a85 JTF_VARCHAR2_TABLE_100
108 , a86 JTF_NUMBER_TABLE
109 , a87 JTF_NUMBER_TABLE
110 , a88 JTF_VARCHAR2_TABLE_100
111 , a89 JTF_VARCHAR2_TABLE_300
112 ) as
113 ddindx binary_integer; indx binary_integer;
114 begin
115 if a0 is not null and a0.count > 0 then
116 if a0.count > 0 then
117 indx := a0.first;
118 ddindx := 1;
119 while true loop
120 t(ddindx).arithmetic_operator := a0(indx);
121 t(ddindx).attribute1 := a1(indx);
122 t(ddindx).attribute10 := a2(indx);
123 t(ddindx).attribute11 := a3(indx);
124 t(ddindx).attribute12 := a4(indx);
125 t(ddindx).attribute13 := a5(indx);
126 t(ddindx).attribute14 := a6(indx);
127 t(ddindx).attribute15 := a7(indx);
128 t(ddindx).attribute2 := a8(indx);
129 t(ddindx).attribute3 := a9(indx);
130 t(ddindx).attribute4 := a10(indx);
131 t(ddindx).attribute5 := a11(indx);
132 t(ddindx).attribute6 := a12(indx);
133 t(ddindx).attribute7 := a13(indx);
134 t(ddindx).attribute8 := a14(indx);
135 t(ddindx).attribute9 := a15(indx);
136 t(ddindx).automatic_flag := a16(indx);
137 t(ddindx).comments := a17(indx);
138 t(ddindx).context := a18(indx);
139 t(ddindx).created_by := rosetta_g_miss_num_map(a19(indx));
140 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a20(indx));
141 t(ddindx).effective_period_uom := a21(indx);
142 t(ddindx).end_date_active := rosetta_g_miss_date_in_map(a22(indx));
143 t(ddindx).estim_accrual_rate := rosetta_g_miss_num_map(a23(indx));
144 t(ddindx).generate_using_formula_id := rosetta_g_miss_num_map(a24(indx));
145 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a25(indx));
146 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a26(indx));
147 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a27(indx));
148 t(ddindx).last_update_login := rosetta_g_miss_num_map(a28(indx));
149 t(ddindx).list_header_id := rosetta_g_miss_num_map(a29(indx));
150 t(ddindx).list_line_id := rosetta_g_miss_num_map(a30(indx));
151 t(ddindx).list_line_type_code := a31(indx);
152 t(ddindx).list_price := rosetta_g_miss_num_map(a32(indx));
153 t(ddindx).modifier_level_code := a33(indx);
154 t(ddindx).number_effective_periods := rosetta_g_miss_num_map(a34(indx));
155 t(ddindx).operand := rosetta_g_miss_num_map(a35(indx));
156 t(ddindx).organization_id := rosetta_g_miss_num_map(a36(indx));
157 t(ddindx).override_flag := a37(indx);
158 t(ddindx).percent_price := rosetta_g_miss_num_map(a38(indx));
159 t(ddindx).price_break_type_code := a39(indx);
160 t(ddindx).price_by_formula_id := rosetta_g_miss_num_map(a40(indx));
161 t(ddindx).primary_uom_flag := a41(indx);
162 t(ddindx).print_on_invoice_flag := a42(indx);
163 t(ddindx).program_application_id := rosetta_g_miss_num_map(a43(indx));
164 t(ddindx).program_id := rosetta_g_miss_num_map(a44(indx));
165 t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a45(indx));
166 t(ddindx).rebate_trxn_type_code := a46(indx);
167 t(ddindx).related_item_id := rosetta_g_miss_num_map(a47(indx));
168 t(ddindx).relationship_type_id := rosetta_g_miss_num_map(a48(indx));
169 t(ddindx).reprice_flag := a49(indx);
170 t(ddindx).request_id := rosetta_g_miss_num_map(a50(indx));
171 t(ddindx).revision := a51(indx);
172 t(ddindx).revision_date := rosetta_g_miss_date_in_map(a52(indx));
173 t(ddindx).revision_reason_code := a53(indx);
174 t(ddindx).start_date_active := rosetta_g_miss_date_in_map(a54(indx));
175 t(ddindx).substitution_attribute := a55(indx);
176 t(ddindx).substitution_context := a56(indx);
177 t(ddindx).substitution_value := a57(indx);
178 t(ddindx).accrual_flag := a58(indx);
179 t(ddindx).pricing_group_sequence := rosetta_g_miss_num_map(a59(indx));
180 t(ddindx).incompatibility_grp_code := a60(indx);
181 t(ddindx).list_line_no := a61(indx);
182 t(ddindx).rltd_modifier_id := rosetta_g_miss_num_map(a62(indx));
183 t(ddindx).from_rltd_modifier_id := rosetta_g_miss_num_map(a63(indx));
184 t(ddindx).to_rltd_modifier_id := rosetta_g_miss_num_map(a64(indx));
185 t(ddindx).rltd_modifier_grp_no := rosetta_g_miss_num_map(a65(indx));
186 t(ddindx).rltd_modifier_grp_type := a66(indx);
187 t(ddindx).pricing_phase_id := rosetta_g_miss_num_map(a67(indx));
188 t(ddindx).product_precedence := rosetta_g_miss_num_map(a68(indx));
189 t(ddindx).expiration_period_start_date := rosetta_g_miss_date_in_map(a69(indx));
190 t(ddindx).number_expiration_periods := rosetta_g_miss_num_map(a70(indx));
191 t(ddindx).expiration_period_uom := a71(indx);
192 t(ddindx).expiration_date := rosetta_g_miss_date_in_map(a72(indx));
193 t(ddindx).estim_gl_value := rosetta_g_miss_num_map(a73(indx));
194 t(ddindx).benefit_price_list_line_id := rosetta_g_miss_num_map(a74(indx));
195 t(ddindx).benefit_limit := rosetta_g_miss_num_map(a75(indx));
196 t(ddindx).charge_type_code := a76(indx);
197 t(ddindx).charge_subtype_code := a77(indx);
198 t(ddindx).benefit_qty := rosetta_g_miss_num_map(a78(indx));
199 t(ddindx).benefit_uom_code := a79(indx);
200 t(ddindx).accrual_conversion_rate := rosetta_g_miss_num_map(a80(indx));
201 t(ddindx).proration_type_code := a81(indx);
202 t(ddindx).include_on_returns_flag := a82(indx);
203 t(ddindx).return_status := a83(indx);
204 t(ddindx).db_flag := a84(indx);
205 t(ddindx).operation := a85(indx);
206 t(ddindx).modifier_parent_index := rosetta_g_miss_num_map(a86(indx));
207 t(ddindx).qualification_ind := rosetta_g_miss_num_map(a87(indx));
208 t(ddindx).net_amount_flag := a88(indx);
209 t(ddindx).accum_attribute := a89(indx);
210 ddindx := ddindx+1;
211 if a0.last =indx
212 then exit;
213 end if;
214 indx := a0.next(indx);
215 end loop;
216 end if;
217 end if;
218 end rosetta_table_copy_in_p1;
219 procedure rosetta_table_copy_out_p1(t qp_modifiers_pub.modifiers_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
220 , a1 out nocopy JTF_VARCHAR2_TABLE_300
221 , a2 out nocopy JTF_VARCHAR2_TABLE_300
222 , a3 out nocopy JTF_VARCHAR2_TABLE_300
223 , a4 out nocopy JTF_VARCHAR2_TABLE_300
224 , a5 out nocopy JTF_VARCHAR2_TABLE_300
225 , a6 out nocopy JTF_VARCHAR2_TABLE_300
226 , a7 out nocopy JTF_VARCHAR2_TABLE_300
227 , a8 out nocopy JTF_VARCHAR2_TABLE_300
228 , a9 out nocopy JTF_VARCHAR2_TABLE_300
229 , a10 out nocopy JTF_VARCHAR2_TABLE_300
230 , a11 out nocopy JTF_VARCHAR2_TABLE_300
231 , a12 out nocopy JTF_VARCHAR2_TABLE_300
232 , a13 out nocopy JTF_VARCHAR2_TABLE_300
233 , a14 out nocopy JTF_VARCHAR2_TABLE_300
234 , a15 out nocopy JTF_VARCHAR2_TABLE_300
235 , a16 out nocopy JTF_VARCHAR2_TABLE_100
236 , a17 out nocopy JTF_VARCHAR2_TABLE_2000
237 , a18 out nocopy JTF_VARCHAR2_TABLE_100
238 , a19 out nocopy JTF_NUMBER_TABLE
239 , a20 out nocopy JTF_DATE_TABLE
240 , a21 out nocopy JTF_VARCHAR2_TABLE_100
241 , a22 out nocopy JTF_DATE_TABLE
242 , a23 out nocopy JTF_NUMBER_TABLE
243 , a24 out nocopy JTF_NUMBER_TABLE
244 , a25 out nocopy JTF_NUMBER_TABLE
245 , a26 out nocopy JTF_NUMBER_TABLE
246 , a27 out nocopy JTF_DATE_TABLE
247 , a28 out nocopy JTF_NUMBER_TABLE
248 , a29 out nocopy JTF_NUMBER_TABLE
249 , a30 out nocopy JTF_NUMBER_TABLE
250 , a31 out nocopy JTF_VARCHAR2_TABLE_100
251 , a32 out nocopy JTF_NUMBER_TABLE
252 , a33 out nocopy JTF_VARCHAR2_TABLE_100
253 , a34 out nocopy JTF_NUMBER_TABLE
254 , a35 out nocopy JTF_NUMBER_TABLE
255 , a36 out nocopy JTF_NUMBER_TABLE
256 , a37 out nocopy JTF_VARCHAR2_TABLE_100
257 , a38 out nocopy JTF_NUMBER_TABLE
258 , a39 out nocopy JTF_VARCHAR2_TABLE_100
259 , a40 out nocopy JTF_NUMBER_TABLE
260 , a41 out nocopy JTF_VARCHAR2_TABLE_100
261 , a42 out nocopy JTF_VARCHAR2_TABLE_100
262 , a43 out nocopy JTF_NUMBER_TABLE
263 , a44 out nocopy JTF_NUMBER_TABLE
264 , a45 out nocopy JTF_DATE_TABLE
265 , a46 out nocopy JTF_VARCHAR2_TABLE_100
266 , a47 out nocopy JTF_NUMBER_TABLE
267 , a48 out nocopy JTF_NUMBER_TABLE
268 , a49 out nocopy JTF_VARCHAR2_TABLE_100
269 , a50 out nocopy JTF_NUMBER_TABLE
270 , a51 out nocopy JTF_VARCHAR2_TABLE_100
271 , a52 out nocopy JTF_DATE_TABLE
272 , a53 out nocopy JTF_VARCHAR2_TABLE_100
273 , a54 out nocopy JTF_DATE_TABLE
274 , a55 out nocopy JTF_VARCHAR2_TABLE_100
275 , a56 out nocopy JTF_VARCHAR2_TABLE_100
276 , a57 out nocopy JTF_VARCHAR2_TABLE_300
277 , a58 out nocopy JTF_VARCHAR2_TABLE_100
278 , a59 out nocopy JTF_NUMBER_TABLE
279 , a60 out nocopy JTF_VARCHAR2_TABLE_100
280 , a61 out nocopy JTF_VARCHAR2_TABLE_100
281 , a62 out nocopy JTF_NUMBER_TABLE
282 , a63 out nocopy JTF_NUMBER_TABLE
283 , a64 out nocopy JTF_NUMBER_TABLE
284 , a65 out nocopy JTF_NUMBER_TABLE
285 , a66 out nocopy JTF_VARCHAR2_TABLE_100
286 , a67 out nocopy JTF_NUMBER_TABLE
287 , a68 out nocopy JTF_NUMBER_TABLE
288 , a69 out nocopy JTF_DATE_TABLE
289 , a70 out nocopy JTF_NUMBER_TABLE
290 , a71 out nocopy JTF_VARCHAR2_TABLE_100
291 , a72 out nocopy JTF_DATE_TABLE
292 , a73 out nocopy JTF_NUMBER_TABLE
293 , a74 out nocopy JTF_NUMBER_TABLE
294 , a75 out nocopy JTF_NUMBER_TABLE
295 , a76 out nocopy JTF_VARCHAR2_TABLE_100
296 , a77 out nocopy JTF_VARCHAR2_TABLE_100
297 , a78 out nocopy JTF_NUMBER_TABLE
298 , a79 out nocopy JTF_VARCHAR2_TABLE_100
299 , a80 out nocopy JTF_NUMBER_TABLE
300 , a81 out nocopy JTF_VARCHAR2_TABLE_100
301 , a82 out nocopy JTF_VARCHAR2_TABLE_100
302 , a83 out nocopy JTF_VARCHAR2_TABLE_100
303 , a84 out nocopy JTF_VARCHAR2_TABLE_100
304 , a85 out nocopy JTF_VARCHAR2_TABLE_100
305 , a86 out nocopy JTF_NUMBER_TABLE
306 , a87 out nocopy JTF_NUMBER_TABLE
307 , a88 out nocopy JTF_VARCHAR2_TABLE_100
308 , a89 out nocopy JTF_VARCHAR2_TABLE_300
309 ) as
310 ddindx binary_integer; indx binary_integer;
311 begin
312 if t is null or t.count = 0 then
313 a0 := JTF_VARCHAR2_TABLE_100();
314 a1 := JTF_VARCHAR2_TABLE_300();
315 a2 := JTF_VARCHAR2_TABLE_300();
316 a3 := JTF_VARCHAR2_TABLE_300();
317 a4 := JTF_VARCHAR2_TABLE_300();
318 a5 := JTF_VARCHAR2_TABLE_300();
319 a6 := JTF_VARCHAR2_TABLE_300();
320 a7 := JTF_VARCHAR2_TABLE_300();
321 a8 := JTF_VARCHAR2_TABLE_300();
322 a9 := JTF_VARCHAR2_TABLE_300();
323 a10 := JTF_VARCHAR2_TABLE_300();
324 a11 := JTF_VARCHAR2_TABLE_300();
325 a12 := JTF_VARCHAR2_TABLE_300();
326 a13 := JTF_VARCHAR2_TABLE_300();
327 a14 := JTF_VARCHAR2_TABLE_300();
328 a15 := JTF_VARCHAR2_TABLE_300();
329 a16 := JTF_VARCHAR2_TABLE_100();
330 a17 := JTF_VARCHAR2_TABLE_2000();
331 a18 := JTF_VARCHAR2_TABLE_100();
332 a19 := JTF_NUMBER_TABLE();
333 a20 := JTF_DATE_TABLE();
334 a21 := JTF_VARCHAR2_TABLE_100();
335 a22 := JTF_DATE_TABLE();
336 a23 := JTF_NUMBER_TABLE();
337 a24 := JTF_NUMBER_TABLE();
338 a25 := JTF_NUMBER_TABLE();
339 a26 := JTF_NUMBER_TABLE();
340 a27 := JTF_DATE_TABLE();
341 a28 := JTF_NUMBER_TABLE();
342 a29 := JTF_NUMBER_TABLE();
343 a30 := JTF_NUMBER_TABLE();
344 a31 := JTF_VARCHAR2_TABLE_100();
345 a32 := JTF_NUMBER_TABLE();
346 a33 := JTF_VARCHAR2_TABLE_100();
347 a34 := JTF_NUMBER_TABLE();
348 a35 := JTF_NUMBER_TABLE();
349 a36 := JTF_NUMBER_TABLE();
350 a37 := JTF_VARCHAR2_TABLE_100();
351 a38 := JTF_NUMBER_TABLE();
352 a39 := JTF_VARCHAR2_TABLE_100();
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_DATE_TABLE();
359 a46 := JTF_VARCHAR2_TABLE_100();
360 a47 := JTF_NUMBER_TABLE();
361 a48 := JTF_NUMBER_TABLE();
362 a49 := JTF_VARCHAR2_TABLE_100();
363 a50 := JTF_NUMBER_TABLE();
364 a51 := JTF_VARCHAR2_TABLE_100();
365 a52 := JTF_DATE_TABLE();
366 a53 := JTF_VARCHAR2_TABLE_100();
367 a54 := JTF_DATE_TABLE();
368 a55 := JTF_VARCHAR2_TABLE_100();
369 a56 := JTF_VARCHAR2_TABLE_100();
370 a57 := JTF_VARCHAR2_TABLE_300();
371 a58 := JTF_VARCHAR2_TABLE_100();
372 a59 := JTF_NUMBER_TABLE();
373 a60 := JTF_VARCHAR2_TABLE_100();
374 a61 := JTF_VARCHAR2_TABLE_100();
375 a62 := JTF_NUMBER_TABLE();
376 a63 := JTF_NUMBER_TABLE();
377 a64 := JTF_NUMBER_TABLE();
378 a65 := JTF_NUMBER_TABLE();
379 a66 := JTF_VARCHAR2_TABLE_100();
380 a67 := JTF_NUMBER_TABLE();
381 a68 := JTF_NUMBER_TABLE();
382 a69 := JTF_DATE_TABLE();
383 a70 := JTF_NUMBER_TABLE();
384 a71 := JTF_VARCHAR2_TABLE_100();
385 a72 := JTF_DATE_TABLE();
386 a73 := JTF_NUMBER_TABLE();
387 a74 := JTF_NUMBER_TABLE();
388 a75 := JTF_NUMBER_TABLE();
389 a76 := JTF_VARCHAR2_TABLE_100();
390 a77 := JTF_VARCHAR2_TABLE_100();
391 a78 := JTF_NUMBER_TABLE();
392 a79 := JTF_VARCHAR2_TABLE_100();
393 a80 := JTF_NUMBER_TABLE();
394 a81 := JTF_VARCHAR2_TABLE_100();
395 a82 := JTF_VARCHAR2_TABLE_100();
396 a83 := JTF_VARCHAR2_TABLE_100();
397 a84 := JTF_VARCHAR2_TABLE_100();
398 a85 := JTF_VARCHAR2_TABLE_100();
399 a86 := JTF_NUMBER_TABLE();
400 a87 := JTF_NUMBER_TABLE();
401 a88 := JTF_VARCHAR2_TABLE_100();
402 a89 := JTF_VARCHAR2_TABLE_300();
403 else
404 a0 := JTF_VARCHAR2_TABLE_100();
405 a1 := JTF_VARCHAR2_TABLE_300();
406 a2 := JTF_VARCHAR2_TABLE_300();
407 a3 := JTF_VARCHAR2_TABLE_300();
408 a4 := JTF_VARCHAR2_TABLE_300();
409 a5 := JTF_VARCHAR2_TABLE_300();
410 a6 := JTF_VARCHAR2_TABLE_300();
411 a7 := JTF_VARCHAR2_TABLE_300();
412 a8 := JTF_VARCHAR2_TABLE_300();
413 a9 := JTF_VARCHAR2_TABLE_300();
414 a10 := JTF_VARCHAR2_TABLE_300();
415 a11 := JTF_VARCHAR2_TABLE_300();
416 a12 := JTF_VARCHAR2_TABLE_300();
417 a13 := JTF_VARCHAR2_TABLE_300();
418 a14 := JTF_VARCHAR2_TABLE_300();
419 a15 := JTF_VARCHAR2_TABLE_300();
420 a16 := JTF_VARCHAR2_TABLE_100();
421 a17 := JTF_VARCHAR2_TABLE_2000();
422 a18 := JTF_VARCHAR2_TABLE_100();
423 a19 := JTF_NUMBER_TABLE();
424 a20 := JTF_DATE_TABLE();
425 a21 := JTF_VARCHAR2_TABLE_100();
426 a22 := JTF_DATE_TABLE();
427 a23 := JTF_NUMBER_TABLE();
428 a24 := JTF_NUMBER_TABLE();
429 a25 := JTF_NUMBER_TABLE();
430 a26 := JTF_NUMBER_TABLE();
431 a27 := JTF_DATE_TABLE();
432 a28 := JTF_NUMBER_TABLE();
433 a29 := JTF_NUMBER_TABLE();
434 a30 := JTF_NUMBER_TABLE();
435 a31 := JTF_VARCHAR2_TABLE_100();
436 a32 := JTF_NUMBER_TABLE();
437 a33 := JTF_VARCHAR2_TABLE_100();
438 a34 := JTF_NUMBER_TABLE();
439 a35 := JTF_NUMBER_TABLE();
440 a36 := JTF_NUMBER_TABLE();
441 a37 := JTF_VARCHAR2_TABLE_100();
442 a38 := JTF_NUMBER_TABLE();
443 a39 := JTF_VARCHAR2_TABLE_100();
444 a40 := JTF_NUMBER_TABLE();
445 a41 := JTF_VARCHAR2_TABLE_100();
446 a42 := JTF_VARCHAR2_TABLE_100();
447 a43 := JTF_NUMBER_TABLE();
448 a44 := JTF_NUMBER_TABLE();
449 a45 := JTF_DATE_TABLE();
450 a46 := JTF_VARCHAR2_TABLE_100();
451 a47 := JTF_NUMBER_TABLE();
452 a48 := JTF_NUMBER_TABLE();
453 a49 := JTF_VARCHAR2_TABLE_100();
454 a50 := JTF_NUMBER_TABLE();
455 a51 := JTF_VARCHAR2_TABLE_100();
456 a52 := JTF_DATE_TABLE();
457 a53 := JTF_VARCHAR2_TABLE_100();
458 a54 := JTF_DATE_TABLE();
459 a55 := JTF_VARCHAR2_TABLE_100();
460 a56 := JTF_VARCHAR2_TABLE_100();
461 a57 := JTF_VARCHAR2_TABLE_300();
462 a58 := JTF_VARCHAR2_TABLE_100();
463 a59 := JTF_NUMBER_TABLE();
464 a60 := JTF_VARCHAR2_TABLE_100();
465 a61 := JTF_VARCHAR2_TABLE_100();
466 a62 := JTF_NUMBER_TABLE();
467 a63 := JTF_NUMBER_TABLE();
468 a64 := JTF_NUMBER_TABLE();
469 a65 := JTF_NUMBER_TABLE();
470 a66 := JTF_VARCHAR2_TABLE_100();
471 a67 := JTF_NUMBER_TABLE();
472 a68 := JTF_NUMBER_TABLE();
473 a69 := JTF_DATE_TABLE();
474 a70 := JTF_NUMBER_TABLE();
475 a71 := JTF_VARCHAR2_TABLE_100();
476 a72 := JTF_DATE_TABLE();
477 a73 := JTF_NUMBER_TABLE();
478 a74 := JTF_NUMBER_TABLE();
479 a75 := JTF_NUMBER_TABLE();
480 a76 := JTF_VARCHAR2_TABLE_100();
481 a77 := JTF_VARCHAR2_TABLE_100();
482 a78 := JTF_NUMBER_TABLE();
483 a79 := JTF_VARCHAR2_TABLE_100();
484 a80 := JTF_NUMBER_TABLE();
485 a81 := JTF_VARCHAR2_TABLE_100();
486 a82 := JTF_VARCHAR2_TABLE_100();
487 a83 := JTF_VARCHAR2_TABLE_100();
488 a84 := JTF_VARCHAR2_TABLE_100();
489 a85 := JTF_VARCHAR2_TABLE_100();
490 a86 := JTF_NUMBER_TABLE();
491 a87 := JTF_NUMBER_TABLE();
492 a88 := JTF_VARCHAR2_TABLE_100();
493 a89 := JTF_VARCHAR2_TABLE_300();
494 if t.count > 0 then
495 a0.extend(t.count);
496 a1.extend(t.count);
497 a2.extend(t.count);
498 a3.extend(t.count);
499 a4.extend(t.count);
500 a5.extend(t.count);
501 a6.extend(t.count);
502 a7.extend(t.count);
503 a8.extend(t.count);
504 a9.extend(t.count);
505 a10.extend(t.count);
506 a11.extend(t.count);
507 a12.extend(t.count);
508 a13.extend(t.count);
509 a14.extend(t.count);
510 a15.extend(t.count);
511 a16.extend(t.count);
512 a17.extend(t.count);
513 a18.extend(t.count);
514 a19.extend(t.count);
515 a20.extend(t.count);
516 a21.extend(t.count);
517 a22.extend(t.count);
518 a23.extend(t.count);
519 a24.extend(t.count);
520 a25.extend(t.count);
521 a26.extend(t.count);
522 a27.extend(t.count);
523 a28.extend(t.count);
524 a29.extend(t.count);
525 a30.extend(t.count);
526 a31.extend(t.count);
527 a32.extend(t.count);
528 a33.extend(t.count);
529 a34.extend(t.count);
530 a35.extend(t.count);
531 a36.extend(t.count);
532 a37.extend(t.count);
533 a38.extend(t.count);
534 a39.extend(t.count);
535 a40.extend(t.count);
536 a41.extend(t.count);
537 a42.extend(t.count);
538 a43.extend(t.count);
539 a44.extend(t.count);
540 a45.extend(t.count);
541 a46.extend(t.count);
542 a47.extend(t.count);
543 a48.extend(t.count);
544 a49.extend(t.count);
545 a50.extend(t.count);
546 a51.extend(t.count);
547 a52.extend(t.count);
548 a53.extend(t.count);
549 a54.extend(t.count);
550 a55.extend(t.count);
551 a56.extend(t.count);
552 a57.extend(t.count);
553 a58.extend(t.count);
554 a59.extend(t.count);
555 a60.extend(t.count);
556 a61.extend(t.count);
557 a62.extend(t.count);
558 a63.extend(t.count);
559 a64.extend(t.count);
560 a65.extend(t.count);
561 a66.extend(t.count);
562 a67.extend(t.count);
563 a68.extend(t.count);
564 a69.extend(t.count);
565 a70.extend(t.count);
566 a71.extend(t.count);
567 a72.extend(t.count);
568 a73.extend(t.count);
569 a74.extend(t.count);
570 a75.extend(t.count);
571 a76.extend(t.count);
572 a77.extend(t.count);
573 a78.extend(t.count);
574 a79.extend(t.count);
575 a80.extend(t.count);
576 a81.extend(t.count);
577 a82.extend(t.count);
578 a83.extend(t.count);
579 a84.extend(t.count);
580 a85.extend(t.count);
581 a86.extend(t.count);
582 a87.extend(t.count);
583 a88.extend(t.count);
584 a89.extend(t.count);
585 ddindx := t.first;
586 indx := 1;
587 while true loop
588 a0(indx) := t(ddindx).arithmetic_operator;
589 a1(indx) := t(ddindx).attribute1;
590 a2(indx) := t(ddindx).attribute10;
591 a3(indx) := t(ddindx).attribute11;
592 a4(indx) := t(ddindx).attribute12;
593 a5(indx) := t(ddindx).attribute13;
594 a6(indx) := t(ddindx).attribute14;
595 a7(indx) := t(ddindx).attribute15;
596 a8(indx) := t(ddindx).attribute2;
597 a9(indx) := t(ddindx).attribute3;
598 a10(indx) := t(ddindx).attribute4;
599 a11(indx) := t(ddindx).attribute5;
600 a12(indx) := t(ddindx).attribute6;
601 a13(indx) := t(ddindx).attribute7;
602 a14(indx) := t(ddindx).attribute8;
603 a15(indx) := t(ddindx).attribute9;
604 a16(indx) := t(ddindx).automatic_flag;
605 a17(indx) := t(ddindx).comments;
606 a18(indx) := t(ddindx).context;
607 a19(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
608 a20(indx) := t(ddindx).creation_date;
609 a21(indx) := t(ddindx).effective_period_uom;
610 a22(indx) := t(ddindx).end_date_active;
611 a23(indx) := rosetta_g_miss_num_map(t(ddindx).estim_accrual_rate);
612 a24(indx) := rosetta_g_miss_num_map(t(ddindx).generate_using_formula_id);
613 a25(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
614 a26(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
615 a27(indx) := t(ddindx).last_update_date;
616 a28(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
617 a29(indx) := rosetta_g_miss_num_map(t(ddindx).list_header_id);
618 a30(indx) := rosetta_g_miss_num_map(t(ddindx).list_line_id);
619 a31(indx) := t(ddindx).list_line_type_code;
620 a32(indx) := rosetta_g_miss_num_map(t(ddindx).list_price);
621 a33(indx) := t(ddindx).modifier_level_code;
622 a34(indx) := rosetta_g_miss_num_map(t(ddindx).number_effective_periods);
623 a35(indx) := rosetta_g_miss_num_map(t(ddindx).operand);
624 a36(indx) := rosetta_g_miss_num_map(t(ddindx).organization_id);
625 a37(indx) := t(ddindx).override_flag;
626 a38(indx) := rosetta_g_miss_num_map(t(ddindx).percent_price);
627 a39(indx) := t(ddindx).price_break_type_code;
628 a40(indx) := rosetta_g_miss_num_map(t(ddindx).price_by_formula_id);
629 a41(indx) := t(ddindx).primary_uom_flag;
630 a42(indx) := t(ddindx).print_on_invoice_flag;
631 a43(indx) := rosetta_g_miss_num_map(t(ddindx).program_application_id);
632 a44(indx) := rosetta_g_miss_num_map(t(ddindx).program_id);
633 a45(indx) := t(ddindx).program_update_date;
634 a46(indx) := t(ddindx).rebate_trxn_type_code;
635 a47(indx) := rosetta_g_miss_num_map(t(ddindx).related_item_id);
636 a48(indx) := rosetta_g_miss_num_map(t(ddindx).relationship_type_id);
637 a49(indx) := t(ddindx).reprice_flag;
638 a50(indx) := rosetta_g_miss_num_map(t(ddindx).request_id);
639 a51(indx) := t(ddindx).revision;
640 a52(indx) := t(ddindx).revision_date;
641 a53(indx) := t(ddindx).revision_reason_code;
642 a54(indx) := t(ddindx).start_date_active;
643 a55(indx) := t(ddindx).substitution_attribute;
644 a56(indx) := t(ddindx).substitution_context;
645 a57(indx) := t(ddindx).substitution_value;
646 a58(indx) := t(ddindx).accrual_flag;
647 a59(indx) := rosetta_g_miss_num_map(t(ddindx).pricing_group_sequence);
648 a60(indx) := t(ddindx).incompatibility_grp_code;
649 a61(indx) := t(ddindx).list_line_no;
650 a62(indx) := rosetta_g_miss_num_map(t(ddindx).rltd_modifier_id);
651 a63(indx) := rosetta_g_miss_num_map(t(ddindx).from_rltd_modifier_id);
652 a64(indx) := rosetta_g_miss_num_map(t(ddindx).to_rltd_modifier_id);
653 a65(indx) := rosetta_g_miss_num_map(t(ddindx).rltd_modifier_grp_no);
654 a66(indx) := t(ddindx).rltd_modifier_grp_type;
655 a67(indx) := rosetta_g_miss_num_map(t(ddindx).pricing_phase_id);
656 a68(indx) := rosetta_g_miss_num_map(t(ddindx).product_precedence);
657 a69(indx) := t(ddindx).expiration_period_start_date;
658 a70(indx) := rosetta_g_miss_num_map(t(ddindx).number_expiration_periods);
659 a71(indx) := t(ddindx).expiration_period_uom;
660 a72(indx) := t(ddindx).expiration_date;
661 a73(indx) := rosetta_g_miss_num_map(t(ddindx).estim_gl_value);
662 a74(indx) := rosetta_g_miss_num_map(t(ddindx).benefit_price_list_line_id);
663 a75(indx) := rosetta_g_miss_num_map(t(ddindx).benefit_limit);
664 a76(indx) := t(ddindx).charge_type_code;
665 a77(indx) := t(ddindx).charge_subtype_code;
666 a78(indx) := rosetta_g_miss_num_map(t(ddindx).benefit_qty);
667 a79(indx) := t(ddindx).benefit_uom_code;
668 a80(indx) := rosetta_g_miss_num_map(t(ddindx).accrual_conversion_rate);
669 a81(indx) := t(ddindx).proration_type_code;
670 a82(indx) := t(ddindx).include_on_returns_flag;
671 a83(indx) := t(ddindx).return_status;
672 a84(indx) := t(ddindx).db_flag;
673 a85(indx) := t(ddindx).operation;
674 a86(indx) := rosetta_g_miss_num_map(t(ddindx).modifier_parent_index);
675 a87(indx) := rosetta_g_miss_num_map(t(ddindx).qualification_ind);
676 a88(indx) := t(ddindx).net_amount_flag;
677 a89(indx) := t(ddindx).accum_attribute;
678 indx := indx+1;
679 if t.last =ddindx
680 then exit;
681 end if;
682 ddindx := t.next(ddindx);
683 end loop;
684 end if;
685 end if;
686 end rosetta_table_copy_out_p1;
687
688 procedure rosetta_table_copy_in_p3(t out nocopy qp_modifiers_pub.pricing_attr_tbl_type, a0 JTF_VARCHAR2_TABLE_100
689 , a1 JTF_VARCHAR2_TABLE_300
690 , a2 JTF_VARCHAR2_TABLE_300
691 , a3 JTF_VARCHAR2_TABLE_300
692 , a4 JTF_VARCHAR2_TABLE_300
693 , a5 JTF_VARCHAR2_TABLE_300
694 , a6 JTF_VARCHAR2_TABLE_300
695 , a7 JTF_VARCHAR2_TABLE_300
696 , a8 JTF_VARCHAR2_TABLE_300
697 , a9 JTF_VARCHAR2_TABLE_300
698 , a10 JTF_VARCHAR2_TABLE_300
699 , a11 JTF_VARCHAR2_TABLE_300
700 , a12 JTF_VARCHAR2_TABLE_300
701 , a13 JTF_VARCHAR2_TABLE_300
702 , a14 JTF_VARCHAR2_TABLE_300
703 , a15 JTF_VARCHAR2_TABLE_300
704 , a16 JTF_NUMBER_TABLE
705 , a17 JTF_VARCHAR2_TABLE_100
706 , a18 JTF_NUMBER_TABLE
707 , a19 JTF_DATE_TABLE
708 , a20 JTF_VARCHAR2_TABLE_100
709 , a21 JTF_NUMBER_TABLE
710 , a22 JTF_DATE_TABLE
711 , a23 JTF_NUMBER_TABLE
712 , a24 JTF_NUMBER_TABLE
713 , a25 JTF_VARCHAR2_TABLE_100
714 , a26 JTF_VARCHAR2_TABLE_100
715 , a27 JTF_NUMBER_TABLE
716 , a28 JTF_VARCHAR2_TABLE_300
717 , a29 JTF_VARCHAR2_TABLE_300
718 , a30 JTF_VARCHAR2_TABLE_100
719 , a31 JTF_VARCHAR2_TABLE_100
720 , a32 JTF_VARCHAR2_TABLE_300
721 , a33 JTF_VARCHAR2_TABLE_100
722 , a34 JTF_NUMBER_TABLE
723 , a35 JTF_NUMBER_TABLE
724 , a36 JTF_DATE_TABLE
725 , a37 JTF_VARCHAR2_TABLE_100
726 , a38 JTF_VARCHAR2_TABLE_100
727 , a39 JTF_VARCHAR2_TABLE_100
728 , a40 JTF_NUMBER_TABLE
729 , a41 JTF_NUMBER_TABLE
730 , a42 JTF_NUMBER_TABLE
731 , a43 JTF_NUMBER_TABLE
732 , a44 JTF_NUMBER_TABLE
733 , a45 JTF_NUMBER_TABLE
734 , a46 JTF_VARCHAR2_TABLE_100
735 , a47 JTF_VARCHAR2_TABLE_100
736 , a48 JTF_VARCHAR2_TABLE_100
737 , a49 JTF_NUMBER_TABLE
738 ) as
739 ddindx binary_integer; indx binary_integer;
740 begin
741 if a0 is not null and a0.count > 0 then
742 if a0.count > 0 then
743 indx := a0.first;
744 ddindx := 1;
745 while true loop
746 t(ddindx).accumulate_flag := a0(indx);
747 t(ddindx).attribute1 := a1(indx);
748 t(ddindx).attribute10 := a2(indx);
749 t(ddindx).attribute11 := a3(indx);
750 t(ddindx).attribute12 := a4(indx);
751 t(ddindx).attribute13 := a5(indx);
752 t(ddindx).attribute14 := a6(indx);
753 t(ddindx).attribute15 := a7(indx);
754 t(ddindx).attribute2 := a8(indx);
755 t(ddindx).attribute3 := a9(indx);
756 t(ddindx).attribute4 := a10(indx);
757 t(ddindx).attribute5 := a11(indx);
758 t(ddindx).attribute6 := a12(indx);
759 t(ddindx).attribute7 := a13(indx);
760 t(ddindx).attribute8 := a14(indx);
761 t(ddindx).attribute9 := a15(indx);
762 t(ddindx).attribute_grouping_no := rosetta_g_miss_num_map(a16(indx));
763 t(ddindx).context := a17(indx);
764 t(ddindx).created_by := rosetta_g_miss_num_map(a18(indx));
765 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a19(indx));
766 t(ddindx).excluder_flag := a20(indx);
767 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a21(indx));
768 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a22(indx));
769 t(ddindx).last_update_login := rosetta_g_miss_num_map(a23(indx));
770 t(ddindx).list_line_id := rosetta_g_miss_num_map(a24(indx));
771 t(ddindx).pricing_attribute := a25(indx);
772 t(ddindx).pricing_attribute_context := a26(indx);
773 t(ddindx).pricing_attribute_id := rosetta_g_miss_num_map(a27(indx));
774 t(ddindx).pricing_attr_value_from := a28(indx);
775 t(ddindx).pricing_attr_value_to := a29(indx);
776 t(ddindx).product_attribute := a30(indx);
777 t(ddindx).product_attribute_context := a31(indx);
778 t(ddindx).product_attr_value := a32(indx);
779 t(ddindx).product_uom_code := a33(indx);
780 t(ddindx).program_application_id := rosetta_g_miss_num_map(a34(indx));
781 t(ddindx).program_id := rosetta_g_miss_num_map(a35(indx));
782 t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a36(indx));
783 t(ddindx).product_attribute_datatype := a37(indx);
784 t(ddindx).pricing_attribute_datatype := a38(indx);
785 t(ddindx).comparison_operator_code := a39(indx);
786 t(ddindx).list_header_id := rosetta_g_miss_num_map(a40(indx));
787 t(ddindx).pricing_phase_id := rosetta_g_miss_num_map(a41(indx));
788 t(ddindx).request_id := rosetta_g_miss_num_map(a42(indx));
789 t(ddindx).pricing_attr_value_from_number := rosetta_g_miss_num_map(a43(indx));
790 t(ddindx).pricing_attr_value_to_number := rosetta_g_miss_num_map(a44(indx));
791 t(ddindx).qualification_ind := rosetta_g_miss_num_map(a45(indx));
792 t(ddindx).return_status := a46(indx);
793 t(ddindx).db_flag := a47(indx);
794 t(ddindx).operation := a48(indx);
795 t(ddindx).modifiers_index := rosetta_g_miss_num_map(a49(indx));
796 ddindx := ddindx+1;
797 if a0.last =indx
798 then exit;
799 end if;
800 indx := a0.next(indx);
801 end loop;
802 end if;
803 end if;
804 end rosetta_table_copy_in_p3;
805 procedure rosetta_table_copy_out_p3(t qp_modifiers_pub.pricing_attr_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
806 , a1 out nocopy JTF_VARCHAR2_TABLE_300
807 , a2 out nocopy JTF_VARCHAR2_TABLE_300
808 , a3 out nocopy JTF_VARCHAR2_TABLE_300
809 , a4 out nocopy JTF_VARCHAR2_TABLE_300
810 , a5 out nocopy JTF_VARCHAR2_TABLE_300
811 , a6 out nocopy JTF_VARCHAR2_TABLE_300
812 , a7 out nocopy JTF_VARCHAR2_TABLE_300
813 , a8 out nocopy JTF_VARCHAR2_TABLE_300
814 , a9 out nocopy JTF_VARCHAR2_TABLE_300
815 , a10 out nocopy JTF_VARCHAR2_TABLE_300
816 , a11 out nocopy JTF_VARCHAR2_TABLE_300
817 , a12 out nocopy JTF_VARCHAR2_TABLE_300
818 , a13 out nocopy JTF_VARCHAR2_TABLE_300
819 , a14 out nocopy JTF_VARCHAR2_TABLE_300
820 , a15 out nocopy JTF_VARCHAR2_TABLE_300
821 , a16 out nocopy JTF_NUMBER_TABLE
822 , a17 out nocopy JTF_VARCHAR2_TABLE_100
823 , a18 out nocopy JTF_NUMBER_TABLE
824 , a19 out nocopy JTF_DATE_TABLE
825 , a20 out nocopy JTF_VARCHAR2_TABLE_100
826 , a21 out nocopy JTF_NUMBER_TABLE
827 , a22 out nocopy JTF_DATE_TABLE
828 , a23 out nocopy JTF_NUMBER_TABLE
829 , a24 out nocopy JTF_NUMBER_TABLE
830 , a25 out nocopy JTF_VARCHAR2_TABLE_100
831 , a26 out nocopy JTF_VARCHAR2_TABLE_100
832 , a27 out nocopy JTF_NUMBER_TABLE
833 , a28 out nocopy JTF_VARCHAR2_TABLE_300
834 , a29 out nocopy JTF_VARCHAR2_TABLE_300
835 , a30 out nocopy JTF_VARCHAR2_TABLE_100
836 , a31 out nocopy JTF_VARCHAR2_TABLE_100
837 , a32 out nocopy JTF_VARCHAR2_TABLE_300
838 , a33 out nocopy JTF_VARCHAR2_TABLE_100
839 , a34 out nocopy JTF_NUMBER_TABLE
840 , a35 out nocopy JTF_NUMBER_TABLE
841 , a36 out nocopy JTF_DATE_TABLE
842 , a37 out nocopy JTF_VARCHAR2_TABLE_100
843 , a38 out nocopy JTF_VARCHAR2_TABLE_100
844 , a39 out nocopy JTF_VARCHAR2_TABLE_100
845 , a40 out nocopy JTF_NUMBER_TABLE
846 , a41 out nocopy JTF_NUMBER_TABLE
847 , a42 out nocopy JTF_NUMBER_TABLE
848 , a43 out nocopy JTF_NUMBER_TABLE
849 , a44 out nocopy JTF_NUMBER_TABLE
850 , a45 out nocopy JTF_NUMBER_TABLE
851 , a46 out nocopy JTF_VARCHAR2_TABLE_100
852 , a47 out nocopy JTF_VARCHAR2_TABLE_100
853 , a48 out nocopy JTF_VARCHAR2_TABLE_100
854 , a49 out nocopy JTF_NUMBER_TABLE
855 ) as
856 ddindx binary_integer; indx binary_integer;
857 begin
858 if t is null or t.count = 0 then
859 a0 := JTF_VARCHAR2_TABLE_100();
860 a1 := JTF_VARCHAR2_TABLE_300();
861 a2 := JTF_VARCHAR2_TABLE_300();
862 a3 := JTF_VARCHAR2_TABLE_300();
863 a4 := JTF_VARCHAR2_TABLE_300();
864 a5 := JTF_VARCHAR2_TABLE_300();
865 a6 := JTF_VARCHAR2_TABLE_300();
866 a7 := JTF_VARCHAR2_TABLE_300();
867 a8 := JTF_VARCHAR2_TABLE_300();
868 a9 := JTF_VARCHAR2_TABLE_300();
869 a10 := JTF_VARCHAR2_TABLE_300();
870 a11 := JTF_VARCHAR2_TABLE_300();
871 a12 := JTF_VARCHAR2_TABLE_300();
872 a13 := JTF_VARCHAR2_TABLE_300();
873 a14 := JTF_VARCHAR2_TABLE_300();
874 a15 := JTF_VARCHAR2_TABLE_300();
875 a16 := JTF_NUMBER_TABLE();
876 a17 := JTF_VARCHAR2_TABLE_100();
877 a18 := JTF_NUMBER_TABLE();
878 a19 := JTF_DATE_TABLE();
879 a20 := JTF_VARCHAR2_TABLE_100();
880 a21 := JTF_NUMBER_TABLE();
881 a22 := JTF_DATE_TABLE();
882 a23 := JTF_NUMBER_TABLE();
883 a24 := JTF_NUMBER_TABLE();
884 a25 := JTF_VARCHAR2_TABLE_100();
885 a26 := JTF_VARCHAR2_TABLE_100();
886 a27 := JTF_NUMBER_TABLE();
887 a28 := JTF_VARCHAR2_TABLE_300();
888 a29 := JTF_VARCHAR2_TABLE_300();
889 a30 := JTF_VARCHAR2_TABLE_100();
890 a31 := JTF_VARCHAR2_TABLE_100();
891 a32 := JTF_VARCHAR2_TABLE_300();
892 a33 := JTF_VARCHAR2_TABLE_100();
893 a34 := JTF_NUMBER_TABLE();
894 a35 := JTF_NUMBER_TABLE();
895 a36 := JTF_DATE_TABLE();
896 a37 := JTF_VARCHAR2_TABLE_100();
897 a38 := JTF_VARCHAR2_TABLE_100();
898 a39 := JTF_VARCHAR2_TABLE_100();
899 a40 := JTF_NUMBER_TABLE();
900 a41 := JTF_NUMBER_TABLE();
901 a42 := JTF_NUMBER_TABLE();
902 a43 := JTF_NUMBER_TABLE();
903 a44 := JTF_NUMBER_TABLE();
904 a45 := JTF_NUMBER_TABLE();
905 a46 := JTF_VARCHAR2_TABLE_100();
906 a47 := JTF_VARCHAR2_TABLE_100();
907 a48 := JTF_VARCHAR2_TABLE_100();
908 a49 := JTF_NUMBER_TABLE();
909 else
910 a0 := JTF_VARCHAR2_TABLE_100();
911 a1 := JTF_VARCHAR2_TABLE_300();
912 a2 := JTF_VARCHAR2_TABLE_300();
913 a3 := JTF_VARCHAR2_TABLE_300();
914 a4 := JTF_VARCHAR2_TABLE_300();
915 a5 := JTF_VARCHAR2_TABLE_300();
916 a6 := JTF_VARCHAR2_TABLE_300();
917 a7 := JTF_VARCHAR2_TABLE_300();
918 a8 := JTF_VARCHAR2_TABLE_300();
919 a9 := JTF_VARCHAR2_TABLE_300();
920 a10 := JTF_VARCHAR2_TABLE_300();
921 a11 := JTF_VARCHAR2_TABLE_300();
922 a12 := JTF_VARCHAR2_TABLE_300();
923 a13 := JTF_VARCHAR2_TABLE_300();
924 a14 := JTF_VARCHAR2_TABLE_300();
925 a15 := JTF_VARCHAR2_TABLE_300();
926 a16 := JTF_NUMBER_TABLE();
927 a17 := JTF_VARCHAR2_TABLE_100();
928 a18 := JTF_NUMBER_TABLE();
929 a19 := JTF_DATE_TABLE();
930 a20 := JTF_VARCHAR2_TABLE_100();
931 a21 := JTF_NUMBER_TABLE();
932 a22 := JTF_DATE_TABLE();
933 a23 := JTF_NUMBER_TABLE();
934 a24 := JTF_NUMBER_TABLE();
935 a25 := JTF_VARCHAR2_TABLE_100();
936 a26 := JTF_VARCHAR2_TABLE_100();
937 a27 := JTF_NUMBER_TABLE();
938 a28 := JTF_VARCHAR2_TABLE_300();
939 a29 := JTF_VARCHAR2_TABLE_300();
940 a30 := JTF_VARCHAR2_TABLE_100();
941 a31 := JTF_VARCHAR2_TABLE_100();
942 a32 := JTF_VARCHAR2_TABLE_300();
943 a33 := JTF_VARCHAR2_TABLE_100();
944 a34 := JTF_NUMBER_TABLE();
945 a35 := JTF_NUMBER_TABLE();
946 a36 := JTF_DATE_TABLE();
947 a37 := JTF_VARCHAR2_TABLE_100();
948 a38 := JTF_VARCHAR2_TABLE_100();
949 a39 := JTF_VARCHAR2_TABLE_100();
950 a40 := JTF_NUMBER_TABLE();
951 a41 := JTF_NUMBER_TABLE();
952 a42 := JTF_NUMBER_TABLE();
953 a43 := JTF_NUMBER_TABLE();
954 a44 := JTF_NUMBER_TABLE();
955 a45 := JTF_NUMBER_TABLE();
956 a46 := JTF_VARCHAR2_TABLE_100();
957 a47 := JTF_VARCHAR2_TABLE_100();
958 a48 := JTF_VARCHAR2_TABLE_100();
959 a49 := JTF_NUMBER_TABLE();
960 if t.count > 0 then
961 a0.extend(t.count);
962 a1.extend(t.count);
963 a2.extend(t.count);
964 a3.extend(t.count);
965 a4.extend(t.count);
966 a5.extend(t.count);
967 a6.extend(t.count);
968 a7.extend(t.count);
969 a8.extend(t.count);
970 a9.extend(t.count);
971 a10.extend(t.count);
972 a11.extend(t.count);
973 a12.extend(t.count);
974 a13.extend(t.count);
975 a14.extend(t.count);
976 a15.extend(t.count);
977 a16.extend(t.count);
978 a17.extend(t.count);
979 a18.extend(t.count);
980 a19.extend(t.count);
981 a20.extend(t.count);
982 a21.extend(t.count);
983 a22.extend(t.count);
984 a23.extend(t.count);
985 a24.extend(t.count);
986 a25.extend(t.count);
987 a26.extend(t.count);
988 a27.extend(t.count);
989 a28.extend(t.count);
990 a29.extend(t.count);
991 a30.extend(t.count);
992 a31.extend(t.count);
993 a32.extend(t.count);
994 a33.extend(t.count);
995 a34.extend(t.count);
996 a35.extend(t.count);
997 a36.extend(t.count);
998 a37.extend(t.count);
999 a38.extend(t.count);
1000 a39.extend(t.count);
1001 a40.extend(t.count);
1002 a41.extend(t.count);
1003 a42.extend(t.count);
1004 a43.extend(t.count);
1005 a44.extend(t.count);
1006 a45.extend(t.count);
1007 a46.extend(t.count);
1008 a47.extend(t.count);
1009 a48.extend(t.count);
1010 a49.extend(t.count);
1011 ddindx := t.first;
1012 indx := 1;
1013 while true loop
1014 a0(indx) := t(ddindx).accumulate_flag;
1015 a1(indx) := t(ddindx).attribute1;
1016 a2(indx) := t(ddindx).attribute10;
1017 a3(indx) := t(ddindx).attribute11;
1018 a4(indx) := t(ddindx).attribute12;
1019 a5(indx) := t(ddindx).attribute13;
1020 a6(indx) := t(ddindx).attribute14;
1021 a7(indx) := t(ddindx).attribute15;
1022 a8(indx) := t(ddindx).attribute2;
1023 a9(indx) := t(ddindx).attribute3;
1024 a10(indx) := t(ddindx).attribute4;
1025 a11(indx) := t(ddindx).attribute5;
1026 a12(indx) := t(ddindx).attribute6;
1027 a13(indx) := t(ddindx).attribute7;
1028 a14(indx) := t(ddindx).attribute8;
1029 a15(indx) := t(ddindx).attribute9;
1030 a16(indx) := rosetta_g_miss_num_map(t(ddindx).attribute_grouping_no);
1031 a17(indx) := t(ddindx).context;
1032 a18(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
1033 a19(indx) := t(ddindx).creation_date;
1034 a20(indx) := t(ddindx).excluder_flag;
1035 a21(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
1036 a22(indx) := t(ddindx).last_update_date;
1037 a23(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
1038 a24(indx) := rosetta_g_miss_num_map(t(ddindx).list_line_id);
1039 a25(indx) := t(ddindx).pricing_attribute;
1040 a26(indx) := t(ddindx).pricing_attribute_context;
1041 a27(indx) := rosetta_g_miss_num_map(t(ddindx).pricing_attribute_id);
1042 a28(indx) := t(ddindx).pricing_attr_value_from;
1043 a29(indx) := t(ddindx).pricing_attr_value_to;
1044 a30(indx) := t(ddindx).product_attribute;
1045 a31(indx) := t(ddindx).product_attribute_context;
1046 a32(indx) := t(ddindx).product_attr_value;
1047 a33(indx) := t(ddindx).product_uom_code;
1048 a34(indx) := rosetta_g_miss_num_map(t(ddindx).program_application_id);
1049 a35(indx) := rosetta_g_miss_num_map(t(ddindx).program_id);
1050 a36(indx) := t(ddindx).program_update_date;
1051 a37(indx) := t(ddindx).product_attribute_datatype;
1052 a38(indx) := t(ddindx).pricing_attribute_datatype;
1053 a39(indx) := t(ddindx).comparison_operator_code;
1054 a40(indx) := rosetta_g_miss_num_map(t(ddindx).list_header_id);
1055 a41(indx) := rosetta_g_miss_num_map(t(ddindx).pricing_phase_id);
1056 a42(indx) := rosetta_g_miss_num_map(t(ddindx).request_id);
1057 a43(indx) := rosetta_g_miss_num_map(t(ddindx).pricing_attr_value_from_number);
1058 a44(indx) := rosetta_g_miss_num_map(t(ddindx).pricing_attr_value_to_number);
1059 a45(indx) := rosetta_g_miss_num_map(t(ddindx).qualification_ind);
1060 a46(indx) := t(ddindx).return_status;
1061 a47(indx) := t(ddindx).db_flag;
1062 a48(indx) := t(ddindx).operation;
1063 a49(indx) := rosetta_g_miss_num_map(t(ddindx).modifiers_index);
1064 indx := indx+1;
1065 if t.last =ddindx
1066 then exit;
1067 end if;
1068 ddindx := t.next(ddindx);
1069 end loop;
1070 end if;
1071 end if;
1072 end rosetta_table_copy_out_p3;
1073
1074 end qp_modifiers_pub_w;