243: WHEN table_not_found THEN
244: NULL;
245: WHEN OTHERS THEN
246: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_ERROR ) THEN
247: FND_MESSAGE.set_name('OKE','OKE_VERS_SQL_ERROR');
248: FND_MESSAGE.set_token('NUM', (-1) * sqlcode);
249: FND_MESSAGE.set_token('TABLE', p_table_name);
250: FND_MSG_PUB.add;
251: END IF;
244: NULL;
245: WHEN OTHERS THEN
246: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_ERROR ) THEN
247: FND_MESSAGE.set_name('OKE','OKE_VERS_SQL_ERROR');
248: FND_MESSAGE.set_token('NUM', (-1) * sqlcode);
249: FND_MESSAGE.set_token('TABLE', p_table_name);
250: FND_MSG_PUB.add;
251: END IF;
252: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
245: WHEN OTHERS THEN
246: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_ERROR ) THEN
247: FND_MESSAGE.set_name('OKE','OKE_VERS_SQL_ERROR');
248: FND_MESSAGE.set_token('NUM', (-1) * sqlcode);
249: FND_MESSAGE.set_token('TABLE', p_table_name);
250: FND_MSG_PUB.add;
251: END IF;
252: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
253: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,statement);
422: WHEN table_not_found THEN
423: NULL;
424: WHEN OTHERS THEN
425: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_ERROR ) THEN
426: FND_MESSAGE.set_name('OKE','OKE_VERS_SQL_ERROR');
427: FND_MESSAGE.set_token('NUM', sqlcode);
428: FND_MESSAGE.set_token('TABLE', p_table_name);
429: FND_MSG_PUB.add;
430: END IF;
423: NULL;
424: WHEN OTHERS THEN
425: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_ERROR ) THEN
426: FND_MESSAGE.set_name('OKE','OKE_VERS_SQL_ERROR');
427: FND_MESSAGE.set_token('NUM', sqlcode);
428: FND_MESSAGE.set_token('TABLE', p_table_name);
429: FND_MSG_PUB.add;
430: END IF;
431: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
424: WHEN OTHERS THEN
425: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_ERROR ) THEN
426: FND_MESSAGE.set_name('OKE','OKE_VERS_SQL_ERROR');
427: FND_MESSAGE.set_token('NUM', sqlcode);
428: FND_MESSAGE.set_token('TABLE', p_table_name);
429: FND_MSG_PUB.add;
430: END IF;
431: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
432: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,statement);
518: IF cvmv%notfound THEN
519: CLOSE cvmv;
520: ROLLBACK TO version_contract_pvt;
521: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_ERROR ) THEN
522: FND_MESSAGE.set_name('OKE','OKE_VERS_INVALID_CONTRACT');
523: FND_MSG_PUB.add;
524: END IF;
525: x_return_status := FND_API.G_RET_STS_ERROR;
526: RAISE FND_API.G_EXC_ERROR;