32: l_party_id NUMBER := 1000;
33:
34: BEGIN
35:
36: --Standard Savepoint
37: SAVEPOINT delete_queue_msg;
38:
39: -- Standard call to check for call compatibility.
40: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
35:
36: --Standard Savepoint
37: SAVEPOINT delete_queue_msg;
38:
39: -- Standard call to check for call compatibility.
40: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
41: p_api_version_number,
42: l_api_name,
43: G_PKG_NAME)
241: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
242: raise MOVE_MSG_FAIL;
243: END IF;
244:
245: --Standard check of p_commit
246: IF FND_API.to_Boolean(p_commit) THEN
247: COMMIT WORK;
248: END IF;
249:
298: l_moved_message_count NUMBER := 0;
299:
300: BEGIN
301:
302: --Standard Savepoint
303: SAVEPOINT delete_queue_msg_batch;
304:
305: -- Standard call to check for call compatibility.
306: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
301:
302: --Standard Savepoint
303: SAVEPOINT delete_queue_msg_batch;
304:
305: -- Standard call to check for call compatibility.
306: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
307: p_api_version_number,
308: l_api_name,
309: G_PKG_NAME)
339:
340: x_moved_message_count := l_moved_message_count;
341:
342:
343: --Standard check of p_commit
344: IF FND_API.to_Boolean(p_commit) THEN
345: COMMIT WORK;
346: END IF;
347: