eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.AMS_LISTSOURCETYPE_PVT_W

Source


1 package body ams_listsourcetype_pvt_w as
2   /* $Header: amswlstb.pls 115.11 2002/11/22 08:57:43 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 create_listsourcetype(p_api_version  NUMBER
23     , p_init_msg_list  VARCHAR2
24     , p_commit  VARCHAR2
25     , p_validation_level  NUMBER
26     , x_return_status OUT NOCOPY  VARCHAR2
27     , x_msg_count OUT NOCOPY  NUMBER
28     , x_msg_data OUT NOCOPY  VARCHAR2
29     , x_list_source_type_id OUT NOCOPY  NUMBER
30     , p7_a0  NUMBER := 0-1962.0724
31     , p7_a1  DATE := fnd_api.g_miss_date
32     , p7_a2  NUMBER := 0-1962.0724
33     , p7_a3  DATE := fnd_api.g_miss_date
34     , p7_a4  NUMBER := 0-1962.0724
35     , p7_a5  NUMBER := 0-1962.0724
36     , p7_a6  NUMBER := 0-1962.0724
37     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
38     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
39     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
40     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
41     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
42     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
43     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
44     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
45     , p7_a15  NUMBER := 0-1962.0724
46     , p7_a16  VARCHAR2 := fnd_api.g_miss_char
47     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
48     , p7_a18  VARCHAR2 := fnd_api.g_miss_char
49     , p7_a19  VARCHAR2 := fnd_api.g_miss_char
50   )
51   as
52     ddp_listsrctype_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
53     ddindx binary_integer; indx binary_integer;
54   begin
55 
56     -- copy data to the local IN or IN-OUT args, if any
57 
58 
59 
60 
61 
62 
63 
64     ddp_listsrctype_rec.list_source_type_id := rosetta_g_miss_num_map(p7_a0);
65     ddp_listsrctype_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
66     ddp_listsrctype_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
67     ddp_listsrctype_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
68     ddp_listsrctype_rec.created_by := rosetta_g_miss_num_map(p7_a4);
69     ddp_listsrctype_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
70     ddp_listsrctype_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
71     ddp_listsrctype_rec.list_source_name := p7_a7;
72     ddp_listsrctype_rec.list_source_type := p7_a8;
73     ddp_listsrctype_rec.source_type_code := p7_a9;
74     ddp_listsrctype_rec.source_object_name := p7_a10;
75     ddp_listsrctype_rec.master_source_type_flag := p7_a11;
76     ddp_listsrctype_rec.source_object_pk_field := p7_a12;
77     ddp_listsrctype_rec.enabled_flag := p7_a13;
78     ddp_listsrctype_rec.description := p7_a14;
79     ddp_listsrctype_rec.view_application_id := rosetta_g_miss_num_map(p7_a15);
80     ddp_listsrctype_rec.java_class_name := p7_a16;
81     ddp_listsrctype_rec.import_type := p7_a17;
82     ddp_listsrctype_rec.arc_act_src_used_by := p7_a18;
83     ddp_listsrctype_rec.source_category := p7_a19;
84 
85 
86     -- here's the delegated call to the old PL/SQL routine
87     ams_listsourcetype_pvt.create_listsourcetype(p_api_version,
88       p_init_msg_list,
89       p_commit,
90       p_validation_level,
91       x_return_status,
92       x_msg_count,
93       x_msg_data,
94       ddp_listsrctype_rec,
95       x_list_source_type_id);
96 
97     -- copy data back from the local OUT or IN-OUT args, if any
98 
99 
100 
101 
102 
103 
104 
105 
106   end;
107 
108   procedure update_listsourcetype(p_api_version  NUMBER
109     , p_init_msg_list  VARCHAR2
110     , p_commit  VARCHAR2
111     , p_validation_level  NUMBER
112     , x_return_status OUT NOCOPY  VARCHAR2
113     , x_msg_count OUT NOCOPY  NUMBER
114     , x_msg_data OUT NOCOPY  VARCHAR2
115     , p7_a0  NUMBER := 0-1962.0724
116     , p7_a1  DATE := fnd_api.g_miss_date
117     , p7_a2  NUMBER := 0-1962.0724
118     , p7_a3  DATE := fnd_api.g_miss_date
119     , p7_a4  NUMBER := 0-1962.0724
120     , p7_a5  NUMBER := 0-1962.0724
121     , p7_a6  NUMBER := 0-1962.0724
122     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
123     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
124     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
125     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
126     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
127     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
128     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
129     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
130     , p7_a15  NUMBER := 0-1962.0724
131     , p7_a16  VARCHAR2 := fnd_api.g_miss_char
132     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
133     , p7_a18  VARCHAR2 := fnd_api.g_miss_char
134     , p7_a19  VARCHAR2 := fnd_api.g_miss_char
135   )
136   as
137     ddp_listsrctype_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
138     ddindx binary_integer; indx binary_integer;
139   begin
140 
141     -- copy data to the local IN or IN-OUT args, if any
142 
143 
144 
145 
146 
147 
148 
149     ddp_listsrctype_rec.list_source_type_id := rosetta_g_miss_num_map(p7_a0);
150     ddp_listsrctype_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
151     ddp_listsrctype_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
152     ddp_listsrctype_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
153     ddp_listsrctype_rec.created_by := rosetta_g_miss_num_map(p7_a4);
154     ddp_listsrctype_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
155     ddp_listsrctype_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
156     ddp_listsrctype_rec.list_source_name := p7_a7;
157     ddp_listsrctype_rec.list_source_type := p7_a8;
158     ddp_listsrctype_rec.source_type_code := p7_a9;
159     ddp_listsrctype_rec.source_object_name := p7_a10;
160     ddp_listsrctype_rec.master_source_type_flag := p7_a11;
161     ddp_listsrctype_rec.source_object_pk_field := p7_a12;
162     ddp_listsrctype_rec.enabled_flag := p7_a13;
163     ddp_listsrctype_rec.description := p7_a14;
164     ddp_listsrctype_rec.view_application_id := rosetta_g_miss_num_map(p7_a15);
165     ddp_listsrctype_rec.java_class_name := p7_a16;
166     ddp_listsrctype_rec.import_type := p7_a17;
167     ddp_listsrctype_rec.arc_act_src_used_by := p7_a18;
168     ddp_listsrctype_rec.source_category := p7_a19;
169 
170     -- here's the delegated call to the old PL/SQL routine
171     ams_listsourcetype_pvt.update_listsourcetype(p_api_version,
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_listsrctype_rec);
179 
180     -- copy data back from the local OUT or IN-OUT args, if any
181 
182 
183 
184 
185 
186 
187 
188   end;
189 
190   procedure validate_listsourcetype(p_api_version  NUMBER
191     , p_init_msg_list  VARCHAR2
192     , p_commit  VARCHAR2
193     , p_validation_level  NUMBER
194     , x_return_status OUT NOCOPY  VARCHAR2
195     , x_msg_count OUT NOCOPY  NUMBER
196     , x_msg_data OUT NOCOPY  VARCHAR2
197     , p7_a0  NUMBER := 0-1962.0724
198     , p7_a1  DATE := fnd_api.g_miss_date
199     , p7_a2  NUMBER := 0-1962.0724
200     , p7_a3  DATE := fnd_api.g_miss_date
201     , p7_a4  NUMBER := 0-1962.0724
202     , p7_a5  NUMBER := 0-1962.0724
203     , p7_a6  NUMBER := 0-1962.0724
204     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
205     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
206     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
207     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
208     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
209     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
210     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
211     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
212     , p7_a15  NUMBER := 0-1962.0724
213     , p7_a16  VARCHAR2 := fnd_api.g_miss_char
214     , p7_a17  VARCHAR2 := fnd_api.g_miss_char
215     , p7_a18  VARCHAR2 := fnd_api.g_miss_char
216     , p7_a19  VARCHAR2 := fnd_api.g_miss_char
217   )
218   as
219     ddp_listsrctype_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
220     ddindx binary_integer; indx binary_integer;
221   begin
222 
223     -- copy data to the local IN or IN-OUT args, if any
224 
225 
226 
227 
228 
229 
230 
231     ddp_listsrctype_rec.list_source_type_id := rosetta_g_miss_num_map(p7_a0);
232     ddp_listsrctype_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
233     ddp_listsrctype_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
234     ddp_listsrctype_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
235     ddp_listsrctype_rec.created_by := rosetta_g_miss_num_map(p7_a4);
236     ddp_listsrctype_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
237     ddp_listsrctype_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
238     ddp_listsrctype_rec.list_source_name := p7_a7;
239     ddp_listsrctype_rec.list_source_type := p7_a8;
240     ddp_listsrctype_rec.source_type_code := p7_a9;
241     ddp_listsrctype_rec.source_object_name := p7_a10;
242     ddp_listsrctype_rec.master_source_type_flag := p7_a11;
243     ddp_listsrctype_rec.source_object_pk_field := p7_a12;
244     ddp_listsrctype_rec.enabled_flag := p7_a13;
245     ddp_listsrctype_rec.description := p7_a14;
246     ddp_listsrctype_rec.view_application_id := rosetta_g_miss_num_map(p7_a15);
247     ddp_listsrctype_rec.java_class_name := p7_a16;
248     ddp_listsrctype_rec.import_type := p7_a17;
249     ddp_listsrctype_rec.arc_act_src_used_by := p7_a18;
250     ddp_listsrctype_rec.source_category := p7_a19;
251 
252     -- here's the delegated call to the old PL/SQL routine
253     ams_listsourcetype_pvt.validate_listsourcetype(p_api_version,
254       p_init_msg_list,
255       p_commit,
256       p_validation_level,
257       x_return_status,
258       x_msg_count,
259       x_msg_data,
260       ddp_listsrctype_rec);
261 
262     -- copy data back from the local OUT or IN-OUT args, if any
263 
264 
265 
266 
267 
268 
269 
270   end;
271 
272   procedure check_listsourcetype_items(p_validation_mode  VARCHAR2
273     , x_return_status OUT NOCOPY  VARCHAR2
274     , p0_a0  NUMBER := 0-1962.0724
275     , p0_a1  DATE := fnd_api.g_miss_date
276     , p0_a2  NUMBER := 0-1962.0724
277     , p0_a3  DATE := fnd_api.g_miss_date
278     , p0_a4  NUMBER := 0-1962.0724
279     , p0_a5  NUMBER := 0-1962.0724
280     , p0_a6  NUMBER := 0-1962.0724
281     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
282     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
283     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
284     , p0_a10  VARCHAR2 := fnd_api.g_miss_char
285     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
286     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
287     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
288     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
289     , p0_a15  NUMBER := 0-1962.0724
290     , p0_a16  VARCHAR2 := fnd_api.g_miss_char
291     , p0_a17  VARCHAR2 := fnd_api.g_miss_char
292     , p0_a18  VARCHAR2 := fnd_api.g_miss_char
293     , p0_a19  VARCHAR2 := fnd_api.g_miss_char
294   )
295   as
296     ddp_listsrctype_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
297     ddindx binary_integer; indx binary_integer;
298   begin
299 
300     -- copy data to the local IN or IN-OUT args, if any
301     ddp_listsrctype_rec.list_source_type_id := rosetta_g_miss_num_map(p0_a0);
302     ddp_listsrctype_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
303     ddp_listsrctype_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
304     ddp_listsrctype_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
305     ddp_listsrctype_rec.created_by := rosetta_g_miss_num_map(p0_a4);
306     ddp_listsrctype_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
307     ddp_listsrctype_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
308     ddp_listsrctype_rec.list_source_name := p0_a7;
309     ddp_listsrctype_rec.list_source_type := p0_a8;
310     ddp_listsrctype_rec.source_type_code := p0_a9;
311     ddp_listsrctype_rec.source_object_name := p0_a10;
312     ddp_listsrctype_rec.master_source_type_flag := p0_a11;
313     ddp_listsrctype_rec.source_object_pk_field := p0_a12;
314     ddp_listsrctype_rec.enabled_flag := p0_a13;
315     ddp_listsrctype_rec.description := p0_a14;
316     ddp_listsrctype_rec.view_application_id := rosetta_g_miss_num_map(p0_a15);
317     ddp_listsrctype_rec.java_class_name := p0_a16;
318     ddp_listsrctype_rec.import_type := p0_a17;
319     ddp_listsrctype_rec.arc_act_src_used_by := p0_a18;
320     ddp_listsrctype_rec.source_category := p0_a19;
321 
322 
323 
324     -- here's the delegated call to the old PL/SQL routine
325     ams_listsourcetype_pvt.check_listsourcetype_items(ddp_listsrctype_rec,
326       p_validation_mode,
327       x_return_status);
328 
329     -- copy data back from the local OUT or IN-OUT args, if any
330 
331 
332   end;
333 
334   procedure check_listsourcetype_record(x_return_status OUT NOCOPY  VARCHAR2
335     , p0_a0  NUMBER := 0-1962.0724
336     , p0_a1  DATE := fnd_api.g_miss_date
337     , p0_a2  NUMBER := 0-1962.0724
341     , p0_a6  NUMBER := 0-1962.0724
338     , p0_a3  DATE := fnd_api.g_miss_date
339     , p0_a4  NUMBER := 0-1962.0724
340     , p0_a5  NUMBER := 0-1962.0724
342     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
343     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
344     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
345     , p0_a10  VARCHAR2 := fnd_api.g_miss_char
346     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
347     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
348     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
349     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
350     , p0_a15  NUMBER := 0-1962.0724
351     , p0_a16  VARCHAR2 := fnd_api.g_miss_char
352     , p0_a17  VARCHAR2 := fnd_api.g_miss_char
353     , p0_a18  VARCHAR2 := fnd_api.g_miss_char
354     , p0_a19  VARCHAR2 := fnd_api.g_miss_char
355     , p1_a0  NUMBER := 0-1962.0724
356     , p1_a1  DATE := fnd_api.g_miss_date
357     , p1_a2  NUMBER := 0-1962.0724
358     , p1_a3  DATE := fnd_api.g_miss_date
359     , p1_a4  NUMBER := 0-1962.0724
360     , p1_a5  NUMBER := 0-1962.0724
361     , p1_a6  NUMBER := 0-1962.0724
362     , p1_a7  VARCHAR2 := fnd_api.g_miss_char
363     , p1_a8  VARCHAR2 := fnd_api.g_miss_char
364     , p1_a9  VARCHAR2 := fnd_api.g_miss_char
365     , p1_a10  VARCHAR2 := fnd_api.g_miss_char
366     , p1_a11  VARCHAR2 := fnd_api.g_miss_char
367     , p1_a12  VARCHAR2 := fnd_api.g_miss_char
368     , p1_a13  VARCHAR2 := fnd_api.g_miss_char
369     , p1_a14  VARCHAR2 := fnd_api.g_miss_char
370     , p1_a15  NUMBER := 0-1962.0724
371     , p1_a16  VARCHAR2 := fnd_api.g_miss_char
372     , p1_a17  VARCHAR2 := fnd_api.g_miss_char
373     , p1_a18  VARCHAR2 := fnd_api.g_miss_char
374     , p1_a19  VARCHAR2 := fnd_api.g_miss_char
375   )
376   as
377     ddp_listsrctype_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
378     ddp_complete_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
379     ddindx binary_integer; indx binary_integer;
380   begin
381 
382     -- copy data to the local IN or IN-OUT args, if any
383     ddp_listsrctype_rec.list_source_type_id := rosetta_g_miss_num_map(p0_a0);
384     ddp_listsrctype_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
385     ddp_listsrctype_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
386     ddp_listsrctype_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
387     ddp_listsrctype_rec.created_by := rosetta_g_miss_num_map(p0_a4);
388     ddp_listsrctype_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
389     ddp_listsrctype_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
390     ddp_listsrctype_rec.list_source_name := p0_a7;
391     ddp_listsrctype_rec.list_source_type := p0_a8;
392     ddp_listsrctype_rec.source_type_code := p0_a9;
393     ddp_listsrctype_rec.source_object_name := p0_a10;
394     ddp_listsrctype_rec.master_source_type_flag := p0_a11;
395     ddp_listsrctype_rec.source_object_pk_field := p0_a12;
396     ddp_listsrctype_rec.enabled_flag := p0_a13;
397     ddp_listsrctype_rec.description := p0_a14;
398     ddp_listsrctype_rec.view_application_id := rosetta_g_miss_num_map(p0_a15);
399     ddp_listsrctype_rec.java_class_name := p0_a16;
400     ddp_listsrctype_rec.import_type := p0_a17;
401     ddp_listsrctype_rec.arc_act_src_used_by := p0_a18;
402     ddp_listsrctype_rec.source_category := p0_a19;
403 
404     ddp_complete_rec.list_source_type_id := rosetta_g_miss_num_map(p1_a0);
405     ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
406     ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
407     ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
408     ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a4);
409     ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
410     ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
411     ddp_complete_rec.list_source_name := p1_a7;
412     ddp_complete_rec.list_source_type := p1_a8;
413     ddp_complete_rec.source_type_code := p1_a9;
414     ddp_complete_rec.source_object_name := p1_a10;
415     ddp_complete_rec.master_source_type_flag := p1_a11;
416     ddp_complete_rec.source_object_pk_field := p1_a12;
417     ddp_complete_rec.enabled_flag := p1_a13;
418     ddp_complete_rec.description := p1_a14;
419     ddp_complete_rec.view_application_id := rosetta_g_miss_num_map(p1_a15);
420     ddp_complete_rec.java_class_name := p1_a16;
421     ddp_complete_rec.import_type := p1_a17;
422     ddp_complete_rec.arc_act_src_used_by := p1_a18;
423     ddp_complete_rec.source_category := p1_a19;
424 
425 
426     -- here's the delegated call to the old PL/SQL routine
427     ams_listsourcetype_pvt.check_listsourcetype_record(ddp_listsrctype_rec,
428       ddp_complete_rec,
429       x_return_status);
430 
431     -- copy data back from the local OUT or IN-OUT args, if any
432 
433 
434   end;
435 
436   procedure init_listsourcetype_rec(p0_a0 OUT NOCOPY  NUMBER
437     , p0_a1 OUT NOCOPY  DATE
438     , p0_a2 OUT NOCOPY  NUMBER
439     , p0_a3 OUT NOCOPY  DATE
440     , p0_a4 OUT NOCOPY  NUMBER
441     , p0_a5 OUT NOCOPY  NUMBER
442     , p0_a6 OUT NOCOPY  NUMBER
443     , p0_a7 OUT NOCOPY  VARCHAR2
444     , p0_a8 OUT NOCOPY  VARCHAR2
445     , p0_a9 OUT NOCOPY  VARCHAR2
446     , p0_a10 OUT NOCOPY  VARCHAR2
447     , p0_a11 OUT NOCOPY  VARCHAR2
448     , p0_a12 OUT NOCOPY  VARCHAR2
449     , p0_a13 OUT NOCOPY  VARCHAR2
453     , p0_a17 OUT NOCOPY  VARCHAR2
450     , p0_a14 OUT NOCOPY  VARCHAR2
451     , p0_a15 OUT NOCOPY  NUMBER
452     , p0_a16 OUT NOCOPY  VARCHAR2
454     , p0_a18 OUT NOCOPY  VARCHAR2
455     , p0_a19 OUT NOCOPY  VARCHAR2
456   )
457   as
458     ddx_listsrctype_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
459     ddindx binary_integer; indx binary_integer;
460   begin
461 
462     -- copy data to the local IN or IN-OUT args, if any
463 
464     -- here's the delegated call to the old PL/SQL routine
465     ams_listsourcetype_pvt.init_listsourcetype_rec(ddx_listsrctype_rec);
466 
467     -- copy data back from the local OUT or IN-OUT args, if any
468     p0_a0 := rosetta_g_miss_num_map(ddx_listsrctype_rec.list_source_type_id);
469     p0_a1 := ddx_listsrctype_rec.last_update_date;
470     p0_a2 := rosetta_g_miss_num_map(ddx_listsrctype_rec.last_updated_by);
471     p0_a3 := ddx_listsrctype_rec.creation_date;
472     p0_a4 := rosetta_g_miss_num_map(ddx_listsrctype_rec.created_by);
473     p0_a5 := rosetta_g_miss_num_map(ddx_listsrctype_rec.last_update_login);
474     p0_a6 := rosetta_g_miss_num_map(ddx_listsrctype_rec.object_version_number);
475     p0_a7 := ddx_listsrctype_rec.list_source_name;
476     p0_a8 := ddx_listsrctype_rec.list_source_type;
477     p0_a9 := ddx_listsrctype_rec.source_type_code;
478     p0_a10 := ddx_listsrctype_rec.source_object_name;
479     p0_a11 := ddx_listsrctype_rec.master_source_type_flag;
480     p0_a12 := ddx_listsrctype_rec.source_object_pk_field;
481     p0_a13 := ddx_listsrctype_rec.enabled_flag;
482     p0_a14 := ddx_listsrctype_rec.description;
483     p0_a15 := rosetta_g_miss_num_map(ddx_listsrctype_rec.view_application_id);
484     p0_a16 := ddx_listsrctype_rec.java_class_name;
485     p0_a17 := ddx_listsrctype_rec.import_type;
486     p0_a18 := ddx_listsrctype_rec.arc_act_src_used_by;
487     p0_a19 := ddx_listsrctype_rec.source_category;
488   end;
489 
490   procedure complete_listsourcetype_rec(p1_a0 OUT NOCOPY  NUMBER
491     , p1_a1 OUT NOCOPY  DATE
492     , p1_a2 OUT NOCOPY  NUMBER
493     , p1_a3 OUT NOCOPY  DATE
494     , p1_a4 OUT NOCOPY  NUMBER
495     , p1_a5 OUT NOCOPY  NUMBER
496     , p1_a6 OUT NOCOPY  NUMBER
497     , p1_a7 OUT NOCOPY  VARCHAR2
498     , p1_a8 OUT NOCOPY  VARCHAR2
499     , p1_a9 OUT NOCOPY  VARCHAR2
500     , p1_a10 OUT NOCOPY  VARCHAR2
501     , p1_a11 OUT NOCOPY  VARCHAR2
502     , p1_a12 OUT NOCOPY  VARCHAR2
503     , p1_a13 OUT NOCOPY  VARCHAR2
504     , p1_a14 OUT NOCOPY  VARCHAR2
505     , p1_a15 OUT NOCOPY  NUMBER
506     , p1_a16 OUT NOCOPY  VARCHAR2
507     , p1_a17 OUT NOCOPY  VARCHAR2
508     , p1_a18 OUT NOCOPY  VARCHAR2
509     , p1_a19 OUT NOCOPY  VARCHAR2
510     , p0_a0  NUMBER := 0-1962.0724
511     , p0_a1  DATE := fnd_api.g_miss_date
512     , p0_a2  NUMBER := 0-1962.0724
513     , p0_a3  DATE := fnd_api.g_miss_date
514     , p0_a4  NUMBER := 0-1962.0724
515     , p0_a5  NUMBER := 0-1962.0724
516     , p0_a6  NUMBER := 0-1962.0724
517     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
518     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
519     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
520     , p0_a10  VARCHAR2 := fnd_api.g_miss_char
521     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
522     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
523     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
524     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
525     , p0_a15  NUMBER := 0-1962.0724
526     , p0_a16  VARCHAR2 := fnd_api.g_miss_char
527     , p0_a17  VARCHAR2 := fnd_api.g_miss_char
528     , p0_a18  VARCHAR2 := fnd_api.g_miss_char
529     , p0_a19  VARCHAR2 := fnd_api.g_miss_char
530   )
531   as
532     ddp_listsrctype_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
533     ddx_complete_rec ams_listsourcetype_pvt.listsourcetype_rec_type;
534     ddindx binary_integer; indx binary_integer;
535   begin
536 
537     -- copy data to the local IN or IN-OUT args, if any
538     ddp_listsrctype_rec.list_source_type_id := rosetta_g_miss_num_map(p0_a0);
539     ddp_listsrctype_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
540     ddp_listsrctype_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
541     ddp_listsrctype_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
542     ddp_listsrctype_rec.created_by := rosetta_g_miss_num_map(p0_a4);
543     ddp_listsrctype_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
544     ddp_listsrctype_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
545     ddp_listsrctype_rec.list_source_name := p0_a7;
546     ddp_listsrctype_rec.list_source_type := p0_a8;
547     ddp_listsrctype_rec.source_type_code := p0_a9;
548     ddp_listsrctype_rec.source_object_name := p0_a10;
549     ddp_listsrctype_rec.master_source_type_flag := p0_a11;
550     ddp_listsrctype_rec.source_object_pk_field := p0_a12;
551     ddp_listsrctype_rec.enabled_flag := p0_a13;
552     ddp_listsrctype_rec.description := p0_a14;
553     ddp_listsrctype_rec.view_application_id := rosetta_g_miss_num_map(p0_a15);
554     ddp_listsrctype_rec.java_class_name := p0_a16;
555     ddp_listsrctype_rec.import_type := p0_a17;
556     ddp_listsrctype_rec.arc_act_src_used_by := p0_a18;
557     ddp_listsrctype_rec.source_category := p0_a19;
558 
559 
560     -- here's the delegated call to the old PL/SQL routine
561     ams_listsourcetype_pvt.complete_listsourcetype_rec(ddp_listsrctype_rec,
562       ddx_complete_rec);
563 
564     -- copy data back from the local OUT or IN-OUT args, if any
565 
566     p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.list_source_type_id);
567     p1_a1 := ddx_complete_rec.last_update_date;
568     p1_a2 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
569     p1_a3 := ddx_complete_rec.creation_date;
570     p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
571     p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
572     p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
573     p1_a7 := ddx_complete_rec.list_source_name;
574     p1_a8 := ddx_complete_rec.list_source_type;
575     p1_a9 := ddx_complete_rec.source_type_code;
576     p1_a10 := ddx_complete_rec.source_object_name;
577     p1_a11 := ddx_complete_rec.master_source_type_flag;
578     p1_a12 := ddx_complete_rec.source_object_pk_field;
579     p1_a13 := ddx_complete_rec.enabled_flag;
580     p1_a14 := ddx_complete_rec.description;
581     p1_a15 := rosetta_g_miss_num_map(ddx_complete_rec.view_application_id);
582     p1_a16 := ddx_complete_rec.java_class_name;
583     p1_a17 := ddx_complete_rec.import_type;
584     p1_a18 := ddx_complete_rec.arc_act_src_used_by;
585     p1_a19 := ddx_complete_rec.source_category;
586   end;
587 
588 end ams_listsourcetype_pvt_w;