[Home] [Help]
PACKAGE BODY: APPS.BEN_BENDFAUD_XMLP_PKG
Source
1 PACKAGE BODY BEN_BENDFAUD_XMLP_PKG AS
2 /* $Header: BENDFAUDB.pls 120.1 2007/12/10 08:29:55 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_location hr_locations.description%type ;
31 l_audit_log hr_lookups.meaning%type ;
32 l_benft_group ben_benfts_grp.name%type ;
33 l_all varchar2(80);
34 begin
35
36 ben_batch_reporting.standard_header
37 (p_concurrent_request_id => P_CONCURRENT_REQUEST_ID,
38 p_concurrent_program_name => L_CONCURRENT_PROGRAM_NAME,
39 p_process_date => L_PROCESS_DATE,
40 p_mode => L_MODE,
41 p_derivable_factors => L_DERIVABLE_FACTORS,
42 p_validate => L_VALIDATE,
43 p_person => L_PERSON,
44 p_person_type => L_PERSON_TYPE,
45 p_program => L_PROGRAM,
46 p_business_group => L_BUSINESS_GROUP,
47 p_plan => L_PLAN,
48 p_popl_enrt_typ_cycl => L_ENROLLMENT_TYPE_CYCLE,
49 p_plans_not_in_programs => L_PLANS_NOT_IN_PROGRAMS,
50 p_just_programs => L_JUST_PROGRAMS,
51 p_comp_object_selection_rule => L_COMP_OBJECT_SELECTION_RULE,
52 p_person_selection_rule => L_PERSON_SELECTION_RULE,
53 p_life_event_reason => L_LIFE_EVENT_REASON,
54 p_organization => L_ORGANIZATION,
55 p_postal_zip_range => L_POSTAL_ZIP_RANGE,
56 p_reporting_group => L_REPORTING_GROUP,
57 p_plan_type => L_PLAN_TYPE,
58 p_option => L_OPTION,
59 p_eligibility_profile => L_ELIGIBILITY_PROFILE,
60 p_variable_rate_profile => L_VARIABLE_RATE_PROFILE,
61 p_legal_entity => L_LEGAL_ENTITY,
62 p_payroll => L_PAYROLL,
63 p_status => L_STATUS);
64 CP_CONCURRENT_PROGRAM_NAME := l_concurrent_program_name;
65 CP_PROCESS_DATE := l_process_date;
66 CP_STATUS := l_status;
67 CP_BUSINESS_GROUP := l_business_group;
68 CP_VALIDATE := l_validate;
69 CP_PERSON := l_person;
70 CP_PERSON_TYPE := l_person_type;
71 CP_BUSINESS_GROUP := l_business_group;
72 CP_ENROLLMENT_TYPE_CYCLE := l_enrollment_type_cycle;
73 CP_PERSON_SELECTION_RULE := l_person_selection_rule;
74 CP_ORGANIZATION := l_organization;
75 CP_LEGAL_ENTITY := l_legal_entity;
76 CP_PAYROLL := l_payroll;
77 CP_BENEFIT_GROUP := l_benft_group;
78
79 fnd_message.set_name('BEN','BEN_91792_ALL_PROMPT');
80 l_all := substrb(fnd_message.get,1,80);
81 begin
82 select location_code into CP_LOCATION
83 from hr_locations a,
84 ben_benefit_actions b
85 where a.location_id = b.location_id
86 and b.request_id = P_CONCURRENT_REQUEST_ID;
87
88 exception when no_data_found then
89 CP_LOCATION := l_all;
90 end;
91 begin
92 select meaning into CP_AUDIT_LOG
93 from hr_lookups a,
94 ben_benefit_actions b
95 where a.lookup_type = 'YES_NO'
96 and a.lookup_code = b.AUDIT_LOG_FLAG
97 and b.request_id = P_CONCURRENT_REQUEST_ID;
98
99 exception when no_data_found then
100 null;
101 end;
102 begin
103 select name into CP_BENEFIT_GROUP
104 from ben_benfts_grp a,
105 ben_benefit_actions b
106 where a.benfts_grp_id = b.benfts_grp_id
107 and b.request_id = P_CONCURRENT_REQUEST_ID;
108
109 exception when no_data_found then
110 CP_BENEFIT_GROUP := l_all;
111 end;
112 return 1;
113 end;
114
115 function CF_PROCESS_INFORMATIONFormula return Number is
116 l_start_date varchar2(30);
117 l_end_date varchar2(30);
118 l_start_time varchar2(30);
119 l_end_time varchar2(30);
120 l_elapsed_time varchar2(30);
121 l_persons_selected varchar2(30);
122 l_persons_processed varchar2(30);
123 l_persons_errored varchar2(30);
124 l_persons_processed_succ varchar2(30);
125 l_persons_unprocessed varchar2(30);
126 begin
127 ben_batch_reporting.process_information
128 (p_concurrent_request_id => P_CONCURRENT_REQUEST_ID,
129 p_start_date => L_START_DATE,
130 p_end_date => L_END_DATE,
131 p_start_time => L_START_TIME,
132 p_end_time => L_END_TIME,
133 p_elapsed_time => L_ELAPSED_TIME,
134 p_persons_selected => L_PERSONS_SELECTED,
135 p_persons_processed => L_PERSONS_PROCESSED,
136 p_persons_unprocessed => L_PERSONS_UNPROCESSED,
137 p_persons_processed_succ => L_PERSONS_PROCESSED_SUCC,
138 p_persons_errored => L_PERSONS_ERRORED);
139 CP_START_DATE := l_start_date;
140 CP_END_DATE := l_end_date;
141 CP_START_TIME := l_start_time;
142 CP_END_TIME := l_end_time;
143 CP_ELAPSED_TIME := l_elapsed_time;
144 CP_PERSONS_SELECTED := l_persons_selected;
145 CP_PERSONS_PROCESSED := l_persons_processed;
146 CP_PERSONS_ERRORED := l_persons_errored;
147 CP_PERSONS_UNPROCESSED := l_persons_unprocessed;
148 CP_PERSONS_PROCESSED_SUCC := l_persons_processed_succ;
149 return 1;
150 end;
151
152 function BeforeReport return boolean is
153 begin
154 -- hr_standard.event('BEFORE REPORT');
155 return (TRUE);
156 end;
157
158 function AfterReport return boolean is
159 begin
160 -- hr_standard.event('AFTER REPORT');
161 return (TRUE);
162 end;
163
164 function AfterPForm return boolean is
165 begin
166 P_CONC_REQUEST_ID := P_CONCURRENT_REQUEST_ID;
167 return (TRUE);
168 end;
169
170 --Functions to refer Oracle report placeholders--
171
172 Function CP_PROCESS_DATE_p return date is
173 Begin
174 return CP_PROCESS_DATE;
175 END;
176 Function CP_BUSINESS_GROUP_p return varchar2 is
177 Begin
178 return CP_BUSINESS_GROUP;
179 END;
180 Function CP_CONCURRENT_PROGRAM_NAME_p return varchar2 is
181 Begin
182 return CP_CONCURRENT_PROGRAM_NAME;
183 END;
184 Function CP_START_DATE_p return varchar2 is
185 Begin
186 return CP_START_DATE;
187 END;
188 Function CP_END_DATE_p return varchar2 is
189 Begin
190 return CP_END_DATE;
191 END;
192 Function CP_ELAPSED_TIME_p return varchar2 is
193 Begin
194 return CP_ELAPSED_TIME;
195 END;
196 Function CP_PERSONS_SELECTED_p return number is
197 Begin
198 return CP_PERSONS_SELECTED;
199 END;
200 Function CP_PERSONS_PROCESSED_p return number is
201 Begin
202 return CP_PERSONS_PROCESSED;
203 END;
204 Function CP_START_TIME_p return varchar2 is
205 Begin
206 return CP_START_TIME;
207 END;
208 Function CP_END_TIME_p return varchar2 is
209 Begin
210 return CP_END_TIME;
211 END;
212 Function CP_PERSONS_UNPROCESSED_p return number is
213 Begin
214 return CP_PERSONS_UNPROCESSED;
215 END;
216 Function CP_PERSONS_PROCESSED_SUCC_p return number is
217 Begin
218 return CP_PERSONS_PROCESSED_SUCC;
219 END;
220 Function CP_PERSONS_ERRORED_p return number is
221 Begin
222 return CP_PERSONS_ERRORED;
223 END;
224 Function CP_STATUS_p return varchar2 is
225 Begin
226 return CP_STATUS;
227 END;
228 Function CP_VALIDATE_p return varchar2 is
229 Begin
230 return CP_VALIDATE;
231 END;
232 Function CP_PERSON_p return varchar2 is
233 Begin
234 return CP_PERSON;
235 END;
236 Function CP_PERSON_TYPE_p return varchar2 is
237 Begin
238 return CP_PERSON_TYPE;
239 END;
240 Function CP_PERSON_SELECTION_RULE_p return varchar2 is
241 Begin
242 return CP_PERSON_SELECTION_RULE;
243 END;
244 Function CP_ENROLLMENT_TYPE_CYCLE_p return varchar2 is
245 Begin
246 return CP_ENROLLMENT_TYPE_CYCLE;
247 END;
248 Function CP_ORGANIZATION_p return varchar2 is
249 Begin
250 return CP_ORGANIZATION;
251 END;
252 Function CP_LEGAL_ENTITY_p return varchar2 is
253 Begin
254 return CP_LEGAL_ENTITY;
255 END;
256 Function CP_AUDIT_LOG_p return varchar2 is
257 Begin
258 return CP_AUDIT_LOG;
259 END;
260 Function CP_BENEFIT_GROUP_p return varchar2 is
261 Begin
262 return CP_BENEFIT_GROUP;
263 END;
264 Function CP_LOCATION_p return varchar2 is
265 Begin
266 return CP_LOCATION;
267 END;
268 Function CP_PAYROLL_p return varchar2 is
269 Begin
270 return CP_PAYROLL;
271 END;
272 END BEN_BENDFAUD_XMLP_PKG ;