DBA Data[Home] [Help]

PACKAGE: APPS.BEN_GLOBAL_ENRT

Source


1 package ben_global_enrt as
2 /* $Header: bengenrt.pkh 120.0 2005/05/28 09:02:14 appldev noship $ */
3 --------------------------------------------------------------------------------
4 /*
5 +==============================================================================+
6 |			Copyright (c) 1997 Oracle Corporation		       |
7 |			   Redwood Shores, California, USA		       |
8 |			        All rights reserved.			       |
9 +==============================================================================+
10 
11 Name
12 	Enrollment Globals Package
13 Purpose
14 	This package is used to load and return globals used in the enrollment
15       save processes.
16 History
17   Date        Who        Version    What?
18   ---------   ---------  -------    --------------------------------------------
19   03 Apr 2000 lmcdonal   115.0      Created
20   07 Apr 2000 lmcdonal   115.1      Added more procedures.
21   17 May 2001 maagrawa   115.2      Changed the procedure and record
22                                     definitions.
23   13-Dec-2002 kmahendr   115.4      Nocopy Changes
24   10-feb-2005 mmudigon   115.5      Bug 4157759. Added field "typ_cd" to
25                                     g_global_pil_rec_type
26   ------------------------------------------------------------------------------
27 */
28 --
29 type g_global_epe_rec_type is record
30   (per_in_ler_id          ben_elig_per_elctbl_chc.per_in_ler_id%type
31   ,pil_elctbl_chc_popl_id ben_elig_per_elctbl_chc.pil_elctbl_chc_popl_id%type
32   ,prtt_enrt_rslt_id      ben_elig_per_elctbl_chc.prtt_enrt_rslt_id%type
33   ,pgm_id                 ben_elig_per_elctbl_chc.pgm_id%type
34   ,pl_id                  ben_elig_per_elctbl_chc.pl_id%type
35   ,pl_typ_id              ben_elig_per_elctbl_chc.pl_typ_id%type
36   ,plip_id                ben_elig_per_elctbl_chc.plip_id%type
37   ,ptip_id                ben_elig_per_elctbl_chc.ptip_id%type
38   ,oipl_id                ben_elig_per_elctbl_chc.oipl_id%type
39   ,business_group_id      ben_elig_per_elctbl_chc.business_group_id%type
40   ,object_version_number  ben_elig_per_elctbl_chc.object_version_number%type
41   ,comp_lvl_cd            ben_elig_per_elctbl_chc.comp_lvl_cd%type
42   ,crntly_enrd_flag       ben_elig_per_elctbl_chc.crntly_enrd_flag%type
43   ,alws_dpnt_dsgn_flag    ben_elig_per_elctbl_chc.alws_dpnt_dsgn_flag%type
44   ,dpnt_cvg_strt_dt_cd    ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_cd%type
45   ,dpnt_cvg_strt_dt_rl    ben_elig_per_elctbl_chc.dpnt_cvg_strt_dt_rl%type
46   ,enrt_cvg_strt_dt       ben_elig_per_elctbl_chc.enrt_cvg_strt_dt%type
47   ,erlst_deenrt_dt        ben_elig_per_elctbl_chc.erlst_deenrt_dt%type
48   ,enrt_cvg_strt_dt_cd    ben_elig_per_elctbl_chc.enrt_cvg_strt_dt_cd%type
49   ,enrt_cvg_strt_dt_rl    ben_elig_per_elctbl_chc.enrt_cvg_strt_dt_rl%type);
50 g_global_epe_rec g_global_epe_rec_type;
51 
52 type g_global_pel_rec_type is record
53   (per_in_ler_id            ben_pil_elctbl_chc_popl.per_in_ler_id%type
54   ,pgm_id                   ben_pil_elctbl_chc_popl.pgm_id%type
55   ,pl_id                    ben_pil_elctbl_chc_popl.pl_id%type
56   ,lee_rsn_id               ben_pil_elctbl_chc_popl.lee_rsn_id%type
57   ,enrt_perd_id             ben_pil_elctbl_chc_popl.enrt_perd_id%type
58   ,uom                      ben_pil_elctbl_chc_popl.uom%type
59   ,acty_ref_perd_cd         ben_pil_elctbl_chc_popl.acty_ref_perd_cd%type);
60 --
61 g_global_pel_rec g_global_pel_rec_type;
62 g_global_pel_id ben_pil_elctbl_chc_popl.pil_elctbl_chc_popl_id%type;
63 
64 type g_global_pil_rec_type is record
65   (person_id      ben_per_in_ler.person_id%type
66   ,ler_id         ben_per_in_ler.ler_id%type
67   ,lf_evt_ocrd_dt ben_per_in_ler.lf_evt_ocrd_dt%type
68   ,typ_cd         ben_ler_f.typ_cd%type);
69 g_global_pil_rec g_global_pil_rec_type;
70 g_global_pil_id  ben_per_in_ler.per_in_ler_id%type;
71 
72 type g_global_enb_rec_type is record
73   (ordr_num              ben_enrt_bnft.ordr_num%type
74   ,val                   ben_enrt_bnft.val%type
75   ,bnft_typ_cd           ben_enrt_bnft.bnft_typ_cd%type
76   ,cvg_mlt_cd            ben_enrt_bnft.cvg_mlt_cd%type
77   ,nnmntry_uom           ben_enrt_bnft.nnmntry_uom%type
78   ,object_version_number ben_enrt_bnft.object_version_number%type);
79 g_global_enb_rec g_global_enb_rec_type;
80 
81 type g_global_asg_rec_type is record
82   (payroll_id      per_all_assignments_f.payroll_id%type);
83 g_global_asg_rec g_global_asg_rec_type;
84 g_global_asg_person_id per_all_people_f.person_id%type;
85 
86 g_global_pen_rec ben_prtt_enrt_rslt_f%rowtype;
87 ------------------------------------------------------------------------------
88 
89 procedure get_epe
90       (p_elig_per_elctbl_chc_id in number
91       ,p_global_epe_rec        out nocopy g_global_epe_rec_type);
92 
93 procedure reload_epe
94       (p_elig_per_elctbl_chc_id in number
95       ,p_global_epe_rec        out nocopy g_global_epe_rec_type);
96 
97 ------------------------------------------------------------------------------
98 
99 procedure get_pel
100       (p_pil_elctbl_chc_popl_id in number
101       ,p_global_pel_rec        out nocopy g_global_pel_rec_type);
102 ------------------------------------------------------------------------------
103 procedure get_pil
104       (p_per_in_ler_id          in number
105       ,p_global_pil_rec        out nocopy g_global_pil_rec_type);
106 ------------------------------------------------------------------------------
107 procedure clear_enb
108       (p_global_enb_rec        out nocopy g_global_enb_rec_type);
109 
110 procedure get_enb
111       (p_enrt_bnft_id           in number
112       ,p_global_enb_rec        out nocopy g_global_enb_rec_type);
113 ------------------------------------------------------------------------------
114 procedure get_asg
115       (p_person_id              in number
116       ,p_effective_date         in date
117       ,p_global_asg_rec        out nocopy g_global_asg_rec_type);
118 ------------------------------------------------------------------------------
119 procedure clear_pen
120       (p_global_pen_rec        out nocopy ben_prtt_enrt_rslt_f%rowtype);
121 
122 procedure get_pen
123       (p_prtt_enrt_rslt_id      in number
124       ,p_effective_date         in date
125       ,p_global_pen_rec        out nocopy ben_prtt_enrt_rslt_f%rowtype);
126 
127 procedure get_pen
128       (p_per_in_ler_id          in number
129       ,p_pgm_id                 in number
130       ,p_pl_id                  in number
131       ,p_oipl_id                in number
132       ,p_effective_date         in date
133       ,p_global_pen_rec        out nocopy ben_prtt_enrt_rslt_f%rowtype) ;
134 
135 procedure reload_pen
136       (p_prtt_enrt_rslt_id      in number
137       ,p_effective_date         in date
138       ,p_global_pen_rec        out nocopy ben_prtt_enrt_rslt_f%rowtype);
139 ------------------------------------------------------------------------------
140 
141 end ben_global_enrt;