1: PACKAGE BODY OKL_SETUPTQUALITYS_PUB AS
2: /* $Header: OKLPSTQB.pls 115.6 2004/04/13 11:22:09 rnaik noship $ */
3:
4: ---------------------------------------------------------------------------
5: -- PROCEDURE get_rec for: OKL_PTL_QUALITYS_V
112:
113: WHEN OTHERS THEN
114: -- notify caller of an UNEXPECTED error
115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
116: FND_MSG_PUB.ADD_EXC_MSG('OKL_SETUPTQUALITYS_PUB','insert_tqualitys');
117:
118: -- store SQL error message on message stack for caller
119: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
120: p_count => x_msg_count,
191:
192: WHEN OTHERS THEN
193: -- notify caller of an UNEXPECTED error
194: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
195: FND_MSG_PUB.ADD_EXC_MSG('OKL_SETUPTQUALITYS_PUB','update_tqualitys');
196:
197: -- store SQL error message on message stack for caller
198: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE,
199: p_count => x_msg_count,
199: p_count => x_msg_count,
200: p_data => x_msg_data);
201: END update_tqualitys;
202:
203: END OKL_SETUPTQUALITYS_PUB;