DBA Data[Home] [Help]

PACKAGE BODY: APPS.BEN_BENUASUM_XMLP_PKG

Source


1 PACKAGE BODY BEN_BENUASUM_XMLP_PKG AS
2 /* $Header: BENUASUMB.pls 120.1 2007/12/10 08:38:58 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 
32 begin
33 
34                   ben_batch_reporting.standard_header
35     (p_concurrent_request_id      => P_CONCURRENT_REQUEST_ID,
36      p_concurrent_program_name    => L_CONCURRENT_PROGRAM_NAME,
37      p_process_date               => L_PROCESS_DATE,
38      p_mode                       => L_MODE,
39      p_derivable_factors          => L_DERIVABLE_FACTORS,
40      p_validate                   => L_VALIDATE,
41      p_person                     => L_PERSON,
42      p_person_type                => L_PERSON_TYPE,
43      p_program                    => L_PROGRAM,
44      p_business_group             => L_BUSINESS_GROUP,
45      p_plan                       => L_PLAN,
46      p_popl_enrt_typ_cycl         => L_ENROLLMENT_TYPE_CYCLE,
47      p_plans_not_in_programs      => L_PLANS_NOT_IN_PROGRAMS,
48      p_just_programs              => L_JUST_PROGRAMS,
49      p_comp_object_selection_rule => L_COMP_OBJECT_SELECTION_RULE,
50      p_person_selection_rule      => L_PERSON_SELECTION_RULE,
51      p_life_event_reason          => L_LIFE_EVENT_REASON,
52      p_organization               => L_ORGANIZATION,
53      p_postal_zip_range           => L_POSTAL_ZIP_RANGE,
54      p_reporting_group            => L_REPORTING_GROUP,
55      p_plan_type                  => L_PLAN_TYPE,
56      p_option                     => L_OPTION,
57      p_eligibility_profile        => L_ELIGIBILITY_PROFILE,
58      p_variable_rate_profile      => L_VARIABLE_RATE_PROFILE,
59      p_legal_entity               => L_LEGAL_ENTITY,
60      p_payroll                    => L_PAYROLL,
61      p_status                     => L_STATUS);
62     CP_CONCURRENT_PROGRAM_NAME    := l_concurrent_program_name;
63   CP_PROCESS_DATE               := l_process_date;
64   CP_MODE                       := l_mode;
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 location_code into CP_LOCATION
91     from hr_locations a,
92           ben_benefit_actions b
93     where a.location_id = b.location_id
94     and    b.request_id = P_CONCURRENT_REQUEST_ID;
95 
96     exception when no_data_found then
97     CP_LOCATION := l_all;
98   end;
99   begin
100                 select meaning into CP_AUDIT_LOG_FLAG
101     from hr_lookups a,
102           ben_benefit_actions b
103     where a.lookup_type = 'YES_NO'
104     and   a.lookup_code = b.AUDIT_LOG_FLAG
105     and   b.request_id = P_CONCURRENT_REQUEST_ID;
106 
107     exception when no_data_found then
108     null;
109   end;
110     begin
111                 select meaning into CP_DEBUG_MESSAGES
112     from hr_lookups a,
113           ben_benefit_actions b
114     where a.lookup_type = 'YES_NO'
115     and   a.lookup_code = b.DEBUG_MESSAGES_FLAG
116     and   b.request_id = P_CONCURRENT_REQUEST_ID;
117 
118     exception when no_data_found then
119     null;
120   end;
121     return 1;
122   end;
123 
124 function CF_SUMMARY_EVENTFormula return Number is
125     l_val  number;
126   begin
127     ben_batch_utils.summary_by_action
128     (p_concurrent_request_id              => P_CONCURRENT_REQUEST_ID
129     ,p_cd_1  => 'ACTNENRTDEL',   p_val_1  => CP_ACTNENRTDEL
130     ,p_cd_2  => 'ACTNNOENRTDEL', p_val_2  => CP_ACTNNOENRTDEL
131     ,p_cd_3  => 'ACTNNOACTN',    p_val_3  => CP_ACTNNOACTN
132     ,p_cd_4  => 'XXX',           p_val_4  => l_val
133     ,p_cd_5  => 'XXX',           p_val_5  => l_val
134     ,p_cd_6  => 'XXX',           p_val_6  => l_val
135     ,p_cd_7  => 'XXX',           p_val_7  => l_val
136     ,p_cd_8  => 'XXX',           p_val_8  => l_val
137     ,p_cd_9  => 'XXX',           p_val_9  => l_val
138     ,p_cd_10 => 'XXX',           p_val_10 => l_val
139     );
140   CP_ACTNENRTDEL   := nvl(CP_ACTNENRTDEL,0);
141   CP_ACTNNOENRTDEL := nvl(CP_ACTNNOENRTDEL,0);
142   CP_ACTNNOACTN    := nvl(CP_ACTNNOACTN,0);
143   CP_ACTNCLSED     := CP_ACTNNOENRTDEL +  CP_ACTNENRTDEL;
144   CP_TOTPROCD      := CP_ACTNNOACTN + CP_ACTNCLSED;
145     return 1;
146   end;
147 
148 function CF_1Formula return Number is
149   l_start_date                 varchar2(30);
150   l_end_date                   varchar2(30);
151   l_start_time                 varchar2(30);
152   l_end_time                   varchar2(30);
153   l_elapsed_time               varchar2(30);
154   l_persons_selected           varchar2(30);
155   l_persons_processed          varchar2(30);
156   l_persons_errored            varchar2(30);
157   l_persons_processed_succ     varchar2(30);
158   l_persons_unprocessed        varchar2(30);
159 begin
160         ben_batch_reporting.process_information
161     (p_concurrent_request_id      => P_CONCURRENT_REQUEST_ID,
162      p_start_date                 => L_START_DATE,
163      p_end_date                   => L_END_DATE,
164      p_start_time                 => L_START_TIME,
165      p_end_time                   => L_END_TIME,
166      p_elapsed_time               => L_ELAPSED_TIME,
167      p_persons_selected           => L_PERSONS_SELECTED,
168      p_persons_processed          => L_PERSONS_PROCESSED,
169      p_persons_unprocessed        => L_PERSONS_UNPROCESSED,
170      p_persons_processed_succ     => L_PERSONS_PROCESSED_SUCC,
171      p_persons_errored            => L_PERSONS_ERRORED);
172     CP_START_DATE                 := l_start_date;
173   CP_END_DATE                   := l_end_date;
174   CP_START_TIME                 := l_start_time;
175   CP_END_TIME                   := l_end_time;
176   CP_ELAPSED_TIME               := l_elapsed_time;
177   CP_PERSONS_SELECTED           := l_persons_selected;
178   CP_PERSONS_PROCESSED          := l_persons_processed;
179   CP_PERSONS_ERRORED            := l_persons_errored;
180   CP_PERSONS_UNPROCESSED        := l_persons_unprocessed;
181   CP_PERSONS_PROCESSED_SUCC     := l_persons_processed_succ;
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_DEBUG_MESSAGES_p return varchar2 is
210 	Begin
211 	 return CP_DEBUG_MESSAGES;
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_SELE_RULE_FUN 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_ACTNNOACTN_p return number is
326 	Begin
327 	 return CP_ACTNNOACTN;
328 	 END;
329  Function CP_ACTNCLSED_p return number is
330 	Begin
331 	 return CP_ACTNCLSED;
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_TOTPROCD_p return number is
358 	Begin
359 	 return CP_TOTPROCD;
360 	 END;
361  Function CP_ACTNNOENRTDEL_p return number is
362 	Begin
363 	 return CP_ACTNNOENRTDEL;
364 	 END;
365  Function CP_ACTNENRTDEL_p return number is
366 	Begin
367 	 return CP_ACTNENRTDEL;
368 	 END;
369  Function CP_LOCATION_p return varchar2 is
370 	Begin
371 	 return CP_LOCATION;
372 	 END;
373  Function CP_AUDIT_LOG_FLAG_p return varchar2 is
374 	Begin
375 	 return CP_AUDIT_LOG_FLAG;
376 	 END;
377 END BEN_BENUASUM_XMLP_PKG ;