[Home] [Help]
1: PACKAGE BODY OKL_AM_LEASE_LOAN_TRMNT_PUB AS
2: /* $Header: OKLPLLTB.pls 120.3 2007/12/14 13:58:25 nikshah ship $ */
3:
4: -- GLOBAL VARIABLES
5: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
4: -- GLOBAL VARIABLES
5: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
6: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
7: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
8: G_MODULE_NAME CONSTANT VARCHAR2(500) := 'okl.am.plsql.okl_am_lease_loan_trmnt_pub.';
9:
10:
11: PROCEDURE validate_contract(
12: p_api_version IN NUMBER,
117: ROLLBACK TO trx_validate_contract;
118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
119: x_msg_count := l_msg_count ;
120: x_msg_data := l_msg_data ;
121: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_LEASE_LOAN_TRMNT_PUB','validate_contract');
122: FND_MSG_PUB.count_and_get(
123: p_count => x_msg_count
124: ,p_data => x_msg_data);
125: IF (is_debug_exception_on) THEN
298: ROLLBACK TO trx_lease_loan_termination;
299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
300: x_msg_count := l_msg_count ;
301: x_msg_data := l_msg_data ;
302: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_LEASE_LOAN_TRMNT_PUB','lease_loan_termination');
303: FND_MSG_PUB.count_and_get(
304: p_count => x_msg_count
305: ,p_data => x_msg_data);
306: IF (is_debug_exception_on) THEN
416: ROLLBACK TO trx_lease_loan_termination;
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418: x_msg_count := l_msg_count ;
419: x_msg_data := l_msg_data ;
420: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_LEASE_LOAN_TRMNT_PUB','lease_loan_termination');
421: FND_MSG_PUB.count_and_get(
422: p_count => x_msg_count
423: ,p_data => x_msg_data);
424: IF (is_debug_exception_on) THEN
427: END IF;
428: END lease_loan_termination;
429:
430:
431: END OKL_AM_LEASE_LOAN_TRMNT_PUB;