DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_METRIC_PVT_W

Source


1 package body ams_metric_pvt_w as
2   /* $Header: amswmtcb.pls 120.1 2005/08/24 23:10 dmvincen noship $ */
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 create_metric(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_metric_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  NUMBER := 0-1962.0724
38     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
39     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
40     , p7_a10  NUMBER := 0-1962.0724
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  NUMBER := 0-1962.0724
48     , p7_a18  NUMBER := 0-1962.0724
49     , p7_a19  VARCHAR2 := fnd_api.g_miss_char
50     , p7_a20  VARCHAR2 := fnd_api.g_miss_char
51     , p7_a21  VARCHAR2 := fnd_api.g_miss_char
52     , p7_a22  VARCHAR2 := fnd_api.g_miss_char
53     , p7_a23  VARCHAR2 := fnd_api.g_miss_char
54     , p7_a24  VARCHAR2 := fnd_api.g_miss_char
55     , p7_a25  VARCHAR2 := fnd_api.g_miss_char
56     , p7_a26  NUMBER := 0-1962.0724
57     , p7_a27  VARCHAR2 := fnd_api.g_miss_char
58     , p7_a28  VARCHAR2 := fnd_api.g_miss_char
59     , p7_a29  VARCHAR2 := fnd_api.g_miss_char
60     , p7_a30  VARCHAR2 := fnd_api.g_miss_char
61   )
62 
63   as
64     ddp_metric_rec ams_metric_pvt.metric_rec_type;
65     ddindx binary_integer; indx binary_integer;
66   begin
67 
68     -- copy data to the local IN or IN-OUT args, if any
69 
70 
71 
72 
73 
74 
75 
76     ddp_metric_rec.metric_id := rosetta_g_miss_num_map(p7_a0);
77     ddp_metric_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
78     ddp_metric_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
79     ddp_metric_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
80     ddp_metric_rec.created_by := rosetta_g_miss_num_map(p7_a4);
81     ddp_metric_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
82     ddp_metric_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
83     ddp_metric_rec.application_id := rosetta_g_miss_num_map(p7_a7);
84     ddp_metric_rec.arc_metric_used_for_object := p7_a8;
85     ddp_metric_rec.metric_calculation_type := p7_a9;
86     ddp_metric_rec.metric_category := rosetta_g_miss_num_map(p7_a10);
87     ddp_metric_rec.accrual_type := p7_a11;
88     ddp_metric_rec.value_type := p7_a12;
89     ddp_metric_rec.sensitive_data_flag := p7_a13;
90     ddp_metric_rec.enabled_flag := p7_a14;
91     ddp_metric_rec.metric_sub_category := rosetta_g_miss_num_map(p7_a15);
92     ddp_metric_rec.function_name := p7_a16;
93     ddp_metric_rec.metric_parent_id := rosetta_g_miss_num_map(p7_a17);
94     ddp_metric_rec.summary_metric_id := rosetta_g_miss_num_map(p7_a18);
95     ddp_metric_rec.compute_using_function := p7_a19;
96     ddp_metric_rec.default_uom_code := p7_a20;
97     ddp_metric_rec.uom_type := p7_a21;
98     ddp_metric_rec.formula := p7_a22;
99     ddp_metric_rec.metrics_name := p7_a23;
100     ddp_metric_rec.description := p7_a24;
101     ddp_metric_rec.formula_display := p7_a25;
102     ddp_metric_rec.hierarchy_id := rosetta_g_miss_num_map(p7_a26);
103     ddp_metric_rec.set_function_name := p7_a27;
104     ddp_metric_rec.display_type := p7_a28;
105     ddp_metric_rec.target_type := p7_a29;
106     ddp_metric_rec.denorm_code := p7_a30;
107 
108 
109     -- here's the delegated call to the old PL/SQL routine
110     ams_metric_pvt.create_metric(p_api_version,
111       p_init_msg_list,
112       p_commit,
113       p_validation_level,
114       x_return_status,
115       x_msg_count,
116       x_msg_data,
117       ddp_metric_rec,
118       x_metric_id);
119 
120     -- copy data back from the local variables to OUT or IN-OUT args, if any
121 
122 
123 
124 
125 
126 
127 
128 
129   end;
130 
131   procedure update_metric(p_api_version  NUMBER
132     , p_init_msg_list  VARCHAR2
133     , p_commit  VARCHAR2
134     , p_validation_level  NUMBER
135     , x_return_status out nocopy  VARCHAR2
136     , x_msg_count out nocopy  NUMBER
137     , x_msg_data out nocopy  VARCHAR2
138     , p7_a0  NUMBER := 0-1962.0724
139     , p7_a1  DATE := fnd_api.g_miss_date
140     , p7_a2  NUMBER := 0-1962.0724
141     , p7_a3  DATE := fnd_api.g_miss_date
142     , p7_a4  NUMBER := 0-1962.0724
143     , p7_a5  NUMBER := 0-1962.0724
144     , p7_a6  NUMBER := 0-1962.0724
145     , p7_a7  NUMBER := 0-1962.0724
146     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
147     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
148     , p7_a10  NUMBER := 0-1962.0724
149     , p7_a11  VARCHAR2 := fnd_api.g_miss_char
150     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
151     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
152     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
153     , p7_a15  NUMBER := 0-1962.0724
154     , p7_a16  VARCHAR2 := fnd_api.g_miss_char
155     , p7_a17  NUMBER := 0-1962.0724
156     , p7_a18  NUMBER := 0-1962.0724
157     , p7_a19  VARCHAR2 := fnd_api.g_miss_char
158     , p7_a20  VARCHAR2 := fnd_api.g_miss_char
159     , p7_a21  VARCHAR2 := fnd_api.g_miss_char
160     , p7_a22  VARCHAR2 := fnd_api.g_miss_char
161     , p7_a23  VARCHAR2 := fnd_api.g_miss_char
162     , p7_a24  VARCHAR2 := fnd_api.g_miss_char
163     , p7_a25  VARCHAR2 := fnd_api.g_miss_char
164     , p7_a26  NUMBER := 0-1962.0724
165     , p7_a27  VARCHAR2 := fnd_api.g_miss_char
166     , p7_a28  VARCHAR2 := fnd_api.g_miss_char
167     , p7_a29  VARCHAR2 := fnd_api.g_miss_char
168     , p7_a30  VARCHAR2 := fnd_api.g_miss_char
169   )
170 
171   as
172     ddp_metric_rec ams_metric_pvt.metric_rec_type;
173     ddindx binary_integer; indx binary_integer;
174   begin
175 
176     -- copy data to the local IN or IN-OUT args, if any
177 
178 
179 
180 
181 
182 
183 
184     ddp_metric_rec.metric_id := rosetta_g_miss_num_map(p7_a0);
185     ddp_metric_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
186     ddp_metric_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
187     ddp_metric_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
188     ddp_metric_rec.created_by := rosetta_g_miss_num_map(p7_a4);
189     ddp_metric_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
190     ddp_metric_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
191     ddp_metric_rec.application_id := rosetta_g_miss_num_map(p7_a7);
192     ddp_metric_rec.arc_metric_used_for_object := p7_a8;
193     ddp_metric_rec.metric_calculation_type := p7_a9;
194     ddp_metric_rec.metric_category := rosetta_g_miss_num_map(p7_a10);
195     ddp_metric_rec.accrual_type := p7_a11;
196     ddp_metric_rec.value_type := p7_a12;
197     ddp_metric_rec.sensitive_data_flag := p7_a13;
198     ddp_metric_rec.enabled_flag := p7_a14;
199     ddp_metric_rec.metric_sub_category := rosetta_g_miss_num_map(p7_a15);
200     ddp_metric_rec.function_name := p7_a16;
201     ddp_metric_rec.metric_parent_id := rosetta_g_miss_num_map(p7_a17);
202     ddp_metric_rec.summary_metric_id := rosetta_g_miss_num_map(p7_a18);
203     ddp_metric_rec.compute_using_function := p7_a19;
204     ddp_metric_rec.default_uom_code := p7_a20;
205     ddp_metric_rec.uom_type := p7_a21;
206     ddp_metric_rec.formula := p7_a22;
207     ddp_metric_rec.metrics_name := p7_a23;
208     ddp_metric_rec.description := p7_a24;
209     ddp_metric_rec.formula_display := p7_a25;
210     ddp_metric_rec.hierarchy_id := rosetta_g_miss_num_map(p7_a26);
211     ddp_metric_rec.set_function_name := p7_a27;
212     ddp_metric_rec.display_type := p7_a28;
213     ddp_metric_rec.target_type := p7_a29;
214     ddp_metric_rec.denorm_code := p7_a30;
215 
216     -- here's the delegated call to the old PL/SQL routine
217     ams_metric_pvt.update_metric(p_api_version,
218       p_init_msg_list,
219       p_commit,
220       p_validation_level,
221       x_return_status,
222       x_msg_count,
223       x_msg_data,
224       ddp_metric_rec);
225 
226     -- copy data back from the local variables to OUT or IN-OUT args, if any
227 
228 
229 
230 
231 
232 
233 
234   end;
235 
236   procedure validate_metric(p_api_version  NUMBER
237     , p_init_msg_list  VARCHAR2
238     , p_validation_level  NUMBER
239     , x_return_status out nocopy  VARCHAR2
240     , x_msg_count out nocopy  NUMBER
241     , x_msg_data out nocopy  VARCHAR2
242     , p6_a0  NUMBER := 0-1962.0724
243     , p6_a1  DATE := fnd_api.g_miss_date
244     , p6_a2  NUMBER := 0-1962.0724
245     , p6_a3  DATE := fnd_api.g_miss_date
246     , p6_a4  NUMBER := 0-1962.0724
247     , p6_a5  NUMBER := 0-1962.0724
248     , p6_a6  NUMBER := 0-1962.0724
249     , p6_a7  NUMBER := 0-1962.0724
250     , p6_a8  VARCHAR2 := fnd_api.g_miss_char
251     , p6_a9  VARCHAR2 := fnd_api.g_miss_char
252     , p6_a10  NUMBER := 0-1962.0724
253     , p6_a11  VARCHAR2 := fnd_api.g_miss_char
254     , p6_a12  VARCHAR2 := fnd_api.g_miss_char
255     , p6_a13  VARCHAR2 := fnd_api.g_miss_char
256     , p6_a14  VARCHAR2 := fnd_api.g_miss_char
257     , p6_a15  NUMBER := 0-1962.0724
258     , p6_a16  VARCHAR2 := fnd_api.g_miss_char
259     , p6_a17  NUMBER := 0-1962.0724
260     , p6_a18  NUMBER := 0-1962.0724
261     , p6_a19  VARCHAR2 := fnd_api.g_miss_char
262     , p6_a20  VARCHAR2 := fnd_api.g_miss_char
263     , p6_a21  VARCHAR2 := fnd_api.g_miss_char
264     , p6_a22  VARCHAR2 := fnd_api.g_miss_char
265     , p6_a23  VARCHAR2 := fnd_api.g_miss_char
266     , p6_a24  VARCHAR2 := fnd_api.g_miss_char
267     , p6_a25  VARCHAR2 := fnd_api.g_miss_char
268     , p6_a26  NUMBER := 0-1962.0724
269     , p6_a27  VARCHAR2 := fnd_api.g_miss_char
270     , p6_a28  VARCHAR2 := fnd_api.g_miss_char
271     , p6_a29  VARCHAR2 := fnd_api.g_miss_char
272     , p6_a30  VARCHAR2 := fnd_api.g_miss_char
273   )
274 
275   as
276     ddp_metric_rec ams_metric_pvt.metric_rec_type;
277     ddindx binary_integer; indx binary_integer;
278   begin
279 
280     -- copy data to the local IN or IN-OUT args, if any
281 
282 
283 
284 
285 
286 
287     ddp_metric_rec.metric_id := rosetta_g_miss_num_map(p6_a0);
288     ddp_metric_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
289     ddp_metric_rec.last_updated_by := rosetta_g_miss_num_map(p6_a2);
290     ddp_metric_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
291     ddp_metric_rec.created_by := rosetta_g_miss_num_map(p6_a4);
292     ddp_metric_rec.last_update_login := rosetta_g_miss_num_map(p6_a5);
293     ddp_metric_rec.object_version_number := rosetta_g_miss_num_map(p6_a6);
294     ddp_metric_rec.application_id := rosetta_g_miss_num_map(p6_a7);
295     ddp_metric_rec.arc_metric_used_for_object := p6_a8;
296     ddp_metric_rec.metric_calculation_type := p6_a9;
297     ddp_metric_rec.metric_category := rosetta_g_miss_num_map(p6_a10);
298     ddp_metric_rec.accrual_type := p6_a11;
299     ddp_metric_rec.value_type := p6_a12;
300     ddp_metric_rec.sensitive_data_flag := p6_a13;
301     ddp_metric_rec.enabled_flag := p6_a14;
302     ddp_metric_rec.metric_sub_category := rosetta_g_miss_num_map(p6_a15);
303     ddp_metric_rec.function_name := p6_a16;
304     ddp_metric_rec.metric_parent_id := rosetta_g_miss_num_map(p6_a17);
305     ddp_metric_rec.summary_metric_id := rosetta_g_miss_num_map(p6_a18);
309     ddp_metric_rec.formula := p6_a22;
306     ddp_metric_rec.compute_using_function := p6_a19;
307     ddp_metric_rec.default_uom_code := p6_a20;
308     ddp_metric_rec.uom_type := p6_a21;
310     ddp_metric_rec.metrics_name := p6_a23;
311     ddp_metric_rec.description := p6_a24;
312     ddp_metric_rec.formula_display := p6_a25;
313     ddp_metric_rec.hierarchy_id := rosetta_g_miss_num_map(p6_a26);
314     ddp_metric_rec.set_function_name := p6_a27;
315     ddp_metric_rec.display_type := p6_a28;
316     ddp_metric_rec.target_type := p6_a29;
317     ddp_metric_rec.denorm_code := p6_a30;
318 
319     -- here's the delegated call to the old PL/SQL routine
320     ams_metric_pvt.validate_metric(p_api_version,
321       p_init_msg_list,
322       p_validation_level,
323       x_return_status,
324       x_msg_count,
325       x_msg_data,
326       ddp_metric_rec);
327 
328     -- copy data back from the local variables to OUT or IN-OUT args, if any
329 
330 
331 
332 
333 
334 
335   end;
336 
337   procedure validate_metric_items(p_validation_mode  VARCHAR2
338     , x_return_status out nocopy  VARCHAR2
339     , p0_a0  NUMBER := 0-1962.0724
340     , p0_a1  DATE := fnd_api.g_miss_date
341     , p0_a2  NUMBER := 0-1962.0724
342     , p0_a3  DATE := fnd_api.g_miss_date
343     , p0_a4  NUMBER := 0-1962.0724
344     , p0_a5  NUMBER := 0-1962.0724
345     , p0_a6  NUMBER := 0-1962.0724
346     , p0_a7  NUMBER := 0-1962.0724
347     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
348     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
349     , p0_a10  NUMBER := 0-1962.0724
350     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
351     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
352     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
353     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
354     , p0_a15  NUMBER := 0-1962.0724
355     , p0_a16  VARCHAR2 := fnd_api.g_miss_char
356     , p0_a17  NUMBER := 0-1962.0724
357     , p0_a18  NUMBER := 0-1962.0724
358     , p0_a19  VARCHAR2 := fnd_api.g_miss_char
359     , p0_a20  VARCHAR2 := fnd_api.g_miss_char
360     , p0_a21  VARCHAR2 := fnd_api.g_miss_char
361     , p0_a22  VARCHAR2 := fnd_api.g_miss_char
362     , p0_a23  VARCHAR2 := fnd_api.g_miss_char
363     , p0_a24  VARCHAR2 := fnd_api.g_miss_char
364     , p0_a25  VARCHAR2 := fnd_api.g_miss_char
365     , p0_a26  NUMBER := 0-1962.0724
366     , p0_a27  VARCHAR2 := fnd_api.g_miss_char
367     , p0_a28  VARCHAR2 := fnd_api.g_miss_char
368     , p0_a29  VARCHAR2 := fnd_api.g_miss_char
369     , p0_a30  VARCHAR2 := fnd_api.g_miss_char
370   )
371 
372   as
373     ddp_metric_rec ams_metric_pvt.metric_rec_type;
374     ddindx binary_integer; indx binary_integer;
375   begin
376 
377     -- copy data to the local IN or IN-OUT args, if any
378     ddp_metric_rec.metric_id := rosetta_g_miss_num_map(p0_a0);
379     ddp_metric_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
380     ddp_metric_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
381     ddp_metric_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
382     ddp_metric_rec.created_by := rosetta_g_miss_num_map(p0_a4);
383     ddp_metric_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
384     ddp_metric_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
385     ddp_metric_rec.application_id := rosetta_g_miss_num_map(p0_a7);
386     ddp_metric_rec.arc_metric_used_for_object := p0_a8;
387     ddp_metric_rec.metric_calculation_type := p0_a9;
388     ddp_metric_rec.metric_category := rosetta_g_miss_num_map(p0_a10);
389     ddp_metric_rec.accrual_type := p0_a11;
390     ddp_metric_rec.value_type := p0_a12;
391     ddp_metric_rec.sensitive_data_flag := p0_a13;
392     ddp_metric_rec.enabled_flag := p0_a14;
393     ddp_metric_rec.metric_sub_category := rosetta_g_miss_num_map(p0_a15);
394     ddp_metric_rec.function_name := p0_a16;
395     ddp_metric_rec.metric_parent_id := rosetta_g_miss_num_map(p0_a17);
396     ddp_metric_rec.summary_metric_id := rosetta_g_miss_num_map(p0_a18);
397     ddp_metric_rec.compute_using_function := p0_a19;
398     ddp_metric_rec.default_uom_code := p0_a20;
399     ddp_metric_rec.uom_type := p0_a21;
400     ddp_metric_rec.formula := p0_a22;
401     ddp_metric_rec.metrics_name := p0_a23;
402     ddp_metric_rec.description := p0_a24;
403     ddp_metric_rec.formula_display := p0_a25;
404     ddp_metric_rec.hierarchy_id := rosetta_g_miss_num_map(p0_a26);
405     ddp_metric_rec.set_function_name := p0_a27;
406     ddp_metric_rec.display_type := p0_a28;
407     ddp_metric_rec.target_type := p0_a29;
408     ddp_metric_rec.denorm_code := p0_a30;
409 
410 
411 
412     -- here's the delegated call to the old PL/SQL routine
413     ams_metric_pvt.validate_metric_items(ddp_metric_rec,
414       p_validation_mode,
415       x_return_status);
416 
417     -- copy data back from the local variables to OUT or IN-OUT args, if any
418 
419 
420   end;
421 
422   procedure validate_metric_record(x_return_status out nocopy  VARCHAR2
423     , p0_a0  NUMBER := 0-1962.0724
424     , p0_a1  DATE := fnd_api.g_miss_date
425     , p0_a2  NUMBER := 0-1962.0724
426     , p0_a3  DATE := fnd_api.g_miss_date
427     , p0_a4  NUMBER := 0-1962.0724
428     , p0_a5  NUMBER := 0-1962.0724
429     , p0_a6  NUMBER := 0-1962.0724
430     , p0_a7  NUMBER := 0-1962.0724
431     , p0_a8  VARCHAR2 := fnd_api.g_miss_char
435     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
432     , p0_a9  VARCHAR2 := fnd_api.g_miss_char
433     , p0_a10  NUMBER := 0-1962.0724
434     , p0_a11  VARCHAR2 := fnd_api.g_miss_char
436     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
437     , p0_a14  VARCHAR2 := fnd_api.g_miss_char
438     , p0_a15  NUMBER := 0-1962.0724
439     , p0_a16  VARCHAR2 := fnd_api.g_miss_char
440     , p0_a17  NUMBER := 0-1962.0724
441     , p0_a18  NUMBER := 0-1962.0724
442     , p0_a19  VARCHAR2 := fnd_api.g_miss_char
443     , p0_a20  VARCHAR2 := fnd_api.g_miss_char
444     , p0_a21  VARCHAR2 := fnd_api.g_miss_char
445     , p0_a22  VARCHAR2 := fnd_api.g_miss_char
446     , p0_a23  VARCHAR2 := fnd_api.g_miss_char
447     , p0_a24  VARCHAR2 := fnd_api.g_miss_char
448     , p0_a25  VARCHAR2 := fnd_api.g_miss_char
449     , p0_a26  NUMBER := 0-1962.0724
450     , p0_a27  VARCHAR2 := fnd_api.g_miss_char
451     , p0_a28  VARCHAR2 := fnd_api.g_miss_char
452     , p0_a29  VARCHAR2 := fnd_api.g_miss_char
453     , p0_a30  VARCHAR2 := fnd_api.g_miss_char
454     , p1_a0  NUMBER := 0-1962.0724
455     , p1_a1  DATE := fnd_api.g_miss_date
456     , p1_a2  NUMBER := 0-1962.0724
457     , p1_a3  DATE := fnd_api.g_miss_date
458     , p1_a4  NUMBER := 0-1962.0724
459     , p1_a5  NUMBER := 0-1962.0724
460     , p1_a6  NUMBER := 0-1962.0724
461     , p1_a7  NUMBER := 0-1962.0724
462     , p1_a8  VARCHAR2 := fnd_api.g_miss_char
463     , p1_a9  VARCHAR2 := fnd_api.g_miss_char
464     , p1_a10  NUMBER := 0-1962.0724
465     , p1_a11  VARCHAR2 := fnd_api.g_miss_char
466     , p1_a12  VARCHAR2 := fnd_api.g_miss_char
467     , p1_a13  VARCHAR2 := fnd_api.g_miss_char
468     , p1_a14  VARCHAR2 := fnd_api.g_miss_char
469     , p1_a15  NUMBER := 0-1962.0724
470     , p1_a16  VARCHAR2 := fnd_api.g_miss_char
471     , p1_a17  NUMBER := 0-1962.0724
472     , p1_a18  NUMBER := 0-1962.0724
473     , p1_a19  VARCHAR2 := fnd_api.g_miss_char
474     , p1_a20  VARCHAR2 := fnd_api.g_miss_char
475     , p1_a21  VARCHAR2 := fnd_api.g_miss_char
476     , p1_a22  VARCHAR2 := fnd_api.g_miss_char
477     , p1_a23  VARCHAR2 := fnd_api.g_miss_char
478     , p1_a24  VARCHAR2 := fnd_api.g_miss_char
479     , p1_a25  VARCHAR2 := fnd_api.g_miss_char
480     , p1_a26  NUMBER := 0-1962.0724
481     , p1_a27  VARCHAR2 := fnd_api.g_miss_char
482     , p1_a28  VARCHAR2 := fnd_api.g_miss_char
483     , p1_a29  VARCHAR2 := fnd_api.g_miss_char
484     , p1_a30  VARCHAR2 := fnd_api.g_miss_char
485   )
486 
487   as
488     ddp_metric_rec ams_metric_pvt.metric_rec_type;
489     ddp_complete_rec ams_metric_pvt.metric_rec_type;
490     ddindx binary_integer; indx binary_integer;
491   begin
492 
493     -- copy data to the local IN or IN-OUT args, if any
494     ddp_metric_rec.metric_id := rosetta_g_miss_num_map(p0_a0);
495     ddp_metric_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
496     ddp_metric_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
497     ddp_metric_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
498     ddp_metric_rec.created_by := rosetta_g_miss_num_map(p0_a4);
499     ddp_metric_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
500     ddp_metric_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
501     ddp_metric_rec.application_id := rosetta_g_miss_num_map(p0_a7);
502     ddp_metric_rec.arc_metric_used_for_object := p0_a8;
503     ddp_metric_rec.metric_calculation_type := p0_a9;
504     ddp_metric_rec.metric_category := rosetta_g_miss_num_map(p0_a10);
505     ddp_metric_rec.accrual_type := p0_a11;
506     ddp_metric_rec.value_type := p0_a12;
507     ddp_metric_rec.sensitive_data_flag := p0_a13;
508     ddp_metric_rec.enabled_flag := p0_a14;
509     ddp_metric_rec.metric_sub_category := rosetta_g_miss_num_map(p0_a15);
510     ddp_metric_rec.function_name := p0_a16;
511     ddp_metric_rec.metric_parent_id := rosetta_g_miss_num_map(p0_a17);
512     ddp_metric_rec.summary_metric_id := rosetta_g_miss_num_map(p0_a18);
513     ddp_metric_rec.compute_using_function := p0_a19;
514     ddp_metric_rec.default_uom_code := p0_a20;
515     ddp_metric_rec.uom_type := p0_a21;
516     ddp_metric_rec.formula := p0_a22;
517     ddp_metric_rec.metrics_name := p0_a23;
518     ddp_metric_rec.description := p0_a24;
519     ddp_metric_rec.formula_display := p0_a25;
520     ddp_metric_rec.hierarchy_id := rosetta_g_miss_num_map(p0_a26);
521     ddp_metric_rec.set_function_name := p0_a27;
522     ddp_metric_rec.display_type := p0_a28;
523     ddp_metric_rec.target_type := p0_a29;
524     ddp_metric_rec.denorm_code := p0_a30;
525 
526     ddp_complete_rec.metric_id := rosetta_g_miss_num_map(p1_a0);
527     ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
528     ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
529     ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
530     ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a4);
531     ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
532     ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
533     ddp_complete_rec.application_id := rosetta_g_miss_num_map(p1_a7);
534     ddp_complete_rec.arc_metric_used_for_object := p1_a8;
535     ddp_complete_rec.metric_calculation_type := p1_a9;
536     ddp_complete_rec.metric_category := rosetta_g_miss_num_map(p1_a10);
537     ddp_complete_rec.accrual_type := p1_a11;
538     ddp_complete_rec.value_type := p1_a12;
539     ddp_complete_rec.sensitive_data_flag := p1_a13;
540     ddp_complete_rec.enabled_flag := p1_a14;
541     ddp_complete_rec.metric_sub_category := rosetta_g_miss_num_map(p1_a15);
542     ddp_complete_rec.function_name := p1_a16;
543     ddp_complete_rec.metric_parent_id := rosetta_g_miss_num_map(p1_a17);
544     ddp_complete_rec.summary_metric_id := rosetta_g_miss_num_map(p1_a18);
545     ddp_complete_rec.compute_using_function := p1_a19;
546     ddp_complete_rec.default_uom_code := p1_a20;
547     ddp_complete_rec.uom_type := p1_a21;
548     ddp_complete_rec.formula := p1_a22;
549     ddp_complete_rec.metrics_name := p1_a23;
550     ddp_complete_rec.description := p1_a24;
551     ddp_complete_rec.formula_display := p1_a25;
552     ddp_complete_rec.hierarchy_id := rosetta_g_miss_num_map(p1_a26);
553     ddp_complete_rec.set_function_name := p1_a27;
554     ddp_complete_rec.display_type := p1_a28;
555     ddp_complete_rec.target_type := p1_a29;
556     ddp_complete_rec.denorm_code := p1_a30;
557 
558 
559     -- here's the delegated call to the old PL/SQL routine
560     ams_metric_pvt.validate_metric_record(ddp_metric_rec,
561       ddp_complete_rec,
562       x_return_status);
563 
564     -- copy data back from the local variables to OUT or IN-OUT args, if any
565 
566 
567   end;
568 
569 end ams_metric_pvt_w;