[Home] [Help]
183: --
184: cursor c_yr_perd is
185: select yrp.end_date
186: from ben_yr_perd yrp,
187: ben_popl_yr_perd cyp
188: where yrp.yr_perd_id = cyp.yr_perd_id
189: -- and p_incrd_from_dt between yrp.start_date and yrp.end_date -- 2278262
190: and p_exp_incurd_dt between yrp.start_date and yrp.end_date
191: and cyp.pl_id = p_pl_id;
327: -- curent entry is not taken for calc tath is added in calling proc this helps while updating
328: /*cursor c1 is select sum(nvl(prc.aprvd_for_pymt_amt,0))
329: from ben_prtt_reimbmt_rqst_f prc,
330: ben_pl_f pl,
331: ben_popl_yr_perd pyr,
332: ben_yr_perd yr
333: where prc.submitter_person_id = p_person_id
334: and prc.prtt_reimbmt_rqst_stat_cd not in ('DND','VOIDED','DPLICT')
335: and pl.pl_id = p_pl_id
1161: ,pen.pgm_id
1162: ,per_in_ler_id
1163: from ben_prtt_enrt_rslt_f pen,
1164: ben_pl_f pln,
1165: ben_popl_yr_perd cpy,
1166: ben_yr_perd yrp
1167: where pln.pl_id = p_pl_id
1168: and pln.pl_id = pen.pl_id
1169: and pen.person_id = p_submitter_person_id
1726: ,nvl(cpy.acpt_clm_rqsts_thru_dt, pen.enrt_cvg_thru_dt) acpt_clm_rqsts_thru_dt
1727: ,nvl(cpy.PY_CLMS_THRU_DT, yrp.end_date) PY_CLMS_THRU_DT
1728: from ben_prtt_enrt_rslt_f pen,
1729: ben_prtt_enrt_rslt_f pen_l,
1730: ben_popl_yr_perd cpy,
1731: ben_yr_perd yrp
1732: where cpy.pl_id = p_pl_id
1733: and pen.pl_id = cpy.pl_id
1734: and pen.person_id = p_submitter_person_id
1789: decode(pgs.GD_SVC_RECD_BASIS_CD, 'DATE', GD_SVC_RECD_BASIS_DT,
1790: decode(pgs.GD_SVC_RECD_BASIS_CD, 'MOINCRDT', add_months(p_exp_incurd_dt,pgs.GD_SVC_RECD_BASIS_MO),
1791: decode(pgs.GD_SVC_RECD_BASIS_CD, 'MOPLYRND', add_months(yrp.end_date,pgs.GD_SVC_RECD_BASIS_MO),yrp.end_date))) earliest_submit_date
1792: from ben_prtt_enrt_rslt_f pen,
1793: ben_popl_yr_perd cpy,
1794: ben_yr_perd yrp,
1795: ben_prtt_clm_gd_or_svc_typ pcg,
1796: ben_pl_gd_or_svc_f pgs,
1797: ben_gd_or_svc_typ gds
1830: -- allow the futur date within the year
1831: cursor c1 is
1832: select nvl(cpy.acpt_clm_rqsts_thru_dt, pen.enrt_cvg_thru_dt)
1833: from ben_prtt_enrt_rslt_f pen,
1834: ben_popl_yr_perd cpy,
1835: ben_yr_perd yrp
1836: where cpy.pl_id = p_pl_id
1837: and pen.pl_id = p_pl_id
1838: and pen.person_id = p_submitter_person_id