[Home] [Help]
PACKAGE BODY: APPS.OZF_ACTFORECAST_PVT_W
Source
1 package body ozf_actforecast_pvt_w as
2 /* $Header: ozfwfctb.pls 120.2 2005/07/29 02:55:56 appldev 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
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 procedure create_actforecast(p_api_version NUMBER
14 , p_init_msg_list VARCHAR2
15 , p_commit VARCHAR2
16 , p_validation_level NUMBER
17 , x_return_status out nocopy VARCHAR2
18 , x_msg_count out nocopy NUMBER
19 , x_msg_data out nocopy VARCHAR2
20 , p7_a0 NUMBER
21 , p7_a1 VARCHAR2
22 , p7_a2 VARCHAR2
23 , p7_a3 NUMBER
24 , p7_a4 DATE
25 , p7_a5 VARCHAR2
26 , p7_a6 NUMBER
27 , p7_a7 DATE
28 , p7_a8 NUMBER
29 , p7_a9 NUMBER
30 , p7_a10 NUMBER
31 , p7_a11 NUMBER
32 , p7_a12 DATE
33 , p7_a13 NUMBER
34 , p7_a14 NUMBER
35 , p7_a15 VARCHAR2
36 , p7_a16 VARCHAR2
37 , p7_a17 VARCHAR2
38 , p7_a18 VARCHAR2
39 , p7_a19 VARCHAR2
40 , p7_a20 NUMBER
41 , p7_a21 DATE
42 , p7_a22 VARCHAR2
43 , p7_a23 NUMBER
44 , p7_a24 NUMBER
45 , p7_a25 VARCHAR2
46 , p7_a26 VARCHAR2
47 , p7_a27 NUMBER
48 , p7_a28 VARCHAR2
49 , p7_a29 VARCHAR2
50 , p7_a30 VARCHAR2
51 , p7_a31 VARCHAR2
52 , p7_a32 VARCHAR2
53 , p7_a33 VARCHAR2
54 , p7_a34 VARCHAR2
55 , p7_a35 VARCHAR2
56 , p7_a36 VARCHAR2
57 , p7_a37 VARCHAR2
58 , p7_a38 VARCHAR2
59 , p7_a39 VARCHAR2
60 , p7_a40 VARCHAR2
61 , p7_a41 VARCHAR2
62 , p7_a42 VARCHAR2
63 , p7_a43 VARCHAR2
64 , p7_a44 VARCHAR2
65 , p7_a45 NUMBER
66 , p7_a46 NUMBER
67 , p7_a47 NUMBER
68 , p7_a48 VARCHAR2
69 , p7_a49 VARCHAR2
70 , p7_a50 VARCHAR2
71 , p7_a51 VARCHAR2
72 , p7_a52 VARCHAR2
73 , p7_a53 NUMBER
74 , p7_a54 VARCHAR2
75 , p7_a55 VARCHAR2
76 , p7_a56 NUMBER
77 , p7_a57 VARCHAR2
78 , p7_a58 DATE
79 , p7_a59 DATE
80 , p7_a60 VARCHAR2
81 , x_forecast_id out nocopy NUMBER
82 )
83
84 as
85 ddp_act_forecast_rec ozf_actforecast_pvt.act_forecast_rec_type;
86 ddindx binary_integer; indx binary_integer;
87 begin
88
89 -- copy data to the local IN or IN-OUT args, if any
90
91
92
93
94
95
96
97 ddp_act_forecast_rec.forecast_id := p7_a0;
98 ddp_act_forecast_rec.forecast_type := p7_a1;
99 ddp_act_forecast_rec.arc_act_fcast_used_by := p7_a2;
100 ddp_act_forecast_rec.act_fcast_used_by_id := p7_a3;
101 ddp_act_forecast_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
102 ddp_act_forecast_rec.created_from := p7_a5;
103 ddp_act_forecast_rec.created_by := p7_a6;
104 ddp_act_forecast_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a7);
105 ddp_act_forecast_rec.last_updated_by := p7_a8;
106 ddp_act_forecast_rec.last_update_login := p7_a9;
107 ddp_act_forecast_rec.program_application_id := p7_a10;
108 ddp_act_forecast_rec.program_id := p7_a11;
109 ddp_act_forecast_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a12);
110 ddp_act_forecast_rec.request_id := p7_a13;
111 ddp_act_forecast_rec.object_version_number := p7_a14;
112 ddp_act_forecast_rec.hierarchy := p7_a15;
113 ddp_act_forecast_rec.hierarchy_level := p7_a16;
114 ddp_act_forecast_rec.level_value := p7_a17;
115 ddp_act_forecast_rec.forecast_calendar := p7_a18;
116 ddp_act_forecast_rec.period_level := p7_a19;
117 ddp_act_forecast_rec.forecast_period_id := p7_a20;
118 ddp_act_forecast_rec.forecast_date := rosetta_g_miss_date_in_map(p7_a21);
119 ddp_act_forecast_rec.forecast_uom_code := p7_a22;
120 ddp_act_forecast_rec.forecast_quantity := p7_a23;
121 ddp_act_forecast_rec.forward_buy_quantity := p7_a24;
122 ddp_act_forecast_rec.forward_buy_period := p7_a25;
123 ddp_act_forecast_rec.cumulation_period_choice := p7_a26;
124 ddp_act_forecast_rec.base_quantity := p7_a27;
125 ddp_act_forecast_rec.context := p7_a28;
126 ddp_act_forecast_rec.attribute_category := p7_a29;
127 ddp_act_forecast_rec.attribute1 := p7_a30;
128 ddp_act_forecast_rec.attribute2 := p7_a31;
129 ddp_act_forecast_rec.attribute3 := p7_a32;
130 ddp_act_forecast_rec.attribute4 := p7_a33;
131 ddp_act_forecast_rec.attribute5 := p7_a34;
132 ddp_act_forecast_rec.attribute6 := p7_a35;
133 ddp_act_forecast_rec.attribute7 := p7_a36;
134 ddp_act_forecast_rec.attribute8 := p7_a37;
135 ddp_act_forecast_rec.attribute9 := p7_a38;
136 ddp_act_forecast_rec.attribute10 := p7_a39;
137 ddp_act_forecast_rec.attribute11 := p7_a40;
138 ddp_act_forecast_rec.attribute12 := p7_a41;
139 ddp_act_forecast_rec.attribute13 := p7_a42;
140 ddp_act_forecast_rec.attribute14 := p7_a43;
141 ddp_act_forecast_rec.attribute15 := p7_a44;
142 ddp_act_forecast_rec.org_id := p7_a45;
143 ddp_act_forecast_rec.forecast_remaining_quantity := p7_a46;
144 ddp_act_forecast_rec.forecast_remaining_percent := p7_a47;
145 ddp_act_forecast_rec.base_quantity_type := p7_a48;
146 ddp_act_forecast_rec.forecast_spread_type := p7_a49;
147 ddp_act_forecast_rec.dimention1 := p7_a50;
148 ddp_act_forecast_rec.dimention2 := p7_a51;
149 ddp_act_forecast_rec.dimention3 := p7_a52;
150 ddp_act_forecast_rec.last_scenario_id := p7_a53;
151 ddp_act_forecast_rec.freeze_flag := p7_a54;
152 ddp_act_forecast_rec.comments := p7_a55;
153 ddp_act_forecast_rec.price_list_id := p7_a56;
154 ddp_act_forecast_rec.base_quantity_ref := p7_a57;
155 ddp_act_forecast_rec.base_quantity_start_date := rosetta_g_miss_date_in_map(p7_a58);
156 ddp_act_forecast_rec.base_quantity_end_date := rosetta_g_miss_date_in_map(p7_a59);
157 ddp_act_forecast_rec.offer_code := p7_a60;
158
159
160 -- here's the delegated call to the old PL/SQL routine
161 ozf_actforecast_pvt.create_actforecast(p_api_version,
162 p_init_msg_list,
163 p_commit,
164 p_validation_level,
165 x_return_status,
166 x_msg_count,
167 x_msg_data,
168 ddp_act_forecast_rec,
169 x_forecast_id);
170
171 -- copy data back from the local variables to OUT or IN-OUT args, if any
172
173
174
175
176
177
178
179
180 end;
181
182 procedure update_actforecast(p_api_version NUMBER
183 , p_init_msg_list VARCHAR2
184 , p_commit VARCHAR2
185 , p_validation_level NUMBER
186 , x_return_status out nocopy VARCHAR2
187 , x_msg_count out nocopy NUMBER
188 , x_msg_data out nocopy VARCHAR2
189 , p7_a0 NUMBER
190 , p7_a1 VARCHAR2
191 , p7_a2 VARCHAR2
192 , p7_a3 NUMBER
193 , p7_a4 DATE
194 , p7_a5 VARCHAR2
195 , p7_a6 NUMBER
196 , p7_a7 DATE
197 , p7_a8 NUMBER
198 , p7_a9 NUMBER
199 , p7_a10 NUMBER
200 , p7_a11 NUMBER
201 , p7_a12 DATE
202 , p7_a13 NUMBER
203 , p7_a14 NUMBER
204 , p7_a15 VARCHAR2
205 , p7_a16 VARCHAR2
206 , p7_a17 VARCHAR2
207 , p7_a18 VARCHAR2
208 , p7_a19 VARCHAR2
209 , p7_a20 NUMBER
210 , p7_a21 DATE
211 , p7_a22 VARCHAR2
212 , p7_a23 NUMBER
213 , p7_a24 NUMBER
214 , p7_a25 VARCHAR2
215 , p7_a26 VARCHAR2
216 , p7_a27 NUMBER
217 , p7_a28 VARCHAR2
218 , p7_a29 VARCHAR2
219 , p7_a30 VARCHAR2
220 , p7_a31 VARCHAR2
221 , p7_a32 VARCHAR2
222 , p7_a33 VARCHAR2
223 , p7_a34 VARCHAR2
224 , p7_a35 VARCHAR2
225 , p7_a36 VARCHAR2
226 , p7_a37 VARCHAR2
227 , p7_a38 VARCHAR2
228 , p7_a39 VARCHAR2
229 , p7_a40 VARCHAR2
230 , p7_a41 VARCHAR2
231 , p7_a42 VARCHAR2
232 , p7_a43 VARCHAR2
233 , p7_a44 VARCHAR2
234 , p7_a45 NUMBER
235 , p7_a46 NUMBER
236 , p7_a47 NUMBER
237 , p7_a48 VARCHAR2
238 , p7_a49 VARCHAR2
239 , p7_a50 VARCHAR2
240 , p7_a51 VARCHAR2
241 , p7_a52 VARCHAR2
242 , p7_a53 NUMBER
243 , p7_a54 VARCHAR2
244 , p7_a55 VARCHAR2
245 , p7_a56 NUMBER
246 , p7_a57 VARCHAR2
247 , p7_a58 DATE
248 , p7_a59 DATE
249 , p7_a60 VARCHAR2
250 )
251
252 as
253 ddp_act_forecast_rec ozf_actforecast_pvt.act_forecast_rec_type;
254 ddindx binary_integer; indx binary_integer;
255 begin
256
257 -- copy data to the local IN or IN-OUT args, if any
258
259
260
261
262
263
264
265 ddp_act_forecast_rec.forecast_id := p7_a0;
266 ddp_act_forecast_rec.forecast_type := p7_a1;
267 ddp_act_forecast_rec.arc_act_fcast_used_by := p7_a2;
268 ddp_act_forecast_rec.act_fcast_used_by_id := p7_a3;
269 ddp_act_forecast_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
270 ddp_act_forecast_rec.created_from := p7_a5;
271 ddp_act_forecast_rec.created_by := p7_a6;
272 ddp_act_forecast_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a7);
273 ddp_act_forecast_rec.last_updated_by := p7_a8;
274 ddp_act_forecast_rec.last_update_login := p7_a9;
275 ddp_act_forecast_rec.program_application_id := p7_a10;
276 ddp_act_forecast_rec.program_id := p7_a11;
277 ddp_act_forecast_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a12);
278 ddp_act_forecast_rec.request_id := p7_a13;
279 ddp_act_forecast_rec.object_version_number := p7_a14;
280 ddp_act_forecast_rec.hierarchy := p7_a15;
281 ddp_act_forecast_rec.hierarchy_level := p7_a16;
282 ddp_act_forecast_rec.level_value := p7_a17;
283 ddp_act_forecast_rec.forecast_calendar := p7_a18;
284 ddp_act_forecast_rec.period_level := p7_a19;
285 ddp_act_forecast_rec.forecast_period_id := p7_a20;
286 ddp_act_forecast_rec.forecast_date := rosetta_g_miss_date_in_map(p7_a21);
287 ddp_act_forecast_rec.forecast_uom_code := p7_a22;
288 ddp_act_forecast_rec.forecast_quantity := p7_a23;
289 ddp_act_forecast_rec.forward_buy_quantity := p7_a24;
290 ddp_act_forecast_rec.forward_buy_period := p7_a25;
291 ddp_act_forecast_rec.cumulation_period_choice := p7_a26;
292 ddp_act_forecast_rec.base_quantity := p7_a27;
293 ddp_act_forecast_rec.context := p7_a28;
294 ddp_act_forecast_rec.attribute_category := p7_a29;
295 ddp_act_forecast_rec.attribute1 := p7_a30;
296 ddp_act_forecast_rec.attribute2 := p7_a31;
297 ddp_act_forecast_rec.attribute3 := p7_a32;
298 ddp_act_forecast_rec.attribute4 := p7_a33;
299 ddp_act_forecast_rec.attribute5 := p7_a34;
300 ddp_act_forecast_rec.attribute6 := p7_a35;
301 ddp_act_forecast_rec.attribute7 := p7_a36;
302 ddp_act_forecast_rec.attribute8 := p7_a37;
303 ddp_act_forecast_rec.attribute9 := p7_a38;
304 ddp_act_forecast_rec.attribute10 := p7_a39;
305 ddp_act_forecast_rec.attribute11 := p7_a40;
306 ddp_act_forecast_rec.attribute12 := p7_a41;
307 ddp_act_forecast_rec.attribute13 := p7_a42;
308 ddp_act_forecast_rec.attribute14 := p7_a43;
309 ddp_act_forecast_rec.attribute15 := p7_a44;
310 ddp_act_forecast_rec.org_id := p7_a45;
311 ddp_act_forecast_rec.forecast_remaining_quantity := p7_a46;
312 ddp_act_forecast_rec.forecast_remaining_percent := p7_a47;
313 ddp_act_forecast_rec.base_quantity_type := p7_a48;
314 ddp_act_forecast_rec.forecast_spread_type := p7_a49;
315 ddp_act_forecast_rec.dimention1 := p7_a50;
316 ddp_act_forecast_rec.dimention2 := p7_a51;
317 ddp_act_forecast_rec.dimention3 := p7_a52;
318 ddp_act_forecast_rec.last_scenario_id := p7_a53;
319 ddp_act_forecast_rec.freeze_flag := p7_a54;
320 ddp_act_forecast_rec.comments := p7_a55;
321 ddp_act_forecast_rec.price_list_id := p7_a56;
322 ddp_act_forecast_rec.base_quantity_ref := p7_a57;
323 ddp_act_forecast_rec.base_quantity_start_date := rosetta_g_miss_date_in_map(p7_a58);
324 ddp_act_forecast_rec.base_quantity_end_date := rosetta_g_miss_date_in_map(p7_a59);
325 ddp_act_forecast_rec.offer_code := p7_a60;
326
327 -- here's the delegated call to the old PL/SQL routine
328 ozf_actforecast_pvt.update_actforecast(p_api_version,
329 p_init_msg_list,
330 p_commit,
331 p_validation_level,
332 x_return_status,
333 x_msg_count,
334 x_msg_data,
335 ddp_act_forecast_rec);
336
337 -- copy data back from the local variables to OUT or IN-OUT args, if any
338
339
340
341
342
343
344
345 end;
346
347 procedure validate_actforecast(p_api_version NUMBER
348 , p_init_msg_list VARCHAR2
349 , p_validation_level NUMBER
350 , x_return_status out nocopy VARCHAR2
351 , x_msg_count out nocopy NUMBER
352 , x_msg_data out nocopy VARCHAR2
353 , p6_a0 NUMBER
354 , p6_a1 VARCHAR2
355 , p6_a2 VARCHAR2
356 , p6_a3 NUMBER
357 , p6_a4 DATE
358 , p6_a5 VARCHAR2
359 , p6_a6 NUMBER
360 , p6_a7 DATE
361 , p6_a8 NUMBER
362 , p6_a9 NUMBER
363 , p6_a10 NUMBER
364 , p6_a11 NUMBER
365 , p6_a12 DATE
366 , p6_a13 NUMBER
367 , p6_a14 NUMBER
368 , p6_a15 VARCHAR2
369 , p6_a16 VARCHAR2
370 , p6_a17 VARCHAR2
371 , p6_a18 VARCHAR2
372 , p6_a19 VARCHAR2
373 , p6_a20 NUMBER
374 , p6_a21 DATE
375 , p6_a22 VARCHAR2
376 , p6_a23 NUMBER
377 , p6_a24 NUMBER
378 , p6_a25 VARCHAR2
379 , p6_a26 VARCHAR2
380 , p6_a27 NUMBER
381 , p6_a28 VARCHAR2
382 , p6_a29 VARCHAR2
383 , p6_a30 VARCHAR2
384 , p6_a31 VARCHAR2
385 , p6_a32 VARCHAR2
386 , p6_a33 VARCHAR2
387 , p6_a34 VARCHAR2
388 , p6_a35 VARCHAR2
389 , p6_a36 VARCHAR2
390 , p6_a37 VARCHAR2
391 , p6_a38 VARCHAR2
392 , p6_a39 VARCHAR2
393 , p6_a40 VARCHAR2
394 , p6_a41 VARCHAR2
395 , p6_a42 VARCHAR2
396 , p6_a43 VARCHAR2
397 , p6_a44 VARCHAR2
398 , p6_a45 NUMBER
399 , p6_a46 NUMBER
400 , p6_a47 NUMBER
401 , p6_a48 VARCHAR2
402 , p6_a49 VARCHAR2
403 , p6_a50 VARCHAR2
404 , p6_a51 VARCHAR2
405 , p6_a52 VARCHAR2
406 , p6_a53 NUMBER
407 , p6_a54 VARCHAR2
408 , p6_a55 VARCHAR2
409 , p6_a56 NUMBER
410 , p6_a57 VARCHAR2
411 , p6_a58 DATE
412 , p6_a59 DATE
413 , p6_a60 VARCHAR2
414 )
415
416 as
417 ddp_act_forecast_rec ozf_actforecast_pvt.act_forecast_rec_type;
418 ddindx binary_integer; indx binary_integer;
419 begin
420
421 -- copy data to the local IN or IN-OUT args, if any
422
423
424
425
426
427
428 ddp_act_forecast_rec.forecast_id := p6_a0;
429 ddp_act_forecast_rec.forecast_type := p6_a1;
430 ddp_act_forecast_rec.arc_act_fcast_used_by := p6_a2;
431 ddp_act_forecast_rec.act_fcast_used_by_id := p6_a3;
432 ddp_act_forecast_rec.creation_date := rosetta_g_miss_date_in_map(p6_a4);
433 ddp_act_forecast_rec.created_from := p6_a5;
434 ddp_act_forecast_rec.created_by := p6_a6;
435 ddp_act_forecast_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a7);
436 ddp_act_forecast_rec.last_updated_by := p6_a8;
437 ddp_act_forecast_rec.last_update_login := p6_a9;
438 ddp_act_forecast_rec.program_application_id := p6_a10;
439 ddp_act_forecast_rec.program_id := p6_a11;
440 ddp_act_forecast_rec.program_update_date := rosetta_g_miss_date_in_map(p6_a12);
441 ddp_act_forecast_rec.request_id := p6_a13;
442 ddp_act_forecast_rec.object_version_number := p6_a14;
443 ddp_act_forecast_rec.hierarchy := p6_a15;
444 ddp_act_forecast_rec.hierarchy_level := p6_a16;
445 ddp_act_forecast_rec.level_value := p6_a17;
446 ddp_act_forecast_rec.forecast_calendar := p6_a18;
447 ddp_act_forecast_rec.period_level := p6_a19;
448 ddp_act_forecast_rec.forecast_period_id := p6_a20;
449 ddp_act_forecast_rec.forecast_date := rosetta_g_miss_date_in_map(p6_a21);
450 ddp_act_forecast_rec.forecast_uom_code := p6_a22;
451 ddp_act_forecast_rec.forecast_quantity := p6_a23;
452 ddp_act_forecast_rec.forward_buy_quantity := p6_a24;
453 ddp_act_forecast_rec.forward_buy_period := p6_a25;
454 ddp_act_forecast_rec.cumulation_period_choice := p6_a26;
455 ddp_act_forecast_rec.base_quantity := p6_a27;
456 ddp_act_forecast_rec.context := p6_a28;
457 ddp_act_forecast_rec.attribute_category := p6_a29;
458 ddp_act_forecast_rec.attribute1 := p6_a30;
459 ddp_act_forecast_rec.attribute2 := p6_a31;
460 ddp_act_forecast_rec.attribute3 := p6_a32;
461 ddp_act_forecast_rec.attribute4 := p6_a33;
462 ddp_act_forecast_rec.attribute5 := p6_a34;
463 ddp_act_forecast_rec.attribute6 := p6_a35;
464 ddp_act_forecast_rec.attribute7 := p6_a36;
465 ddp_act_forecast_rec.attribute8 := p6_a37;
466 ddp_act_forecast_rec.attribute9 := p6_a38;
467 ddp_act_forecast_rec.attribute10 := p6_a39;
468 ddp_act_forecast_rec.attribute11 := p6_a40;
469 ddp_act_forecast_rec.attribute12 := p6_a41;
470 ddp_act_forecast_rec.attribute13 := p6_a42;
471 ddp_act_forecast_rec.attribute14 := p6_a43;
472 ddp_act_forecast_rec.attribute15 := p6_a44;
473 ddp_act_forecast_rec.org_id := p6_a45;
474 ddp_act_forecast_rec.forecast_remaining_quantity := p6_a46;
475 ddp_act_forecast_rec.forecast_remaining_percent := p6_a47;
476 ddp_act_forecast_rec.base_quantity_type := p6_a48;
477 ddp_act_forecast_rec.forecast_spread_type := p6_a49;
478 ddp_act_forecast_rec.dimention1 := p6_a50;
479 ddp_act_forecast_rec.dimention2 := p6_a51;
480 ddp_act_forecast_rec.dimention3 := p6_a52;
481 ddp_act_forecast_rec.last_scenario_id := p6_a53;
482 ddp_act_forecast_rec.freeze_flag := p6_a54;
483 ddp_act_forecast_rec.comments := p6_a55;
484 ddp_act_forecast_rec.price_list_id := p6_a56;
485 ddp_act_forecast_rec.base_quantity_ref := p6_a57;
486 ddp_act_forecast_rec.base_quantity_start_date := rosetta_g_miss_date_in_map(p6_a58);
487 ddp_act_forecast_rec.base_quantity_end_date := rosetta_g_miss_date_in_map(p6_a59);
488 ddp_act_forecast_rec.offer_code := p6_a60;
489
490 -- here's the delegated call to the old PL/SQL routine
491 ozf_actforecast_pvt.validate_actforecast(p_api_version,
492 p_init_msg_list,
493 p_validation_level,
494 x_return_status,
495 x_msg_count,
496 x_msg_data,
497 ddp_act_forecast_rec);
498
499 -- copy data back from the local variables to OUT or IN-OUT args, if any
500
501
502
503
504
505
506 end;
507
508 procedure validate_actfcst_items(p0_a0 NUMBER
509 , p0_a1 VARCHAR2
510 , p0_a2 VARCHAR2
511 , p0_a3 NUMBER
512 , p0_a4 DATE
513 , p0_a5 VARCHAR2
514 , p0_a6 NUMBER
515 , p0_a7 DATE
516 , p0_a8 NUMBER
517 , p0_a9 NUMBER
518 , p0_a10 NUMBER
519 , p0_a11 NUMBER
520 , p0_a12 DATE
521 , p0_a13 NUMBER
522 , p0_a14 NUMBER
523 , p0_a15 VARCHAR2
524 , p0_a16 VARCHAR2
525 , p0_a17 VARCHAR2
526 , p0_a18 VARCHAR2
527 , p0_a19 VARCHAR2
528 , p0_a20 NUMBER
529 , p0_a21 DATE
530 , p0_a22 VARCHAR2
531 , p0_a23 NUMBER
532 , p0_a24 NUMBER
533 , p0_a25 VARCHAR2
534 , p0_a26 VARCHAR2
535 , p0_a27 NUMBER
536 , p0_a28 VARCHAR2
537 , p0_a29 VARCHAR2
538 , p0_a30 VARCHAR2
539 , p0_a31 VARCHAR2
540 , p0_a32 VARCHAR2
541 , p0_a33 VARCHAR2
542 , p0_a34 VARCHAR2
543 , p0_a35 VARCHAR2
544 , p0_a36 VARCHAR2
545 , p0_a37 VARCHAR2
546 , p0_a38 VARCHAR2
547 , p0_a39 VARCHAR2
548 , p0_a40 VARCHAR2
549 , p0_a41 VARCHAR2
550 , p0_a42 VARCHAR2
551 , p0_a43 VARCHAR2
552 , p0_a44 VARCHAR2
553 , p0_a45 NUMBER
554 , p0_a46 NUMBER
555 , p0_a47 NUMBER
556 , p0_a48 VARCHAR2
557 , p0_a49 VARCHAR2
558 , p0_a50 VARCHAR2
559 , p0_a51 VARCHAR2
560 , p0_a52 VARCHAR2
561 , p0_a53 NUMBER
562 , p0_a54 VARCHAR2
563 , p0_a55 VARCHAR2
564 , p0_a56 NUMBER
565 , p0_a57 VARCHAR2
566 , p0_a58 DATE
567 , p0_a59 DATE
568 , p0_a60 VARCHAR2
569 , p_validation_mode VARCHAR2
570 , x_return_status out nocopy VARCHAR2
571 )
572
573 as
574 ddp_act_forecast_rec ozf_actforecast_pvt.act_forecast_rec_type;
575 ddindx binary_integer; indx binary_integer;
576 begin
577
578 -- copy data to the local IN or IN-OUT args, if any
579 ddp_act_forecast_rec.forecast_id := p0_a0;
580 ddp_act_forecast_rec.forecast_type := p0_a1;
581 ddp_act_forecast_rec.arc_act_fcast_used_by := p0_a2;
582 ddp_act_forecast_rec.act_fcast_used_by_id := p0_a3;
583 ddp_act_forecast_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
584 ddp_act_forecast_rec.created_from := p0_a5;
585 ddp_act_forecast_rec.created_by := p0_a6;
586 ddp_act_forecast_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a7);
587 ddp_act_forecast_rec.last_updated_by := p0_a8;
588 ddp_act_forecast_rec.last_update_login := p0_a9;
589 ddp_act_forecast_rec.program_application_id := p0_a10;
590 ddp_act_forecast_rec.program_id := p0_a11;
591 ddp_act_forecast_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a12);
592 ddp_act_forecast_rec.request_id := p0_a13;
593 ddp_act_forecast_rec.object_version_number := p0_a14;
594 ddp_act_forecast_rec.hierarchy := p0_a15;
595 ddp_act_forecast_rec.hierarchy_level := p0_a16;
596 ddp_act_forecast_rec.level_value := p0_a17;
597 ddp_act_forecast_rec.forecast_calendar := p0_a18;
598 ddp_act_forecast_rec.period_level := p0_a19;
599 ddp_act_forecast_rec.forecast_period_id := p0_a20;
600 ddp_act_forecast_rec.forecast_date := rosetta_g_miss_date_in_map(p0_a21);
601 ddp_act_forecast_rec.forecast_uom_code := p0_a22;
602 ddp_act_forecast_rec.forecast_quantity := p0_a23;
603 ddp_act_forecast_rec.forward_buy_quantity := p0_a24;
604 ddp_act_forecast_rec.forward_buy_period := p0_a25;
605 ddp_act_forecast_rec.cumulation_period_choice := p0_a26;
606 ddp_act_forecast_rec.base_quantity := p0_a27;
607 ddp_act_forecast_rec.context := p0_a28;
608 ddp_act_forecast_rec.attribute_category := p0_a29;
609 ddp_act_forecast_rec.attribute1 := p0_a30;
610 ddp_act_forecast_rec.attribute2 := p0_a31;
611 ddp_act_forecast_rec.attribute3 := p0_a32;
612 ddp_act_forecast_rec.attribute4 := p0_a33;
613 ddp_act_forecast_rec.attribute5 := p0_a34;
614 ddp_act_forecast_rec.attribute6 := p0_a35;
615 ddp_act_forecast_rec.attribute7 := p0_a36;
616 ddp_act_forecast_rec.attribute8 := p0_a37;
617 ddp_act_forecast_rec.attribute9 := p0_a38;
618 ddp_act_forecast_rec.attribute10 := p0_a39;
619 ddp_act_forecast_rec.attribute11 := p0_a40;
620 ddp_act_forecast_rec.attribute12 := p0_a41;
621 ddp_act_forecast_rec.attribute13 := p0_a42;
622 ddp_act_forecast_rec.attribute14 := p0_a43;
623 ddp_act_forecast_rec.attribute15 := p0_a44;
624 ddp_act_forecast_rec.org_id := p0_a45;
625 ddp_act_forecast_rec.forecast_remaining_quantity := p0_a46;
626 ddp_act_forecast_rec.forecast_remaining_percent := p0_a47;
627 ddp_act_forecast_rec.base_quantity_type := p0_a48;
628 ddp_act_forecast_rec.forecast_spread_type := p0_a49;
629 ddp_act_forecast_rec.dimention1 := p0_a50;
630 ddp_act_forecast_rec.dimention2 := p0_a51;
631 ddp_act_forecast_rec.dimention3 := p0_a52;
632 ddp_act_forecast_rec.last_scenario_id := p0_a53;
633 ddp_act_forecast_rec.freeze_flag := p0_a54;
634 ddp_act_forecast_rec.comments := p0_a55;
635 ddp_act_forecast_rec.price_list_id := p0_a56;
636 ddp_act_forecast_rec.base_quantity_ref := p0_a57;
637 ddp_act_forecast_rec.base_quantity_start_date := rosetta_g_miss_date_in_map(p0_a58);
638 ddp_act_forecast_rec.base_quantity_end_date := rosetta_g_miss_date_in_map(p0_a59);
639 ddp_act_forecast_rec.offer_code := p0_a60;
640
641
642
643 -- here's the delegated call to the old PL/SQL routine
644 ozf_actforecast_pvt.validate_actfcst_items(ddp_act_forecast_rec,
645 p_validation_mode,
646 x_return_status);
647
648 -- copy data back from the local variables to OUT or IN-OUT args, if any
649
650
651 end;
652
653 procedure validate_actfcst_rec(p0_a0 NUMBER
654 , p0_a1 VARCHAR2
655 , p0_a2 VARCHAR2
656 , p0_a3 NUMBER
657 , p0_a4 DATE
658 , p0_a5 VARCHAR2
659 , p0_a6 NUMBER
660 , p0_a7 DATE
661 , p0_a8 NUMBER
662 , p0_a9 NUMBER
663 , p0_a10 NUMBER
664 , p0_a11 NUMBER
665 , p0_a12 DATE
666 , p0_a13 NUMBER
667 , p0_a14 NUMBER
668 , p0_a15 VARCHAR2
669 , p0_a16 VARCHAR2
670 , p0_a17 VARCHAR2
671 , p0_a18 VARCHAR2
672 , p0_a19 VARCHAR2
673 , p0_a20 NUMBER
674 , p0_a21 DATE
675 , p0_a22 VARCHAR2
676 , p0_a23 NUMBER
677 , p0_a24 NUMBER
678 , p0_a25 VARCHAR2
679 , p0_a26 VARCHAR2
680 , p0_a27 NUMBER
681 , p0_a28 VARCHAR2
682 , p0_a29 VARCHAR2
683 , p0_a30 VARCHAR2
684 , p0_a31 VARCHAR2
685 , p0_a32 VARCHAR2
686 , p0_a33 VARCHAR2
687 , p0_a34 VARCHAR2
688 , p0_a35 VARCHAR2
689 , p0_a36 VARCHAR2
690 , p0_a37 VARCHAR2
691 , p0_a38 VARCHAR2
692 , p0_a39 VARCHAR2
693 , p0_a40 VARCHAR2
694 , p0_a41 VARCHAR2
695 , p0_a42 VARCHAR2
696 , p0_a43 VARCHAR2
697 , p0_a44 VARCHAR2
698 , p0_a45 NUMBER
699 , p0_a46 NUMBER
700 , p0_a47 NUMBER
701 , p0_a48 VARCHAR2
702 , p0_a49 VARCHAR2
703 , p0_a50 VARCHAR2
704 , p0_a51 VARCHAR2
705 , p0_a52 VARCHAR2
706 , p0_a53 NUMBER
707 , p0_a54 VARCHAR2
708 , p0_a55 VARCHAR2
709 , p0_a56 NUMBER
710 , p0_a57 VARCHAR2
711 , p0_a58 DATE
712 , p0_a59 DATE
713 , p0_a60 VARCHAR2
714 , p1_a0 NUMBER
715 , p1_a1 VARCHAR2
716 , p1_a2 VARCHAR2
717 , p1_a3 NUMBER
718 , p1_a4 DATE
719 , p1_a5 VARCHAR2
720 , p1_a6 NUMBER
721 , p1_a7 DATE
722 , p1_a8 NUMBER
723 , p1_a9 NUMBER
724 , p1_a10 NUMBER
725 , p1_a11 NUMBER
726 , p1_a12 DATE
727 , p1_a13 NUMBER
728 , p1_a14 NUMBER
729 , p1_a15 VARCHAR2
730 , p1_a16 VARCHAR2
731 , p1_a17 VARCHAR2
732 , p1_a18 VARCHAR2
733 , p1_a19 VARCHAR2
734 , p1_a20 NUMBER
735 , p1_a21 DATE
736 , p1_a22 VARCHAR2
737 , p1_a23 NUMBER
738 , p1_a24 NUMBER
739 , p1_a25 VARCHAR2
740 , p1_a26 VARCHAR2
741 , p1_a27 NUMBER
742 , p1_a28 VARCHAR2
743 , p1_a29 VARCHAR2
744 , p1_a30 VARCHAR2
745 , p1_a31 VARCHAR2
746 , p1_a32 VARCHAR2
747 , p1_a33 VARCHAR2
748 , p1_a34 VARCHAR2
749 , p1_a35 VARCHAR2
750 , p1_a36 VARCHAR2
751 , p1_a37 VARCHAR2
752 , p1_a38 VARCHAR2
753 , p1_a39 VARCHAR2
754 , p1_a40 VARCHAR2
755 , p1_a41 VARCHAR2
756 , p1_a42 VARCHAR2
757 , p1_a43 VARCHAR2
758 , p1_a44 VARCHAR2
759 , p1_a45 NUMBER
760 , p1_a46 NUMBER
761 , p1_a47 NUMBER
762 , p1_a48 VARCHAR2
763 , p1_a49 VARCHAR2
764 , p1_a50 VARCHAR2
765 , p1_a51 VARCHAR2
766 , p1_a52 VARCHAR2
767 , p1_a53 NUMBER
768 , p1_a54 VARCHAR2
769 , p1_a55 VARCHAR2
770 , p1_a56 NUMBER
771 , p1_a57 VARCHAR2
772 , p1_a58 DATE
773 , p1_a59 DATE
774 , p1_a60 VARCHAR2
775 , x_return_status out nocopy VARCHAR2
776 )
777
778 as
779 ddp_act_forecast_rec ozf_actforecast_pvt.act_forecast_rec_type;
780 ddp_complete_fcst_rec ozf_actforecast_pvt.act_forecast_rec_type;
781 ddindx binary_integer; indx binary_integer;
782 begin
783
784 -- copy data to the local IN or IN-OUT args, if any
785 ddp_act_forecast_rec.forecast_id := p0_a0;
786 ddp_act_forecast_rec.forecast_type := p0_a1;
787 ddp_act_forecast_rec.arc_act_fcast_used_by := p0_a2;
788 ddp_act_forecast_rec.act_fcast_used_by_id := p0_a3;
789 ddp_act_forecast_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
790 ddp_act_forecast_rec.created_from := p0_a5;
791 ddp_act_forecast_rec.created_by := p0_a6;
792 ddp_act_forecast_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a7);
793 ddp_act_forecast_rec.last_updated_by := p0_a8;
794 ddp_act_forecast_rec.last_update_login := p0_a9;
795 ddp_act_forecast_rec.program_application_id := p0_a10;
796 ddp_act_forecast_rec.program_id := p0_a11;
797 ddp_act_forecast_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a12);
798 ddp_act_forecast_rec.request_id := p0_a13;
799 ddp_act_forecast_rec.object_version_number := p0_a14;
800 ddp_act_forecast_rec.hierarchy := p0_a15;
801 ddp_act_forecast_rec.hierarchy_level := p0_a16;
802 ddp_act_forecast_rec.level_value := p0_a17;
803 ddp_act_forecast_rec.forecast_calendar := p0_a18;
804 ddp_act_forecast_rec.period_level := p0_a19;
805 ddp_act_forecast_rec.forecast_period_id := p0_a20;
806 ddp_act_forecast_rec.forecast_date := rosetta_g_miss_date_in_map(p0_a21);
807 ddp_act_forecast_rec.forecast_uom_code := p0_a22;
808 ddp_act_forecast_rec.forecast_quantity := p0_a23;
809 ddp_act_forecast_rec.forward_buy_quantity := p0_a24;
810 ddp_act_forecast_rec.forward_buy_period := p0_a25;
811 ddp_act_forecast_rec.cumulation_period_choice := p0_a26;
812 ddp_act_forecast_rec.base_quantity := p0_a27;
813 ddp_act_forecast_rec.context := p0_a28;
814 ddp_act_forecast_rec.attribute_category := p0_a29;
815 ddp_act_forecast_rec.attribute1 := p0_a30;
816 ddp_act_forecast_rec.attribute2 := p0_a31;
817 ddp_act_forecast_rec.attribute3 := p0_a32;
818 ddp_act_forecast_rec.attribute4 := p0_a33;
819 ddp_act_forecast_rec.attribute5 := p0_a34;
820 ddp_act_forecast_rec.attribute6 := p0_a35;
821 ddp_act_forecast_rec.attribute7 := p0_a36;
822 ddp_act_forecast_rec.attribute8 := p0_a37;
823 ddp_act_forecast_rec.attribute9 := p0_a38;
824 ddp_act_forecast_rec.attribute10 := p0_a39;
825 ddp_act_forecast_rec.attribute11 := p0_a40;
826 ddp_act_forecast_rec.attribute12 := p0_a41;
827 ddp_act_forecast_rec.attribute13 := p0_a42;
828 ddp_act_forecast_rec.attribute14 := p0_a43;
829 ddp_act_forecast_rec.attribute15 := p0_a44;
830 ddp_act_forecast_rec.org_id := p0_a45;
831 ddp_act_forecast_rec.forecast_remaining_quantity := p0_a46;
832 ddp_act_forecast_rec.forecast_remaining_percent := p0_a47;
833 ddp_act_forecast_rec.base_quantity_type := p0_a48;
834 ddp_act_forecast_rec.forecast_spread_type := p0_a49;
835 ddp_act_forecast_rec.dimention1 := p0_a50;
836 ddp_act_forecast_rec.dimention2 := p0_a51;
837 ddp_act_forecast_rec.dimention3 := p0_a52;
838 ddp_act_forecast_rec.last_scenario_id := p0_a53;
839 ddp_act_forecast_rec.freeze_flag := p0_a54;
840 ddp_act_forecast_rec.comments := p0_a55;
841 ddp_act_forecast_rec.price_list_id := p0_a56;
842 ddp_act_forecast_rec.base_quantity_ref := p0_a57;
843 ddp_act_forecast_rec.base_quantity_start_date := rosetta_g_miss_date_in_map(p0_a58);
844 ddp_act_forecast_rec.base_quantity_end_date := rosetta_g_miss_date_in_map(p0_a59);
845 ddp_act_forecast_rec.offer_code := p0_a60;
846
847 ddp_complete_fcst_rec.forecast_id := p1_a0;
848 ddp_complete_fcst_rec.forecast_type := p1_a1;
849 ddp_complete_fcst_rec.arc_act_fcast_used_by := p1_a2;
850 ddp_complete_fcst_rec.act_fcast_used_by_id := p1_a3;
851 ddp_complete_fcst_rec.creation_date := rosetta_g_miss_date_in_map(p1_a4);
852 ddp_complete_fcst_rec.created_from := p1_a5;
853 ddp_complete_fcst_rec.created_by := p1_a6;
854 ddp_complete_fcst_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a7);
855 ddp_complete_fcst_rec.last_updated_by := p1_a8;
856 ddp_complete_fcst_rec.last_update_login := p1_a9;
857 ddp_complete_fcst_rec.program_application_id := p1_a10;
858 ddp_complete_fcst_rec.program_id := p1_a11;
859 ddp_complete_fcst_rec.program_update_date := rosetta_g_miss_date_in_map(p1_a12);
860 ddp_complete_fcst_rec.request_id := p1_a13;
861 ddp_complete_fcst_rec.object_version_number := p1_a14;
862 ddp_complete_fcst_rec.hierarchy := p1_a15;
863 ddp_complete_fcst_rec.hierarchy_level := p1_a16;
864 ddp_complete_fcst_rec.level_value := p1_a17;
865 ddp_complete_fcst_rec.forecast_calendar := p1_a18;
866 ddp_complete_fcst_rec.period_level := p1_a19;
867 ddp_complete_fcst_rec.forecast_period_id := p1_a20;
868 ddp_complete_fcst_rec.forecast_date := rosetta_g_miss_date_in_map(p1_a21);
869 ddp_complete_fcst_rec.forecast_uom_code := p1_a22;
870 ddp_complete_fcst_rec.forecast_quantity := p1_a23;
871 ddp_complete_fcst_rec.forward_buy_quantity := p1_a24;
872 ddp_complete_fcst_rec.forward_buy_period := p1_a25;
873 ddp_complete_fcst_rec.cumulation_period_choice := p1_a26;
874 ddp_complete_fcst_rec.base_quantity := p1_a27;
875 ddp_complete_fcst_rec.context := p1_a28;
876 ddp_complete_fcst_rec.attribute_category := p1_a29;
877 ddp_complete_fcst_rec.attribute1 := p1_a30;
878 ddp_complete_fcst_rec.attribute2 := p1_a31;
879 ddp_complete_fcst_rec.attribute3 := p1_a32;
880 ddp_complete_fcst_rec.attribute4 := p1_a33;
881 ddp_complete_fcst_rec.attribute5 := p1_a34;
882 ddp_complete_fcst_rec.attribute6 := p1_a35;
883 ddp_complete_fcst_rec.attribute7 := p1_a36;
884 ddp_complete_fcst_rec.attribute8 := p1_a37;
885 ddp_complete_fcst_rec.attribute9 := p1_a38;
886 ddp_complete_fcst_rec.attribute10 := p1_a39;
887 ddp_complete_fcst_rec.attribute11 := p1_a40;
888 ddp_complete_fcst_rec.attribute12 := p1_a41;
889 ddp_complete_fcst_rec.attribute13 := p1_a42;
890 ddp_complete_fcst_rec.attribute14 := p1_a43;
891 ddp_complete_fcst_rec.attribute15 := p1_a44;
892 ddp_complete_fcst_rec.org_id := p1_a45;
893 ddp_complete_fcst_rec.forecast_remaining_quantity := p1_a46;
894 ddp_complete_fcst_rec.forecast_remaining_percent := p1_a47;
895 ddp_complete_fcst_rec.base_quantity_type := p1_a48;
896 ddp_complete_fcst_rec.forecast_spread_type := p1_a49;
897 ddp_complete_fcst_rec.dimention1 := p1_a50;
898 ddp_complete_fcst_rec.dimention2 := p1_a51;
899 ddp_complete_fcst_rec.dimention3 := p1_a52;
900 ddp_complete_fcst_rec.last_scenario_id := p1_a53;
901 ddp_complete_fcst_rec.freeze_flag := p1_a54;
902 ddp_complete_fcst_rec.comments := p1_a55;
903 ddp_complete_fcst_rec.price_list_id := p1_a56;
904 ddp_complete_fcst_rec.base_quantity_ref := p1_a57;
905 ddp_complete_fcst_rec.base_quantity_start_date := rosetta_g_miss_date_in_map(p1_a58);
906 ddp_complete_fcst_rec.base_quantity_end_date := rosetta_g_miss_date_in_map(p1_a59);
907 ddp_complete_fcst_rec.offer_code := p1_a60;
908
909
910 -- here's the delegated call to the old PL/SQL routine
911 ozf_actforecast_pvt.validate_actfcst_rec(ddp_act_forecast_rec,
912 ddp_complete_fcst_rec,
913 x_return_status);
914
915 -- copy data back from the local variables to OUT or IN-OUT args, if any
916
917
918 end;
919
920 procedure complete_actfcst_rec(p0_a0 NUMBER
921 , p0_a1 VARCHAR2
922 , p0_a2 VARCHAR2
923 , p0_a3 NUMBER
924 , p0_a4 DATE
925 , p0_a5 VARCHAR2
926 , p0_a6 NUMBER
927 , p0_a7 DATE
928 , p0_a8 NUMBER
929 , p0_a9 NUMBER
930 , p0_a10 NUMBER
931 , p0_a11 NUMBER
932 , p0_a12 DATE
933 , p0_a13 NUMBER
934 , p0_a14 NUMBER
935 , p0_a15 VARCHAR2
936 , p0_a16 VARCHAR2
937 , p0_a17 VARCHAR2
938 , p0_a18 VARCHAR2
939 , p0_a19 VARCHAR2
940 , p0_a20 NUMBER
941 , p0_a21 DATE
942 , p0_a22 VARCHAR2
943 , p0_a23 NUMBER
944 , p0_a24 NUMBER
945 , p0_a25 VARCHAR2
946 , p0_a26 VARCHAR2
947 , p0_a27 NUMBER
948 , p0_a28 VARCHAR2
949 , p0_a29 VARCHAR2
950 , p0_a30 VARCHAR2
951 , p0_a31 VARCHAR2
952 , p0_a32 VARCHAR2
953 , p0_a33 VARCHAR2
954 , p0_a34 VARCHAR2
955 , p0_a35 VARCHAR2
956 , p0_a36 VARCHAR2
957 , p0_a37 VARCHAR2
958 , p0_a38 VARCHAR2
959 , p0_a39 VARCHAR2
960 , p0_a40 VARCHAR2
961 , p0_a41 VARCHAR2
962 , p0_a42 VARCHAR2
963 , p0_a43 VARCHAR2
964 , p0_a44 VARCHAR2
965 , p0_a45 NUMBER
966 , p0_a46 NUMBER
967 , p0_a47 NUMBER
968 , p0_a48 VARCHAR2
969 , p0_a49 VARCHAR2
970 , p0_a50 VARCHAR2
971 , p0_a51 VARCHAR2
972 , p0_a52 VARCHAR2
973 , p0_a53 NUMBER
974 , p0_a54 VARCHAR2
975 , p0_a55 VARCHAR2
976 , p0_a56 NUMBER
977 , p0_a57 VARCHAR2
978 , p0_a58 DATE
979 , p0_a59 DATE
980 , p0_a60 VARCHAR2
981 , p1_a0 out nocopy NUMBER
982 , p1_a1 out nocopy VARCHAR2
983 , p1_a2 out nocopy VARCHAR2
984 , p1_a3 out nocopy NUMBER
985 , p1_a4 out nocopy DATE
986 , p1_a5 out nocopy VARCHAR2
987 , p1_a6 out nocopy NUMBER
988 , p1_a7 out nocopy DATE
989 , p1_a8 out nocopy NUMBER
990 , p1_a9 out nocopy NUMBER
991 , p1_a10 out nocopy NUMBER
992 , p1_a11 out nocopy NUMBER
993 , p1_a12 out nocopy DATE
994 , p1_a13 out nocopy NUMBER
995 , p1_a14 out nocopy NUMBER
996 , p1_a15 out nocopy VARCHAR2
997 , p1_a16 out nocopy VARCHAR2
998 , p1_a17 out nocopy VARCHAR2
999 , p1_a18 out nocopy VARCHAR2
1000 , p1_a19 out nocopy VARCHAR2
1001 , p1_a20 out nocopy NUMBER
1002 , p1_a21 out nocopy DATE
1003 , p1_a22 out nocopy VARCHAR2
1004 , p1_a23 out nocopy NUMBER
1005 , p1_a24 out nocopy NUMBER
1006 , p1_a25 out nocopy VARCHAR2
1007 , p1_a26 out nocopy VARCHAR2
1008 , p1_a27 out nocopy NUMBER
1009 , p1_a28 out nocopy VARCHAR2
1010 , p1_a29 out nocopy VARCHAR2
1011 , p1_a30 out nocopy VARCHAR2
1012 , p1_a31 out nocopy VARCHAR2
1013 , p1_a32 out nocopy VARCHAR2
1014 , p1_a33 out nocopy VARCHAR2
1015 , p1_a34 out nocopy VARCHAR2
1016 , p1_a35 out nocopy VARCHAR2
1017 , p1_a36 out nocopy VARCHAR2
1018 , p1_a37 out nocopy VARCHAR2
1019 , p1_a38 out nocopy VARCHAR2
1020 , p1_a39 out nocopy VARCHAR2
1021 , p1_a40 out nocopy VARCHAR2
1022 , p1_a41 out nocopy VARCHAR2
1023 , p1_a42 out nocopy VARCHAR2
1024 , p1_a43 out nocopy VARCHAR2
1025 , p1_a44 out nocopy VARCHAR2
1026 , p1_a45 out nocopy NUMBER
1027 , p1_a46 out nocopy NUMBER
1028 , p1_a47 out nocopy NUMBER
1029 , p1_a48 out nocopy VARCHAR2
1030 , p1_a49 out nocopy VARCHAR2
1031 , p1_a50 out nocopy VARCHAR2
1032 , p1_a51 out nocopy VARCHAR2
1033 , p1_a52 out nocopy VARCHAR2
1034 , p1_a53 out nocopy NUMBER
1035 , p1_a54 out nocopy VARCHAR2
1036 , p1_a55 out nocopy VARCHAR2
1037 , p1_a56 out nocopy NUMBER
1038 , p1_a57 out nocopy VARCHAR2
1039 , p1_a58 out nocopy DATE
1040 , p1_a59 out nocopy DATE
1041 , p1_a60 out nocopy VARCHAR2
1042 )
1043
1044 as
1045 ddp_act_forecast_rec ozf_actforecast_pvt.act_forecast_rec_type;
1046 ddx_complete_fcst_rec ozf_actforecast_pvt.act_forecast_rec_type;
1047 ddindx binary_integer; indx binary_integer;
1048 begin
1049
1050 -- copy data to the local IN or IN-OUT args, if any
1051 ddp_act_forecast_rec.forecast_id := p0_a0;
1052 ddp_act_forecast_rec.forecast_type := p0_a1;
1053 ddp_act_forecast_rec.arc_act_fcast_used_by := p0_a2;
1054 ddp_act_forecast_rec.act_fcast_used_by_id := p0_a3;
1055 ddp_act_forecast_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
1056 ddp_act_forecast_rec.created_from := p0_a5;
1057 ddp_act_forecast_rec.created_by := p0_a6;
1058 ddp_act_forecast_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a7);
1059 ddp_act_forecast_rec.last_updated_by := p0_a8;
1060 ddp_act_forecast_rec.last_update_login := p0_a9;
1061 ddp_act_forecast_rec.program_application_id := p0_a10;
1062 ddp_act_forecast_rec.program_id := p0_a11;
1063 ddp_act_forecast_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a12);
1064 ddp_act_forecast_rec.request_id := p0_a13;
1065 ddp_act_forecast_rec.object_version_number := p0_a14;
1066 ddp_act_forecast_rec.hierarchy := p0_a15;
1067 ddp_act_forecast_rec.hierarchy_level := p0_a16;
1068 ddp_act_forecast_rec.level_value := p0_a17;
1069 ddp_act_forecast_rec.forecast_calendar := p0_a18;
1070 ddp_act_forecast_rec.period_level := p0_a19;
1071 ddp_act_forecast_rec.forecast_period_id := p0_a20;
1072 ddp_act_forecast_rec.forecast_date := rosetta_g_miss_date_in_map(p0_a21);
1073 ddp_act_forecast_rec.forecast_uom_code := p0_a22;
1074 ddp_act_forecast_rec.forecast_quantity := p0_a23;
1075 ddp_act_forecast_rec.forward_buy_quantity := p0_a24;
1076 ddp_act_forecast_rec.forward_buy_period := p0_a25;
1077 ddp_act_forecast_rec.cumulation_period_choice := p0_a26;
1078 ddp_act_forecast_rec.base_quantity := p0_a27;
1079 ddp_act_forecast_rec.context := p0_a28;
1080 ddp_act_forecast_rec.attribute_category := p0_a29;
1081 ddp_act_forecast_rec.attribute1 := p0_a30;
1082 ddp_act_forecast_rec.attribute2 := p0_a31;
1083 ddp_act_forecast_rec.attribute3 := p0_a32;
1084 ddp_act_forecast_rec.attribute4 := p0_a33;
1085 ddp_act_forecast_rec.attribute5 := p0_a34;
1086 ddp_act_forecast_rec.attribute6 := p0_a35;
1087 ddp_act_forecast_rec.attribute7 := p0_a36;
1088 ddp_act_forecast_rec.attribute8 := p0_a37;
1089 ddp_act_forecast_rec.attribute9 := p0_a38;
1090 ddp_act_forecast_rec.attribute10 := p0_a39;
1091 ddp_act_forecast_rec.attribute11 := p0_a40;
1092 ddp_act_forecast_rec.attribute12 := p0_a41;
1093 ddp_act_forecast_rec.attribute13 := p0_a42;
1094 ddp_act_forecast_rec.attribute14 := p0_a43;
1095 ddp_act_forecast_rec.attribute15 := p0_a44;
1096 ddp_act_forecast_rec.org_id := p0_a45;
1097 ddp_act_forecast_rec.forecast_remaining_quantity := p0_a46;
1098 ddp_act_forecast_rec.forecast_remaining_percent := p0_a47;
1099 ddp_act_forecast_rec.base_quantity_type := p0_a48;
1100 ddp_act_forecast_rec.forecast_spread_type := p0_a49;
1101 ddp_act_forecast_rec.dimention1 := p0_a50;
1102 ddp_act_forecast_rec.dimention2 := p0_a51;
1103 ddp_act_forecast_rec.dimention3 := p0_a52;
1104 ddp_act_forecast_rec.last_scenario_id := p0_a53;
1105 ddp_act_forecast_rec.freeze_flag := p0_a54;
1106 ddp_act_forecast_rec.comments := p0_a55;
1107 ddp_act_forecast_rec.price_list_id := p0_a56;
1108 ddp_act_forecast_rec.base_quantity_ref := p0_a57;
1109 ddp_act_forecast_rec.base_quantity_start_date := rosetta_g_miss_date_in_map(p0_a58);
1110 ddp_act_forecast_rec.base_quantity_end_date := rosetta_g_miss_date_in_map(p0_a59);
1111 ddp_act_forecast_rec.offer_code := p0_a60;
1112
1113
1114 -- here's the delegated call to the old PL/SQL routine
1115 ozf_actforecast_pvt.complete_actfcst_rec(ddp_act_forecast_rec,
1116 ddx_complete_fcst_rec);
1117
1118 -- copy data back from the local variables to OUT or IN-OUT args, if any
1119
1120 p1_a0 := ddx_complete_fcst_rec.forecast_id;
1121 p1_a1 := ddx_complete_fcst_rec.forecast_type;
1122 p1_a2 := ddx_complete_fcst_rec.arc_act_fcast_used_by;
1123 p1_a3 := ddx_complete_fcst_rec.act_fcast_used_by_id;
1124 p1_a4 := ddx_complete_fcst_rec.creation_date;
1125 p1_a5 := ddx_complete_fcst_rec.created_from;
1126 p1_a6 := ddx_complete_fcst_rec.created_by;
1127 p1_a7 := ddx_complete_fcst_rec.last_update_date;
1128 p1_a8 := ddx_complete_fcst_rec.last_updated_by;
1129 p1_a9 := ddx_complete_fcst_rec.last_update_login;
1130 p1_a10 := ddx_complete_fcst_rec.program_application_id;
1131 p1_a11 := ddx_complete_fcst_rec.program_id;
1132 p1_a12 := ddx_complete_fcst_rec.program_update_date;
1133 p1_a13 := ddx_complete_fcst_rec.request_id;
1134 p1_a14 := ddx_complete_fcst_rec.object_version_number;
1135 p1_a15 := ddx_complete_fcst_rec.hierarchy;
1136 p1_a16 := ddx_complete_fcst_rec.hierarchy_level;
1137 p1_a17 := ddx_complete_fcst_rec.level_value;
1138 p1_a18 := ddx_complete_fcst_rec.forecast_calendar;
1139 p1_a19 := ddx_complete_fcst_rec.period_level;
1140 p1_a20 := ddx_complete_fcst_rec.forecast_period_id;
1141 p1_a21 := ddx_complete_fcst_rec.forecast_date;
1142 p1_a22 := ddx_complete_fcst_rec.forecast_uom_code;
1143 p1_a23 := ddx_complete_fcst_rec.forecast_quantity;
1144 p1_a24 := ddx_complete_fcst_rec.forward_buy_quantity;
1145 p1_a25 := ddx_complete_fcst_rec.forward_buy_period;
1146 p1_a26 := ddx_complete_fcst_rec.cumulation_period_choice;
1147 p1_a27 := ddx_complete_fcst_rec.base_quantity;
1148 p1_a28 := ddx_complete_fcst_rec.context;
1149 p1_a29 := ddx_complete_fcst_rec.attribute_category;
1150 p1_a30 := ddx_complete_fcst_rec.attribute1;
1151 p1_a31 := ddx_complete_fcst_rec.attribute2;
1152 p1_a32 := ddx_complete_fcst_rec.attribute3;
1153 p1_a33 := ddx_complete_fcst_rec.attribute4;
1154 p1_a34 := ddx_complete_fcst_rec.attribute5;
1155 p1_a35 := ddx_complete_fcst_rec.attribute6;
1156 p1_a36 := ddx_complete_fcst_rec.attribute7;
1157 p1_a37 := ddx_complete_fcst_rec.attribute8;
1158 p1_a38 := ddx_complete_fcst_rec.attribute9;
1159 p1_a39 := ddx_complete_fcst_rec.attribute10;
1160 p1_a40 := ddx_complete_fcst_rec.attribute11;
1161 p1_a41 := ddx_complete_fcst_rec.attribute12;
1162 p1_a42 := ddx_complete_fcst_rec.attribute13;
1163 p1_a43 := ddx_complete_fcst_rec.attribute14;
1164 p1_a44 := ddx_complete_fcst_rec.attribute15;
1165 p1_a45 := ddx_complete_fcst_rec.org_id;
1166 p1_a46 := ddx_complete_fcst_rec.forecast_remaining_quantity;
1167 p1_a47 := ddx_complete_fcst_rec.forecast_remaining_percent;
1168 p1_a48 := ddx_complete_fcst_rec.base_quantity_type;
1169 p1_a49 := ddx_complete_fcst_rec.forecast_spread_type;
1170 p1_a50 := ddx_complete_fcst_rec.dimention1;
1171 p1_a51 := ddx_complete_fcst_rec.dimention2;
1172 p1_a52 := ddx_complete_fcst_rec.dimention3;
1173 p1_a53 := ddx_complete_fcst_rec.last_scenario_id;
1174 p1_a54 := ddx_complete_fcst_rec.freeze_flag;
1175 p1_a55 := ddx_complete_fcst_rec.comments;
1176 p1_a56 := ddx_complete_fcst_rec.price_list_id;
1177 p1_a57 := ddx_complete_fcst_rec.base_quantity_ref;
1178 p1_a58 := ddx_complete_fcst_rec.base_quantity_start_date;
1179 p1_a59 := ddx_complete_fcst_rec.base_quantity_end_date;
1180 p1_a60 := ddx_complete_fcst_rec.offer_code;
1181 end;
1182
1183 procedure init_actforecast_rec(p0_a0 out nocopy NUMBER
1184 , p0_a1 out nocopy VARCHAR2
1185 , p0_a2 out nocopy VARCHAR2
1186 , p0_a3 out nocopy NUMBER
1187 , p0_a4 out nocopy DATE
1188 , p0_a5 out nocopy VARCHAR2
1189 , p0_a6 out nocopy NUMBER
1190 , p0_a7 out nocopy DATE
1191 , p0_a8 out nocopy NUMBER
1192 , p0_a9 out nocopy NUMBER
1193 , p0_a10 out nocopy NUMBER
1194 , p0_a11 out nocopy NUMBER
1195 , p0_a12 out nocopy DATE
1196 , p0_a13 out nocopy NUMBER
1197 , p0_a14 out nocopy NUMBER
1198 , p0_a15 out nocopy VARCHAR2
1199 , p0_a16 out nocopy VARCHAR2
1200 , p0_a17 out nocopy VARCHAR2
1201 , p0_a18 out nocopy VARCHAR2
1202 , p0_a19 out nocopy VARCHAR2
1203 , p0_a20 out nocopy NUMBER
1204 , p0_a21 out nocopy DATE
1205 , p0_a22 out nocopy VARCHAR2
1206 , p0_a23 out nocopy NUMBER
1207 , p0_a24 out nocopy NUMBER
1208 , p0_a25 out nocopy VARCHAR2
1209 , p0_a26 out nocopy VARCHAR2
1210 , p0_a27 out nocopy NUMBER
1211 , p0_a28 out nocopy VARCHAR2
1212 , p0_a29 out nocopy VARCHAR2
1213 , p0_a30 out nocopy VARCHAR2
1214 , p0_a31 out nocopy VARCHAR2
1215 , p0_a32 out nocopy VARCHAR2
1216 , p0_a33 out nocopy VARCHAR2
1217 , p0_a34 out nocopy VARCHAR2
1218 , p0_a35 out nocopy VARCHAR2
1219 , p0_a36 out nocopy VARCHAR2
1220 , p0_a37 out nocopy VARCHAR2
1221 , p0_a38 out nocopy VARCHAR2
1222 , p0_a39 out nocopy VARCHAR2
1223 , p0_a40 out nocopy VARCHAR2
1224 , p0_a41 out nocopy VARCHAR2
1225 , p0_a42 out nocopy VARCHAR2
1226 , p0_a43 out nocopy VARCHAR2
1227 , p0_a44 out nocopy VARCHAR2
1228 , p0_a45 out nocopy NUMBER
1229 , p0_a46 out nocopy NUMBER
1230 , p0_a47 out nocopy NUMBER
1231 , p0_a48 out nocopy VARCHAR2
1232 , p0_a49 out nocopy VARCHAR2
1233 , p0_a50 out nocopy VARCHAR2
1234 , p0_a51 out nocopy VARCHAR2
1235 , p0_a52 out nocopy VARCHAR2
1236 , p0_a53 out nocopy NUMBER
1237 , p0_a54 out nocopy VARCHAR2
1238 , p0_a55 out nocopy VARCHAR2
1239 , p0_a56 out nocopy NUMBER
1240 , p0_a57 out nocopy VARCHAR2
1241 , p0_a58 out nocopy DATE
1242 , p0_a59 out nocopy DATE
1243 , p0_a60 out nocopy VARCHAR2
1244 )
1245
1246 as
1247 ddx_actforecast_rec ozf_actforecast_pvt.act_forecast_rec_type;
1248 ddindx binary_integer; indx binary_integer;
1249 begin
1250
1251 -- copy data to the local IN or IN-OUT args, if any
1252
1253 -- here's the delegated call to the old PL/SQL routine
1254 ozf_actforecast_pvt.init_actforecast_rec(ddx_actforecast_rec);
1255
1256 -- copy data back from the local variables to OUT or IN-OUT args, if any
1257 p0_a0 := ddx_actforecast_rec.forecast_id;
1258 p0_a1 := ddx_actforecast_rec.forecast_type;
1259 p0_a2 := ddx_actforecast_rec.arc_act_fcast_used_by;
1260 p0_a3 := ddx_actforecast_rec.act_fcast_used_by_id;
1261 p0_a4 := ddx_actforecast_rec.creation_date;
1262 p0_a5 := ddx_actforecast_rec.created_from;
1263 p0_a6 := ddx_actforecast_rec.created_by;
1264 p0_a7 := ddx_actforecast_rec.last_update_date;
1265 p0_a8 := ddx_actforecast_rec.last_updated_by;
1266 p0_a9 := ddx_actforecast_rec.last_update_login;
1267 p0_a10 := ddx_actforecast_rec.program_application_id;
1268 p0_a11 := ddx_actforecast_rec.program_id;
1269 p0_a12 := ddx_actforecast_rec.program_update_date;
1270 p0_a13 := ddx_actforecast_rec.request_id;
1271 p0_a14 := ddx_actforecast_rec.object_version_number;
1272 p0_a15 := ddx_actforecast_rec.hierarchy;
1273 p0_a16 := ddx_actforecast_rec.hierarchy_level;
1274 p0_a17 := ddx_actforecast_rec.level_value;
1275 p0_a18 := ddx_actforecast_rec.forecast_calendar;
1276 p0_a19 := ddx_actforecast_rec.period_level;
1277 p0_a20 := ddx_actforecast_rec.forecast_period_id;
1278 p0_a21 := ddx_actforecast_rec.forecast_date;
1279 p0_a22 := ddx_actforecast_rec.forecast_uom_code;
1280 p0_a23 := ddx_actforecast_rec.forecast_quantity;
1281 p0_a24 := ddx_actforecast_rec.forward_buy_quantity;
1282 p0_a25 := ddx_actforecast_rec.forward_buy_period;
1283 p0_a26 := ddx_actforecast_rec.cumulation_period_choice;
1284 p0_a27 := ddx_actforecast_rec.base_quantity;
1285 p0_a28 := ddx_actforecast_rec.context;
1286 p0_a29 := ddx_actforecast_rec.attribute_category;
1287 p0_a30 := ddx_actforecast_rec.attribute1;
1288 p0_a31 := ddx_actforecast_rec.attribute2;
1289 p0_a32 := ddx_actforecast_rec.attribute3;
1290 p0_a33 := ddx_actforecast_rec.attribute4;
1291 p0_a34 := ddx_actforecast_rec.attribute5;
1292 p0_a35 := ddx_actforecast_rec.attribute6;
1293 p0_a36 := ddx_actforecast_rec.attribute7;
1294 p0_a37 := ddx_actforecast_rec.attribute8;
1295 p0_a38 := ddx_actforecast_rec.attribute9;
1296 p0_a39 := ddx_actforecast_rec.attribute10;
1297 p0_a40 := ddx_actforecast_rec.attribute11;
1298 p0_a41 := ddx_actforecast_rec.attribute12;
1299 p0_a42 := ddx_actforecast_rec.attribute13;
1300 p0_a43 := ddx_actforecast_rec.attribute14;
1301 p0_a44 := ddx_actforecast_rec.attribute15;
1302 p0_a45 := ddx_actforecast_rec.org_id;
1303 p0_a46 := ddx_actforecast_rec.forecast_remaining_quantity;
1304 p0_a47 := ddx_actforecast_rec.forecast_remaining_percent;
1305 p0_a48 := ddx_actforecast_rec.base_quantity_type;
1306 p0_a49 := ddx_actforecast_rec.forecast_spread_type;
1307 p0_a50 := ddx_actforecast_rec.dimention1;
1308 p0_a51 := ddx_actforecast_rec.dimention2;
1309 p0_a52 := ddx_actforecast_rec.dimention3;
1310 p0_a53 := ddx_actforecast_rec.last_scenario_id;
1311 p0_a54 := ddx_actforecast_rec.freeze_flag;
1312 p0_a55 := ddx_actforecast_rec.comments;
1313 p0_a56 := ddx_actforecast_rec.price_list_id;
1314 p0_a57 := ddx_actforecast_rec.base_quantity_ref;
1315 p0_a58 := ddx_actforecast_rec.base_quantity_start_date;
1316 p0_a59 := ddx_actforecast_rec.base_quantity_end_date;
1317 p0_a60 := ddx_actforecast_rec.offer_code;
1318 end;
1319
1320 end ozf_actforecast_pvt_w;