DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_EVENTHEADER_PUB_W

Source


1 package body ams_eventheader_pub_w as
2   /* $Header: amswevhb.pls 115.16 2003/05/31 00:28:41 dbiswas 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_eventheader(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     , x_evh_id out nocopy  NUMBER
21     , p7_a0  NUMBER := 0-1962.0724
22     , p7_a1  DATE := fnd_api.g_miss_date
23     , p7_a2  NUMBER := 0-1962.0724
24     , p7_a3  DATE := fnd_api.g_miss_date
25     , p7_a4  NUMBER := 0-1962.0724
26     , p7_a5  NUMBER := 0-1962.0724
27     , p7_a6  NUMBER := 0-1962.0724
28     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
29     , p7_a8  NUMBER := 0-1962.0724
30     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
31     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
32     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
33     , p7_a12  NUMBER := 0-1962.0724
34     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
35     , p7_a14  DATE := fnd_api.g_miss_date
36     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
37     , p7_a16  VARCHAR2 := fnd_api.g_miss_char
38     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
39     , p7_a18  VARCHAR2 := fnd_api.g_miss_char
40     , p7_a19  DATE := fnd_api.g_miss_date
41     , p7_a20  DATE := fnd_api.g_miss_date
42     , p7_a21  VARCHAR2 := fnd_api.g_miss_char
43     , p7_a22  VARCHAR2 := fnd_api.g_miss_char
44     , p7_a23  VARCHAR2 := fnd_api.g_miss_char
45     , p7_a24  VARCHAR2 := fnd_api.g_miss_char
46     , p7_a25  VARCHAR2 := fnd_api.g_miss_char
47     , p7_a26  NUMBER := 0-1962.0724
48     , p7_a27  NUMBER := 0-1962.0724
49     , p7_a28  VARCHAR2 := fnd_api.g_miss_char
50     , p7_a29  DATE := fnd_api.g_miss_date
51     , p7_a30  DATE := fnd_api.g_miss_date
52     , p7_a31  NUMBER := 0-1962.0724
53     , p7_a32  NUMBER := 0-1962.0724
54     , p7_a33  VARCHAR2 := fnd_api.g_miss_char
55     , p7_a34  VARCHAR2 := fnd_api.g_miss_char
56     , p7_a35  NUMBER := 0-1962.0724
57     , p7_a36  NUMBER := 0-1962.0724
58     , p7_a37  NUMBER := 0-1962.0724
59     , p7_a38  NUMBER := 0-1962.0724
60     , p7_a39  NUMBER := 0-1962.0724
61     , p7_a40  NUMBER := 0-1962.0724
62     , p7_a41  NUMBER := 0-1962.0724
63     , p7_a42  NUMBER := 0-1962.0724
64     , p7_a43  NUMBER := 0-1962.0724
65     , p7_a44  VARCHAR2 := fnd_api.g_miss_char
66     , p7_a45  NUMBER := 0-1962.0724
67     , p7_a46  NUMBER := 0-1962.0724
68     , p7_a47  NUMBER := 0-1962.0724
69     , p7_a48  VARCHAR2 := fnd_api.g_miss_char
70     , p7_a49  VARCHAR2 := fnd_api.g_miss_char
71     , p7_a50  NUMBER := 0-1962.0724
72     , p7_a51  VARCHAR2 := fnd_api.g_miss_char
73     , p7_a52  VARCHAR2 := fnd_api.g_miss_char
74     , p7_a53  VARCHAR2 := fnd_api.g_miss_char
75     , p7_a54  VARCHAR2 := fnd_api.g_miss_char
76     , p7_a55  VARCHAR2 := fnd_api.g_miss_char
77     , p7_a56  VARCHAR2 := fnd_api.g_miss_char
78     , p7_a57  VARCHAR2 := fnd_api.g_miss_char
79     , p7_a58  VARCHAR2 := fnd_api.g_miss_char
80     , p7_a59  VARCHAR2 := fnd_api.g_miss_char
81     , p7_a60  VARCHAR2 := fnd_api.g_miss_char
82     , p7_a61  VARCHAR2 := fnd_api.g_miss_char
83     , p7_a62  VARCHAR2 := fnd_api.g_miss_char
84     , p7_a63  VARCHAR2 := fnd_api.g_miss_char
85     , p7_a64  VARCHAR2 := fnd_api.g_miss_char
86     , p7_a65  VARCHAR2 := fnd_api.g_miss_char
87     , p7_a66  VARCHAR2 := fnd_api.g_miss_char
88     , p7_a67  VARCHAR2 := fnd_api.g_miss_char
89     , p7_a68  VARCHAR2 := fnd_api.g_miss_char
90     , p7_a69  VARCHAR2 := fnd_api.g_miss_char
91     , p7_a70  VARCHAR2 := fnd_api.g_miss_char
92     , p7_a71  VARCHAR2 := fnd_api.g_miss_char
93     , p7_a72  VARCHAR2 := fnd_api.g_miss_char
94     , p7_a73  VARCHAR2 := fnd_api.g_miss_char
95     , p7_a74  VARCHAR2 := fnd_api.g_miss_char
96     , p7_a75  VARCHAR2 := fnd_api.g_miss_char
97     , p7_a76  NUMBER := 0-1962.0724
98     , p7_a77  VARCHAR2 := fnd_api.g_miss_char
99     , p7_a78  NUMBER := 0-1962.0724
100     , p7_a79  VARCHAR2 := fnd_api.g_miss_char
101     , p7_a80  VARCHAR2 := fnd_api.g_miss_char
102     , p7_a81  VARCHAR2 := fnd_api.g_miss_char
103     , p7_a82  VARCHAR2 := fnd_api.g_miss_char
104     , p7_a83  NUMBER := 0-1962.0724
105     , p7_a84  NUMBER := 0-1962.0724
106     , p7_a85  VARCHAR2 := fnd_api.g_miss_char
107     , p7_a86  VARCHAR2 := fnd_api.g_miss_char
108     , p7_a87  VARCHAR2 := fnd_api.g_miss_char
109   )
110 
111   as
112     ddp_evh_rec ams_eventheader_pvt.evh_rec_type;
113     ddindx binary_integer; indx binary_integer;
114   begin
115 
116     -- copy data to the local IN or IN-OUT args, if any
117 
118 
119 
120 
121 
122 
123 
124     ddp_evh_rec.event_header_id := p7_a0;
125     ddp_evh_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
126     ddp_evh_rec.last_updated_by := p7_a2;
127     ddp_evh_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
128     ddp_evh_rec.created_by := p7_a4;
129     ddp_evh_rec.last_update_login := p7_a5;
130     ddp_evh_rec.object_version_number := p7_a6;
131     ddp_evh_rec.event_level := p7_a7;
132     ddp_evh_rec.application_id := p7_a8;
133     ddp_evh_rec.event_type_code := p7_a9;
134     ddp_evh_rec.active_flag := p7_a10;
135     ddp_evh_rec.private_flag := p7_a11;
136     ddp_evh_rec.user_status_id := p7_a12;
137     ddp_evh_rec.system_status_code := p7_a13;
138     ddp_evh_rec.last_status_date := rosetta_g_miss_date_in_map(p7_a14);
139     ddp_evh_rec.stream_type_code := p7_a15;
140     ddp_evh_rec.source_code := p7_a16;
141     ddp_evh_rec.event_standalone_flag := p7_a17;
142     ddp_evh_rec.day_of_event := p7_a18;
143     ddp_evh_rec.agenda_start_time := rosetta_g_miss_date_in_map(p7_a19);
144     ddp_evh_rec.agenda_end_time := rosetta_g_miss_date_in_map(p7_a20);
145     ddp_evh_rec.reg_required_flag := p7_a21;
146     ddp_evh_rec.reg_charge_flag := p7_a22;
147     ddp_evh_rec.reg_invited_only_flag := p7_a23;
148     ddp_evh_rec.partner_flag := p7_a24;
149     ddp_evh_rec.overflow_flag := p7_a25;
150     ddp_evh_rec.parent_event_header_id := p7_a26;
151     ddp_evh_rec.duration := p7_a27;
152     ddp_evh_rec.duration_uom_code := p7_a28;
153     ddp_evh_rec.active_from_date := rosetta_g_miss_date_in_map(p7_a29);
154     ddp_evh_rec.active_to_date := rosetta_g_miss_date_in_map(p7_a30);
155     ddp_evh_rec.reg_maximum_capacity := p7_a31;
156     ddp_evh_rec.reg_minimum_capacity := p7_a32;
157     ddp_evh_rec.main_language_code := p7_a33;
158     ddp_evh_rec.cert_credit_type_code := p7_a34;
159     ddp_evh_rec.certification_credits := p7_a35;
160     ddp_evh_rec.inventory_item_id := p7_a36;
161     ddp_evh_rec.organization_id := p7_a37;
162     ddp_evh_rec.org_id := p7_a38;
163     ddp_evh_rec.forecasted_revenue := p7_a39;
164     ddp_evh_rec.actual_revenue := p7_a40;
165     ddp_evh_rec.forecasted_cost := p7_a41;
166     ddp_evh_rec.actual_cost := p7_a42;
167     ddp_evh_rec.coordinator_id := p7_a43;
168     ddp_evh_rec.fund_source_type_code := p7_a44;
169     ddp_evh_rec.fund_source_id := p7_a45;
170     ddp_evh_rec.fund_amount_tc := p7_a46;
171     ddp_evh_rec.fund_amount_fc := p7_a47;
172     ddp_evh_rec.currency_code_tc := p7_a48;
173     ddp_evh_rec.currency_code_fc := p7_a49;
174     ddp_evh_rec.owner_user_id := p7_a50;
175     ddp_evh_rec.url := p7_a51;
176     ddp_evh_rec.email := p7_a52;
177     ddp_evh_rec.phone := p7_a53;
178     ddp_evh_rec.priority_type_code := p7_a54;
179     ddp_evh_rec.cancellation_reason_code := p7_a55;
180     ddp_evh_rec.inbound_script_name := p7_a56;
181     ddp_evh_rec.attribute_category := p7_a57;
182     ddp_evh_rec.attribute1 := p7_a58;
183     ddp_evh_rec.attribute2 := p7_a59;
184     ddp_evh_rec.attribute3 := p7_a60;
185     ddp_evh_rec.attribute4 := p7_a61;
186     ddp_evh_rec.attribute5 := p7_a62;
187     ddp_evh_rec.attribute6 := p7_a63;
188     ddp_evh_rec.attribute7 := p7_a64;
189     ddp_evh_rec.attribute8 := p7_a65;
190     ddp_evh_rec.attribute9 := p7_a66;
191     ddp_evh_rec.attribute10 := p7_a67;
192     ddp_evh_rec.attribute11 := p7_a68;
193     ddp_evh_rec.attribute12 := p7_a69;
194     ddp_evh_rec.attribute13 := p7_a70;
195     ddp_evh_rec.attribute14 := p7_a71;
196     ddp_evh_rec.attribute15 := p7_a72;
197     ddp_evh_rec.event_header_name := p7_a73;
198     ddp_evh_rec.event_mktg_message := p7_a74;
199     ddp_evh_rec.description := p7_a75;
200     ddp_evh_rec.custom_setup_id := p7_a76;
201     ddp_evh_rec.country_code := p7_a77;
202     ddp_evh_rec.business_unit_id := p7_a78;
203     ddp_evh_rec.event_calendar := p7_a79;
204     ddp_evh_rec.start_period_name := p7_a80;
205     ddp_evh_rec.end_period_name := p7_a81;
206     ddp_evh_rec.global_flag := p7_a82;
207     ddp_evh_rec.task_id := p7_a83;
208     ddp_evh_rec.program_id := p7_a84;
209     ddp_evh_rec.create_attendant_lead_flag := p7_a85;
210     ddp_evh_rec.create_registrant_lead_flag := p7_a86;
211     ddp_evh_rec.event_purpose_code := p7_a87;
212 
213 
214     -- here's the delegated call to the old PL/SQL routine
215     ams_eventheader_pub.create_eventheader(p_api_version,
216       p_init_msg_list,
217       p_commit,
218       p_validation_level,
219       x_return_status,
220       x_msg_count,
221       x_msg_data,
222       ddp_evh_rec,
223       x_evh_id);
224 
225     -- copy data back from the local variables to OUT or IN-OUT args, if any
226 
227 
228 
229 
230 
231 
232 
233 
234   end;
235 
236   procedure update_eventheader(p_api_version  NUMBER
237     , p_init_msg_list  VARCHAR2
238     , p_commit  VARCHAR2
239     , p_validation_level  NUMBER
240     , x_return_status out nocopy  VARCHAR2
241     , x_msg_count out nocopy  NUMBER
242     , x_msg_data out nocopy  VARCHAR2
243     , p7_a0  NUMBER := 0-1962.0724
244     , p7_a1  DATE := fnd_api.g_miss_date
245     , p7_a2  NUMBER := 0-1962.0724
246     , p7_a3  DATE := fnd_api.g_miss_date
247     , p7_a4  NUMBER := 0-1962.0724
248     , p7_a5  NUMBER := 0-1962.0724
249     , p7_a6  NUMBER := 0-1962.0724
250     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
251     , p7_a8  NUMBER := 0-1962.0724
252     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
253     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
254     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
255     , p7_a12  NUMBER := 0-1962.0724
256     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
257     , p7_a14  DATE := fnd_api.g_miss_date
258     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
259     , p7_a16  VARCHAR2 := fnd_api.g_miss_char
260     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
261     , p7_a18  VARCHAR2 := fnd_api.g_miss_char
262     , p7_a19  DATE := fnd_api.g_miss_date
263     , p7_a20  DATE := fnd_api.g_miss_date
264     , p7_a21  VARCHAR2 := fnd_api.g_miss_char
265     , p7_a22  VARCHAR2 := fnd_api.g_miss_char
266     , p7_a23  VARCHAR2 := fnd_api.g_miss_char
267     , p7_a24  VARCHAR2 := fnd_api.g_miss_char
268     , p7_a25  VARCHAR2 := fnd_api.g_miss_char
269     , p7_a26  NUMBER := 0-1962.0724
270     , p7_a27  NUMBER := 0-1962.0724
271     , p7_a28  VARCHAR2 := fnd_api.g_miss_char
272     , p7_a29  DATE := fnd_api.g_miss_date
273     , p7_a30  DATE := fnd_api.g_miss_date
274     , p7_a31  NUMBER := 0-1962.0724
275     , p7_a32  NUMBER := 0-1962.0724
276     , p7_a33  VARCHAR2 := fnd_api.g_miss_char
277     , p7_a34  VARCHAR2 := fnd_api.g_miss_char
278     , p7_a35  NUMBER := 0-1962.0724
279     , p7_a36  NUMBER := 0-1962.0724
280     , p7_a37  NUMBER := 0-1962.0724
281     , p7_a38  NUMBER := 0-1962.0724
282     , p7_a39  NUMBER := 0-1962.0724
283     , p7_a40  NUMBER := 0-1962.0724
284     , p7_a41  NUMBER := 0-1962.0724
285     , p7_a42  NUMBER := 0-1962.0724
286     , p7_a43  NUMBER := 0-1962.0724
287     , p7_a44  VARCHAR2 := fnd_api.g_miss_char
288     , p7_a45  NUMBER := 0-1962.0724
289     , p7_a46  NUMBER := 0-1962.0724
290     , p7_a47  NUMBER := 0-1962.0724
291     , p7_a48  VARCHAR2 := fnd_api.g_miss_char
292     , p7_a49  VARCHAR2 := fnd_api.g_miss_char
293     , p7_a50  NUMBER := 0-1962.0724
294     , p7_a51  VARCHAR2 := fnd_api.g_miss_char
295     , p7_a52  VARCHAR2 := fnd_api.g_miss_char
296     , p7_a53  VARCHAR2 := fnd_api.g_miss_char
297     , p7_a54  VARCHAR2 := fnd_api.g_miss_char
298     , p7_a55  VARCHAR2 := fnd_api.g_miss_char
299     , p7_a56  VARCHAR2 := fnd_api.g_miss_char
300     , p7_a57  VARCHAR2 := fnd_api.g_miss_char
301     , p7_a58  VARCHAR2 := fnd_api.g_miss_char
302     , p7_a59  VARCHAR2 := fnd_api.g_miss_char
303     , p7_a60  VARCHAR2 := fnd_api.g_miss_char
304     , p7_a61  VARCHAR2 := fnd_api.g_miss_char
305     , p7_a62  VARCHAR2 := fnd_api.g_miss_char
306     , p7_a63  VARCHAR2 := fnd_api.g_miss_char
307     , p7_a64  VARCHAR2 := fnd_api.g_miss_char
308     , p7_a65  VARCHAR2 := fnd_api.g_miss_char
309     , p7_a66  VARCHAR2 := fnd_api.g_miss_char
310     , p7_a67  VARCHAR2 := fnd_api.g_miss_char
311     , p7_a68  VARCHAR2 := fnd_api.g_miss_char
312     , p7_a69  VARCHAR2 := fnd_api.g_miss_char
313     , p7_a70  VARCHAR2 := fnd_api.g_miss_char
314     , p7_a71  VARCHAR2 := fnd_api.g_miss_char
315     , p7_a72  VARCHAR2 := fnd_api.g_miss_char
316     , p7_a73  VARCHAR2 := fnd_api.g_miss_char
317     , p7_a74  VARCHAR2 := fnd_api.g_miss_char
318     , p7_a75  VARCHAR2 := fnd_api.g_miss_char
319     , p7_a76  NUMBER := 0-1962.0724
320     , p7_a77  VARCHAR2 := fnd_api.g_miss_char
321     , p7_a78  NUMBER := 0-1962.0724
322     , p7_a79  VARCHAR2 := fnd_api.g_miss_char
323     , p7_a80  VARCHAR2 := fnd_api.g_miss_char
324     , p7_a81  VARCHAR2 := fnd_api.g_miss_char
325     , p7_a82  VARCHAR2 := fnd_api.g_miss_char
326     , p7_a83  NUMBER := 0-1962.0724
327     , p7_a84  NUMBER := 0-1962.0724
328     , p7_a85  VARCHAR2 := fnd_api.g_miss_char
329     , p7_a86  VARCHAR2 := fnd_api.g_miss_char
330     , p7_a87  VARCHAR2 := fnd_api.g_miss_char
331   )
332 
333   as
334     ddp_evh_rec ams_eventheader_pvt.evh_rec_type;
335     ddindx binary_integer; indx binary_integer;
336   begin
337 
338     -- copy data to the local IN or IN-OUT args, if any
339 
340 
341 
342 
343 
344 
345 
346     ddp_evh_rec.event_header_id := p7_a0;
347     ddp_evh_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
348     ddp_evh_rec.last_updated_by := p7_a2;
349     ddp_evh_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
350     ddp_evh_rec.created_by := p7_a4;
351     ddp_evh_rec.last_update_login := p7_a5;
352     ddp_evh_rec.object_version_number := p7_a6;
353     ddp_evh_rec.event_level := p7_a7;
354     ddp_evh_rec.application_id := p7_a8;
355     ddp_evh_rec.event_type_code := p7_a9;
356     ddp_evh_rec.active_flag := p7_a10;
357     ddp_evh_rec.private_flag := p7_a11;
358     ddp_evh_rec.user_status_id := p7_a12;
359     ddp_evh_rec.system_status_code := p7_a13;
360     ddp_evh_rec.last_status_date := rosetta_g_miss_date_in_map(p7_a14);
361     ddp_evh_rec.stream_type_code := p7_a15;
362     ddp_evh_rec.source_code := p7_a16;
363     ddp_evh_rec.event_standalone_flag := p7_a17;
364     ddp_evh_rec.day_of_event := p7_a18;
365     ddp_evh_rec.agenda_start_time := rosetta_g_miss_date_in_map(p7_a19);
366     ddp_evh_rec.agenda_end_time := rosetta_g_miss_date_in_map(p7_a20);
367     ddp_evh_rec.reg_required_flag := p7_a21;
368     ddp_evh_rec.reg_charge_flag := p7_a22;
369     ddp_evh_rec.reg_invited_only_flag := p7_a23;
370     ddp_evh_rec.partner_flag := p7_a24;
371     ddp_evh_rec.overflow_flag := p7_a25;
372     ddp_evh_rec.parent_event_header_id := p7_a26;
373     ddp_evh_rec.duration := p7_a27;
374     ddp_evh_rec.duration_uom_code := p7_a28;
375     ddp_evh_rec.active_from_date := rosetta_g_miss_date_in_map(p7_a29);
376     ddp_evh_rec.active_to_date := rosetta_g_miss_date_in_map(p7_a30);
377     ddp_evh_rec.reg_maximum_capacity := p7_a31;
378     ddp_evh_rec.reg_minimum_capacity := p7_a32;
379     ddp_evh_rec.main_language_code := p7_a33;
380     ddp_evh_rec.cert_credit_type_code := p7_a34;
381     ddp_evh_rec.certification_credits := p7_a35;
382     ddp_evh_rec.inventory_item_id := p7_a36;
383     ddp_evh_rec.organization_id := p7_a37;
384     ddp_evh_rec.org_id := p7_a38;
385     ddp_evh_rec.forecasted_revenue := p7_a39;
386     ddp_evh_rec.actual_revenue := p7_a40;
387     ddp_evh_rec.forecasted_cost := p7_a41;
388     ddp_evh_rec.actual_cost := p7_a42;
389     ddp_evh_rec.coordinator_id := p7_a43;
390     ddp_evh_rec.fund_source_type_code := p7_a44;
391     ddp_evh_rec.fund_source_id := p7_a45;
392     ddp_evh_rec.fund_amount_tc := p7_a46;
393     ddp_evh_rec.fund_amount_fc := p7_a47;
394     ddp_evh_rec.currency_code_tc := p7_a48;
395     ddp_evh_rec.currency_code_fc := p7_a49;
396     ddp_evh_rec.owner_user_id := p7_a50;
397     ddp_evh_rec.url := p7_a51;
398     ddp_evh_rec.email := p7_a52;
399     ddp_evh_rec.phone := p7_a53;
400     ddp_evh_rec.priority_type_code := p7_a54;
401     ddp_evh_rec.cancellation_reason_code := p7_a55;
402     ddp_evh_rec.inbound_script_name := p7_a56;
403     ddp_evh_rec.attribute_category := p7_a57;
404     ddp_evh_rec.attribute1 := p7_a58;
405     ddp_evh_rec.attribute2 := p7_a59;
406     ddp_evh_rec.attribute3 := p7_a60;
407     ddp_evh_rec.attribute4 := p7_a61;
408     ddp_evh_rec.attribute5 := p7_a62;
409     ddp_evh_rec.attribute6 := p7_a63;
410     ddp_evh_rec.attribute7 := p7_a64;
411     ddp_evh_rec.attribute8 := p7_a65;
412     ddp_evh_rec.attribute9 := p7_a66;
413     ddp_evh_rec.attribute10 := p7_a67;
414     ddp_evh_rec.attribute11 := p7_a68;
415     ddp_evh_rec.attribute12 := p7_a69;
416     ddp_evh_rec.attribute13 := p7_a70;
417     ddp_evh_rec.attribute14 := p7_a71;
418     ddp_evh_rec.attribute15 := p7_a72;
419     ddp_evh_rec.event_header_name := p7_a73;
420     ddp_evh_rec.event_mktg_message := p7_a74;
421     ddp_evh_rec.description := p7_a75;
422     ddp_evh_rec.custom_setup_id := p7_a76;
423     ddp_evh_rec.country_code := p7_a77;
424     ddp_evh_rec.business_unit_id := p7_a78;
425     ddp_evh_rec.event_calendar := p7_a79;
426     ddp_evh_rec.start_period_name := p7_a80;
427     ddp_evh_rec.end_period_name := p7_a81;
428     ddp_evh_rec.global_flag := p7_a82;
429     ddp_evh_rec.task_id := p7_a83;
430     ddp_evh_rec.program_id := p7_a84;
431     ddp_evh_rec.create_attendant_lead_flag := p7_a85;
432     ddp_evh_rec.create_registrant_lead_flag := p7_a86;
433     ddp_evh_rec.event_purpose_code := p7_a87;
434 
435     -- here's the delegated call to the old PL/SQL routine
436     ams_eventheader_pub.update_eventheader(p_api_version,
437       p_init_msg_list,
438       p_commit,
439       p_validation_level,
440       x_return_status,
441       x_msg_count,
442       x_msg_data,
443       ddp_evh_rec);
444 
445     -- copy data back from the local variables to OUT or IN-OUT args, if any
446 
447 
448 
449 
450 
451 
452 
453   end;
454 
455   procedure validate_eventheader(p_api_version  NUMBER
456     , p_init_msg_list  VARCHAR2
457     , p_validation_level  NUMBER
458     , x_return_status out nocopy  VARCHAR2
459     , x_msg_count out nocopy  NUMBER
460     , x_msg_data out nocopy  VARCHAR2
461     , p6_a0  NUMBER := 0-1962.0724
462     , p6_a1  DATE := fnd_api.g_miss_date
463     , p6_a2  NUMBER := 0-1962.0724
464     , p6_a3  DATE := fnd_api.g_miss_date
465     , p6_a4  NUMBER := 0-1962.0724
466     , p6_a5  NUMBER := 0-1962.0724
467     , p6_a6  NUMBER := 0-1962.0724
468     , p6_a7  VARCHAR2 := fnd_api.g_miss_char
469     , p6_a8  NUMBER := 0-1962.0724
470     , p6_a9  VARCHAR2 := fnd_api.g_miss_char
471     , p6_a10  VARCHAR2 := fnd_api.g_miss_char
472     , p6_a11  VARCHAR2 := fnd_api.g_miss_char
473     , p6_a12  NUMBER := 0-1962.0724
474     , p6_a13  VARCHAR2 := fnd_api.g_miss_char
475     , p6_a14  DATE := fnd_api.g_miss_date
476     , p6_a15  VARCHAR2 := fnd_api.g_miss_char
477     , p6_a16  VARCHAR2 := fnd_api.g_miss_char
478     , p6_a17  VARCHAR2 := fnd_api.g_miss_char
479     , p6_a18  VARCHAR2 := fnd_api.g_miss_char
480     , p6_a19  DATE := fnd_api.g_miss_date
481     , p6_a20  DATE := fnd_api.g_miss_date
482     , p6_a21  VARCHAR2 := fnd_api.g_miss_char
483     , p6_a22  VARCHAR2 := fnd_api.g_miss_char
484     , p6_a23  VARCHAR2 := fnd_api.g_miss_char
485     , p6_a24  VARCHAR2 := fnd_api.g_miss_char
486     , p6_a25  VARCHAR2 := fnd_api.g_miss_char
487     , p6_a26  NUMBER := 0-1962.0724
488     , p6_a27  NUMBER := 0-1962.0724
489     , p6_a28  VARCHAR2 := fnd_api.g_miss_char
490     , p6_a29  DATE := fnd_api.g_miss_date
491     , p6_a30  DATE := fnd_api.g_miss_date
492     , p6_a31  NUMBER := 0-1962.0724
493     , p6_a32  NUMBER := 0-1962.0724
494     , p6_a33  VARCHAR2 := fnd_api.g_miss_char
495     , p6_a34  VARCHAR2 := fnd_api.g_miss_char
496     , p6_a35  NUMBER := 0-1962.0724
497     , p6_a36  NUMBER := 0-1962.0724
498     , p6_a37  NUMBER := 0-1962.0724
499     , p6_a38  NUMBER := 0-1962.0724
500     , p6_a39  NUMBER := 0-1962.0724
501     , p6_a40  NUMBER := 0-1962.0724
502     , p6_a41  NUMBER := 0-1962.0724
503     , p6_a42  NUMBER := 0-1962.0724
504     , p6_a43  NUMBER := 0-1962.0724
505     , p6_a44  VARCHAR2 := fnd_api.g_miss_char
506     , p6_a45  NUMBER := 0-1962.0724
507     , p6_a46  NUMBER := 0-1962.0724
508     , p6_a47  NUMBER := 0-1962.0724
509     , p6_a48  VARCHAR2 := fnd_api.g_miss_char
510     , p6_a49  VARCHAR2 := fnd_api.g_miss_char
511     , p6_a50  NUMBER := 0-1962.0724
512     , p6_a51  VARCHAR2 := fnd_api.g_miss_char
513     , p6_a52  VARCHAR2 := fnd_api.g_miss_char
514     , p6_a53  VARCHAR2 := fnd_api.g_miss_char
515     , p6_a54  VARCHAR2 := fnd_api.g_miss_char
516     , p6_a55  VARCHAR2 := fnd_api.g_miss_char
517     , p6_a56  VARCHAR2 := fnd_api.g_miss_char
518     , p6_a57  VARCHAR2 := fnd_api.g_miss_char
519     , p6_a58  VARCHAR2 := fnd_api.g_miss_char
520     , p6_a59  VARCHAR2 := fnd_api.g_miss_char
521     , p6_a60  VARCHAR2 := fnd_api.g_miss_char
522     , p6_a61  VARCHAR2 := fnd_api.g_miss_char
523     , p6_a62  VARCHAR2 := fnd_api.g_miss_char
524     , p6_a63  VARCHAR2 := fnd_api.g_miss_char
525     , p6_a64  VARCHAR2 := fnd_api.g_miss_char
526     , p6_a65  VARCHAR2 := fnd_api.g_miss_char
527     , p6_a66  VARCHAR2 := fnd_api.g_miss_char
528     , p6_a67  VARCHAR2 := fnd_api.g_miss_char
529     , p6_a68  VARCHAR2 := fnd_api.g_miss_char
530     , p6_a69  VARCHAR2 := fnd_api.g_miss_char
531     , p6_a70  VARCHAR2 := fnd_api.g_miss_char
532     , p6_a71  VARCHAR2 := fnd_api.g_miss_char
533     , p6_a72  VARCHAR2 := fnd_api.g_miss_char
534     , p6_a73  VARCHAR2 := fnd_api.g_miss_char
535     , p6_a74  VARCHAR2 := fnd_api.g_miss_char
536     , p6_a75  VARCHAR2 := fnd_api.g_miss_char
537     , p6_a76  NUMBER := 0-1962.0724
538     , p6_a77  VARCHAR2 := fnd_api.g_miss_char
539     , p6_a78  NUMBER := 0-1962.0724
540     , p6_a79  VARCHAR2 := fnd_api.g_miss_char
541     , p6_a80  VARCHAR2 := fnd_api.g_miss_char
542     , p6_a81  VARCHAR2 := fnd_api.g_miss_char
543     , p6_a82  VARCHAR2 := fnd_api.g_miss_char
544     , p6_a83  NUMBER := 0-1962.0724
545     , p6_a84  NUMBER := 0-1962.0724
546     , p6_a85  VARCHAR2 := fnd_api.g_miss_char
547     , p6_a86  VARCHAR2 := fnd_api.g_miss_char
548     , p6_a87  VARCHAR2 := fnd_api.g_miss_char
549   )
550 
551   as
552     ddp_evh_rec ams_eventheader_pvt.evh_rec_type;
553     ddindx binary_integer; indx binary_integer;
554   begin
555 
556     -- copy data to the local IN or IN-OUT args, if any
557 
558 
559 
560 
561 
562 
563     ddp_evh_rec.event_header_id := p6_a0;
564     ddp_evh_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
565     ddp_evh_rec.last_updated_by := p6_a2;
566     ddp_evh_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
567     ddp_evh_rec.created_by := p6_a4;
568     ddp_evh_rec.last_update_login := p6_a5;
569     ddp_evh_rec.object_version_number := p6_a6;
570     ddp_evh_rec.event_level := p6_a7;
571     ddp_evh_rec.application_id := p6_a8;
572     ddp_evh_rec.event_type_code := p6_a9;
573     ddp_evh_rec.active_flag := p6_a10;
574     ddp_evh_rec.private_flag := p6_a11;
575     ddp_evh_rec.user_status_id := p6_a12;
576     ddp_evh_rec.system_status_code := p6_a13;
577     ddp_evh_rec.last_status_date := rosetta_g_miss_date_in_map(p6_a14);
578     ddp_evh_rec.stream_type_code := p6_a15;
579     ddp_evh_rec.source_code := p6_a16;
580     ddp_evh_rec.event_standalone_flag := p6_a17;
581     ddp_evh_rec.day_of_event := p6_a18;
582     ddp_evh_rec.agenda_start_time := rosetta_g_miss_date_in_map(p6_a19);
583     ddp_evh_rec.agenda_end_time := rosetta_g_miss_date_in_map(p6_a20);
584     ddp_evh_rec.reg_required_flag := p6_a21;
585     ddp_evh_rec.reg_charge_flag := p6_a22;
586     ddp_evh_rec.reg_invited_only_flag := p6_a23;
587     ddp_evh_rec.partner_flag := p6_a24;
588     ddp_evh_rec.overflow_flag := p6_a25;
589     ddp_evh_rec.parent_event_header_id := p6_a26;
590     ddp_evh_rec.duration := p6_a27;
591     ddp_evh_rec.duration_uom_code := p6_a28;
592     ddp_evh_rec.active_from_date := rosetta_g_miss_date_in_map(p6_a29);
593     ddp_evh_rec.active_to_date := rosetta_g_miss_date_in_map(p6_a30);
594     ddp_evh_rec.reg_maximum_capacity := p6_a31;
595     ddp_evh_rec.reg_minimum_capacity := p6_a32;
596     ddp_evh_rec.main_language_code := p6_a33;
597     ddp_evh_rec.cert_credit_type_code := p6_a34;
598     ddp_evh_rec.certification_credits := p6_a35;
599     ddp_evh_rec.inventory_item_id := p6_a36;
600     ddp_evh_rec.organization_id := p6_a37;
601     ddp_evh_rec.org_id := p6_a38;
602     ddp_evh_rec.forecasted_revenue := p6_a39;
603     ddp_evh_rec.actual_revenue := p6_a40;
604     ddp_evh_rec.forecasted_cost := p6_a41;
605     ddp_evh_rec.actual_cost := p6_a42;
606     ddp_evh_rec.coordinator_id := p6_a43;
607     ddp_evh_rec.fund_source_type_code := p6_a44;
608     ddp_evh_rec.fund_source_id := p6_a45;
609     ddp_evh_rec.fund_amount_tc := p6_a46;
610     ddp_evh_rec.fund_amount_fc := p6_a47;
611     ddp_evh_rec.currency_code_tc := p6_a48;
612     ddp_evh_rec.currency_code_fc := p6_a49;
613     ddp_evh_rec.owner_user_id := p6_a50;
614     ddp_evh_rec.url := p6_a51;
615     ddp_evh_rec.email := p6_a52;
616     ddp_evh_rec.phone := p6_a53;
617     ddp_evh_rec.priority_type_code := p6_a54;
618     ddp_evh_rec.cancellation_reason_code := p6_a55;
619     ddp_evh_rec.inbound_script_name := p6_a56;
620     ddp_evh_rec.attribute_category := p6_a57;
621     ddp_evh_rec.attribute1 := p6_a58;
622     ddp_evh_rec.attribute2 := p6_a59;
623     ddp_evh_rec.attribute3 := p6_a60;
624     ddp_evh_rec.attribute4 := p6_a61;
625     ddp_evh_rec.attribute5 := p6_a62;
626     ddp_evh_rec.attribute6 := p6_a63;
627     ddp_evh_rec.attribute7 := p6_a64;
628     ddp_evh_rec.attribute8 := p6_a65;
629     ddp_evh_rec.attribute9 := p6_a66;
630     ddp_evh_rec.attribute10 := p6_a67;
631     ddp_evh_rec.attribute11 := p6_a68;
632     ddp_evh_rec.attribute12 := p6_a69;
633     ddp_evh_rec.attribute13 := p6_a70;
634     ddp_evh_rec.attribute14 := p6_a71;
635     ddp_evh_rec.attribute15 := p6_a72;
636     ddp_evh_rec.event_header_name := p6_a73;
637     ddp_evh_rec.event_mktg_message := p6_a74;
638     ddp_evh_rec.description := p6_a75;
639     ddp_evh_rec.custom_setup_id := p6_a76;
640     ddp_evh_rec.country_code := p6_a77;
641     ddp_evh_rec.business_unit_id := p6_a78;
642     ddp_evh_rec.event_calendar := p6_a79;
643     ddp_evh_rec.start_period_name := p6_a80;
644     ddp_evh_rec.end_period_name := p6_a81;
645     ddp_evh_rec.global_flag := p6_a82;
646     ddp_evh_rec.task_id := p6_a83;
647     ddp_evh_rec.program_id := p6_a84;
648     ddp_evh_rec.create_attendant_lead_flag := p6_a85;
649     ddp_evh_rec.create_registrant_lead_flag := p6_a86;
650     ddp_evh_rec.event_purpose_code := p6_a87;
651 
652     -- here's the delegated call to the old PL/SQL routine
653     ams_eventheader_pub.validate_eventheader(p_api_version,
654       p_init_msg_list,
655       p_validation_level,
656       x_return_status,
657       x_msg_count,
658       x_msg_data,
659       ddp_evh_rec);
660 
661     -- copy data back from the local variables to OUT or IN-OUT args, if any
662 
663 
664 
665 
666 
667 
668   end;
669 
670 end ams_eventheader_pub_w;