[Home] [Help]
PACKAGE BODY: APPS.AMS_IBA_PLCMNT_PVT_W
Source
1 package body ams_iba_plcmnt_pvt_w as
2 /* $Header: amswplcb.pls 115.5 2003/05/09 10:52:38 sikalyan 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 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 rosetta_table_copy_in_p3(t out nocopy ams_iba_plcmnt_pvt.iba_plcmnt_tbl_type, a0 JTF_NUMBER_TABLE
23 , a1 JTF_NUMBER_TABLE
24 , a2 JTF_VARCHAR2_TABLE_100
25 , a3 JTF_NUMBER_TABLE
26 , a4 JTF_VARCHAR2_TABLE_100
27 , a5 JTF_VARCHAR2_TABLE_100
28 , a6 JTF_VARCHAR2_TABLE_100
29 , a7 JTF_VARCHAR2_TABLE_100
30 , a8 JTF_VARCHAR2_TABLE_100
31 , a9 JTF_VARCHAR2_TABLE_100
32 , a10 JTF_VARCHAR2_TABLE_100
33 , a11 JTF_NUMBER_TABLE
34 , a12 JTF_NUMBER_TABLE
35 , a13 JTF_VARCHAR2_TABLE_100
36 , a14 JTF_VARCHAR2_TABLE_100
37 , a15 JTF_NUMBER_TABLE
38 , a16 JTF_DATE_TABLE
39 , a17 JTF_NUMBER_TABLE
40 , a18 JTF_DATE_TABLE
41 , a19 JTF_NUMBER_TABLE
42 , a20 JTF_NUMBER_TABLE
43 , a21 JTF_VARCHAR2_TABLE_300
44 , a22 JTF_VARCHAR2_TABLE_4000
45 ) as
46 ddindx binary_integer; indx binary_integer;
47 begin
48 if a0 is not null and a0.count > 0 then
49 if a0.count > 0 then
50 indx := a0.first;
51 ddindx := 1;
52 while true loop
53 t(ddindx).placement_id := rosetta_g_miss_num_map(a0(indx));
54 t(ddindx).site_id := rosetta_g_miss_num_map(a1(indx));
55 t(ddindx).site_ref_code := a2(indx);
56 t(ddindx).page_id := rosetta_g_miss_num_map(a3(indx));
57 t(ddindx).page_ref_code := a4(indx);
58 t(ddindx).location_code := a5(indx);
59 t(ddindx).param1 := a6(indx);
60 t(ddindx).param2 := a7(indx);
61 t(ddindx).param3 := a8(indx);
62 t(ddindx).param4 := a9(indx);
63 t(ddindx).param5 := a10(indx);
64 t(ddindx).stylesheet_id := rosetta_g_miss_num_map(a11(indx));
65 t(ddindx).posting_id := rosetta_g_miss_num_map(a12(indx));
66 t(ddindx).status_code := a13(indx);
67 t(ddindx).track_events_flag := a14(indx);
68 t(ddindx).created_by := rosetta_g_miss_num_map(a15(indx));
69 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a16(indx));
70 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a17(indx));
71 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a18(indx));
72 t(ddindx).last_update_login := rosetta_g_miss_num_map(a19(indx));
73 t(ddindx).object_version_number := rosetta_g_miss_num_map(a20(indx));
74 t(ddindx).name := a21(indx);
75 t(ddindx).description := a22(indx);
76 ddindx := ddindx+1;
77 if a0.last =indx
78 then exit;
79 end if;
80 indx := a0.next(indx);
81 end loop;
82 end if;
83 end if;
84 end rosetta_table_copy_in_p3;
85 procedure rosetta_table_copy_out_p3(t ams_iba_plcmnt_pvt.iba_plcmnt_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
86 , a1 out nocopy JTF_NUMBER_TABLE
87 , a2 out nocopy JTF_VARCHAR2_TABLE_100
88 , a3 out nocopy JTF_NUMBER_TABLE
89 , a4 out nocopy JTF_VARCHAR2_TABLE_100
90 , a5 out nocopy JTF_VARCHAR2_TABLE_100
91 , a6 out nocopy JTF_VARCHAR2_TABLE_100
92 , a7 out nocopy JTF_VARCHAR2_TABLE_100
93 , a8 out nocopy JTF_VARCHAR2_TABLE_100
94 , a9 out nocopy JTF_VARCHAR2_TABLE_100
95 , a10 out nocopy JTF_VARCHAR2_TABLE_100
96 , a11 out nocopy JTF_NUMBER_TABLE
97 , a12 out nocopy JTF_NUMBER_TABLE
98 , a13 out nocopy JTF_VARCHAR2_TABLE_100
99 , a14 out nocopy JTF_VARCHAR2_TABLE_100
100 , a15 out nocopy JTF_NUMBER_TABLE
101 , a16 out nocopy JTF_DATE_TABLE
102 , a17 out nocopy JTF_NUMBER_TABLE
103 , a18 out nocopy JTF_DATE_TABLE
104 , a19 out nocopy JTF_NUMBER_TABLE
105 , a20 out nocopy JTF_NUMBER_TABLE
106 , a21 out nocopy JTF_VARCHAR2_TABLE_300
107 , a22 out nocopy JTF_VARCHAR2_TABLE_4000
108 ) as
109 ddindx binary_integer; indx binary_integer;
110 begin
111 if t is null or t.count = 0 then
112 a0 := JTF_NUMBER_TABLE();
113 a1 := JTF_NUMBER_TABLE();
114 a2 := JTF_VARCHAR2_TABLE_100();
115 a3 := JTF_NUMBER_TABLE();
116 a4 := JTF_VARCHAR2_TABLE_100();
117 a5 := JTF_VARCHAR2_TABLE_100();
118 a6 := JTF_VARCHAR2_TABLE_100();
119 a7 := JTF_VARCHAR2_TABLE_100();
120 a8 := JTF_VARCHAR2_TABLE_100();
121 a9 := JTF_VARCHAR2_TABLE_100();
122 a10 := JTF_VARCHAR2_TABLE_100();
123 a11 := JTF_NUMBER_TABLE();
124 a12 := JTF_NUMBER_TABLE();
125 a13 := JTF_VARCHAR2_TABLE_100();
126 a14 := JTF_VARCHAR2_TABLE_100();
127 a15 := JTF_NUMBER_TABLE();
128 a16 := JTF_DATE_TABLE();
129 a17 := JTF_NUMBER_TABLE();
130 a18 := JTF_DATE_TABLE();
131 a19 := JTF_NUMBER_TABLE();
132 a20 := JTF_NUMBER_TABLE();
133 a21 := JTF_VARCHAR2_TABLE_300();
134 a22 := JTF_VARCHAR2_TABLE_4000();
135 else
136 a0 := JTF_NUMBER_TABLE();
137 a1 := JTF_NUMBER_TABLE();
138 a2 := JTF_VARCHAR2_TABLE_100();
139 a3 := JTF_NUMBER_TABLE();
140 a4 := JTF_VARCHAR2_TABLE_100();
141 a5 := JTF_VARCHAR2_TABLE_100();
142 a6 := JTF_VARCHAR2_TABLE_100();
143 a7 := JTF_VARCHAR2_TABLE_100();
144 a8 := JTF_VARCHAR2_TABLE_100();
145 a9 := JTF_VARCHAR2_TABLE_100();
146 a10 := JTF_VARCHAR2_TABLE_100();
147 a11 := JTF_NUMBER_TABLE();
148 a12 := JTF_NUMBER_TABLE();
149 a13 := JTF_VARCHAR2_TABLE_100();
150 a14 := JTF_VARCHAR2_TABLE_100();
151 a15 := JTF_NUMBER_TABLE();
152 a16 := JTF_DATE_TABLE();
153 a17 := JTF_NUMBER_TABLE();
154 a18 := JTF_DATE_TABLE();
155 a19 := JTF_NUMBER_TABLE();
156 a20 := JTF_NUMBER_TABLE();
157 a21 := JTF_VARCHAR2_TABLE_300();
158 a22 := JTF_VARCHAR2_TABLE_4000();
159 if t.count > 0 then
160 a0.extend(t.count);
161 a1.extend(t.count);
162 a2.extend(t.count);
163 a3.extend(t.count);
164 a4.extend(t.count);
165 a5.extend(t.count);
166 a6.extend(t.count);
167 a7.extend(t.count);
168 a8.extend(t.count);
169 a9.extend(t.count);
170 a10.extend(t.count);
171 a11.extend(t.count);
172 a12.extend(t.count);
173 a13.extend(t.count);
174 a14.extend(t.count);
175 a15.extend(t.count);
176 a16.extend(t.count);
177 a17.extend(t.count);
178 a18.extend(t.count);
179 a19.extend(t.count);
180 a20.extend(t.count);
181 a21.extend(t.count);
182 a22.extend(t.count);
183 ddindx := t.first;
184 indx := 1;
185 while true loop
186 a0(indx) := rosetta_g_miss_num_map(t(ddindx).placement_id);
187 a1(indx) := rosetta_g_miss_num_map(t(ddindx).site_id);
188 a2(indx) := t(ddindx).site_ref_code;
189 a3(indx) := rosetta_g_miss_num_map(t(ddindx).page_id);
190 a4(indx) := t(ddindx).page_ref_code;
191 a5(indx) := t(ddindx).location_code;
192 a6(indx) := t(ddindx).param1;
193 a7(indx) := t(ddindx).param2;
194 a8(indx) := t(ddindx).param3;
195 a9(indx) := t(ddindx).param4;
196 a10(indx) := t(ddindx).param5;
197 a11(indx) := rosetta_g_miss_num_map(t(ddindx).stylesheet_id);
198 a12(indx) := rosetta_g_miss_num_map(t(ddindx).posting_id);
199 a13(indx) := t(ddindx).status_code;
200 a14(indx) := t(ddindx).track_events_flag;
201 a15(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
202 a16(indx) := t(ddindx).creation_date;
203 a17(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
204 a18(indx) := t(ddindx).last_update_date;
205 a19(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
206 a20(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
207 a21(indx) := t(ddindx).name;
208 a22(indx) := t(ddindx).description;
209 indx := indx+1;
210 if t.last =ddindx
211 then exit;
212 end if;
213 ddindx := t.next(ddindx);
214 end loop;
215 end if;
216 end if;
217 end rosetta_table_copy_out_p3;
218
219 procedure create_iba_plcmnt(p_api_version_number NUMBER
220 , p_init_msg_list VARCHAR2
221 , p_commit VARCHAR2
222 , p_validation_level NUMBER
223 , x_return_status out nocopy VARCHAR2
224 , x_msg_count out nocopy NUMBER
225 , x_msg_data out nocopy VARCHAR2
226 , x_placement_id out nocopy NUMBER
227 , p7_a0 NUMBER := 0-1962.0724
228 , p7_a1 NUMBER := 0-1962.0724
229 , p7_a2 VARCHAR2 := fnd_api.g_miss_char
230 , p7_a3 NUMBER := 0-1962.0724
231 , p7_a4 VARCHAR2 := fnd_api.g_miss_char
232 , p7_a5 VARCHAR2 := fnd_api.g_miss_char
233 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
234 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
235 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
236 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
237 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
238 , p7_a11 NUMBER := 0-1962.0724
239 , p7_a12 NUMBER := 0-1962.0724
240 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
241 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
242 , p7_a15 NUMBER := 0-1962.0724
243 , p7_a16 DATE := fnd_api.g_miss_date
244 , p7_a17 NUMBER := 0-1962.0724
245 , p7_a18 DATE := fnd_api.g_miss_date
246 , p7_a19 NUMBER := 0-1962.0724
247 , p7_a20 NUMBER := 0-1962.0724
248 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
249 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
250 )
251
252 as
253 ddp_iba_plcmnt_rec ams_iba_plcmnt_pvt.iba_plcmnt_rec_type;
254 ddindx binary_integer; indx binary_integer;
255 begin
256
257 -- copy data to the local IN or IN-OUT args, if any
258
259
260
261
262
263
264
265 ddp_iba_plcmnt_rec.placement_id := rosetta_g_miss_num_map(p7_a0);
266 ddp_iba_plcmnt_rec.site_id := rosetta_g_miss_num_map(p7_a1);
267 ddp_iba_plcmnt_rec.site_ref_code := p7_a2;
268 ddp_iba_plcmnt_rec.page_id := rosetta_g_miss_num_map(p7_a3);
269 ddp_iba_plcmnt_rec.page_ref_code := p7_a4;
270 ddp_iba_plcmnt_rec.location_code := p7_a5;
271 ddp_iba_plcmnt_rec.param1 := p7_a6;
272 ddp_iba_plcmnt_rec.param2 := p7_a7;
273 ddp_iba_plcmnt_rec.param3 := p7_a8;
274 ddp_iba_plcmnt_rec.param4 := p7_a9;
275 ddp_iba_plcmnt_rec.param5 := p7_a10;
276 ddp_iba_plcmnt_rec.stylesheet_id := rosetta_g_miss_num_map(p7_a11);
277 ddp_iba_plcmnt_rec.posting_id := rosetta_g_miss_num_map(p7_a12);
278 ddp_iba_plcmnt_rec.status_code := p7_a13;
279 ddp_iba_plcmnt_rec.track_events_flag := p7_a14;
280 ddp_iba_plcmnt_rec.created_by := rosetta_g_miss_num_map(p7_a15);
281 ddp_iba_plcmnt_rec.creation_date := rosetta_g_miss_date_in_map(p7_a16);
282 ddp_iba_plcmnt_rec.last_updated_by := rosetta_g_miss_num_map(p7_a17);
283 ddp_iba_plcmnt_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a18);
284 ddp_iba_plcmnt_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
285 ddp_iba_plcmnt_rec.object_version_number := rosetta_g_miss_num_map(p7_a20);
286 ddp_iba_plcmnt_rec.name := p7_a21;
287 ddp_iba_plcmnt_rec.description := p7_a22;
288
289
290 -- here's the delegated call to the old PL/SQL routine
291 ams_iba_plcmnt_pvt.create_iba_plcmnt(p_api_version_number,
292 p_init_msg_list,
293 p_commit,
294 p_validation_level,
295 x_return_status,
296 x_msg_count,
297 x_msg_data,
298 ddp_iba_plcmnt_rec,
299 x_placement_id);
300
301 -- copy data back from the local variables to OUT or IN-OUT args, if any
302
303
304
305
306
307
308
309
310 end;
311
312 procedure update_iba_plcmnt(p_api_version_number NUMBER
313 , p_init_msg_list VARCHAR2
314 , p_commit VARCHAR2
315 , p_validation_level NUMBER
316 , x_return_status out nocopy VARCHAR2
317 , x_msg_count out nocopy NUMBER
318 , x_msg_data out nocopy VARCHAR2
319 , x_object_version_number out nocopy NUMBER
320 , p7_a0 NUMBER := 0-1962.0724
321 , p7_a1 NUMBER := 0-1962.0724
322 , p7_a2 VARCHAR2 := fnd_api.g_miss_char
323 , p7_a3 NUMBER := 0-1962.0724
324 , p7_a4 VARCHAR2 := fnd_api.g_miss_char
325 , p7_a5 VARCHAR2 := fnd_api.g_miss_char
326 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
327 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
328 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
329 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
330 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
331 , p7_a11 NUMBER := 0-1962.0724
332 , p7_a12 NUMBER := 0-1962.0724
333 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
334 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
335 , p7_a15 NUMBER := 0-1962.0724
336 , p7_a16 DATE := fnd_api.g_miss_date
337 , p7_a17 NUMBER := 0-1962.0724
338 , p7_a18 DATE := fnd_api.g_miss_date
339 , p7_a19 NUMBER := 0-1962.0724
340 , p7_a20 NUMBER := 0-1962.0724
341 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
342 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
343 )
344
345 as
346 ddp_iba_plcmnt_rec ams_iba_plcmnt_pvt.iba_plcmnt_rec_type;
347 ddindx binary_integer; indx binary_integer;
348 begin
349
350 -- copy data to the local IN or IN-OUT args, if any
351
352
353
354
355
356
357
358 ddp_iba_plcmnt_rec.placement_id := rosetta_g_miss_num_map(p7_a0);
359 ddp_iba_plcmnt_rec.site_id := rosetta_g_miss_num_map(p7_a1);
360 ddp_iba_plcmnt_rec.site_ref_code := p7_a2;
361 ddp_iba_plcmnt_rec.page_id := rosetta_g_miss_num_map(p7_a3);
362 ddp_iba_plcmnt_rec.page_ref_code := p7_a4;
363 ddp_iba_plcmnt_rec.location_code := p7_a5;
364 ddp_iba_plcmnt_rec.param1 := p7_a6;
365 ddp_iba_plcmnt_rec.param2 := p7_a7;
366 ddp_iba_plcmnt_rec.param3 := p7_a8;
367 ddp_iba_plcmnt_rec.param4 := p7_a9;
368 ddp_iba_plcmnt_rec.param5 := p7_a10;
369 ddp_iba_plcmnt_rec.stylesheet_id := rosetta_g_miss_num_map(p7_a11);
370 ddp_iba_plcmnt_rec.posting_id := rosetta_g_miss_num_map(p7_a12);
371 ddp_iba_plcmnt_rec.status_code := p7_a13;
372 ddp_iba_plcmnt_rec.track_events_flag := p7_a14;
373 ddp_iba_plcmnt_rec.created_by := rosetta_g_miss_num_map(p7_a15);
374 ddp_iba_plcmnt_rec.creation_date := rosetta_g_miss_date_in_map(p7_a16);
375 ddp_iba_plcmnt_rec.last_updated_by := rosetta_g_miss_num_map(p7_a17);
376 ddp_iba_plcmnt_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a18);
377 ddp_iba_plcmnt_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
378 ddp_iba_plcmnt_rec.object_version_number := rosetta_g_miss_num_map(p7_a20);
379 ddp_iba_plcmnt_rec.name := p7_a21;
380 ddp_iba_plcmnt_rec.description := p7_a22;
381
382
383 -- here's the delegated call to the old PL/SQL routine
384 ams_iba_plcmnt_pvt.update_iba_plcmnt(p_api_version_number,
385 p_init_msg_list,
386 p_commit,
387 p_validation_level,
388 x_return_status,
389 x_msg_count,
390 x_msg_data,
391 ddp_iba_plcmnt_rec,
392 x_object_version_number);
393
394 -- copy data back from the local variables to OUT or IN-OUT args, if any
395
396
397
398
399
400
401
402
403 end;
404
405 procedure validate_iba_plcmnt(p_api_version_number NUMBER
406 , p_init_msg_list VARCHAR2
407 , p_validation_level NUMBER
408 , x_return_status out nocopy VARCHAR2
409 , x_msg_count out nocopy NUMBER
410 , x_msg_data out nocopy VARCHAR2
411 , p_validation_mode VARCHAR2
412 , p3_a0 NUMBER := 0-1962.0724
413 , p3_a1 NUMBER := 0-1962.0724
414 , p3_a2 VARCHAR2 := fnd_api.g_miss_char
415 , p3_a3 NUMBER := 0-1962.0724
416 , p3_a4 VARCHAR2 := fnd_api.g_miss_char
417 , p3_a5 VARCHAR2 := fnd_api.g_miss_char
418 , p3_a6 VARCHAR2 := fnd_api.g_miss_char
419 , p3_a7 VARCHAR2 := fnd_api.g_miss_char
420 , p3_a8 VARCHAR2 := fnd_api.g_miss_char
421 , p3_a9 VARCHAR2 := fnd_api.g_miss_char
422 , p3_a10 VARCHAR2 := fnd_api.g_miss_char
423 , p3_a11 NUMBER := 0-1962.0724
424 , p3_a12 NUMBER := 0-1962.0724
425 , p3_a13 VARCHAR2 := fnd_api.g_miss_char
426 , p3_a14 VARCHAR2 := fnd_api.g_miss_char
427 , p3_a15 NUMBER := 0-1962.0724
428 , p3_a16 DATE := fnd_api.g_miss_date
429 , p3_a17 NUMBER := 0-1962.0724
430 , p3_a18 DATE := fnd_api.g_miss_date
431 , p3_a19 NUMBER := 0-1962.0724
432 , p3_a20 NUMBER := 0-1962.0724
433 , p3_a21 VARCHAR2 := fnd_api.g_miss_char
434 , p3_a22 VARCHAR2 := fnd_api.g_miss_char
435 )
436
437 as
438 ddp_iba_plcmnt_rec ams_iba_plcmnt_pvt.iba_plcmnt_rec_type;
439 ddindx binary_integer; indx binary_integer;
440 begin
441
442 -- copy data to the local IN or IN-OUT args, if any
443
444
445
446 ddp_iba_plcmnt_rec.placement_id := rosetta_g_miss_num_map(p3_a0);
447 ddp_iba_plcmnt_rec.site_id := rosetta_g_miss_num_map(p3_a1);
448 ddp_iba_plcmnt_rec.site_ref_code := p3_a2;
449 ddp_iba_plcmnt_rec.page_id := rosetta_g_miss_num_map(p3_a3);
450 ddp_iba_plcmnt_rec.page_ref_code := p3_a4;
451 ddp_iba_plcmnt_rec.location_code := p3_a5;
452 ddp_iba_plcmnt_rec.param1 := p3_a6;
453 ddp_iba_plcmnt_rec.param2 := p3_a7;
454 ddp_iba_plcmnt_rec.param3 := p3_a8;
455 ddp_iba_plcmnt_rec.param4 := p3_a9;
456 ddp_iba_plcmnt_rec.param5 := p3_a10;
457 ddp_iba_plcmnt_rec.stylesheet_id := rosetta_g_miss_num_map(p3_a11);
458 ddp_iba_plcmnt_rec.posting_id := rosetta_g_miss_num_map(p3_a12);
459 ddp_iba_plcmnt_rec.status_code := p3_a13;
460 ddp_iba_plcmnt_rec.track_events_flag := p3_a14;
461 ddp_iba_plcmnt_rec.created_by := rosetta_g_miss_num_map(p3_a15);
462 ddp_iba_plcmnt_rec.creation_date := rosetta_g_miss_date_in_map(p3_a16);
463 ddp_iba_plcmnt_rec.last_updated_by := rosetta_g_miss_num_map(p3_a17);
464 ddp_iba_plcmnt_rec.last_update_date := rosetta_g_miss_date_in_map(p3_a18);
465 ddp_iba_plcmnt_rec.last_update_login := rosetta_g_miss_num_map(p3_a19);
466 ddp_iba_plcmnt_rec.object_version_number := rosetta_g_miss_num_map(p3_a20);
467 ddp_iba_plcmnt_rec.name := p3_a21;
468 ddp_iba_plcmnt_rec.description := p3_a22;
469
470
471
472
473
474 -- here's the delegated call to the old PL/SQL routine
475 ams_iba_plcmnt_pvt.validate_iba_plcmnt(p_api_version_number,
476 p_init_msg_list,
477 p_validation_level,
478 ddp_iba_plcmnt_rec,
479 x_return_status,
480 x_msg_count,
481 x_msg_data,
482 p_validation_mode);
483
484 -- copy data back from the local variables to OUT or IN-OUT args, if any
485
486
487
488
489
490
491
492 end;
493
494 procedure check_iba_plcmnt_items(p_validation_mode VARCHAR2
495 , x_return_status out nocopy VARCHAR2
496 , p0_a0 NUMBER := 0-1962.0724
497 , p0_a1 NUMBER := 0-1962.0724
498 , p0_a2 VARCHAR2 := fnd_api.g_miss_char
499 , p0_a3 NUMBER := 0-1962.0724
500 , p0_a4 VARCHAR2 := fnd_api.g_miss_char
501 , p0_a5 VARCHAR2 := fnd_api.g_miss_char
502 , p0_a6 VARCHAR2 := fnd_api.g_miss_char
503 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
504 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
505 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
506 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
507 , p0_a11 NUMBER := 0-1962.0724
508 , p0_a12 NUMBER := 0-1962.0724
509 , p0_a13 VARCHAR2 := fnd_api.g_miss_char
510 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
511 , p0_a15 NUMBER := 0-1962.0724
512 , p0_a16 DATE := fnd_api.g_miss_date
513 , p0_a17 NUMBER := 0-1962.0724
514 , p0_a18 DATE := fnd_api.g_miss_date
515 , p0_a19 NUMBER := 0-1962.0724
516 , p0_a20 NUMBER := 0-1962.0724
517 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
518 , p0_a22 VARCHAR2 := fnd_api.g_miss_char
519 )
520
521 as
522 ddp_iba_plcmnt_rec ams_iba_plcmnt_pvt.iba_plcmnt_rec_type;
523 ddindx binary_integer; indx binary_integer;
524 begin
525
526 -- copy data to the local IN or IN-OUT args, if any
527 ddp_iba_plcmnt_rec.placement_id := rosetta_g_miss_num_map(p0_a0);
528 ddp_iba_plcmnt_rec.site_id := rosetta_g_miss_num_map(p0_a1);
529 ddp_iba_plcmnt_rec.site_ref_code := p0_a2;
530 ddp_iba_plcmnt_rec.page_id := rosetta_g_miss_num_map(p0_a3);
531 ddp_iba_plcmnt_rec.page_ref_code := p0_a4;
532 ddp_iba_plcmnt_rec.location_code := p0_a5;
533 ddp_iba_plcmnt_rec.param1 := p0_a6;
534 ddp_iba_plcmnt_rec.param2 := p0_a7;
535 ddp_iba_plcmnt_rec.param3 := p0_a8;
536 ddp_iba_plcmnt_rec.param4 := p0_a9;
537 ddp_iba_plcmnt_rec.param5 := p0_a10;
538 ddp_iba_plcmnt_rec.stylesheet_id := rosetta_g_miss_num_map(p0_a11);
539 ddp_iba_plcmnt_rec.posting_id := rosetta_g_miss_num_map(p0_a12);
540 ddp_iba_plcmnt_rec.status_code := p0_a13;
541 ddp_iba_plcmnt_rec.track_events_flag := p0_a14;
542 ddp_iba_plcmnt_rec.created_by := rosetta_g_miss_num_map(p0_a15);
543 ddp_iba_plcmnt_rec.creation_date := rosetta_g_miss_date_in_map(p0_a16);
544 ddp_iba_plcmnt_rec.last_updated_by := rosetta_g_miss_num_map(p0_a17);
545 ddp_iba_plcmnt_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a18);
546 ddp_iba_plcmnt_rec.last_update_login := rosetta_g_miss_num_map(p0_a19);
547 ddp_iba_plcmnt_rec.object_version_number := rosetta_g_miss_num_map(p0_a20);
548 ddp_iba_plcmnt_rec.name := p0_a21;
549 ddp_iba_plcmnt_rec.description := p0_a22;
550
551
552
553 -- here's the delegated call to the old PL/SQL routine
554 ams_iba_plcmnt_pvt.check_iba_plcmnt_items(ddp_iba_plcmnt_rec,
555 p_validation_mode,
556 x_return_status);
557
558 -- copy data back from the local variables to OUT or IN-OUT args, if any
559
560
561 end;
562
563 procedure validate_iba_plcmnt_rec(p_api_version_number NUMBER
564 , p_init_msg_list VARCHAR2
565 , x_return_status out nocopy VARCHAR2
566 , x_msg_count out nocopy NUMBER
567 , x_msg_data out nocopy VARCHAR2
568 , p5_a0 NUMBER := 0-1962.0724
569 , p5_a1 NUMBER := 0-1962.0724
570 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
571 , p5_a3 NUMBER := 0-1962.0724
572 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
573 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
574 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
575 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
576 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
577 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
578 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
579 , p5_a11 NUMBER := 0-1962.0724
580 , p5_a12 NUMBER := 0-1962.0724
581 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
582 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
583 , p5_a15 NUMBER := 0-1962.0724
584 , p5_a16 DATE := fnd_api.g_miss_date
585 , p5_a17 NUMBER := 0-1962.0724
586 , p5_a18 DATE := fnd_api.g_miss_date
587 , p5_a19 NUMBER := 0-1962.0724
588 , p5_a20 NUMBER := 0-1962.0724
589 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
590 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
591 )
592
593 as
594 ddp_iba_plcmnt_rec ams_iba_plcmnt_pvt.iba_plcmnt_rec_type;
595 ddindx binary_integer; indx binary_integer;
596 begin
597
598 -- copy data to the local IN or IN-OUT args, if any
599
600
601
602
603
604 ddp_iba_plcmnt_rec.placement_id := rosetta_g_miss_num_map(p5_a0);
605 ddp_iba_plcmnt_rec.site_id := rosetta_g_miss_num_map(p5_a1);
606 ddp_iba_plcmnt_rec.site_ref_code := p5_a2;
607 ddp_iba_plcmnt_rec.page_id := rosetta_g_miss_num_map(p5_a3);
608 ddp_iba_plcmnt_rec.page_ref_code := p5_a4;
609 ddp_iba_plcmnt_rec.location_code := p5_a5;
610 ddp_iba_plcmnt_rec.param1 := p5_a6;
611 ddp_iba_plcmnt_rec.param2 := p5_a7;
612 ddp_iba_plcmnt_rec.param3 := p5_a8;
613 ddp_iba_plcmnt_rec.param4 := p5_a9;
614 ddp_iba_plcmnt_rec.param5 := p5_a10;
615 ddp_iba_plcmnt_rec.stylesheet_id := rosetta_g_miss_num_map(p5_a11);
616 ddp_iba_plcmnt_rec.posting_id := rosetta_g_miss_num_map(p5_a12);
617 ddp_iba_plcmnt_rec.status_code := p5_a13;
618 ddp_iba_plcmnt_rec.track_events_flag := p5_a14;
619 ddp_iba_plcmnt_rec.created_by := rosetta_g_miss_num_map(p5_a15);
620 ddp_iba_plcmnt_rec.creation_date := rosetta_g_miss_date_in_map(p5_a16);
621 ddp_iba_plcmnt_rec.last_updated_by := rosetta_g_miss_num_map(p5_a17);
622 ddp_iba_plcmnt_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a18);
623 ddp_iba_plcmnt_rec.last_update_login := rosetta_g_miss_num_map(p5_a19);
624 ddp_iba_plcmnt_rec.object_version_number := rosetta_g_miss_num_map(p5_a20);
625 ddp_iba_plcmnt_rec.name := p5_a21;
626 ddp_iba_plcmnt_rec.description := p5_a22;
627
628 -- here's the delegated call to the old PL/SQL routine
629 ams_iba_plcmnt_pvt.validate_iba_plcmnt_rec(p_api_version_number,
630 p_init_msg_list,
631 x_return_status,
632 x_msg_count,
633 x_msg_data,
634 ddp_iba_plcmnt_rec);
635
636 -- copy data back from the local variables to OUT or IN-OUT args, if any
637
638
639
640
641
642 end;
643
644 end ams_iba_plcmnt_pvt_w;