DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_DELIVERABLE_PUB_W

Source


1 package body ams_deliverable_pub_w as
2   /* $Header: amswpdlb.pls 120.0 2005/05/31 15:52:12 appldev noship $ */
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   function rosetta_g_miss_num_map(n number) return number as
14     a number := fnd_api.g_miss_num;
15     b number := 0-1962.0724;
16   begin
17     if n=a then return b; end if;
18     if n=b then return a; end if;
19     return n;
20   end;
21 
22   procedure create_deliverable(p_api_version_number  NUMBER
23     , p_init_msg_list  VARCHAR2
24     , p_commit  VARCHAR2
25     , p_validation_level  NUMBER
26     , x_return_status out nocopy  VARCHAR2
27     , x_msg_count out nocopy  NUMBER
28     , x_msg_data out nocopy  VARCHAR2
29     , x_deliv_id out nocopy  NUMBER
30     , p7_a0  NUMBER := 0-1962.0724
31     , p7_a1  DATE := fnd_api.g_miss_date
32     , p7_a2  NUMBER := 0-1962.0724
33     , p7_a3  DATE := fnd_api.g_miss_date
34     , p7_a4  NUMBER := 0-1962.0724
35     , p7_a5  NUMBER := 0-1962.0724
36     , p7_a6  NUMBER := 0-1962.0724
37     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
38     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
39     , p7_a9  NUMBER := 0-1962.0724
40     , p7_a10  NUMBER := 0-1962.0724
41     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
42     , p7_a12  DATE := fnd_api.g_miss_date
43     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
44     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
45     , p7_a15  NUMBER := 0-1962.0724
46     , p7_a16  NUMBER := 0-1962.0724
47     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
48     , p7_a18  NUMBER := 0-1962.0724
49     , p7_a19  NUMBER := 0-1962.0724
50     , p7_a20  VARCHAR2 := fnd_api.g_miss_char
51     , p7_a21  VARCHAR2 := fnd_api.g_miss_char
52     , p7_a22  NUMBER := 0-1962.0724
53     , p7_a23  NUMBER := 0-1962.0724
54     , p7_a24  NUMBER := 0-1962.0724
55     , p7_a25  NUMBER := 0-1962.0724
56     , p7_a26  DATE := fnd_api.g_miss_date
57     , p7_a27  DATE := fnd_api.g_miss_date
58     , p7_a28  DATE := fnd_api.g_miss_date
59     , p7_a29  DATE := fnd_api.g_miss_date
60     , p7_a30  VARCHAR2 := fnd_api.g_miss_char
61     , p7_a31  VARCHAR2 := fnd_api.g_miss_char
62     , p7_a32  NUMBER := 0-1962.0724
63     , p7_a33  NUMBER := 0-1962.0724
64     , p7_a34  NUMBER := 0-1962.0724
65     , p7_a35  VARCHAR2 := fnd_api.g_miss_char
66     , p7_a36  VARCHAR2 := fnd_api.g_miss_char
67     , p7_a37  NUMBER := 0-1962.0724
68     , p7_a38  VARCHAR2 := fnd_api.g_miss_char
69     , p7_a39  NUMBER := 0-1962.0724
70     , p7_a40  NUMBER := 0-1962.0724
71     , p7_a41  NUMBER := 0-1962.0724
72     , p7_a42  NUMBER := 0-1962.0724
73     , p7_a43  VARCHAR2 := fnd_api.g_miss_char
74     , p7_a44  VARCHAR2 := fnd_api.g_miss_char
75     , p7_a45  VARCHAR2 := fnd_api.g_miss_char
76     , p7_a46  VARCHAR2 := fnd_api.g_miss_char
77     , p7_a47  VARCHAR2 := fnd_api.g_miss_char
78     , p7_a48  NUMBER := 0-1962.0724
79     , p7_a49  NUMBER := 0-1962.0724
80     , p7_a50  NUMBER := 0-1962.0724
81     , p7_a51  NUMBER := 0-1962.0724
82     , p7_a52  VARCHAR2 := fnd_api.g_miss_char
83     , p7_a53  NUMBER := 0-1962.0724
84     , p7_a54  VARCHAR2 := fnd_api.g_miss_char
85     , p7_a55  VARCHAR2 := fnd_api.g_miss_char
86     , p7_a56  VARCHAR2 := fnd_api.g_miss_char
87     , p7_a57  VARCHAR2 := fnd_api.g_miss_char
88     , p7_a58  VARCHAR2 := fnd_api.g_miss_char
89     , p7_a59  VARCHAR2 := fnd_api.g_miss_char
90     , p7_a60  VARCHAR2 := fnd_api.g_miss_char
91     , p7_a61  VARCHAR2 := fnd_api.g_miss_char
92     , p7_a62  VARCHAR2 := fnd_api.g_miss_char
93     , p7_a63  VARCHAR2 := fnd_api.g_miss_char
94     , p7_a64  VARCHAR2 := fnd_api.g_miss_char
95     , p7_a65  VARCHAR2 := fnd_api.g_miss_char
96     , p7_a66  VARCHAR2 := fnd_api.g_miss_char
97     , p7_a67  VARCHAR2 := fnd_api.g_miss_char
98     , p7_a68  VARCHAR2 := fnd_api.g_miss_char
99     , p7_a69  VARCHAR2 := fnd_api.g_miss_char
100     , p7_a70  VARCHAR2 := fnd_api.g_miss_char
101     , p7_a71  VARCHAR2 := fnd_api.g_miss_char
102     , p7_a72  VARCHAR2 := fnd_api.g_miss_char
103     , p7_a73  VARCHAR2 := fnd_api.g_miss_char
104     , p7_a74  VARCHAR2 := fnd_api.g_miss_char
105     , p7_a75  NUMBER := 0-1962.0724
106     , p7_a76  NUMBER := 0-1962.0724
107     , p7_a77  VARCHAR2 := fnd_api.g_miss_char
108     , p7_a78  VARCHAR2 := fnd_api.g_miss_char
109     , p7_a79  NUMBER := 0-1962.0724
110     , p7_a80  VARCHAR2 := fnd_api.g_miss_char
111     , p7_a81  VARCHAR2 := fnd_api.g_miss_char
112   )
113 
114   as
115     ddp_deliv_rec ams_deliverable_pub.deliv_rec_type;
116     ddindx binary_integer; indx binary_integer;
117   begin
118 
119     -- copy data to the local IN or IN-OUT args, if any
120 
121 
122 
123 
124 
125 
126 
127     ddp_deliv_rec.deliverable_id := rosetta_g_miss_num_map(p7_a0);
128     ddp_deliv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
129     ddp_deliv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
130     ddp_deliv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
131     ddp_deliv_rec.created_by := rosetta_g_miss_num_map(p7_a4);
132     ddp_deliv_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
133     ddp_deliv_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
134     ddp_deliv_rec.language_code := p7_a7;
135     ddp_deliv_rec.version := p7_a8;
136     ddp_deliv_rec.application_id := rosetta_g_miss_num_map(p7_a9);
137     ddp_deliv_rec.user_status_id := rosetta_g_miss_num_map(p7_a10);
138     ddp_deliv_rec.status_code := p7_a11;
139     ddp_deliv_rec.status_date := rosetta_g_miss_date_in_map(p7_a12);
140     ddp_deliv_rec.active_flag := p7_a13;
141     ddp_deliv_rec.private_flag := p7_a14;
142     ddp_deliv_rec.owner_user_id := rosetta_g_miss_num_map(p7_a15);
143     ddp_deliv_rec.fund_source_id := rosetta_g_miss_num_map(p7_a16);
144     ddp_deliv_rec.fund_source_type := p7_a17;
145     ddp_deliv_rec.category_type_id := rosetta_g_miss_num_map(p7_a18);
146     ddp_deliv_rec.category_sub_type_id := rosetta_g_miss_num_map(p7_a19);
147     ddp_deliv_rec.kit_flag := p7_a20;
148     ddp_deliv_rec.inventory_flag := p7_a21;
149     ddp_deliv_rec.inventory_item_id := rosetta_g_miss_num_map(p7_a22);
150     ddp_deliv_rec.inventory_item_org_id := rosetta_g_miss_num_map(p7_a23);
151     ddp_deliv_rec.pricelist_header_id := rosetta_g_miss_num_map(p7_a24);
152     ddp_deliv_rec.pricelist_line_id := rosetta_g_miss_num_map(p7_a25);
153     ddp_deliv_rec.actual_avail_from_date := rosetta_g_miss_date_in_map(p7_a26);
154     ddp_deliv_rec.actual_avail_to_date := rosetta_g_miss_date_in_map(p7_a27);
155     ddp_deliv_rec.forecasted_complete_date := rosetta_g_miss_date_in_map(p7_a28);
156     ddp_deliv_rec.actual_complete_date := rosetta_g_miss_date_in_map(p7_a29);
157     ddp_deliv_rec.transaction_currency_code := p7_a30;
158     ddp_deliv_rec.functional_currency_code := p7_a31;
159     ddp_deliv_rec.budget_amount_tc := rosetta_g_miss_num_map(p7_a32);
160     ddp_deliv_rec.budget_amount_fc := rosetta_g_miss_num_map(p7_a33);
161     ddp_deliv_rec.replaced_by_deliverable_id := rosetta_g_miss_num_map(p7_a34);
162     ddp_deliv_rec.can_fulfill_electronic_flag := p7_a35;
163     ddp_deliv_rec.can_fulfill_physical_flag := p7_a36;
164     ddp_deliv_rec.jtf_amv_item_id := rosetta_g_miss_num_map(p7_a37);
165     ddp_deliv_rec.non_inv_ctrl_code := p7_a38;
166     ddp_deliv_rec.non_inv_quantity_on_hand := rosetta_g_miss_num_map(p7_a39);
167     ddp_deliv_rec.non_inv_quantity_on_order := rosetta_g_miss_num_map(p7_a40);
168     ddp_deliv_rec.non_inv_quantity_on_reserve := rosetta_g_miss_num_map(p7_a41);
169     ddp_deliv_rec.chargeback_amount := rosetta_g_miss_num_map(p7_a42);
170     ddp_deliv_rec.chargeback_uom := p7_a43;
171     ddp_deliv_rec.chargeback_amount_curr_code := p7_a44;
172     ddp_deliv_rec.deliverable_code := p7_a45;
173     ddp_deliv_rec.deliverable_pick_flag := p7_a46;
174     ddp_deliv_rec.currency_code := p7_a47;
175     ddp_deliv_rec.forecasted_cost := rosetta_g_miss_num_map(p7_a48);
176     ddp_deliv_rec.actual_cost := rosetta_g_miss_num_map(p7_a49);
177     ddp_deliv_rec.forecasted_responses := rosetta_g_miss_num_map(p7_a50);
178     ddp_deliv_rec.actual_responses := rosetta_g_miss_num_map(p7_a51);
179     ddp_deliv_rec.country := p7_a52;
180     ddp_deliv_rec.default_approver_id := rosetta_g_miss_num_map(p7_a53);
181     ddp_deliv_rec.attribute_category := p7_a54;
182     ddp_deliv_rec.attribute1 := p7_a55;
183     ddp_deliv_rec.attribute2 := p7_a56;
184     ddp_deliv_rec.attribute3 := p7_a57;
185     ddp_deliv_rec.attribute4 := p7_a58;
186     ddp_deliv_rec.attribute5 := p7_a59;
187     ddp_deliv_rec.attribute6 := p7_a60;
188     ddp_deliv_rec.attribute7 := p7_a61;
189     ddp_deliv_rec.attribute8 := p7_a62;
190     ddp_deliv_rec.attribute9 := p7_a63;
191     ddp_deliv_rec.attribute10 := p7_a64;
192     ddp_deliv_rec.attribute11 := p7_a65;
193     ddp_deliv_rec.attribute12 := p7_a66;
194     ddp_deliv_rec.attribute13 := p7_a67;
195     ddp_deliv_rec.attribute14 := p7_a68;
196     ddp_deliv_rec.attribute15 := p7_a69;
197     ddp_deliv_rec.deliverable_name := p7_a70;
198     ddp_deliv_rec.description := p7_a71;
199     ddp_deliv_rec.start_period_name := p7_a72;
200     ddp_deliv_rec.end_period_name := p7_a73;
201     ddp_deliv_rec.deliverable_calendar := p7_a74;
202     ddp_deliv_rec.country_id := rosetta_g_miss_num_map(p7_a75);
203     ddp_deliv_rec.setup_id := rosetta_g_miss_num_map(p7_a76);
204     ddp_deliv_rec.item_number := p7_a77;
205     ddp_deliv_rec.associate_flag := p7_a78;
206     ddp_deliv_rec.master_object_id := rosetta_g_miss_num_map(p7_a79);
207     ddp_deliv_rec.master_object_type := p7_a80;
208     ddp_deliv_rec.email_content_type := p7_a81;
209 
210 
211     -- here's the delegated call to the old PL/SQL routine
212     ams_deliverable_pub.create_deliverable(p_api_version_number,
213       p_init_msg_list,
214       p_commit,
215       p_validation_level,
216       x_return_status,
217       x_msg_count,
218       x_msg_data,
219       ddp_deliv_rec,
220       x_deliv_id);
221 
222     -- copy data back from the local variables to OUT or IN-OUT args, if any
223 
224 
225 
226 
227 
228 
229 
230 
231   end;
232 
233   procedure update_deliverable(p_api_version_number  NUMBER
234     , p_init_msg_list  VARCHAR2
235     , p_commit  VARCHAR2
236     , p_validation_level  NUMBER
237     , x_return_status out nocopy  VARCHAR2
238     , x_msg_count out nocopy  NUMBER
239     , x_msg_data out nocopy  VARCHAR2
240     , p7_a0  NUMBER := 0-1962.0724
241     , p7_a1  DATE := fnd_api.g_miss_date
242     , p7_a2  NUMBER := 0-1962.0724
243     , p7_a3  DATE := fnd_api.g_miss_date
244     , p7_a4  NUMBER := 0-1962.0724
245     , p7_a5  NUMBER := 0-1962.0724
246     , p7_a6  NUMBER := 0-1962.0724
247     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
248     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
249     , p7_a9  NUMBER := 0-1962.0724
250     , p7_a10  NUMBER := 0-1962.0724
251     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
252     , p7_a12  DATE := fnd_api.g_miss_date
253     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
254     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
255     , p7_a15  NUMBER := 0-1962.0724
256     , p7_a16  NUMBER := 0-1962.0724
257     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
258     , p7_a18  NUMBER := 0-1962.0724
259     , p7_a19  NUMBER := 0-1962.0724
260     , p7_a20  VARCHAR2 := fnd_api.g_miss_char
261     , p7_a21  VARCHAR2 := fnd_api.g_miss_char
262     , p7_a22  NUMBER := 0-1962.0724
263     , p7_a23  NUMBER := 0-1962.0724
264     , p7_a24  NUMBER := 0-1962.0724
265     , p7_a25  NUMBER := 0-1962.0724
266     , p7_a26  DATE := fnd_api.g_miss_date
267     , p7_a27  DATE := fnd_api.g_miss_date
268     , p7_a28  DATE := fnd_api.g_miss_date
269     , p7_a29  DATE := fnd_api.g_miss_date
270     , p7_a30  VARCHAR2 := fnd_api.g_miss_char
271     , p7_a31  VARCHAR2 := fnd_api.g_miss_char
272     , p7_a32  NUMBER := 0-1962.0724
273     , p7_a33  NUMBER := 0-1962.0724
274     , p7_a34  NUMBER := 0-1962.0724
275     , p7_a35  VARCHAR2 := fnd_api.g_miss_char
276     , p7_a36  VARCHAR2 := fnd_api.g_miss_char
277     , p7_a37  NUMBER := 0-1962.0724
278     , p7_a38  VARCHAR2 := fnd_api.g_miss_char
279     , p7_a39  NUMBER := 0-1962.0724
280     , p7_a40  NUMBER := 0-1962.0724
281     , p7_a41  NUMBER := 0-1962.0724
282     , p7_a42  NUMBER := 0-1962.0724
283     , p7_a43  VARCHAR2 := fnd_api.g_miss_char
284     , p7_a44  VARCHAR2 := fnd_api.g_miss_char
285     , p7_a45  VARCHAR2 := fnd_api.g_miss_char
286     , p7_a46  VARCHAR2 := fnd_api.g_miss_char
287     , p7_a47  VARCHAR2 := fnd_api.g_miss_char
288     , p7_a48  NUMBER := 0-1962.0724
289     , p7_a49  NUMBER := 0-1962.0724
290     , p7_a50  NUMBER := 0-1962.0724
291     , p7_a51  NUMBER := 0-1962.0724
292     , p7_a52  VARCHAR2 := fnd_api.g_miss_char
293     , p7_a53  NUMBER := 0-1962.0724
294     , p7_a54  VARCHAR2 := fnd_api.g_miss_char
295     , p7_a55  VARCHAR2 := fnd_api.g_miss_char
296     , p7_a56  VARCHAR2 := fnd_api.g_miss_char
297     , p7_a57  VARCHAR2 := fnd_api.g_miss_char
298     , p7_a58  VARCHAR2 := fnd_api.g_miss_char
299     , p7_a59  VARCHAR2 := fnd_api.g_miss_char
300     , p7_a60  VARCHAR2 := fnd_api.g_miss_char
301     , p7_a61  VARCHAR2 := fnd_api.g_miss_char
302     , p7_a62  VARCHAR2 := fnd_api.g_miss_char
303     , p7_a63  VARCHAR2 := fnd_api.g_miss_char
304     , p7_a64  VARCHAR2 := fnd_api.g_miss_char
305     , p7_a65  VARCHAR2 := fnd_api.g_miss_char
306     , p7_a66  VARCHAR2 := fnd_api.g_miss_char
307     , p7_a67  VARCHAR2 := fnd_api.g_miss_char
308     , p7_a68  VARCHAR2 := fnd_api.g_miss_char
309     , p7_a69  VARCHAR2 := fnd_api.g_miss_char
310     , p7_a70  VARCHAR2 := fnd_api.g_miss_char
311     , p7_a71  VARCHAR2 := fnd_api.g_miss_char
312     , p7_a72  VARCHAR2 := fnd_api.g_miss_char
313     , p7_a73  VARCHAR2 := fnd_api.g_miss_char
314     , p7_a74  VARCHAR2 := fnd_api.g_miss_char
315     , p7_a75  NUMBER := 0-1962.0724
316     , p7_a76  NUMBER := 0-1962.0724
317     , p7_a77  VARCHAR2 := fnd_api.g_miss_char
318     , p7_a78  VARCHAR2 := fnd_api.g_miss_char
319     , p7_a79  NUMBER := 0-1962.0724
320     , p7_a80  VARCHAR2 := fnd_api.g_miss_char
321     , p7_a81  VARCHAR2 := fnd_api.g_miss_char
322   )
323 
324   as
325     ddp_deliv_rec ams_deliverable_pub.deliv_rec_type;
326     ddindx binary_integer; indx binary_integer;
327   begin
328 
329     -- copy data to the local IN or IN-OUT args, if any
330 
331 
332 
333 
334 
335 
336 
337     ddp_deliv_rec.deliverable_id := rosetta_g_miss_num_map(p7_a0);
338     ddp_deliv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
339     ddp_deliv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
340     ddp_deliv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
341     ddp_deliv_rec.created_by := rosetta_g_miss_num_map(p7_a4);
342     ddp_deliv_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
343     ddp_deliv_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
344     ddp_deliv_rec.language_code := p7_a7;
345     ddp_deliv_rec.version := p7_a8;
346     ddp_deliv_rec.application_id := rosetta_g_miss_num_map(p7_a9);
347     ddp_deliv_rec.user_status_id := rosetta_g_miss_num_map(p7_a10);
348     ddp_deliv_rec.status_code := p7_a11;
349     ddp_deliv_rec.status_date := rosetta_g_miss_date_in_map(p7_a12);
350     ddp_deliv_rec.active_flag := p7_a13;
351     ddp_deliv_rec.private_flag := p7_a14;
352     ddp_deliv_rec.owner_user_id := rosetta_g_miss_num_map(p7_a15);
353     ddp_deliv_rec.fund_source_id := rosetta_g_miss_num_map(p7_a16);
354     ddp_deliv_rec.fund_source_type := p7_a17;
355     ddp_deliv_rec.category_type_id := rosetta_g_miss_num_map(p7_a18);
356     ddp_deliv_rec.category_sub_type_id := rosetta_g_miss_num_map(p7_a19);
357     ddp_deliv_rec.kit_flag := p7_a20;
358     ddp_deliv_rec.inventory_flag := p7_a21;
359     ddp_deliv_rec.inventory_item_id := rosetta_g_miss_num_map(p7_a22);
360     ddp_deliv_rec.inventory_item_org_id := rosetta_g_miss_num_map(p7_a23);
361     ddp_deliv_rec.pricelist_header_id := rosetta_g_miss_num_map(p7_a24);
362     ddp_deliv_rec.pricelist_line_id := rosetta_g_miss_num_map(p7_a25);
363     ddp_deliv_rec.actual_avail_from_date := rosetta_g_miss_date_in_map(p7_a26);
364     ddp_deliv_rec.actual_avail_to_date := rosetta_g_miss_date_in_map(p7_a27);
365     ddp_deliv_rec.forecasted_complete_date := rosetta_g_miss_date_in_map(p7_a28);
366     ddp_deliv_rec.actual_complete_date := rosetta_g_miss_date_in_map(p7_a29);
367     ddp_deliv_rec.transaction_currency_code := p7_a30;
368     ddp_deliv_rec.functional_currency_code := p7_a31;
369     ddp_deliv_rec.budget_amount_tc := rosetta_g_miss_num_map(p7_a32);
370     ddp_deliv_rec.budget_amount_fc := rosetta_g_miss_num_map(p7_a33);
371     ddp_deliv_rec.replaced_by_deliverable_id := rosetta_g_miss_num_map(p7_a34);
372     ddp_deliv_rec.can_fulfill_electronic_flag := p7_a35;
373     ddp_deliv_rec.can_fulfill_physical_flag := p7_a36;
374     ddp_deliv_rec.jtf_amv_item_id := rosetta_g_miss_num_map(p7_a37);
375     ddp_deliv_rec.non_inv_ctrl_code := p7_a38;
376     ddp_deliv_rec.non_inv_quantity_on_hand := rosetta_g_miss_num_map(p7_a39);
377     ddp_deliv_rec.non_inv_quantity_on_order := rosetta_g_miss_num_map(p7_a40);
378     ddp_deliv_rec.non_inv_quantity_on_reserve := rosetta_g_miss_num_map(p7_a41);
379     ddp_deliv_rec.chargeback_amount := rosetta_g_miss_num_map(p7_a42);
380     ddp_deliv_rec.chargeback_uom := p7_a43;
381     ddp_deliv_rec.chargeback_amount_curr_code := p7_a44;
382     ddp_deliv_rec.deliverable_code := p7_a45;
383     ddp_deliv_rec.deliverable_pick_flag := p7_a46;
384     ddp_deliv_rec.currency_code := p7_a47;
385     ddp_deliv_rec.forecasted_cost := rosetta_g_miss_num_map(p7_a48);
386     ddp_deliv_rec.actual_cost := rosetta_g_miss_num_map(p7_a49);
387     ddp_deliv_rec.forecasted_responses := rosetta_g_miss_num_map(p7_a50);
388     ddp_deliv_rec.actual_responses := rosetta_g_miss_num_map(p7_a51);
389     ddp_deliv_rec.country := p7_a52;
390     ddp_deliv_rec.default_approver_id := rosetta_g_miss_num_map(p7_a53);
391     ddp_deliv_rec.attribute_category := p7_a54;
392     ddp_deliv_rec.attribute1 := p7_a55;
393     ddp_deliv_rec.attribute2 := p7_a56;
394     ddp_deliv_rec.attribute3 := p7_a57;
395     ddp_deliv_rec.attribute4 := p7_a58;
396     ddp_deliv_rec.attribute5 := p7_a59;
397     ddp_deliv_rec.attribute6 := p7_a60;
398     ddp_deliv_rec.attribute7 := p7_a61;
399     ddp_deliv_rec.attribute8 := p7_a62;
400     ddp_deliv_rec.attribute9 := p7_a63;
401     ddp_deliv_rec.attribute10 := p7_a64;
402     ddp_deliv_rec.attribute11 := p7_a65;
403     ddp_deliv_rec.attribute12 := p7_a66;
404     ddp_deliv_rec.attribute13 := p7_a67;
405     ddp_deliv_rec.attribute14 := p7_a68;
406     ddp_deliv_rec.attribute15 := p7_a69;
407     ddp_deliv_rec.deliverable_name := p7_a70;
408     ddp_deliv_rec.description := p7_a71;
409     ddp_deliv_rec.start_period_name := p7_a72;
410     ddp_deliv_rec.end_period_name := p7_a73;
411     ddp_deliv_rec.deliverable_calendar := p7_a74;
412     ddp_deliv_rec.country_id := rosetta_g_miss_num_map(p7_a75);
413     ddp_deliv_rec.setup_id := rosetta_g_miss_num_map(p7_a76);
414     ddp_deliv_rec.item_number := p7_a77;
415     ddp_deliv_rec.associate_flag := p7_a78;
416     ddp_deliv_rec.master_object_id := rosetta_g_miss_num_map(p7_a79);
417     ddp_deliv_rec.master_object_type := p7_a80;
418     ddp_deliv_rec.email_content_type := p7_a81;
419 
420     -- here's the delegated call to the old PL/SQL routine
421     ams_deliverable_pub.update_deliverable(p_api_version_number,
422       p_init_msg_list,
423       p_commit,
424       p_validation_level,
425       x_return_status,
426       x_msg_count,
427       x_msg_data,
428       ddp_deliv_rec);
429 
430     -- copy data back from the local variables to OUT or IN-OUT args, if any
431 
432 
433 
434 
435 
436 
437 
438   end;
439 
440 end ams_deliverable_pub_w;