APPS.AHL_VWP_RULES_PVT_W dependencies on AHL_VWP_RULES_PVT

Line 1: package body ahl_vwp_rules_pvt_w as

1: package body ahl_vwp_rules_pvt_w as
2: /* $Header: AHLWRULB.pls 120.1 2008/01/09 08:57:06 rnahata 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');

Line 16: procedure rosetta_table_copy_in_p3(t out nocopy ahl_vwp_rules_pvt.mr_serial_tbl_type, a0 JTF_NUMBER_TABLE

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_p3(t out nocopy ahl_vwp_rules_pvt.mr_serial_tbl_type, a0 JTF_NUMBER_TABLE
17: , a1 JTF_NUMBER_TABLE
18: ) as
19: ddindx binary_integer; indx binary_integer;
20: begin

Line 37: procedure rosetta_table_copy_out_p3(t ahl_vwp_rules_pvt.mr_serial_tbl_type, a0 out nocopy JTF_NUMBER_TABLE

33: end loop;
34: end if;
35: end if;
36: end rosetta_table_copy_in_p3;
37: procedure rosetta_table_copy_out_p3(t ahl_vwp_rules_pvt.mr_serial_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
38: , a1 out nocopy JTF_NUMBER_TABLE
39: ) as
40: ddindx binary_integer; indx binary_integer;
41: begin

Line 66: procedure rosetta_table_copy_in_p4(t out nocopy ahl_vwp_rules_pvt.item_tbl_type, a0 JTF_NUMBER_TABLE

62: end if;
63: end if;
64: end rosetta_table_copy_out_p3;
65:
66: procedure rosetta_table_copy_in_p4(t out nocopy ahl_vwp_rules_pvt.item_tbl_type, a0 JTF_NUMBER_TABLE
67: , a1 JTF_NUMBER_TABLE
68: , a2 JTF_NUMBER_TABLE
69: , a3 JTF_NUMBER_TABLE
70: , a4 JTF_DATE_TABLE

Line 95: procedure rosetta_table_copy_out_p4(t ahl_vwp_rules_pvt.item_tbl_type, a0 out nocopy JTF_NUMBER_TABLE

91: end loop;
92: end if;
93: end if;
94: end rosetta_table_copy_in_p4;
95: procedure rosetta_table_copy_out_p4(t ahl_vwp_rules_pvt.item_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
96: , a1 out nocopy JTF_NUMBER_TABLE
97: , a2 out nocopy JTF_NUMBER_TABLE
98: , a3 out nocopy JTF_NUMBER_TABLE
99: , a4 out nocopy JTF_DATE_TABLE

Line 144: procedure rosetta_table_copy_in_p5(t out nocopy ahl_vwp_rules_pvt.task_tbl_type, a0 JTF_NUMBER_TABLE

140: end if;
141: end if;
142: end rosetta_table_copy_out_p4;
143:
144: procedure rosetta_table_copy_in_p5(t out nocopy ahl_vwp_rules_pvt.task_tbl_type, a0 JTF_NUMBER_TABLE
145: , a1 JTF_NUMBER_TABLE
146: , a2 JTF_NUMBER_TABLE
147: , a3 JTF_VARCHAR2_TABLE_100
148: , a4 JTF_NUMBER_TABLE

Line 313: procedure rosetta_table_copy_out_p5(t ahl_vwp_rules_pvt.task_tbl_type, a0 out nocopy JTF_NUMBER_TABLE

309: end loop;
310: end if;
311: end if;
312: end rosetta_table_copy_in_p5;
313: procedure rosetta_table_copy_out_p5(t ahl_vwp_rules_pvt.task_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
314: , a1 out nocopy JTF_NUMBER_TABLE
315: , a2 out nocopy JTF_NUMBER_TABLE
316: , a3 out nocopy JTF_VARCHAR2_TABLE_100
317: , a4 out nocopy JTF_NUMBER_TABLE

Line 720: ddp_mr_serial_tbl ahl_vwp_rules_pvt.mr_serial_tbl_type;

716: , x_return_status out nocopy VARCHAR2
717: )
718:
719: as
720: ddp_mr_serial_tbl ahl_vwp_rules_pvt.mr_serial_tbl_type;
721: ddindx binary_integer; indx binary_integer;
722: begin
723:
724: -- copy data to the local IN or IN-OUT args, if any

Line 727: ahl_vwp_rules_pvt_w.rosetta_table_copy_in_p3(ddp_mr_serial_tbl, p2_a0

723:
724: -- copy data to the local IN or IN-OUT args, if any
725:
726:
727: ahl_vwp_rules_pvt_w.rosetta_table_copy_in_p3(ddp_mr_serial_tbl, p2_a0
728: , p2_a1
729: );
730:
731:

Line 733: ahl_vwp_rules_pvt.tech_dependency(p_visit_id,

729: );
730:
731:
732: -- here's the delegated call to the old PL/SQL routine
733: ahl_vwp_rules_pvt.tech_dependency(p_visit_id,
734: p_task_type,
735: ddp_mr_serial_tbl,
736: x_return_status);
737:

Line 765: ddp_item_tbl1 ahl_vwp_rules_pvt.item_tbl_type;

761: , p2_a5 out nocopy JTF_VARCHAR2_TABLE_100
762: )
763:
764: as
765: ddp_item_tbl1 ahl_vwp_rules_pvt.item_tbl_type;
766: ddp_item_tbl2 ahl_vwp_rules_pvt.item_tbl_type;
767: ddx_item_tbl ahl_vwp_rules_pvt.item_tbl_type;
768: ddindx binary_integer; indx binary_integer;
769: begin

Line 766: ddp_item_tbl2 ahl_vwp_rules_pvt.item_tbl_type;

762: )
763:
764: as
765: ddp_item_tbl1 ahl_vwp_rules_pvt.item_tbl_type;
766: ddp_item_tbl2 ahl_vwp_rules_pvt.item_tbl_type;
767: ddx_item_tbl ahl_vwp_rules_pvt.item_tbl_type;
768: ddindx binary_integer; indx binary_integer;
769: begin
770:

Line 767: ddx_item_tbl ahl_vwp_rules_pvt.item_tbl_type;

763:
764: as
765: ddp_item_tbl1 ahl_vwp_rules_pvt.item_tbl_type;
766: ddp_item_tbl2 ahl_vwp_rules_pvt.item_tbl_type;
767: ddx_item_tbl ahl_vwp_rules_pvt.item_tbl_type;
768: ddindx binary_integer; indx binary_integer;
769: begin
770:
771: -- copy data to the local IN or IN-OUT args, if any

Line 772: ahl_vwp_rules_pvt_w.rosetta_table_copy_in_p4(ddp_item_tbl1, p0_a0

768: ddindx binary_integer; indx binary_integer;
769: begin
770:
771: -- copy data to the local IN or IN-OUT args, if any
772: ahl_vwp_rules_pvt_w.rosetta_table_copy_in_p4(ddp_item_tbl1, p0_a0
773: , p0_a1
774: , p0_a2
775: , p0_a3
776: , p0_a4

Line 780: ahl_vwp_rules_pvt_w.rosetta_table_copy_in_p4(ddp_item_tbl2, p1_a0

776: , p0_a4
777: , p0_a5
778: );
779:
780: ahl_vwp_rules_pvt_w.rosetta_table_copy_in_p4(ddp_item_tbl2, p1_a0
781: , p1_a1
782: , p1_a2
783: , p1_a3
784: , p1_a4

Line 790: ahl_vwp_rules_pvt.merge_for_unique_items(ddp_item_tbl1,

786: );
787:
788:
789: -- here's the delegated call to the old PL/SQL routine
790: ahl_vwp_rules_pvt.merge_for_unique_items(ddp_item_tbl1,
791: ddp_item_tbl2,
792: ddx_item_tbl);
793:
794: -- copy data back from the local variables to OUT or IN-OUT args, if any

Line 797: ahl_vwp_rules_pvt_w.rosetta_table_copy_out_p4(ddx_item_tbl, p2_a0

793:
794: -- copy data back from the local variables to OUT or IN-OUT args, if any
795:
796:
797: ahl_vwp_rules_pvt_w.rosetta_table_copy_out_p4(ddx_item_tbl, p2_a0
798: , p2_a1
799: , p2_a2
800: , p2_a3
801: , p2_a4

Line 806: end ahl_vwp_rules_pvt_w;

802: , p2_a5
803: );
804: end;
805:
806: end ahl_vwp_rules_pvt_w;