DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_CAMPAIGN_PUB_NEW_W

Source


1 package body ams_campaign_pub_new_w as
2   /* $Header: amsacpnb.pls 120.0 2005/08/10 00:01:32 appldev noship $ */
3   procedure create_campaign(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  NUMBER
19     , p7_a9  NUMBER
20     , p7_a10  VARCHAR2
21     , p7_a11  DATE
22     , p7_a12  VARCHAR2
23     , p7_a13  VARCHAR2
24     , p7_a14  VARCHAR2
25     , p7_a15  VARCHAR2
26     , p7_a16  VARCHAR2
27     , p7_a17  VARCHAR2
28     , p7_a18  VARCHAR2
29     , p7_a19  VARCHAR2
30     , p7_a20  VARCHAR2
31     , p7_a21  VARCHAR2
32     , p7_a22  VARCHAR2
33     , p7_a23  VARCHAR2
34     , p7_a24  NUMBER
35     , p7_a25  NUMBER
36     , p7_a26  NUMBER
37     , p7_a27  NUMBER
38     , p7_a28  NUMBER
39     , p7_a29  NUMBER
40     , p7_a30  VARCHAR2
41     , p7_a31  VARCHAR2
42     , p7_a32  VARCHAR2
43     , p7_a33  VARCHAR2
44     , p7_a34  VARCHAR2
45     , p7_a35  NUMBER
46     , p7_a36  NUMBER
47     , p7_a37  DATE
48     , p7_a38  DATE
49     , p7_a39  DATE
50     , p7_a40  DATE
51     , p7_a41  DATE
52     , p7_a42  DATE
53     , p7_a43  DATE
54     , p7_a44  DATE
55     , p7_a45  VARCHAR2
56     , p7_a46  VARCHAR2
57     , p7_a47  VARCHAR2
58     , p7_a48  NUMBER
59     , p7_a49  VARCHAR2
60     , p7_a50  VARCHAR2
61     , p7_a51  NUMBER
62     , p7_a52  VARCHAR2
63     , p7_a53  VARCHAR2
64     , p7_a54  VARCHAR2
65     , p7_a55  VARCHAR2
66     , p7_a56  NUMBER
67     , p7_a57  NUMBER
68     , p7_a58  NUMBER
69     , p7_a59  NUMBER
70     , p7_a60  NUMBER
71     , p7_a61  NUMBER
72     , p7_a62  NUMBER
73     , p7_a63  NUMBER
74     , p7_a64  VARCHAR2
75     , p7_a65  VARCHAR2
76     , p7_a66  VARCHAR2
77     , p7_a67  VARCHAR2
78     , p7_a68  VARCHAR2
79     , p7_a69  VARCHAR2
80     , p7_a70  VARCHAR2
81     , p7_a71  VARCHAR2
82     , p7_a72  VARCHAR2
83     , p7_a73  VARCHAR2
84     , p7_a74  VARCHAR2
85     , p7_a75  VARCHAR2
86     , p7_a76  VARCHAR2
87     , p7_a77  VARCHAR2
88     , p7_a78  VARCHAR2
89     , p7_a79  VARCHAR2
90     , p7_a80  VARCHAR2
91     , p7_a81  VARCHAR2
92     , p7_a82  VARCHAR2
93     , p7_a83  VARCHAR2
94     , p7_a84  VARCHAR2
95     , p7_a85  NUMBER
96     , p7_a86  VARCHAR2
97     , p7_a87  VARCHAR2
98     , p7_a88  VARCHAR2
99     , p7_a89  NUMBER
100     , p7_a90  VARCHAR2
101     , p7_a91  VARCHAR2
102     , p7_a92  NUMBER
103     , p7_a93  VARCHAR2
104     , p7_a94  NUMBER
105     , p7_a95  VARCHAR2
106     , p7_a96  NUMBER
107     , p7_a97  VARCHAR2
108     , p7_a98  VARCHAR2
109     , p7_a99  VARCHAR2
110     , p7_a100  VARCHAR2
111     , p7_a101  VARCHAR2
112     , p7_a102  VARCHAR2
113     , p7_a103  VARCHAR2
114     , p7_a104  VARCHAR2
115     , p7_a105  VARCHAR2
116     , p7_a106  VARCHAR2
117     , p7_a107  VARCHAR2
118     , p7_a108  VARCHAR2
119     , p7_a109  VARCHAR2
120     , p7_a110  VARCHAR2
121     , p7_a111  VARCHAR2
122     , p7_a112  VARCHAR2
123     , x_camp_id out nocopy  NUMBER
124   )
125 
126   as
127     ddp_camp_rec ams_campaign_pvt.camp_rec_type;
128     ddindx binary_integer; indx binary_integer;
129   begin
130 
131     -- copy data to the local IN or IN-OUT args, if any
132 
133 
134 
135 
136 
137 
138 
139     ddp_camp_rec.campaign_id := p7_a0;
140     ddp_camp_rec.last_update_date := p7_a1;
141     ddp_camp_rec.last_updated_by := p7_a2;
142     ddp_camp_rec.creation_date := p7_a3;
143     ddp_camp_rec.created_by := p7_a4;
144     ddp_camp_rec.last_update_login := p7_a5;
145     ddp_camp_rec.object_version_number := p7_a6;
146     ddp_camp_rec.custom_setup_id := p7_a7;
147     ddp_camp_rec.owner_user_id := p7_a8;
148     ddp_camp_rec.user_status_id := p7_a9;
149     ddp_camp_rec.status_code := p7_a10;
150     ddp_camp_rec.status_date := p7_a11;
151     ddp_camp_rec.active_flag := p7_a12;
152     ddp_camp_rec.private_flag := p7_a13;
153     ddp_camp_rec.partner_flag := p7_a14;
154     ddp_camp_rec.template_flag := p7_a15;
155     ddp_camp_rec.cascade_source_code_flag := p7_a16;
156     ddp_camp_rec.inherit_attributes_flag := p7_a17;
157     ddp_camp_rec.source_code := p7_a18;
158     ddp_camp_rec.rollup_type := p7_a19;
159     ddp_camp_rec.campaign_type := p7_a20;
160     ddp_camp_rec.media_type_code := p7_a21;
161     ddp_camp_rec.priority := p7_a22;
162     ddp_camp_rec.fund_source_type := p7_a23;
163     ddp_camp_rec.fund_source_id := p7_a24;
164     ddp_camp_rec.parent_campaign_id := p7_a25;
165     ddp_camp_rec.application_id := p7_a26;
166     ddp_camp_rec.qp_list_header_id := p7_a27;
167     ddp_camp_rec.media_id := p7_a28;
168     ddp_camp_rec.channel_id := p7_a29;
169     ddp_camp_rec.event_type := p7_a30;
170     ddp_camp_rec.arc_channel_from := p7_a31;
171     ddp_camp_rec.dscript_name := p7_a32;
172     ddp_camp_rec.transaction_currency_code := p7_a33;
173     ddp_camp_rec.functional_currency_code := p7_a34;
174     ddp_camp_rec.budget_amount_tc := p7_a35;
175     ddp_camp_rec.budget_amount_fc := p7_a36;
176     ddp_camp_rec.forecasted_plan_start_date := p7_a37;
177     ddp_camp_rec.forecasted_plan_end_date := p7_a38;
178     ddp_camp_rec.forecasted_exec_start_date := p7_a39;
179     ddp_camp_rec.forecasted_exec_end_date := p7_a40;
180     ddp_camp_rec.actual_plan_start_date := p7_a41;
181     ddp_camp_rec.actual_plan_end_date := p7_a42;
182     ddp_camp_rec.actual_exec_start_date := p7_a43;
183     ddp_camp_rec.actual_exec_end_date := p7_a44;
184     ddp_camp_rec.inbound_url := p7_a45;
185     ddp_camp_rec.inbound_email_id := p7_a46;
186     ddp_camp_rec.inbound_phone_no := p7_a47;
187     ddp_camp_rec.duration := p7_a48;
188     ddp_camp_rec.duration_uom_code := p7_a49;
189     ddp_camp_rec.ff_priority := p7_a50;
190     ddp_camp_rec.ff_override_cover_letter := p7_a51;
191     ddp_camp_rec.ff_shipping_method := p7_a52;
192     ddp_camp_rec.ff_carrier := p7_a53;
193     ddp_camp_rec.content_source := p7_a54;
194     ddp_camp_rec.cc_call_strategy := p7_a55;
195     ddp_camp_rec.cc_manager_user_id := p7_a56;
196     ddp_camp_rec.forecasted_revenue := p7_a57;
197     ddp_camp_rec.actual_revenue := p7_a58;
198     ddp_camp_rec.forecasted_cost := p7_a59;
199     ddp_camp_rec.actual_cost := p7_a60;
200     ddp_camp_rec.forecasted_response := p7_a61;
201     ddp_camp_rec.actual_response := p7_a62;
202     ddp_camp_rec.target_response := p7_a63;
203     ddp_camp_rec.country_code := p7_a64;
204     ddp_camp_rec.language_code := p7_a65;
205     ddp_camp_rec.attribute_category := p7_a66;
206     ddp_camp_rec.attribute1 := p7_a67;
207     ddp_camp_rec.attribute2 := p7_a68;
208     ddp_camp_rec.attribute3 := p7_a69;
209     ddp_camp_rec.attribute4 := p7_a70;
210     ddp_camp_rec.attribute5 := p7_a71;
211     ddp_camp_rec.attribute6 := p7_a72;
212     ddp_camp_rec.attribute7 := p7_a73;
213     ddp_camp_rec.attribute8 := p7_a74;
214     ddp_camp_rec.attribute9 := p7_a75;
215     ddp_camp_rec.attribute10 := p7_a76;
216     ddp_camp_rec.attribute11 := p7_a77;
217     ddp_camp_rec.attribute12 := p7_a78;
218     ddp_camp_rec.attribute13 := p7_a79;
219     ddp_camp_rec.attribute14 := p7_a80;
220     ddp_camp_rec.attribute15 := p7_a81;
221     ddp_camp_rec.campaign_name := p7_a82;
222     ddp_camp_rec.campaign_theme := p7_a83;
223     ddp_camp_rec.description := p7_a84;
224     ddp_camp_rec.version_no := p7_a85;
225     ddp_camp_rec.campaign_calendar := p7_a86;
226     ddp_camp_rec.start_period_name := p7_a87;
227     ddp_camp_rec.end_period_name := p7_a88;
228     ddp_camp_rec.city_id := p7_a89;
229     ddp_camp_rec.global_flag := p7_a90;
230     ddp_camp_rec.show_campaign_flag := p7_a91;
231     ddp_camp_rec.business_unit_id := p7_a92;
232     ddp_camp_rec.accounts_closed_flag := p7_a93;
233     ddp_camp_rec.task_id := p7_a94;
234     ddp_camp_rec.related_event_from := p7_a95;
235     ddp_camp_rec.related_event_id := p7_a96;
236     ddp_camp_rec.program_attribute_category := p7_a97;
237     ddp_camp_rec.program_attribute1 := p7_a98;
238     ddp_camp_rec.program_attribute2 := p7_a99;
239     ddp_camp_rec.program_attribute3 := p7_a100;
240     ddp_camp_rec.program_attribute4 := p7_a101;
241     ddp_camp_rec.program_attribute5 := p7_a102;
242     ddp_camp_rec.program_attribute6 := p7_a103;
243     ddp_camp_rec.program_attribute7 := p7_a104;
244     ddp_camp_rec.program_attribute8 := p7_a105;
245     ddp_camp_rec.program_attribute9 := p7_a106;
246     ddp_camp_rec.program_attribute10 := p7_a107;
247     ddp_camp_rec.program_attribute11 := p7_a108;
248     ddp_camp_rec.program_attribute12 := p7_a109;
249     ddp_camp_rec.program_attribute13 := p7_a110;
250     ddp_camp_rec.program_attribute14 := p7_a111;
251     ddp_camp_rec.program_attribute15 := p7_a112;
252 
253 
254     -- here's the delegated call to the old PL/SQL routine
255     ams_campaign_pub.create_campaign(p_api_version,
256       p_init_msg_list,
257       p_commit,
258       p_validation_level,
259       x_return_status,
260       x_msg_count,
261       x_msg_data,
262       ddp_camp_rec,
263       x_camp_id);
264 
265     -- copy data back from the local variables to OUT or IN-OUT args, if any
266 
267 
268 
269 
270 
271 
272 
273 
274   end;
275 
276   procedure update_campaign(p_api_version  NUMBER
277     , p_init_msg_list  VARCHAR2
278     , p_commit  VARCHAR2
279     , p_validation_level  NUMBER
280     , x_return_status out nocopy  VARCHAR2
281     , x_msg_count out nocopy  NUMBER
282     , x_msg_data out nocopy  VARCHAR2
283     , p7_a0  NUMBER
284     , p7_a1  DATE
285     , p7_a2  NUMBER
286     , p7_a3  DATE
287     , p7_a4  NUMBER
288     , p7_a5  NUMBER
289     , p7_a6  NUMBER
290     , p7_a7  NUMBER
291     , p7_a8  NUMBER
292     , p7_a9  NUMBER
293     , p7_a10  VARCHAR2
294     , p7_a11  DATE
295     , p7_a12  VARCHAR2
296     , p7_a13  VARCHAR2
297     , p7_a14  VARCHAR2
298     , p7_a15  VARCHAR2
299     , p7_a16  VARCHAR2
300     , p7_a17  VARCHAR2
301     , p7_a18  VARCHAR2
302     , p7_a19  VARCHAR2
303     , p7_a20  VARCHAR2
304     , p7_a21  VARCHAR2
305     , p7_a22  VARCHAR2
306     , p7_a23  VARCHAR2
307     , p7_a24  NUMBER
308     , p7_a25  NUMBER
309     , p7_a26  NUMBER
310     , p7_a27  NUMBER
311     , p7_a28  NUMBER
312     , p7_a29  NUMBER
313     , p7_a30  VARCHAR2
314     , p7_a31  VARCHAR2
315     , p7_a32  VARCHAR2
316     , p7_a33  VARCHAR2
317     , p7_a34  VARCHAR2
318     , p7_a35  NUMBER
319     , p7_a36  NUMBER
320     , p7_a37  DATE
321     , p7_a38  DATE
322     , p7_a39  DATE
323     , p7_a40  DATE
324     , p7_a41  DATE
325     , p7_a42  DATE
326     , p7_a43  DATE
327     , p7_a44  DATE
328     , p7_a45  VARCHAR2
329     , p7_a46  VARCHAR2
330     , p7_a47  VARCHAR2
331     , p7_a48  NUMBER
332     , p7_a49  VARCHAR2
333     , p7_a50  VARCHAR2
334     , p7_a51  NUMBER
335     , p7_a52  VARCHAR2
336     , p7_a53  VARCHAR2
337     , p7_a54  VARCHAR2
338     , p7_a55  VARCHAR2
339     , p7_a56  NUMBER
340     , p7_a57  NUMBER
341     , p7_a58  NUMBER
342     , p7_a59  NUMBER
343     , p7_a60  NUMBER
344     , p7_a61  NUMBER
345     , p7_a62  NUMBER
346     , p7_a63  NUMBER
347     , p7_a64  VARCHAR2
348     , p7_a65  VARCHAR2
349     , p7_a66  VARCHAR2
350     , p7_a67  VARCHAR2
351     , p7_a68  VARCHAR2
352     , p7_a69  VARCHAR2
353     , p7_a70  VARCHAR2
354     , p7_a71  VARCHAR2
355     , p7_a72  VARCHAR2
356     , p7_a73  VARCHAR2
357     , p7_a74  VARCHAR2
358     , p7_a75  VARCHAR2
359     , p7_a76  VARCHAR2
360     , p7_a77  VARCHAR2
361     , p7_a78  VARCHAR2
362     , p7_a79  VARCHAR2
363     , p7_a80  VARCHAR2
364     , p7_a81  VARCHAR2
365     , p7_a82  VARCHAR2
366     , p7_a83  VARCHAR2
367     , p7_a84  VARCHAR2
368     , p7_a85  NUMBER
369     , p7_a86  VARCHAR2
370     , p7_a87  VARCHAR2
371     , p7_a88  VARCHAR2
372     , p7_a89  NUMBER
373     , p7_a90  VARCHAR2
374     , p7_a91  VARCHAR2
375     , p7_a92  NUMBER
376     , p7_a93  VARCHAR2
377     , p7_a94  NUMBER
378     , p7_a95  VARCHAR2
379     , p7_a96  NUMBER
380     , p7_a97  VARCHAR2
381     , p7_a98  VARCHAR2
382     , p7_a99  VARCHAR2
383     , p7_a100  VARCHAR2
384     , p7_a101  VARCHAR2
385     , p7_a102  VARCHAR2
386     , p7_a103  VARCHAR2
387     , p7_a104  VARCHAR2
388     , p7_a105  VARCHAR2
389     , p7_a106  VARCHAR2
390     , p7_a107  VARCHAR2
391     , p7_a108  VARCHAR2
392     , p7_a109  VARCHAR2
393     , p7_a110  VARCHAR2
394     , p7_a111  VARCHAR2
395     , p7_a112  VARCHAR2
396   )
397 
398   as
399     ddp_camp_rec ams_campaign_pvt.camp_rec_type;
400     ddindx binary_integer; indx binary_integer;
401   begin
402 
403     -- copy data to the local IN or IN-OUT args, if any
404 
405 
406 
407 
408 
409 
410 
411     ddp_camp_rec.campaign_id := p7_a0;
412     ddp_camp_rec.last_update_date := p7_a1;
413     ddp_camp_rec.last_updated_by := p7_a2;
414     ddp_camp_rec.creation_date := p7_a3;
415     ddp_camp_rec.created_by := p7_a4;
416     ddp_camp_rec.last_update_login := p7_a5;
417     ddp_camp_rec.object_version_number := p7_a6;
418     ddp_camp_rec.custom_setup_id := p7_a7;
419     ddp_camp_rec.owner_user_id := p7_a8;
420     ddp_camp_rec.user_status_id := p7_a9;
421     ddp_camp_rec.status_code := p7_a10;
422     ddp_camp_rec.status_date := p7_a11;
423     ddp_camp_rec.active_flag := p7_a12;
424     ddp_camp_rec.private_flag := p7_a13;
425     ddp_camp_rec.partner_flag := p7_a14;
426     ddp_camp_rec.template_flag := p7_a15;
427     ddp_camp_rec.cascade_source_code_flag := p7_a16;
428     ddp_camp_rec.inherit_attributes_flag := p7_a17;
429     ddp_camp_rec.source_code := p7_a18;
430     ddp_camp_rec.rollup_type := p7_a19;
431     ddp_camp_rec.campaign_type := p7_a20;
432     ddp_camp_rec.media_type_code := p7_a21;
433     ddp_camp_rec.priority := p7_a22;
434     ddp_camp_rec.fund_source_type := p7_a23;
435     ddp_camp_rec.fund_source_id := p7_a24;
436     ddp_camp_rec.parent_campaign_id := p7_a25;
437     ddp_camp_rec.application_id := p7_a26;
438     ddp_camp_rec.qp_list_header_id := p7_a27;
439     ddp_camp_rec.media_id := p7_a28;
440     ddp_camp_rec.channel_id := p7_a29;
441     ddp_camp_rec.event_type := p7_a30;
442     ddp_camp_rec.arc_channel_from := p7_a31;
443     ddp_camp_rec.dscript_name := p7_a32;
444     ddp_camp_rec.transaction_currency_code := p7_a33;
445     ddp_camp_rec.functional_currency_code := p7_a34;
446     ddp_camp_rec.budget_amount_tc := p7_a35;
447     ddp_camp_rec.budget_amount_fc := p7_a36;
448     ddp_camp_rec.forecasted_plan_start_date := p7_a37;
449     ddp_camp_rec.forecasted_plan_end_date := p7_a38;
450     ddp_camp_rec.forecasted_exec_start_date := p7_a39;
451     ddp_camp_rec.forecasted_exec_end_date := p7_a40;
452     ddp_camp_rec.actual_plan_start_date := p7_a41;
453     ddp_camp_rec.actual_plan_end_date := p7_a42;
454     ddp_camp_rec.actual_exec_start_date := p7_a43;
455     ddp_camp_rec.actual_exec_end_date := p7_a44;
456     ddp_camp_rec.inbound_url := p7_a45;
457     ddp_camp_rec.inbound_email_id := p7_a46;
458     ddp_camp_rec.inbound_phone_no := p7_a47;
459     ddp_camp_rec.duration := p7_a48;
460     ddp_camp_rec.duration_uom_code := p7_a49;
461     ddp_camp_rec.ff_priority := p7_a50;
462     ddp_camp_rec.ff_override_cover_letter := p7_a51;
463     ddp_camp_rec.ff_shipping_method := p7_a52;
464     ddp_camp_rec.ff_carrier := p7_a53;
465     ddp_camp_rec.content_source := p7_a54;
466     ddp_camp_rec.cc_call_strategy := p7_a55;
467     ddp_camp_rec.cc_manager_user_id := p7_a56;
468     ddp_camp_rec.forecasted_revenue := p7_a57;
469     ddp_camp_rec.actual_revenue := p7_a58;
470     ddp_camp_rec.forecasted_cost := p7_a59;
471     ddp_camp_rec.actual_cost := p7_a60;
472     ddp_camp_rec.forecasted_response := p7_a61;
473     ddp_camp_rec.actual_response := p7_a62;
474     ddp_camp_rec.target_response := p7_a63;
475     ddp_camp_rec.country_code := p7_a64;
476     ddp_camp_rec.language_code := p7_a65;
477     ddp_camp_rec.attribute_category := p7_a66;
478     ddp_camp_rec.attribute1 := p7_a67;
479     ddp_camp_rec.attribute2 := p7_a68;
480     ddp_camp_rec.attribute3 := p7_a69;
481     ddp_camp_rec.attribute4 := p7_a70;
482     ddp_camp_rec.attribute5 := p7_a71;
483     ddp_camp_rec.attribute6 := p7_a72;
484     ddp_camp_rec.attribute7 := p7_a73;
485     ddp_camp_rec.attribute8 := p7_a74;
486     ddp_camp_rec.attribute9 := p7_a75;
487     ddp_camp_rec.attribute10 := p7_a76;
488     ddp_camp_rec.attribute11 := p7_a77;
489     ddp_camp_rec.attribute12 := p7_a78;
490     ddp_camp_rec.attribute13 := p7_a79;
491     ddp_camp_rec.attribute14 := p7_a80;
492     ddp_camp_rec.attribute15 := p7_a81;
493     ddp_camp_rec.campaign_name := p7_a82;
494     ddp_camp_rec.campaign_theme := p7_a83;
495     ddp_camp_rec.description := p7_a84;
496     ddp_camp_rec.version_no := p7_a85;
497     ddp_camp_rec.campaign_calendar := p7_a86;
498     ddp_camp_rec.start_period_name := p7_a87;
499     ddp_camp_rec.end_period_name := p7_a88;
500     ddp_camp_rec.city_id := p7_a89;
501     ddp_camp_rec.global_flag := p7_a90;
502     ddp_camp_rec.show_campaign_flag := p7_a91;
503     ddp_camp_rec.business_unit_id := p7_a92;
504     ddp_camp_rec.accounts_closed_flag := p7_a93;
505     ddp_camp_rec.task_id := p7_a94;
506     ddp_camp_rec.related_event_from := p7_a95;
507     ddp_camp_rec.related_event_id := p7_a96;
508     ddp_camp_rec.program_attribute_category := p7_a97;
509     ddp_camp_rec.program_attribute1 := p7_a98;
510     ddp_camp_rec.program_attribute2 := p7_a99;
511     ddp_camp_rec.program_attribute3 := p7_a100;
512     ddp_camp_rec.program_attribute4 := p7_a101;
513     ddp_camp_rec.program_attribute5 := p7_a102;
514     ddp_camp_rec.program_attribute6 := p7_a103;
515     ddp_camp_rec.program_attribute7 := p7_a104;
516     ddp_camp_rec.program_attribute8 := p7_a105;
517     ddp_camp_rec.program_attribute9 := p7_a106;
518     ddp_camp_rec.program_attribute10 := p7_a107;
519     ddp_camp_rec.program_attribute11 := p7_a108;
520     ddp_camp_rec.program_attribute12 := p7_a109;
521     ddp_camp_rec.program_attribute13 := p7_a110;
522     ddp_camp_rec.program_attribute14 := p7_a111;
523     ddp_camp_rec.program_attribute15 := p7_a112;
524 
525     -- here's the delegated call to the old PL/SQL routine
526     ams_campaign_pub.update_campaign(p_api_version,
527       p_init_msg_list,
528       p_commit,
529       p_validation_level,
530       x_return_status,
531       x_msg_count,
532       x_msg_data,
533       ddp_camp_rec);
534 
535     -- copy data back from the local variables to OUT or IN-OUT args, if any
536 
537 
538 
539 
540 
541 
542 
543   end;
544 
545   procedure validate_campaign(p_api_version  NUMBER
546     , p_init_msg_list  VARCHAR2
547     , p_validation_level  NUMBER
548     , x_return_status out nocopy  VARCHAR2
549     , x_msg_count out nocopy  NUMBER
550     , x_msg_data out nocopy  VARCHAR2
551     , p6_a0  NUMBER
552     , p6_a1  DATE
553     , p6_a2  NUMBER
554     , p6_a3  DATE
555     , p6_a4  NUMBER
556     , p6_a5  NUMBER
557     , p6_a6  NUMBER
558     , p6_a7  NUMBER
559     , p6_a8  NUMBER
560     , p6_a9  NUMBER
561     , p6_a10  VARCHAR2
562     , p6_a11  DATE
563     , p6_a12  VARCHAR2
564     , p6_a13  VARCHAR2
565     , p6_a14  VARCHAR2
566     , p6_a15  VARCHAR2
567     , p6_a16  VARCHAR2
568     , p6_a17  VARCHAR2
569     , p6_a18  VARCHAR2
570     , p6_a19  VARCHAR2
571     , p6_a20  VARCHAR2
572     , p6_a21  VARCHAR2
573     , p6_a22  VARCHAR2
574     , p6_a23  VARCHAR2
575     , p6_a24  NUMBER
576     , p6_a25  NUMBER
577     , p6_a26  NUMBER
578     , p6_a27  NUMBER
579     , p6_a28  NUMBER
580     , p6_a29  NUMBER
581     , p6_a30  VARCHAR2
582     , p6_a31  VARCHAR2
583     , p6_a32  VARCHAR2
584     , p6_a33  VARCHAR2
585     , p6_a34  VARCHAR2
586     , p6_a35  NUMBER
587     , p6_a36  NUMBER
588     , p6_a37  DATE
589     , p6_a38  DATE
590     , p6_a39  DATE
591     , p6_a40  DATE
592     , p6_a41  DATE
593     , p6_a42  DATE
594     , p6_a43  DATE
595     , p6_a44  DATE
596     , p6_a45  VARCHAR2
597     , p6_a46  VARCHAR2
598     , p6_a47  VARCHAR2
599     , p6_a48  NUMBER
600     , p6_a49  VARCHAR2
601     , p6_a50  VARCHAR2
602     , p6_a51  NUMBER
603     , p6_a52  VARCHAR2
604     , p6_a53  VARCHAR2
605     , p6_a54  VARCHAR2
606     , p6_a55  VARCHAR2
607     , p6_a56  NUMBER
608     , p6_a57  NUMBER
609     , p6_a58  NUMBER
610     , p6_a59  NUMBER
611     , p6_a60  NUMBER
612     , p6_a61  NUMBER
613     , p6_a62  NUMBER
614     , p6_a63  NUMBER
615     , p6_a64  VARCHAR2
616     , p6_a65  VARCHAR2
617     , p6_a66  VARCHAR2
618     , p6_a67  VARCHAR2
619     , p6_a68  VARCHAR2
620     , p6_a69  VARCHAR2
621     , p6_a70  VARCHAR2
622     , p6_a71  VARCHAR2
623     , p6_a72  VARCHAR2
624     , p6_a73  VARCHAR2
625     , p6_a74  VARCHAR2
626     , p6_a75  VARCHAR2
627     , p6_a76  VARCHAR2
628     , p6_a77  VARCHAR2
629     , p6_a78  VARCHAR2
630     , p6_a79  VARCHAR2
631     , p6_a80  VARCHAR2
632     , p6_a81  VARCHAR2
633     , p6_a82  VARCHAR2
634     , p6_a83  VARCHAR2
635     , p6_a84  VARCHAR2
636     , p6_a85  NUMBER
637     , p6_a86  VARCHAR2
638     , p6_a87  VARCHAR2
639     , p6_a88  VARCHAR2
640     , p6_a89  NUMBER
641     , p6_a90  VARCHAR2
642     , p6_a91  VARCHAR2
643     , p6_a92  NUMBER
644     , p6_a93  VARCHAR2
645     , p6_a94  NUMBER
646     , p6_a95  VARCHAR2
647     , p6_a96  NUMBER
648     , p6_a97  VARCHAR2
649     , p6_a98  VARCHAR2
650     , p6_a99  VARCHAR2
651     , p6_a100  VARCHAR2
652     , p6_a101  VARCHAR2
653     , p6_a102  VARCHAR2
654     , p6_a103  VARCHAR2
655     , p6_a104  VARCHAR2
656     , p6_a105  VARCHAR2
657     , p6_a106  VARCHAR2
658     , p6_a107  VARCHAR2
659     , p6_a108  VARCHAR2
660     , p6_a109  VARCHAR2
661     , p6_a110  VARCHAR2
662     , p6_a111  VARCHAR2
663     , p6_a112  VARCHAR2
664   )
665 
666   as
667     ddp_camp_rec ams_campaign_pvt.camp_rec_type;
668     ddindx binary_integer; indx binary_integer;
669   begin
670 
671     -- copy data to the local IN or IN-OUT args, if any
672 
673 
674 
675 
676 
677 
678     ddp_camp_rec.campaign_id := p6_a0;
679     ddp_camp_rec.last_update_date := p6_a1;
680     ddp_camp_rec.last_updated_by := p6_a2;
681     ddp_camp_rec.creation_date := p6_a3;
682     ddp_camp_rec.created_by := p6_a4;
683     ddp_camp_rec.last_update_login := p6_a5;
684     ddp_camp_rec.object_version_number := p6_a6;
685     ddp_camp_rec.custom_setup_id := p6_a7;
686     ddp_camp_rec.owner_user_id := p6_a8;
687     ddp_camp_rec.user_status_id := p6_a9;
688     ddp_camp_rec.status_code := p6_a10;
689     ddp_camp_rec.status_date := p6_a11;
690     ddp_camp_rec.active_flag := p6_a12;
691     ddp_camp_rec.private_flag := p6_a13;
692     ddp_camp_rec.partner_flag := p6_a14;
693     ddp_camp_rec.template_flag := p6_a15;
694     ddp_camp_rec.cascade_source_code_flag := p6_a16;
695     ddp_camp_rec.inherit_attributes_flag := p6_a17;
696     ddp_camp_rec.source_code := p6_a18;
697     ddp_camp_rec.rollup_type := p6_a19;
698     ddp_camp_rec.campaign_type := p6_a20;
699     ddp_camp_rec.media_type_code := p6_a21;
700     ddp_camp_rec.priority := p6_a22;
701     ddp_camp_rec.fund_source_type := p6_a23;
702     ddp_camp_rec.fund_source_id := p6_a24;
703     ddp_camp_rec.parent_campaign_id := p6_a25;
704     ddp_camp_rec.application_id := p6_a26;
705     ddp_camp_rec.qp_list_header_id := p6_a27;
706     ddp_camp_rec.media_id := p6_a28;
707     ddp_camp_rec.channel_id := p6_a29;
708     ddp_camp_rec.event_type := p6_a30;
709     ddp_camp_rec.arc_channel_from := p6_a31;
710     ddp_camp_rec.dscript_name := p6_a32;
711     ddp_camp_rec.transaction_currency_code := p6_a33;
712     ddp_camp_rec.functional_currency_code := p6_a34;
713     ddp_camp_rec.budget_amount_tc := p6_a35;
714     ddp_camp_rec.budget_amount_fc := p6_a36;
715     ddp_camp_rec.forecasted_plan_start_date := p6_a37;
716     ddp_camp_rec.forecasted_plan_end_date := p6_a38;
717     ddp_camp_rec.forecasted_exec_start_date := p6_a39;
718     ddp_camp_rec.forecasted_exec_end_date := p6_a40;
719     ddp_camp_rec.actual_plan_start_date := p6_a41;
720     ddp_camp_rec.actual_plan_end_date := p6_a42;
721     ddp_camp_rec.actual_exec_start_date := p6_a43;
722     ddp_camp_rec.actual_exec_end_date := p6_a44;
723     ddp_camp_rec.inbound_url := p6_a45;
724     ddp_camp_rec.inbound_email_id := p6_a46;
725     ddp_camp_rec.inbound_phone_no := p6_a47;
726     ddp_camp_rec.duration := p6_a48;
727     ddp_camp_rec.duration_uom_code := p6_a49;
728     ddp_camp_rec.ff_priority := p6_a50;
729     ddp_camp_rec.ff_override_cover_letter := p6_a51;
730     ddp_camp_rec.ff_shipping_method := p6_a52;
731     ddp_camp_rec.ff_carrier := p6_a53;
732     ddp_camp_rec.content_source := p6_a54;
733     ddp_camp_rec.cc_call_strategy := p6_a55;
734     ddp_camp_rec.cc_manager_user_id := p6_a56;
735     ddp_camp_rec.forecasted_revenue := p6_a57;
736     ddp_camp_rec.actual_revenue := p6_a58;
737     ddp_camp_rec.forecasted_cost := p6_a59;
738     ddp_camp_rec.actual_cost := p6_a60;
739     ddp_camp_rec.forecasted_response := p6_a61;
740     ddp_camp_rec.actual_response := p6_a62;
741     ddp_camp_rec.target_response := p6_a63;
742     ddp_camp_rec.country_code := p6_a64;
743     ddp_camp_rec.language_code := p6_a65;
744     ddp_camp_rec.attribute_category := p6_a66;
745     ddp_camp_rec.attribute1 := p6_a67;
746     ddp_camp_rec.attribute2 := p6_a68;
747     ddp_camp_rec.attribute3 := p6_a69;
748     ddp_camp_rec.attribute4 := p6_a70;
749     ddp_camp_rec.attribute5 := p6_a71;
750     ddp_camp_rec.attribute6 := p6_a72;
751     ddp_camp_rec.attribute7 := p6_a73;
752     ddp_camp_rec.attribute8 := p6_a74;
753     ddp_camp_rec.attribute9 := p6_a75;
754     ddp_camp_rec.attribute10 := p6_a76;
755     ddp_camp_rec.attribute11 := p6_a77;
756     ddp_camp_rec.attribute12 := p6_a78;
757     ddp_camp_rec.attribute13 := p6_a79;
758     ddp_camp_rec.attribute14 := p6_a80;
759     ddp_camp_rec.attribute15 := p6_a81;
760     ddp_camp_rec.campaign_name := p6_a82;
761     ddp_camp_rec.campaign_theme := p6_a83;
762     ddp_camp_rec.description := p6_a84;
763     ddp_camp_rec.version_no := p6_a85;
764     ddp_camp_rec.campaign_calendar := p6_a86;
765     ddp_camp_rec.start_period_name := p6_a87;
766     ddp_camp_rec.end_period_name := p6_a88;
767     ddp_camp_rec.city_id := p6_a89;
768     ddp_camp_rec.global_flag := p6_a90;
769     ddp_camp_rec.show_campaign_flag := p6_a91;
770     ddp_camp_rec.business_unit_id := p6_a92;
771     ddp_camp_rec.accounts_closed_flag := p6_a93;
772     ddp_camp_rec.task_id := p6_a94;
773     ddp_camp_rec.related_event_from := p6_a95;
774     ddp_camp_rec.related_event_id := p6_a96;
775     ddp_camp_rec.program_attribute_category := p6_a97;
776     ddp_camp_rec.program_attribute1 := p6_a98;
777     ddp_camp_rec.program_attribute2 := p6_a99;
778     ddp_camp_rec.program_attribute3 := p6_a100;
779     ddp_camp_rec.program_attribute4 := p6_a101;
780     ddp_camp_rec.program_attribute5 := p6_a102;
781     ddp_camp_rec.program_attribute6 := p6_a103;
782     ddp_camp_rec.program_attribute7 := p6_a104;
783     ddp_camp_rec.program_attribute8 := p6_a105;
784     ddp_camp_rec.program_attribute9 := p6_a106;
785     ddp_camp_rec.program_attribute10 := p6_a107;
786     ddp_camp_rec.program_attribute11 := p6_a108;
787     ddp_camp_rec.program_attribute12 := p6_a109;
788     ddp_camp_rec.program_attribute13 := p6_a110;
789     ddp_camp_rec.program_attribute14 := p6_a111;
790     ddp_camp_rec.program_attribute15 := p6_a112;
791 
792     -- here's the delegated call to the old PL/SQL routine
793     ams_campaign_pub.validate_campaign(p_api_version,
794       p_init_msg_list,
795       p_validation_level,
796       x_return_status,
797       x_msg_count,
798       x_msg_data,
799       ddp_camp_rec);
800 
801     -- copy data back from the local variables to OUT or IN-OUT args, if any
802 
803 
804 
805 
806 
807 
808   end;
809 
810 end ams_campaign_pub_new_w;