[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;