[Home] [Help]
PACKAGE BODY: APPS.AMS_CELL_PVT_W
Source
1 package body ams_cell_pvt_w as
2 /* $Header: amswcelb.pls 115.19 2002/11/22 08:56:52 jieli 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 function rosetta_g_miss_num_map(n number) return number as
7 a number := fnd_api.g_miss_num;
8 b number := 0-1962.0724;
9 begin
10 if n=a then return b; end if;
11 if n=b then return a; end if;
12 return n;
13 end;
14
15 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
16 function rosetta_g_miss_date_in_map(d date) return date as
17 begin
18 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
19 return d;
20 end;
21
22 procedure rosetta_table_copy_in_p2(t OUT NOCOPY ams_cell_pvt.t_number, a0 JTF_NUMBER_TABLE) as
23 ddindx binary_integer; indx binary_integer;
24 begin
25 if a0 is not null and a0.count > 0 then
26 if a0.count > 0 then
27 indx := a0.first;
28 ddindx := 1;
29 while true loop
30 t(ddindx) := a0(indx);
31 ddindx := ddindx+1;
32 if a0.last =indx
33 then exit;
34 end if;
35 indx := a0.next(indx);
36 end loop;
37 end if;
38 end if;
39 end rosetta_table_copy_in_p2;
40 procedure rosetta_table_copy_out_p2(t ams_cell_pvt.t_number, a0 OUT NOCOPY JTF_NUMBER_TABLE) as
41 ddindx binary_integer; indx binary_integer;
42 begin
43 if t is null or t.count = 0 then
44 a0 := JTF_NUMBER_TABLE();
45 else
46 a0 := JTF_NUMBER_TABLE();
47 if t.count > 0 then
48 a0.extend(t.count);
49 ddindx := t.first;
50 indx := 1;
51 while true loop
52 a0(indx) := t(ddindx);
53 indx := indx+1;
54 if t.last =ddindx
55 then exit;
56 end if;
57 ddindx := t.next(ddindx);
58 end loop;
59 end if;
60 end if;
61 end rosetta_table_copy_out_p2;
62
63 procedure create_cell(p_api_version NUMBER
64 , p_init_msg_list VARCHAR2
65 , p_commit VARCHAR2
66 , p_validation_level NUMBER
67 , x_return_status OUT NOCOPY VARCHAR2
68 , x_msg_count OUT NOCOPY NUMBER
69 , x_msg_data OUT NOCOPY VARCHAR2
70 , x_cell_id OUT NOCOPY NUMBER
71 , p7_a0 NUMBER := 0-1962.0724
72 , p7_a1 VARCHAR2 := fnd_api.g_miss_char
73 , p7_a2 DATE := fnd_api.g_miss_date
74 , p7_a3 NUMBER := 0-1962.0724
75 , p7_a4 DATE := fnd_api.g_miss_date
76 , p7_a5 NUMBER := 0-1962.0724
77 , p7_a6 NUMBER := 0-1962.0724
78 , p7_a7 NUMBER := 0-1962.0724
79 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
80 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
81 , p7_a10 NUMBER := 0-1962.0724
82 , p7_a11 NUMBER := 0-1962.0724
83 , p7_a12 NUMBER := 0-1962.0724
84 , p7_a13 NUMBER := 0-1962.0724
85 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
86 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
87 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
88 , p7_a17 DATE := fnd_api.g_miss_date
89 , p7_a18 NUMBER := 0-1962.0724
90 )
91 as
92 ddp_cell_rec ams_cell_pvt.cell_rec_type;
93 ddindx binary_integer; indx binary_integer;
94 begin
95
96 -- copy data to the local IN or IN-OUT args, if any
97
98
99
100
101
102
103
104 ddp_cell_rec.cell_id := rosetta_g_miss_num_map(p7_a0);
105 ddp_cell_rec.sel_type := p7_a1;
106 ddp_cell_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
107 ddp_cell_rec.last_updated_by := rosetta_g_miss_num_map(p7_a3);
108 ddp_cell_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
109 ddp_cell_rec.created_by := rosetta_g_miss_num_map(p7_a5);
110 ddp_cell_rec.last_update_login := rosetta_g_miss_num_map(p7_a6);
111 ddp_cell_rec.object_version_number := rosetta_g_miss_num_map(p7_a7);
112 ddp_cell_rec.cell_code := p7_a8;
113 ddp_cell_rec.enabled_flag := p7_a9;
114 ddp_cell_rec.original_size := rosetta_g_miss_num_map(p7_a10);
115 ddp_cell_rec.parent_cell_id := rosetta_g_miss_num_map(p7_a11);
116 ddp_cell_rec.org_id := rosetta_g_miss_num_map(p7_a12);
117 ddp_cell_rec.owner_id := rosetta_g_miss_num_map(p7_a13);
118 ddp_cell_rec.cell_name := p7_a14;
119 ddp_cell_rec.description := p7_a15;
120 ddp_cell_rec.status_code := p7_a16;
121 ddp_cell_rec.status_date := rosetta_g_miss_date_in_map(p7_a17);
122 ddp_cell_rec.user_status_id := rosetta_g_miss_num_map(p7_a18);
123
124
125 -- here's the delegated call to the old PL/SQL routine
126 ams_cell_pvt.create_cell(p_api_version,
127 p_init_msg_list,
128 p_commit,
129 p_validation_level,
130 x_return_status,
131 x_msg_count,
132 x_msg_data,
133 ddp_cell_rec,
134 x_cell_id);
135
136 -- copy data back from the local OUT or IN-OUT args, if any
137
138
139
140
141
142
143
144
145 end;
146
147 procedure update_cell(p_api_version NUMBER
148 , p_init_msg_list VARCHAR2
149 , p_commit VARCHAR2
150 , p_validation_level NUMBER
151 , x_return_status OUT NOCOPY VARCHAR2
152 , x_msg_count OUT NOCOPY NUMBER
153 , x_msg_data OUT NOCOPY VARCHAR2
154 , p7_a0 NUMBER := 0-1962.0724
155 , p7_a1 VARCHAR2 := fnd_api.g_miss_char
156 , p7_a2 DATE := fnd_api.g_miss_date
157 , p7_a3 NUMBER := 0-1962.0724
158 , p7_a4 DATE := fnd_api.g_miss_date
159 , p7_a5 NUMBER := 0-1962.0724
160 , p7_a6 NUMBER := 0-1962.0724
161 , p7_a7 NUMBER := 0-1962.0724
162 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
163 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
164 , p7_a10 NUMBER := 0-1962.0724
165 , p7_a11 NUMBER := 0-1962.0724
166 , p7_a12 NUMBER := 0-1962.0724
167 , p7_a13 NUMBER := 0-1962.0724
168 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
169 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
170 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
171 , p7_a17 DATE := fnd_api.g_miss_date
172 , p7_a18 NUMBER := 0-1962.0724
173 )
174 as
175 ddp_cell_rec ams_cell_pvt.cell_rec_type;
176 ddindx binary_integer; indx binary_integer;
177 begin
178
179 -- copy data to the local IN or IN-OUT args, if any
180
181
182
183
184
185
186
187 ddp_cell_rec.cell_id := rosetta_g_miss_num_map(p7_a0);
188 ddp_cell_rec.sel_type := p7_a1;
189 ddp_cell_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
190 ddp_cell_rec.last_updated_by := rosetta_g_miss_num_map(p7_a3);
191 ddp_cell_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
192 ddp_cell_rec.created_by := rosetta_g_miss_num_map(p7_a5);
193 ddp_cell_rec.last_update_login := rosetta_g_miss_num_map(p7_a6);
194 ddp_cell_rec.object_version_number := rosetta_g_miss_num_map(p7_a7);
195 ddp_cell_rec.cell_code := p7_a8;
196 ddp_cell_rec.enabled_flag := p7_a9;
197 ddp_cell_rec.original_size := rosetta_g_miss_num_map(p7_a10);
198 ddp_cell_rec.parent_cell_id := rosetta_g_miss_num_map(p7_a11);
199 ddp_cell_rec.org_id := rosetta_g_miss_num_map(p7_a12);
200 ddp_cell_rec.owner_id := rosetta_g_miss_num_map(p7_a13);
201 ddp_cell_rec.cell_name := p7_a14;
202 ddp_cell_rec.description := p7_a15;
203 ddp_cell_rec.status_code := p7_a16;
204 ddp_cell_rec.status_date := rosetta_g_miss_date_in_map(p7_a17);
205 ddp_cell_rec.user_status_id := rosetta_g_miss_num_map(p7_a18);
206
207 -- here's the delegated call to the old PL/SQL routine
208 ams_cell_pvt.update_cell(p_api_version,
209 p_init_msg_list,
210 p_commit,
211 p_validation_level,
212 x_return_status,
213 x_msg_count,
214 x_msg_data,
215 ddp_cell_rec);
216
217 -- copy data back from the local OUT or IN-OUT args, if any
218
219
220
221
222
223
224
225 end;
226
227 procedure validate_cell(p_api_version NUMBER
228 , p_init_msg_list VARCHAR2
229 , p_validation_level NUMBER
230 , x_return_status OUT NOCOPY VARCHAR2
231 , x_msg_count OUT NOCOPY NUMBER
232 , x_msg_data OUT NOCOPY VARCHAR2
233 , p6_a0 NUMBER := 0-1962.0724
234 , p6_a1 VARCHAR2 := fnd_api.g_miss_char
235 , p6_a2 DATE := fnd_api.g_miss_date
236 , p6_a3 NUMBER := 0-1962.0724
237 , p6_a4 DATE := fnd_api.g_miss_date
238 , p6_a5 NUMBER := 0-1962.0724
239 , p6_a6 NUMBER := 0-1962.0724
240 , p6_a7 NUMBER := 0-1962.0724
241 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
242 , p6_a9 VARCHAR2 := fnd_api.g_miss_char
243 , p6_a10 NUMBER := 0-1962.0724
244 , p6_a11 NUMBER := 0-1962.0724
245 , p6_a12 NUMBER := 0-1962.0724
246 , p6_a13 NUMBER := 0-1962.0724
247 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
248 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
249 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
250 , p6_a17 DATE := fnd_api.g_miss_date
251 , p6_a18 NUMBER := 0-1962.0724
252 )
253 as
254 ddp_cell_rec ams_cell_pvt.cell_rec_type;
255 ddindx binary_integer; indx binary_integer;
256 begin
257
258 -- copy data to the local IN or IN-OUT args, if any
259
260
261
262
263
264
265 ddp_cell_rec.cell_id := rosetta_g_miss_num_map(p6_a0);
266 ddp_cell_rec.sel_type := p6_a1;
267 ddp_cell_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a2);
268 ddp_cell_rec.last_updated_by := rosetta_g_miss_num_map(p6_a3);
269 ddp_cell_rec.creation_date := rosetta_g_miss_date_in_map(p6_a4);
270 ddp_cell_rec.created_by := rosetta_g_miss_num_map(p6_a5);
271 ddp_cell_rec.last_update_login := rosetta_g_miss_num_map(p6_a6);
272 ddp_cell_rec.object_version_number := rosetta_g_miss_num_map(p6_a7);
273 ddp_cell_rec.cell_code := p6_a8;
274 ddp_cell_rec.enabled_flag := p6_a9;
275 ddp_cell_rec.original_size := rosetta_g_miss_num_map(p6_a10);
276 ddp_cell_rec.parent_cell_id := rosetta_g_miss_num_map(p6_a11);
277 ddp_cell_rec.org_id := rosetta_g_miss_num_map(p6_a12);
278 ddp_cell_rec.owner_id := rosetta_g_miss_num_map(p6_a13);
279 ddp_cell_rec.cell_name := p6_a14;
280 ddp_cell_rec.description := p6_a15;
281 ddp_cell_rec.status_code := p6_a16;
282 ddp_cell_rec.status_date := rosetta_g_miss_date_in_map(p6_a17);
283 ddp_cell_rec.user_status_id := rosetta_g_miss_num_map(p6_a18);
284
285 -- here's the delegated call to the old PL/SQL routine
286 ams_cell_pvt.validate_cell(p_api_version,
287 p_init_msg_list,
288 p_validation_level,
289 x_return_status,
290 x_msg_count,
291 x_msg_data,
292 ddp_cell_rec);
293
294 -- copy data back from the local OUT or IN-OUT args, if any
295
296
297
298
299
300
301 end;
302
303 procedure check_cell_items(p_validation_mode VARCHAR2
304 , x_return_status OUT NOCOPY VARCHAR2
305 , p0_a0 NUMBER := 0-1962.0724
306 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
307 , p0_a2 DATE := fnd_api.g_miss_date
308 , p0_a3 NUMBER := 0-1962.0724
309 , p0_a4 DATE := fnd_api.g_miss_date
310 , p0_a5 NUMBER := 0-1962.0724
311 , p0_a6 NUMBER := 0-1962.0724
312 , p0_a7 NUMBER := 0-1962.0724
313 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
314 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
315 , p0_a10 NUMBER := 0-1962.0724
316 , p0_a11 NUMBER := 0-1962.0724
317 , p0_a12 NUMBER := 0-1962.0724
318 , p0_a13 NUMBER := 0-1962.0724
319 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
320 , p0_a15 VARCHAR2 := fnd_api.g_miss_char
321 , p0_a16 VARCHAR2 := fnd_api.g_miss_char
322 , p0_a17 DATE := fnd_api.g_miss_date
323 , p0_a18 NUMBER := 0-1962.0724
324 )
325 as
326 ddp_cell_rec ams_cell_pvt.cell_rec_type;
327 ddindx binary_integer; indx binary_integer;
328 begin
329
330 -- copy data to the local IN or IN-OUT args, if any
331 ddp_cell_rec.cell_id := rosetta_g_miss_num_map(p0_a0);
332 ddp_cell_rec.sel_type := p0_a1;
333 ddp_cell_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a2);
334 ddp_cell_rec.last_updated_by := rosetta_g_miss_num_map(p0_a3);
335 ddp_cell_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
336 ddp_cell_rec.created_by := rosetta_g_miss_num_map(p0_a5);
337 ddp_cell_rec.last_update_login := rosetta_g_miss_num_map(p0_a6);
338 ddp_cell_rec.object_version_number := rosetta_g_miss_num_map(p0_a7);
339 ddp_cell_rec.cell_code := p0_a8;
340 ddp_cell_rec.enabled_flag := p0_a9;
341 ddp_cell_rec.original_size := rosetta_g_miss_num_map(p0_a10);
342 ddp_cell_rec.parent_cell_id := rosetta_g_miss_num_map(p0_a11);
343 ddp_cell_rec.org_id := rosetta_g_miss_num_map(p0_a12);
344 ddp_cell_rec.owner_id := rosetta_g_miss_num_map(p0_a13);
345 ddp_cell_rec.cell_name := p0_a14;
346 ddp_cell_rec.description := p0_a15;
347 ddp_cell_rec.status_code := p0_a16;
348 ddp_cell_rec.status_date := rosetta_g_miss_date_in_map(p0_a17);
349 ddp_cell_rec.user_status_id := rosetta_g_miss_num_map(p0_a18);
350
351
352
353 -- here's the delegated call to the old PL/SQL routine
354 ams_cell_pvt.check_cell_items(ddp_cell_rec,
355 p_validation_mode,
356 x_return_status);
357
358 -- copy data back from the local OUT or IN-OUT args, if any
359
360
361 end;
362
363 procedure init_cell_rec(p0_a0 OUT NOCOPY NUMBER
364 , p0_a1 OUT NOCOPY VARCHAR2
365 , p0_a2 OUT NOCOPY DATE
366 , p0_a3 OUT NOCOPY NUMBER
367 , p0_a4 OUT NOCOPY DATE
368 , p0_a5 OUT NOCOPY NUMBER
369 , p0_a6 OUT NOCOPY NUMBER
370 , p0_a7 OUT NOCOPY NUMBER
371 , p0_a8 OUT NOCOPY VARCHAR2
372 , p0_a9 OUT NOCOPY VARCHAR2
373 , p0_a10 OUT NOCOPY NUMBER
374 , p0_a11 OUT NOCOPY NUMBER
375 , p0_a12 OUT NOCOPY NUMBER
376 , p0_a13 OUT NOCOPY NUMBER
377 , p0_a14 OUT NOCOPY VARCHAR2
378 , p0_a15 OUT NOCOPY VARCHAR2
379 , p0_a16 OUT NOCOPY VARCHAR2
380 , p0_a17 OUT NOCOPY DATE
381 , p0_a18 OUT NOCOPY NUMBER
382 )
383 as
384 ddx_cell_rec ams_cell_pvt.cell_rec_type;
385 ddindx binary_integer; indx binary_integer;
386 begin
387
388 -- copy data to the local IN or IN-OUT args, if any
389
390 -- here's the delegated call to the old PL/SQL routine
391 ams_cell_pvt.init_cell_rec(ddx_cell_rec);
392
393 -- copy data back from the local OUT or IN-OUT args, if any
394 p0_a0 := rosetta_g_miss_num_map(ddx_cell_rec.cell_id);
395 p0_a1 := ddx_cell_rec.sel_type;
396 p0_a2 := ddx_cell_rec.last_update_date;
397 p0_a3 := rosetta_g_miss_num_map(ddx_cell_rec.last_updated_by);
398 p0_a4 := ddx_cell_rec.creation_date;
399 p0_a5 := rosetta_g_miss_num_map(ddx_cell_rec.created_by);
400 p0_a6 := rosetta_g_miss_num_map(ddx_cell_rec.last_update_login);
401 p0_a7 := rosetta_g_miss_num_map(ddx_cell_rec.object_version_number);
402 p0_a8 := ddx_cell_rec.cell_code;
403 p0_a9 := ddx_cell_rec.enabled_flag;
404 p0_a10 := rosetta_g_miss_num_map(ddx_cell_rec.original_size);
405 p0_a11 := rosetta_g_miss_num_map(ddx_cell_rec.parent_cell_id);
409 p0_a15 := ddx_cell_rec.description;
406 p0_a12 := rosetta_g_miss_num_map(ddx_cell_rec.org_id);
407 p0_a13 := rosetta_g_miss_num_map(ddx_cell_rec.owner_id);
408 p0_a14 := ddx_cell_rec.cell_name;
410 p0_a16 := ddx_cell_rec.status_code;
411 p0_a17 := ddx_cell_rec.status_date;
412 p0_a18 := rosetta_g_miss_num_map(ddx_cell_rec.user_status_id);
413 end;
414
415 procedure complete_cell_rec(p1_a0 OUT NOCOPY NUMBER
416 , p1_a1 OUT NOCOPY VARCHAR2
417 , p1_a2 OUT NOCOPY DATE
418 , p1_a3 OUT NOCOPY NUMBER
419 , p1_a4 OUT NOCOPY DATE
420 , p1_a5 OUT NOCOPY NUMBER
421 , p1_a6 OUT NOCOPY NUMBER
422 , p1_a7 OUT NOCOPY NUMBER
423 , p1_a8 OUT NOCOPY VARCHAR2
424 , p1_a9 OUT NOCOPY VARCHAR2
425 , p1_a10 OUT NOCOPY NUMBER
426 , p1_a11 OUT NOCOPY NUMBER
427 , p1_a12 OUT NOCOPY NUMBER
428 , p1_a13 OUT NOCOPY NUMBER
429 , p1_a14 OUT NOCOPY VARCHAR2
430 , p1_a15 OUT NOCOPY VARCHAR2
431 , p1_a16 OUT NOCOPY VARCHAR2
432 , p1_a17 OUT NOCOPY DATE
433 , p1_a18 OUT NOCOPY NUMBER
434 , p0_a0 NUMBER := 0-1962.0724
435 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
436 , p0_a2 DATE := fnd_api.g_miss_date
437 , p0_a3 NUMBER := 0-1962.0724
438 , p0_a4 DATE := fnd_api.g_miss_date
439 , p0_a5 NUMBER := 0-1962.0724
440 , p0_a6 NUMBER := 0-1962.0724
441 , p0_a7 NUMBER := 0-1962.0724
442 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
443 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
444 , p0_a10 NUMBER := 0-1962.0724
445 , p0_a11 NUMBER := 0-1962.0724
446 , p0_a12 NUMBER := 0-1962.0724
447 , p0_a13 NUMBER := 0-1962.0724
448 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
449 , p0_a15 VARCHAR2 := fnd_api.g_miss_char
450 , p0_a16 VARCHAR2 := fnd_api.g_miss_char
451 , p0_a17 DATE := fnd_api.g_miss_date
452 , p0_a18 NUMBER := 0-1962.0724
453 )
454 as
455 ddp_cell_rec ams_cell_pvt.cell_rec_type;
456 ddx_complete_rec ams_cell_pvt.cell_rec_type;
457 ddindx binary_integer; indx binary_integer;
458 begin
459
460 -- copy data to the local IN or IN-OUT args, if any
461 ddp_cell_rec.cell_id := rosetta_g_miss_num_map(p0_a0);
462 ddp_cell_rec.sel_type := p0_a1;
463 ddp_cell_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a2);
464 ddp_cell_rec.last_updated_by := rosetta_g_miss_num_map(p0_a3);
465 ddp_cell_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
466 ddp_cell_rec.created_by := rosetta_g_miss_num_map(p0_a5);
467 ddp_cell_rec.last_update_login := rosetta_g_miss_num_map(p0_a6);
468 ddp_cell_rec.object_version_number := rosetta_g_miss_num_map(p0_a7);
469 ddp_cell_rec.cell_code := p0_a8;
470 ddp_cell_rec.enabled_flag := p0_a9;
471 ddp_cell_rec.original_size := rosetta_g_miss_num_map(p0_a10);
472 ddp_cell_rec.parent_cell_id := rosetta_g_miss_num_map(p0_a11);
473 ddp_cell_rec.org_id := rosetta_g_miss_num_map(p0_a12);
474 ddp_cell_rec.owner_id := rosetta_g_miss_num_map(p0_a13);
475 ddp_cell_rec.cell_name := p0_a14;
476 ddp_cell_rec.description := p0_a15;
477 ddp_cell_rec.status_code := p0_a16;
478 ddp_cell_rec.status_date := rosetta_g_miss_date_in_map(p0_a17);
479 ddp_cell_rec.user_status_id := rosetta_g_miss_num_map(p0_a18);
480
481
482 -- here's the delegated call to the old PL/SQL routine
483 ams_cell_pvt.complete_cell_rec(ddp_cell_rec,
484 ddx_complete_rec);
485
486 -- copy data back from the local OUT or IN-OUT args, if any
487
488 p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.cell_id);
489 p1_a1 := ddx_complete_rec.sel_type;
490 p1_a2 := ddx_complete_rec.last_update_date;
491 p1_a3 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
492 p1_a4 := ddx_complete_rec.creation_date;
493 p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
494 p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
495 p1_a7 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
496 p1_a8 := ddx_complete_rec.cell_code;
497 p1_a9 := ddx_complete_rec.enabled_flag;
498 p1_a10 := rosetta_g_miss_num_map(ddx_complete_rec.original_size);
499 p1_a11 := rosetta_g_miss_num_map(ddx_complete_rec.parent_cell_id);
500 p1_a12 := rosetta_g_miss_num_map(ddx_complete_rec.org_id);
501 p1_a13 := rosetta_g_miss_num_map(ddx_complete_rec.owner_id);
502 p1_a14 := ddx_complete_rec.cell_name;
503 p1_a15 := ddx_complete_rec.description;
504 p1_a16 := ddx_complete_rec.status_code;
505 p1_a17 := ddx_complete_rec.status_date;
506 p1_a18 := rosetta_g_miss_num_map(ddx_complete_rec.user_status_id);
507 end;
508
509 procedure create_sql_cell(p_api_version NUMBER
510 , p_init_msg_list VARCHAR2
511 , p_commit VARCHAR2
512 , p_validation_level NUMBER
513 , x_return_status OUT NOCOPY VARCHAR2
514 , x_msg_count OUT NOCOPY NUMBER
515 , x_msg_data OUT NOCOPY VARCHAR2
516 , x_cell_id OUT NOCOPY NUMBER
517 , p7_a0 NUMBER := 0-1962.0724
518 , p7_a1 VARCHAR2 := fnd_api.g_miss_char
519 , p7_a2 DATE := fnd_api.g_miss_date
520 , p7_a3 NUMBER := 0-1962.0724
521 , p7_a4 DATE := fnd_api.g_miss_date
522 , p7_a5 NUMBER := 0-1962.0724
523 , p7_a6 NUMBER := 0-1962.0724
527 , p7_a10 NUMBER := 0-1962.0724
524 , p7_a7 NUMBER := 0-1962.0724
525 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
526 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
528 , p7_a11 NUMBER := 0-1962.0724
529 , p7_a12 NUMBER := 0-1962.0724
530 , p7_a13 NUMBER := 0-1962.0724
531 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
532 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
533 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
534 , p7_a17 DATE := fnd_api.g_miss_date
535 , p7_a18 NUMBER := 0-1962.0724
536 , p7_a19 NUMBER := 0-1962.0724
537 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
538 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
539 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
540 , p7_a23 NUMBER := 0-1962.0724
541 , p7_a24 NUMBER := 0-1962.0724
542 , p7_a25 NUMBER := 0-1962.0724
543 , p7_a26 VARCHAR2 := fnd_api.g_miss_char
544 , p7_a27 VARCHAR2 := fnd_api.g_miss_char
545 , p7_a28 NUMBER := 0-1962.0724
546 )
547 as
548 ddp_sql_cell_rec ams_cell_pvt.sqlcell_rec_type;
549 ddindx binary_integer; indx binary_integer;
550 begin
551
552 -- copy data to the local IN or IN-OUT args, if any
553
554
555
556
557
558
559
560 ddp_sql_cell_rec.cell_id := rosetta_g_miss_num_map(p7_a0);
561 ddp_sql_cell_rec.sel_type := p7_a1;
562 ddp_sql_cell_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
563 ddp_sql_cell_rec.last_updated_by := rosetta_g_miss_num_map(p7_a3);
564 ddp_sql_cell_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
565 ddp_sql_cell_rec.created_by := rosetta_g_miss_num_map(p7_a5);
566 ddp_sql_cell_rec.last_update_login := rosetta_g_miss_num_map(p7_a6);
567 ddp_sql_cell_rec.object_version_number := rosetta_g_miss_num_map(p7_a7);
568 ddp_sql_cell_rec.cell_code := p7_a8;
569 ddp_sql_cell_rec.enabled_flag := p7_a9;
570 ddp_sql_cell_rec.original_size := rosetta_g_miss_num_map(p7_a10);
571 ddp_sql_cell_rec.parent_cell_id := rosetta_g_miss_num_map(p7_a11);
572 ddp_sql_cell_rec.org_id := rosetta_g_miss_num_map(p7_a12);
573 ddp_sql_cell_rec.owner_id := rosetta_g_miss_num_map(p7_a13);
574 ddp_sql_cell_rec.cell_name := p7_a14;
575 ddp_sql_cell_rec.description := p7_a15;
576 ddp_sql_cell_rec.status_code := p7_a16;
577 ddp_sql_cell_rec.status_date := rosetta_g_miss_date_in_map(p7_a17);
578 ddp_sql_cell_rec.user_status_id := rosetta_g_miss_num_map(p7_a18);
579 ddp_sql_cell_rec.discoverer_sql_id := rosetta_g_miss_num_map(p7_a19);
580 ddp_sql_cell_rec.workbook_owner := p7_a20;
581 ddp_sql_cell_rec.workbook_name := p7_a21;
582 ddp_sql_cell_rec.worksheet_name := p7_a22;
583 ddp_sql_cell_rec.activity_discoverer_id := rosetta_g_miss_num_map(p7_a23);
584 ddp_sql_cell_rec.act_disc_version_number := rosetta_g_miss_num_map(p7_a24);
585 ddp_sql_cell_rec.list_query_id := rosetta_g_miss_num_map(p7_a25);
586 ddp_sql_cell_rec.list_sql_string := p7_a26;
587 ddp_sql_cell_rec.source_object_name := p7_a27;
588 ddp_sql_cell_rec.list_query_version_number := rosetta_g_miss_num_map(p7_a28);
589
590
591 -- here's the delegated call to the old PL/SQL routine
592 ams_cell_pvt.create_sql_cell(p_api_version,
593 p_init_msg_list,
594 p_commit,
595 p_validation_level,
596 x_return_status,
597 x_msg_count,
598 x_msg_data,
599 ddp_sql_cell_rec,
600 x_cell_id);
601
602 -- copy data back from the local OUT or IN-OUT args, if any
603
604
605
606
607
608
609
610
611 end;
612
613 procedure update_sql_cell(p_api_version NUMBER
614 , p_init_msg_list VARCHAR2
615 , p_commit VARCHAR2
616 , p_validation_level NUMBER
617 , x_return_status OUT NOCOPY VARCHAR2
618 , x_msg_count OUT NOCOPY NUMBER
619 , x_msg_data OUT NOCOPY VARCHAR2
620 , p7_a0 NUMBER := 0-1962.0724
621 , p7_a1 VARCHAR2 := fnd_api.g_miss_char
622 , p7_a2 DATE := fnd_api.g_miss_date
623 , p7_a3 NUMBER := 0-1962.0724
624 , p7_a4 DATE := fnd_api.g_miss_date
625 , p7_a5 NUMBER := 0-1962.0724
626 , p7_a6 NUMBER := 0-1962.0724
630 , p7_a10 NUMBER := 0-1962.0724
627 , p7_a7 NUMBER := 0-1962.0724
628 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
629 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
631 , p7_a11 NUMBER := 0-1962.0724
632 , p7_a12 NUMBER := 0-1962.0724
633 , p7_a13 NUMBER := 0-1962.0724
634 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
635 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
636 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
637 , p7_a17 DATE := fnd_api.g_miss_date
638 , p7_a18 NUMBER := 0-1962.0724
639 , p7_a19 NUMBER := 0-1962.0724
640 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
641 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
642 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
643 , p7_a23 NUMBER := 0-1962.0724
644 , p7_a24 NUMBER := 0-1962.0724
645 , p7_a25 NUMBER := 0-1962.0724
646 , p7_a26 VARCHAR2 := fnd_api.g_miss_char
647 , p7_a27 VARCHAR2 := fnd_api.g_miss_char
648 , p7_a28 NUMBER := 0-1962.0724
649 )
650 as
651 ddp_sql_cell_rec ams_cell_pvt.sqlcell_rec_type;
652 ddindx binary_integer; indx binary_integer;
653 begin
654
655 -- copy data to the local IN or IN-OUT args, if any
656
657
658
659
660
661
662
663 ddp_sql_cell_rec.cell_id := rosetta_g_miss_num_map(p7_a0);
664 ddp_sql_cell_rec.sel_type := p7_a1;
665 ddp_sql_cell_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
666 ddp_sql_cell_rec.last_updated_by := rosetta_g_miss_num_map(p7_a3);
667 ddp_sql_cell_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
668 ddp_sql_cell_rec.created_by := rosetta_g_miss_num_map(p7_a5);
669 ddp_sql_cell_rec.last_update_login := rosetta_g_miss_num_map(p7_a6);
670 ddp_sql_cell_rec.object_version_number := rosetta_g_miss_num_map(p7_a7);
671 ddp_sql_cell_rec.cell_code := p7_a8;
672 ddp_sql_cell_rec.enabled_flag := p7_a9;
673 ddp_sql_cell_rec.original_size := rosetta_g_miss_num_map(p7_a10);
674 ddp_sql_cell_rec.parent_cell_id := rosetta_g_miss_num_map(p7_a11);
675 ddp_sql_cell_rec.org_id := rosetta_g_miss_num_map(p7_a12);
676 ddp_sql_cell_rec.owner_id := rosetta_g_miss_num_map(p7_a13);
677 ddp_sql_cell_rec.cell_name := p7_a14;
678 ddp_sql_cell_rec.description := p7_a15;
679 ddp_sql_cell_rec.status_code := p7_a16;
680 ddp_sql_cell_rec.status_date := rosetta_g_miss_date_in_map(p7_a17);
681 ddp_sql_cell_rec.user_status_id := rosetta_g_miss_num_map(p7_a18);
682 ddp_sql_cell_rec.discoverer_sql_id := rosetta_g_miss_num_map(p7_a19);
683 ddp_sql_cell_rec.workbook_owner := p7_a20;
684 ddp_sql_cell_rec.workbook_name := p7_a21;
685 ddp_sql_cell_rec.worksheet_name := p7_a22;
686 ddp_sql_cell_rec.activity_discoverer_id := rosetta_g_miss_num_map(p7_a23);
687 ddp_sql_cell_rec.act_disc_version_number := rosetta_g_miss_num_map(p7_a24);
688 ddp_sql_cell_rec.list_query_id := rosetta_g_miss_num_map(p7_a25);
689 ddp_sql_cell_rec.list_sql_string := p7_a26;
690 ddp_sql_cell_rec.source_object_name := p7_a27;
691 ddp_sql_cell_rec.list_query_version_number := rosetta_g_miss_num_map(p7_a28);
692
693 -- here's the delegated call to the old PL/SQL routine
694 ams_cell_pvt.update_sql_cell(p_api_version,
695 p_init_msg_list,
696 p_commit,
697 p_validation_level,
698 x_return_status,
699 x_msg_count,
700 x_msg_data,
704
701 ddp_sql_cell_rec);
702
703 -- copy data back from the local OUT or IN-OUT args, if any
705
706
707
708
709
710
711 end;
712
713 end ams_cell_pvt_w;