[Home] [Help]
PACKAGE BODY: APPS.BEN_EPE_SHD
Source
1 Package Body ben_epe_shd as
2 /* $Header: beeperhi.pkb 120.0 2005/05/28 02:36:58 appldev noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' ben_epe_shd.'; -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------< return_api_dml_status >-------------------------|
12 -- ----------------------------------------------------------------------------
13 Function return_api_dml_status Return Boolean Is
14 --
15 l_proc varchar2(72) := g_package||'return_api_dml_status';
16 --
17 Begin
18 hr_utility.set_location('Entering:'||l_proc, 5);
19 --
20 Return (nvl(g_api_dml, false));
21 --
22 hr_utility.set_location(' Leaving:'||l_proc, 10);
23 End return_api_dml_status;
24 --
25 -- ----------------------------------------------------------------------------
26 -- |---------------------------< constraint_error >---------------------------|
27 -- ----------------------------------------------------------------------------
28 Procedure constraint_error
29 (p_constraint_name in all_constraints.constraint_name%TYPE) Is
30 --
31 l_proc varchar2(72) := g_package||'constraint_error';
32 --
33 Begin
34 --
35 If (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT1') Then
36 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
37 hr_utility.set_message_token('PROCEDURE', l_proc);
38 hr_utility.set_message_token('STEP','10');
39 hr_utility.raise_error;
40 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT2') Then
41 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
42 hr_utility.set_message_token('PROCEDURE', l_proc);
43 hr_utility.set_message_token('STEP','');
44 hr_utility.raise_error;
45 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT3') Then
46 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
47 hr_utility.set_message_token('PROCEDURE', l_proc);
48 hr_utility.set_message_token('STEP','');
49 hr_utility.raise_error;
50 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT4') Then
51 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
52 hr_utility.set_message_token('PROCEDURE', l_proc);
53 hr_utility.set_message_token('STEP','');
54 hr_utility.raise_error;
55 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT5') Then
56 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
57 hr_utility.set_message_token('PROCEDURE', l_proc);
58 hr_utility.set_message_token('STEP','');
59 hr_utility.raise_error;
60 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT6') Then
61 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
62 hr_utility.set_message_token('PROCEDURE', l_proc);
63 hr_utility.set_message_token('STEP','');
64 hr_utility.raise_error;
65 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT7') Then
66 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
67 hr_utility.set_message_token('PROCEDURE', l_proc);
68 hr_utility.set_message_token('STEP','');
69 hr_utility.raise_error;
70 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT8') Then
71 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
72 hr_utility.set_message_token('PROCEDURE', l_proc);
73 hr_utility.set_message_token('STEP','');
74 hr_utility.raise_error;
75 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT9') Then
76 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
77 hr_utility.set_message_token('PROCEDURE', l_proc);
78 hr_utility.set_message_token('STEP','');
79 hr_utility.raise_error;
80 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT10') Then
81 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
82 hr_utility.set_message_token('PROCEDURE', l_proc);
83 hr_utility.set_message_token('STEP','');
84 hr_utility.raise_error;
85 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT11') Then
86 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
87 hr_utility.set_message_token('PROCEDURE', l_proc);
88 hr_utility.set_message_token('STEP','');
89 hr_utility.raise_error;
90 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT12') Then
91 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
92 hr_utility.set_message_token('PROCEDURE', l_proc);
93 hr_utility.set_message_token('STEP','');
94 hr_utility.raise_error;
95 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT13') Then
96 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
97 hr_utility.set_message_token('PROCEDURE', l_proc);
98 hr_utility.set_message_token('STEP','');
99 hr_utility.raise_error;
100 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT14') Then
101 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
102 hr_utility.set_message_token('PROCEDURE', l_proc);
103 hr_utility.set_message_token('STEP','');
104 hr_utility.raise_error;
105 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT15') Then
106 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
107 hr_utility.set_message_token('PROCEDURE', l_proc);
108 hr_utility.set_message_token('STEP','');
109 hr_utility.raise_error;
110 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_DT16') Then
111 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
112 hr_utility.set_message_token('PROCEDURE', l_proc);
113 hr_utility.set_message_token('STEP','');
114 hr_utility.raise_error;
115 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_FK15') Then
116 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
117 hr_utility.set_message_token('PROCEDURE', l_proc);
118 hr_utility.set_message_token('STEP','');
119 hr_utility.raise_error;
120 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_FK18') Then
121 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
122 hr_utility.set_message_token('PROCEDURE', l_proc);
123 hr_utility.set_message_token('STEP','');
124 hr_utility.raise_error;
125 ElsIf (p_constraint_name = 'BEN_ELIG_PER_ELCTBL_CHC_PK') Then
126 hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
127 hr_utility.set_message_token('PROCEDURE', l_proc);
128 hr_utility.set_message_token('STEP','5');
129 hr_utility.raise_error;
130 Else
131 hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
132 hr_utility.set_message_token('PROCEDURE', l_proc);
133 hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
134 hr_utility.raise_error;
135 End If;
136 --
137 End constraint_error;
138 --
139 -- ----------------------------------------------------------------------------
140 -- |-----------------------------< api_updating >-----------------------------|
141 -- ----------------------------------------------------------------------------
142 Function api_updating
143 (
144 p_elig_per_elctbl_chc_id in number,
145 p_object_version_number in number
146 ) Return Boolean Is
147 --
148 --
149 -- Cursor selects the 'current' row from the HR Schema
150 --
151 Cursor C_Sel1 is
152 select
153 elig_per_elctbl_chc_id,
154 -- enrt_typ_cycl_cd,
155 enrt_cvg_strt_dt_cd,
156 -- enrt_perd_end_dt,
157 -- enrt_perd_strt_dt,
158 enrt_cvg_strt_dt_rl,
159 -- rt_strt_dt,
160 -- rt_strt_dt_rl,
161 -- rt_strt_dt_cd,
162 ctfn_rqd_flag,
163 pil_elctbl_chc_popl_id,
164 roll_crs_flag,
165 crntly_enrd_flag,
166 dflt_flag,
167 elctbl_flag,
168 mndtry_flag,
169 in_pndg_wkflow_flag,
170 -- dflt_enrt_dt,
171 dpnt_cvg_strt_dt_cd,
172 dpnt_cvg_strt_dt_rl,
173 enrt_cvg_strt_dt,
174 alws_dpnt_dsgn_flag,
175 dpnt_dsgn_cd,
176 ler_chg_dpnt_cvg_cd,
177 erlst_deenrt_dt,
178 procg_end_dt,
179 comp_lvl_cd,
180 pl_id,
181 oipl_id,
182 pgm_id,
183 plip_id,
184 ptip_id,
185 pl_typ_id,
186 oiplip_id,
187 cmbn_plip_id,
188 cmbn_ptip_id,
189 cmbn_ptip_opt_id,
190 assignment_id,
191 spcl_rt_pl_id,
192 spcl_rt_oipl_id,
193 must_enrl_anthr_pl_id,
194 interim_elig_per_elctbl_chc_id,
195 prtt_enrt_rslt_id,
196 bnft_prvdr_pool_id,
197 per_in_ler_id,
198 yr_perd_id,
199 auto_enrt_flag,
200 business_group_id,
201 pl_ordr_num,
202 plip_ordr_num,
203 ptip_ordr_num,
204 oipl_ordr_num,
205 -- cwb
206 comments,
207 elig_flag,
208 elig_ovrid_dt,
209 elig_ovrid_person_id,
210 inelig_rsn_cd,
211 mgr_ovrid_dt,
212 mgr_ovrid_person_id,
213 ws_mgr_id,
214 -- cwb
215 epe_attribute_category,
216 epe_attribute1,
217 epe_attribute2,
218 epe_attribute3,
219 epe_attribute4,
220 epe_attribute5,
221 epe_attribute6,
222 epe_attribute7,
223 epe_attribute8,
224 epe_attribute9,
225 epe_attribute10,
226 epe_attribute11,
227 epe_attribute12,
228 epe_attribute13,
229 epe_attribute14,
230 epe_attribute15,
231 epe_attribute16,
232 epe_attribute17,
233 epe_attribute18,
234 epe_attribute19,
235 epe_attribute20,
236 epe_attribute21,
237 epe_attribute22,
238 epe_attribute23,
239 epe_attribute24,
240 epe_attribute25,
241 epe_attribute26,
242 epe_attribute27,
243 epe_attribute28,
244 epe_attribute29,
245 epe_attribute30,
246 approval_status_cd,
247 fonm_cvg_strt_dt,
248 cryfwd_elig_dpnt_cd,
249 request_id,
250 program_application_id,
251 program_id,
252 program_update_date,
253 object_version_number
254 from ben_elig_per_elctbl_chc
255 where elig_per_elctbl_chc_id = p_elig_per_elctbl_chc_id;
256 --
257 l_proc varchar2(72) := g_package||'api_updating';
258 l_fct_ret boolean;
259 --
260 Begin
261 /*
262 hr_utility.set_location('Entering:'||l_proc, 5);
263 */
264 --
265 If (
266 p_elig_per_elctbl_chc_id is null and
267 p_object_version_number is null
268 ) Then
269 --
270 -- One of the primary key arguments is null therefore we must
271 -- set the returning function value to false
272 --
273 l_fct_ret := false;
274 Else
275 If (
276 p_elig_per_elctbl_chc_id = g_old_rec.elig_per_elctbl_chc_id and
277 p_object_version_number = g_old_rec.object_version_number
278 ) Then
279 /*
280 hr_utility.set_location(l_proc, 10);
281 */
282 --
283 -- The g_old_rec is current therefore we must
284 -- set the returning function to true
285 --
286 l_fct_ret := true;
287 Else
288 --
289 -- Select the current row into g_old_rec
290 --
291 Open C_Sel1;
292 Fetch C_Sel1 Into g_old_rec;
293 If C_Sel1%notfound Then
294 Close C_Sel1;
295 --
296 -- The primary key is invalid therefore we must error
297 --
298 hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
299 hr_utility.raise_error;
300 End If;
301 Close C_Sel1;
302 If (p_object_version_number <> g_old_rec.object_version_number) Then
303 hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
304 hr_utility.raise_error;
305 End If;
306 /*
307 hr_utility.set_location(l_proc, 15);
308 */
309 l_fct_ret := true;
310 End If;
311 End If;
312 /*
313 hr_utility.set_location(' Leaving:'||l_proc, 20);
314 */
315 Return (l_fct_ret);
316 --
317 End api_updating;
318 --
319 -- ----------------------------------------------------------------------------
320 -- |---------------------------------< lck >----------------------------------|
321 -- ----------------------------------------------------------------------------
322 Procedure lck
323 (
324 p_elig_per_elctbl_chc_id in number,
325 p_object_version_number in number
326 ) is
327 --
328 -- Cursor selects the 'current' row from the HR Schema
329 --
330 Cursor C_Sel1 is
331 select elig_per_elctbl_chc_id,
332 -- enrt_typ_cycl_cd,
333 enrt_cvg_strt_dt_cd,
334 -- enrt_perd_end_dt,
335 -- enrt_perd_strt_dt,
336 enrt_cvg_strt_dt_rl,
337 -- rt_strt_dt,
338 -- rt_strt_dt_rl,
339 -- rt_strt_dt_cd,
340 ctfn_rqd_flag,
341 pil_elctbl_chc_popl_id,
342 roll_crs_flag,
343 crntly_enrd_flag,
344 dflt_flag,
345 elctbl_flag,
346 mndtry_flag,
347 in_pndg_wkflow_flag,
348 -- dflt_enrt_dt,
349 dpnt_cvg_strt_dt_cd,
350 dpnt_cvg_strt_dt_rl,
351 enrt_cvg_strt_dt,
352 alws_dpnt_dsgn_flag,
353 dpnt_dsgn_cd,
354 ler_chg_dpnt_cvg_cd,
355 erlst_deenrt_dt,
356 procg_end_dt,
357 comp_lvl_cd,
358 pl_id,
359 oipl_id,
360 pgm_id,
361 plip_id,
362 ptip_id,
363 pl_typ_id,
364 oiplip_id,
365 cmbn_plip_id,
366 cmbn_ptip_id,
367 cmbn_ptip_opt_id,
368 assignment_id,
369 spcl_rt_pl_id,
370 spcl_rt_oipl_id,
371 must_enrl_anthr_pl_id,
372 interim_elig_per_elctbl_chc_id,
373 prtt_enrt_rslt_id,
374 bnft_prvdr_pool_id,
375 per_in_ler_id,
376 yr_perd_id,
377 auto_enrt_flag,
378 business_group_id,
379 pl_ordr_num,
380 plip_ordr_num,
381 ptip_ordr_num,
382 oipl_ordr_num,
383 -- cwb
384 comments,
385 elig_flag,
386 elig_ovrid_dt,
387 elig_ovrid_person_id,
388 inelig_rsn_cd,
389 mgr_ovrid_dt,
390 mgr_ovrid_person_id,
391 ws_mgr_id,
392 -- cwb
393 epe_attribute_category,
394 epe_attribute1,
395 epe_attribute2,
396 epe_attribute3,
397 epe_attribute4,
398 epe_attribute5,
399 epe_attribute6,
400 epe_attribute7,
401 epe_attribute8,
402 epe_attribute9,
403 epe_attribute10,
404 epe_attribute11,
405 epe_attribute12,
406 epe_attribute13,
407 epe_attribute14,
408 epe_attribute15,
409 epe_attribute16,
410 epe_attribute17,
411 epe_attribute18,
412 epe_attribute19,
413 epe_attribute20,
414 epe_attribute21,
415 epe_attribute22,
416 epe_attribute23,
417 epe_attribute24,
418 epe_attribute25,
419 epe_attribute26,
420 epe_attribute27,
421 epe_attribute28,
422 epe_attribute29,
423 epe_attribute30,
424 approval_status_cd,
425 fonm_cvg_strt_dt,
426 cryfwd_elig_dpnt_cd,
427 request_id,
428 program_application_id,
429 program_id,
430 program_update_date,
431 object_version_number
432 from ben_elig_per_elctbl_chc
433 where elig_per_elctbl_chc_id = p_elig_per_elctbl_chc_id
434 for update nowait;
435 --
436 l_proc varchar2(72) := g_package||'lck';
437 --
438 Begin
439 hr_utility.set_location('Entering:'||l_proc, 5);
440 --
441 -- Add any mandatory argument checking here:
442 -- Example:
443 -- hr_api.mandatory_arg_error
444 -- (p_api_name => l_proc,
445 -- p_argument => 'object_version_number',
446 -- p_argument_value => p_object_version_number);
447 --
448 Open C_Sel1;
449 Fetch C_Sel1 Into g_old_rec;
450 If C_Sel1%notfound then
451 Close C_Sel1;
452 --
453 -- The primary key is invalid therefore we must error
454 --
458 Close C_Sel1;
455 hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
456 hr_utility.raise_error;
457 End If;
459 If (p_object_version_number <> g_old_rec.object_version_number) Then
460 hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
461 hr_utility.raise_error;
462 End If;
463 --
464 hr_utility.set_location(' Leaving:'||l_proc, 10);
465 --
466 -- We need to trap the ORA LOCK exception
467 --
468 Exception
469 When HR_Api.Object_Locked then
470 --
471 -- The object is locked therefore we need to supply a meaningful
472 -- error message.
473 --
474 hr_utility.set_message(805, 'BEN_93618_EPE_OBJECT_LOCKED'); -- Bug 3140549
475 --hr_utility.set_message_token('TABLE_NAME', 'ben_elig_per_elctbl_chc');
476 hr_utility.raise_error;
477 End lck;
478 --
479 -- ----------------------------------------------------------------------------
480 -- |-----------------------------< convert_args >-----------------------------|
481 -- ----------------------------------------------------------------------------
482 Function convert_args
483 (
484 p_elig_per_elctbl_chc_id in number,
485 -- p_enrt_typ_cycl_cd in varchar2,
486 p_enrt_cvg_strt_dt_cd in varchar2,
487 -- p_enrt_perd_end_dt in date,
488 -- p_enrt_perd_strt_dt in date,
489 p_enrt_cvg_strt_dt_rl in varchar2,
490 -- p_rt_strt_dt in date,
491 -- p_rt_strt_dt_rl in varchar2,
492 -- p_rt_strt_dt_cd in varchar2,
493 p_ctfn_rqd_flag in varchar2,
494 p_pil_elctbl_chc_popl_id in number,
495 p_roll_crs_flag in varchar2,
496 p_crntly_enrd_flag in varchar2,
497 p_dflt_flag in varchar2,
498 p_elctbl_flag in varchar2,
499 p_mndtry_flag in varchar2,
500 p_in_pndg_wkflow_flag in varchar2,
501 -- p_dflt_enrt_dt in date,
502 p_dpnt_cvg_strt_dt_cd in varchar2,
503 p_dpnt_cvg_strt_dt_rl in varchar2,
504 p_enrt_cvg_strt_dt in date,
505 p_alws_dpnt_dsgn_flag in varchar2,
506 p_dpnt_dsgn_cd in varchar2,
507 p_ler_chg_dpnt_cvg_cd in varchar2,
508 p_erlst_deenrt_dt in date,
509 p_procg_end_dt in date,
510 p_comp_lvl_cd in varchar2,
511 p_pl_id in number,
512 p_oipl_id in number,
513 p_pgm_id in number,
514 p_plip_id in number,
515 p_ptip_id in number,
516 p_pl_typ_id in number,
517 p_oiplip_id in number,
518 p_cmbn_plip_id in number,
519 p_cmbn_ptip_id in number,
520 p_cmbn_ptip_opt_id in number,
521 p_assignment_id in number,
522 p_spcl_rt_pl_id in number,
523 p_spcl_rt_oipl_id in number,
524 p_must_enrl_anthr_pl_id in number,
525 p_int_elig_per_elctbl_chc_id in number,
526 p_prtt_enrt_rslt_id in number,
527 p_bnft_prvdr_pool_id in number,
528 p_per_in_ler_id in number,
529 p_yr_perd_id in number,
530 p_auto_enrt_flag in varchar2,
531 p_business_group_id in number,
532 p_pl_ordr_num in number,
533 p_plip_ordr_num in number,
534 p_ptip_ordr_num in number,
535 p_oipl_ordr_num in number,
536 -- cwb
537 p_comments in varchar2,
538 p_elig_flag in varchar2,
539 p_elig_ovrid_dt in date,
540 p_elig_ovrid_person_id in number,
541 p_inelig_rsn_cd in varchar2,
542 p_mgr_ovrid_dt in date,
543 p_mgr_ovrid_person_id in number,
544 p_ws_mgr_id in number,
545 -- cwb
546 p_epe_attribute_category in varchar2,
547 p_epe_attribute1 in varchar2,
548 p_epe_attribute2 in varchar2,
549 p_epe_attribute3 in varchar2,
550 p_epe_attribute4 in varchar2,
551 p_epe_attribute5 in varchar2,
552 p_epe_attribute6 in varchar2,
553 p_epe_attribute7 in varchar2,
554 p_epe_attribute8 in varchar2,
555 p_epe_attribute9 in varchar2,
556 p_epe_attribute10 in varchar2,
557 p_epe_attribute11 in varchar2,
558 p_epe_attribute12 in varchar2,
559 p_epe_attribute13 in varchar2,
560 p_epe_attribute14 in varchar2,
561 p_epe_attribute15 in varchar2,
562 p_epe_attribute16 in varchar2,
563 p_epe_attribute17 in varchar2,
564 p_epe_attribute18 in varchar2,
565 p_epe_attribute19 in varchar2,
566 p_epe_attribute20 in varchar2,
567 p_epe_attribute21 in varchar2,
568 p_epe_attribute22 in varchar2,
572 p_epe_attribute26 in varchar2,
569 p_epe_attribute23 in varchar2,
570 p_epe_attribute24 in varchar2,
571 p_epe_attribute25 in varchar2,
573 p_epe_attribute27 in varchar2,
574 p_epe_attribute28 in varchar2,
575 p_epe_attribute29 in varchar2,
576 p_epe_attribute30 in varchar2,
577 p_approval_status_cd in varchar2,
578 p_fonm_cvg_strt_dt in date,
579 p_cryfwd_elig_dpnt_cd in varchar2,
580 p_request_id in number,
581 p_program_application_id in number,
582 p_program_id in number,
583 p_program_update_date in date,
584 p_object_version_number in number
585 )
586 Return g_rec_type is
587 --
588 l_rec g_rec_type;
589 l_proc varchar2(72) := g_package||'convert_args';
590 --
591 Begin
592 --
593 hr_utility.set_location('Entering:'||l_proc, 5);
594 --
595 -- Convert arguments into local l_rec structure.
596 --
597 l_rec.elig_per_elctbl_chc_id := p_elig_per_elctbl_chc_id;
598 -- l_rec.enrt_typ_cycl_cd := p_enrt_typ_cycl_cd;
599 l_rec.enrt_cvg_strt_dt_cd := p_enrt_cvg_strt_dt_cd;
600 -- l_rec.enrt_perd_end_dt := p_enrt_perd_end_dt;
601 -- l_rec.enrt_perd_strt_dt := p_enrt_perd_strt_dt;
602 l_rec.enrt_cvg_strt_dt_rl := p_enrt_cvg_strt_dt_rl;
603 -- l_rec.rt_strt_dt := p_rt_strt_dt;
604 -- l_rec.rt_strt_dt_rl := p_rt_strt_dt_rl;
605 -- l_rec.rt_strt_dt_cd := p_rt_strt_dt_cd;
606 l_rec.ctfn_rqd_flag := p_ctfn_rqd_flag;
607 l_rec.pil_elctbl_chc_popl_id := p_pil_elctbl_chc_popl_id;
608 l_rec.roll_crs_flag := p_roll_crs_flag;
609 l_rec.crntly_enrd_flag := p_crntly_enrd_flag;
610 l_rec.dflt_flag := p_dflt_flag;
611 l_rec.elctbl_flag := p_elctbl_flag;
612 l_rec.mndtry_flag := p_mndtry_flag;
613 l_rec.in_pndg_wkflow_flag := p_in_pndg_wkflow_flag;
614 -- l_rec.dflt_enrt_dt := p_dflt_enrt_dt;
615 l_rec.dpnt_cvg_strt_dt_cd := p_dpnt_cvg_strt_dt_cd;
616 l_rec.dpnt_cvg_strt_dt_rl := p_dpnt_cvg_strt_dt_rl;
617 l_rec.enrt_cvg_strt_dt := p_enrt_cvg_strt_dt;
618 l_rec.alws_dpnt_dsgn_flag := p_alws_dpnt_dsgn_flag;
619 l_rec.dpnt_dsgn_cd := p_dpnt_dsgn_cd;
620 l_rec.ler_chg_dpnt_cvg_cd := p_ler_chg_dpnt_cvg_cd;
621 l_rec.erlst_deenrt_dt := p_erlst_deenrt_dt;
622 l_rec.procg_end_dt := p_procg_end_dt;
623 l_rec.comp_lvl_cd := p_comp_lvl_cd;
624 l_rec.pl_id := p_pl_id;
625 l_rec.oipl_id := p_oipl_id;
626 l_rec.pgm_id := p_pgm_id;
627 l_rec.plip_id := p_plip_id;
628 l_rec.ptip_id := p_ptip_id;
629 l_rec.pl_typ_id := p_pl_typ_id;
630 l_rec.oiplip_id := p_oiplip_id;
631 l_rec.cmbn_plip_id := p_cmbn_plip_id;
632 l_rec.cmbn_ptip_id := p_cmbn_ptip_id;
633 l_rec.cmbn_ptip_opt_id := p_cmbn_ptip_opt_id;
634 l_rec.assignment_id := p_assignment_id;
635 l_rec.spcl_rt_pl_id := p_spcl_rt_pl_id;
636 l_rec.spcl_rt_oipl_id := p_spcl_rt_oipl_id;
637 l_rec.must_enrl_anthr_pl_id := p_must_enrl_anthr_pl_id;
638 l_rec.int_elig_per_elctbl_chc_id := p_int_elig_per_elctbl_chc_id;
639 l_rec.prtt_enrt_rslt_id := p_prtt_enrt_rslt_id;
640 l_rec.bnft_prvdr_pool_id := p_bnft_prvdr_pool_id;
641 l_rec.per_in_ler_id := p_per_in_ler_id;
642 l_rec.yr_perd_id := p_yr_perd_id;
643 l_rec.auto_enrt_flag := p_auto_enrt_flag;
644 l_rec.business_group_id := p_business_group_id;
645 l_rec.pl_ordr_num := p_pl_ordr_num;
646 l_rec.plip_ordr_num := p_plip_ordr_num;
647 l_rec.ptip_ordr_num := p_ptip_ordr_num;
648 l_rec.oipl_ordr_num := p_oipl_ordr_num;
649 -- cwb
650 l_rec.comments := p_comments;
651 l_rec.elig_flag := p_elig_flag;
652 l_rec.elig_ovrid_dt := p_elig_ovrid_dt;
653 l_rec.elig_ovrid_person_id := p_elig_ovrid_person_id;
654 l_rec.inelig_rsn_cd := p_inelig_rsn_cd;
655 l_rec.mgr_ovrid_dt := p_mgr_ovrid_dt;
656 l_rec.mgr_ovrid_person_id := p_mgr_ovrid_person_id;
657 l_rec.ws_mgr_id := p_ws_mgr_id;
658 -- cwb
659 l_rec.epe_attribute_category := p_epe_attribute_category;
660 l_rec.epe_attribute1 := p_epe_attribute1;
661 l_rec.epe_attribute2 := p_epe_attribute2;
662 l_rec.epe_attribute3 := p_epe_attribute3;
663 l_rec.epe_attribute4 := p_epe_attribute4;
664 l_rec.epe_attribute5 := p_epe_attribute5;
665 l_rec.epe_attribute6 := p_epe_attribute6;
666 l_rec.epe_attribute7 := p_epe_attribute7;
667 l_rec.epe_attribute8 := p_epe_attribute8;
668 l_rec.epe_attribute9 := p_epe_attribute9;
669 l_rec.epe_attribute10 := p_epe_attribute10;
670 l_rec.epe_attribute11 := p_epe_attribute11;
671 l_rec.epe_attribute12 := p_epe_attribute12;
672 l_rec.epe_attribute13 := p_epe_attribute13;
673 l_rec.epe_attribute14 := p_epe_attribute14;
674 l_rec.epe_attribute15 := p_epe_attribute15;
675 l_rec.epe_attribute16 := p_epe_attribute16;
676 l_rec.epe_attribute17 := p_epe_attribute17;
677 l_rec.epe_attribute18 := p_epe_attribute18;
678 l_rec.epe_attribute19 := p_epe_attribute19;
679 l_rec.epe_attribute20 := p_epe_attribute20;
680 l_rec.epe_attribute21 := p_epe_attribute21;
681 l_rec.epe_attribute22 := p_epe_attribute22;
682 l_rec.epe_attribute23 := p_epe_attribute23;
683 l_rec.epe_attribute24 := p_epe_attribute24;
684 l_rec.epe_attribute25 := p_epe_attribute25;
685 l_rec.epe_attribute26 := p_epe_attribute26;
686 l_rec.epe_attribute27 := p_epe_attribute27;
687 l_rec.epe_attribute28 := p_epe_attribute28;
688 l_rec.epe_attribute29 := p_epe_attribute29;
689 l_rec.epe_attribute30 := p_epe_attribute30;
690 l_rec.approval_status_cd := p_approval_status_cd;
691 l_rec.fonm_cvg_strt_dt := p_fonm_cvg_strt_dt;
692 l_rec.cryfwd_elig_dpnt_cd := p_cryfwd_elig_dpnt_cd;
693 l_rec.request_id := p_request_id;
694 l_rec.program_application_id := p_program_application_id;
695 l_rec.program_id := p_program_id;
696 l_rec.program_update_date := p_program_update_date;
697 l_rec.object_version_number := p_object_version_number;
698 --
699 -- Return the plsql record structure.
700 --
701 hr_utility.set_location(' Leaving:'||l_proc, 10);
702 Return(l_rec);
703 --
704 End convert_args;
705 --
706 end ben_epe_shd;