152: );
153: END IF;
154:
155: EXCEPTION
156: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
157: FND_MESSAGE.SET_NAME(application=>'FND',name=>'FND_AS_UNEXPECTED_ERROR');
158: FND_MESSAGE.SET_TOKEN('error_text', SQLERRM(sqlcode));
159: FND_MESSAGE.SET_TOKEN('pkg_name' , G_PKG_NAME);
160: FND_MESSAGE.SET_TOKEN('procedure_name' , l_procedure_name );
503: IF l_debug_level > 0 THEN
504: oe_debug_pub.add('Implicit Acceptance: Process Order Error Msgs -> g_msg_data:'||g_msg_data);
505: END IF;
506: EXCEPTION
507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
508: THEN
509: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
510: g_errbuf := 'Unexpected Error while calling process order API: '||g_msg_data;
511: g_retcode := 2;
505: END IF;
506: EXCEPTION
507: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
508: THEN
509: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
510: g_errbuf := 'Unexpected Error while calling process order API: '||g_msg_data;
511: g_retcode := 2;
512: g_return_status := FND_API.G_RET_STS_UNEXP_ERROR ; --myerrams
513:
508: THEN
509: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
510: g_errbuf := 'Unexpected Error while calling process order API: '||g_msg_data;
511: g_retcode := 2;
512: g_return_status := FND_API.G_RET_STS_UNEXP_ERROR ; --myerrams
513:
514: WHEN FND_API.G_EXC_ERROR
515: THEN
516: -- RAISE FND_API.G_RET_STS_ERROR;
510: g_errbuf := 'Unexpected Error while calling process order API: '||g_msg_data;
511: g_retcode := 2;
512: g_return_status := FND_API.G_RET_STS_UNEXP_ERROR ; --myerrams
513:
514: WHEN FND_API.G_EXC_ERROR
515: THEN
516: -- RAISE FND_API.G_RET_STS_ERROR;
517: g_errbuf := 'Error while calling process order API: '||g_msg_data;
518: g_retcode := 2;
512: g_return_status := FND_API.G_RET_STS_UNEXP_ERROR ; --myerrams
513:
514: WHEN FND_API.G_EXC_ERROR
515: THEN
516: -- RAISE FND_API.G_RET_STS_ERROR;
517: g_errbuf := 'Error while calling process order API: '||g_msg_data;
518: g_retcode := 2;
519: g_return_status := FND_API.G_RET_STS_ERROR;
520:
515: THEN
516: -- RAISE FND_API.G_RET_STS_ERROR;
517: g_errbuf := 'Error while calling process order API: '||g_msg_data;
518: g_retcode := 2;
519: g_return_status := FND_API.G_RET_STS_ERROR;
520:
521: WHEN OTHERS
522: THEN
523: g_errbuf := 'Others Exception while calling process order API: '||g_msg_data;
521: WHEN OTHERS
522: THEN
523: g_errbuf := 'Others Exception while calling process order API: '||g_msg_data;
524: g_retcode := 2;
525: g_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
526: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: -- Do the status processing
528:
529: END call_process_order_api;
522: THEN
523: g_errbuf := 'Others Exception while calling process order API: '||g_msg_data;
524: g_retcode := 2;
525: g_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
526: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
527: -- Do the status processing
528:
529: END call_process_order_api;
530: --=============================================================================