DBA Data[Home] [Help]

PACKAGE BODY: APPS.BEN_BENAUDIT_XMLP_PKG

Source


1 PACKAGE BODY BEN_BENAUDIT_XMLP_PKG AS
2 /* $Header: BENAUDITB.pls 120.1 2007/12/10 08:23:30 vjaganat noship $ */
3 
4 function CF_STANDARD_HEADERFormula return Number is
5   l_concurrent_program_name    fnd_concurrent_programs_tl.user_concurrent_program_name%type ;   l_process_date               varchar2(30);
6   l_mode                       hr_lookups.meaning%type ;
7   l_derivable_factors          hr_lookups.meaning%type ;
8   l_validate                   hr_lookups.meaning%type ;
9   l_person                     per_people_f.full_name%type ;
10   l_person_type                per_person_types.user_person_type%type ;
11   l_program                    ben_pgm_f.name%type ;
12   l_business_group             per_business_groups.name%type ;   l_plan                       ben_pl_f.name%type ;   l_enrollment_type_cycle      varchar2(800);   l_plans_not_in_programs      hr_lookups.meaning%type ;
13 l_just_programs              hr_lookups.meaning%type ;
14 l_comp_object_selection_rule ff_formulas_f.formula_name%type ;
15 l_person_selection_rule      ff_formulas_f.formula_name%type ;   l_life_event_reason          ben_ler_f.name%type ;   l_organization               hr_all_organization_units.name%type ;   l_postal_zip_range           varchar2(80);
16   l_reporting_group            ben_rptg_grp.name%type ;
17   l_plan_type                  ben_pl_typ_f.name%type ;
18   l_option                     ben_opt_f.name%type ;
19   l_eligibility_profile        ben_eligy_prfl_f.name%type ;
20   l_variable_rate_profile      ben_vrbl_rt_prfl_f.name%type ;
21   l_legal_entity               hr_all_organization_units.name%type ;   l_payroll                    pay_payrolls_f.payroll_name%type ;   l_status                     fnd_lookups.meaning%type ;   l_all			       varchar2(80);       begin
22 
23         ben_batch_reporting.standard_header
24     (p_concurrent_request_id      => P_CONCURRENT_REQUEST_ID,
25      p_concurrent_program_name    => L_CONCURRENT_PROGRAM_NAME,
26      p_process_date               => L_PROCESS_DATE,
27      p_mode                       => L_MODE,
28      p_derivable_factors          => L_DERIVABLE_FACTORS,
29      p_validate                   => L_VALIDATE,
30      p_person                     => L_PERSON,
31      p_person_type                => L_PERSON_TYPE,
32      p_program                    => L_PROGRAM,
33      p_business_group             => L_BUSINESS_GROUP,
34      p_plan                       => L_PLAN,
35      p_popl_enrt_typ_cycl         => L_ENROLLMENT_TYPE_CYCLE,
36      p_plans_not_in_programs      => L_PLANS_NOT_IN_PROGRAMS,
37      p_just_programs              => L_JUST_PROGRAMS,
38      p_comp_object_selection_rule => L_COMP_OBJECT_SELECTION_RULE,
39      p_person_selection_rule      => L_PERSON_SELECTION_RULE,
40      p_life_event_reason          => L_LIFE_EVENT_REASON,
41      p_organization               => L_ORGANIZATION,
42      p_postal_zip_range           => L_POSTAL_ZIP_RANGE,
43      p_reporting_group            => L_REPORTING_GROUP,
44      p_plan_type                  => L_PLAN_TYPE,
45      p_option                     => L_OPTION,
46      p_eligibility_profile        => L_ELIGIBILITY_PROFILE,
47      p_variable_rate_profile      => L_VARIABLE_RATE_PROFILE,
48      p_legal_entity               => L_LEGAL_ENTITY,
49      p_payroll                    => L_PAYROLL,
50      p_status                     => L_STATUS);
51     CP_CONCURRENT_PROGRAM_NAME    := l_concurrent_program_name;
52   CP_PROCESS_DATE               := l_process_date;
53   CP_MODE                       := l_mode;
54   CP_DERIVABLE_FACTORS          := l_derivable_factors;
55   CP_VALIDATE                   := l_validate;
56   CP_PERSON                     := l_person;
57   CP_PERSON_TYPE                := l_person_type;
58   CP_PROGRAM                    := l_program;
59   CP_BUSINESS_GROUP             := l_business_group;
60   CP_PLAN                       := l_plan;
61   CP_ENROLLMENT_TYPE_CYCLE      := l_enrollment_type_cycle;
62   CP_PLANS_NOT_IN_PROGRAMS      := l_plans_not_in_programs;
63   CP_JUST_PROGRAMS              := l_just_programs;
64   CP_COMP_OBJECT_SELECTION_RULE := l_comp_object_selection_rule;
65   CP_PERSON_SELECTION_RULE      := l_person_selection_rule;
66   CP_LIFE_EVENT_REASON          := l_life_event_reason;
67   CP_ORGANIZATION               := l_organization;
68   CP_POSTAL_ZIP_RANGE           := l_postal_zip_range;
69   CP_REPORTING_GROUP            := l_reporting_group;
70   CP_PLAN_TYPE                  := l_plan_type;
71   CP_OPTION                     := l_option;
72   CP_ELIGIBILITY_PROFILE        := l_eligibility_profile;
73   CP_VARIABLE_RATE_PROFILE      := l_variable_rate_profile;
74   CP_LEGAL_ENTITY               := l_legal_entity;
75   CP_PAYROLL                    := l_payroll;
76   CP_STATUS                     := l_status;
77           fnd_message.set_name('BEN','BEN_91792_ALL_PROMPT');
78   l_all := substrb(fnd_message.get,1,80);
79     begin
80   select loc.location_code into CP_LOCATION
81   from hr_locations loc,
82   ben_benefit_actions bft
83   where bft.request_id = P_CONCURRENT_REQUEST_ID
84   and bft.location_id = loc.location_id;
85 
86   exception
87   when no_data_found then
88   CP_LOCATION := l_all;
89   end;
90 
91   begin
92   select bng.name into CP_PERSON_BNFT_GRP
93   from ben_benfts_grp bng,
94   ben_benefit_actions bft
95   where bft.request_id = P_CONCURRENT_REQUEST_ID
96   and bft.benfts_grp_id = bng.benfts_grp_id;
97 
98   exception
99   when no_data_found then
100   CP_PERSON_BNFT_GRP := l_all;
101   end;
102 
103   begin
104   select decode(audit_log_flag, 'Y', 'Yes', 'N', 'No')  into CP_AUDIT_FLAG
105   from   ben_benefit_actions bft
106   where bft.request_id = P_CONCURRENT_REQUEST_ID;
107 
108 
109   exception
110   when no_data_found then
111   null;
112   end;
113 
114   begin
115   select decode(lmt_prpnip_by_org_flag, 'Y', 'Yes', 'N', 'No')  into CP_LMT_BY_ORG_FLAG
116   from   ben_benefit_actions bft
117   where bft.request_id = P_CONCURRENT_REQUEST_ID;
118 
119 
120   exception
121   when no_data_found then
122   null;
123   end;
124 
125     return 1;
126   end;
127 
128 function CF_1Formula return Number is
129   l_start_date                 varchar2(30);
130   l_end_date                   varchar2(30);
131   l_start_time                 varchar2(30);
132   l_end_time                   varchar2(30);
133   l_elapsed_time               varchar2(30);
134   l_persons_selected           varchar2(30);
135   l_persons_processed          varchar2(30);
136   l_persons_errored            varchar2(30);
137   l_persons_processed_succ     varchar2(30);
138   l_persons_unprocessed        varchar2(30);
139 begin
140         ben_batch_reporting.process_information
141     (p_concurrent_request_id      => P_CONCURRENT_REQUEST_ID,
142      p_start_date                 => L_START_DATE,
143      p_end_date                   => L_END_DATE,
144      p_start_time                 => L_START_TIME,
145      p_end_time                   => L_END_TIME,
146      p_elapsed_time               => L_ELAPSED_TIME,
147      p_persons_selected           => L_PERSONS_SELECTED,
148      p_persons_processed          => L_PERSONS_PROCESSED,
149      p_persons_unprocessed        => L_PERSONS_UNPROCESSED,
150      p_persons_processed_succ     => L_PERSONS_PROCESSED_SUCC,
151      p_persons_errored            => L_PERSONS_ERRORED);
152     CP_START_DATE                 := l_start_date;
153   CP_END_DATE                   := l_end_date;
154   CP_START_TIME                 := l_start_time;
155   CP_END_TIME                   := l_end_time;
156   CP_ELAPSED_TIME               := l_elapsed_time;
157   CP_PERSONS_SELECTED           := l_persons_selected;
158   CP_PERSONS_PROCESSED          := l_persons_processed;
159   CP_PERSONS_ERRORED            := l_persons_errored;
160   CP_PERSONS_UNPROCESSED        := l_persons_unprocessed;
161   CP_PERSONS_PROCESSED_SUCC     := l_persons_processed_succ;
162     return 1;
163   end;
164 
165 function BeforeReport return boolean is
166 begin
167     /*hr_standard.event('BEFORE REPORT');  */
168   return (TRUE);
169 end;
170 
171 function AfterReport return boolean is
172 begin
173    /* hr_standard.event('AFTER REPORT'); */
174   return (TRUE);
175 end;
176 
177 function AfterPForm return boolean is
178 begin
179                 P_CONC_REQUEST_ID := P_CONCURRENT_REQUEST_ID;
180     return (TRUE);
181  end;
182 
183 --Functions to refer Oracle report placeholders--
184 
185  Function CP_PROCESS_DATE_p return varchar2 is
186 	Begin
187 	 return CP_PROCESS_DATE;
188 	 END;
189  Function CP_DERIVABLE_FACTORS_p return varchar2 is
190 	Begin
191 	 return CP_DERIVABLE_FACTORS;
192 	 END;
193  Function CP_VALIDATE_p return varchar2 is
194 	Begin
195 	 return CP_VALIDATE;
196 	 END;
197  Function CP_PERSON_p return varchar2 is
198 	Begin
199 	 return CP_PERSON;
200 	 END;
201  Function CP_PERSON_TYPE_p return varchar2 is
202 	Begin
203 	 return CP_PERSON_TYPE;
204 	 END;
205  Function CP_PROGRAM_p return varchar2 is
206 	Begin
207 	 return CP_PROGRAM;
208 	 END;
209  Function CP_BUSINESS_GROUP_p return varchar2 is
210 	Begin
211 	 return CP_BUSINESS_GROUP;
212 	 END;
213  Function CP_PLAN_p return varchar2 is
214 	Begin
215 	 return CP_PLAN;
216 	 END;
217  Function CP_ENROLLMENT_TYPE_CYCLE_p return varchar2 is
218 	Begin
219 	 return CP_ENROLLMENT_TYPE_CYCLE;
220 	 END;
221  Function CP_PLANS_NOT_IN_PROGRAMS_p return varchar2 is
222 	Begin
223 	 return CP_PLANS_NOT_IN_PROGRAMS;
224 	 END;
225  Function CP_JUST_PROGRAMS_p return varchar2 is
226 	Begin
227 	 return CP_JUST_PROGRAMS;
228 	 END;
229  Function CP_COMP_OBJECT_SELECTION_RULE1 return varchar2 is
230 	Begin
231 	 return CP_COMP_OBJECT_SELECTION_RULE;
232 	 END;
233  Function CP_PERSON_SELECTION_RULE_p return varchar2 is
234 	Begin
235 	 return CP_PERSON_SELECTION_RULE;
236 	 END;
237  Function CP_LIFE_EVENT_REASON_p return varchar2 is
238 	Begin
239 	 return CP_LIFE_EVENT_REASON;
240 	 END;
241  Function CP_ORGANIZATION_p return varchar2 is
242 	Begin
243 	 return CP_ORGANIZATION;
244 	 END;
245  Function CP_POSTAL_ZIP_RANGE_p return varchar2 is
246 	Begin
247 	 return CP_POSTAL_ZIP_RANGE;
248 	 END;
249  Function CP_REPORTING_GROUP_p return varchar2 is
250 	Begin
251 	 return CP_REPORTING_GROUP;
252 	 END;
253  Function CP_PLAN_TYPE_p return varchar2 is
254 	Begin
255 	 return CP_PLAN_TYPE;
256 	 END;
257  Function CP_OPTION_p return varchar2 is
258 	Begin
259 	 return CP_OPTION;
260 	 END;
261  Function CP_ELIGIBILITY_PROFILE_p return varchar2 is
262 	Begin
263 	 return CP_ELIGIBILITY_PROFILE;
264 	 END;
265  Function CP_VARIABLE_RATE_PROFILE_p return varchar2 is
266 	Begin
267 	 return CP_VARIABLE_RATE_PROFILE;
268 	 END;
269  Function CP_LEGAL_ENTITY_p return varchar2 is
270 	Begin
271 	 return CP_LEGAL_ENTITY;
272 	 END;
273  Function CP_PAYROLL_p return varchar2 is
274 	Begin
275 	 return CP_PAYROLL;
276 	 END;
277  Function CP_CONCURRENT_PROGRAM_NAME_p return varchar2 is
278 	Begin
279 	 return CP_CONCURRENT_PROGRAM_NAME;
280 	 END;
281  Function CP_MODE_p return varchar2 is
282 	Begin
283 	 return CP_MODE;
284 	 END;
285  Function CP_STATUS_p return varchar2 is
286 	Begin
287 	 return CP_STATUS;
288 	 END;
289  Function CP_START_DATE_p return varchar2 is
290 	Begin
291 	 return CP_START_DATE;
292 	 END;
293  Function CP_END_DATE_p return varchar2 is
294 	Begin
295 	 return CP_END_DATE;
296 	 END;
297  Function CP_START_TIME_p return varchar2 is
298 	Begin
299 	 return CP_START_TIME;
300 	 END;
301  Function CP_END_TIME_p return varchar2 is
302 	Begin
303 	 return CP_END_TIME;
304 	 END;
305  Function CP_ELAPSED_TIME_p return varchar2 is
306 	Begin
307 	 return CP_ELAPSED_TIME;
308 	 END;
309  Function CP_PERSONS_SELECTED_p return number is
310 	Begin
311 	 return CP_PERSONS_SELECTED;
312 	 END;
313  Function CP_PERSONS_PROCESSED_p return number is
314 	Begin
315 	 return CP_PERSONS_PROCESSED;
316 	 END;
317  Function CP_PERSONS_ERRORED_p return number is
318 	Begin
319 	 return CP_PERSONS_ERRORED;
320 	 END;
321  Function CP_PERSONS_UNPROCESSED_p return number is
322 	Begin
323 	 return CP_PERSONS_UNPROCESSED;
324 	 END;
325  Function CP_PERSONS_PROCESSED_SUCC_p return number is
326 	Begin
327 	 return CP_PERSONS_PROCESSED_SUCC;
328 	 END;
329  Function CP_LOCATION_p return varchar2 is
330 	Begin
331 	 return CP_LOCATION;
332 	 END;
333  Function CP_PERSON_BNFT_GRP_p return varchar2 is
334 	Begin
335 	 return CP_PERSON_BNFT_GRP;
336 	 END;
337  Function CP_AUDIT_FLAG_p return varchar2 is
338 	Begin
339 	 return CP_AUDIT_FLAG;
340 	 END;
341  Function CP_LMT_BY_ORG_FLAG_p return varchar2 is
342 	Begin
343 	 return CP_LMT_BY_ORG_FLAG;
344 	 END;
345 END BEN_BENAUDIT_XMLP_PKG ;