DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_LIST_QUERY_PVT_W

Source


1 package body ams_list_query_pvt_w as
2   /* $Header: amswliqb.pls 115.9 2002/11/22 08:57:20 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_list_query_pvt.sql_string_tbl, a0 JTF_VARCHAR2_TABLE_4000) 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_list_query_pvt.sql_string_tbl, a0 OUT NOCOPY JTF_VARCHAR2_TABLE_4000) as
41     ddindx binary_integer; indx binary_integer;
42   begin
43   if t is null or t.count = 0 then
44     a0 := JTF_VARCHAR2_TABLE_4000();
45   else
46       a0 := JTF_VARCHAR2_TABLE_4000();
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 rosetta_table_copy_in_p6(t OUT NOCOPY ams_list_query_pvt.list_query_id_tbl_type, a0 JTF_NUMBER_TABLE) as
64     ddindx binary_integer; indx binary_integer;
65   begin
66   if a0 is not null and a0.count > 0 then
67       if a0.count > 0 then
68         indx := a0.first;
69         ddindx := 1;
70         while true loop
71           t(ddindx) := a0(indx);
72           ddindx := ddindx+1;
73           if a0.last =indx
74             then exit;
75           end if;
76           indx := a0.next(indx);
77         end loop;
78       end if;
79    end if;
80   end rosetta_table_copy_in_p6;
81   procedure rosetta_table_copy_out_p6(t ams_list_query_pvt.list_query_id_tbl_type, a0 OUT NOCOPY JTF_NUMBER_TABLE) as
82     ddindx binary_integer; indx binary_integer;
83   begin
84   if t is null or t.count = 0 then
85     a0 := JTF_NUMBER_TABLE();
86   else
87       a0 := JTF_NUMBER_TABLE();
88       if t.count > 0 then
89         a0.extend(t.count);
90         ddindx := t.first;
91         indx := 1;
92         while true loop
93           a0(indx) := t(ddindx);
94           indx := indx+1;
95           if t.last =ddindx
96             then exit;
97           end if;
98           ddindx := t.next(ddindx);
99         end loop;
100       end if;
101    end if;
102   end rosetta_table_copy_out_p6;
103 
104   procedure create_list_query(p_api_version_number  NUMBER
105     , p_init_msg_list  VARCHAR2
106     , p_commit  VARCHAR2
107     , p_validation_level  NUMBER
108     , x_return_status OUT NOCOPY  VARCHAR2
109     , x_msg_count OUT NOCOPY  NUMBER
110     , x_msg_data OUT NOCOPY  VARCHAR2
111     , x_list_query_id OUT NOCOPY  NUMBER
112     , p7_a0  NUMBER := 0-1962.0724
113     , p7_a1  DATE := fnd_api.g_miss_date
114     , p7_a2  NUMBER := 0-1962.0724
115     , p7_a3  DATE := fnd_api.g_miss_date
116     , p7_a4  NUMBER := 0-1962.0724
117     , p7_a5  NUMBER := 0-1962.0724
118     , p7_a6  NUMBER := 0-1962.0724
119     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
120     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
121     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
122     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
123     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
124     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
125     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
126     , p7_a14  NUMBER := 0-1962.0724
127     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
128     , p7_a16  NUMBER := 0-1962.0724
129     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
130     , p7_a18  VARCHAR2 := fnd_api.g_miss_char
131     , p7_a19  NUMBER := 0-1962.0724
132     , p7_a20  NUMBER := 0-1962.0724
133   )
134   as
135     ddp_list_query_rec ams_list_query_pvt.list_query_rec_type;
136     ddindx binary_integer; indx binary_integer;
137   begin
138 
139     -- copy data to the local IN or IN-OUT args, if any
140 
141 
142 
143 
144 
145 
146 
147     ddp_list_query_rec.list_query_id := rosetta_g_miss_num_map(p7_a0);
148     ddp_list_query_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
149     ddp_list_query_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
150     ddp_list_query_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
151     ddp_list_query_rec.created_by := rosetta_g_miss_num_map(p7_a4);
152     ddp_list_query_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
153     ddp_list_query_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
154     ddp_list_query_rec.name := p7_a7;
155     ddp_list_query_rec.type := p7_a8;
156     ddp_list_query_rec.enabled_flag := p7_a9;
157     ddp_list_query_rec.primary_key := p7_a10;
158     ddp_list_query_rec.source_object_name := p7_a11;
159     ddp_list_query_rec.seed_flag := p7_a12;
160     ddp_list_query_rec.public_flag := p7_a13;
161     ddp_list_query_rec.org_id := rosetta_g_miss_num_map(p7_a14);
162     ddp_list_query_rec.comments := p7_a15;
163     ddp_list_query_rec.act_list_query_used_by_id := rosetta_g_miss_num_map(p7_a16);
164     ddp_list_query_rec.arc_act_list_query_used_by := p7_a17;
165     ddp_list_query_rec.sql_string := p7_a18;
166     ddp_list_query_rec.parent_list_query_id := rosetta_g_miss_num_map(p7_a19);
167     ddp_list_query_rec.sequence_order := rosetta_g_miss_num_map(p7_a20);
168 
169 
170     -- here's the delegated call to the old PL/SQL routine
171     ams_list_query_pvt.create_list_query(p_api_version_number,
172       p_init_msg_list,
173       p_commit,
174       p_validation_level,
175       x_return_status,
176       x_msg_count,
177       x_msg_data,
178       ddp_list_query_rec,
179       x_list_query_id);
180 
181     -- copy data back from the local OUT or IN-OUT args, if any
182 
183 
184 
185 
186 
187 
188 
189 
190   end;
191 
192   procedure create_list_query(p_api_version_number  NUMBER
193     , p_init_msg_list  VARCHAR2
194     , p_commit  VARCHAR2
195     , p_validation_level  NUMBER
196     , x_return_status OUT NOCOPY  VARCHAR2
197     , x_msg_count OUT NOCOPY  NUMBER
198     , x_msg_data OUT NOCOPY  VARCHAR2
199     , p_sql_string_tbl JTF_VARCHAR2_TABLE_4000
200     , x_parent_list_query_id OUT NOCOPY  NUMBER
201     , p7_a0  NUMBER := 0-1962.0724
202     , p7_a1  DATE := fnd_api.g_miss_date
203     , p7_a2  NUMBER := 0-1962.0724
204     , p7_a3  DATE := fnd_api.g_miss_date
205     , p7_a4  NUMBER := 0-1962.0724
206     , p7_a5  NUMBER := 0-1962.0724
207     , p7_a6  NUMBER := 0-1962.0724
208     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
209     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
210     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
211     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
212     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
213     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
214     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
215     , p7_a14  NUMBER := 0-1962.0724
216     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
217     , p7_a16  NUMBER := 0-1962.0724
218     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
219     , p7_a18  NUMBER := 0-1962.0724
220     , p7_a19  NUMBER := 0-1962.0724
221   )
222   as
223     ddp_list_query_rec_tbl ams_list_query_pvt.list_query_rec_type_tbl;
224     ddp_sql_string_tbl ams_list_query_pvt.sql_string_tbl;
225     ddindx binary_integer; indx binary_integer;
226   begin
227 
228     -- copy data to the local IN or IN-OUT args, if any
229 
230 
231 
232 
233 
234 
235 
236     ddp_list_query_rec_tbl.list_query_id := rosetta_g_miss_num_map(p7_a0);
237     ddp_list_query_rec_tbl.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
238     ddp_list_query_rec_tbl.last_updated_by := rosetta_g_miss_num_map(p7_a2);
239     ddp_list_query_rec_tbl.creation_date := rosetta_g_miss_date_in_map(p7_a3);
240     ddp_list_query_rec_tbl.created_by := rosetta_g_miss_num_map(p7_a4);
241     ddp_list_query_rec_tbl.last_update_login := rosetta_g_miss_num_map(p7_a5);
242     ddp_list_query_rec_tbl.object_version_number := rosetta_g_miss_num_map(p7_a6);
243     ddp_list_query_rec_tbl.name := p7_a7;
244     ddp_list_query_rec_tbl.type := p7_a8;
245     ddp_list_query_rec_tbl.enabled_flag := p7_a9;
246     ddp_list_query_rec_tbl.primary_key := p7_a10;
247     ddp_list_query_rec_tbl.source_object_name := p7_a11;
248     ddp_list_query_rec_tbl.seed_flag := p7_a12;
249     ddp_list_query_rec_tbl.public_flag := p7_a13;
250     ddp_list_query_rec_tbl.org_id := rosetta_g_miss_num_map(p7_a14);
251     ddp_list_query_rec_tbl.comments := p7_a15;
252     ddp_list_query_rec_tbl.act_list_query_used_by_id := rosetta_g_miss_num_map(p7_a16);
253     ddp_list_query_rec_tbl.arc_act_list_query_used_by := p7_a17;
254     ddp_list_query_rec_tbl.parent_list_query_id := rosetta_g_miss_num_map(p7_a18);
255     ddp_list_query_rec_tbl.sequence_order := rosetta_g_miss_num_map(p7_a19);
256 
257     ams_list_query_pvt_w.rosetta_table_copy_in_p2(ddp_sql_string_tbl, p_sql_string_tbl);
258 
259 
260     -- here's the delegated call to the old PL/SQL routine
261     ams_list_query_pvt.create_list_query(p_api_version_number,
262       p_init_msg_list,
263       p_commit,
264       p_validation_level,
265       x_return_status,
266       x_msg_count,
267       x_msg_data,
268       ddp_list_query_rec_tbl,
269       ddp_sql_string_tbl,
270       x_parent_list_query_id);
271 
272     -- copy data back from the local OUT or IN-OUT args, if any
273 
274 
275 
276 
277 
278 
279 
280 
281 
282   end;
283 
284   procedure update_list_query(p_api_version_number  NUMBER
285     , p_init_msg_list  VARCHAR2
286     , p_commit  VARCHAR2
287     , p_validation_level  NUMBER
288     , x_return_status OUT NOCOPY  VARCHAR2
289     , x_msg_count OUT NOCOPY  NUMBER
290     , x_msg_data OUT NOCOPY  VARCHAR2
291     , x_object_version_number OUT NOCOPY  NUMBER
292     , p7_a0  NUMBER := 0-1962.0724
293     , p7_a1  DATE := fnd_api.g_miss_date
294     , p7_a2  NUMBER := 0-1962.0724
295     , p7_a3  DATE := fnd_api.g_miss_date
296     , p7_a4  NUMBER := 0-1962.0724
297     , p7_a5  NUMBER := 0-1962.0724
298     , p7_a6  NUMBER := 0-1962.0724
299     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
300     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
301     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
302     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
303     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
304     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
305     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
306     , p7_a14  NUMBER := 0-1962.0724
307     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
308     , p7_a16  NUMBER := 0-1962.0724
309     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
310     , p7_a18  VARCHAR2 := fnd_api.g_miss_char
311     , p7_a19  NUMBER := 0-1962.0724
312     , p7_a20  NUMBER := 0-1962.0724
313   )
314   as
315     ddp_list_query_rec ams_list_query_pvt.list_query_rec_type;
316     ddindx binary_integer; indx binary_integer;
317   begin
318 
319     -- copy data to the local IN or IN-OUT args, if any
320 
321 
322 
323 
324 
325 
326 
327     ddp_list_query_rec.list_query_id := rosetta_g_miss_num_map(p7_a0);
328     ddp_list_query_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
329     ddp_list_query_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
330     ddp_list_query_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
331     ddp_list_query_rec.created_by := rosetta_g_miss_num_map(p7_a4);
332     ddp_list_query_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
333     ddp_list_query_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
334     ddp_list_query_rec.name := p7_a7;
335     ddp_list_query_rec.type := p7_a8;
336     ddp_list_query_rec.enabled_flag := p7_a9;
337     ddp_list_query_rec.primary_key := p7_a10;
338     ddp_list_query_rec.source_object_name := p7_a11;
339     ddp_list_query_rec.seed_flag := p7_a12;
340     ddp_list_query_rec.public_flag := p7_a13;
341     ddp_list_query_rec.org_id := rosetta_g_miss_num_map(p7_a14);
342     ddp_list_query_rec.comments := p7_a15;
343     ddp_list_query_rec.act_list_query_used_by_id := rosetta_g_miss_num_map(p7_a16);
344     ddp_list_query_rec.arc_act_list_query_used_by := p7_a17;
345     ddp_list_query_rec.sql_string := p7_a18;
346     ddp_list_query_rec.parent_list_query_id := rosetta_g_miss_num_map(p7_a19);
347     ddp_list_query_rec.sequence_order := rosetta_g_miss_num_map(p7_a20);
348 
349 
350     -- here's the delegated call to the old PL/SQL routine
351     ams_list_query_pvt.update_list_query(p_api_version_number,
352       p_init_msg_list,
353       p_commit,
354       p_validation_level,
355       x_return_status,
356       x_msg_count,
357       x_msg_data,
358       ddp_list_query_rec,
359       x_object_version_number);
360 
361     -- copy data back from the local OUT or IN-OUT args, if any
362 
363 
364 
365 
366 
367 
368 
369 
370   end;
371 
372   procedure update_list_query(p_api_version_number  NUMBER
373     , p_init_msg_list  VARCHAR2
374     , p_commit  VARCHAR2
375     , p_validation_level  NUMBER
376     , x_return_status OUT NOCOPY  VARCHAR2
377     , x_msg_count OUT NOCOPY  NUMBER
378     , x_msg_data OUT NOCOPY  VARCHAR2
379     , p_sql_string_tbl JTF_VARCHAR2_TABLE_4000
380     , x_object_version_number OUT NOCOPY  NUMBER
381     , p7_a0  NUMBER := 0-1962.0724
382     , p7_a1  DATE := fnd_api.g_miss_date
383     , p7_a2  NUMBER := 0-1962.0724
384     , p7_a3  DATE := fnd_api.g_miss_date
385     , p7_a4  NUMBER := 0-1962.0724
386     , p7_a5  NUMBER := 0-1962.0724
387     , p7_a6  NUMBER := 0-1962.0724
388     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
389     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
390     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
391     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
392     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
393     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
394     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
395     , p7_a14  NUMBER := 0-1962.0724
396     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
397     , p7_a16  NUMBER := 0-1962.0724
398     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
399     , p7_a18  NUMBER := 0-1962.0724
400     , p7_a19  NUMBER := 0-1962.0724
401   )
402   as
403     ddp_list_query_rec_tbl ams_list_query_pvt.list_query_rec_type_tbl;
404     ddp_sql_string_tbl ams_list_query_pvt.sql_string_tbl;
405     ddindx binary_integer; indx binary_integer;
406   begin
407 
408     -- copy data to the local IN or IN-OUT args, if any
409 
410 
411 
412 
413 
414 
415 
416     ddp_list_query_rec_tbl.list_query_id := rosetta_g_miss_num_map(p7_a0);
417     ddp_list_query_rec_tbl.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
418     ddp_list_query_rec_tbl.last_updated_by := rosetta_g_miss_num_map(p7_a2);
419     ddp_list_query_rec_tbl.creation_date := rosetta_g_miss_date_in_map(p7_a3);
420     ddp_list_query_rec_tbl.created_by := rosetta_g_miss_num_map(p7_a4);
421     ddp_list_query_rec_tbl.last_update_login := rosetta_g_miss_num_map(p7_a5);
422     ddp_list_query_rec_tbl.object_version_number := rosetta_g_miss_num_map(p7_a6);
423     ddp_list_query_rec_tbl.name := p7_a7;
424     ddp_list_query_rec_tbl.type := p7_a8;
425     ddp_list_query_rec_tbl.enabled_flag := p7_a9;
426     ddp_list_query_rec_tbl.primary_key := p7_a10;
427     ddp_list_query_rec_tbl.source_object_name := p7_a11;
428     ddp_list_query_rec_tbl.seed_flag := p7_a12;
429     ddp_list_query_rec_tbl.public_flag := p7_a13;
430     ddp_list_query_rec_tbl.org_id := rosetta_g_miss_num_map(p7_a14);
431     ddp_list_query_rec_tbl.comments := p7_a15;
432     ddp_list_query_rec_tbl.act_list_query_used_by_id := rosetta_g_miss_num_map(p7_a16);
433     ddp_list_query_rec_tbl.arc_act_list_query_used_by := p7_a17;
434     ddp_list_query_rec_tbl.parent_list_query_id := rosetta_g_miss_num_map(p7_a18);
435     ddp_list_query_rec_tbl.sequence_order := rosetta_g_miss_num_map(p7_a19);
436 
437     ams_list_query_pvt_w.rosetta_table_copy_in_p2(ddp_sql_string_tbl, p_sql_string_tbl);
438 
439 
440     -- here's the delegated call to the old PL/SQL routine
441     ams_list_query_pvt.update_list_query(p_api_version_number,
442       p_init_msg_list,
443       p_commit,
444       p_validation_level,
445       x_return_status,
446       x_msg_count,
447       x_msg_data,
448       ddp_list_query_rec_tbl,
449       ddp_sql_string_tbl,
450       x_object_version_number);
451 
452     -- copy data back from the local OUT or IN-OUT args, if any
453 
454 
455 
456 
457 
458 
459 
460 
461 
462   end;
463 
464   procedure validate_list_query(p_api_version_number  NUMBER
465     , p_init_msg_list  VARCHAR2
466     , p_validation_level  NUMBER
467     , x_return_status OUT NOCOPY  VARCHAR2
468     , x_msg_count OUT NOCOPY  NUMBER
469     , x_msg_data OUT NOCOPY  VARCHAR2
470     , p3_a0  NUMBER := 0-1962.0724
471     , p3_a1  DATE := fnd_api.g_miss_date
472     , p3_a2  NUMBER := 0-1962.0724
473     , p3_a3  DATE := fnd_api.g_miss_date
474     , p3_a4  NUMBER := 0-1962.0724
475     , p3_a5  NUMBER := 0-1962.0724
476     , p3_a6  NUMBER := 0-1962.0724
477     , p3_a7  VARCHAR2 := fnd_api.g_miss_char
478     , p3_a8  VARCHAR2 := fnd_api.g_miss_char
479     , p3_a9  VARCHAR2 := fnd_api.g_miss_char
480     , p3_a10  VARCHAR2 := fnd_api.g_miss_char
481     , p3_a11  VARCHAR2 := fnd_api.g_miss_char
482     , p3_a12  VARCHAR2 := fnd_api.g_miss_char
483     , p3_a13  VARCHAR2 := fnd_api.g_miss_char
484     , p3_a14  NUMBER := 0-1962.0724
485     , p3_a15  VARCHAR2 := fnd_api.g_miss_char
486     , p3_a16  NUMBER := 0-1962.0724
487     , p3_a17  VARCHAR2 := fnd_api.g_miss_char
488     , p3_a18  VARCHAR2 := fnd_api.g_miss_char
489     , p3_a19  NUMBER := 0-1962.0724
490     , p3_a20  NUMBER := 0-1962.0724
491   )
492   as
493     ddp_list_query_rec ams_list_query_pvt.list_query_rec_type;
494     ddindx binary_integer; indx binary_integer;
495   begin
496 
497     -- copy data to the local IN or IN-OUT args, if any
498 
499 
500 
501     ddp_list_query_rec.list_query_id := rosetta_g_miss_num_map(p3_a0);
502     ddp_list_query_rec.last_update_date := rosetta_g_miss_date_in_map(p3_a1);
503     ddp_list_query_rec.last_updated_by := rosetta_g_miss_num_map(p3_a2);
504     ddp_list_query_rec.creation_date := rosetta_g_miss_date_in_map(p3_a3);
505     ddp_list_query_rec.created_by := rosetta_g_miss_num_map(p3_a4);
506     ddp_list_query_rec.last_update_login := rosetta_g_miss_num_map(p3_a5);
507     ddp_list_query_rec.object_version_number := rosetta_g_miss_num_map(p3_a6);
508     ddp_list_query_rec.name := p3_a7;
509     ddp_list_query_rec.type := p3_a8;
510     ddp_list_query_rec.enabled_flag := p3_a9;
511     ddp_list_query_rec.primary_key := p3_a10;
512     ddp_list_query_rec.source_object_name := p3_a11;
513     ddp_list_query_rec.seed_flag := p3_a12;
514     ddp_list_query_rec.public_flag := p3_a13;
515     ddp_list_query_rec.org_id := rosetta_g_miss_num_map(p3_a14);
516     ddp_list_query_rec.comments := p3_a15;
517     ddp_list_query_rec.act_list_query_used_by_id := rosetta_g_miss_num_map(p3_a16);
518     ddp_list_query_rec.arc_act_list_query_used_by := p3_a17;
519     ddp_list_query_rec.sql_string := p3_a18;
520     ddp_list_query_rec.parent_list_query_id := rosetta_g_miss_num_map(p3_a19);
521     ddp_list_query_rec.sequence_order := rosetta_g_miss_num_map(p3_a20);
522 
523 
524 
525 
526     -- here's the delegated call to the old PL/SQL routine
527     ams_list_query_pvt.validate_list_query(p_api_version_number,
528       p_init_msg_list,
529       p_validation_level,
530       ddp_list_query_rec,
531       x_return_status,
532       x_msg_count,
533       x_msg_data);
534 
535     -- copy data back from the local OUT or IN-OUT args, if any
536 
537 
538 
539 
540 
541 
542   end;
543 
544   procedure check_list_query_items(p_validation_mode  VARCHAR2
545     , x_return_status OUT NOCOPY  VARCHAR2
546     , p0_a0  NUMBER := 0-1962.0724
547     , p0_a1  DATE := fnd_api.g_miss_date
548     , p0_a2  NUMBER := 0-1962.0724
549     , p0_a3  DATE := fnd_api.g_miss_date
550     , p0_a4  NUMBER := 0-1962.0724
551     , p0_a5  NUMBER := 0-1962.0724
552     , p0_a6  NUMBER := 0-1962.0724
553     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
554     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
555     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
556     , p0_a10  VARCHAR2 := fnd_api.g_miss_char
557     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
558     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
559     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
560     , p0_a14  NUMBER := 0-1962.0724
561     , p0_a15  VARCHAR2 := fnd_api.g_miss_char
562     , p0_a16  NUMBER := 0-1962.0724
563     , p0_a17  VARCHAR2 := fnd_api.g_miss_char
564     , p0_a18  VARCHAR2 := fnd_api.g_miss_char
565     , p0_a19  NUMBER := 0-1962.0724
566     , p0_a20  NUMBER := 0-1962.0724
567   )
568   as
569     ddp_list_query_rec ams_list_query_pvt.list_query_rec_type;
570     ddindx binary_integer; indx binary_integer;
571   begin
572 
573     -- copy data to the local IN or IN-OUT args, if any
574     ddp_list_query_rec.list_query_id := rosetta_g_miss_num_map(p0_a0);
575     ddp_list_query_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
576     ddp_list_query_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
577     ddp_list_query_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
578     ddp_list_query_rec.created_by := rosetta_g_miss_num_map(p0_a4);
579     ddp_list_query_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
580     ddp_list_query_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
581     ddp_list_query_rec.name := p0_a7;
582     ddp_list_query_rec.type := p0_a8;
583     ddp_list_query_rec.enabled_flag := p0_a9;
584     ddp_list_query_rec.primary_key := p0_a10;
585     ddp_list_query_rec.source_object_name := p0_a11;
586     ddp_list_query_rec.seed_flag := p0_a12;
587     ddp_list_query_rec.public_flag := p0_a13;
588     ddp_list_query_rec.org_id := rosetta_g_miss_num_map(p0_a14);
589     ddp_list_query_rec.comments := p0_a15;
590     ddp_list_query_rec.act_list_query_used_by_id := rosetta_g_miss_num_map(p0_a16);
591     ddp_list_query_rec.arc_act_list_query_used_by := p0_a17;
592     ddp_list_query_rec.sql_string := p0_a18;
593     ddp_list_query_rec.parent_list_query_id := rosetta_g_miss_num_map(p0_a19);
594     ddp_list_query_rec.sequence_order := rosetta_g_miss_num_map(p0_a20);
595 
596 
597 
598     -- here's the delegated call to the old PL/SQL routine
599     ams_list_query_pvt.check_list_query_items(ddp_list_query_rec,
600       p_validation_mode,
601       x_return_status);
602 
603     -- copy data back from the local OUT or IN-OUT args, if any
604 
605 
606   end;
607 
608   procedure validate_list_query_rec(p_api_version_number  NUMBER
609     , p_init_msg_list  VARCHAR2
610     , x_return_status OUT NOCOPY  VARCHAR2
611     , x_msg_count OUT NOCOPY  NUMBER
612     , x_msg_data OUT NOCOPY  VARCHAR2
613     , p5_a0  NUMBER := 0-1962.0724
614     , p5_a1  DATE := fnd_api.g_miss_date
615     , p5_a2  NUMBER := 0-1962.0724
616     , p5_a3  DATE := fnd_api.g_miss_date
617     , p5_a4  NUMBER := 0-1962.0724
618     , p5_a5  NUMBER := 0-1962.0724
619     , p5_a6  NUMBER := 0-1962.0724
620     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
621     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
622     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
623     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
624     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
625     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
626     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
627     , p5_a14  NUMBER := 0-1962.0724
628     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
629     , p5_a16  NUMBER := 0-1962.0724
630     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
631     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
632     , p5_a19  NUMBER := 0-1962.0724
633     , p5_a20  NUMBER := 0-1962.0724
634   )
635   as
636     ddp_list_query_rec ams_list_query_pvt.list_query_rec_type;
637     ddindx binary_integer; indx binary_integer;
638   begin
639 
640     -- copy data to the local IN or IN-OUT args, if any
641 
642 
643 
644 
645 
646     ddp_list_query_rec.list_query_id := rosetta_g_miss_num_map(p5_a0);
647     ddp_list_query_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a1);
648     ddp_list_query_rec.last_updated_by := rosetta_g_miss_num_map(p5_a2);
649     ddp_list_query_rec.creation_date := rosetta_g_miss_date_in_map(p5_a3);
650     ddp_list_query_rec.created_by := rosetta_g_miss_num_map(p5_a4);
651     ddp_list_query_rec.last_update_login := rosetta_g_miss_num_map(p5_a5);
652     ddp_list_query_rec.object_version_number := rosetta_g_miss_num_map(p5_a6);
653     ddp_list_query_rec.name := p5_a7;
654     ddp_list_query_rec.type := p5_a8;
655     ddp_list_query_rec.enabled_flag := p5_a9;
656     ddp_list_query_rec.primary_key := p5_a10;
657     ddp_list_query_rec.source_object_name := p5_a11;
658     ddp_list_query_rec.seed_flag := p5_a12;
659     ddp_list_query_rec.public_flag := p5_a13;
660     ddp_list_query_rec.org_id := rosetta_g_miss_num_map(p5_a14);
661     ddp_list_query_rec.comments := p5_a15;
662     ddp_list_query_rec.act_list_query_used_by_id := rosetta_g_miss_num_map(p5_a16);
663     ddp_list_query_rec.arc_act_list_query_used_by := p5_a17;
664     ddp_list_query_rec.sql_string := p5_a18;
665     ddp_list_query_rec.parent_list_query_id := rosetta_g_miss_num_map(p5_a19);
666     ddp_list_query_rec.sequence_order := rosetta_g_miss_num_map(p5_a20);
667 
668     -- here's the delegated call to the old PL/SQL routine
669     ams_list_query_pvt.validate_list_query_rec(p_api_version_number,
670       p_init_msg_list,
671       x_return_status,
672       x_msg_count,
673       x_msg_data,
674       ddp_list_query_rec);
675 
676     -- copy data back from the local OUT or IN-OUT args, if any
677 
678 
679 
680 
681 
682   end;
683 
684 end ams_list_query_pvt_w;