The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE insert_repos_objects(
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_repv_rec IN repv_rec_type
,x_repv_rec OUT NOCOPY repv_rec_type) AS
l_api_version NUMBER ;
SAVEPOINT repos_objects_insert;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'B', 'C')) THEN
iex_repos_objects_cuhk.insert_repos_objects_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_repv_rec => lp_repv_rec
,x_repv_rec => lx_repv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'B', 'V')) THEN
iex_repos_objects_vuhk.insert_repos_objects_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_repv_rec => lp_repv_rec
,x_repv_rec => lx_repv_rec );
iex_rep_pvt.insert_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_repv_rec
,lx_repv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'A', 'V')) THEN
iex_repos_objects_vuhk.insert_repos_objects_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_repv_rec => lp_repv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'A', 'C')) THEN
iex_repos_objects_cuhk.insert_repos_objects_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_repv_rec => lp_repv_rec);
ROLLBACK TO repos_objects_insert;
ROLLBACK TO repos_objects_insert;
ROLLBACK TO repos_objects_insert;
FND_MSG_PUB.ADD_EXC_MSG('IEX_REPOS_OBJECTS_PUB','insert_repos_objects');
END insert_repos_objects;
PROCEDURE insert_repos_objects(
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_repv_tbl IN repv_tbl_type
,x_repv_tbl OUT NOCOPY repv_tbl_type) AS
l_api_version NUMBER;
SAVEPOINT repos_objects_insert;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'B', 'C')) THEN
iex_repos_objects_cuhk.insert_repos_objects_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_repv_tbl => lp_repv_tbl
,x_repv_tbl => lx_repv_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'B', 'V')) THEN
iex_repos_objects_vuhk.insert_repos_objects_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_repv_tbl => lp_repv_tbl
,x_repv_tbl => lx_repv_tbl);
iex_rep_pvt.insert_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_repv_tbl
,lx_repv_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'A', 'V')) THEN
iex_repos_objects_vuhk.insert_repos_objects_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_repv_tbl => lp_repv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'insert_repos_objects', 'A', 'C')) THEN
iex_repos_objects_cuhk.insert_repos_objects_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_repv_tbl => lp_repv_tbl) ;
ROLLBACK TO repos_objects_insert;
ROLLBACK TO repos_objects_insert;
ROLLBACK TO repos_objects_insert;
FND_MSG_PUB.ADD_EXC_MSG('IEX_REPOS_OBJECTS_PUB','insert_repos_objects');
END insert_repos_objects;
PROCEDURE update_repos_objects(
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_repv_rec IN repv_rec_type
,x_repv_rec OUT NOCOPY repv_rec_type) AS
l_api_version NUMBER ;
SAVEPOINT repos_objects_update;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'B', 'C')) THEN
iex_repos_objects_cuhk.update_repos_objects_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_repv_rec => lp_repv_rec
,x_repv_rec => lx_repv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'B', 'V')) THEN
iex_repos_objects_vuhk.update_repos_objects_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_repv_rec => lp_repv_rec
,x_repv_rec => lx_repv_rec) ;
iex_rep_pvt.update_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_repv_rec
,lx_repv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'A', 'V')) THEN
iex_repos_objects_vuhk.update_repos_objects_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_repv_rec => lp_repv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'A', 'C')) THEN
iex_repos_objects_cuhk.update_repos_objects_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_repv_rec => lp_repv_rec) ;
ROLLBACK TO repos_objects_update;
ROLLBACK TO repos_objects_update;
ROLLBACK TO repos_objects_update;
FND_MSG_PUB.ADD_EXC_MSG('IEX_REPOS_OBJECTS_PUB','update_repos_objects');
END update_repos_objects;
PROCEDURE update_repos_objects(
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_repv_tbl IN repv_tbl_type
,x_repv_tbl OUT NOCOPY repv_tbl_type) AS
l_api_version NUMBER;
SAVEPOINT repos_objects_update;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'B', 'C')) THEN
iex_repos_objects_cuhk.update_repos_objects_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_repv_tbl => lp_repv_tbl
,x_repv_tbl => lx_repv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'B', 'V')) THEN
iex_repos_objects_vuhk.update_repos_objects_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_repv_tbl => lp_repv_tbl
,x_repv_tbl => lx_repv_tbl) ;
iex_rep_pvt.update_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_repv_tbl
,lx_repv_tbl);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'A', 'V')) THEN
iex_repos_objects_vuhk.update_repos_objects_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_repv_tbl => lp_repv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'update_repos_objects', 'A', 'C')) THEN
iex_repos_objects_cuhk.update_repos_objects_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_repv_tbl => lp_repv_tbl) ;
ROLLBACK TO repos_objects_update;
ROLLBACK TO repos_objects_update;
ROLLBACK TO repos_objects_update;
FND_MSG_PUB.ADD_EXC_MSG('IEX_REPOS_OBJECTS_PUB','update_repos_objects');
END update_repos_objects;
PROCEDURE delete_repos_objects(
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_repv_rec IN repv_rec_type) AS
i NUMBER :=0;
SAVEPOINT repos_objects_delete_rec;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'B', 'C')) THEN
iex_repos_objects_cuhk.delete_repos_objects_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_repv_rec => lp_repv_rec
,x_repv_rec => lx_repv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'B', 'V')) THEN
iex_repos_objects_vuhk.delete_repos_objects_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_repv_rec => lp_repv_rec
,x_repv_rec => lx_repv_rec) ;
iex_rep_pvt.delete_row(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_repv_rec);
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'A', 'V')) THEN
iex_repos_objects_vuhk.delete_repos_objects_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_repv_rec => lp_repv_rec) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'A', 'C')) THEN
iex_repos_objects_cuhk.delete_repos_objects_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_repv_rec => lp_repv_rec) ;
ROLLBACK TO repos_objects_delete_rec;
ROLLBACK TO repos_objects_delete_rec;
ROLLBACK TO repos_objects_delete_rec;
FND_MSG_PUB.ADD_EXC_MSG('IEX_REPOS_OBJECTS_PUB','delete_repos_objects');
END delete_repos_objects;
PROCEDURE delete_repos_objects(
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_repv_tbl IN repv_tbl_type) AS
i NUMBER := 0;
SAVEPOINT repos_objects_delete_tbl;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'B', 'C')) THEN
iex_repos_objects_cuhk.delete_repos_objects_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_repv_tbl => lp_repv_tbl
,x_repv_tbl => lx_repv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'B', 'V')) THEN
iex_repos_objects_vuhk.delete_repos_objects_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_repv_tbl => lp_repv_tbl
,x_repv_tbl => lx_repv_tbl) ;
delete_repos_objects(
l_api_version
,l_init_msg_list
,l_return_status
,l_msg_count
,l_msg_data
,lp_repv_tbl(i));
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'A', 'V')) THEN
iex_repos_objects_vuhk.delete_repos_objects_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_repv_tbl => lp_repv_tbl) ;
IF (JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, 'delete_repos_objects', 'A', 'C')) THEN
iex_repos_objects_cuhk.delete_repos_objects_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_repv_tbl => lp_repv_tbl) ;
ROLLBACK TO repos_objects_delete_tbl;
ROLLBACK TO repos_objects_delete_tbl;
ROLLBACK TO repos_objects_delete_tbl;
FND_MSG_PUB.ADD_EXC_MSG('IEX_REPOS_OBJECTS_PUB','delete_repos_objects');
END delete_repos_objects;