The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE delete_contract(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chrv_rec IN OKC_CONTRACT_PUB.chrv_rec_type ) IS
l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
l_api_name VARCHAR2(30) := 'Delete_Contract';
OKC_DELETE_CONTRACT_PVT.delete_contract(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_chrv_rec => p_chrv_rec);
END Delete_Contract;
PROCEDURE delete_contract(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chrv_tbl IN OKC_CONTRACT_PUB.chrv_tbl_type) IS
i NUMBER := 0;
l_api_name VARCHAR2(30) := 'Delete_Contract';
OKC_DELETE_CONTRACT_PUB.Delete_Contract(
p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_chrv_rec => p_chrv_tbl(i));
END Delete_Contract;