[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT lf_evt_ocrd_dt
FROM ben_per_in_ler
WHERE per_in_ler_id = p_per_in_ler_id;
PROCEDURE insert_event (
p_rec IN ben_pea_shd.g_rec_type,
p_effective_date IN DATE,
p_datetrack_mode IN VARCHAR2
)
IS
--
CURSOR c_act_typ
IS
SELECT type_cd
FROM ben_actn_typ
WHERE actn_typ_id = p_rec.actn_typ_id;
SELECT pil.person_id, pen.pgm_id, pen.pl_id, pen.oipl_id,
pen.sspndd_flag, pil.lf_evt_ocrd_dt
FROM ben_prtt_enrt_rslt_f pen, ben_per_in_ler pil
WHERE pil.per_in_ler_id = p_rec.per_in_ler_id
AND pen.prtt_enrt_rslt_id = p_rec.prtt_enrt_rslt_id
AND p_effective_date BETWEEN pen.effective_start_date
AND pen.effective_end_date;
INSERT INTO hri_eq_ben_enrlactn_evts
( person_id,
per_in_ler_id,
prtt_enrt_rslt_id,
pgm_id,
pl_id,
oipl_id,
lf_evt_ocrd_dt,
sspndd_flag,
actn_typ_cd,
actn_typ_id,
prtt_enrt_actn_id,
elig_cvrd_dpnt_id,
pl_bnf_id,
due_dt,
cmpltd_dt,
rqd_flag,
business_group_id,
fnd_concurrent_request_id,
event_date,
event_cd,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date
)
VALUES ( l_pen_row.person_id,
p_rec.per_in_ler_id,
p_rec.prtt_enrt_rslt_id,
l_pen_row.pgm_id,
l_pen_row.pl_id,
l_pen_row.oipl_id,
l_pen_row.lf_evt_ocrd_dt,
l_pen_row.sspndd_flag,
l_actn_typ_cd,
p_rec.actn_typ_id,
p_rec.prtt_enrt_actn_id,
p_rec.elig_cvrd_dpnt_id,
p_rec.pl_bnf_id,
p_rec.due_dt,
p_rec.cmpltd_dt,
p_rec.rqd_flag,
p_rec.business_group_id,
1,
p_effective_date,
DECODE (p_datetrack_mode,
'INSERT', 'INSERTED',
'ZAP', 'ZAP',
'COMPLETED'
),
SYSDATE,
fnd_global.user_id,
fnd_global.login_id,
fnd_global.user_id,
SYSDATE
);
PROCEDURE update_event (
p_rec IN ben_pea_shd.g_rec_type,
p_effective_date IN DATE,
p_datetrack_mode IN VARCHAR2
)
IS
BEGIN
insert_event (p_rec, p_effective_date, p_datetrack_mode);
PROCEDURE delete_event (
p_rec IN ben_pea_shd.g_rec_type,
p_effective_date IN DATE,
p_datetrack_mode IN VARCHAR2
)
IS
BEGIN
insert_event (p_rec, p_effective_date, p_datetrack_mode);