The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE update_cntrct_prtfl(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_contract_id IN NUMBER DEFAULT NULL,
x_total_count OUT NOCOPY NUMBER,
x_processed_count OUT NOCOPY NUMBER,
x_error_count OUT NOCOPY NUMBER)
AS
l_api_version NUMBER ;
SAVEPOINT trx_update_cntrct_prtfl;
OKL_AM_CONTRACT_PRTFL_PVT.update_cntrct_prtfl(
p_api_version => l_api_version
,p_init_msg_list => l_init_msg_list
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data
,p_contract_id => lp_contract_id,
x_total_count => lx_total_count,
x_processed_count => lx_processed_count,
x_error_count => lx_error_count) ;
ROLLBACK TO trx_update_cntrct_prtfl;
ROLLBACK TO trx_update_cntrct_prtfl;
ROLLBACK TO trx_update_cntrct_prtfl;
FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_CONTRACT_PRTFL_PUB','update_cntrct_prtfl');
END update_cntrct_prtfl;