1: Package Body OKL_AM_RV_WRITEDOWN_PUB AS
2: /* $Header: OKLPRVWB.pls 115.7 2004/04/13 11:04:07 rnaik noship $ */
3:
4: PROCEDURE create_residual_value_trx( p_api_version IN NUMBER,
5: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
88: ROLLBACK TO trx_create_residual_value_trx;
89: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
90: x_msg_count := l_msg_count ;
91: x_msg_data := l_msg_data ;
92: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_RV_WRITEDOWN_PUB','create_residual_value_trx');
93: FND_MSG_PUB.count_and_get(
94: p_count => x_msg_count
95: ,p_data => x_msg_data);
96: END create_residual_value_trx;
97:
98:
99:
100:
101: END OKL_AM_RV_WRITEDOWN_PUB;