The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_NO_UPDATE_ALLOWED_EXCEPTION exception;
G_NO_UPDATE_ALLOWED CONSTANT VARCHAR2(200) := 'OKL_NO_UPDATE_ALLOWED';
PROCEDURE update_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_restricted_update IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
p_chrv_rec IN okl_okc_migration_pvt.chrv_rec_type,
p_khrv_rec IN khrv_rec_type,
x_chrv_rec OUT NOCOPY okl_okc_migration_pvt.chrv_rec_type,
x_khrv_rec OUT NOCOPY khrv_rec_type) IS
l_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_HEADER';
okl_contract_pvt.update_contract_header(
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_restricted_update => p_restricted_update,
p_chrv_rec => l_chrv_rec,
p_khrv_rec => l_khrv_rec,
x_chrv_rec => x_chrv_rec,
x_khrv_rec => x_khrv_rec);
END update_contract_header;
PROCEDURE update_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_restricted_update IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
p_chrv_tbl IN okl_okc_migration_pvt.chrv_tbl_type,
p_khrv_tbl IN khrv_tbl_type,
x_chrv_tbl OUT NOCOPY okl_okc_migration_pvt.chrv_tbl_type,
x_khrv_tbl OUT NOCOPY khrv_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_HEADER';
update_contract_header(
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_restricted_update => p_restricted_update,
p_chrv_rec => p_chrv_tbl(i),
p_khrv_rec => l_khrv_tbl(i),
x_chrv_rec => x_chrv_tbl(i),
x_khrv_rec => x_khrv_tbl(i));
ROLLBACK TO update_contract_header_pub;
FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME, 'update_contract_header');
END update_contract_header;
PROCEDURE update_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_restricted_update IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
p_chrv_rec IN okl_okc_migration_pvt.chrv_rec_type,
p_khrv_rec IN khrv_rec_type,
p_edit_mode IN VARCHAR2,
x_chrv_rec OUT NOCOPY okl_okc_migration_pvt.chrv_rec_type,
x_khrv_rec OUT NOCOPY khrv_rec_type) IS
l_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_HEADER';
okl_contract_pvt.update_contract_header(
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_restricted_update => p_restricted_update,
p_chrv_rec => l_chrv_rec,
p_khrv_rec => l_khrv_rec,
p_edit_mode => p_edit_mode,
x_chrv_rec => x_chrv_rec,
x_khrv_rec => x_khrv_rec);
END update_contract_header;
PROCEDURE delete_contract(
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 okc_k_headers_b.id%type) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT';
okl_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_contract_id => p_contract_id);
END delete_contract;
PROCEDURE delete_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chrv_rec IN okl_okc_migration_pvt.chrv_rec_type,
p_khrv_rec IN khrv_rec_type) IS
l_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_HEADER';
okl_contract_pvt.delete_contract_header(
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 => l_chrv_rec,
p_khrv_rec => l_khrv_rec);
END delete_contract_header;
PROCEDURE delete_contract_header(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chrv_tbl IN okl_okc_migration_pvt.chrv_tbl_type,
p_khrv_tbl IN khrv_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_HEADER';
delete_contract_header(
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_tbl(i),
p_khrv_rec => l_khrv_tbl(i));
END delete_contract_header;
PROCEDURE update_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_clev_rec IN okl_okc_migration_pvt.clev_rec_type,
p_klev_rec IN klev_rec_type,
x_clev_rec OUT NOCOPY okl_okc_migration_pvt.clev_rec_type,
x_klev_rec OUT NOCOPY klev_rec_type) IS
l_clev_rec okl_okc_migration_pvt.clev_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_LINE';
okl_contract_pvt.update_contract_line(
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_clev_rec => l_clev_rec,
p_klev_rec => l_klev_rec,
x_clev_rec => x_clev_rec,
x_klev_rec => x_klev_rec);
END update_contract_line;
PROCEDURE update_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_clev_tbl IN okl_okc_migration_pvt.clev_tbl_type,
p_klev_tbl IN klev_tbl_type,
x_clev_tbl OUT NOCOPY okl_okc_migration_pvt.clev_tbl_type,
x_klev_tbl OUT NOCOPY klev_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_LINE';
update_contract_line(
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_clev_rec => p_clev_tbl(i),
p_klev_rec => l_klev_tbl(i),
x_clev_rec => x_clev_tbl(i),
x_klev_rec => x_klev_tbl(i));
END update_contract_line;
PROCEDURE update_contract_line(
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_clev_rec IN okl_okc_migration_pvt.clev_rec_type,
p_klev_rec IN klev_rec_type,
p_edit_mode IN VARCHAR2,
x_clev_rec OUT NOCOPY okl_okc_migration_pvt.clev_rec_type,
x_klev_rec OUT NOCOPY klev_rec_type) IS
l_clev_rec okl_okc_migration_pvt.clev_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_LINE';
okl_contract_pvt.update_contract_line(
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_clev_rec => l_clev_rec,
p_klev_rec => l_klev_rec,
p_edit_mode => p_edit_mode,
x_clev_rec => x_clev_rec,
x_klev_rec => x_klev_rec);
END update_contract_line;
PROCEDURE update_contract_line(
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_clev_tbl IN okl_okc_migration_pvt.clev_tbl_type,
p_klev_tbl IN klev_tbl_type,
p_edit_mode IN VARCHAR2,
x_clev_tbl OUT NOCOPY okl_okc_migration_pvt.clev_tbl_type,
x_klev_tbl OUT NOCOPY klev_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CONTRACT_LINE';
update_contract_line(
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_clev_rec => p_clev_tbl(i),
p_klev_rec => l_klev_tbl(i),
p_edit_mode => p_edit_mode,
x_clev_rec => x_clev_tbl(i),
x_klev_rec => x_klev_tbl(i));
END update_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_clev_rec IN okl_okc_migration_pvt.clev_rec_type,
p_klev_rec IN klev_rec_type) IS
l_clev_rec okl_okc_migration_pvt.clev_rec_type;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_LINE';
okl_contract_pvt.delete_contract_line(
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_clev_rec => l_clev_rec,
p_klev_rec => l_klev_rec);
END delete_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_clev_tbl IN okl_okc_migration_pvt.clev_tbl_type,
p_klev_tbl IN klev_tbl_type) IS
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_LINE';
delete_contract_line(
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_clev_rec => p_clev_tbl(i),
p_klev_rec => l_klev_tbl(i));
END delete_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_line_id IN NUMBER) IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_LINE';
okl_contract_pvt.delete_contract_line(
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_line_id => p_line_id);
END delete_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_clev_rec IN okl_okc_migration_pvt.clev_rec_type,
p_klev_rec IN klev_rec_type,
p_delete_cascade_yn IN VARCHAR2) is
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_LINE';
OKL_CONTRACT_PVT.delete_contract_line(
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_clev_rec => p_clev_rec,
p_klev_rec => p_klev_rec,
p_delete_cascade_yn => p_delete_cascade_yn);
END delete_contract_line;
PROCEDURE delete_contract_line(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_clev_tbl IN okl_okc_migration_pvt.clev_tbl_type,
p_klev_tbl IN klev_tbl_type,
p_delete_cascade_yn IN varchar2) is
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_CONTRACT_LINE';
OKL_CONTRACT_PVT.delete_contract_line(
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_clev_tbl => p_clev_tbl,
p_klev_tbl => p_klev_tbl,
p_delete_cascade_yn => p_delete_cascade_yn);
END delete_contract_line;
PROCEDURE update_governance(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_gvev_rec IN okl_okc_migration_pvt.gvev_rec_type,
x_gvev_rec OUT NOCOPY okl_okc_migration_pvt.gvev_rec_type)is
begin
okl_contract_pvt.update_governance
(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_gvev_rec => p_gvev_rec,
x_gvev_rec => x_gvev_rec);
PROCEDURE update_governance(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_gvev_tbl IN okl_okc_migration_pvt.gvev_tbl_type,
x_gvev_tbl OUT NOCOPY okl_okc_migration_pvt.gvev_tbl_type)is
begin
okl_contract_pvt.update_governance
(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_gvev_tbl => p_gvev_tbl,
x_gvev_tbl => x_gvev_tbl);
PROCEDURE delete_governance(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_gvev_rec IN okl_okc_migration_pvt.gvev_rec_type)is
begin
okl_contract_pvt.delete_governance
(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_gvev_rec => p_gvev_rec);
PROCEDURE delete_governance(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_gvev_tbl IN okl_okc_migration_pvt.gvev_tbl_type)is
begin
okl_contract_pvt.delete_governance
(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_gvev_tbl => p_gvev_tbl);