The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
bnft_prvdr_pool_id,
effective_start_date,
effective_end_date,
name,
pgm_pool_flag,
excs_alwys_fftd_flag,
use_for_pgm_pool_flag,
pct_rndg_cd,
pct_rndg_rl,
val_rndg_cd,
val_rndg_rl,
dflt_excs_trtmt_cd,
dflt_excs_trtmt_rl,
rlovr_rstrcn_cd,
no_mn_dstrbl_pct_flag,
no_mn_dstrbl_val_flag,
no_mx_dstrbl_pct_flag,
no_mx_dstrbl_val_flag,
auto_alct_excs_flag,
alws_ngtv_crs_flag ,
uses_net_crs_mthd_flag,
mx_dfcit_pct_pool_crs_num ,
mx_dfcit_pct_comp_num ,
comp_lvl_fctr_id,
mn_dstrbl_pct_num,
mn_dstrbl_val,
mx_dstrbl_pct_num,
mx_dstrbl_val,
excs_trtmt_cd,
ptip_id,
plip_id,
pgm_id,
oiplip_id,
cmbn_plip_id,
cmbn_ptip_id,
cmbn_ptip_opt_id,
business_group_id,
bpp_attribute_category,
bpp_attribute1,
bpp_attribute2,
bpp_attribute3,
bpp_attribute4,
bpp_attribute5,
bpp_attribute6,
bpp_attribute7,
bpp_attribute8,
bpp_attribute9,
bpp_attribute10,
bpp_attribute11,
bpp_attribute12,
bpp_attribute13,
bpp_attribute14,
bpp_attribute15,
bpp_attribute16,
bpp_attribute17,
bpp_attribute18,
bpp_attribute19,
bpp_attribute20,
bpp_attribute21,
bpp_attribute22,
bpp_attribute23,
bpp_attribute24,
bpp_attribute25,
bpp_attribute26,
bpp_attribute27,
bpp_attribute28,
bpp_attribute29,
bpp_attribute30,
object_version_number
from ben_bnft_prvdr_pool_f
where bnft_prvdr_pool_id = p_bnft_prvdr_pool_id
and p_effective_date
between effective_start_date and effective_end_date;
p_delete out nocopy boolean,
p_future_change out nocopy boolean,
p_delete_next_change out nocopy boolean) is
--
l_proc varchar2(72) := g_package||'find_dt_del_modes';
select t.pgm_id,
t.plip_id,
t.ptip_id,
t.cmbn_plip_id,
t.cmbn_ptip_id,
t.cmbn_ptip_opt_id,
t.oiplip_id
from ben_bnft_prvdr_pool_f t
where t.bnft_prvdr_pool_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
p_delete => p_delete,
p_future_change => p_future_change,
p_delete_next_change => p_delete_next_change);
p_update out nocopy boolean,
p_update_override out nocopy boolean,
p_update_change_insert out nocopy boolean) is
--
l_proc varchar2(72) := g_package||'find_dt_upd_modes';
p_update => p_update,
p_update_override => p_update_override,
p_update_change_insert => p_update_change_insert);
update ben_bnft_prvdr_pool_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.bnft_prvdr_pool_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
bnft_prvdr_pool_id,
effective_start_date,
effective_end_date,
name,
pgm_pool_flag,
excs_alwys_fftd_flag,
use_for_pgm_pool_flag,
pct_rndg_cd,
pct_rndg_rl,
val_rndg_cd,
val_rndg_rl,
dflt_excs_trtmt_cd,
dflt_excs_trtmt_rl,
rlovr_rstrcn_cd,
no_mn_dstrbl_pct_flag,
no_mn_dstrbl_val_flag,
no_mx_dstrbl_pct_flag,
no_mx_dstrbl_val_flag,
auto_alct_excs_flag,
alws_ngtv_crs_flag ,
uses_net_crs_mthd_flag ,
mx_dfcit_pct_pool_crs_num,
mx_dfcit_pct_comp_num,
comp_lvl_fctr_id,
mn_dstrbl_pct_num,
mn_dstrbl_val,
mx_dstrbl_pct_num,
mx_dstrbl_val,
excs_trtmt_cd,
ptip_id,
plip_id,
pgm_id,
oiplip_id,
cmbn_plip_id,
cmbn_ptip_id,
cmbn_ptip_opt_id,
business_group_id,
bpp_attribute_category,
bpp_attribute1,
bpp_attribute2,
bpp_attribute3,
bpp_attribute4,
bpp_attribute5,
bpp_attribute6,
bpp_attribute7,
bpp_attribute8,
bpp_attribute9,
bpp_attribute10,
bpp_attribute11,
bpp_attribute12,
bpp_attribute13,
bpp_attribute14,
bpp_attribute15,
bpp_attribute16,
bpp_attribute17,
bpp_attribute18,
bpp_attribute19,
bpp_attribute20,
bpp_attribute21,
bpp_attribute22,
bpp_attribute23,
bpp_attribute24,
bpp_attribute25,
bpp_attribute26,
bpp_attribute27,
bpp_attribute28,
bpp_attribute29,
bpp_attribute30,
object_version_number
from ben_bnft_prvdr_pool_f
where bnft_prvdr_pool_id = p_bnft_prvdr_pool_id
and p_effective_date
between effective_start_date and effective_end_date
for update nowait;
If (p_datetrack_mode <> 'INSERT') then
--
-- We must select and lock the current row.
--
Open C_Sel1;
-- is present in dt_delete_validate
Else
--
-- We are doing a datetrack 'INSERT' which is illegal within this
-- procedure therefore we must error (note: to lck on insert the
-- private procedure ins_lck should be called).
--
fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');