The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_ext_agncy(
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_ieav_rec IN ieav_rec_type
,x_ieav_rec OUT NOCOPY ieav_rec_type) AS
l_api_version NUMBER ;
SAVEPOINT ext_agncy_insert;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'B', 'C')) THEN
iex_ext_agncy_cuhk.insert_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec
,x_ieav_rec => lx_ieav_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'B', 'V')) THEN
iex_ext_agncy_vuhk.insert_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec
,x_ieav_rec => lx_ieav_rec );
iex_iea_pvt.insert_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_ieav_rec
,lx_ieav_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'A', 'V')) THEN
iex_ext_agncy_vuhk.insert_ext_agncy_post(
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'A', 'C')) THEN
iex_ext_agncy_cuhk.insert_ext_agncy_post(
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec);
ROLLBACK TO ext_agncy_insert;
ROLLBACK TO ext_agncy_insert;
ROLLBACK TO ext_agncy_insert;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXT_AGNCY_PUB','insert_ext_agncy');
END insert_ext_agncy;
PROCEDURE insert_ext_agncy(
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_ieav_tbl IN ieav_tbl_type
,x_ieav_tbl OUT NOCOPY ieav_tbl_type) AS
l_api_version NUMBER;
SAVEPOINT ext_agncy_insert;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'B', 'C')) THEN
iex_ext_agncy_cuhk.insert_ext_agncy_pre(
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl
,x_ieav_tbl => lx_ieav_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'B', 'V')) THEN
iex_ext_agncy_vuhk.insert_ext_agncy_pre(
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl
,x_ieav_tbl => lx_ieav_tbl);
iex_iea_pvt.insert_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_ieav_tbl
,lx_ieav_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'A', 'V')) THEN
iex_ext_agncy_vuhk.insert_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_ext_agncy', 'A', 'C')) THEN
iex_ext_agncy_cuhk.insert_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl) ;
ROLLBACK TO ext_agncy_insert;
ROLLBACK TO ext_agncy_insert;
ROLLBACK TO ext_agncy_insert;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXT_AGNCY_PUB','insert_ext_agncy');
END insert_ext_agncy;
PROCEDURE update_ext_agncy(
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_ieav_rec IN ieav_rec_type
,x_ieav_rec OUT NOCOPY ieav_rec_type) AS
l_api_version NUMBER ;
SAVEPOINT ext_agncy_update;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'B', 'C')) THEN
iex_ext_agncy_cuhk.update_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec
,x_ieav_rec => lx_ieav_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'B', 'V')) THEN
iex_ext_agncy_vuhk.update_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec
,x_ieav_rec => lx_ieav_rec) ;
iex_iea_pvt.update_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_ieav_rec
,lx_ieav_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'A', 'V')) THEN
iex_ext_agncy_vuhk.update_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'A', 'C')) THEN
iex_ext_agncy_cuhk.update_ext_agncy_post (
p_init_msg_list=>l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec) ;
ROLLBACK TO ext_agncy_update;
ROLLBACK TO ext_agncy_update;
ROLLBACK TO ext_agncy_update;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXT_AGNCY_PUB','update_ext_agncy');
END update_ext_agncy;
PROCEDURE update_ext_agncy(
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_ieav_tbl IN ieav_tbl_type
,x_ieav_tbl OUT NOCOPY ieav_tbl_type) AS
l_api_version NUMBER;
SAVEPOINT ext_agncy_update;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'B', 'C')) THEN
iex_ext_agncy_cuhk.update_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl
,x_ieav_tbl => lx_ieav_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'B', 'V')) THEN
iex_ext_agncy_vuhk.update_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl
,x_ieav_tbl => lx_ieav_tbl) ;
iex_iea_pvt.update_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_ieav_tbl
,lx_ieav_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'A', 'V')) THEN
iex_ext_agncy_vuhk.update_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_ext_agncy', 'A', 'C')) THEN
iex_ext_agncy_cuhk.update_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl) ;
ROLLBACK TO ext_agncy_update;
ROLLBACK TO ext_agncy_update;
ROLLBACK TO ext_agncy_update;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXT_AGNCY_PUB','update_ext_agncy');
END update_ext_agncy;
PROCEDURE delete_ext_agncy(
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_ieav_rec IN ieav_rec_type) AS
i NUMBER :=0;
SAVEPOINT ext_agncy_delete_rec;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'B', 'C')) THEN
iex_ext_agncy_cuhk.delete_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec
,x_ieav_rec => lx_ieav_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'B', 'V')) THEN
iex_ext_agncy_vuhk.delete_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec
,x_ieav_rec => lx_ieav_rec) ;
iex_iea_pvt.delete_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_ieav_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'A', 'V')) THEN
iex_ext_agncy_vuhk.delete_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'A', 'C')) THEN
iex_ext_agncy_cuhk.delete_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_rec => lp_ieav_rec) ;
ROLLBACK TO ext_agncy_delete_rec;
ROLLBACK TO ext_agncy_delete_rec;
ROLLBACK TO ext_agncy_delete_rec;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXT_AGNCY_PUB','delete_ext_agncy');
END delete_ext_agncy;
PROCEDURE delete_ext_agncy(
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_ieav_tbl IN ieav_tbl_type) AS
i NUMBER := 0;
SAVEPOINT ext_agncy_delete_tbl;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'B', 'C')) THEN
iex_ext_agncy_cuhk.delete_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl
,x_ieav_tbl => lx_ieav_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'B', 'V')) THEN
iex_ext_agncy_vuhk.delete_ext_agncy_pre (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl
,x_ieav_tbl => lx_ieav_tbl) ;
delete_ext_agncy(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_ieav_tbl(i));
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'A', 'V')) THEN
iex_ext_agncy_vuhk.delete_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_ext_agncy', 'A', 'C')) THEN
iex_ext_agncy_cuhk.delete_ext_agncy_post (
p_init_msg_list => l_init_msg_list
,x_msg_data => l_msg_data
,x_msg_count => l_msg_count
,x_return_status => l_return_status
,p_ieav_tbl => lp_ieav_tbl) ;
ROLLBACK TO ext_agncy_delete_tbl;
ROLLBACK TO ext_agncy_delete_tbl;
ROLLBACK TO ext_agncy_delete_tbl;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXT_AGNCY_PUB','delete_ext_agncy');
END delete_ext_agncy;