[Home] [Help]
252: FND_MSG_PUB.initialize;
253: END IF;
254:
255: -- initialize API return status to success
256: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
257:
258: IF p_document_type = 'PACK_TYPE' THEN
259: OPEN document_csr_del;
260: FETCH document_csr_del INTO x_document_rec;
266: END IF;
267:
268: EXCEPTION
269: WHEN FND_API.g_exc_error THEN
270: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
271: FND_MSG_PUB.count_and_get ( p_count => x_msg_count
272: , p_data => x_msg_data );
273: IF document_csr_del%ISOPEN THEN
274: CLOSE document_csr_del;
277: CLOSE document_csr_leg;
278: END IF;
279:
280: WHEN FND_API.g_exc_unexpected_error THEN
281: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
282: FND_MSG_PUB.count_and_get ( p_count => x_msg_count
283: , p_data => x_msg_data );
284: IF document_csr_del%ISOPEN THEN
285: CLOSE document_csr_del;
292: FND_MESSAGE.set_name('WSH', 'WSH_UNEXP_ERROR');
293: FND_MESSAGE.set_token('PACKAGE',g_pkg_name);
294: FND_MESSAGE.set_token('ORA_ERROR',to_char(sqlcode));
295: FND_MESSAGE.set_token('ORA_TEXT','Failure in performing action');
296: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
297: WSH_UTIL_CORE.add_message (x_return_status);
298: IF FND_MSG_PUB.check_msg_level THEN
299: FND_MSG_PUB.count_and_get ( p_count => x_msg_count
300: , p_data => x_msg_data );
293: FND_MESSAGE.set_token('PACKAGE',g_pkg_name);
294: FND_MESSAGE.set_token('ORA_ERROR',to_char(sqlcode));
295: FND_MESSAGE.set_token('ORA_TEXT','Failure in performing action');
296: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
297: WSH_UTIL_CORE.add_message (x_return_status);
298: IF FND_MSG_PUB.check_msg_level THEN
299: FND_MSG_PUB.count_and_get ( p_count => x_msg_count
300: , p_data => x_msg_data );
301: END IF;