DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_ACTPRODUCT_PVT_OA

Source


1 package body ams_actproduct_pvt_oa as
2   /* $Header: amsaacpb.pls 120.0 2005/08/31 09:45 gramanat noship $ */
3   procedure create_act_product(p_api_version  NUMBER
4     , p_init_msg_list  VARCHAR2
5     , p_commit  VARCHAR2
6     , p_validation_level  NUMBER
7     , x_return_status out nocopy  VARCHAR2
8     , x_msg_count out nocopy  NUMBER
9     , x_msg_data out nocopy  VARCHAR2
10     , p7_a0  NUMBER
11     , p7_a1  DATE
12     , p7_a2  NUMBER
13     , p7_a3  DATE
14     , p7_a4  NUMBER
15     , p7_a5  NUMBER
16     , p7_a6  NUMBER
17     , p7_a7  NUMBER
18     , p7_a8  VARCHAR2
19     , p7_a9  VARCHAR2
20     , p7_a10  VARCHAR2
21     , p7_a11  VARCHAR2
22     , p7_a12  VARCHAR2
23     , p7_a13  NUMBER
24     , p7_a14  NUMBER
25     , p7_a15  NUMBER
26     , p7_a16  NUMBER
27     , p7_a17  VARCHAR2
28     , p7_a18  NUMBER
29     , p7_a19  NUMBER
30     , p7_a20  VARCHAR2
31     , p7_a21  VARCHAR2
32     , p7_a22  VARCHAR2
33     , p7_a23  VARCHAR2
34     , p7_a24  VARCHAR2
35     , p7_a25  VARCHAR2
36     , p7_a26  VARCHAR2
37     , p7_a27  VARCHAR2
38     , p7_a28  VARCHAR2
39     , p7_a29  VARCHAR2
40     , p7_a30  VARCHAR2
41     , p7_a31  VARCHAR2
42     , p7_a32  VARCHAR2
43     , p7_a33  VARCHAR2
44     , p7_a34  VARCHAR2
45     , p7_a35  VARCHAR2
46     , p7_a36  NUMBER
47     , p7_a37  VARCHAR2
48     , p7_a38  NUMBER
49     , p7_a39  NUMBER
50     , p7_a40  NUMBER
51     , p7_a41  VARCHAR2
52     , x_act_product_id out nocopy  NUMBER
53   )
54 
55   as
56     ddp_act_product_rec ams_actproduct_pvt.act_product_rec_type;
57     ddindx binary_integer; indx binary_integer;
58   begin
59 
60     -- copy data to the local IN or IN-OUT args, if any
61 
62 
63 
64 
65 
66 
67 
68     ddp_act_product_rec.activity_product_id := p7_a0;
69     ddp_act_product_rec.last_update_date := p7_a1;
70     ddp_act_product_rec.last_updated_by := p7_a2;
71     ddp_act_product_rec.creation_date := p7_a3;
72     ddp_act_product_rec.created_by := p7_a4;
73     ddp_act_product_rec.last_update_login := p7_a5;
74     ddp_act_product_rec.object_version_number := p7_a6;
75     ddp_act_product_rec.act_product_used_by_id := p7_a7;
76     ddp_act_product_rec.arc_act_product_used_by := p7_a8;
77     ddp_act_product_rec.product_sale_type := p7_a9;
78     ddp_act_product_rec.primary_product_flag := p7_a10;
79     ddp_act_product_rec.enabled_flag := p7_a11;
80     ddp_act_product_rec.excluded_flag := p7_a12;
81     ddp_act_product_rec.category_id := p7_a13;
82     ddp_act_product_rec.category_set_id := p7_a14;
83     ddp_act_product_rec.organization_id := p7_a15;
84     ddp_act_product_rec.inventory_item_id := p7_a16;
85     ddp_act_product_rec.level_type_code := p7_a17;
86     ddp_act_product_rec.line_lumpsum_amount := p7_a18;
87     ddp_act_product_rec.line_lumpsum_qty := p7_a19;
88     ddp_act_product_rec.attribute_category := p7_a20;
89     ddp_act_product_rec.attribute1 := p7_a21;
90     ddp_act_product_rec.attribute2 := p7_a22;
91     ddp_act_product_rec.attribute3 := p7_a23;
92     ddp_act_product_rec.attribute4 := p7_a24;
93     ddp_act_product_rec.attribute5 := p7_a25;
94     ddp_act_product_rec.attribute6 := p7_a26;
95     ddp_act_product_rec.attribute7 := p7_a27;
96     ddp_act_product_rec.attribute8 := p7_a28;
97     ddp_act_product_rec.attribute9 := p7_a29;
98     ddp_act_product_rec.attribute10 := p7_a30;
99     ddp_act_product_rec.attribute11 := p7_a31;
100     ddp_act_product_rec.attribute12 := p7_a32;
101     ddp_act_product_rec.attribute13 := p7_a33;
102     ddp_act_product_rec.attribute14 := p7_a34;
103     ddp_act_product_rec.attribute15 := p7_a35;
104     ddp_act_product_rec.channel_id := p7_a36;
105     ddp_act_product_rec.uom_code := p7_a37;
106     ddp_act_product_rec.quantity := p7_a38;
107     ddp_act_product_rec.scan_value := p7_a39;
108     ddp_act_product_rec.scan_unit_forecast := p7_a40;
109     ddp_act_product_rec.adjustment_flag := p7_a41;
110 
111 
112     -- here's the delegated call to the old PL/SQL routine
113     ams_actproduct_pvt.create_act_product(p_api_version,
114       p_init_msg_list,
115       p_commit,
116       p_validation_level,
117       x_return_status,
118       x_msg_count,
119       x_msg_data,
120       ddp_act_product_rec,
121       x_act_product_id);
122 
123     -- copy data back from the local variables to OUT or IN-OUT args, if any
124 
125 
126 
127 
128 
129 
130 
131 
132   end;
133 
134   procedure update_act_product(p_api_version  NUMBER
135     , p_init_msg_list  VARCHAR2
136     , p_commit  VARCHAR2
137     , p_validation_level  NUMBER
138     , x_return_status out nocopy  VARCHAR2
139     , x_msg_count out nocopy  NUMBER
140     , x_msg_data out nocopy  VARCHAR2
141     , p7_a0  NUMBER
142     , p7_a1  DATE
143     , p7_a2  NUMBER
144     , p7_a3  DATE
145     , p7_a4  NUMBER
146     , p7_a5  NUMBER
147     , p7_a6  NUMBER
148     , p7_a7  NUMBER
149     , p7_a8  VARCHAR2
150     , p7_a9  VARCHAR2
151     , p7_a10  VARCHAR2
152     , p7_a11  VARCHAR2
153     , p7_a12  VARCHAR2
154     , p7_a13  NUMBER
155     , p7_a14  NUMBER
156     , p7_a15  NUMBER
157     , p7_a16  NUMBER
158     , p7_a17  VARCHAR2
159     , p7_a18  NUMBER
160     , p7_a19  NUMBER
161     , p7_a20  VARCHAR2
162     , p7_a21  VARCHAR2
163     , p7_a22  VARCHAR2
164     , p7_a23  VARCHAR2
165     , p7_a24  VARCHAR2
166     , p7_a25  VARCHAR2
167     , p7_a26  VARCHAR2
168     , p7_a27  VARCHAR2
169     , p7_a28  VARCHAR2
170     , p7_a29  VARCHAR2
171     , p7_a30  VARCHAR2
172     , p7_a31  VARCHAR2
173     , p7_a32  VARCHAR2
174     , p7_a33  VARCHAR2
175     , p7_a34  VARCHAR2
176     , p7_a35  VARCHAR2
177     , p7_a36  NUMBER
178     , p7_a37  VARCHAR2
179     , p7_a38  NUMBER
180     , p7_a39  NUMBER
181     , p7_a40  NUMBER
182     , p7_a41  VARCHAR2
183   )
184 
185   as
186     ddp_act_product_rec ams_actproduct_pvt.act_product_rec_type;
187     ddindx binary_integer; indx binary_integer;
188   begin
189 
190     -- copy data to the local IN or IN-OUT args, if any
191 
192 
193 
194 
195 
196 
197 
198     ddp_act_product_rec.activity_product_id := p7_a0;
199     ddp_act_product_rec.last_update_date := p7_a1;
200     ddp_act_product_rec.last_updated_by := p7_a2;
201     ddp_act_product_rec.creation_date := p7_a3;
202     ddp_act_product_rec.created_by := p7_a4;
203     ddp_act_product_rec.last_update_login := p7_a5;
204     ddp_act_product_rec.object_version_number := p7_a6;
205     ddp_act_product_rec.act_product_used_by_id := p7_a7;
206     ddp_act_product_rec.arc_act_product_used_by := p7_a8;
207     ddp_act_product_rec.product_sale_type := p7_a9;
208     ddp_act_product_rec.primary_product_flag := p7_a10;
209     ddp_act_product_rec.enabled_flag := p7_a11;
210     ddp_act_product_rec.excluded_flag := p7_a12;
211     ddp_act_product_rec.category_id := p7_a13;
212     ddp_act_product_rec.category_set_id := p7_a14;
213     ddp_act_product_rec.organization_id := p7_a15;
214     ddp_act_product_rec.inventory_item_id := p7_a16;
215     ddp_act_product_rec.level_type_code := p7_a17;
216     ddp_act_product_rec.line_lumpsum_amount := p7_a18;
217     ddp_act_product_rec.line_lumpsum_qty := p7_a19;
218     ddp_act_product_rec.attribute_category := p7_a20;
219     ddp_act_product_rec.attribute1 := p7_a21;
220     ddp_act_product_rec.attribute2 := p7_a22;
221     ddp_act_product_rec.attribute3 := p7_a23;
222     ddp_act_product_rec.attribute4 := p7_a24;
223     ddp_act_product_rec.attribute5 := p7_a25;
224     ddp_act_product_rec.attribute6 := p7_a26;
225     ddp_act_product_rec.attribute7 := p7_a27;
226     ddp_act_product_rec.attribute8 := p7_a28;
227     ddp_act_product_rec.attribute9 := p7_a29;
228     ddp_act_product_rec.attribute10 := p7_a30;
229     ddp_act_product_rec.attribute11 := p7_a31;
230     ddp_act_product_rec.attribute12 := p7_a32;
231     ddp_act_product_rec.attribute13 := p7_a33;
232     ddp_act_product_rec.attribute14 := p7_a34;
233     ddp_act_product_rec.attribute15 := p7_a35;
234     ddp_act_product_rec.channel_id := p7_a36;
235     ddp_act_product_rec.uom_code := p7_a37;
236     ddp_act_product_rec.quantity := p7_a38;
237     ddp_act_product_rec.scan_value := p7_a39;
238     ddp_act_product_rec.scan_unit_forecast := p7_a40;
239     ddp_act_product_rec.adjustment_flag := p7_a41;
240 
241     -- here's the delegated call to the old PL/SQL routine
242     ams_actproduct_pvt.update_act_product(p_api_version,
243       p_init_msg_list,
244       p_commit,
245       p_validation_level,
246       x_return_status,
247       x_msg_count,
248       x_msg_data,
249       ddp_act_product_rec);
250 
251     -- copy data back from the local variables to OUT or IN-OUT args, if any
252 
253 
254 
255 
256 
257 
258 
259   end;
260 
261   procedure validate_act_product(p_api_version  NUMBER
262     , p_init_msg_list  VARCHAR2
263     , p_validation_level  NUMBER
264     , x_return_status out nocopy  VARCHAR2
265     , x_msg_count out nocopy  NUMBER
266     , x_msg_data out nocopy  VARCHAR2
267     , p6_a0  NUMBER
268     , p6_a1  DATE
269     , p6_a2  NUMBER
270     , p6_a3  DATE
271     , p6_a4  NUMBER
272     , p6_a5  NUMBER
273     , p6_a6  NUMBER
274     , p6_a7  NUMBER
275     , p6_a8  VARCHAR2
276     , p6_a9  VARCHAR2
277     , p6_a10  VARCHAR2
278     , p6_a11  VARCHAR2
279     , p6_a12  VARCHAR2
280     , p6_a13  NUMBER
281     , p6_a14  NUMBER
282     , p6_a15  NUMBER
283     , p6_a16  NUMBER
284     , p6_a17  VARCHAR2
285     , p6_a18  NUMBER
286     , p6_a19  NUMBER
287     , p6_a20  VARCHAR2
288     , p6_a21  VARCHAR2
289     , p6_a22  VARCHAR2
290     , p6_a23  VARCHAR2
291     , p6_a24  VARCHAR2
292     , p6_a25  VARCHAR2
293     , p6_a26  VARCHAR2
294     , p6_a27  VARCHAR2
295     , p6_a28  VARCHAR2
296     , p6_a29  VARCHAR2
297     , p6_a30  VARCHAR2
298     , p6_a31  VARCHAR2
299     , p6_a32  VARCHAR2
300     , p6_a33  VARCHAR2
301     , p6_a34  VARCHAR2
302     , p6_a35  VARCHAR2
303     , p6_a36  NUMBER
304     , p6_a37  VARCHAR2
305     , p6_a38  NUMBER
306     , p6_a39  NUMBER
307     , p6_a40  NUMBER
308     , p6_a41  VARCHAR2
309   )
310 
311   as
312     ddp_act_product_rec ams_actproduct_pvt.act_product_rec_type;
313     ddindx binary_integer; indx binary_integer;
314   begin
315 
316     -- copy data to the local IN or IN-OUT args, if any
317 
318 
319 
320 
321 
322 
323     ddp_act_product_rec.activity_product_id := p6_a0;
324     ddp_act_product_rec.last_update_date := p6_a1;
325     ddp_act_product_rec.last_updated_by := p6_a2;
326     ddp_act_product_rec.creation_date := p6_a3;
327     ddp_act_product_rec.created_by := p6_a4;
328     ddp_act_product_rec.last_update_login := p6_a5;
329     ddp_act_product_rec.object_version_number := p6_a6;
330     ddp_act_product_rec.act_product_used_by_id := p6_a7;
331     ddp_act_product_rec.arc_act_product_used_by := p6_a8;
332     ddp_act_product_rec.product_sale_type := p6_a9;
333     ddp_act_product_rec.primary_product_flag := p6_a10;
334     ddp_act_product_rec.enabled_flag := p6_a11;
335     ddp_act_product_rec.excluded_flag := p6_a12;
336     ddp_act_product_rec.category_id := p6_a13;
337     ddp_act_product_rec.category_set_id := p6_a14;
338     ddp_act_product_rec.organization_id := p6_a15;
339     ddp_act_product_rec.inventory_item_id := p6_a16;
340     ddp_act_product_rec.level_type_code := p6_a17;
341     ddp_act_product_rec.line_lumpsum_amount := p6_a18;
342     ddp_act_product_rec.line_lumpsum_qty := p6_a19;
343     ddp_act_product_rec.attribute_category := p6_a20;
344     ddp_act_product_rec.attribute1 := p6_a21;
345     ddp_act_product_rec.attribute2 := p6_a22;
346     ddp_act_product_rec.attribute3 := p6_a23;
347     ddp_act_product_rec.attribute4 := p6_a24;
348     ddp_act_product_rec.attribute5 := p6_a25;
349     ddp_act_product_rec.attribute6 := p6_a26;
350     ddp_act_product_rec.attribute7 := p6_a27;
351     ddp_act_product_rec.attribute8 := p6_a28;
352     ddp_act_product_rec.attribute9 := p6_a29;
353     ddp_act_product_rec.attribute10 := p6_a30;
354     ddp_act_product_rec.attribute11 := p6_a31;
355     ddp_act_product_rec.attribute12 := p6_a32;
356     ddp_act_product_rec.attribute13 := p6_a33;
357     ddp_act_product_rec.attribute14 := p6_a34;
358     ddp_act_product_rec.attribute15 := p6_a35;
359     ddp_act_product_rec.channel_id := p6_a36;
360     ddp_act_product_rec.uom_code := p6_a37;
361     ddp_act_product_rec.quantity := p6_a38;
362     ddp_act_product_rec.scan_value := p6_a39;
363     ddp_act_product_rec.scan_unit_forecast := p6_a40;
364     ddp_act_product_rec.adjustment_flag := p6_a41;
365 
366     -- here's the delegated call to the old PL/SQL routine
367     ams_actproduct_pvt.validate_act_product(p_api_version,
368       p_init_msg_list,
369       p_validation_level,
370       x_return_status,
371       x_msg_count,
372       x_msg_data,
373       ddp_act_product_rec);
374 
375     -- copy data back from the local variables to OUT or IN-OUT args, if any
376 
377 
378 
379 
380 
381 
382   end;
383 
384   procedure validate_act_product_items(p0_a0  NUMBER
385     , p0_a1  DATE
386     , p0_a2  NUMBER
387     , p0_a3  DATE
388     , p0_a4  NUMBER
389     , p0_a5  NUMBER
390     , p0_a6  NUMBER
391     , p0_a7  NUMBER
392     , p0_a8  VARCHAR2
393     , p0_a9  VARCHAR2
394     , p0_a10  VARCHAR2
395     , p0_a11  VARCHAR2
396     , p0_a12  VARCHAR2
397     , p0_a13  NUMBER
398     , p0_a14  NUMBER
399     , p0_a15  NUMBER
400     , p0_a16  NUMBER
401     , p0_a17  VARCHAR2
402     , p0_a18  NUMBER
403     , p0_a19  NUMBER
404     , p0_a20  VARCHAR2
405     , p0_a21  VARCHAR2
406     , p0_a22  VARCHAR2
407     , p0_a23  VARCHAR2
408     , p0_a24  VARCHAR2
409     , p0_a25  VARCHAR2
410     , p0_a26  VARCHAR2
411     , p0_a27  VARCHAR2
412     , p0_a28  VARCHAR2
413     , p0_a29  VARCHAR2
414     , p0_a30  VARCHAR2
415     , p0_a31  VARCHAR2
416     , p0_a32  VARCHAR2
417     , p0_a33  VARCHAR2
418     , p0_a34  VARCHAR2
419     , p0_a35  VARCHAR2
420     , p0_a36  NUMBER
421     , p0_a37  VARCHAR2
422     , p0_a38  NUMBER
423     , p0_a39  NUMBER
424     , p0_a40  NUMBER
425     , p0_a41  VARCHAR2
426     , p_validation_mode  VARCHAR2
427     , x_return_status out nocopy  VARCHAR2
428   )
429 
430   as
431     ddp_act_product_rec ams_actproduct_pvt.act_product_rec_type;
432     ddindx binary_integer; indx binary_integer;
433   begin
434 
435     -- copy data to the local IN or IN-OUT args, if any
436     ddp_act_product_rec.activity_product_id := p0_a0;
437     ddp_act_product_rec.last_update_date := p0_a1;
438     ddp_act_product_rec.last_updated_by := p0_a2;
439     ddp_act_product_rec.creation_date := p0_a3;
440     ddp_act_product_rec.created_by := p0_a4;
441     ddp_act_product_rec.last_update_login := p0_a5;
442     ddp_act_product_rec.object_version_number := p0_a6;
443     ddp_act_product_rec.act_product_used_by_id := p0_a7;
444     ddp_act_product_rec.arc_act_product_used_by := p0_a8;
445     ddp_act_product_rec.product_sale_type := p0_a9;
446     ddp_act_product_rec.primary_product_flag := p0_a10;
447     ddp_act_product_rec.enabled_flag := p0_a11;
448     ddp_act_product_rec.excluded_flag := p0_a12;
449     ddp_act_product_rec.category_id := p0_a13;
450     ddp_act_product_rec.category_set_id := p0_a14;
451     ddp_act_product_rec.organization_id := p0_a15;
452     ddp_act_product_rec.inventory_item_id := p0_a16;
453     ddp_act_product_rec.level_type_code := p0_a17;
454     ddp_act_product_rec.line_lumpsum_amount := p0_a18;
455     ddp_act_product_rec.line_lumpsum_qty := p0_a19;
456     ddp_act_product_rec.attribute_category := p0_a20;
457     ddp_act_product_rec.attribute1 := p0_a21;
458     ddp_act_product_rec.attribute2 := p0_a22;
459     ddp_act_product_rec.attribute3 := p0_a23;
460     ddp_act_product_rec.attribute4 := p0_a24;
461     ddp_act_product_rec.attribute5 := p0_a25;
462     ddp_act_product_rec.attribute6 := p0_a26;
463     ddp_act_product_rec.attribute7 := p0_a27;
464     ddp_act_product_rec.attribute8 := p0_a28;
465     ddp_act_product_rec.attribute9 := p0_a29;
466     ddp_act_product_rec.attribute10 := p0_a30;
467     ddp_act_product_rec.attribute11 := p0_a31;
468     ddp_act_product_rec.attribute12 := p0_a32;
469     ddp_act_product_rec.attribute13 := p0_a33;
470     ddp_act_product_rec.attribute14 := p0_a34;
471     ddp_act_product_rec.attribute15 := p0_a35;
472     ddp_act_product_rec.channel_id := p0_a36;
473     ddp_act_product_rec.uom_code := p0_a37;
474     ddp_act_product_rec.quantity := p0_a38;
475     ddp_act_product_rec.scan_value := p0_a39;
476     ddp_act_product_rec.scan_unit_forecast := p0_a40;
477     ddp_act_product_rec.adjustment_flag := p0_a41;
478 
479 
480 
481     -- here's the delegated call to the old PL/SQL routine
482     ams_actproduct_pvt.validate_act_product_items(ddp_act_product_rec,
483       p_validation_mode,
484       x_return_status);
485 
486     -- copy data back from the local variables to OUT or IN-OUT args, if any
487 
488 
489   end;
490 
491   procedure validate_act_product_record(p0_a0  NUMBER
492     , p0_a1  DATE
493     , p0_a2  NUMBER
494     , p0_a3  DATE
495     , p0_a4  NUMBER
496     , p0_a5  NUMBER
497     , p0_a6  NUMBER
498     , p0_a7  NUMBER
499     , p0_a8  VARCHAR2
500     , p0_a9  VARCHAR2
501     , p0_a10  VARCHAR2
502     , p0_a11  VARCHAR2
503     , p0_a12  VARCHAR2
504     , p0_a13  NUMBER
505     , p0_a14  NUMBER
506     , p0_a15  NUMBER
507     , p0_a16  NUMBER
508     , p0_a17  VARCHAR2
509     , p0_a18  NUMBER
510     , p0_a19  NUMBER
511     , p0_a20  VARCHAR2
512     , p0_a21  VARCHAR2
513     , p0_a22  VARCHAR2
514     , p0_a23  VARCHAR2
515     , p0_a24  VARCHAR2
516     , p0_a25  VARCHAR2
517     , p0_a26  VARCHAR2
518     , p0_a27  VARCHAR2
519     , p0_a28  VARCHAR2
520     , p0_a29  VARCHAR2
521     , p0_a30  VARCHAR2
522     , p0_a31  VARCHAR2
523     , p0_a32  VARCHAR2
524     , p0_a33  VARCHAR2
525     , p0_a34  VARCHAR2
526     , p0_a35  VARCHAR2
527     , p0_a36  NUMBER
528     , p0_a37  VARCHAR2
529     , p0_a38  NUMBER
530     , p0_a39  NUMBER
531     , p0_a40  NUMBER
532     , p0_a41  VARCHAR2
533     , x_return_status out nocopy  VARCHAR2
534   )
535 
536   as
537     ddp_act_product_rec ams_actproduct_pvt.act_product_rec_type;
538     ddindx binary_integer; indx binary_integer;
539   begin
540 
541     -- copy data to the local IN or IN-OUT args, if any
542     ddp_act_product_rec.activity_product_id := p0_a0;
543     ddp_act_product_rec.last_update_date := p0_a1;
544     ddp_act_product_rec.last_updated_by := p0_a2;
545     ddp_act_product_rec.creation_date := p0_a3;
546     ddp_act_product_rec.created_by := p0_a4;
547     ddp_act_product_rec.last_update_login := p0_a5;
548     ddp_act_product_rec.object_version_number := p0_a6;
549     ddp_act_product_rec.act_product_used_by_id := p0_a7;
550     ddp_act_product_rec.arc_act_product_used_by := p0_a8;
551     ddp_act_product_rec.product_sale_type := p0_a9;
552     ddp_act_product_rec.primary_product_flag := p0_a10;
553     ddp_act_product_rec.enabled_flag := p0_a11;
554     ddp_act_product_rec.excluded_flag := p0_a12;
555     ddp_act_product_rec.category_id := p0_a13;
556     ddp_act_product_rec.category_set_id := p0_a14;
557     ddp_act_product_rec.organization_id := p0_a15;
558     ddp_act_product_rec.inventory_item_id := p0_a16;
559     ddp_act_product_rec.level_type_code := p0_a17;
560     ddp_act_product_rec.line_lumpsum_amount := p0_a18;
561     ddp_act_product_rec.line_lumpsum_qty := p0_a19;
562     ddp_act_product_rec.attribute_category := p0_a20;
563     ddp_act_product_rec.attribute1 := p0_a21;
564     ddp_act_product_rec.attribute2 := p0_a22;
565     ddp_act_product_rec.attribute3 := p0_a23;
566     ddp_act_product_rec.attribute4 := p0_a24;
567     ddp_act_product_rec.attribute5 := p0_a25;
568     ddp_act_product_rec.attribute6 := p0_a26;
569     ddp_act_product_rec.attribute7 := p0_a27;
570     ddp_act_product_rec.attribute8 := p0_a28;
571     ddp_act_product_rec.attribute9 := p0_a29;
572     ddp_act_product_rec.attribute10 := p0_a30;
573     ddp_act_product_rec.attribute11 := p0_a31;
574     ddp_act_product_rec.attribute12 := p0_a32;
575     ddp_act_product_rec.attribute13 := p0_a33;
576     ddp_act_product_rec.attribute14 := p0_a34;
577     ddp_act_product_rec.attribute15 := p0_a35;
578     ddp_act_product_rec.channel_id := p0_a36;
579     ddp_act_product_rec.uom_code := p0_a37;
580     ddp_act_product_rec.quantity := p0_a38;
581     ddp_act_product_rec.scan_value := p0_a39;
582     ddp_act_product_rec.scan_unit_forecast := p0_a40;
583     ddp_act_product_rec.adjustment_flag := p0_a41;
584 
585 
586     -- here's the delegated call to the old PL/SQL routine
587     ams_actproduct_pvt.validate_act_product_record(ddp_act_product_rec,
588       x_return_status);
589 
590     -- copy data back from the local variables to OUT or IN-OUT args, if any
591 
592   end;
593 
594   procedure complete_act_product_rec(p0_a0  NUMBER
595     , p0_a1  DATE
596     , p0_a2  NUMBER
597     , p0_a3  DATE
598     , p0_a4  NUMBER
599     , p0_a5  NUMBER
600     , p0_a6  NUMBER
601     , p0_a7  NUMBER
602     , p0_a8  VARCHAR2
603     , p0_a9  VARCHAR2
604     , p0_a10  VARCHAR2
605     , p0_a11  VARCHAR2
606     , p0_a12  VARCHAR2
607     , p0_a13  NUMBER
608     , p0_a14  NUMBER
609     , p0_a15  NUMBER
610     , p0_a16  NUMBER
611     , p0_a17  VARCHAR2
612     , p0_a18  NUMBER
613     , p0_a19  NUMBER
614     , p0_a20  VARCHAR2
615     , p0_a21  VARCHAR2
616     , p0_a22  VARCHAR2
617     , p0_a23  VARCHAR2
618     , p0_a24  VARCHAR2
619     , p0_a25  VARCHAR2
620     , p0_a26  VARCHAR2
621     , p0_a27  VARCHAR2
622     , p0_a28  VARCHAR2
623     , p0_a29  VARCHAR2
624     , p0_a30  VARCHAR2
625     , p0_a31  VARCHAR2
626     , p0_a32  VARCHAR2
627     , p0_a33  VARCHAR2
628     , p0_a34  VARCHAR2
629     , p0_a35  VARCHAR2
630     , p0_a36  NUMBER
631     , p0_a37  VARCHAR2
632     , p0_a38  NUMBER
633     , p0_a39  NUMBER
634     , p0_a40  NUMBER
635     , p0_a41  VARCHAR2
636     , p1_a0 out nocopy  NUMBER
637     , p1_a1 out nocopy  DATE
638     , p1_a2 out nocopy  NUMBER
639     , p1_a3 out nocopy  DATE
640     , p1_a4 out nocopy  NUMBER
641     , p1_a5 out nocopy  NUMBER
642     , p1_a6 out nocopy  NUMBER
643     , p1_a7 out nocopy  NUMBER
644     , p1_a8 out nocopy  VARCHAR2
645     , p1_a9 out nocopy  VARCHAR2
646     , p1_a10 out nocopy  VARCHAR2
647     , p1_a11 out nocopy  VARCHAR2
648     , p1_a12 out nocopy  VARCHAR2
649     , p1_a13 out nocopy  NUMBER
650     , p1_a14 out nocopy  NUMBER
651     , p1_a15 out nocopy  NUMBER
652     , p1_a16 out nocopy  NUMBER
653     , p1_a17 out nocopy  VARCHAR2
654     , p1_a18 out nocopy  NUMBER
655     , p1_a19 out nocopy  NUMBER
656     , p1_a20 out nocopy  VARCHAR2
657     , p1_a21 out nocopy  VARCHAR2
658     , p1_a22 out nocopy  VARCHAR2
659     , p1_a23 out nocopy  VARCHAR2
660     , p1_a24 out nocopy  VARCHAR2
661     , p1_a25 out nocopy  VARCHAR2
662     , p1_a26 out nocopy  VARCHAR2
663     , p1_a27 out nocopy  VARCHAR2
664     , p1_a28 out nocopy  VARCHAR2
665     , p1_a29 out nocopy  VARCHAR2
666     , p1_a30 out nocopy  VARCHAR2
667     , p1_a31 out nocopy  VARCHAR2
668     , p1_a32 out nocopy  VARCHAR2
669     , p1_a33 out nocopy  VARCHAR2
670     , p1_a34 out nocopy  VARCHAR2
671     , p1_a35 out nocopy  VARCHAR2
672     , p1_a36 out nocopy  NUMBER
673     , p1_a37 out nocopy  VARCHAR2
674     , p1_a38 out nocopy  NUMBER
675     , p1_a39 out nocopy  NUMBER
676     , p1_a40 out nocopy  NUMBER
677     , p1_a41 out nocopy  VARCHAR2
678   )
679 
680   as
681     ddp_act_product_rec ams_actproduct_pvt.act_product_rec_type;
682     ddx_act_product_rec ams_actproduct_pvt.act_product_rec_type;
683     ddindx binary_integer; indx binary_integer;
684   begin
685 
686     -- copy data to the local IN or IN-OUT args, if any
687     ddp_act_product_rec.activity_product_id := p0_a0;
688     ddp_act_product_rec.last_update_date := p0_a1;
689     ddp_act_product_rec.last_updated_by := p0_a2;
690     ddp_act_product_rec.creation_date := p0_a3;
691     ddp_act_product_rec.created_by := p0_a4;
692     ddp_act_product_rec.last_update_login := p0_a5;
693     ddp_act_product_rec.object_version_number := p0_a6;
694     ddp_act_product_rec.act_product_used_by_id := p0_a7;
695     ddp_act_product_rec.arc_act_product_used_by := p0_a8;
696     ddp_act_product_rec.product_sale_type := p0_a9;
697     ddp_act_product_rec.primary_product_flag := p0_a10;
698     ddp_act_product_rec.enabled_flag := p0_a11;
699     ddp_act_product_rec.excluded_flag := p0_a12;
700     ddp_act_product_rec.category_id := p0_a13;
701     ddp_act_product_rec.category_set_id := p0_a14;
702     ddp_act_product_rec.organization_id := p0_a15;
703     ddp_act_product_rec.inventory_item_id := p0_a16;
704     ddp_act_product_rec.level_type_code := p0_a17;
705     ddp_act_product_rec.line_lumpsum_amount := p0_a18;
706     ddp_act_product_rec.line_lumpsum_qty := p0_a19;
707     ddp_act_product_rec.attribute_category := p0_a20;
708     ddp_act_product_rec.attribute1 := p0_a21;
709     ddp_act_product_rec.attribute2 := p0_a22;
710     ddp_act_product_rec.attribute3 := p0_a23;
711     ddp_act_product_rec.attribute4 := p0_a24;
712     ddp_act_product_rec.attribute5 := p0_a25;
713     ddp_act_product_rec.attribute6 := p0_a26;
714     ddp_act_product_rec.attribute7 := p0_a27;
715     ddp_act_product_rec.attribute8 := p0_a28;
716     ddp_act_product_rec.attribute9 := p0_a29;
717     ddp_act_product_rec.attribute10 := p0_a30;
718     ddp_act_product_rec.attribute11 := p0_a31;
719     ddp_act_product_rec.attribute12 := p0_a32;
720     ddp_act_product_rec.attribute13 := p0_a33;
721     ddp_act_product_rec.attribute14 := p0_a34;
722     ddp_act_product_rec.attribute15 := p0_a35;
723     ddp_act_product_rec.channel_id := p0_a36;
724     ddp_act_product_rec.uom_code := p0_a37;
725     ddp_act_product_rec.quantity := p0_a38;
726     ddp_act_product_rec.scan_value := p0_a39;
727     ddp_act_product_rec.scan_unit_forecast := p0_a40;
728     ddp_act_product_rec.adjustment_flag := p0_a41;
729 
730 
731     -- here's the delegated call to the old PL/SQL routine
732     ams_actproduct_pvt.complete_act_product_rec(ddp_act_product_rec,
733       ddx_act_product_rec);
734 
735     -- copy data back from the local variables to OUT or IN-OUT args, if any
736 
737     p1_a0 := ddx_act_product_rec.activity_product_id;
738     p1_a1 := ddx_act_product_rec.last_update_date;
739     p1_a2 := ddx_act_product_rec.last_updated_by;
740     p1_a3 := ddx_act_product_rec.creation_date;
741     p1_a4 := ddx_act_product_rec.created_by;
742     p1_a5 := ddx_act_product_rec.last_update_login;
743     p1_a6 := ddx_act_product_rec.object_version_number;
744     p1_a7 := ddx_act_product_rec.act_product_used_by_id;
745     p1_a8 := ddx_act_product_rec.arc_act_product_used_by;
746     p1_a9 := ddx_act_product_rec.product_sale_type;
747     p1_a10 := ddx_act_product_rec.primary_product_flag;
748     p1_a11 := ddx_act_product_rec.enabled_flag;
749     p1_a12 := ddx_act_product_rec.excluded_flag;
750     p1_a13 := ddx_act_product_rec.category_id;
751     p1_a14 := ddx_act_product_rec.category_set_id;
752     p1_a15 := ddx_act_product_rec.organization_id;
753     p1_a16 := ddx_act_product_rec.inventory_item_id;
754     p1_a17 := ddx_act_product_rec.level_type_code;
755     p1_a18 := ddx_act_product_rec.line_lumpsum_amount;
756     p1_a19 := ddx_act_product_rec.line_lumpsum_qty;
757     p1_a20 := ddx_act_product_rec.attribute_category;
758     p1_a21 := ddx_act_product_rec.attribute1;
759     p1_a22 := ddx_act_product_rec.attribute2;
760     p1_a23 := ddx_act_product_rec.attribute3;
761     p1_a24 := ddx_act_product_rec.attribute4;
762     p1_a25 := ddx_act_product_rec.attribute5;
763     p1_a26 := ddx_act_product_rec.attribute6;
764     p1_a27 := ddx_act_product_rec.attribute7;
765     p1_a28 := ddx_act_product_rec.attribute8;
766     p1_a29 := ddx_act_product_rec.attribute9;
767     p1_a30 := ddx_act_product_rec.attribute10;
768     p1_a31 := ddx_act_product_rec.attribute11;
769     p1_a32 := ddx_act_product_rec.attribute12;
770     p1_a33 := ddx_act_product_rec.attribute13;
771     p1_a34 := ddx_act_product_rec.attribute14;
772     p1_a35 := ddx_act_product_rec.attribute15;
773     p1_a36 := ddx_act_product_rec.channel_id;
774     p1_a37 := ddx_act_product_rec.uom_code;
775     p1_a38 := ddx_act_product_rec.quantity;
776     p1_a39 := ddx_act_product_rec.scan_value;
777     p1_a40 := ddx_act_product_rec.scan_unit_forecast;
778     p1_a41 := ddx_act_product_rec.adjustment_flag;
779   end;
780 
781 end ams_actproduct_pvt_oa;