DBA Data[Home] [Help]

APPS.AMS_MANUAL_LIST_GEN_W dependencies on AMS_MANUAL_LIST_GEN

Line 1: package body ams_manual_list_gen_w as

1: package body ams_manual_list_gen_w as
2: /* $Header: amswlmlb.pls 120.0 2005/05/31 21:54:19 appldev 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_p1(t out nocopy ams_manual_list_gen.primary_key_tbl_type, 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_p1(t out nocopy ams_manual_list_gen.primary_key_tbl_type, 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_p1(t ams_manual_list_gen.primary_key_tbl_type, a0 out nocopy JTF_NUMBER_TABLE) as

36: end loop;
37: end if;
38: end if;
39: end rosetta_table_copy_in_p1;
40: procedure rosetta_table_copy_out_p1(t ams_manual_list_gen.primary_key_tbl_type, 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_manual_list_gen.varchar2_tbl_type, a0 JTF_VARCHAR2_TABLE_400) as

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

Line 81: procedure rosetta_table_copy_out_p2(t ams_manual_list_gen.varchar2_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_400) as

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

Line 104: procedure rosetta_table_copy_in_p3(t out nocopy ams_manual_list_gen.child_type, a0 JTF_VARCHAR2_TABLE_100) as

100: end if;
101: end if;
102: end rosetta_table_copy_out_p2;
103:
104: procedure rosetta_table_copy_in_p3(t out nocopy ams_manual_list_gen.child_type, a0 JTF_VARCHAR2_TABLE_100) as
105: ddindx binary_integer; indx binary_integer;
106: begin
107: if a0 is not null and a0.count > 0 then
108: if a0.count > 0 then

Line 122: procedure rosetta_table_copy_out_p3(t ams_manual_list_gen.child_type, a0 out nocopy JTF_VARCHAR2_TABLE_100) as

118: end loop;
119: end if;
120: end if;
121: end rosetta_table_copy_in_p3;
122: procedure rosetta_table_copy_out_p3(t ams_manual_list_gen.child_type, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
123: ddindx binary_integer; indx binary_integer;
124: begin
125: if t is null or t.count = 0 then
126: a0 := JTF_VARCHAR2_TABLE_100();

Line 159: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;

155: , x_added_entry_count out nocopy NUMBER
156: )
157:
158: as
159: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;
160: ddindx binary_integer; indx binary_integer;
161: begin
162:
163: -- copy data to the local IN or IN-OUT args, if any

Line 172: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);

168:
169:
170:
171:
172: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);
173:
174:
175:
176: -- here's the delegated call to the old PL/SQL routine

Line 177: ams_manual_list_gen.process_manual_list(p_api_version,

173:
174:
175:
176: -- here's the delegated call to the old PL/SQL routine
177: ams_manual_list_gen.process_manual_list(p_api_version,
178: p_init_msg_list,
179: p_commit,
180: p_validation_level,
181: x_return_status,

Line 216: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;

212: , p_master_type VARCHAR2
213: )
214:
215: as
216: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;
217: ddindx binary_integer; indx binary_integer;
218: begin
219:
220: -- copy data to the local IN or IN-OUT args, if any

Line 229: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);

225:
226:
227:
228:
229: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);
230:
231:
232: -- here's the delegated call to the old PL/SQL routine
233: ams_manual_list_gen.process_manual_list(p_api_version,

Line 233: ams_manual_list_gen.process_manual_list(p_api_version,

229: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);
230:
231:
232: -- here's the delegated call to the old PL/SQL routine
233: ams_manual_list_gen.process_manual_list(p_api_version,
234: p_init_msg_list,
235: p_commit,
236: p_validation_level,
237: x_return_status,

Line 273: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;

269: , p_master_type VARCHAR2
270: )
271:
272: as
273: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;
274: ddp_last_name_tbl ams_manual_list_gen.varchar2_tbl_type;
275: ddp_first_name_tbl ams_manual_list_gen.varchar2_tbl_type;
276: ddp_email_tbl ams_manual_list_gen.varchar2_tbl_type;
277: ddindx binary_integer; indx binary_integer;

Line 274: ddp_last_name_tbl ams_manual_list_gen.varchar2_tbl_type;

270: )
271:
272: as
273: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;
274: ddp_last_name_tbl ams_manual_list_gen.varchar2_tbl_type;
275: ddp_first_name_tbl ams_manual_list_gen.varchar2_tbl_type;
276: ddp_email_tbl ams_manual_list_gen.varchar2_tbl_type;
277: ddindx binary_integer; indx binary_integer;
278: begin

Line 275: ddp_first_name_tbl ams_manual_list_gen.varchar2_tbl_type;

271:
272: as
273: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;
274: ddp_last_name_tbl ams_manual_list_gen.varchar2_tbl_type;
275: ddp_first_name_tbl ams_manual_list_gen.varchar2_tbl_type;
276: ddp_email_tbl ams_manual_list_gen.varchar2_tbl_type;
277: ddindx binary_integer; indx binary_integer;
278: begin
279:

Line 276: ddp_email_tbl ams_manual_list_gen.varchar2_tbl_type;

272: as
273: ddp_primary_key_tbl ams_manual_list_gen.primary_key_tbl_type;
274: ddp_last_name_tbl ams_manual_list_gen.varchar2_tbl_type;
275: ddp_first_name_tbl ams_manual_list_gen.varchar2_tbl_type;
276: ddp_email_tbl ams_manual_list_gen.varchar2_tbl_type;
277: ddindx binary_integer; indx binary_integer;
278: begin
279:
280: -- copy data to the local IN or IN-OUT args, if any

Line 289: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);

285:
286:
287:
288:
289: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);
290:
291: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_last_name_tbl, p_last_name_tbl);
292:
293: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_first_name_tbl, p_first_name_tbl);

Line 291: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_last_name_tbl, p_last_name_tbl);

287:
288:
289: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);
290:
291: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_last_name_tbl, p_last_name_tbl);
292:
293: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_first_name_tbl, p_first_name_tbl);
294:
295: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_email_tbl, p_email_tbl);

Line 293: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_first_name_tbl, p_first_name_tbl);

289: ams_manual_list_gen_w.rosetta_table_copy_in_p1(ddp_primary_key_tbl, p_primary_key_tbl);
290:
291: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_last_name_tbl, p_last_name_tbl);
292:
293: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_first_name_tbl, p_first_name_tbl);
294:
295: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_email_tbl, p_email_tbl);
296:
297:

Line 295: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_email_tbl, p_email_tbl);

291: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_last_name_tbl, p_last_name_tbl);
292:
293: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_first_name_tbl, p_first_name_tbl);
294:
295: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_email_tbl, p_email_tbl);
296:
297:
298: -- here's the delegated call to the old PL/SQL routine
299: ams_manual_list_gen.process_employee_list(p_api_version,

Line 299: ams_manual_list_gen.process_employee_list(p_api_version,

295: ams_manual_list_gen_w.rosetta_table_copy_in_p2(ddp_email_tbl, p_email_tbl);
296:
297:
298: -- here's the delegated call to the old PL/SQL routine
299: ams_manual_list_gen.process_employee_list(p_api_version,
300: p_init_msg_list,
301: p_commit,
302: p_validation_level,
303: x_return_status,

Line 328: end ams_manual_list_gen_w;

324:
325:
326: end;
327:
328: end ams_manual_list_gen_w;