APPS.AMS_LIST_PURGE_PVT_W dependencies on AMS_LIST_PURGE_PVT

Line 1: package body ams_list_purge_pvt_w as

1: package body ams_list_purge_pvt_w as
2: /* $Header: amswimcb.pls 120.0 2006/03/29 05:40 rmbhanda 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:

Line 22: procedure rosetta_table_copy_in_p0(t out nocopy ams_list_purge_pvt.t_rec_table, a0 JTF_NUMBER_TABLE) as

18: if n=b then return a; end if;
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p0(t out nocopy ams_list_purge_pvt.t_rec_table, a0 JTF_NUMBER_TABLE) 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

Line 40: procedure rosetta_table_copy_out_p0(t ams_list_purge_pvt.t_rec_table, a0 out nocopy JTF_NUMBER_TABLE) as

36: end loop;
37: end if;
38: end if;
39: end rosetta_table_copy_in_p0;
40: procedure rosetta_table_copy_out_p0(t ams_list_purge_pvt.t_rec_table, a0 out nocopy JTF_NUMBER_TABLE) as
41: ddindx binary_integer; indx binary_integer;
42: begin
43: if t is null or t.count = 0 then
44: a0 := JTF_NUMBER_TABLE();

Line 63: procedure rosetta_table_copy_in_p2(t out nocopy ams_list_purge_pvt.list_header_id_tbl, a0 JTF_NUMBER_TABLE

59: end if;
60: end if;
61: end rosetta_table_copy_out_p0;
62:
63: procedure rosetta_table_copy_in_p2(t out nocopy ams_list_purge_pvt.list_header_id_tbl, a0 JTF_NUMBER_TABLE
64: ) as
65: ddindx binary_integer; indx binary_integer;
66: begin
67: if a0 is not null and a0.count > 0 then

Line 82: procedure rosetta_table_copy_out_p2(t ams_list_purge_pvt.list_header_id_tbl, a0 out nocopy JTF_NUMBER_TABLE

78: end loop;
79: end if;
80: end if;
81: end rosetta_table_copy_in_p2;
82: procedure rosetta_table_copy_out_p2(t ams_list_purge_pvt.list_header_id_tbl, a0 out nocopy JTF_NUMBER_TABLE
83: ) as
84: ddindx binary_integer; indx binary_integer;
85: begin
86: if t is null or t.count = 0 then

Line 113: ddp_list_header_id_tbl ams_list_purge_pvt.list_header_id_tbl;

109: , x_msg_data out nocopy VARCHAR2
110: )
111:
112: as
113: ddp_list_header_id_tbl ams_list_purge_pvt.list_header_id_tbl;
114: ddindx binary_integer; indx binary_integer;
115: begin
116:
117: -- copy data to the local IN or IN-OUT args, if any

Line 118: ams_list_purge_pvt_w.rosetta_table_copy_in_p2(ddp_list_header_id_tbl, p0_a0

114: ddindx binary_integer; indx binary_integer;
115: begin
116:
117: -- copy data to the local IN or IN-OUT args, if any
118: ams_list_purge_pvt_w.rosetta_table_copy_in_p2(ddp_list_header_id_tbl, p0_a0
119: );
120:
121:
122:

Line 125: ams_list_purge_pvt.delete_entries_soft(ddp_list_header_id_tbl,

121:
122:
123:
124: -- here's the delegated call to the old PL/SQL routine
125: ams_list_purge_pvt.delete_entries_soft(ddp_list_header_id_tbl,
126: x_return_status,
127: x_msg_count,
128: x_msg_data);
129:

Line 143: ddp_list_header_id_tbl ams_list_purge_pvt.list_header_id_tbl;

139: , x_msg_data out nocopy VARCHAR2
140: )
141:
142: as
143: ddp_list_header_id_tbl ams_list_purge_pvt.list_header_id_tbl;
144: ddindx binary_integer; indx binary_integer;
145: begin
146:
147: -- copy data to the local IN or IN-OUT args, if any

Line 148: ams_list_purge_pvt_w.rosetta_table_copy_in_p2(ddp_list_header_id_tbl, p0_a0

144: ddindx binary_integer; indx binary_integer;
145: begin
146:
147: -- copy data to the local IN or IN-OUT args, if any
148: ams_list_purge_pvt_w.rosetta_table_copy_in_p2(ddp_list_header_id_tbl, p0_a0
149: );
150:
151:
152:

Line 155: ams_list_purge_pvt.delete_entries_online(ddp_list_header_id_tbl,

151:
152:
153:
154: -- here's the delegated call to the old PL/SQL routine
155: ams_list_purge_pvt.delete_entries_online(ddp_list_header_id_tbl,
156: x_return_status,
157: x_msg_count,
158: x_msg_data);
159:

Line 166: end ams_list_purge_pvt_w;

162:
163:
164: end;
165:
166: end ams_list_purge_pvt_w;