1: package body ahl_ump_smrinstance_pvt_w as
2: /* $Header: AHLSMRWB.pls 120.2.12010000.2 2008/12/27 18:03:47 sracha 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: rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
12: if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13: return d;
14: end;
15:
16: procedure rosetta_table_copy_in_p2(t out nocopy ahl_ump_smrinstance_pvt.results_mrinstance_tbl_type, a0 JTF_VARCHAR2_TABLE_100
17: , a1 JTF_VARCHAR2_TABLE_100
18: , a2 JTF_VARCHAR2_TABLE_100
19: , a3 JTF_VARCHAR2_TABLE_100
20: , a4 JTF_NUMBER_TABLE
101: end loop;
102: end if;
103: end if;
104: end rosetta_table_copy_in_p2;
105: procedure rosetta_table_copy_out_p2(t ahl_ump_smrinstance_pvt.results_mrinstance_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
106: , a1 out nocopy JTF_VARCHAR2_TABLE_100
107: , a2 out nocopy JTF_VARCHAR2_TABLE_100
108: , a3 out nocopy JTF_VARCHAR2_TABLE_100
109: , a4 out nocopy JTF_NUMBER_TABLE
377: , x_msg_data out nocopy VARCHAR2
378: )
379:
380: as
381: ddp_search_mr_instance_rec ahl_ump_smrinstance_pvt.search_mrinstance_rec_type;
382: ddx_results_mr_instance_tbl ahl_ump_smrinstance_pvt.results_mrinstance_tbl_type;
383: ddindx binary_integer; indx binary_integer;
384: begin
385:
378: )
379:
380: as
381: ddp_search_mr_instance_rec ahl_ump_smrinstance_pvt.search_mrinstance_rec_type;
382: ddx_results_mr_instance_tbl ahl_ump_smrinstance_pvt.results_mrinstance_tbl_type;
383: ddindx binary_integer; indx binary_integer;
384: begin
385:
386: -- copy data to the local IN or IN-OUT args, if any
424:
425:
426:
427: -- here's the delegated call to the old PL/SQL routine
428: ahl_ump_smrinstance_pvt.search_mr_instances(p_api_version,
429: p_init_msg_list,
430: p_commit,
431: p_validation_level,
432: p_default,
449:
450:
451:
452:
453: ahl_ump_smrinstance_pvt_w.rosetta_table_copy_out_p2(ddx_results_mr_instance_tbl, p9_a0
454: , p9_a1
455: , p9_a2
456: , p9_a3
457: , p9_a4
492:
493:
494: end;
495:
496: end ahl_ump_smrinstance_pvt_w;