DBA Data[Home] [Help]

PACKAGE BODY: APPS.BEN_BENDESUM_XMLP_PKG

Source


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