22: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
23:
24: PROCEDURE Generate_List
25: ( p_api_version IN NUMBER,
26: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
27: p_commit IN VARCHAR2 := FND_API.G_FALSE,
28: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
29: p_list_header_id IN NUMBER ,
30: x_return_status OUT NOCOPY VARCHAR2,
23:
24: PROCEDURE Generate_List
25: ( p_api_version IN NUMBER,
26: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
27: p_commit IN VARCHAR2 := FND_API.G_FALSE,
28: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
29: p_list_header_id IN NUMBER ,
30: x_return_status OUT NOCOPY VARCHAR2,
31: x_msg_count OUT NOCOPY NUMBER,
24: PROCEDURE Generate_List
25: ( p_api_version IN NUMBER,
26: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
27: p_commit IN VARCHAR2 := FND_API.G_FALSE,
28: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
29: p_list_header_id IN NUMBER ,
30: x_return_status OUT NOCOPY VARCHAR2,
31: x_msg_count OUT NOCOPY NUMBER,
32: x_msg_data OUT NOCOPY VARCHAR2
45: SAVEPOINT Generate_List_pub;
46:
47: -- initialize the message list;
48: -- won't do it again when calling private API
49: IF FND_API.to_boolean(p_init_msg_list) THEN
50: FND_MSG_PUB.initialize;
51: END IF;
52:
53: AMS_LISTGENERATION_PKG.Generate_List(
51: END IF;
52:
53: AMS_LISTGENERATION_PKG.Generate_List(
54: p_api_version => p_api_version,
55: p_init_msg_list => FND_API.g_false,
56: p_commit => FND_API.g_false,
57: p_validation_level => FND_API.g_valid_level_full,
58:
59: x_return_status => l_return_status,
52:
53: AMS_LISTGENERATION_PKG.Generate_List(
54: p_api_version => p_api_version,
55: p_init_msg_list => FND_API.g_false,
56: p_commit => FND_API.g_false,
57: p_validation_level => FND_API.g_valid_level_full,
58:
59: x_return_status => l_return_status,
60: x_msg_count => x_msg_count,
53: AMS_LISTGENERATION_PKG.Generate_List(
54: p_api_version => p_api_version,
55: p_init_msg_list => FND_API.g_false,
56: p_commit => FND_API.g_false,
57: p_validation_level => FND_API.g_valid_level_full,
58:
59: x_return_status => l_return_status,
60: x_msg_count => x_msg_count,
61: x_msg_data => x_msg_data,
63: p_list_header_id => l_list_header_id
64: );
65:
66:
67: IF l_return_status = FND_API.g_ret_sts_error THEN
68: RAISE FND_API.g_exc_error;
69: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
70: RAISE FND_API.g_exc_unexpected_error;
71: END IF;
64: );
65:
66:
67: IF l_return_status = FND_API.g_ret_sts_error THEN
68: RAISE FND_API.g_exc_error;
69: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
70: RAISE FND_API.g_exc_unexpected_error;
71: END IF;
72:
65:
66:
67: IF l_return_status = FND_API.g_ret_sts_error THEN
68: RAISE FND_API.g_exc_error;
69: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
70: RAISE FND_API.g_exc_unexpected_error;
71: END IF;
72:
73: IF FND_API.to_boolean(p_commit) THEN
66:
67: IF l_return_status = FND_API.g_ret_sts_error THEN
68: RAISE FND_API.g_exc_error;
69: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
70: RAISE FND_API.g_exc_unexpected_error;
71: END IF;
72:
73: IF FND_API.to_boolean(p_commit) THEN
74: COMMIT;
69: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
70: RAISE FND_API.g_exc_unexpected_error;
71: END IF;
72:
73: IF FND_API.to_boolean(p_commit) THEN
74: COMMIT;
75: END IF;
76: x_return_status := FND_API.g_ret_sts_success;
77: FND_MSG_PUB.count_and_get(
72:
73: IF FND_API.to_boolean(p_commit) THEN
74: COMMIT;
75: END IF;
76: x_return_status := FND_API.g_ret_sts_success;
77: FND_MSG_PUB.count_and_get(
78: p_encoded => FND_API.g_false,
79: p_count => x_msg_count,
80: p_data => x_msg_data
74: COMMIT;
75: END IF;
76: x_return_status := FND_API.g_ret_sts_success;
77: FND_MSG_PUB.count_and_get(
78: p_encoded => FND_API.g_false,
79: p_count => x_msg_count,
80: p_data => x_msg_data
81: );
82:
81: );
82:
83: EXCEPTION
84:
85: WHEN FND_API.g_exc_error THEN
86: ROLLBACK TO Generate_List_pub;
87: x_return_status := FND_API.g_ret_sts_error;
88: FND_MSG_PUB.count_and_get(
89: p_encoded => FND_API.g_false,
83: EXCEPTION
84:
85: WHEN FND_API.g_exc_error THEN
86: ROLLBACK TO Generate_List_pub;
87: x_return_status := FND_API.g_ret_sts_error;
88: FND_MSG_PUB.count_and_get(
89: p_encoded => FND_API.g_false,
90: p_count => x_msg_count,
91: p_data => x_msg_data
85: WHEN FND_API.g_exc_error THEN
86: ROLLBACK TO Generate_List_pub;
87: x_return_status := FND_API.g_ret_sts_error;
88: FND_MSG_PUB.count_and_get(
89: p_encoded => FND_API.g_false,
90: p_count => x_msg_count,
91: p_data => x_msg_data
92: );
93:
90: p_count => x_msg_count,
91: p_data => x_msg_data
92: );
93:
94: WHEN FND_API.g_exc_unexpected_error THEN
95: ROLLBACK TO Generate_List_pub;
96: x_return_status := FND_API.g_ret_sts_unexp_error ;
97: FND_MSG_PUB.count_and_get(
98: p_encoded => FND_API.g_false,
92: );
93:
94: WHEN FND_API.g_exc_unexpected_error THEN
95: ROLLBACK TO Generate_List_pub;
96: x_return_status := FND_API.g_ret_sts_unexp_error ;
97: FND_MSG_PUB.count_and_get(
98: p_encoded => FND_API.g_false,
99: p_count => x_msg_count,
100: p_data => x_msg_data
94: WHEN FND_API.g_exc_unexpected_error THEN
95: ROLLBACK TO Generate_List_pub;
96: x_return_status := FND_API.g_ret_sts_unexp_error ;
97: FND_MSG_PUB.count_and_get(
98: p_encoded => FND_API.g_false,
99: p_count => x_msg_count,
100: p_data => x_msg_data
101: );
102:
102:
103:
104: WHEN OTHERS THEN
105: ROLLBACK TO Generate_List_pub;
106: x_return_status := FND_API.g_ret_sts_unexp_error ;
107:
108: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
109: THEN
110: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
110: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
111: END IF;
112:
113: FND_MSG_PUB.count_and_get(
114: p_encoded => FND_API.g_false,
115: p_count => x_msg_count,
116: p_data => x_msg_data
117: );
118: END Generate_List;
118: END Generate_List;
119:
120: PROCEDURE create_list_from_query
121: ( p_api_version IN NUMBER,
122: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
123: p_commit IN VARCHAR2 := FND_API.G_FALSE,
124: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
125: p_list_name in varchar2,
126: p_list_type in varchar2,
119:
120: PROCEDURE create_list_from_query
121: ( p_api_version IN NUMBER,
122: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
123: p_commit IN VARCHAR2 := FND_API.G_FALSE,
124: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
125: p_list_name in varchar2,
126: p_list_type in varchar2,
127: p_owner_user_id in number,
120: PROCEDURE create_list_from_query
121: ( p_api_version IN NUMBER,
122: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
123: p_commit IN VARCHAR2 := FND_API.G_FALSE,
124: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
125: p_list_name in varchar2,
126: p_list_type in varchar2,
127: p_owner_user_id in number,
128: p_list_header_id in number,
146: SAVEPOINT create_list_from_query_pub;
147:
148: -- initialize the message list;
149: -- won't do it again when calling private API
150: IF FND_API.to_boolean(p_init_msg_list) THEN
151: FND_MSG_PUB.initialize;
152: END IF;
153:
154: AMS_LISTGENERATION_PKG.create_list_from_query(
152: END IF;
153:
154: AMS_LISTGENERATION_PKG.create_list_from_query(
155: p_api_version => p_api_version,
156: p_init_msg_list => FND_API.g_false,
157: p_commit => FND_API.g_false,
158: p_validation_level => FND_API.g_valid_level_full,
159:
160: p_list_name => p_list_name,
153:
154: AMS_LISTGENERATION_PKG.create_list_from_query(
155: p_api_version => p_api_version,
156: p_init_msg_list => FND_API.g_false,
157: p_commit => FND_API.g_false,
158: p_validation_level => FND_API.g_valid_level_full,
159:
160: p_list_name => p_list_name,
161: p_list_type => p_list_type,
154: AMS_LISTGENERATION_PKG.create_list_from_query(
155: p_api_version => p_api_version,
156: p_init_msg_list => FND_API.g_false,
157: p_commit => FND_API.g_false,
158: p_validation_level => FND_API.g_valid_level_full,
159:
160: p_list_name => p_list_name,
161: p_list_type => p_list_type,
162: p_owner_user_id => p_owner_user_id,
171:
172: );
173:
174:
175: IF l_return_status = FND_API.g_ret_sts_error THEN
176: RAISE FND_API.g_exc_error;
177: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
178: RAISE FND_API.g_exc_unexpected_error;
179: END IF;
172: );
173:
174:
175: IF l_return_status = FND_API.g_ret_sts_error THEN
176: RAISE FND_API.g_exc_error;
177: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
178: RAISE FND_API.g_exc_unexpected_error;
179: END IF;
180:
173:
174:
175: IF l_return_status = FND_API.g_ret_sts_error THEN
176: RAISE FND_API.g_exc_error;
177: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
178: RAISE FND_API.g_exc_unexpected_error;
179: END IF;
180:
181: IF FND_API.to_boolean(p_commit) THEN
174:
175: IF l_return_status = FND_API.g_ret_sts_error THEN
176: RAISE FND_API.g_exc_error;
177: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
178: RAISE FND_API.g_exc_unexpected_error;
179: END IF;
180:
181: IF FND_API.to_boolean(p_commit) THEN
182: COMMIT;
177: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
178: RAISE FND_API.g_exc_unexpected_error;
179: END IF;
180:
181: IF FND_API.to_boolean(p_commit) THEN
182: COMMIT;
183: END IF;
184: x_return_status := FND_API.g_ret_sts_success;
185: FND_MSG_PUB.count_and_get(
180:
181: IF FND_API.to_boolean(p_commit) THEN
182: COMMIT;
183: END IF;
184: x_return_status := FND_API.g_ret_sts_success;
185: FND_MSG_PUB.count_and_get(
186: p_encoded => FND_API.g_false,
187: p_count => x_msg_count,
188: p_data => x_msg_data
182: COMMIT;
183: END IF;
184: x_return_status := FND_API.g_ret_sts_success;
185: FND_MSG_PUB.count_and_get(
186: p_encoded => FND_API.g_false,
187: p_count => x_msg_count,
188: p_data => x_msg_data
189: );
190:
189: );
190:
191: EXCEPTION
192:
193: WHEN FND_API.g_exc_error THEN
194: ROLLBACK TO create_list_from_query_pub;
195: x_return_status := FND_API.g_ret_sts_error;
196: FND_MSG_PUB.count_and_get(
197: p_encoded => FND_API.g_false,
191: EXCEPTION
192:
193: WHEN FND_API.g_exc_error THEN
194: ROLLBACK TO create_list_from_query_pub;
195: x_return_status := FND_API.g_ret_sts_error;
196: FND_MSG_PUB.count_and_get(
197: p_encoded => FND_API.g_false,
198: p_count => x_msg_count,
199: p_data => x_msg_data
193: WHEN FND_API.g_exc_error THEN
194: ROLLBACK TO create_list_from_query_pub;
195: x_return_status := FND_API.g_ret_sts_error;
196: FND_MSG_PUB.count_and_get(
197: p_encoded => FND_API.g_false,
198: p_count => x_msg_count,
199: p_data => x_msg_data
200: );
201:
198: p_count => x_msg_count,
199: p_data => x_msg_data
200: );
201:
202: WHEN FND_API.g_exc_unexpected_error THEN
203: ROLLBACK TO create_list_from_query_pub;
204: x_return_status := FND_API.g_ret_sts_unexp_error ;
205: FND_MSG_PUB.count_and_get(
206: p_encoded => FND_API.g_false,
200: );
201:
202: WHEN FND_API.g_exc_unexpected_error THEN
203: ROLLBACK TO create_list_from_query_pub;
204: x_return_status := FND_API.g_ret_sts_unexp_error ;
205: FND_MSG_PUB.count_and_get(
206: p_encoded => FND_API.g_false,
207: p_count => x_msg_count,
208: p_data => x_msg_data
202: WHEN FND_API.g_exc_unexpected_error THEN
203: ROLLBACK TO create_list_from_query_pub;
204: x_return_status := FND_API.g_ret_sts_unexp_error ;
205: FND_MSG_PUB.count_and_get(
206: p_encoded => FND_API.g_false,
207: p_count => x_msg_count,
208: p_data => x_msg_data
209: );
210:
210:
211:
212: WHEN OTHERS THEN
213: ROLLBACK TO create_list_from_query_pub;
214: x_return_status := FND_API.g_ret_sts_unexp_error ;
215:
216: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
217: THEN
218: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
218: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
219: END IF;
220:
221: FND_MSG_PUB.count_and_get(
222: p_encoded => FND_API.g_false,
223: p_count => x_msg_count,
224: p_data => x_msg_data
225: );
226: END create_list_from_query;
229:
230:
231: PROCEDURE create_list_from_query
232: ( p_api_version IN NUMBER,
233: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
234: p_commit IN VARCHAR2 := FND_API.G_FALSE,
235: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
236: p_list_name in varchar2,
237: p_list_type in varchar2,
230:
231: PROCEDURE create_list_from_query
232: ( p_api_version IN NUMBER,
233: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
234: p_commit IN VARCHAR2 := FND_API.G_FALSE,
235: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
236: p_list_name in varchar2,
237: p_list_type in varchar2,
238: p_owner_user_id in number,
231: PROCEDURE create_list_from_query
232: ( p_api_version IN NUMBER,
233: p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE,
234: p_commit IN VARCHAR2 := FND_API.G_FALSE,
235: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
236: p_list_name in varchar2,
237: p_list_type in varchar2,
238: p_owner_user_id in number,
239: p_list_header_id in number,
258: SAVEPOINT create_list_from_query_pub;
259:
260: -- initialize the message list;
261: -- won't do it again when calling private API
262: IF FND_API.to_boolean(p_init_msg_list) THEN
263: FND_MSG_PUB.initialize;
264: END IF;
265:
266: AMS_LISTGENERATION_PKG.create_list_from_query(
264: END IF;
265:
266: AMS_LISTGENERATION_PKG.create_list_from_query(
267: p_api_version => p_api_version,
268: p_init_msg_list => FND_API.g_false,
269: p_commit => FND_API.g_false,
270: p_validation_level => FND_API.g_valid_level_full,
271:
272: p_list_name => p_list_name,
265:
266: AMS_LISTGENERATION_PKG.create_list_from_query(
267: p_api_version => p_api_version,
268: p_init_msg_list => FND_API.g_false,
269: p_commit => FND_API.g_false,
270: p_validation_level => FND_API.g_valid_level_full,
271:
272: p_list_name => p_list_name,
273: p_list_type => p_list_type,
266: AMS_LISTGENERATION_PKG.create_list_from_query(
267: p_api_version => p_api_version,
268: p_init_msg_list => FND_API.g_false,
269: p_commit => FND_API.g_false,
270: p_validation_level => FND_API.g_valid_level_full,
271:
272: p_list_name => p_list_name,
273: p_list_type => p_list_type,
274: p_owner_user_id => p_owner_user_id,
285:
286: );
287:
288:
289: IF l_return_status = FND_API.g_ret_sts_error THEN
290: RAISE FND_API.g_exc_error;
291: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
292: RAISE FND_API.g_exc_unexpected_error;
293: END IF;
286: );
287:
288:
289: IF l_return_status = FND_API.g_ret_sts_error THEN
290: RAISE FND_API.g_exc_error;
291: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
292: RAISE FND_API.g_exc_unexpected_error;
293: END IF;
294:
287:
288:
289: IF l_return_status = FND_API.g_ret_sts_error THEN
290: RAISE FND_API.g_exc_error;
291: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
292: RAISE FND_API.g_exc_unexpected_error;
293: END IF;
294:
295: IF FND_API.to_boolean(p_commit) THEN
288:
289: IF l_return_status = FND_API.g_ret_sts_error THEN
290: RAISE FND_API.g_exc_error;
291: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
292: RAISE FND_API.g_exc_unexpected_error;
293: END IF;
294:
295: IF FND_API.to_boolean(p_commit) THEN
296: COMMIT;
291: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
292: RAISE FND_API.g_exc_unexpected_error;
293: END IF;
294:
295: IF FND_API.to_boolean(p_commit) THEN
296: COMMIT;
297: END IF;
298: x_return_status := FND_API.g_ret_sts_success;
299: FND_MSG_PUB.count_and_get(
294:
295: IF FND_API.to_boolean(p_commit) THEN
296: COMMIT;
297: END IF;
298: x_return_status := FND_API.g_ret_sts_success;
299: FND_MSG_PUB.count_and_get(
300: p_encoded => FND_API.g_false,
301: p_count => x_msg_count,
302: p_data => x_msg_data
296: COMMIT;
297: END IF;
298: x_return_status := FND_API.g_ret_sts_success;
299: FND_MSG_PUB.count_and_get(
300: p_encoded => FND_API.g_false,
301: p_count => x_msg_count,
302: p_data => x_msg_data
303: );
304:
303: );
304:
305: EXCEPTION
306:
307: WHEN FND_API.g_exc_error THEN
308: ROLLBACK TO create_list_from_query_pub;
309: x_return_status := FND_API.g_ret_sts_error;
310: FND_MSG_PUB.count_and_get(
311: p_encoded => FND_API.g_false,
305: EXCEPTION
306:
307: WHEN FND_API.g_exc_error THEN
308: ROLLBACK TO create_list_from_query_pub;
309: x_return_status := FND_API.g_ret_sts_error;
310: FND_MSG_PUB.count_and_get(
311: p_encoded => FND_API.g_false,
312: p_count => x_msg_count,
313: p_data => x_msg_data
307: WHEN FND_API.g_exc_error THEN
308: ROLLBACK TO create_list_from_query_pub;
309: x_return_status := FND_API.g_ret_sts_error;
310: FND_MSG_PUB.count_and_get(
311: p_encoded => FND_API.g_false,
312: p_count => x_msg_count,
313: p_data => x_msg_data
314: );
315:
312: p_count => x_msg_count,
313: p_data => x_msg_data
314: );
315:
316: WHEN FND_API.g_exc_unexpected_error THEN
317: ROLLBACK TO create_list_from_query_pub;
318: x_return_status := FND_API.g_ret_sts_unexp_error ;
319: FND_MSG_PUB.count_and_get(
320: p_encoded => FND_API.g_false,
314: );
315:
316: WHEN FND_API.g_exc_unexpected_error THEN
317: ROLLBACK TO create_list_from_query_pub;
318: x_return_status := FND_API.g_ret_sts_unexp_error ;
319: FND_MSG_PUB.count_and_get(
320: p_encoded => FND_API.g_false,
321: p_count => x_msg_count,
322: p_data => x_msg_data
316: WHEN FND_API.g_exc_unexpected_error THEN
317: ROLLBACK TO create_list_from_query_pub;
318: x_return_status := FND_API.g_ret_sts_unexp_error ;
319: FND_MSG_PUB.count_and_get(
320: p_encoded => FND_API.g_false,
321: p_count => x_msg_count,
322: p_data => x_msg_data
323: );
324:
324:
325:
326: WHEN OTHERS THEN
327: ROLLBACK TO create_list_from_query_pub;
328: x_return_status := FND_API.g_ret_sts_unexp_error ;
329:
330: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
331: THEN
332: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
332: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
333: END IF;
334:
335: FND_MSG_PUB.count_and_get(
336: p_encoded => FND_API.g_false,
337: p_count => x_msg_count,
338: p_data => x_msg_data
339: );
340: END create_list_from_query;