The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_exclusion_hist(
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_iehv_rec IN iehv_rec_type
,x_iehv_rec OUT NOCOPY iehv_rec_type) IS
l_api_version NUMBER ;
SAVEPOINT exclusion_hist_insert;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'B', 'C')) THEN
iex_exclusion_hist_cuhk.insert_exclusion_hist_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_iehv_rec => lp_iehv_rec
,x_iehv_rec => lx_iehv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'B', 'V')) THEN
iex_exclusion_hist_vuhk.insert_exclusion_hist_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_iehv_rec => lp_iehv_rec
,x_iehv_rec => lx_iehv_rec );
iex_ieh_pvt.insert_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_iehv_rec
,lx_iehv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'A', 'V')) THEN
iex_exclusion_hist_vuhk.insert_exclusion_hist_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_iehv_rec => lp_iehv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'A', 'C')) THEN
iex_exclusion_hist_cuhk.insert_exclusion_hist_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_iehv_rec => lp_iehv_rec);
ROLLBACK TO exclusion_hist_insert;
ROLLBACK TO exclusion_hist_insert;
ROLLBACK TO exclusion_hist_insert;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','insert_exclusion_hist');
END insert_exclusion_hist;
PROCEDURE insert_exclusion_hist(
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_iehv_tbl IN iehv_tbl_type
,x_iehv_tbl OUT NOCOPY iehv_tbl_type) IS
l_api_version NUMBER;
SAVEPOINT exclusion_hist_insert;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'B', 'C')) THEN
iex_exclusion_hist_cuhk.insert_exclusion_hist_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_iehv_tbl => lp_iehv_tbl
,x_iehv_tbl => lx_iehv_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'B', 'V')) THEN
iex_exclusion_hist_vuhk.insert_exclusion_hist_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_iehv_tbl => lp_iehv_tbl
,x_iehv_tbl => lx_iehv_tbl);
iex_ieh_pvt.insert_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_iehv_tbl
,lx_iehv_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'A', 'V')) THEN
iex_exclusion_hist_vuhk.insert_exclusion_hist_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_iehv_tbl => lp_iehv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_exclusion_hist', 'A', 'C')) THEN
iex_exclusion_hist_cuhk.insert_exclusion_hist_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_iehv_tbl => lp_iehv_tbl) ;
ROLLBACK TO exclusion_hist_insert;
ROLLBACK TO exclusion_hist_insert;
ROLLBACK TO exclusion_hist_insert;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','insert_exclusion_hist');
END insert_exclusion_hist;
PROCEDURE update_exclusion_hist(
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_iehv_rec IN iehv_rec_type
,x_iehv_rec OUT NOCOPY iehv_rec_type) IS
l_api_version NUMBER ;
SAVEPOINT exclusion_hist_update;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'B', 'C')) THEN
iex_exclusion_hist_cuhk.update_exclusion_hist_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_iehv_rec => lp_iehv_rec
,x_iehv_rec => lx_iehv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'B', 'V')) THEN
iex_exclusion_hist_vuhk.update_exclusion_hist_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_iehv_rec => lp_iehv_rec
,x_iehv_rec => lx_iehv_rec) ;
iex_ieh_pvt.update_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_iehv_rec
,lx_iehv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'A', 'V')) THEN
iex_exclusion_hist_vuhk.update_exclusion_hist_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_iehv_rec => lp_iehv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'A', 'C')) THEN
iex_exclusion_hist_cuhk.update_exclusion_hist_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_iehv_rec => lp_iehv_rec) ;
ROLLBACK TO exclusion_hist_update;
ROLLBACK TO exclusion_hist_update;
ROLLBACK TO exclusion_hist_update;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','update_exclusion_hist');
END update_exclusion_hist;
PROCEDURE update_exclusion_hist(
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_iehv_tbl IN iehv_tbl_type
,x_iehv_tbl OUT NOCOPY iehv_tbl_type) IS
l_api_version NUMBER;
SAVEPOINT exclusion_hist_update;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'B', 'C')) THEN
iex_exclusion_hist_cuhk.update_exclusion_hist_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_iehv_tbl => lp_iehv_tbl
,x_iehv_tbl => lx_iehv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'B', 'V')) THEN
iex_exclusion_hist_vuhk.update_exclusion_hist_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_iehv_tbl => lp_iehv_tbl
,x_iehv_tbl => lx_iehv_tbl) ;
iex_ieh_pvt.update_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_iehv_tbl
,lx_iehv_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'A', 'V')) THEN
iex_exclusion_hist_vuhk.update_exclusion_hist_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_iehv_tbl => lp_iehv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_exclusion_hist', 'A', 'C')) THEN
iex_exclusion_hist_cuhk.update_exclusion_hist_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_iehv_tbl => lp_iehv_tbl) ;
ROLLBACK TO exclusion_hist_update;
ROLLBACK TO exclusion_hist_update;
ROLLBACK TO exclusion_hist_update;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','update_exclusion_hist');
END update_exclusion_hist;
PROCEDURE delete_exclusion_hist(
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_iehv_rec IN iehv_rec_type) IS
i NUMBER :=0;
SAVEPOINT exclusion_hist_delete_rec;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'B', 'C')) THEN
iex_exclusion_hist_cuhk.delete_exclusion_hist_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_iehv_rec => lp_iehv_rec
,x_iehv_rec => lx_iehv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'B', 'V')) THEN
iex_exclusion_hist_vuhk.delete_exclusion_hist_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_iehv_rec => lp_iehv_rec
,x_iehv_rec => lx_iehv_rec) ;
iex_ieh_pvt.delete_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_iehv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'A', 'V')) THEN
iex_exclusion_hist_vuhk.delete_exclusion_hist_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_iehv_rec => lp_iehv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'A', 'C')) THEN
iex_exclusion_hist_cuhk.delete_exclusion_hist_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_iehv_rec => lp_iehv_rec) ;
ROLLBACK TO exclusion_hist_delete_rec;
ROLLBACK TO exclusion_hist_delete_rec;
ROLLBACK TO exclusion_hist_delete_rec;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','delete_exclusion_hist');
END delete_exclusion_hist;
PROCEDURE delete_exclusion_hist(
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_iehv_tbl IN iehv_tbl_type) IS
i NUMBER := 0;
SAVEPOINT exclusion_hist_delete_tbl;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'B', 'C')) THEN
iex_exclusion_hist_cuhk.delete_exclusion_hist_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_iehv_tbl => lp_iehv_tbl
,x_iehv_tbl => lx_iehv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'B', 'V')) THEN
iex_exclusion_hist_vuhk.delete_exclusion_hist_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_iehv_tbl => lp_iehv_tbl
,x_iehv_tbl => lx_iehv_tbl) ;
delete_exclusion_hist(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_iehv_tbl(i));
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'A', 'V')) THEN
iex_exclusion_hist_vuhk.delete_exclusion_hist_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_iehv_tbl => lp_iehv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_exclusion_hist', 'A', 'C')) THEN
iex_exclusion_hist_cuhk.delete_exclusion_hist_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_iehv_tbl => lp_iehv_tbl) ;
ROLLBACK TO exclusion_hist_delete_tbl;
ROLLBACK TO exclusion_hist_delete_tbl;
ROLLBACK TO exclusion_hist_delete_tbl;
FND_MSG_PUB.ADD_EXC_MSG('IEX_EXCLUSION_HIST_PUB','delete_exclusion_hist');
END delete_exclusion_hist;