DBA Data[Home] [Help]

PACKAGE: APPS.BEN_COBJ_CACHE

Source


1 package ben_cobj_cache AUTHID CURRENT_USER as
2 /* $Header: becobjch.pkh 120.2.12020000.2 2012/07/03 12:00:18 amnaraya ship $*/
3 --
4 /*
5 +==============================================================================+
6 |			 Copyright (c) 1997 Oracle Corporation		       |
7 |			    Redwood Shores, California, USA		       |
8 |				All rights reserved.			       |
9 +==============================================================================+
10 --
11 History
12   Version    Date	Who	   What?
13   ---------  ---------	---------- --------------------------------------------
14   115.0      28-Jun-99	mhoyes     Created.
15   115.1      13-Jul-00	mhoyes     Added pgm,ptip,plip,prel and etpr caches.
16   115.2      17-May-01  maagrawa   Added columns to pgm,pl,plip,ptip,oipl
17                                    records.
18   115.3      22-May-01  mhoyes   - Upgraded comp object caches to be context
19                                    sensitive. Hence when the refresh routine is
20                                    not called then the cache will use SQL.
21   115.4      26-Jul-01  ikasire    Bug1895874 added nip_dflt_flag to ben_pl_f
22                                    table needs to be cached for bendenrr
23   115.7      29-Nov-05  abparekh   Bug 4766118 - Added ALWS_QDRO_FLAG to G_PL_INST_ROW
24   115.8      13-Mar-06  kmahendr   bug#5082245 - added svgs_pl_flag to g_pl_inst_ro
25   115.9      27-Dec-11  velvanop   Bug 12558830: Creating Ineligible Flag for Compensation Object. ALL_INELIG column needs to
26                                    cached to check whether the comp object is Ineligible or not.
27   -----------------------------------------------------------------------------
28 */
29 --
30 type g_oiplip_inst_row is record
31   (oiplip_id ben_oiplip_f.oiplip_id%type
32   ,plip_id   ben_oiplip_f.plip_id%type
33   ,oipl_id   ben_oiplip_f.oipl_id%type
34   );
35 --
36 type g_oiplip_inst_tbl is table of g_oiplip_inst_row
37   index by binary_integer;
38 --
39 g_oiplip_lookup       ben_cache.g_cache_lookup_table;
40 g_oiplip_instance     g_oiplip_inst_tbl;
41 g_oiplip_currow       g_oiplip_inst_row;
42 g_oiplip_cached       pls_integer := 0;
43 --
44 procedure get_oiplip_dets
45   (p_business_group_id in     number
46   ,p_effective_date    in     date
47   ,p_oiplip_id         in     number default null
48   ,p_inst_row	       in out NOCOPY g_oiplip_inst_row
49   );
50 --
51 type g_opt_inst_row is record
52   (opt_id                     ben_opt_f.opt_id%type
53   ,name                       ben_opt_f.name%type
54   ,effective_start_date       ben_opt_f.effective_start_date%type
55   ,effective_end_date         ben_opt_f.effective_end_date%type
56   ,rqd_perd_enrt_nenrt_uom    ben_opt_f.rqd_perd_enrt_nenrt_uom%type
57   ,rqd_perd_enrt_nenrt_val    ben_opt_f.rqd_perd_enrt_nenrt_val%type
58   ,rqd_perd_enrt_nenrt_rl     ben_opt_f.rqd_perd_enrt_nenrt_rl%type
59   );
60 --
61 type g_opt_inst_tbl is table of g_opt_inst_row
62   index by binary_integer;
63 --
64 g_opt_lookup       ben_cache.g_cache_lookup_table;
65 g_opt_instance     g_opt_inst_tbl;
66 g_opt_currow       g_opt_inst_row;
67 g_opt_cached       pls_integer := 0;
68 --
69 procedure get_opt_dets
70   (p_business_group_id in     number
71   ,p_effective_date    in     date
72   ,p_opt_id            in     number default null
73   ,p_inst_row	       in out NOCOPY g_opt_inst_row
74   );
75 --
76 type g_oipl_inst_row is record
77   (oipl_id                   ben_oipl_f.oipl_id%type
78   ,effective_start_date      ben_oipl_f.effective_start_date%type
79   ,effective_end_date        ben_oipl_f.effective_end_date%type
80   ,opt_id                    ben_oipl_f.opt_id%type
81   ,pl_id                     ben_oipl_f.pl_id%type
82   ,trk_inelig_per_flag       ben_oipl_f.trk_inelig_per_flag%type
83   ,ordr_num                  ben_oipl_f.ordr_num%type
84   ,elig_apls_flag            ben_oipl_f.elig_apls_flag%type
85   ,prtn_elig_ovrid_alwd_flag ben_oipl_f.prtn_elig_ovrid_alwd_flag%type
86   ,vrfy_fmly_mmbr_cd         ben_oipl_f.vrfy_fmly_mmbr_cd%type
87   ,vrfy_fmly_mmbr_rl         ben_oipl_f.vrfy_fmly_mmbr_rl%type
88   ,per_cvrd_cd               ben_oipl_f.per_cvrd_cd%type
89   ,dflt_flag                 ben_oipl_f.dflt_flag%type
90   ,mndtry_flag               ben_oipl_f.mndtry_flag%type
91   ,mndtry_rl                 ben_oipl_f.mndtry_rl%type
92   ,auto_enrt_flag            ben_oipl_f.auto_enrt_flag%type
93   ,auto_enrt_mthd_rl         ben_oipl_f.auto_enrt_mthd_rl%type
94   ,enrt_cd                   ben_oipl_f.enrt_cd%type
95   ,enrt_rl                   ben_oipl_f.enrt_rl%type
96   ,dflt_enrt_cd              ben_oipl_f.dflt_enrt_cd%type
97   ,dflt_enrt_det_rl          ben_oipl_f.dflt_enrt_det_rl%type
98   ,rqd_perd_enrt_nenrt_uom   ben_oipl_f.rqd_perd_enrt_nenrt_uom%type
99   ,rqd_perd_enrt_nenrt_val   ben_oipl_f.rqd_perd_enrt_nenrt_val%type
100   ,rqd_perd_enrt_nenrt_rl    ben_oipl_f.rqd_perd_enrt_nenrt_rl%type
101   ,actl_prem_id              ben_oipl_f.actl_prem_id%type
102   ,postelcn_edit_rl          ben_oipl_f.postelcn_edit_rl%type
103   ,all_inelig               ben_oipl_f.all_inelig%type
104   );
105 --
106 type g_oipl_inst_tbl is table of g_oipl_inst_row
107   index by binary_integer;
108 --
109 g_oipl_lookup       ben_cache.g_cache_lookup_table;
110 g_oipl_instance     g_oipl_inst_tbl;
111 g_oipl_currow       g_oipl_inst_row;
112 g_oipl_cached       pls_integer := 0;
113 --
114 procedure get_oipl_dets
115   (p_business_group_id in     number
116   ,p_effective_date    in     date
117   ,p_oipl_id           in     number default null
118   ,p_inst_row	       in out NOCOPY g_oipl_inst_row
119   );
120 --
121 type g_pgm_inst_row is record
122   (pgm_id                    ben_pgm_f.pgm_id%type
123   ,effective_start_date      ben_pgm_f.effective_start_date%type
124   ,effective_end_date        ben_pgm_f.effective_end_date%type
125   ,enrt_cvg_strt_dt_cd       ben_pgm_f.enrt_cvg_strt_dt_cd%type
126   ,enrt_cvg_strt_dt_rl       ben_pgm_f.enrt_cvg_strt_dt_rl%type
127   ,enrt_cvg_end_dt_cd        ben_pgm_f.enrt_cvg_end_dt_cd%type
128   ,enrt_cvg_end_dt_rl        ben_pgm_f.enrt_cvg_end_dt_rl%type
129   ,rt_strt_dt_cd             ben_pgm_f.rt_strt_dt_cd%type
130   ,rt_strt_dt_rl             ben_pgm_f.rt_strt_dt_rl%type
131   ,rt_end_dt_cd              ben_pgm_f.rt_end_dt_cd%type
132   ,rt_end_dt_rl              ben_pgm_f.rt_end_dt_rl%type
133   ,elig_apls_flag            ben_pgm_f.elig_apls_flag%type
134   ,prtn_elig_ovrid_alwd_flag ben_pgm_f.prtn_elig_ovrid_alwd_flag%type
135   ,trk_inelig_per_flag       ben_pgm_f.trk_inelig_per_flag%type
136   ,vrfy_fmly_mmbr_cd         ben_pgm_f.vrfy_fmly_mmbr_cd%type
137   ,vrfy_fmly_mmbr_rl         ben_pgm_f.vrfy_fmly_mmbr_rl%type
138   ,dpnt_dsgn_lvl_cd          ben_pgm_f.dpnt_dsgn_lvl_cd%type
139   ,dpnt_dsgn_cd              ben_pgm_f.dpnt_dsgn_cd%type
140   ,dpnt_cvg_strt_dt_cd       ben_pgm_f.dpnt_cvg_strt_dt_cd%type
141   ,dpnt_cvg_strt_dt_rl       ben_pgm_f.dpnt_cvg_strt_dt_rl%type
142   ,dpnt_cvg_end_dt_cd        ben_pgm_f.dpnt_cvg_end_dt_cd%type
143   ,dpnt_cvg_end_dt_rl        ben_pgm_f.dpnt_cvg_end_dt_rl%type
144   ,pgm_typ_cd                ben_pgm_f.pgm_typ_cd%type
145   ,all_inelig               ben_pgm_f.all_inelig%type
146   );
147 --
148 type g_pgm_inst_tbl is table of g_pgm_inst_row
149   index by binary_integer;
150 --
151 g_pgm_lookup       ben_cache.g_cache_lookup_table;
152 g_pgm_instance     g_pgm_inst_tbl;
153 g_pgm_currow       g_pgm_inst_row;
154 g_pgm_cached       pls_integer := 0;
155 --
156 g_pgm_default_row  g_pgm_inst_row;
157 --
158 procedure get_pgm_dets
159   (p_business_group_id in     number
160   ,p_effective_date    in     date
161   ,p_pgm_id            in     number default null
162   ,p_inst_row	       in out NOCOPY g_pgm_inst_row
163   );
164 --
165 type g_ptip_inst_row is record
166   (ptip_id                   ben_ptip_f.ptip_id%type
167   ,effective_start_date      ben_ptip_f.effective_start_date%type
168   ,effective_end_date        ben_ptip_f.effective_end_date%type
169   ,enrt_cvg_strt_dt_cd       ben_ptip_f.enrt_cvg_strt_dt_cd%type
170   ,enrt_cvg_strt_dt_rl       ben_ptip_f.enrt_cvg_strt_dt_rl%type
171   ,enrt_cvg_end_dt_cd        ben_ptip_f.enrt_cvg_end_dt_cd%type
172   ,enrt_cvg_end_dt_rl        ben_ptip_f.enrt_cvg_end_dt_rl%type
173   ,rt_strt_dt_cd             ben_ptip_f.rt_strt_dt_cd%type
174   ,rt_strt_dt_rl             ben_ptip_f.rt_strt_dt_rl%type
175   ,rt_end_dt_cd              ben_ptip_f.rt_end_dt_cd%type
176   ,rt_end_dt_rl              ben_ptip_f.rt_end_dt_rl%type
177   ,elig_apls_flag            ben_ptip_f.elig_apls_flag%type
178   ,prtn_elig_ovrid_alwd_flag ben_ptip_f.prtn_elig_ovrid_alwd_flag%type
179   ,trk_inelig_per_flag       ben_ptip_f.trk_inelig_per_flag%type
180   ,ordr_num                  ben_ptip_f.ordr_num%type
181   ,vrfy_fmly_mmbr_cd         ben_ptip_f.vrfy_fmly_mmbr_cd%type
182   ,vrfy_fmly_mmbr_rl         ben_ptip_f.vrfy_fmly_mmbr_rl%type
183   ,rqd_perd_enrt_nenrt_tm_uom ben_ptip_f.rqd_perd_enrt_nenrt_tm_uom%type
184   ,rqd_perd_enrt_nenrt_val   ben_ptip_f.rqd_perd_enrt_nenrt_val%type
185   ,rqd_perd_enrt_nenrt_rl    ben_ptip_f.rqd_perd_enrt_nenrt_rl%type
186   ,dpnt_dsgn_cd              ben_ptip_f.dpnt_dsgn_cd%type
187   ,dpnt_cvg_strt_dt_cd       ben_ptip_f.dpnt_cvg_strt_dt_cd%type
188   ,dpnt_cvg_strt_dt_rl       ben_ptip_f.dpnt_cvg_strt_dt_rl%type
189   ,dpnt_cvg_end_dt_cd        ben_ptip_f.dpnt_cvg_end_dt_cd%type
190   ,dpnt_cvg_end_dt_rl        ben_ptip_f.dpnt_cvg_end_dt_rl%type
191   ,postelcn_edit_rl          ben_ptip_f.postelcn_edit_rl%type
192   ,all_inelig               ben_ptip_f.all_inelig%type
193   );
194 --
195 type g_ptip_inst_tbl is table of g_ptip_inst_row
196   index by binary_integer;
197 --
198 g_ptip_lookup       ben_cache.g_cache_lookup_table;
199 g_ptip_instance     g_ptip_inst_tbl;
200 g_ptip_currow       g_ptip_inst_row;
201 g_ptip_cached       pls_integer := 0;
202 --
203 g_ptip_default_row  g_ptip_inst_row;
204 --
205 procedure get_ptip_dets
206   (p_business_group_id in     number
207   ,p_effective_date    in     date
208   ,p_ptip_id           in     number default null
209   ,p_inst_row	       in out NOCOPY g_ptip_inst_row
210   );
211 --
212 type g_plip_inst_row is record
213   (plip_id                   ben_plip_f.plip_id%type
214   ,effective_start_date      ben_plip_f.effective_start_date%type
215   ,effective_end_date        ben_plip_f.effective_end_date%type
216   ,enrt_cvg_strt_dt_cd       ben_plip_f.enrt_cvg_strt_dt_cd%type
217   ,enrt_cvg_strt_dt_rl       ben_plip_f.enrt_cvg_strt_dt_rl%type
218   ,enrt_cvg_end_dt_cd        ben_plip_f.enrt_cvg_end_dt_cd%type
219   ,enrt_cvg_end_dt_rl        ben_plip_f.enrt_cvg_end_dt_rl%type
220   ,rt_strt_dt_cd             ben_plip_f.rt_strt_dt_cd%type
221   ,rt_strt_dt_rl             ben_plip_f.rt_strt_dt_rl%type
222   ,rt_end_dt_cd              ben_plip_f.rt_end_dt_cd%type
223   ,rt_end_dt_rl              ben_plip_f.rt_end_dt_rl%type
224   ,elig_apls_flag            ben_plip_f.elig_apls_flag%type
225   ,prtn_elig_ovrid_alwd_flag ben_plip_f.prtn_elig_ovrid_alwd_flag%type
226   ,trk_inelig_per_flag       ben_plip_f.trk_inelig_per_flag%type
227   ,ordr_num                  ben_plip_f.ordr_num%type
228   ,vrfy_fmly_mmbr_cd         ben_plip_f.vrfy_fmly_mmbr_cd%type
229   ,vrfy_fmly_mmbr_rl         ben_plip_f.vrfy_fmly_mmbr_rl%type
230   ,bnft_or_option_rstrctn_cd ben_plip_f.bnft_or_option_rstrctn_cd%type
231   ,pl_id                     ben_plip_f.pl_id%type
232   ,pgm_id                    ben_plip_f.pgm_id%type
233   ,cvg_incr_r_decr_only_cd   ben_plip_f.cvg_incr_r_decr_only_cd%type
234   ,mx_cvg_mlt_incr_num       ben_plip_f.mx_cvg_mlt_incr_num%type
235   ,mx_cvg_mlt_incr_wcf_num   ben_plip_f.mx_cvg_mlt_incr_wcf_num%type
236   ,postelcn_edit_rl          ben_plip_f.postelcn_edit_rl%type
237   ,all_inelig               ben_plip_f.all_inelig%type
238   );
239 --
240 type g_plip_inst_tbl is table of g_plip_inst_row
241   index by binary_integer;
242 --
243 g_plip_lookup       ben_cache.g_cache_lookup_table;
244 g_plip_instance     g_plip_inst_tbl;
245 g_plip_currow       g_plip_inst_row;
246 g_plip_cached       pls_integer := 0;
247 --
248 g_plip_default_row  g_plip_inst_row;
249 --
250 procedure get_plip_dets
251   (p_business_group_id in     number
252   ,p_effective_date    in     date
253   ,p_plip_id           in     number default null
254   ,p_inst_row	       in out NOCOPY g_plip_inst_row
255   );
256 --
257 type g_pl_inst_row is record
258   (pl_id                     ben_pl_f.pl_id%type
259   ,effective_start_date      ben_pl_f.effective_start_date%type
260   ,effective_end_date        ben_pl_f.effective_end_date%type
261   ,enrt_cvg_strt_dt_cd       ben_pl_f.enrt_cvg_strt_dt_cd%type
262   ,enrt_cvg_strt_dt_rl       ben_pl_f.enrt_cvg_strt_dt_rl%type
263   ,enrt_cvg_end_dt_cd        ben_pl_f.enrt_cvg_end_dt_cd%type
264   ,enrt_cvg_end_dt_rl        ben_pl_f.enrt_cvg_end_dt_rl%type
265   ,rt_strt_dt_cd             ben_pl_f.rt_strt_dt_cd%type
266   ,rt_strt_dt_rl             ben_pl_f.rt_strt_dt_rl%type
267   ,rt_end_dt_cd              ben_pl_f.rt_end_dt_cd%type
268   ,rt_end_dt_rl              ben_pl_f.rt_end_dt_rl%type
269   ,elig_apls_flag            ben_pl_f.elig_apls_flag%type
270   ,prtn_elig_ovrid_alwd_flag ben_pl_f.prtn_elig_ovrid_alwd_flag%type
271   ,per_cvrd_cd               ben_pl_f.per_cvrd_cd%type
272   ,pl_typ_id                 ben_pl_f.pl_typ_id%type
273   ,trk_inelig_per_flag       ben_pl_f.trk_inelig_per_flag%type
274   ,ordr_num                  ben_pl_f.ordr_num%type
275   ,mx_wtg_dt_to_use_cd       ben_pl_f.mx_wtg_dt_to_use_cd%type
276   ,mx_wtg_dt_to_use_rl       ben_pl_f.mx_wtg_dt_to_use_rl%type
277   ,mx_wtg_perd_rl            ben_pl_f.mx_wtg_perd_rl%type
278   ,mx_wtg_perd_prte_uom      ben_pl_f.mx_wtg_perd_prte_uom%type
279   ,mx_wtg_perd_prte_val      ben_pl_f.mx_wtg_perd_prte_val%type
280   ,vrfy_fmly_mmbr_cd         ben_pl_f.vrfy_fmly_mmbr_cd%type
281   ,vrfy_fmly_mmbr_rl         ben_pl_f.vrfy_fmly_mmbr_rl%type
282   ,bnft_or_option_rstrctn_cd ben_pl_f.bnft_or_option_rstrctn_cd%type
283   ,nip_dflt_enrt_cd          ben_pl_f.nip_dflt_enrt_cd%type
284   ,nip_dflt_enrt_det_rl      ben_pl_f.nip_dflt_enrt_det_rl%type
285   ,rqd_perd_enrt_nenrt_uom   ben_pl_f.rqd_perd_enrt_nenrt_uom%type
286   ,rqd_perd_enrt_nenrt_val   ben_pl_f.rqd_perd_enrt_nenrt_val%type
287   ,rqd_perd_enrt_nenrt_rl    ben_pl_f.rqd_perd_enrt_nenrt_rl%type
288   ,cvg_incr_r_decr_only_cd   ben_pl_f.cvg_incr_r_decr_only_cd%type
289   ,mx_cvg_mlt_incr_num       ben_pl_f.mx_cvg_mlt_incr_num%type
290   ,mx_cvg_mlt_incr_wcf_num   ben_pl_f.mx_cvg_mlt_incr_wcf_num%type
291   ,name                      ben_pl_f.name%type
292   ,actl_prem_id              ben_pl_f.actl_prem_id%type
293   ,bnf_dsgn_cd               ben_pl_f.bnf_dsgn_cd%type
294   ,enrt_pl_opt_flag          ben_pl_f.enrt_pl_opt_flag%type
295   ,dpnt_cvg_strt_dt_cd       ben_pl_f.dpnt_cvg_strt_dt_cd%type
296   ,dpnt_cvg_strt_dt_rl       ben_pl_f.dpnt_cvg_strt_dt_rl%type
297   ,dpnt_cvg_end_dt_cd        ben_pl_f.dpnt_cvg_end_dt_cd%type
298   ,dpnt_cvg_end_dt_rl        ben_pl_f.dpnt_cvg_end_dt_rl%type
299   ,alws_qmcso_flag           ben_pl_f.alws_qmcso_flag%type
300   ,alws_qdro_flag            ben_pl_f.alws_qdro_flag%type
301   ,dpnt_dsgn_cd              ben_pl_f.dpnt_dsgn_cd%type
302   ,postelcn_edit_rl          ben_pl_f.postelcn_edit_rl%type
303   ,dpnt_cvd_by_othr_apls_flag ben_pl_f.dpnt_cvd_by_othr_apls_flag%type
304   ,nip_dflt_flag             ben_pl_f.nip_dflt_flag%type
305   ,svgs_pl_flag              ben_pl_f.svgs_pl_flag%type
306   ,all_inelig               ben_pl_f.all_inelig%type
307   );
308 --
309 type g_pl_inst_tbl is table of g_pl_inst_row
310   index by binary_integer;
311 --
312 g_pl_lookup       ben_cache.g_cache_lookup_table;
313 g_pl_instance     g_pl_inst_tbl;
314 g_pl_currow       g_pl_inst_row;
315 g_pl_cached       pls_integer := 0;
316 --
317 g_pl_default_row  g_pl_inst_row;
318 --
319 procedure get_pl_dets
320   (p_business_group_id in     number
321   ,p_effective_date    in     date
322   ,p_pl_id             in     number default null
323   ,p_inst_row	       in out NOCOPY g_pl_inst_row
324   );
325 --
326 type g_etpr_inst_row is record
327   (elig_to_prte_rsn_id       ben_elig_to_prte_rsn_f.elig_to_prte_rsn_id%type
328   ,effective_start_date      ben_elig_to_prte_rsn_f.effective_start_date%type
329   ,effective_end_date        ben_elig_to_prte_rsn_f.effective_end_date%type
330   ,ler_id                    ben_elig_to_prte_rsn_f.ler_id%type
331   ,pgm_id                    ben_elig_to_prte_rsn_f.pgm_id%type
332   ,ptip_id                   ben_elig_to_prte_rsn_f.ptip_id%type
333   ,plip_id                   ben_elig_to_prte_rsn_f.plip_id%type
334   ,pl_id                     ben_elig_to_prte_rsn_f.pl_id%type
335   ,oipl_id                   ben_elig_to_prte_rsn_f.oipl_id%type
336   ,wait_perd_dt_to_use_cd    ben_elig_to_prte_rsn_f.wait_perd_dt_to_use_cd%type
337   ,wait_perd_dt_to_use_rl    ben_elig_to_prte_rsn_f.wait_perd_dt_to_use_rl%type
338   ,wait_perd_rl              ben_elig_to_prte_rsn_f.wait_perd_rl%type
339   ,wait_perd_uom             ben_elig_to_prte_rsn_f.wait_perd_uom%type
340   ,wait_perd_val             ben_elig_to_prte_rsn_f.wait_perd_val%type
341   ,prtn_eff_strt_dt_rl       ben_elig_to_prte_rsn_f.prtn_eff_strt_dt_rl%type
342   ,prtn_eff_end_dt_rl        ben_elig_to_prte_rsn_f.prtn_eff_end_dt_rl%type
343   ,prtn_eff_strt_dt_cd       ben_elig_to_prte_rsn_f.prtn_eff_strt_dt_cd%type
344   ,prtn_eff_end_dt_cd        ben_elig_to_prte_rsn_f.prtn_eff_end_dt_cd%type
345   ,elig_inelig_cd            ben_elig_to_prte_rsn_f.elig_inelig_cd%type
346   ,ignr_prtn_ovrid_flag      ben_elig_to_prte_rsn_f.ignr_prtn_ovrid_flag%type
347   ,vrfy_fmly_mmbr_cd         ben_elig_to_prte_rsn_f.vrfy_fmly_mmbr_cd%type
348   ,vrfy_fmly_mmbr_rl         ben_elig_to_prte_rsn_f.vrfy_fmly_mmbr_rl%type
349   );
350 --
351 type g_etpr_inst_tbl is table of g_etpr_inst_row
352   index by binary_integer;
353 --
354 g_etpr_lookup       ben_cache.g_cache_lookup_table;
355 g_etpr_instance     g_etpr_inst_tbl;
356 g_pgmetpr_currow    g_etpr_inst_row;
357 g_ptipetpr_currow   g_etpr_inst_row;
358 g_plipetpr_currow   g_etpr_inst_row;
359 g_pletpr_currow     g_etpr_inst_row;
360 g_oipletpr_currow   g_etpr_inst_row;
361 g_etpr_cached       boolean := FALSE;
362 --
363 procedure get_etpr_dets
364   (p_business_group_id in     number
365   ,p_effective_date    in     date
366   ,p_ler_id            in     number default null
367   ,p_pgm_id            in     number default null
368   ,p_ptip_id           in     number default null
369   ,p_plip_id           in     number default null
370   ,p_pl_id             in     number default null
371   ,p_oipl_id           in     number default null
372   ,p_inst_row	       in out NOCOPY g_etpr_inst_row
373   );
374 --
375 type g_prel_inst_row is record
376   (prtn_elig_id              ben_prtn_elig_f.prtn_elig_id%type
377   ,effective_start_date      ben_prtn_elig_f.effective_start_date%type
378   ,effective_end_date        ben_prtn_elig_f.effective_end_date%type
379   ,pgm_id                    ben_prtn_elig_f.pgm_id%type
380   ,ptip_id                   ben_prtn_elig_f.ptip_id%type
381   ,plip_id                   ben_prtn_elig_f.plip_id%type
382   ,pl_id                     ben_prtn_elig_f.pl_id%type
383   ,oipl_id                   ben_prtn_elig_f.oipl_id%type
384   ,wait_perd_dt_to_use_cd    ben_prtn_elig_f.wait_perd_dt_to_use_cd%type
385   ,wait_perd_dt_to_use_rl    ben_prtn_elig_f.wait_perd_dt_to_use_rl%type
386   ,wait_perd_rl              ben_prtn_elig_f.wait_perd_rl%type
387   ,wait_perd_uom             ben_prtn_elig_f.wait_perd_uom%type
388   ,wait_perd_val             ben_prtn_elig_f.wait_perd_val%type
389   ,prtn_eff_strt_dt_rl       ben_prtn_elig_f.prtn_eff_strt_dt_rl%type
390   ,prtn_eff_end_dt_rl        ben_prtn_elig_f.prtn_eff_end_dt_rl%type
391   ,prtn_eff_strt_dt_cd       ben_prtn_elig_f.prtn_eff_strt_dt_cd%type
392   ,prtn_eff_end_dt_cd        ben_prtn_elig_f.prtn_eff_end_dt_cd%type
393   );
394 --
395 type g_prel_inst_tbl is table of g_prel_inst_row
396   index by binary_integer;
397 --
398 g_prel_lookup       ben_cache.g_cache_lookup_table;
399 g_prel_instance     g_prel_inst_tbl;
400 g_pgmprel_currow    g_prel_inst_row;
401 g_ptipprel_currow   g_prel_inst_row;
402 g_plipprel_currow   g_prel_inst_row;
403 g_plprel_currow     g_prel_inst_row;
404 g_oiplprel_currow   g_prel_inst_row;
405 g_prel_cached       boolean := FALSE;
406 --
407 procedure get_prel_dets
408   (p_business_group_id in     number
409   ,p_effective_date    in     date
410   ,p_pgm_id            in     number default null
411   ,p_ptip_id           in     number default null
412   ,p_plip_id           in     number default null
413   ,p_pl_id             in     number default null
414   ,p_oipl_id           in     number default null
415   ,p_inst_row	       in out NOCOPY g_prel_inst_row
416   );
417 --
418 ------------------------------------------------------------------------
419 -- DELETE CACHED DATA
420 ------------------------------------------------------------------------
421 procedure clear_down_cache;
422 --
423 procedure set_no_cache_context;
424 --
425 END ben_cobj_cache;