[Home] [Help]
PACKAGE BODY: APPS.CSI_PRICING_ATTRIBS_PUB_W
Source
1 package body csi_pricing_attribs_pub_w as
2 /* $Header: csippawb.pls 120.11 2008/01/15 03:38:09 devijay ship $ */
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 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 function rosetta_g_miss_num_map(n number) return number as
17 a number := fnd_api.g_miss_num;
18 b number := 0-1962.0724;
19 begin
20 if n=a then return b; end if;
21 if n=b then return a; end if;
22 return n;
23 end;
24
25 procedure get_pricing_attribs(p_api_version NUMBER
26 , p_commit VARCHAR2
27 , p_init_msg_list VARCHAR2
28 , p_validation_level NUMBER
29 , p_time_stamp date
30 , p6_a0 out nocopy JTF_NUMBER_TABLE
31 , p6_a1 out nocopy JTF_NUMBER_TABLE
32 , p6_a2 out nocopy JTF_DATE_TABLE
33 , p6_a3 out nocopy JTF_DATE_TABLE
34 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
35 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_200
36 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_200
37 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_200
38 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_200
39 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_200
40 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_200
41 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_200
42 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_200
43 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_200
44 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_200
45 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_200
46 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_200
47 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_200
48 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_200
49 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_200
50 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_200
51 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_200
52 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_200
53 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_200
54 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_300
55 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_200
56 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_200
57 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_200
58 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_200
59 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_200
60 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_200
61 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_200
62 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_200
63 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_200
64 , p6_a34 out nocopy JTF_VARCHAR2_TABLE_200
65 , p6_a35 out nocopy JTF_VARCHAR2_TABLE_200
66 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_200
67 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_200
68 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_200
69 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_200
70 , p6_a40 out nocopy JTF_VARCHAR2_TABLE_200
71 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_200
72 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_200
73 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_200
74 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_200
75 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_200
76 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_200
77 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_200
78 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_200
79 , p6_a49 out nocopy JTF_VARCHAR2_TABLE_200
80 , p6_a50 out nocopy JTF_VARCHAR2_TABLE_200
81 , p6_a51 out nocopy JTF_VARCHAR2_TABLE_200
82 , p6_a52 out nocopy JTF_VARCHAR2_TABLE_200
83 , p6_a53 out nocopy JTF_VARCHAR2_TABLE_200
84 , p6_a54 out nocopy JTF_VARCHAR2_TABLE_200
85 , p6_a55 out nocopy JTF_VARCHAR2_TABLE_200
86 , p6_a56 out nocopy JTF_VARCHAR2_TABLE_200
87 , p6_a57 out nocopy JTF_VARCHAR2_TABLE_200
88 , p6_a58 out nocopy JTF_VARCHAR2_TABLE_200
89 , p6_a59 out nocopy JTF_VARCHAR2_TABLE_200
90 , p6_a60 out nocopy JTF_VARCHAR2_TABLE_200
91 , p6_a61 out nocopy JTF_VARCHAR2_TABLE_200
92 , p6_a62 out nocopy JTF_VARCHAR2_TABLE_200
93 , p6_a63 out nocopy JTF_VARCHAR2_TABLE_200
94 , p6_a64 out nocopy JTF_VARCHAR2_TABLE_200
95 , p6_a65 out nocopy JTF_VARCHAR2_TABLE_200
96 , p6_a66 out nocopy JTF_VARCHAR2_TABLE_200
97 , p6_a67 out nocopy JTF_VARCHAR2_TABLE_200
98 , p6_a68 out nocopy JTF_VARCHAR2_TABLE_200
99 , p6_a69 out nocopy JTF_VARCHAR2_TABLE_200
100 , p6_a70 out nocopy JTF_VARCHAR2_TABLE_200
101 , p6_a71 out nocopy JTF_VARCHAR2_TABLE_200
102 , p6_a72 out nocopy JTF_VARCHAR2_TABLE_200
103 , p6_a73 out nocopy JTF_VARCHAR2_TABLE_200
104 , p6_a74 out nocopy JTF_VARCHAR2_TABLE_200
105 , p6_a75 out nocopy JTF_VARCHAR2_TABLE_200
106 , p6_a76 out nocopy JTF_VARCHAR2_TABLE_200
107 , p6_a77 out nocopy JTF_VARCHAR2_TABLE_200
108 , p6_a78 out nocopy JTF_VARCHAR2_TABLE_200
109 , p6_a79 out nocopy JTF_VARCHAR2_TABLE_200
110 , p6_a80 out nocopy JTF_VARCHAR2_TABLE_200
111 , p6_a81 out nocopy JTF_VARCHAR2_TABLE_200
112 , p6_a82 out nocopy JTF_VARCHAR2_TABLE_200
113 , p6_a83 out nocopy JTF_VARCHAR2_TABLE_200
114 , p6_a84 out nocopy JTF_VARCHAR2_TABLE_200
115 , p6_a85 out nocopy JTF_VARCHAR2_TABLE_200
116 , p6_a86 out nocopy JTF_VARCHAR2_TABLE_200
117 , p6_a87 out nocopy JTF_VARCHAR2_TABLE_200
118 , p6_a88 out nocopy JTF_VARCHAR2_TABLE_200
119 , p6_a89 out nocopy JTF_VARCHAR2_TABLE_200
120 , p6_a90 out nocopy JTF_VARCHAR2_TABLE_200
121 , p6_a91 out nocopy JTF_VARCHAR2_TABLE_200
122 , p6_a92 out nocopy JTF_VARCHAR2_TABLE_200
123 , p6_a93 out nocopy JTF_VARCHAR2_TABLE_200
124 , p6_a94 out nocopy JTF_VARCHAR2_TABLE_200
125 , p6_a95 out nocopy JTF_VARCHAR2_TABLE_200
126 , p6_a96 out nocopy JTF_VARCHAR2_TABLE_200
127 , p6_a97 out nocopy JTF_VARCHAR2_TABLE_200
128 , p6_a98 out nocopy JTF_VARCHAR2_TABLE_200
129 , p6_a99 out nocopy JTF_VARCHAR2_TABLE_200
130 , p6_a100 out nocopy JTF_VARCHAR2_TABLE_200
131 , p6_a101 out nocopy JTF_VARCHAR2_TABLE_200
132 , p6_a102 out nocopy JTF_VARCHAR2_TABLE_200
133 , p6_a103 out nocopy JTF_VARCHAR2_TABLE_200
134 , p6_a104 out nocopy JTF_VARCHAR2_TABLE_200
135 , p6_a105 out nocopy JTF_VARCHAR2_TABLE_100
136 , p6_a106 out nocopy JTF_VARCHAR2_TABLE_200
137 , p6_a107 out nocopy JTF_VARCHAR2_TABLE_200
138 , p6_a108 out nocopy JTF_VARCHAR2_TABLE_200
139 , p6_a109 out nocopy JTF_VARCHAR2_TABLE_200
140 , p6_a110 out nocopy JTF_VARCHAR2_TABLE_200
141 , p6_a111 out nocopy JTF_VARCHAR2_TABLE_200
142 , p6_a112 out nocopy JTF_VARCHAR2_TABLE_200
143 , p6_a113 out nocopy JTF_VARCHAR2_TABLE_200
144 , p6_a114 out nocopy JTF_VARCHAR2_TABLE_200
145 , p6_a115 out nocopy JTF_VARCHAR2_TABLE_200
146 , p6_a116 out nocopy JTF_VARCHAR2_TABLE_200
147 , p6_a117 out nocopy JTF_VARCHAR2_TABLE_200
148 , p6_a118 out nocopy JTF_VARCHAR2_TABLE_200
149 , p6_a119 out nocopy JTF_VARCHAR2_TABLE_200
150 , p6_a120 out nocopy JTF_VARCHAR2_TABLE_200
151 , p6_a121 out nocopy JTF_NUMBER_TABLE
152 , p6_a122 out nocopy JTF_NUMBER_TABLE
153 , x_return_status out nocopy VARCHAR2
154 , x_msg_count out nocopy NUMBER
155 , x_msg_data out nocopy VARCHAR2
156 , p4_a0 NUMBER := 0-1962.0724
157 , p4_a1 NUMBER := 0-1962.0724
158 )
159
160 as
161 ddp_pricing_attribs_query_rec csi_datastructures_pub.pricing_attribs_query_rec;
162 ddp_time_stamp date;
163 ddx_pricing_attribs_tbl csi_datastructures_pub.pricing_attribs_tbl;
164 ddindx binary_integer; indx binary_integer;
165 begin
166
167 -- copy data to the local IN or IN-OUT args, if any
168
169
170
171
172 ddp_pricing_attribs_query_rec.pricing_attribute_id := rosetta_g_miss_num_map(p4_a0);
173 ddp_pricing_attribs_query_rec.instance_id := rosetta_g_miss_num_map(p4_a1);
174
175 ddp_time_stamp := rosetta_g_miss_date_in_map(p_time_stamp);
176
177
178
179
180
181 -- here's the delegated call to the old PL/SQL routine
182 csi_pricing_attribs_pub.get_pricing_attribs(p_api_version,
183 p_commit,
184 p_init_msg_list,
185 p_validation_level,
186 ddp_pricing_attribs_query_rec,
187 ddp_time_stamp,
188 ddx_pricing_attribs_tbl,
189 x_return_status,
190 x_msg_count,
191 x_msg_data);
192
193 -- copy data back from the local variables to OUT or IN-OUT args, if any
194
195
196
197
198
199
200 csi_datastructures_pub_w.rosetta_table_copy_out_p46(ddx_pricing_attribs_tbl, p6_a0
201 , p6_a1
202 , p6_a2
203 , p6_a3
204 , p6_a4
205 , p6_a5
206 , p6_a6
207 , p6_a7
208 , p6_a8
209 , p6_a9
210 , p6_a10
211 , p6_a11
212 , p6_a12
213 , p6_a13
214 , p6_a14
215 , p6_a15
216 , p6_a16
217 , p6_a17
218 , p6_a18
219 , p6_a19
220 , p6_a20
221 , p6_a21
222 , p6_a22
223 , p6_a23
224 , p6_a24
225 , p6_a25
226 , p6_a26
227 , p6_a27
228 , p6_a28
229 , p6_a29
230 , p6_a30
231 , p6_a31
232 , p6_a32
233 , p6_a33
234 , p6_a34
235 , p6_a35
236 , p6_a36
237 , p6_a37
238 , p6_a38
239 , p6_a39
240 , p6_a40
241 , p6_a41
242 , p6_a42
243 , p6_a43
244 , p6_a44
245 , p6_a45
246 , p6_a46
247 , p6_a47
248 , p6_a48
249 , p6_a49
250 , p6_a50
251 , p6_a51
252 , p6_a52
253 , p6_a53
254 , p6_a54
255 , p6_a55
256 , p6_a56
257 , p6_a57
258 , p6_a58
259 , p6_a59
260 , p6_a60
261 , p6_a61
262 , p6_a62
263 , p6_a63
264 , p6_a64
265 , p6_a65
266 , p6_a66
267 , p6_a67
268 , p6_a68
269 , p6_a69
270 , p6_a70
271 , p6_a71
272 , p6_a72
273 , p6_a73
274 , p6_a74
275 , p6_a75
276 , p6_a76
277 , p6_a77
278 , p6_a78
279 , p6_a79
280 , p6_a80
281 , p6_a81
282 , p6_a82
283 , p6_a83
284 , p6_a84
285 , p6_a85
286 , p6_a86
287 , p6_a87
288 , p6_a88
289 , p6_a89
290 , p6_a90
291 , p6_a91
292 , p6_a92
293 , p6_a93
294 , p6_a94
295 , p6_a95
296 , p6_a96
297 , p6_a97
298 , p6_a98
299 , p6_a99
300 , p6_a100
301 , p6_a101
302 , p6_a102
303 , p6_a103
304 , p6_a104
305 , p6_a105
306 , p6_a106
307 , p6_a107
308 , p6_a108
309 , p6_a109
310 , p6_a110
311 , p6_a111
312 , p6_a112
313 , p6_a113
314 , p6_a114
315 , p6_a115
316 , p6_a116
317 , p6_a117
318 , p6_a118
319 , p6_a119
320 , p6_a120
321 , p6_a121
322 , p6_a122
323 );
324
325
326
327 end;
328
329 procedure create_pricing_attribs(p_api_version NUMBER
330 , p_commit VARCHAR2
331 , p_init_msg_list VARCHAR2
332 , p_validation_level NUMBER
333 , p4_a0 in out nocopy JTF_NUMBER_TABLE
334 , p4_a1 in out nocopy JTF_NUMBER_TABLE
335 , p4_a2 in out nocopy JTF_DATE_TABLE
336 , p4_a3 in out nocopy JTF_DATE_TABLE
337 , p4_a4 in out nocopy JTF_VARCHAR2_TABLE_100
338 , p4_a5 in out nocopy JTF_VARCHAR2_TABLE_200
339 , p4_a6 in out nocopy JTF_VARCHAR2_TABLE_200
340 , p4_a7 in out nocopy JTF_VARCHAR2_TABLE_200
341 , p4_a8 in out nocopy JTF_VARCHAR2_TABLE_200
342 , p4_a9 in out nocopy JTF_VARCHAR2_TABLE_200
343 , p4_a10 in out nocopy JTF_VARCHAR2_TABLE_200
344 , p4_a11 in out nocopy JTF_VARCHAR2_TABLE_200
345 , p4_a12 in out nocopy JTF_VARCHAR2_TABLE_200
346 , p4_a13 in out nocopy JTF_VARCHAR2_TABLE_200
347 , p4_a14 in out nocopy JTF_VARCHAR2_TABLE_200
348 , p4_a15 in out nocopy JTF_VARCHAR2_TABLE_200
349 , p4_a16 in out nocopy JTF_VARCHAR2_TABLE_200
350 , p4_a17 in out nocopy JTF_VARCHAR2_TABLE_200
351 , p4_a18 in out nocopy JTF_VARCHAR2_TABLE_200
352 , p4_a19 in out nocopy JTF_VARCHAR2_TABLE_200
353 , p4_a20 in out nocopy JTF_VARCHAR2_TABLE_200
354 , p4_a21 in out nocopy JTF_VARCHAR2_TABLE_200
355 , p4_a22 in out nocopy JTF_VARCHAR2_TABLE_200
356 , p4_a23 in out nocopy JTF_VARCHAR2_TABLE_200
357 , p4_a24 in out nocopy JTF_VARCHAR2_TABLE_300
358 , p4_a25 in out nocopy JTF_VARCHAR2_TABLE_200
359 , p4_a26 in out nocopy JTF_VARCHAR2_TABLE_200
360 , p4_a27 in out nocopy JTF_VARCHAR2_TABLE_200
361 , p4_a28 in out nocopy JTF_VARCHAR2_TABLE_200
362 , p4_a29 in out nocopy JTF_VARCHAR2_TABLE_200
363 , p4_a30 in out nocopy JTF_VARCHAR2_TABLE_200
364 , p4_a31 in out nocopy JTF_VARCHAR2_TABLE_200
365 , p4_a32 in out nocopy JTF_VARCHAR2_TABLE_200
366 , p4_a33 in out nocopy JTF_VARCHAR2_TABLE_200
367 , p4_a34 in out nocopy JTF_VARCHAR2_TABLE_200
368 , p4_a35 in out nocopy JTF_VARCHAR2_TABLE_200
369 , p4_a36 in out nocopy JTF_VARCHAR2_TABLE_200
370 , p4_a37 in out nocopy JTF_VARCHAR2_TABLE_200
371 , p4_a38 in out nocopy JTF_VARCHAR2_TABLE_200
372 , p4_a39 in out nocopy JTF_VARCHAR2_TABLE_200
373 , p4_a40 in out nocopy JTF_VARCHAR2_TABLE_200
374 , p4_a41 in out nocopy JTF_VARCHAR2_TABLE_200
375 , p4_a42 in out nocopy JTF_VARCHAR2_TABLE_200
376 , p4_a43 in out nocopy JTF_VARCHAR2_TABLE_200
377 , p4_a44 in out nocopy JTF_VARCHAR2_TABLE_200
378 , p4_a45 in out nocopy JTF_VARCHAR2_TABLE_200
379 , p4_a46 in out nocopy JTF_VARCHAR2_TABLE_200
380 , p4_a47 in out nocopy JTF_VARCHAR2_TABLE_200
381 , p4_a48 in out nocopy JTF_VARCHAR2_TABLE_200
382 , p4_a49 in out nocopy JTF_VARCHAR2_TABLE_200
383 , p4_a50 in out nocopy JTF_VARCHAR2_TABLE_200
384 , p4_a51 in out nocopy JTF_VARCHAR2_TABLE_200
385 , p4_a52 in out nocopy JTF_VARCHAR2_TABLE_200
386 , p4_a53 in out nocopy JTF_VARCHAR2_TABLE_200
387 , p4_a54 in out nocopy JTF_VARCHAR2_TABLE_200
388 , p4_a55 in out nocopy JTF_VARCHAR2_TABLE_200
389 , p4_a56 in out nocopy JTF_VARCHAR2_TABLE_200
390 , p4_a57 in out nocopy JTF_VARCHAR2_TABLE_200
391 , p4_a58 in out nocopy JTF_VARCHAR2_TABLE_200
392 , p4_a59 in out nocopy JTF_VARCHAR2_TABLE_200
393 , p4_a60 in out nocopy JTF_VARCHAR2_TABLE_200
394 , p4_a61 in out nocopy JTF_VARCHAR2_TABLE_200
395 , p4_a62 in out nocopy JTF_VARCHAR2_TABLE_200
396 , p4_a63 in out nocopy JTF_VARCHAR2_TABLE_200
397 , p4_a64 in out nocopy JTF_VARCHAR2_TABLE_200
398 , p4_a65 in out nocopy JTF_VARCHAR2_TABLE_200
399 , p4_a66 in out nocopy JTF_VARCHAR2_TABLE_200
400 , p4_a67 in out nocopy JTF_VARCHAR2_TABLE_200
401 , p4_a68 in out nocopy JTF_VARCHAR2_TABLE_200
402 , p4_a69 in out nocopy JTF_VARCHAR2_TABLE_200
403 , p4_a70 in out nocopy JTF_VARCHAR2_TABLE_200
404 , p4_a71 in out nocopy JTF_VARCHAR2_TABLE_200
405 , p4_a72 in out nocopy JTF_VARCHAR2_TABLE_200
409 , p4_a76 in out nocopy JTF_VARCHAR2_TABLE_200
406 , p4_a73 in out nocopy JTF_VARCHAR2_TABLE_200
407 , p4_a74 in out nocopy JTF_VARCHAR2_TABLE_200
408 , p4_a75 in out nocopy JTF_VARCHAR2_TABLE_200
410 , p4_a77 in out nocopy JTF_VARCHAR2_TABLE_200
411 , p4_a78 in out nocopy JTF_VARCHAR2_TABLE_200
412 , p4_a79 in out nocopy JTF_VARCHAR2_TABLE_200
413 , p4_a80 in out nocopy JTF_VARCHAR2_TABLE_200
414 , p4_a81 in out nocopy JTF_VARCHAR2_TABLE_200
415 , p4_a82 in out nocopy JTF_VARCHAR2_TABLE_200
416 , p4_a83 in out nocopy JTF_VARCHAR2_TABLE_200
417 , p4_a84 in out nocopy JTF_VARCHAR2_TABLE_200
418 , p4_a85 in out nocopy JTF_VARCHAR2_TABLE_200
419 , p4_a86 in out nocopy JTF_VARCHAR2_TABLE_200
420 , p4_a87 in out nocopy JTF_VARCHAR2_TABLE_200
421 , p4_a88 in out nocopy JTF_VARCHAR2_TABLE_200
422 , p4_a89 in out nocopy JTF_VARCHAR2_TABLE_200
423 , p4_a90 in out nocopy JTF_VARCHAR2_TABLE_200
424 , p4_a91 in out nocopy JTF_VARCHAR2_TABLE_200
425 , p4_a92 in out nocopy JTF_VARCHAR2_TABLE_200
426 , p4_a93 in out nocopy JTF_VARCHAR2_TABLE_200
427 , p4_a94 in out nocopy JTF_VARCHAR2_TABLE_200
428 , p4_a95 in out nocopy JTF_VARCHAR2_TABLE_200
429 , p4_a96 in out nocopy JTF_VARCHAR2_TABLE_200
430 , p4_a97 in out nocopy JTF_VARCHAR2_TABLE_200
431 , p4_a98 in out nocopy JTF_VARCHAR2_TABLE_200
432 , p4_a99 in out nocopy JTF_VARCHAR2_TABLE_200
433 , p4_a100 in out nocopy JTF_VARCHAR2_TABLE_200
434 , p4_a101 in out nocopy JTF_VARCHAR2_TABLE_200
435 , p4_a102 in out nocopy JTF_VARCHAR2_TABLE_200
436 , p4_a103 in out nocopy JTF_VARCHAR2_TABLE_200
437 , p4_a104 in out nocopy JTF_VARCHAR2_TABLE_200
438 , p4_a105 in out nocopy JTF_VARCHAR2_TABLE_100
439 , p4_a106 in out nocopy JTF_VARCHAR2_TABLE_200
440 , p4_a107 in out nocopy JTF_VARCHAR2_TABLE_200
441 , p4_a108 in out nocopy JTF_VARCHAR2_TABLE_200
442 , p4_a109 in out nocopy JTF_VARCHAR2_TABLE_200
443 , p4_a110 in out nocopy JTF_VARCHAR2_TABLE_200
444 , p4_a111 in out nocopy JTF_VARCHAR2_TABLE_200
445 , p4_a112 in out nocopy JTF_VARCHAR2_TABLE_200
446 , p4_a113 in out nocopy JTF_VARCHAR2_TABLE_200
447 , p4_a114 in out nocopy JTF_VARCHAR2_TABLE_200
448 , p4_a115 in out nocopy JTF_VARCHAR2_TABLE_200
449 , p4_a116 in out nocopy JTF_VARCHAR2_TABLE_200
450 , p4_a117 in out nocopy JTF_VARCHAR2_TABLE_200
451 , p4_a118 in out nocopy JTF_VARCHAR2_TABLE_200
452 , p4_a119 in out nocopy JTF_VARCHAR2_TABLE_200
453 , p4_a120 in out nocopy JTF_VARCHAR2_TABLE_200
454 , p4_a121 in out nocopy JTF_NUMBER_TABLE
455 , p4_a122 in out nocopy JTF_NUMBER_TABLE
456 , p5_a0 in out nocopy NUMBER
457 , p5_a1 in out nocopy DATE
458 , p5_a2 in out nocopy DATE
459 , p5_a3 in out nocopy NUMBER
460 , p5_a4 in out nocopy NUMBER
461 , p5_a5 in out nocopy NUMBER
462 , p5_a6 in out nocopy VARCHAR2
463 , p5_a7 in out nocopy NUMBER
464 , p5_a8 in out nocopy VARCHAR2
465 , p5_a9 in out nocopy NUMBER
466 , p5_a10 in out nocopy VARCHAR2
467 , p5_a11 in out nocopy NUMBER
468 , p5_a12 in out nocopy NUMBER
469 , p5_a13 in out nocopy NUMBER
470 , p5_a14 in out nocopy NUMBER
471 , p5_a15 in out nocopy VARCHAR2
472 , p5_a16 in out nocopy NUMBER
473 , p5_a17 in out nocopy VARCHAR2
474 , p5_a18 in out nocopy VARCHAR2
475 , p5_a19 in out nocopy NUMBER
476 , p5_a20 in out nocopy VARCHAR2
477 , p5_a21 in out nocopy VARCHAR2
478 , p5_a22 in out nocopy VARCHAR2
479 , p5_a23 in out nocopy VARCHAR2
480 , p5_a24 in out nocopy VARCHAR2
481 , p5_a25 in out nocopy VARCHAR2
482 , p5_a26 in out nocopy VARCHAR2
483 , p5_a27 in out nocopy VARCHAR2
484 , p5_a28 in out nocopy VARCHAR2
485 , p5_a29 in out nocopy VARCHAR2
486 , p5_a30 in out nocopy VARCHAR2
487 , p5_a31 in out nocopy VARCHAR2
488 , p5_a32 in out nocopy VARCHAR2
489 , p5_a33 in out nocopy VARCHAR2
490 , p5_a34 in out nocopy VARCHAR2
491 , p5_a35 in out nocopy VARCHAR2
492 , p5_a36 in out nocopy NUMBER
493 , p5_a37 in out nocopy VARCHAR2
494 , p5_a38 in out nocopy DATE
495 , p5_a39 in out nocopy NUMBER
496 , x_return_status out nocopy VARCHAR2
497 , x_msg_count out nocopy NUMBER
498 , x_msg_data out nocopy VARCHAR2
499 )
500
501 as
502 ddp_pricing_attribs_tbl csi_datastructures_pub.pricing_attribs_tbl;
503 ddp_txn_rec csi_datastructures_pub.transaction_rec;
504 ddindx binary_integer; indx binary_integer;
505 begin
506
507 -- copy data to the local IN or IN-OUT args, if any
508
509
510
511
512 csi_datastructures_pub_w.rosetta_table_copy_in_p46(ddp_pricing_attribs_tbl, p4_a0
513 , p4_a1
514 , p4_a2
515 , p4_a3
516 , p4_a4
517 , p4_a5
518 , p4_a6
519 , p4_a7
520 , p4_a8
521 , p4_a9
522 , p4_a10
523 , p4_a11
524 , p4_a12
525 , p4_a13
526 , p4_a14
527 , p4_a15
528 , p4_a16
529 , p4_a17
530 , p4_a18
531 , p4_a19
532 , p4_a20
533 , p4_a21
534 , p4_a22
535 , p4_a23
536 , p4_a24
537 , p4_a25
538 , p4_a26
539 , p4_a27
540 , p4_a28
541 , p4_a29
542 , p4_a30
543 , p4_a31
544 , p4_a32
545 , p4_a33
546 , p4_a34
547 , p4_a35
548 , p4_a36
549 , p4_a37
550 , p4_a38
551 , p4_a39
552 , p4_a40
553 , p4_a41
554 , p4_a42
555 , p4_a43
559 , p4_a47
556 , p4_a44
557 , p4_a45
558 , p4_a46
560 , p4_a48
561 , p4_a49
562 , p4_a50
563 , p4_a51
564 , p4_a52
565 , p4_a53
566 , p4_a54
567 , p4_a55
568 , p4_a56
569 , p4_a57
570 , p4_a58
571 , p4_a59
572 , p4_a60
573 , p4_a61
574 , p4_a62
575 , p4_a63
576 , p4_a64
577 , p4_a65
578 , p4_a66
579 , p4_a67
580 , p4_a68
581 , p4_a69
582 , p4_a70
583 , p4_a71
584 , p4_a72
585 , p4_a73
586 , p4_a74
587 , p4_a75
588 , p4_a76
589 , p4_a77
590 , p4_a78
591 , p4_a79
592 , p4_a80
593 , p4_a81
594 , p4_a82
595 , p4_a83
596 , p4_a84
597 , p4_a85
598 , p4_a86
599 , p4_a87
600 , p4_a88
601 , p4_a89
602 , p4_a90
603 , p4_a91
604 , p4_a92
605 , p4_a93
606 , p4_a94
607 , p4_a95
608 , p4_a96
609 , p4_a97
610 , p4_a98
611 , p4_a99
612 , p4_a100
613 , p4_a101
614 , p4_a102
615 , p4_a103
616 , p4_a104
617 , p4_a105
618 , p4_a106
619 , p4_a107
620 , p4_a108
621 , p4_a109
622 , p4_a110
623 , p4_a111
624 , p4_a112
625 , p4_a113
626 , p4_a114
627 , p4_a115
628 , p4_a116
629 , p4_a117
630 , p4_a118
631 , p4_a119
632 , p4_a120
633 , p4_a121
634 , p4_a122
635 );
636
637 ddp_txn_rec.transaction_id := rosetta_g_miss_num_map(p5_a0);
638 ddp_txn_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a1);
639 ddp_txn_rec.source_transaction_date := rosetta_g_miss_date_in_map(p5_a2);
640 ddp_txn_rec.transaction_type_id := rosetta_g_miss_num_map(p5_a3);
641 ddp_txn_rec.txn_sub_type_id := rosetta_g_miss_num_map(p5_a4);
642 ddp_txn_rec.source_group_ref_id := rosetta_g_miss_num_map(p5_a5);
643 ddp_txn_rec.source_group_ref := p5_a6;
644 ddp_txn_rec.source_header_ref_id := rosetta_g_miss_num_map(p5_a7);
645 ddp_txn_rec.source_header_ref := p5_a8;
646 ddp_txn_rec.source_line_ref_id := rosetta_g_miss_num_map(p5_a9);
647 ddp_txn_rec.source_line_ref := p5_a10;
648 ddp_txn_rec.source_dist_ref_id1 := rosetta_g_miss_num_map(p5_a11);
649 ddp_txn_rec.source_dist_ref_id2 := rosetta_g_miss_num_map(p5_a12);
650 ddp_txn_rec.inv_material_transaction_id := rosetta_g_miss_num_map(p5_a13);
651 ddp_txn_rec.transaction_quantity := rosetta_g_miss_num_map(p5_a14);
652 ddp_txn_rec.transaction_uom_code := p5_a15;
653 ddp_txn_rec.transacted_by := rosetta_g_miss_num_map(p5_a16);
654 ddp_txn_rec.transaction_status_code := p5_a17;
655 ddp_txn_rec.transaction_action_code := p5_a18;
656 ddp_txn_rec.message_id := rosetta_g_miss_num_map(p5_a19);
657 ddp_txn_rec.context := p5_a20;
658 ddp_txn_rec.attribute1 := p5_a21;
659 ddp_txn_rec.attribute2 := p5_a22;
660 ddp_txn_rec.attribute3 := p5_a23;
661 ddp_txn_rec.attribute4 := p5_a24;
662 ddp_txn_rec.attribute5 := p5_a25;
663 ddp_txn_rec.attribute6 := p5_a26;
664 ddp_txn_rec.attribute7 := p5_a27;
665 ddp_txn_rec.attribute8 := p5_a28;
666 ddp_txn_rec.attribute9 := p5_a29;
667 ddp_txn_rec.attribute10 := p5_a30;
668 ddp_txn_rec.attribute11 := p5_a31;
669 ddp_txn_rec.attribute12 := p5_a32;
670 ddp_txn_rec.attribute13 := p5_a33;
671 ddp_txn_rec.attribute14 := p5_a34;
672 ddp_txn_rec.attribute15 := p5_a35;
673 ddp_txn_rec.object_version_number := rosetta_g_miss_num_map(p5_a36);
674 ddp_txn_rec.split_reason_code := p5_a37;
675 ddp_txn_rec.src_txn_creation_date := rosetta_g_miss_date_in_map(p5_a38);
676 ddp_txn_rec.gl_interface_status_code := rosetta_g_miss_num_map(p5_a39);
677
678
679
680
681 -- here's the delegated call to the old PL/SQL routine
682 csi_pricing_attribs_pub.create_pricing_attribs(p_api_version,
683 p_commit,
684 p_init_msg_list,
685 p_validation_level,
686 ddp_pricing_attribs_tbl,
687 ddp_txn_rec,
688 x_return_status,
689 x_msg_count,
690 x_msg_data);
691
692 -- copy data back from the local variables to OUT or IN-OUT args, if any
693
694
695
696
697 csi_datastructures_pub_w.rosetta_table_copy_out_p46(ddp_pricing_attribs_tbl, p4_a0
698 , p4_a1
699 , p4_a2
700 , p4_a3
701 , p4_a4
702 , p4_a5
703 , p4_a6
704 , p4_a7
705 , p4_a8
706 , p4_a9
707 , p4_a10
708 , p4_a11
709 , p4_a12
710 , p4_a13
711 , p4_a14
712 , p4_a15
713 , p4_a16
714 , p4_a17
715 , p4_a18
716 , p4_a19
717 , p4_a20
718 , p4_a21
719 , p4_a22
720 , p4_a23
721 , p4_a24
722 , p4_a25
723 , p4_a26
724 , p4_a27
725 , p4_a28
726 , p4_a29
727 , p4_a30
728 , p4_a31
729 , p4_a32
730 , p4_a33
731 , p4_a34
732 , p4_a35
733 , p4_a36
734 , p4_a37
735 , p4_a38
736 , p4_a39
737 , p4_a40
738 , p4_a41
739 , p4_a42
740 , p4_a43
741 , p4_a44
745 , p4_a48
742 , p4_a45
743 , p4_a46
744 , p4_a47
746 , p4_a49
747 , p4_a50
748 , p4_a51
749 , p4_a52
750 , p4_a53
751 , p4_a54
752 , p4_a55
753 , p4_a56
754 , p4_a57
755 , p4_a58
756 , p4_a59
757 , p4_a60
758 , p4_a61
759 , p4_a62
760 , p4_a63
761 , p4_a64
762 , p4_a65
763 , p4_a66
764 , p4_a67
765 , p4_a68
766 , p4_a69
767 , p4_a70
768 , p4_a71
769 , p4_a72
770 , p4_a73
771 , p4_a74
772 , p4_a75
773 , p4_a76
774 , p4_a77
775 , p4_a78
776 , p4_a79
777 , p4_a80
778 , p4_a81
779 , p4_a82
780 , p4_a83
781 , p4_a84
782 , p4_a85
783 , p4_a86
784 , p4_a87
785 , p4_a88
786 , p4_a89
787 , p4_a90
788 , p4_a91
789 , p4_a92
790 , p4_a93
791 , p4_a94
792 , p4_a95
793 , p4_a96
794 , p4_a97
795 , p4_a98
796 , p4_a99
797 , p4_a100
798 , p4_a101
799 , p4_a102
800 , p4_a103
801 , p4_a104
802 , p4_a105
803 , p4_a106
804 , p4_a107
805 , p4_a108
806 , p4_a109
807 , p4_a110
808 , p4_a111
809 , p4_a112
810 , p4_a113
811 , p4_a114
812 , p4_a115
813 , p4_a116
814 , p4_a117
815 , p4_a118
816 , p4_a119
817 , p4_a120
818 , p4_a121
819 , p4_a122
820 );
821
822 p5_a0 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_id);
823 p5_a1 := ddp_txn_rec.transaction_date;
824 p5_a2 := ddp_txn_rec.source_transaction_date;
825 p5_a3 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_type_id);
826 p5_a4 := rosetta_g_miss_num_map(ddp_txn_rec.txn_sub_type_id);
827 p5_a5 := rosetta_g_miss_num_map(ddp_txn_rec.source_group_ref_id);
828 p5_a6 := ddp_txn_rec.source_group_ref;
829 p5_a7 := rosetta_g_miss_num_map(ddp_txn_rec.source_header_ref_id);
830 p5_a8 := ddp_txn_rec.source_header_ref;
831 p5_a9 := rosetta_g_miss_num_map(ddp_txn_rec.source_line_ref_id);
832 p5_a10 := ddp_txn_rec.source_line_ref;
833 p5_a11 := rosetta_g_miss_num_map(ddp_txn_rec.source_dist_ref_id1);
834 p5_a12 := rosetta_g_miss_num_map(ddp_txn_rec.source_dist_ref_id2);
835 p5_a13 := rosetta_g_miss_num_map(ddp_txn_rec.inv_material_transaction_id);
836 p5_a14 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_quantity);
837 p5_a15 := ddp_txn_rec.transaction_uom_code;
838 p5_a16 := rosetta_g_miss_num_map(ddp_txn_rec.transacted_by);
839 p5_a17 := ddp_txn_rec.transaction_status_code;
840 p5_a18 := ddp_txn_rec.transaction_action_code;
841 p5_a19 := rosetta_g_miss_num_map(ddp_txn_rec.message_id);
842 p5_a20 := ddp_txn_rec.context;
843 p5_a21 := ddp_txn_rec.attribute1;
844 p5_a22 := ddp_txn_rec.attribute2;
845 p5_a23 := ddp_txn_rec.attribute3;
846 p5_a24 := ddp_txn_rec.attribute4;
847 p5_a25 := ddp_txn_rec.attribute5;
848 p5_a26 := ddp_txn_rec.attribute6;
849 p5_a27 := ddp_txn_rec.attribute7;
850 p5_a28 := ddp_txn_rec.attribute8;
851 p5_a29 := ddp_txn_rec.attribute9;
852 p5_a30 := ddp_txn_rec.attribute10;
853 p5_a31 := ddp_txn_rec.attribute11;
854 p5_a32 := ddp_txn_rec.attribute12;
855 p5_a33 := ddp_txn_rec.attribute13;
856 p5_a34 := ddp_txn_rec.attribute14;
857 p5_a35 := ddp_txn_rec.attribute15;
858 p5_a36 := rosetta_g_miss_num_map(ddp_txn_rec.object_version_number);
859 p5_a37 := ddp_txn_rec.split_reason_code;
860 p5_a38 := ddp_txn_rec.src_txn_creation_date;
861 p5_a39 := rosetta_g_miss_num_map(ddp_txn_rec.gl_interface_status_code);
862
863
864
865 end;
866
867 procedure update_pricing_attribs(p_api_version NUMBER
868 , p_commit VARCHAR2
869 , p_init_msg_list VARCHAR2
870 , p_validation_level NUMBER
871 , p4_a0 JTF_NUMBER_TABLE
872 , p4_a1 JTF_NUMBER_TABLE
873 , p4_a2 JTF_DATE_TABLE
874 , p4_a3 JTF_DATE_TABLE
875 , p4_a4 JTF_VARCHAR2_TABLE_100
876 , p4_a5 JTF_VARCHAR2_TABLE_200
877 , p4_a6 JTF_VARCHAR2_TABLE_200
878 , p4_a7 JTF_VARCHAR2_TABLE_200
879 , p4_a8 JTF_VARCHAR2_TABLE_200
880 , p4_a9 JTF_VARCHAR2_TABLE_200
881 , p4_a10 JTF_VARCHAR2_TABLE_200
882 , p4_a11 JTF_VARCHAR2_TABLE_200
883 , p4_a12 JTF_VARCHAR2_TABLE_200
884 , p4_a13 JTF_VARCHAR2_TABLE_200
885 , p4_a14 JTF_VARCHAR2_TABLE_200
886 , p4_a15 JTF_VARCHAR2_TABLE_200
887 , p4_a16 JTF_VARCHAR2_TABLE_200
888 , p4_a17 JTF_VARCHAR2_TABLE_200
889 , p4_a18 JTF_VARCHAR2_TABLE_200
890 , p4_a19 JTF_VARCHAR2_TABLE_200
891 , p4_a20 JTF_VARCHAR2_TABLE_200
892 , p4_a21 JTF_VARCHAR2_TABLE_200
893 , p4_a22 JTF_VARCHAR2_TABLE_200
894 , p4_a23 JTF_VARCHAR2_TABLE_200
895 , p4_a24 JTF_VARCHAR2_TABLE_300
896 , p4_a25 JTF_VARCHAR2_TABLE_200
897 , p4_a26 JTF_VARCHAR2_TABLE_200
898 , p4_a27 JTF_VARCHAR2_TABLE_200
899 , p4_a28 JTF_VARCHAR2_TABLE_200
900 , p4_a29 JTF_VARCHAR2_TABLE_200
901 , p4_a30 JTF_VARCHAR2_TABLE_200
902 , p4_a31 JTF_VARCHAR2_TABLE_200
903 , p4_a32 JTF_VARCHAR2_TABLE_200
904 , p4_a33 JTF_VARCHAR2_TABLE_200
905 , p4_a34 JTF_VARCHAR2_TABLE_200
906 , p4_a35 JTF_VARCHAR2_TABLE_200
907 , p4_a36 JTF_VARCHAR2_TABLE_200
908 , p4_a37 JTF_VARCHAR2_TABLE_200
912 , p4_a41 JTF_VARCHAR2_TABLE_200
909 , p4_a38 JTF_VARCHAR2_TABLE_200
910 , p4_a39 JTF_VARCHAR2_TABLE_200
911 , p4_a40 JTF_VARCHAR2_TABLE_200
913 , p4_a42 JTF_VARCHAR2_TABLE_200
914 , p4_a43 JTF_VARCHAR2_TABLE_200
915 , p4_a44 JTF_VARCHAR2_TABLE_200
916 , p4_a45 JTF_VARCHAR2_TABLE_200
917 , p4_a46 JTF_VARCHAR2_TABLE_200
918 , p4_a47 JTF_VARCHAR2_TABLE_200
919 , p4_a48 JTF_VARCHAR2_TABLE_200
920 , p4_a49 JTF_VARCHAR2_TABLE_200
921 , p4_a50 JTF_VARCHAR2_TABLE_200
922 , p4_a51 JTF_VARCHAR2_TABLE_200
923 , p4_a52 JTF_VARCHAR2_TABLE_200
924 , p4_a53 JTF_VARCHAR2_TABLE_200
925 , p4_a54 JTF_VARCHAR2_TABLE_200
926 , p4_a55 JTF_VARCHAR2_TABLE_200
927 , p4_a56 JTF_VARCHAR2_TABLE_200
928 , p4_a57 JTF_VARCHAR2_TABLE_200
929 , p4_a58 JTF_VARCHAR2_TABLE_200
930 , p4_a59 JTF_VARCHAR2_TABLE_200
931 , p4_a60 JTF_VARCHAR2_TABLE_200
932 , p4_a61 JTF_VARCHAR2_TABLE_200
933 , p4_a62 JTF_VARCHAR2_TABLE_200
934 , p4_a63 JTF_VARCHAR2_TABLE_200
935 , p4_a64 JTF_VARCHAR2_TABLE_200
936 , p4_a65 JTF_VARCHAR2_TABLE_200
937 , p4_a66 JTF_VARCHAR2_TABLE_200
938 , p4_a67 JTF_VARCHAR2_TABLE_200
939 , p4_a68 JTF_VARCHAR2_TABLE_200
940 , p4_a69 JTF_VARCHAR2_TABLE_200
941 , p4_a70 JTF_VARCHAR2_TABLE_200
942 , p4_a71 JTF_VARCHAR2_TABLE_200
943 , p4_a72 JTF_VARCHAR2_TABLE_200
944 , p4_a73 JTF_VARCHAR2_TABLE_200
945 , p4_a74 JTF_VARCHAR2_TABLE_200
946 , p4_a75 JTF_VARCHAR2_TABLE_200
947 , p4_a76 JTF_VARCHAR2_TABLE_200
948 , p4_a77 JTF_VARCHAR2_TABLE_200
949 , p4_a78 JTF_VARCHAR2_TABLE_200
950 , p4_a79 JTF_VARCHAR2_TABLE_200
951 , p4_a80 JTF_VARCHAR2_TABLE_200
952 , p4_a81 JTF_VARCHAR2_TABLE_200
953 , p4_a82 JTF_VARCHAR2_TABLE_200
954 , p4_a83 JTF_VARCHAR2_TABLE_200
955 , p4_a84 JTF_VARCHAR2_TABLE_200
956 , p4_a85 JTF_VARCHAR2_TABLE_200
957 , p4_a86 JTF_VARCHAR2_TABLE_200
958 , p4_a87 JTF_VARCHAR2_TABLE_200
959 , p4_a88 JTF_VARCHAR2_TABLE_200
960 , p4_a89 JTF_VARCHAR2_TABLE_200
961 , p4_a90 JTF_VARCHAR2_TABLE_200
962 , p4_a91 JTF_VARCHAR2_TABLE_200
963 , p4_a92 JTF_VARCHAR2_TABLE_200
964 , p4_a93 JTF_VARCHAR2_TABLE_200
965 , p4_a94 JTF_VARCHAR2_TABLE_200
966 , p4_a95 JTF_VARCHAR2_TABLE_200
967 , p4_a96 JTF_VARCHAR2_TABLE_200
968 , p4_a97 JTF_VARCHAR2_TABLE_200
969 , p4_a98 JTF_VARCHAR2_TABLE_200
970 , p4_a99 JTF_VARCHAR2_TABLE_200
971 , p4_a100 JTF_VARCHAR2_TABLE_200
972 , p4_a101 JTF_VARCHAR2_TABLE_200
973 , p4_a102 JTF_VARCHAR2_TABLE_200
974 , p4_a103 JTF_VARCHAR2_TABLE_200
975 , p4_a104 JTF_VARCHAR2_TABLE_200
976 , p4_a105 JTF_VARCHAR2_TABLE_100
977 , p4_a106 JTF_VARCHAR2_TABLE_200
978 , p4_a107 JTF_VARCHAR2_TABLE_200
979 , p4_a108 JTF_VARCHAR2_TABLE_200
980 , p4_a109 JTF_VARCHAR2_TABLE_200
981 , p4_a110 JTF_VARCHAR2_TABLE_200
982 , p4_a111 JTF_VARCHAR2_TABLE_200
983 , p4_a112 JTF_VARCHAR2_TABLE_200
984 , p4_a113 JTF_VARCHAR2_TABLE_200
985 , p4_a114 JTF_VARCHAR2_TABLE_200
986 , p4_a115 JTF_VARCHAR2_TABLE_200
987 , p4_a116 JTF_VARCHAR2_TABLE_200
988 , p4_a117 JTF_VARCHAR2_TABLE_200
989 , p4_a118 JTF_VARCHAR2_TABLE_200
990 , p4_a119 JTF_VARCHAR2_TABLE_200
991 , p4_a120 JTF_VARCHAR2_TABLE_200
992 , p4_a121 JTF_NUMBER_TABLE
993 , p4_a122 JTF_NUMBER_TABLE
994 , p5_a0 in out nocopy NUMBER
995 , p5_a1 in out nocopy DATE
996 , p5_a2 in out nocopy DATE
997 , p5_a3 in out nocopy NUMBER
998 , p5_a4 in out nocopy NUMBER
999 , p5_a5 in out nocopy NUMBER
1000 , p5_a6 in out nocopy VARCHAR2
1001 , p5_a7 in out nocopy NUMBER
1002 , p5_a8 in out nocopy VARCHAR2
1003 , p5_a9 in out nocopy NUMBER
1004 , p5_a10 in out nocopy VARCHAR2
1005 , p5_a11 in out nocopy NUMBER
1006 , p5_a12 in out nocopy NUMBER
1007 , p5_a13 in out nocopy NUMBER
1008 , p5_a14 in out nocopy NUMBER
1009 , p5_a15 in out nocopy VARCHAR2
1010 , p5_a16 in out nocopy NUMBER
1011 , p5_a17 in out nocopy VARCHAR2
1012 , p5_a18 in out nocopy VARCHAR2
1013 , p5_a19 in out nocopy NUMBER
1014 , p5_a20 in out nocopy VARCHAR2
1015 , p5_a21 in out nocopy VARCHAR2
1016 , p5_a22 in out nocopy VARCHAR2
1017 , p5_a23 in out nocopy VARCHAR2
1018 , p5_a24 in out nocopy VARCHAR2
1019 , p5_a25 in out nocopy VARCHAR2
1020 , p5_a26 in out nocopy VARCHAR2
1021 , p5_a27 in out nocopy VARCHAR2
1022 , p5_a28 in out nocopy VARCHAR2
1023 , p5_a29 in out nocopy VARCHAR2
1024 , p5_a30 in out nocopy VARCHAR2
1025 , p5_a31 in out nocopy VARCHAR2
1026 , p5_a32 in out nocopy VARCHAR2
1027 , p5_a33 in out nocopy VARCHAR2
1028 , p5_a34 in out nocopy VARCHAR2
1029 , p5_a35 in out nocopy VARCHAR2
1030 , p5_a36 in out nocopy NUMBER
1031 , p5_a37 in out nocopy VARCHAR2
1032 , p5_a38 in out nocopy DATE
1033 , p5_a39 in out nocopy NUMBER
1034 , x_return_status out nocopy VARCHAR2
1035 , x_msg_count out nocopy NUMBER
1036 , x_msg_data out nocopy VARCHAR2
1037 )
1038
1039 as
1040 ddp_pricing_attribs_tbl csi_datastructures_pub.pricing_attribs_tbl;
1041 ddp_txn_rec csi_datastructures_pub.transaction_rec;
1042 ddindx binary_integer; indx binary_integer;
1043 begin
1044
1045 -- copy data to the local IN or IN-OUT args, if any
1046
1047
1048
1049
1050 csi_datastructures_pub_w.rosetta_table_copy_in_p46(ddp_pricing_attribs_tbl, p4_a0
1051 , p4_a1
1052 , p4_a2
1053 , p4_a3
1054 , p4_a4
1055 , p4_a5
1056 , p4_a6
1057 , p4_a7
1061 , p4_a11
1058 , p4_a8
1059 , p4_a9
1060 , p4_a10
1062 , p4_a12
1063 , p4_a13
1064 , p4_a14
1065 , p4_a15
1066 , p4_a16
1067 , p4_a17
1068 , p4_a18
1069 , p4_a19
1070 , p4_a20
1071 , p4_a21
1072 , p4_a22
1073 , p4_a23
1074 , p4_a24
1075 , p4_a25
1076 , p4_a26
1077 , p4_a27
1078 , p4_a28
1079 , p4_a29
1080 , p4_a30
1081 , p4_a31
1082 , p4_a32
1083 , p4_a33
1084 , p4_a34
1085 , p4_a35
1086 , p4_a36
1087 , p4_a37
1088 , p4_a38
1089 , p4_a39
1090 , p4_a40
1091 , p4_a41
1092 , p4_a42
1093 , p4_a43
1094 , p4_a44
1095 , p4_a45
1096 , p4_a46
1097 , p4_a47
1098 , p4_a48
1099 , p4_a49
1100 , p4_a50
1101 , p4_a51
1102 , p4_a52
1103 , p4_a53
1104 , p4_a54
1105 , p4_a55
1106 , p4_a56
1107 , p4_a57
1108 , p4_a58
1109 , p4_a59
1110 , p4_a60
1111 , p4_a61
1112 , p4_a62
1113 , p4_a63
1114 , p4_a64
1115 , p4_a65
1116 , p4_a66
1117 , p4_a67
1118 , p4_a68
1119 , p4_a69
1120 , p4_a70
1121 , p4_a71
1122 , p4_a72
1123 , p4_a73
1124 , p4_a74
1125 , p4_a75
1126 , p4_a76
1127 , p4_a77
1128 , p4_a78
1129 , p4_a79
1130 , p4_a80
1131 , p4_a81
1132 , p4_a82
1133 , p4_a83
1134 , p4_a84
1135 , p4_a85
1136 , p4_a86
1137 , p4_a87
1138 , p4_a88
1139 , p4_a89
1140 , p4_a90
1141 , p4_a91
1142 , p4_a92
1143 , p4_a93
1144 , p4_a94
1145 , p4_a95
1146 , p4_a96
1147 , p4_a97
1148 , p4_a98
1149 , p4_a99
1150 , p4_a100
1151 , p4_a101
1152 , p4_a102
1153 , p4_a103
1154 , p4_a104
1155 , p4_a105
1156 , p4_a106
1157 , p4_a107
1158 , p4_a108
1159 , p4_a109
1160 , p4_a110
1161 , p4_a111
1162 , p4_a112
1163 , p4_a113
1164 , p4_a114
1165 , p4_a115
1166 , p4_a116
1167 , p4_a117
1168 , p4_a118
1169 , p4_a119
1170 , p4_a120
1171 , p4_a121
1172 , p4_a122
1173 );
1174
1175 ddp_txn_rec.transaction_id := rosetta_g_miss_num_map(p5_a0);
1176 ddp_txn_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a1);
1177 ddp_txn_rec.source_transaction_date := rosetta_g_miss_date_in_map(p5_a2);
1178 ddp_txn_rec.transaction_type_id := rosetta_g_miss_num_map(p5_a3);
1179 ddp_txn_rec.txn_sub_type_id := rosetta_g_miss_num_map(p5_a4);
1180 ddp_txn_rec.source_group_ref_id := rosetta_g_miss_num_map(p5_a5);
1181 ddp_txn_rec.source_group_ref := p5_a6;
1182 ddp_txn_rec.source_header_ref_id := rosetta_g_miss_num_map(p5_a7);
1183 ddp_txn_rec.source_header_ref := p5_a8;
1184 ddp_txn_rec.source_line_ref_id := rosetta_g_miss_num_map(p5_a9);
1185 ddp_txn_rec.source_line_ref := p5_a10;
1186 ddp_txn_rec.source_dist_ref_id1 := rosetta_g_miss_num_map(p5_a11);
1187 ddp_txn_rec.source_dist_ref_id2 := rosetta_g_miss_num_map(p5_a12);
1188 ddp_txn_rec.inv_material_transaction_id := rosetta_g_miss_num_map(p5_a13);
1189 ddp_txn_rec.transaction_quantity := rosetta_g_miss_num_map(p5_a14);
1190 ddp_txn_rec.transaction_uom_code := p5_a15;
1191 ddp_txn_rec.transacted_by := rosetta_g_miss_num_map(p5_a16);
1192 ddp_txn_rec.transaction_status_code := p5_a17;
1193 ddp_txn_rec.transaction_action_code := p5_a18;
1194 ddp_txn_rec.message_id := rosetta_g_miss_num_map(p5_a19);
1195 ddp_txn_rec.context := p5_a20;
1196 ddp_txn_rec.attribute1 := p5_a21;
1197 ddp_txn_rec.attribute2 := p5_a22;
1198 ddp_txn_rec.attribute3 := p5_a23;
1199 ddp_txn_rec.attribute4 := p5_a24;
1200 ddp_txn_rec.attribute5 := p5_a25;
1201 ddp_txn_rec.attribute6 := p5_a26;
1202 ddp_txn_rec.attribute7 := p5_a27;
1203 ddp_txn_rec.attribute8 := p5_a28;
1204 ddp_txn_rec.attribute9 := p5_a29;
1205 ddp_txn_rec.attribute10 := p5_a30;
1206 ddp_txn_rec.attribute11 := p5_a31;
1207 ddp_txn_rec.attribute12 := p5_a32;
1208 ddp_txn_rec.attribute13 := p5_a33;
1209 ddp_txn_rec.attribute14 := p5_a34;
1210 ddp_txn_rec.attribute15 := p5_a35;
1211 ddp_txn_rec.object_version_number := rosetta_g_miss_num_map(p5_a36);
1212 ddp_txn_rec.split_reason_code := p5_a37;
1213 ddp_txn_rec.src_txn_creation_date := rosetta_g_miss_date_in_map(p5_a38);
1214 ddp_txn_rec.gl_interface_status_code := rosetta_g_miss_num_map(p5_a39);
1215
1216
1217
1218
1219 -- here's the delegated call to the old PL/SQL routine
1220 csi_pricing_attribs_pub.update_pricing_attribs(p_api_version,
1221 p_commit,
1222 p_init_msg_list,
1223 p_validation_level,
1224 ddp_pricing_attribs_tbl,
1225 ddp_txn_rec,
1226 x_return_status,
1227 x_msg_count,
1228 x_msg_data);
1229
1230 -- copy data back from the local variables to OUT or IN-OUT args, if any
1231
1232
1233
1234
1235
1236 p5_a0 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_id);
1237 p5_a1 := ddp_txn_rec.transaction_date;
1238 p5_a2 := ddp_txn_rec.source_transaction_date;
1239 p5_a3 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_type_id);
1243 p5_a7 := rosetta_g_miss_num_map(ddp_txn_rec.source_header_ref_id);
1240 p5_a4 := rosetta_g_miss_num_map(ddp_txn_rec.txn_sub_type_id);
1241 p5_a5 := rosetta_g_miss_num_map(ddp_txn_rec.source_group_ref_id);
1242 p5_a6 := ddp_txn_rec.source_group_ref;
1244 p5_a8 := ddp_txn_rec.source_header_ref;
1245 p5_a9 := rosetta_g_miss_num_map(ddp_txn_rec.source_line_ref_id);
1246 p5_a10 := ddp_txn_rec.source_line_ref;
1247 p5_a11 := rosetta_g_miss_num_map(ddp_txn_rec.source_dist_ref_id1);
1248 p5_a12 := rosetta_g_miss_num_map(ddp_txn_rec.source_dist_ref_id2);
1249 p5_a13 := rosetta_g_miss_num_map(ddp_txn_rec.inv_material_transaction_id);
1250 p5_a14 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_quantity);
1251 p5_a15 := ddp_txn_rec.transaction_uom_code;
1252 p5_a16 := rosetta_g_miss_num_map(ddp_txn_rec.transacted_by);
1253 p5_a17 := ddp_txn_rec.transaction_status_code;
1254 p5_a18 := ddp_txn_rec.transaction_action_code;
1255 p5_a19 := rosetta_g_miss_num_map(ddp_txn_rec.message_id);
1256 p5_a20 := ddp_txn_rec.context;
1257 p5_a21 := ddp_txn_rec.attribute1;
1258 p5_a22 := ddp_txn_rec.attribute2;
1259 p5_a23 := ddp_txn_rec.attribute3;
1260 p5_a24 := ddp_txn_rec.attribute4;
1261 p5_a25 := ddp_txn_rec.attribute5;
1262 p5_a26 := ddp_txn_rec.attribute6;
1263 p5_a27 := ddp_txn_rec.attribute7;
1264 p5_a28 := ddp_txn_rec.attribute8;
1265 p5_a29 := ddp_txn_rec.attribute9;
1266 p5_a30 := ddp_txn_rec.attribute10;
1267 p5_a31 := ddp_txn_rec.attribute11;
1268 p5_a32 := ddp_txn_rec.attribute12;
1269 p5_a33 := ddp_txn_rec.attribute13;
1270 p5_a34 := ddp_txn_rec.attribute14;
1271 p5_a35 := ddp_txn_rec.attribute15;
1272 p5_a36 := rosetta_g_miss_num_map(ddp_txn_rec.object_version_number);
1273 p5_a37 := ddp_txn_rec.split_reason_code;
1274 p5_a38 := ddp_txn_rec.src_txn_creation_date;
1275 p5_a39 := rosetta_g_miss_num_map(ddp_txn_rec.gl_interface_status_code);
1276
1277
1278
1279 end;
1280
1281 procedure expire_pricing_attribs(p_api_version NUMBER
1282 , p_commit VARCHAR2
1283 , p_init_msg_list VARCHAR2
1284 , p_validation_level NUMBER
1285 , p4_a0 JTF_NUMBER_TABLE
1286 , p4_a1 JTF_NUMBER_TABLE
1287 , p4_a2 JTF_DATE_TABLE
1288 , p4_a3 JTF_DATE_TABLE
1289 , p4_a4 JTF_VARCHAR2_TABLE_100
1290 , p4_a5 JTF_VARCHAR2_TABLE_200
1291 , p4_a6 JTF_VARCHAR2_TABLE_200
1292 , p4_a7 JTF_VARCHAR2_TABLE_200
1293 , p4_a8 JTF_VARCHAR2_TABLE_200
1294 , p4_a9 JTF_VARCHAR2_TABLE_200
1295 , p4_a10 JTF_VARCHAR2_TABLE_200
1296 , p4_a11 JTF_VARCHAR2_TABLE_200
1297 , p4_a12 JTF_VARCHAR2_TABLE_200
1298 , p4_a13 JTF_VARCHAR2_TABLE_200
1299 , p4_a14 JTF_VARCHAR2_TABLE_200
1300 , p4_a15 JTF_VARCHAR2_TABLE_200
1301 , p4_a16 JTF_VARCHAR2_TABLE_200
1302 , p4_a17 JTF_VARCHAR2_TABLE_200
1303 , p4_a18 JTF_VARCHAR2_TABLE_200
1304 , p4_a19 JTF_VARCHAR2_TABLE_200
1305 , p4_a20 JTF_VARCHAR2_TABLE_200
1306 , p4_a21 JTF_VARCHAR2_TABLE_200
1307 , p4_a22 JTF_VARCHAR2_TABLE_200
1308 , p4_a23 JTF_VARCHAR2_TABLE_200
1309 , p4_a24 JTF_VARCHAR2_TABLE_300
1310 , p4_a25 JTF_VARCHAR2_TABLE_200
1311 , p4_a26 JTF_VARCHAR2_TABLE_200
1312 , p4_a27 JTF_VARCHAR2_TABLE_200
1313 , p4_a28 JTF_VARCHAR2_TABLE_200
1314 , p4_a29 JTF_VARCHAR2_TABLE_200
1315 , p4_a30 JTF_VARCHAR2_TABLE_200
1316 , p4_a31 JTF_VARCHAR2_TABLE_200
1317 , p4_a32 JTF_VARCHAR2_TABLE_200
1318 , p4_a33 JTF_VARCHAR2_TABLE_200
1319 , p4_a34 JTF_VARCHAR2_TABLE_200
1320 , p4_a35 JTF_VARCHAR2_TABLE_200
1321 , p4_a36 JTF_VARCHAR2_TABLE_200
1322 , p4_a37 JTF_VARCHAR2_TABLE_200
1323 , p4_a38 JTF_VARCHAR2_TABLE_200
1324 , p4_a39 JTF_VARCHAR2_TABLE_200
1325 , p4_a40 JTF_VARCHAR2_TABLE_200
1326 , p4_a41 JTF_VARCHAR2_TABLE_200
1327 , p4_a42 JTF_VARCHAR2_TABLE_200
1328 , p4_a43 JTF_VARCHAR2_TABLE_200
1329 , p4_a44 JTF_VARCHAR2_TABLE_200
1330 , p4_a45 JTF_VARCHAR2_TABLE_200
1331 , p4_a46 JTF_VARCHAR2_TABLE_200
1332 , p4_a47 JTF_VARCHAR2_TABLE_200
1333 , p4_a48 JTF_VARCHAR2_TABLE_200
1334 , p4_a49 JTF_VARCHAR2_TABLE_200
1335 , p4_a50 JTF_VARCHAR2_TABLE_200
1336 , p4_a51 JTF_VARCHAR2_TABLE_200
1337 , p4_a52 JTF_VARCHAR2_TABLE_200
1338 , p4_a53 JTF_VARCHAR2_TABLE_200
1339 , p4_a54 JTF_VARCHAR2_TABLE_200
1340 , p4_a55 JTF_VARCHAR2_TABLE_200
1341 , p4_a56 JTF_VARCHAR2_TABLE_200
1342 , p4_a57 JTF_VARCHAR2_TABLE_200
1343 , p4_a58 JTF_VARCHAR2_TABLE_200
1344 , p4_a59 JTF_VARCHAR2_TABLE_200
1345 , p4_a60 JTF_VARCHAR2_TABLE_200
1346 , p4_a61 JTF_VARCHAR2_TABLE_200
1347 , p4_a62 JTF_VARCHAR2_TABLE_200
1348 , p4_a63 JTF_VARCHAR2_TABLE_200
1349 , p4_a64 JTF_VARCHAR2_TABLE_200
1350 , p4_a65 JTF_VARCHAR2_TABLE_200
1351 , p4_a66 JTF_VARCHAR2_TABLE_200
1352 , p4_a67 JTF_VARCHAR2_TABLE_200
1353 , p4_a68 JTF_VARCHAR2_TABLE_200
1354 , p4_a69 JTF_VARCHAR2_TABLE_200
1355 , p4_a70 JTF_VARCHAR2_TABLE_200
1356 , p4_a71 JTF_VARCHAR2_TABLE_200
1357 , p4_a72 JTF_VARCHAR2_TABLE_200
1358 , p4_a73 JTF_VARCHAR2_TABLE_200
1359 , p4_a74 JTF_VARCHAR2_TABLE_200
1360 , p4_a75 JTF_VARCHAR2_TABLE_200
1361 , p4_a76 JTF_VARCHAR2_TABLE_200
1362 , p4_a77 JTF_VARCHAR2_TABLE_200
1363 , p4_a78 JTF_VARCHAR2_TABLE_200
1364 , p4_a79 JTF_VARCHAR2_TABLE_200
1365 , p4_a80 JTF_VARCHAR2_TABLE_200
1366 , p4_a81 JTF_VARCHAR2_TABLE_200
1367 , p4_a82 JTF_VARCHAR2_TABLE_200
1368 , p4_a83 JTF_VARCHAR2_TABLE_200
1369 , p4_a84 JTF_VARCHAR2_TABLE_200
1370 , p4_a85 JTF_VARCHAR2_TABLE_200
1371 , p4_a86 JTF_VARCHAR2_TABLE_200
1372 , p4_a87 JTF_VARCHAR2_TABLE_200
1373 , p4_a88 JTF_VARCHAR2_TABLE_200
1374 , p4_a89 JTF_VARCHAR2_TABLE_200
1375 , p4_a90 JTF_VARCHAR2_TABLE_200
1379 , p4_a94 JTF_VARCHAR2_TABLE_200
1376 , p4_a91 JTF_VARCHAR2_TABLE_200
1377 , p4_a92 JTF_VARCHAR2_TABLE_200
1378 , p4_a93 JTF_VARCHAR2_TABLE_200
1380 , p4_a95 JTF_VARCHAR2_TABLE_200
1381 , p4_a96 JTF_VARCHAR2_TABLE_200
1382 , p4_a97 JTF_VARCHAR2_TABLE_200
1383 , p4_a98 JTF_VARCHAR2_TABLE_200
1384 , p4_a99 JTF_VARCHAR2_TABLE_200
1385 , p4_a100 JTF_VARCHAR2_TABLE_200
1386 , p4_a101 JTF_VARCHAR2_TABLE_200
1387 , p4_a102 JTF_VARCHAR2_TABLE_200
1388 , p4_a103 JTF_VARCHAR2_TABLE_200
1389 , p4_a104 JTF_VARCHAR2_TABLE_200
1390 , p4_a105 JTF_VARCHAR2_TABLE_100
1391 , p4_a106 JTF_VARCHAR2_TABLE_200
1392 , p4_a107 JTF_VARCHAR2_TABLE_200
1393 , p4_a108 JTF_VARCHAR2_TABLE_200
1394 , p4_a109 JTF_VARCHAR2_TABLE_200
1395 , p4_a110 JTF_VARCHAR2_TABLE_200
1396 , p4_a111 JTF_VARCHAR2_TABLE_200
1397 , p4_a112 JTF_VARCHAR2_TABLE_200
1398 , p4_a113 JTF_VARCHAR2_TABLE_200
1399 , p4_a114 JTF_VARCHAR2_TABLE_200
1400 , p4_a115 JTF_VARCHAR2_TABLE_200
1401 , p4_a116 JTF_VARCHAR2_TABLE_200
1402 , p4_a117 JTF_VARCHAR2_TABLE_200
1403 , p4_a118 JTF_VARCHAR2_TABLE_200
1404 , p4_a119 JTF_VARCHAR2_TABLE_200
1405 , p4_a120 JTF_VARCHAR2_TABLE_200
1406 , p4_a121 JTF_NUMBER_TABLE
1407 , p4_a122 JTF_NUMBER_TABLE
1408 , p5_a0 in out nocopy NUMBER
1409 , p5_a1 in out nocopy DATE
1410 , p5_a2 in out nocopy DATE
1411 , p5_a3 in out nocopy NUMBER
1412 , p5_a4 in out nocopy NUMBER
1413 , p5_a5 in out nocopy NUMBER
1414 , p5_a6 in out nocopy VARCHAR2
1415 , p5_a7 in out nocopy NUMBER
1416 , p5_a8 in out nocopy VARCHAR2
1417 , p5_a9 in out nocopy NUMBER
1418 , p5_a10 in out nocopy VARCHAR2
1419 , p5_a11 in out nocopy NUMBER
1420 , p5_a12 in out nocopy NUMBER
1421 , p5_a13 in out nocopy NUMBER
1422 , p5_a14 in out nocopy NUMBER
1423 , p5_a15 in out nocopy VARCHAR2
1424 , p5_a16 in out nocopy NUMBER
1425 , p5_a17 in out nocopy VARCHAR2
1426 , p5_a18 in out nocopy VARCHAR2
1427 , p5_a19 in out nocopy NUMBER
1428 , p5_a20 in out nocopy VARCHAR2
1429 , p5_a21 in out nocopy VARCHAR2
1430 , p5_a22 in out nocopy VARCHAR2
1431 , p5_a23 in out nocopy VARCHAR2
1432 , p5_a24 in out nocopy VARCHAR2
1433 , p5_a25 in out nocopy VARCHAR2
1434 , p5_a26 in out nocopy VARCHAR2
1435 , p5_a27 in out nocopy VARCHAR2
1436 , p5_a28 in out nocopy VARCHAR2
1437 , p5_a29 in out nocopy VARCHAR2
1438 , p5_a30 in out nocopy VARCHAR2
1439 , p5_a31 in out nocopy VARCHAR2
1440 , p5_a32 in out nocopy VARCHAR2
1441 , p5_a33 in out nocopy VARCHAR2
1442 , p5_a34 in out nocopy VARCHAR2
1443 , p5_a35 in out nocopy VARCHAR2
1444 , p5_a36 in out nocopy NUMBER
1445 , p5_a37 in out nocopy VARCHAR2
1446 , p5_a38 in out nocopy DATE
1447 , p5_a39 in out nocopy NUMBER
1448 , x_return_status out nocopy VARCHAR2
1449 , x_msg_count out nocopy NUMBER
1450 , x_msg_data out nocopy VARCHAR2
1451 )
1452
1453 as
1454 ddp_pricing_attribs_tbl csi_datastructures_pub.pricing_attribs_tbl;
1455 ddp_txn_rec csi_datastructures_pub.transaction_rec;
1456 ddindx binary_integer; indx binary_integer;
1457 begin
1458
1459 -- copy data to the local IN or IN-OUT args, if any
1460
1461
1462
1463
1464 csi_datastructures_pub_w.rosetta_table_copy_in_p46(ddp_pricing_attribs_tbl, p4_a0
1465 , p4_a1
1466 , p4_a2
1467 , p4_a3
1468 , p4_a4
1469 , p4_a5
1470 , p4_a6
1471 , p4_a7
1472 , p4_a8
1473 , p4_a9
1474 , p4_a10
1475 , p4_a11
1476 , p4_a12
1477 , p4_a13
1478 , p4_a14
1479 , p4_a15
1480 , p4_a16
1481 , p4_a17
1482 , p4_a18
1483 , p4_a19
1484 , p4_a20
1485 , p4_a21
1486 , p4_a22
1487 , p4_a23
1488 , p4_a24
1489 , p4_a25
1490 , p4_a26
1491 , p4_a27
1492 , p4_a28
1493 , p4_a29
1494 , p4_a30
1495 , p4_a31
1496 , p4_a32
1497 , p4_a33
1498 , p4_a34
1499 , p4_a35
1500 , p4_a36
1501 , p4_a37
1502 , p4_a38
1503 , p4_a39
1504 , p4_a40
1505 , p4_a41
1506 , p4_a42
1507 , p4_a43
1508 , p4_a44
1509 , p4_a45
1510 , p4_a46
1511 , p4_a47
1512 , p4_a48
1513 , p4_a49
1514 , p4_a50
1515 , p4_a51
1516 , p4_a52
1517 , p4_a53
1518 , p4_a54
1519 , p4_a55
1520 , p4_a56
1521 , p4_a57
1522 , p4_a58
1523 , p4_a59
1524 , p4_a60
1525 , p4_a61
1526 , p4_a62
1527 , p4_a63
1528 , p4_a64
1529 , p4_a65
1530 , p4_a66
1531 , p4_a67
1532 , p4_a68
1533 , p4_a69
1534 , p4_a70
1535 , p4_a71
1536 , p4_a72
1537 , p4_a73
1538 , p4_a74
1539 , p4_a75
1540 , p4_a76
1541 , p4_a77
1542 , p4_a78
1543 , p4_a79
1544 , p4_a80
1545 , p4_a81
1546 , p4_a82
1547 , p4_a83
1548 , p4_a84
1549 , p4_a85
1550 , p4_a86
1551 , p4_a87
1552 , p4_a88
1553 , p4_a89
1554 , p4_a90
1555 , p4_a91
1556 , p4_a92
1557 , p4_a93
1558 , p4_a94
1559 , p4_a95
1560 , p4_a96
1561 , p4_a97
1565 , p4_a101
1562 , p4_a98
1563 , p4_a99
1564 , p4_a100
1566 , p4_a102
1567 , p4_a103
1568 , p4_a104
1569 , p4_a105
1570 , p4_a106
1571 , p4_a107
1572 , p4_a108
1573 , p4_a109
1574 , p4_a110
1575 , p4_a111
1576 , p4_a112
1577 , p4_a113
1578 , p4_a114
1579 , p4_a115
1580 , p4_a116
1581 , p4_a117
1582 , p4_a118
1583 , p4_a119
1584 , p4_a120
1585 , p4_a121
1586 , p4_a122
1587 );
1588
1589 ddp_txn_rec.transaction_id := rosetta_g_miss_num_map(p5_a0);
1590 ddp_txn_rec.transaction_date := rosetta_g_miss_date_in_map(p5_a1);
1591 ddp_txn_rec.source_transaction_date := rosetta_g_miss_date_in_map(p5_a2);
1592 ddp_txn_rec.transaction_type_id := rosetta_g_miss_num_map(p5_a3);
1593 ddp_txn_rec.txn_sub_type_id := rosetta_g_miss_num_map(p5_a4);
1594 ddp_txn_rec.source_group_ref_id := rosetta_g_miss_num_map(p5_a5);
1595 ddp_txn_rec.source_group_ref := p5_a6;
1596 ddp_txn_rec.source_header_ref_id := rosetta_g_miss_num_map(p5_a7);
1597 ddp_txn_rec.source_header_ref := p5_a8;
1598 ddp_txn_rec.source_line_ref_id := rosetta_g_miss_num_map(p5_a9);
1599 ddp_txn_rec.source_line_ref := p5_a10;
1600 ddp_txn_rec.source_dist_ref_id1 := rosetta_g_miss_num_map(p5_a11);
1601 ddp_txn_rec.source_dist_ref_id2 := rosetta_g_miss_num_map(p5_a12);
1602 ddp_txn_rec.inv_material_transaction_id := rosetta_g_miss_num_map(p5_a13);
1603 ddp_txn_rec.transaction_quantity := rosetta_g_miss_num_map(p5_a14);
1604 ddp_txn_rec.transaction_uom_code := p5_a15;
1605 ddp_txn_rec.transacted_by := rosetta_g_miss_num_map(p5_a16);
1606 ddp_txn_rec.transaction_status_code := p5_a17;
1607 ddp_txn_rec.transaction_action_code := p5_a18;
1608 ddp_txn_rec.message_id := rosetta_g_miss_num_map(p5_a19);
1609 ddp_txn_rec.context := p5_a20;
1610 ddp_txn_rec.attribute1 := p5_a21;
1611 ddp_txn_rec.attribute2 := p5_a22;
1612 ddp_txn_rec.attribute3 := p5_a23;
1613 ddp_txn_rec.attribute4 := p5_a24;
1614 ddp_txn_rec.attribute5 := p5_a25;
1615 ddp_txn_rec.attribute6 := p5_a26;
1616 ddp_txn_rec.attribute7 := p5_a27;
1617 ddp_txn_rec.attribute8 := p5_a28;
1618 ddp_txn_rec.attribute9 := p5_a29;
1619 ddp_txn_rec.attribute10 := p5_a30;
1620 ddp_txn_rec.attribute11 := p5_a31;
1621 ddp_txn_rec.attribute12 := p5_a32;
1622 ddp_txn_rec.attribute13 := p5_a33;
1623 ddp_txn_rec.attribute14 := p5_a34;
1624 ddp_txn_rec.attribute15 := p5_a35;
1625 ddp_txn_rec.object_version_number := rosetta_g_miss_num_map(p5_a36);
1626 ddp_txn_rec.split_reason_code := p5_a37;
1627 ddp_txn_rec.src_txn_creation_date := rosetta_g_miss_date_in_map(p5_a38);
1628 ddp_txn_rec.gl_interface_status_code := rosetta_g_miss_num_map(p5_a39);
1629
1630
1631
1632
1633 -- here's the delegated call to the old PL/SQL routine
1634 csi_pricing_attribs_pub.expire_pricing_attribs(p_api_version,
1635 p_commit,
1636 p_init_msg_list,
1637 p_validation_level,
1638 ddp_pricing_attribs_tbl,
1639 ddp_txn_rec,
1640 x_return_status,
1641 x_msg_count,
1642 x_msg_data);
1643
1644 -- copy data back from the local variables to OUT or IN-OUT args, if any
1645
1646
1647
1648
1649
1650 p5_a0 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_id);
1651 p5_a1 := ddp_txn_rec.transaction_date;
1652 p5_a2 := ddp_txn_rec.source_transaction_date;
1653 p5_a3 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_type_id);
1654 p5_a4 := rosetta_g_miss_num_map(ddp_txn_rec.txn_sub_type_id);
1655 p5_a5 := rosetta_g_miss_num_map(ddp_txn_rec.source_group_ref_id);
1656 p5_a6 := ddp_txn_rec.source_group_ref;
1657 p5_a7 := rosetta_g_miss_num_map(ddp_txn_rec.source_header_ref_id);
1658 p5_a8 := ddp_txn_rec.source_header_ref;
1659 p5_a9 := rosetta_g_miss_num_map(ddp_txn_rec.source_line_ref_id);
1660 p5_a10 := ddp_txn_rec.source_line_ref;
1661 p5_a11 := rosetta_g_miss_num_map(ddp_txn_rec.source_dist_ref_id1);
1662 p5_a12 := rosetta_g_miss_num_map(ddp_txn_rec.source_dist_ref_id2);
1663 p5_a13 := rosetta_g_miss_num_map(ddp_txn_rec.inv_material_transaction_id);
1664 p5_a14 := rosetta_g_miss_num_map(ddp_txn_rec.transaction_quantity);
1665 p5_a15 := ddp_txn_rec.transaction_uom_code;
1666 p5_a16 := rosetta_g_miss_num_map(ddp_txn_rec.transacted_by);
1667 p5_a17 := ddp_txn_rec.transaction_status_code;
1668 p5_a18 := ddp_txn_rec.transaction_action_code;
1669 p5_a19 := rosetta_g_miss_num_map(ddp_txn_rec.message_id);
1670 p5_a20 := ddp_txn_rec.context;
1671 p5_a21 := ddp_txn_rec.attribute1;
1672 p5_a22 := ddp_txn_rec.attribute2;
1673 p5_a23 := ddp_txn_rec.attribute3;
1674 p5_a24 := ddp_txn_rec.attribute4;
1675 p5_a25 := ddp_txn_rec.attribute5;
1676 p5_a26 := ddp_txn_rec.attribute6;
1677 p5_a27 := ddp_txn_rec.attribute7;
1678 p5_a28 := ddp_txn_rec.attribute8;
1679 p5_a29 := ddp_txn_rec.attribute9;
1680 p5_a30 := ddp_txn_rec.attribute10;
1681 p5_a31 := ddp_txn_rec.attribute11;
1682 p5_a32 := ddp_txn_rec.attribute12;
1683 p5_a33 := ddp_txn_rec.attribute13;
1684 p5_a34 := ddp_txn_rec.attribute14;
1685 p5_a35 := ddp_txn_rec.attribute15;
1686 p5_a36 := rosetta_g_miss_num_map(ddp_txn_rec.object_version_number);
1687 p5_a37 := ddp_txn_rec.split_reason_code;
1688 p5_a38 := ddp_txn_rec.src_txn_creation_date;
1689 p5_a39 := rosetta_g_miss_num_map(ddp_txn_rec.gl_interface_status_code);
1690
1691
1692
1693 end;
1694
1695 end csi_pricing_attribs_pub_w;