[Home] [Help]
PACKAGE BODY: APPS.AMS_CHANNEL_PVT_W
Source
1 package body ams_channel_pvt_w as
2 /* $Header: amswchab.pls 115.17 2003/06/04 18:40:16 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_channel(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_chan_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 NUMBER := 0-1962.0724
31 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
32 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
33 , p7_a12 DATE := fnd_api.g_miss_date
34 , p7_a13 DATE := fnd_api.g_miss_date
35 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
36 , p7_a15 NUMBER := 0-1962.0724
37 , p7_a16 NUMBER := 0-1962.0724
38 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
39 , p7_a18 VARCHAR2 := fnd_api.g_miss_char
40 , p7_a19 VARCHAR2 := fnd_api.g_miss_char
41 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
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 VARCHAR2 := fnd_api.g_miss_char
48 , p7_a27 VARCHAR2 := fnd_api.g_miss_char
49 , p7_a28 VARCHAR2 := fnd_api.g_miss_char
50 , p7_a29 VARCHAR2 := fnd_api.g_miss_char
51 , p7_a30 VARCHAR2 := fnd_api.g_miss_char
52 , p7_a31 VARCHAR2 := fnd_api.g_miss_char
53 , p7_a32 VARCHAR2 := fnd_api.g_miss_char
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 )
58
59 as
60 ddp_chan_rec ams_channel_pvt.chan_rec_type;
61 ddindx binary_integer; indx binary_integer;
62 begin
63
64 -- copy data to the local IN or IN-OUT args, if any
65
66
67
68
69
70
71
72 ddp_chan_rec.channel_id := p7_a0;
73 ddp_chan_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
74 ddp_chan_rec.last_updated_by := p7_a2;
75 ddp_chan_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
76 ddp_chan_rec.created_by := p7_a4;
77 ddp_chan_rec.last_update_login := p7_a5;
78 ddp_chan_rec.object_version_number := p7_a6;
79 ddp_chan_rec.channel_type_code := p7_a7;
80 ddp_chan_rec.order_sequence := p7_a8;
81 ddp_chan_rec.managed_by_person_id := p7_a9;
82 ddp_chan_rec.outbound_flag := p7_a10;
83 ddp_chan_rec.inbound_flag := p7_a11;
84 ddp_chan_rec.active_from_date := rosetta_g_miss_date_in_map(p7_a12);
85 ddp_chan_rec.active_to_date := rosetta_g_miss_date_in_map(p7_a13);
86 ddp_chan_rec.rating := p7_a14;
87 ddp_chan_rec.preferred_vendor_id := p7_a15;
88 ddp_chan_rec.party_id := p7_a16;
89 ddp_chan_rec.attribute_category := p7_a17;
90 ddp_chan_rec.attribute1 := p7_a18;
91 ddp_chan_rec.attribute2 := p7_a19;
92 ddp_chan_rec.attribute3 := p7_a20;
93 ddp_chan_rec.attribute4 := p7_a21;
94 ddp_chan_rec.attribute5 := p7_a22;
95 ddp_chan_rec.attribute6 := p7_a23;
96 ddp_chan_rec.attribute7 := p7_a24;
97 ddp_chan_rec.attribute8 := p7_a25;
98 ddp_chan_rec.attribute9 := p7_a26;
99 ddp_chan_rec.attribute10 := p7_a27;
100 ddp_chan_rec.attribute11 := p7_a28;
101 ddp_chan_rec.attribute12 := p7_a29;
102 ddp_chan_rec.attribute13 := p7_a30;
103 ddp_chan_rec.attribute14 := p7_a31;
104 ddp_chan_rec.attribute15 := p7_a32;
105 ddp_chan_rec.channel_name := p7_a33;
106 ddp_chan_rec.description := p7_a34;
107 ddp_chan_rec.country_id := p7_a35;
108
109
110 -- here's the delegated call to the old PL/SQL routine
111 ams_channel_pvt.create_channel(p_api_version,
112 p_init_msg_list,
113 p_commit,
114 p_validation_level,
115 x_return_status,
116 x_msg_count,
117 x_msg_data,
118 ddp_chan_rec,
119 x_chan_id);
120
121 -- copy data back from the local variables to OUT or IN-OUT args, if any
122
123
124
125
126
127
128
129
130 end;
131
132 procedure update_channel(p_api_version NUMBER
133 , p_init_msg_list VARCHAR2
134 , p_commit VARCHAR2
135 , p_validation_level NUMBER
136 , x_return_status out nocopy VARCHAR2
137 , x_msg_count out nocopy NUMBER
138 , x_msg_data out nocopy VARCHAR2
139 , p7_a0 NUMBER := 0-1962.0724
140 , p7_a1 DATE := fnd_api.g_miss_date
141 , p7_a2 NUMBER := 0-1962.0724
142 , p7_a3 DATE := fnd_api.g_miss_date
143 , p7_a4 NUMBER := 0-1962.0724
144 , p7_a5 NUMBER := 0-1962.0724
145 , p7_a6 NUMBER := 0-1962.0724
146 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
147 , p7_a8 NUMBER := 0-1962.0724
148 , p7_a9 NUMBER := 0-1962.0724
149 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
150 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
151 , p7_a12 DATE := fnd_api.g_miss_date
152 , p7_a13 DATE := fnd_api.g_miss_date
153 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
154 , p7_a15 NUMBER := 0-1962.0724
155 , p7_a16 NUMBER := 0-1962.0724
156 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
157 , p7_a18 VARCHAR2 := fnd_api.g_miss_char
158 , p7_a19 VARCHAR2 := fnd_api.g_miss_char
159 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
160 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
161 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
162 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
163 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
164 , p7_a25 VARCHAR2 := fnd_api.g_miss_char
165 , p7_a26 VARCHAR2 := fnd_api.g_miss_char
166 , p7_a27 VARCHAR2 := fnd_api.g_miss_char
167 , p7_a28 VARCHAR2 := fnd_api.g_miss_char
168 , p7_a29 VARCHAR2 := fnd_api.g_miss_char
169 , p7_a30 VARCHAR2 := fnd_api.g_miss_char
170 , p7_a31 VARCHAR2 := fnd_api.g_miss_char
171 , p7_a32 VARCHAR2 := fnd_api.g_miss_char
172 , p7_a33 VARCHAR2 := fnd_api.g_miss_char
173 , p7_a34 VARCHAR2 := fnd_api.g_miss_char
174 , p7_a35 NUMBER := 0-1962.0724
175 )
176
177 as
178 ddp_chan_rec ams_channel_pvt.chan_rec_type;
179 ddindx binary_integer; indx binary_integer;
180 begin
181
182 -- copy data to the local IN or IN-OUT args, if any
183
184
185
186
187
188
189
190 ddp_chan_rec.channel_id := p7_a0;
191 ddp_chan_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
192 ddp_chan_rec.last_updated_by := p7_a2;
193 ddp_chan_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
194 ddp_chan_rec.created_by := p7_a4;
195 ddp_chan_rec.last_update_login := p7_a5;
196 ddp_chan_rec.object_version_number := p7_a6;
197 ddp_chan_rec.channel_type_code := p7_a7;
198 ddp_chan_rec.order_sequence := p7_a8;
199 ddp_chan_rec.managed_by_person_id := p7_a9;
200 ddp_chan_rec.outbound_flag := p7_a10;
201 ddp_chan_rec.inbound_flag := p7_a11;
202 ddp_chan_rec.active_from_date := rosetta_g_miss_date_in_map(p7_a12);
203 ddp_chan_rec.active_to_date := rosetta_g_miss_date_in_map(p7_a13);
204 ddp_chan_rec.rating := p7_a14;
205 ddp_chan_rec.preferred_vendor_id := p7_a15;
206 ddp_chan_rec.party_id := p7_a16;
207 ddp_chan_rec.attribute_category := p7_a17;
208 ddp_chan_rec.attribute1 := p7_a18;
209 ddp_chan_rec.attribute2 := p7_a19;
210 ddp_chan_rec.attribute3 := p7_a20;
211 ddp_chan_rec.attribute4 := p7_a21;
212 ddp_chan_rec.attribute5 := p7_a22;
213 ddp_chan_rec.attribute6 := p7_a23;
214 ddp_chan_rec.attribute7 := p7_a24;
215 ddp_chan_rec.attribute8 := p7_a25;
216 ddp_chan_rec.attribute9 := p7_a26;
217 ddp_chan_rec.attribute10 := p7_a27;
218 ddp_chan_rec.attribute11 := p7_a28;
219 ddp_chan_rec.attribute12 := p7_a29;
220 ddp_chan_rec.attribute13 := p7_a30;
221 ddp_chan_rec.attribute14 := p7_a31;
222 ddp_chan_rec.attribute15 := p7_a32;
223 ddp_chan_rec.channel_name := p7_a33;
224 ddp_chan_rec.description := p7_a34;
225 ddp_chan_rec.country_id := p7_a35;
226
227 -- here's the delegated call to the old PL/SQL routine
228 ams_channel_pvt.update_channel(p_api_version,
229 p_init_msg_list,
230 p_commit,
231 p_validation_level,
232 x_return_status,
233 x_msg_count,
234 x_msg_data,
235 ddp_chan_rec);
236
237 -- copy data back from the local variables to OUT or IN-OUT args, if any
238
239
240
241
242
243
244
245 end;
246
247 procedure validate_channel(p_api_version NUMBER
248 , p_init_msg_list VARCHAR2
249 , p_validation_level NUMBER
250 , x_return_status out nocopy VARCHAR2
251 , x_msg_count out nocopy NUMBER
252 , x_msg_data out nocopy VARCHAR2
253 , p6_a0 NUMBER := 0-1962.0724
254 , p6_a1 DATE := fnd_api.g_miss_date
255 , p6_a2 NUMBER := 0-1962.0724
256 , p6_a3 DATE := fnd_api.g_miss_date
257 , p6_a4 NUMBER := 0-1962.0724
258 , p6_a5 NUMBER := 0-1962.0724
259 , p6_a6 NUMBER := 0-1962.0724
260 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
261 , p6_a8 NUMBER := 0-1962.0724
262 , p6_a9 NUMBER := 0-1962.0724
263 , p6_a10 VARCHAR2 := fnd_api.g_miss_char
264 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
265 , p6_a12 DATE := fnd_api.g_miss_date
266 , p6_a13 DATE := fnd_api.g_miss_date
267 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
268 , p6_a15 NUMBER := 0-1962.0724
269 , p6_a16 NUMBER := 0-1962.0724
270 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
271 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
272 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
273 , p6_a20 VARCHAR2 := fnd_api.g_miss_char
274 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
275 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
276 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
277 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
278 , p6_a25 VARCHAR2 := fnd_api.g_miss_char
279 , p6_a26 VARCHAR2 := fnd_api.g_miss_char
280 , p6_a27 VARCHAR2 := fnd_api.g_miss_char
281 , p6_a28 VARCHAR2 := fnd_api.g_miss_char
282 , p6_a29 VARCHAR2 := fnd_api.g_miss_char
283 , p6_a30 VARCHAR2 := fnd_api.g_miss_char
284 , p6_a31 VARCHAR2 := fnd_api.g_miss_char
285 , p6_a32 VARCHAR2 := fnd_api.g_miss_char
286 , p6_a33 VARCHAR2 := fnd_api.g_miss_char
287 , p6_a34 VARCHAR2 := fnd_api.g_miss_char
288 , p6_a35 NUMBER := 0-1962.0724
289 )
290
291 as
292 ddp_chan_rec ams_channel_pvt.chan_rec_type;
293 ddindx binary_integer; indx binary_integer;
294 begin
295
296 -- copy data to the local IN or IN-OUT args, if any
297
298
299
300
301
302
303 ddp_chan_rec.channel_id := p6_a0;
304 ddp_chan_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
305 ddp_chan_rec.last_updated_by := p6_a2;
306 ddp_chan_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
307 ddp_chan_rec.created_by := p6_a4;
308 ddp_chan_rec.last_update_login := p6_a5;
309 ddp_chan_rec.object_version_number := p6_a6;
310 ddp_chan_rec.channel_type_code := p6_a7;
311 ddp_chan_rec.order_sequence := p6_a8;
312 ddp_chan_rec.managed_by_person_id := p6_a9;
313 ddp_chan_rec.outbound_flag := p6_a10;
314 ddp_chan_rec.inbound_flag := p6_a11;
315 ddp_chan_rec.active_from_date := rosetta_g_miss_date_in_map(p6_a12);
316 ddp_chan_rec.active_to_date := rosetta_g_miss_date_in_map(p6_a13);
317 ddp_chan_rec.rating := p6_a14;
318 ddp_chan_rec.preferred_vendor_id := p6_a15;
319 ddp_chan_rec.party_id := p6_a16;
320 ddp_chan_rec.attribute_category := p6_a17;
321 ddp_chan_rec.attribute1 := p6_a18;
322 ddp_chan_rec.attribute2 := p6_a19;
323 ddp_chan_rec.attribute3 := p6_a20;
324 ddp_chan_rec.attribute4 := p6_a21;
325 ddp_chan_rec.attribute5 := p6_a22;
326 ddp_chan_rec.attribute6 := p6_a23;
327 ddp_chan_rec.attribute7 := p6_a24;
328 ddp_chan_rec.attribute8 := p6_a25;
329 ddp_chan_rec.attribute9 := p6_a26;
330 ddp_chan_rec.attribute10 := p6_a27;
331 ddp_chan_rec.attribute11 := p6_a28;
332 ddp_chan_rec.attribute12 := p6_a29;
333 ddp_chan_rec.attribute13 := p6_a30;
334 ddp_chan_rec.attribute14 := p6_a31;
335 ddp_chan_rec.attribute15 := p6_a32;
336 ddp_chan_rec.channel_name := p6_a33;
337 ddp_chan_rec.description := p6_a34;
338 ddp_chan_rec.country_id := p6_a35;
339
340 -- here's the delegated call to the old PL/SQL routine
341 ams_channel_pvt.validate_channel(p_api_version,
342 p_init_msg_list,
343 p_validation_level,
344 x_return_status,
345 x_msg_count,
346 x_msg_data,
347 ddp_chan_rec);
348
349 -- copy data back from the local variables to OUT or IN-OUT args, if any
350
351
352
353
354
355
356 end;
357
358 procedure check_chan_items(p_validation_mode VARCHAR2
359 , x_return_status out nocopy VARCHAR2
360 , p0_a0 NUMBER := 0-1962.0724
361 , p0_a1 DATE := fnd_api.g_miss_date
362 , p0_a2 NUMBER := 0-1962.0724
363 , p0_a3 DATE := fnd_api.g_miss_date
364 , p0_a4 NUMBER := 0-1962.0724
365 , p0_a5 NUMBER := 0-1962.0724
366 , p0_a6 NUMBER := 0-1962.0724
367 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
368 , p0_a8 NUMBER := 0-1962.0724
369 , p0_a9 NUMBER := 0-1962.0724
370 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
371 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
372 , p0_a12 DATE := fnd_api.g_miss_date
373 , p0_a13 DATE := fnd_api.g_miss_date
374 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
375 , p0_a15 NUMBER := 0-1962.0724
376 , p0_a16 NUMBER := 0-1962.0724
377 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
378 , p0_a18 VARCHAR2 := fnd_api.g_miss_char
379 , p0_a19 VARCHAR2 := fnd_api.g_miss_char
380 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
381 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
382 , p0_a22 VARCHAR2 := fnd_api.g_miss_char
383 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
384 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
385 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
386 , p0_a26 VARCHAR2 := fnd_api.g_miss_char
387 , p0_a27 VARCHAR2 := fnd_api.g_miss_char
388 , p0_a28 VARCHAR2 := fnd_api.g_miss_char
389 , p0_a29 VARCHAR2 := fnd_api.g_miss_char
390 , p0_a30 VARCHAR2 := fnd_api.g_miss_char
391 , p0_a31 VARCHAR2 := fnd_api.g_miss_char
392 , p0_a32 VARCHAR2 := fnd_api.g_miss_char
393 , p0_a33 VARCHAR2 := fnd_api.g_miss_char
394 , p0_a34 VARCHAR2 := fnd_api.g_miss_char
395 , p0_a35 NUMBER := 0-1962.0724
396 )
397
398 as
399 ddp_chan_rec ams_channel_pvt.chan_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 ddp_chan_rec.channel_id := p0_a0;
405 ddp_chan_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
406 ddp_chan_rec.last_updated_by := p0_a2;
407 ddp_chan_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
408 ddp_chan_rec.created_by := p0_a4;
409 ddp_chan_rec.last_update_login := p0_a5;
410 ddp_chan_rec.object_version_number := p0_a6;
411 ddp_chan_rec.channel_type_code := p0_a7;
412 ddp_chan_rec.order_sequence := p0_a8;
413 ddp_chan_rec.managed_by_person_id := p0_a9;
414 ddp_chan_rec.outbound_flag := p0_a10;
415 ddp_chan_rec.inbound_flag := p0_a11;
416 ddp_chan_rec.active_from_date := rosetta_g_miss_date_in_map(p0_a12);
417 ddp_chan_rec.active_to_date := rosetta_g_miss_date_in_map(p0_a13);
418 ddp_chan_rec.rating := p0_a14;
419 ddp_chan_rec.preferred_vendor_id := p0_a15;
420 ddp_chan_rec.party_id := p0_a16;
421 ddp_chan_rec.attribute_category := p0_a17;
422 ddp_chan_rec.attribute1 := p0_a18;
423 ddp_chan_rec.attribute2 := p0_a19;
424 ddp_chan_rec.attribute3 := p0_a20;
425 ddp_chan_rec.attribute4 := p0_a21;
426 ddp_chan_rec.attribute5 := p0_a22;
427 ddp_chan_rec.attribute6 := p0_a23;
428 ddp_chan_rec.attribute7 := p0_a24;
429 ddp_chan_rec.attribute8 := p0_a25;
430 ddp_chan_rec.attribute9 := p0_a26;
431 ddp_chan_rec.attribute10 := p0_a27;
432 ddp_chan_rec.attribute11 := p0_a28;
433 ddp_chan_rec.attribute12 := p0_a29;
434 ddp_chan_rec.attribute13 := p0_a30;
435 ddp_chan_rec.attribute14 := p0_a31;
436 ddp_chan_rec.attribute15 := p0_a32;
437 ddp_chan_rec.channel_name := p0_a33;
438 ddp_chan_rec.description := p0_a34;
439 ddp_chan_rec.country_id := p0_a35;
440
441
442
443 -- here's the delegated call to the old PL/SQL routine
444 ams_channel_pvt.check_chan_items(ddp_chan_rec,
445 p_validation_mode,
446 x_return_status);
447
448 -- copy data back from the local variables to OUT or IN-OUT args, if any
449
450
451 end;
452
453 procedure init_chan_rec(p0_a0 out nocopy NUMBER
454 , p0_a1 out nocopy DATE
455 , p0_a2 out nocopy NUMBER
456 , p0_a3 out nocopy DATE
457 , p0_a4 out nocopy NUMBER
458 , p0_a5 out nocopy NUMBER
459 , p0_a6 out nocopy NUMBER
460 , p0_a7 out nocopy VARCHAR2
461 , p0_a8 out nocopy NUMBER
462 , p0_a9 out nocopy NUMBER
463 , p0_a10 out nocopy VARCHAR2
464 , p0_a11 out nocopy VARCHAR2
465 , p0_a12 out nocopy DATE
466 , p0_a13 out nocopy DATE
467 , p0_a14 out nocopy VARCHAR2
468 , p0_a15 out nocopy NUMBER
469 , p0_a16 out nocopy NUMBER
470 , p0_a17 out nocopy VARCHAR2
471 , p0_a18 out nocopy VARCHAR2
472 , p0_a19 out nocopy VARCHAR2
473 , p0_a20 out nocopy VARCHAR2
474 , p0_a21 out nocopy VARCHAR2
475 , p0_a22 out nocopy VARCHAR2
476 , p0_a23 out nocopy VARCHAR2
477 , p0_a24 out nocopy VARCHAR2
478 , p0_a25 out nocopy VARCHAR2
479 , p0_a26 out nocopy VARCHAR2
480 , p0_a27 out nocopy VARCHAR2
481 , p0_a28 out nocopy VARCHAR2
482 , p0_a29 out nocopy VARCHAR2
483 , p0_a30 out nocopy VARCHAR2
484 , p0_a31 out nocopy VARCHAR2
485 , p0_a32 out nocopy VARCHAR2
486 , p0_a33 out nocopy VARCHAR2
487 , p0_a34 out nocopy VARCHAR2
488 , p0_a35 out nocopy NUMBER
489 )
490
491 as
492 ddx_chan_rec ams_channel_pvt.chan_rec_type;
493 ddindx binary_integer; indx binary_integer;
494 begin
495
496 -- copy data to the local IN or IN-OUT args, if any
497
498 -- here's the delegated call to the old PL/SQL routine
499 ams_channel_pvt.init_chan_rec(ddx_chan_rec);
500
501 -- copy data back from the local variables to OUT or IN-OUT args, if any
502 p0_a0 := ddx_chan_rec.channel_id;
503 p0_a1 := ddx_chan_rec.last_update_date;
504 p0_a2 := ddx_chan_rec.last_updated_by;
505 p0_a3 := ddx_chan_rec.creation_date;
506 p0_a4 := ddx_chan_rec.created_by;
507 p0_a5 := ddx_chan_rec.last_update_login;
508 p0_a6 := ddx_chan_rec.object_version_number;
509 p0_a7 := ddx_chan_rec.channel_type_code;
510 p0_a8 := ddx_chan_rec.order_sequence;
511 p0_a9 := ddx_chan_rec.managed_by_person_id;
512 p0_a10 := ddx_chan_rec.outbound_flag;
513 p0_a11 := ddx_chan_rec.inbound_flag;
514 p0_a12 := ddx_chan_rec.active_from_date;
515 p0_a13 := ddx_chan_rec.active_to_date;
516 p0_a14 := ddx_chan_rec.rating;
517 p0_a15 := ddx_chan_rec.preferred_vendor_id;
518 p0_a16 := ddx_chan_rec.party_id;
519 p0_a17 := ddx_chan_rec.attribute_category;
520 p0_a18 := ddx_chan_rec.attribute1;
521 p0_a19 := ddx_chan_rec.attribute2;
522 p0_a20 := ddx_chan_rec.attribute3;
523 p0_a21 := ddx_chan_rec.attribute4;
524 p0_a22 := ddx_chan_rec.attribute5;
525 p0_a23 := ddx_chan_rec.attribute6;
526 p0_a24 := ddx_chan_rec.attribute7;
527 p0_a25 := ddx_chan_rec.attribute8;
528 p0_a26 := ddx_chan_rec.attribute9;
529 p0_a27 := ddx_chan_rec.attribute10;
530 p0_a28 := ddx_chan_rec.attribute11;
531 p0_a29 := ddx_chan_rec.attribute12;
532 p0_a30 := ddx_chan_rec.attribute13;
533 p0_a31 := ddx_chan_rec.attribute14;
534 p0_a32 := ddx_chan_rec.attribute15;
535 p0_a33 := ddx_chan_rec.channel_name;
536 p0_a34 := ddx_chan_rec.description;
537 p0_a35 := ddx_chan_rec.country_id;
538 end;
539
540 procedure complete_chan_rec(p1_a0 out nocopy NUMBER
541 , p1_a1 out nocopy DATE
542 , p1_a2 out nocopy NUMBER
543 , p1_a3 out nocopy DATE
544 , p1_a4 out nocopy NUMBER
545 , p1_a5 out nocopy NUMBER
546 , p1_a6 out nocopy NUMBER
547 , p1_a7 out nocopy VARCHAR2
548 , p1_a8 out nocopy NUMBER
549 , p1_a9 out nocopy NUMBER
550 , p1_a10 out nocopy VARCHAR2
551 , p1_a11 out nocopy VARCHAR2
552 , p1_a12 out nocopy DATE
553 , p1_a13 out nocopy DATE
554 , p1_a14 out nocopy VARCHAR2
555 , p1_a15 out nocopy NUMBER
556 , p1_a16 out nocopy NUMBER
557 , p1_a17 out nocopy VARCHAR2
558 , p1_a18 out nocopy VARCHAR2
559 , p1_a19 out nocopy VARCHAR2
560 , p1_a20 out nocopy VARCHAR2
561 , p1_a21 out nocopy VARCHAR2
562 , p1_a22 out nocopy VARCHAR2
563 , p1_a23 out nocopy VARCHAR2
564 , p1_a24 out nocopy VARCHAR2
565 , p1_a25 out nocopy VARCHAR2
566 , p1_a26 out nocopy VARCHAR2
567 , p1_a27 out nocopy VARCHAR2
568 , p1_a28 out nocopy VARCHAR2
569 , p1_a29 out nocopy VARCHAR2
570 , p1_a30 out nocopy VARCHAR2
571 , p1_a31 out nocopy VARCHAR2
572 , p1_a32 out nocopy VARCHAR2
573 , p1_a33 out nocopy VARCHAR2
574 , p1_a34 out nocopy VARCHAR2
575 , p1_a35 out nocopy NUMBER
576 , p0_a0 NUMBER := 0-1962.0724
577 , p0_a1 DATE := fnd_api.g_miss_date
578 , p0_a2 NUMBER := 0-1962.0724
579 , p0_a3 DATE := fnd_api.g_miss_date
580 , p0_a4 NUMBER := 0-1962.0724
581 , p0_a5 NUMBER := 0-1962.0724
582 , p0_a6 NUMBER := 0-1962.0724
583 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
584 , p0_a8 NUMBER := 0-1962.0724
585 , p0_a9 NUMBER := 0-1962.0724
586 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
587 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
588 , p0_a12 DATE := fnd_api.g_miss_date
589 , p0_a13 DATE := fnd_api.g_miss_date
590 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
591 , p0_a15 NUMBER := 0-1962.0724
592 , p0_a16 NUMBER := 0-1962.0724
593 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
594 , p0_a18 VARCHAR2 := fnd_api.g_miss_char
595 , p0_a19 VARCHAR2 := fnd_api.g_miss_char
596 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
597 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
598 , p0_a22 VARCHAR2 := fnd_api.g_miss_char
599 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
600 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
601 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
602 , p0_a26 VARCHAR2 := fnd_api.g_miss_char
603 , p0_a27 VARCHAR2 := fnd_api.g_miss_char
604 , p0_a28 VARCHAR2 := fnd_api.g_miss_char
605 , p0_a29 VARCHAR2 := fnd_api.g_miss_char
606 , p0_a30 VARCHAR2 := fnd_api.g_miss_char
607 , p0_a31 VARCHAR2 := fnd_api.g_miss_char
608 , p0_a32 VARCHAR2 := fnd_api.g_miss_char
609 , p0_a33 VARCHAR2 := fnd_api.g_miss_char
610 , p0_a34 VARCHAR2 := fnd_api.g_miss_char
611 , p0_a35 NUMBER := 0-1962.0724
612 )
613
614 as
615 ddp_chan_rec ams_channel_pvt.chan_rec_type;
616 ddx_complete_rec ams_channel_pvt.chan_rec_type;
617 ddindx binary_integer; indx binary_integer;
618 begin
619
620 -- copy data to the local IN or IN-OUT args, if any
621 ddp_chan_rec.channel_id := p0_a0;
622 ddp_chan_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
623 ddp_chan_rec.last_updated_by := p0_a2;
624 ddp_chan_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
625 ddp_chan_rec.created_by := p0_a4;
626 ddp_chan_rec.last_update_login := p0_a5;
627 ddp_chan_rec.object_version_number := p0_a6;
628 ddp_chan_rec.channel_type_code := p0_a7;
629 ddp_chan_rec.order_sequence := p0_a8;
630 ddp_chan_rec.managed_by_person_id := p0_a9;
631 ddp_chan_rec.outbound_flag := p0_a10;
632 ddp_chan_rec.inbound_flag := p0_a11;
633 ddp_chan_rec.active_from_date := rosetta_g_miss_date_in_map(p0_a12);
634 ddp_chan_rec.active_to_date := rosetta_g_miss_date_in_map(p0_a13);
635 ddp_chan_rec.rating := p0_a14;
636 ddp_chan_rec.preferred_vendor_id := p0_a15;
637 ddp_chan_rec.party_id := p0_a16;
638 ddp_chan_rec.attribute_category := p0_a17;
639 ddp_chan_rec.attribute1 := p0_a18;
640 ddp_chan_rec.attribute2 := p0_a19;
641 ddp_chan_rec.attribute3 := p0_a20;
642 ddp_chan_rec.attribute4 := p0_a21;
643 ddp_chan_rec.attribute5 := p0_a22;
644 ddp_chan_rec.attribute6 := p0_a23;
645 ddp_chan_rec.attribute7 := p0_a24;
646 ddp_chan_rec.attribute8 := p0_a25;
647 ddp_chan_rec.attribute9 := p0_a26;
648 ddp_chan_rec.attribute10 := p0_a27;
649 ddp_chan_rec.attribute11 := p0_a28;
650 ddp_chan_rec.attribute12 := p0_a29;
651 ddp_chan_rec.attribute13 := p0_a30;
652 ddp_chan_rec.attribute14 := p0_a31;
653 ddp_chan_rec.attribute15 := p0_a32;
654 ddp_chan_rec.channel_name := p0_a33;
655 ddp_chan_rec.description := p0_a34;
656 ddp_chan_rec.country_id := p0_a35;
657
658
659 -- here's the delegated call to the old PL/SQL routine
660 ams_channel_pvt.complete_chan_rec(ddp_chan_rec,
661 ddx_complete_rec);
662
663 -- copy data back from the local variables to OUT or IN-OUT args, if any
664
665 p1_a0 := ddx_complete_rec.channel_id;
666 p1_a1 := ddx_complete_rec.last_update_date;
667 p1_a2 := ddx_complete_rec.last_updated_by;
668 p1_a3 := ddx_complete_rec.creation_date;
669 p1_a4 := ddx_complete_rec.created_by;
670 p1_a5 := ddx_complete_rec.last_update_login;
671 p1_a6 := ddx_complete_rec.object_version_number;
672 p1_a7 := ddx_complete_rec.channel_type_code;
673 p1_a8 := ddx_complete_rec.order_sequence;
674 p1_a9 := ddx_complete_rec.managed_by_person_id;
675 p1_a10 := ddx_complete_rec.outbound_flag;
676 p1_a11 := ddx_complete_rec.inbound_flag;
677 p1_a12 := ddx_complete_rec.active_from_date;
678 p1_a13 := ddx_complete_rec.active_to_date;
679 p1_a14 := ddx_complete_rec.rating;
680 p1_a15 := ddx_complete_rec.preferred_vendor_id;
681 p1_a16 := ddx_complete_rec.party_id;
682 p1_a17 := ddx_complete_rec.attribute_category;
683 p1_a18 := ddx_complete_rec.attribute1;
684 p1_a19 := ddx_complete_rec.attribute2;
685 p1_a20 := ddx_complete_rec.attribute3;
686 p1_a21 := ddx_complete_rec.attribute4;
687 p1_a22 := ddx_complete_rec.attribute5;
688 p1_a23 := ddx_complete_rec.attribute6;
689 p1_a24 := ddx_complete_rec.attribute7;
690 p1_a25 := ddx_complete_rec.attribute8;
691 p1_a26 := ddx_complete_rec.attribute9;
692 p1_a27 := ddx_complete_rec.attribute10;
693 p1_a28 := ddx_complete_rec.attribute11;
694 p1_a29 := ddx_complete_rec.attribute12;
695 p1_a30 := ddx_complete_rec.attribute13;
696 p1_a31 := ddx_complete_rec.attribute14;
697 p1_a32 := ddx_complete_rec.attribute15;
698 p1_a33 := ddx_complete_rec.channel_name;
699 p1_a34 := ddx_complete_rec.description;
700 p1_a35 := ddx_complete_rec.country_id;
701 end;
702
703 end ams_channel_pvt_w;