The following lines contain the word 'select', 'insert', 'update' or 'delete':
select
ptip_id,
effective_start_date,
effective_end_date,
business_group_id,
pgm_id,
cmbn_ptip_id,
cmbn_ptip_opt_id,
acrs_ptip_cvg_id,
pl_typ_id,
coord_cvg_for_all_pls_flag,
dpnt_dsgn_cd,
dpnt_cvg_strt_dt_rl,
dpnt_cvg_end_dt_rl,
postelcn_edit_rl,
rt_end_dt_rl,
rt_strt_dt_rl,
enrt_cvg_end_dt_rl,
enrt_cvg_strt_dt_rl,
rqd_perd_enrt_nenrt_rl,
auto_enrt_mthd_rl,
enrt_mthd_cd,
enrt_cd,
enrt_rl,
dflt_enrt_cd,
dflt_enrt_det_rl,
drvbl_fctr_apls_rts_flag,
drvbl_fctr_prtn_elig_flag,
elig_apls_flag,
prtn_elig_ovrid_alwd_flag,
trk_inelig_per_flag,
dpnt_cvg_strt_dt_cd,
rt_end_dt_cd,
rt_strt_dt_cd,
enrt_cvg_end_dt_cd,
enrt_cvg_strt_dt_cd,
dpnt_cvg_end_dt_cd,
crs_this_pl_typ_only_flag,
ptip_stat_cd,
mx_cvg_alwd_amt,
mx_enrd_alwd_ovrid_num,
mn_enrd_rqd_ovrid_num,
no_mx_pl_typ_ovrid_flag,
ordr_num,
prvds_cr_flag,
rqd_perd_enrt_nenrt_val,
rqd_perd_enrt_nenrt_tm_uom,
wvbl_flag,
dpnt_adrs_rqd_flag,
dpnt_cvg_no_ctfn_rqd_flag,
dpnt_dob_rqd_flag,
dpnt_legv_id_rqd_flag,
susp_if_dpnt_ssn_nt_prv_cd,
susp_if_dpnt_dob_nt_prv_cd,
susp_if_dpnt_adr_nt_prv_cd,
susp_if_ctfn_not_dpnt_flag,
dpnt_ctfn_determine_cd,
drvd_fctr_dpnt_cvg_flag,
no_mn_pl_typ_overid_flag,
sbj_to_sps_lf_ins_mx_flag,
sbj_to_dpnt_lf_ins_mx_flag,
use_to_sum_ee_lf_ins_flag,
per_cvrd_cd,
short_name,
short_code,
legislation_code,
legislation_subgroup,
vrfy_fmly_mmbr_cd,
vrfy_fmly_mmbr_rl,
ivr_ident,
url_ref_name,
rqd_enrt_perd_tco_cd,
ctp_attribute_category,
ctp_attribute1,
ctp_attribute2,
ctp_attribute3,
ctp_attribute4,
ctp_attribute5,
ctp_attribute6,
ctp_attribute7,
ctp_attribute8,
ctp_attribute9,
ctp_attribute10,
ctp_attribute11,
ctp_attribute12,
ctp_attribute13,
ctp_attribute14,
ctp_attribute15,
ctp_attribute16,
ctp_attribute17,
ctp_attribute18,
ctp_attribute19,
ctp_attribute20,
ctp_attribute21,
ctp_attribute22,
ctp_attribute23,
ctp_attribute24,
ctp_attribute25,
ctp_attribute26,
ctp_attribute27,
ctp_attribute28,
ctp_attribute29,
ctp_attribute30,
all_inelig,
object_version_number
from ben_ptip_f
where ptip_id = p_ptip_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.pl_typ_id,
t.cmbn_ptip_id,
t.cmbn_ptip_opt_id,
t.acrs_ptip_cvg_id
from ben_ptip_f t
where t.ptip_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_ptip_f t
set t.effective_end_date = p_new_effective_end_date,
t.object_version_number = l_object_version_number
where t.ptip_id = p_base_key_value
and p_effective_date
between t.effective_start_date and t.effective_end_date;
select
ptip_id,
effective_start_date,
effective_end_date,
coord_cvg_for_all_pls_flag,
dpnt_dsgn_cd,
dpnt_cvg_no_ctfn_rqd_flag,
dpnt_cvg_strt_dt_cd,
rt_end_dt_cd,
rt_strt_dt_cd,
enrt_cvg_end_dt_cd,
enrt_cvg_strt_dt_cd,
dpnt_cvg_strt_dt_rl,
dpnt_cvg_end_dt_cd,
dpnt_cvg_end_dt_rl,
dpnt_adrs_rqd_flag,
dpnt_legv_id_rqd_flag,
susp_if_dpnt_ssn_nt_prv_cd,
susp_if_dpnt_dob_nt_prv_cd,
susp_if_dpnt_adr_nt_prv_cd,
susp_if_ctfn_not_dpnt_flag,
dpnt_ctfn_determine_cd,
postelcn_edit_rl,
rt_end_dt_rl,
rt_strt_dt_rl,
enrt_cvg_end_dt_rl,
enrt_cvg_strt_dt_rl,
rqd_perd_enrt_nenrt_rl,
auto_enrt_mthd_rl,
enrt_mthd_cd,
enrt_cd,
enrt_rl,
dflt_enrt_cd,
dflt_enrt_det_rl,
drvbl_fctr_apls_rts_flag,
drvbl_fctr_prtn_elig_flag,
elig_apls_flag,
prtn_elig_ovrid_alwd_flag,
trk_inelig_per_flag,
dpnt_dob_rqd_flag,
crs_this_pl_typ_only_flag,
ptip_stat_cd,
mx_cvg_alwd_amt,
mx_enrd_alwd_ovrid_num,
mn_enrd_rqd_ovrid_num,
no_mx_pl_typ_ovrid_flag,
ordr_num,
prvds_cr_flag,
rqd_perd_enrt_nenrt_val,
rqd_perd_enrt_nenrt_tm_uom,
wvbl_flag,
drvd_fctr_dpnt_cvg_flag,
no_mn_pl_typ_overid_flag,
sbj_to_sps_lf_ins_mx_flag,
sbj_to_dpnt_lf_ins_mx_flag,
use_to_sum_ee_lf_ins_flag,
per_cvrd_cd,
short_name,
short_code,
legislation_code,
legislation_subgroup,
vrfy_fmly_mmbr_cd,
vrfy_fmly_mmbr_rl,
ivr_ident,
url_ref_name,
rqd_enrt_perd_tco_cd,
pgm_id,
pl_typ_id,
cmbn_ptip_id,
cmbn_ptip_opt_id,
acrs_ptip_cvg_id,
business_group_id,
ctp_attribute_category,
ctp_attribute1,
ctp_attribute2,
ctp_attribute3,
ctp_attribute4,
ctp_attribute5,
ctp_attribute6,
ctp_attribute7,
ctp_attribute8,
ctp_attribute9,
ctp_attribute10,
ctp_attribute11,
ctp_attribute12,
ctp_attribute13,
ctp_attribute14,
ctp_attribute15,
ctp_attribute16,
ctp_attribute17,
ctp_attribute18,
ctp_attribute19,
ctp_attribute20,
ctp_attribute21,
ctp_attribute22,
ctp_attribute23,
ctp_attribute24,
ctp_attribute25,
ctp_attribute26,
ctp_attribute27,
ctp_attribute28,
ctp_attribute29,
ctp_attribute30,
all_inelig,
object_version_number
from ben_ptip_f
where ptip_id = p_ptip_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;