[Home] [Help]
PACKAGE BODY: APPS.BEN_ECR_INS
Source
1 Package Body ben_ecr_ins as
2 /* $Header: beecrrhi.pkb 115.21 2002/12/27 20:59:56 pabodla ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' ben_ecr_ins.'; -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------------< insert_dml >------------------------------|
12 -- ----------------------------------------------------------------------------
13 -- {Start Of Comments}
14 --
15 -- Description:
16 -- this procedure controls the actual dml insert logic. the processing of
17 -- this procedure are as follows:
18 -- 1) Initialise the object_version_number to 1 if the object_version_number
19 -- is defined as an attribute for this entity.
20 -- 2) To set and unset the g_api_dml status as required (as we are about to
21 -- perform dml).
22 -- 3) To insert the row into the schema.
23 -- 4) To trap any constraint violations that may have occurred.
24 -- 5) To raise any other errors.
25 --
26 -- Prerequisites:
27 -- This is an internal private procedure which must be called from the ins
28 -- procedure and must have all mandatory attributes set (except the
29 -- object_version_number which is initialised within this procedure).
30 --
31 -- In Parameters:
32 -- A Pl/Sql record structre.
33 --
34 -- Post Success:
35 -- The specified row will be inserted into the schema.
36 --
37 -- Post Failure:
38 -- On the insert dml failure it is important to note that we always reset the
39 -- g_api_dml status to false.
40 -- If a check, unique or parent integrity constraint violation is raised the
41 -- constraint_error procedure will be called.
42 -- If any other error is reported, the error will be raised after the
43 -- g_api_dml status is reset.
44 --
45 -- Developer Implementation Notes:
46 -- None.
47 --
48 -- Access Status:
49 -- Internal Row Handler Use Only.
50 --
51 -- {End Of Comments}
52 -- ----------------------------------------------------------------------------
53 Procedure insert_dml(p_rec in out nocopy ben_ecr_shd.g_rec_type) is
54 --
55 l_proc varchar2(72) := g_package||'insert_dml';
56 --
57 Begin
58 hr_utility.set_location('Entering:'||l_proc, 5);
59 p_rec.object_version_number := 1; -- Initialise the object version
60 --
61 ben_ecr_shd.g_api_dml := true; -- Set the api dml status
62 --
63 -- Insert the row into: ben_enrt_rt
64 --
65 insert into ben_enrt_rt
66 (enrt_rt_id ,
67 ordr_num,
68 acty_typ_cd ,
69 tx_typ_cd ,
70 ctfn_rqd_flag ,
71 dflt_flag ,
72 dflt_pndg_ctfn_flag ,
73 dsply_on_enrt_flag ,
74 use_to_calc_net_flx_cr_flag,
75 entr_val_at_enrt_flag ,
76 asn_on_enrt_flag ,
77 rl_crs_only_flag ,
78 dflt_val ,
79 ann_val ,
80 ann_mn_elcn_val ,
81 ann_mx_elcn_val ,
82 val ,
83 nnmntry_uom ,
84 mx_elcn_val ,
85 mn_elcn_val ,
86 incrmt_elcn_val ,
87 cmcd_acty_ref_perd_cd ,
88 cmcd_mn_elcn_val ,
89 cmcd_mx_elcn_val ,
90 cmcd_val ,
91 cmcd_dflt_val ,
92 rt_usg_cd ,
93 ann_dflt_val ,
94 bnft_rt_typ_cd ,
95 rt_mlt_cd ,
96 dsply_mn_elcn_val ,
97 dsply_mx_elcn_val ,
98 entr_ann_val_flag ,
99 rt_strt_dt ,
100 rt_strt_dt_cd ,
101 rt_strt_dt_rl ,
102 rt_typ_cd ,
103 elig_per_elctbl_chc_id,
104 acty_base_rt_id ,
105 spcl_rt_enrt_rt_id ,
106 enrt_bnft_id ,
107 prtt_rt_val_id ,
108 decr_bnft_prvdr_pool_id,
109 cvg_amt_calc_mthd_id ,
110 actl_prem_id ,
111 comp_lvl_fctr_id ,
112 ptd_comp_lvl_fctr_id ,
113 clm_comp_lvl_fctr_id ,
114 business_group_id ,
115 --cwb
116 iss_val ,
117 val_last_upd_date ,
118 val_last_upd_person_id,
119 --cwb
120 pp_in_yr_used_num,
121 ecr_attribute_category,
122 ecr_attribute1 ,
123 ecr_attribute2 ,
124 ecr_attribute3 ,
125 ecr_attribute4 ,
126 ecr_attribute5 ,
127 ecr_attribute6 ,
128 ecr_attribute7 ,
129 ecr_attribute8 ,
130 ecr_attribute9 ,
131 ecr_attribute10 ,
132 ecr_attribute11 ,
133 ecr_attribute12 ,
134 ecr_attribute13 ,
135 ecr_attribute14 ,
136 ecr_attribute15 ,
137 ecr_attribute16 ,
138 ecr_attribute17 ,
139 ecr_attribute18 ,
140 ecr_attribute19 ,
141 ecr_attribute20 ,
142 ecr_attribute21 ,
143 ecr_attribute22 ,
144 ecr_attribute23 ,
145 ecr_attribute24 ,
146 ecr_attribute25 ,
147 ecr_attribute26 ,
148 ecr_attribute27 ,
149 ecr_attribute28 ,
150 ecr_attribute29 ,
151 ecr_attribute30 ,
152 last_update_login ,
153 created_by ,
154 creation_date ,
155 last_updated_by ,
156 last_update_date ,
157 request_id ,
158 program_application_id,
159 program_id ,
160 program_update_date ,
161 object_version_number
162 )
163 Values
164 (
165 p_rec.enrt_rt_id,
166 p_rec.ordr_num,
167 p_rec.acty_typ_cd,
168 p_rec.tx_typ_cd,
169 p_rec.ctfn_rqd_flag,
170 p_rec.dflt_flag,
171 p_rec.dflt_pndg_ctfn_flag,
172 p_rec.dsply_on_enrt_flag,
173 p_rec.use_to_calc_net_flx_cr_flag,
174 p_rec.entr_val_at_enrt_flag,
175 p_rec.asn_on_enrt_flag,
176 p_rec.rl_crs_only_flag,
177 p_rec.dflt_val,
178 p_rec.ann_val,
179 p_rec.ann_mn_elcn_val,
180 p_rec.ann_mx_elcn_val,
181 p_rec.val,
182 p_rec.nnmntry_uom,
183 p_rec.mx_elcn_val,
184 p_rec.mn_elcn_val,
185 p_rec.incrmt_elcn_val,
186 p_rec.cmcd_acty_ref_perd_cd,
187 p_rec.cmcd_mn_elcn_val,
188 p_rec.cmcd_mx_elcn_val,
189 p_rec.cmcd_val,
190 p_rec.cmcd_dflt_val,
191 p_rec.rt_usg_cd,
192 p_rec.ann_dflt_val,
193 p_rec.bnft_rt_typ_cd,
194 p_rec.rt_mlt_cd,
195 p_rec.dsply_mn_elcn_val,
196 p_rec.dsply_mx_elcn_val,
197 p_rec.entr_ann_val_flag,
198 p_rec.rt_strt_dt,
199 p_rec.rt_strt_dt_cd,
200 p_rec.rt_strt_dt_rl,
201 p_rec.rt_typ_cd,
202 p_rec.elig_per_elctbl_chc_id,
203 p_rec.acty_base_rt_id,
204 p_rec.spcl_rt_enrt_rt_id,
205 p_rec.enrt_bnft_id,
206 p_rec.prtt_rt_val_id,
207 p_rec.decr_bnft_prvdr_pool_id,
208 p_rec.cvg_amt_calc_mthd_id,
209 p_rec.actl_prem_id,
210 p_rec.comp_lvl_fctr_id,
211 p_rec.ptd_comp_lvl_fctr_id,
212 p_rec.clm_comp_lvl_fctr_id,
213 p_rec.business_group_id,
214 --cwb
215 p_rec.iss_val ,
216 p_rec.val_last_upd_date ,
217 p_rec.val_last_upd_person_id,
218 --cwb
219 p_rec.pp_in_yr_used_num,
220 p_rec.ecr_attribute_category,
221 p_rec.ecr_attribute1,
222 p_rec.ecr_attribute2,
223 p_rec.ecr_attribute3,
224 p_rec.ecr_attribute4,
225 p_rec.ecr_attribute5,
226 p_rec.ecr_attribute6,
227 p_rec.ecr_attribute7,
228 p_rec.ecr_attribute8,
229 p_rec.ecr_attribute9,
230 p_rec.ecr_attribute10,
231 p_rec.ecr_attribute11,
232 p_rec.ecr_attribute12,
233 p_rec.ecr_attribute13,
234 p_rec.ecr_attribute14,
235 p_rec.ecr_attribute15,
236 p_rec.ecr_attribute16,
237 p_rec.ecr_attribute17,
238 p_rec.ecr_attribute18,
239 p_rec.ecr_attribute19,
240 p_rec.ecr_attribute20,
241 p_rec.ecr_attribute21,
242 p_rec.ecr_attribute22,
243 p_rec.ecr_attribute23,
244 p_rec.ecr_attribute24,
245 p_rec.ecr_attribute25,
246 p_rec.ecr_attribute26,
247 p_rec.ecr_attribute27,
248 p_rec.ecr_attribute28,
249 p_rec.ecr_attribute29,
250 p_rec.ecr_attribute30,
251 p_rec.last_update_login,
252 p_rec.created_by,
253 p_rec.creation_date,
254 p_rec.last_updated_by,
255 p_rec.last_update_date,
256 p_rec.request_id,
257 p_rec.program_application_id,
258 p_rec.program_id,
259 p_rec.program_update_date,
260 p_rec.object_version_number
261 );
262 --
263 ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
264 --
265 hr_utility.set_location(' Leaving:'||l_proc, 10);
266 Exception
267 When hr_api.check_integrity_violated Then
268 -- A check constraint has been violated
269 ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
270 ben_ecr_shd.constraint_error
271 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
272 When hr_api.parent_integrity_violated Then
273 -- Parent integrity has been violated
274 ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
275 ben_ecr_shd.constraint_error
276 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
277 When hr_api.unique_integrity_violated Then
278 -- Unique integrity has been violated
279 ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
280 ben_ecr_shd.constraint_error
281 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
282 When Others Then
283 ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
284 Raise;
285 End insert_dml;
286 --
287 -- ----------------------------------------------------------------------------
288 -- |------------------------------< pre_insert >------------------------------|
289 -- ----------------------------------------------------------------------------
290 -- {Start Of Comments}
291 --
292 -- Description:
293 -- This private procedure contains any processing which is required before
294 -- the insert dml. Presently, if the entity has a corresponding primary
295 -- key which is maintained by an associating sequence, the primary key for
296 -- the entity will be populated with the next sequence value in
297 -- preparation for the insert dml.
298 --
299 -- Prerequisites:
300 -- This is an internal procedure which is called from the ins procedure.
301 --
302 -- In Parameters:
303 -- A Pl/Sql record structre.
304 --
305 -- Post Success:
306 -- Processing continues.
307 --
308 -- Post Failure:
309 -- If an error has occurred, an error message and exception will be raised
310 -- but not handled.
311 --
312 -- Developer Implementation Notes:
313 -- Any pre-processing required before the insert dml is issued should be
314 -- coded within this procedure. As stated above, a good example is the
315 -- generation of a primary key number via a corresponding sequence.
316 -- It is important to note that any 3rd party maintenance should be reviewed
317 -- before placing in this procedure.
318 --
319 -- Access Status:
320 -- Internal Row Handler Use Only.
321 --
322 -- {End Of Comments}
323 -- ----------------------------------------------------------------------------
324 Procedure pre_insert(p_rec in out nocopy ben_ecr_shd.g_rec_type) is
325 --
326 l_proc varchar2(72) := g_package||'pre_insert';
327 --
328 Cursor C_Sel1 is select ben_enrt_rt_s.nextval from sys.dual;
329 --
330 Begin
331 hr_utility.set_location('Entering:'||l_proc, 5);
332 --
333 --
334 -- Select the next sequence number
335 --
336 Open C_Sel1;
337 Fetch C_Sel1 Into p_rec.enrt_rt_id;
338 Close C_Sel1;
339 --
340 hr_utility.set_location(' Leaving:'||l_proc, 10);
341 End pre_insert;
342 --
343 -- ----------------------------------------------------------------------------
344 -- |-----------------------------< post_insert >------------------------------|
345 -- ----------------------------------------------------------------------------
346 -- {Start Of Comments}
347 --
348 -- Description:
349 -- This private procedure contains any processing which is required after the
350 -- insert dml.
351 --
352 -- Prerequisites:
353 -- This is an internal procedure which is called from the ins procedure.
354 --
355 -- In Parameters:
356 -- A Pl/Sql record structre.
357 --
358 -- Post Success:
359 -- Processing continues.
360 --
361 -- Post Failure:
362 -- If an error has occurred, an error message and exception will be raised
363 -- but not handled.
364 --
365 -- Developer Implementation Notes:
366 -- Any post-processing required after the insert dml is issued should be
367 -- coded within this procedure. It is important to note that any 3rd party
368 -- maintenance should be reviewed before placing in this procedure.
369 --
370 -- Access Status:
371 -- Internal Row Handler Use Only.
372 --
373 -- {End Of Comments}
374 -- ----------------------------------------------------------------------------
375 Procedure post_insert(p_rec in ben_ecr_shd.g_rec_type,
376 p_effective_date in date) is
377 --
378 l_proc varchar2(72) := g_package||'post_insert';
379 --
380 Begin
381 hr_utility.set_location('Entering:'||l_proc, 5);
382 --
383 hr_utility.set_location(' Leaving:'||l_proc, 10);
384 End post_insert;
385 --
386 -- ----------------------------------------------------------------------------
387 -- |---------------------------------< ins >----------------------------------|
388 -- ----------------------------------------------------------------------------
389 Procedure ins
390 (p_rec in out nocopy ben_ecr_shd.g_rec_type,
391 p_effective_date in date) is
392 --
393 l_proc varchar2(72) := g_package||'ins';
394 --
395 Begin
396 hr_utility.set_location('Entering:'||l_proc, 5);
397 --
398 -- Call the supporting insert validate operations
399 --
400 ben_ecr_bus.insert_validate(p_rec,p_effective_date);
401 --
402 -- Call the supporting pre-insert operation
403 --
404 pre_insert(p_rec);
405 --
406 -- Insert the row
407 --
408 insert_dml(p_rec);
409 --
410 -- Call the supporting post-insert operation
411 --
412 post_insert(p_rec,p_effective_date);
413 end ins;
414 --
415
416 -- ----------------------------------------------------------------------------
417 -- |---------------------------------< ins >----------------------------------|
418 -- ----------------------------------------------------------------------------
419 Procedure ins
420 (
421 p_effective_date in date,
422 p_enrt_rt_id out nocopy NUMBER,
423 p_ordr_num in number default null,
424 p_acty_typ_cd in VARCHAR2,
425 p_tx_typ_cd in VARCHAR2,
426 p_ctfn_rqd_flag in VARCHAR2,
427 p_dflt_flag in VARCHAR2,
428 p_dflt_pndg_ctfn_flag in VARCHAR2,
429 p_dsply_on_enrt_flag in VARCHAR2,
430 p_use_to_calc_net_flx_cr_flag in VARCHAR2,
431 p_entr_val_at_enrt_flag in VARCHAR2,
432 p_asn_on_enrt_flag in VARCHAR2,
433 p_rl_crs_only_flag in VARCHAR2,
434 p_dflt_val in NUMBER DEFAULT NULL,
435 p_ann_val in NUMBER DEFAULT NULL,
436 p_ann_mn_elcn_val in NUMBER DEFAULT NULL,
437 p_ann_mx_elcn_val in NUMBER DEFAULT NULL,
438 p_val in NUMBER DEFAULT NULL,
439 p_nnmntry_uom in VARCHAR2 DEFAULT NULL,
440 p_mx_elcn_val in NUMBER DEFAULT NULL,
441 p_mn_elcn_val in NUMBER DEFAULT NULL,
442 p_incrmt_elcn_val in NUMBER DEFAULT NULL,
443 p_cmcd_acty_ref_perd_cd in VARCHAR2 DEFAULT NULL,
444 p_cmcd_mn_elcn_val in NUMBER DEFAULT NULL,
445 p_cmcd_mx_elcn_val in NUMBER DEFAULT NULL,
446 p_cmcd_val in NUMBER DEFAULT NULL,
447 p_cmcd_dflt_val in NUMBER DEFAULT NULL,
448 p_rt_usg_cd in VARCHAR2 DEFAULT NULL,
449 p_ann_dflt_val in NUMBER DEFAULT NULL,
450 p_bnft_rt_typ_cd in VARCHAR2 DEFAULT NULL,
451 p_rt_mlt_cd in VARCHAR2 DEFAULT NULL,
452 p_dsply_mn_elcn_val in NUMBER DEFAULT NULL,
453 p_dsply_mx_elcn_val in NUMBER DEFAULT NULL,
454 p_entr_ann_val_flag in VARCHAR2,
455 p_rt_strt_dt in DATE DEFAULT NULL,
456 p_rt_strt_dt_cd in VARCHAR2 DEFAULT NULL,
457 p_rt_strt_dt_rl in NUMBER DEFAULT NULL,
458 p_rt_typ_cd in VARCHAR2 DEFAULT NULL,
459 p_elig_per_elctbl_chc_id in NUMBER DEFAULT NULL,
460 p_acty_base_rt_id in NUMBER DEFAULT NULL,
461 p_spcl_rt_enrt_rt_id in NUMBER DEFAULT NULL,
462 p_enrt_bnft_id in NUMBER DEFAULT NULL,
463 p_prtt_rt_val_id in NUMBER DEFAULT NULL,
464 p_decr_bnft_prvdr_pool_id in NUMBER DEFAULT NULL,
465 p_cvg_amt_calc_mthd_id in NUMBER DEFAULT NULL,
466 p_actl_prem_id in NUMBER DEFAULT NULL,
467 p_comp_lvl_fctr_id in NUMBER DEFAULT NULL,
468 p_ptd_comp_lvl_fctr_id in NUMBER DEFAULT NULL,
469 p_clm_comp_lvl_fctr_id in NUMBER DEFAULT NULL,
470 p_business_group_id in NUMBER,
471 --cwb
472 p_iss_val in number DEFAULT NULL,
473 p_val_last_upd_date in date DEFAULT NULL,
474 p_val_last_upd_person_id in number DEFAULT NULL,
475 --cwb
476 p_pp_in_yr_used_num in number default NULL,
477 p_ecr_attribute_category in VARCHAR2 DEFAULT NULL,
478 p_ecr_attribute1 in VARCHAR2 DEFAULT NULL,
479 p_ecr_attribute2 in VARCHAR2 DEFAULT NULL,
480 p_ecr_attribute3 in VARCHAR2 DEFAULT NULL,
481 p_ecr_attribute4 in VARCHAR2 DEFAULT NULL,
482 p_ecr_attribute5 in VARCHAR2 DEFAULT NULL,
483 p_ecr_attribute6 in VARCHAR2 DEFAULT NULL,
484 p_ecr_attribute7 in VARCHAR2 DEFAULT NULL,
485 p_ecr_attribute8 in VARCHAR2 DEFAULT NULL,
486 p_ecr_attribute9 in VARCHAR2 DEFAULT NULL,
487 p_ecr_attribute10 in VARCHAR2 DEFAULT NULL,
488 p_ecr_attribute11 in VARCHAR2 DEFAULT NULL,
489 p_ecr_attribute12 in VARCHAR2 DEFAULT NULL,
490 p_ecr_attribute13 in VARCHAR2 DEFAULT NULL,
491 p_ecr_attribute14 in VARCHAR2 DEFAULT NULL,
492 p_ecr_attribute15 in VARCHAR2 DEFAULT NULL,
493 p_ecr_attribute16 in VARCHAR2 DEFAULT NULL,
494 p_ecr_attribute17 in VARCHAR2 DEFAULT NULL,
495 p_ecr_attribute18 in VARCHAR2 DEFAULT NULL,
496 p_ecr_attribute19 in VARCHAR2 DEFAULT NULL,
497 p_ecr_attribute20 in VARCHAR2 DEFAULT NULL,
498 p_ecr_attribute21 in VARCHAR2 DEFAULT NULL,
499 p_ecr_attribute22 in VARCHAR2 DEFAULT NULL,
500 p_ecr_attribute23 in VARCHAR2 DEFAULT NULL,
501 p_ecr_attribute24 in VARCHAR2 DEFAULT NULL,
502 p_ecr_attribute25 in VARCHAR2 DEFAULT NULL,
503 p_ecr_attribute26 in VARCHAR2 DEFAULT NULL,
504 p_ecr_attribute27 in VARCHAR2 DEFAULT NULL,
505 p_ecr_attribute28 in VARCHAR2 DEFAULT NULL,
506 p_ecr_attribute29 in VARCHAR2 DEFAULT NULL,
507 p_ecr_attribute30 in VARCHAR2 DEFAULT NULL,
508 p_last_update_login in NUMBER DEFAULT NULL,
509 p_created_by in NUMBER DEFAULT NULL,
510 p_creation_date in DATE DEFAULT NULL,
511 p_last_updated_by in NUMBER DEFAULT NULL,
512 p_last_update_date in DATE DEFAULT NULL,
513 p_request_id in NUMBER DEFAULT NULL,
514 p_program_application_id in NUMBER DEFAULT NULL,
515 p_program_id in NUMBER DEFAULT NULL,
516 p_program_update_date in DATE DEFAULT NULL,
517 p_object_version_number out nocopy NUMBER )
518 is
519 --
520 l_rec ben_ecr_shd.g_rec_type;
521 l_proc varchar2(72) := g_package||'ins';
522 --
523 Begin
524 hr_utility.set_location('Entering:'||l_proc, 5);
525 --
526 -- Call conversion function to turn arguments into the
527 -- p_rec structure.
528 --
529 l_rec :=
530 ben_ecr_shd.convert_args
531 (
532 null,
533 p_ordr_num,
534 p_acty_typ_cd,
535 p_tx_typ_cd,
536 p_ctfn_rqd_flag,
537 p_dflt_flag,
538 p_dflt_pndg_ctfn_flag,
539 p_dsply_on_enrt_flag,
540 p_use_to_calc_net_flx_cr_flag,
541 p_entr_val_at_enrt_flag,
542 p_asn_on_enrt_flag,
543 p_rl_crs_only_flag,
544 p_dflt_val,
545 p_ann_val,
546 p_ann_mn_elcn_val,
547 p_ann_mx_elcn_val,
548 p_val,
549 p_nnmntry_uom,
550 p_mx_elcn_val,
551 p_mn_elcn_val,
552 p_incrmt_elcn_val,
553 p_cmcd_acty_ref_perd_cd,
554 p_cmcd_mn_elcn_val,
555 p_cmcd_mx_elcn_val,
556 p_cmcd_val,
557 p_cmcd_dflt_val,
558 p_rt_usg_cd,
559 p_ann_dflt_val,
560 p_bnft_rt_typ_cd,
561 p_rt_mlt_cd,
562 p_dsply_mn_elcn_val,
563 p_dsply_mx_elcn_val,
564 p_entr_ann_val_flag,
565 p_rt_strt_dt,
566 p_rt_strt_dt_cd,
567 p_rt_strt_dt_rl,
568 p_rt_typ_cd,
569 p_elig_per_elctbl_chc_id,
570 p_acty_base_rt_id,
571 p_spcl_rt_enrt_rt_id,
572 p_enrt_bnft_id,
573 p_prtt_rt_val_id,
574 p_decr_bnft_prvdr_pool_id,
575 p_cvg_amt_calc_mthd_id,
576 p_actl_prem_id,
577 p_comp_lvl_fctr_id,
578 p_ptd_comp_lvl_fctr_id,
579 p_clm_comp_lvl_fctr_id,
580 p_business_group_id,
581 --cwb
582 p_iss_val ,
583 p_val_last_upd_date ,
584 p_val_last_upd_person_id,
585 --cwb
586 p_pp_in_yr_used_num,
587 p_ecr_attribute_category,
588 p_ecr_attribute1,
589 p_ecr_attribute2,
590 p_ecr_attribute3,
591 p_ecr_attribute4,
592 p_ecr_attribute5,
593 p_ecr_attribute6,
594 p_ecr_attribute7,
595 p_ecr_attribute8,
596 p_ecr_attribute9,
597 p_ecr_attribute10,
598 p_ecr_attribute11,
599 p_ecr_attribute12,
600 p_ecr_attribute13,
601 p_ecr_attribute14,
602 p_ecr_attribute15,
603 p_ecr_attribute16,
604 p_ecr_attribute17,
605 p_ecr_attribute18,
606 p_ecr_attribute19,
607 p_ecr_attribute20,
608 p_ecr_attribute21,
609 p_ecr_attribute22,
610 p_ecr_attribute23,
611 p_ecr_attribute24,
612 p_ecr_attribute25,
613 p_ecr_attribute26,
614 p_ecr_attribute27,
615 p_ecr_attribute28,
616 p_ecr_attribute29,
617 p_ecr_attribute30,
618 p_last_update_login,
619 p_created_by,
620 p_creation_date,
621 p_last_updated_by,
622 p_last_update_date,
623 p_request_id,
624 p_program_application_id,
625 p_program_id,
626 p_program_update_date,
627 null
628 );
629 --
630 -- Having converted the arguments into the ben_ecr_rec
631 -- plsql record structure we call the corresponding record business process.
632 --
633 ins(l_rec,p_effective_date);
634 --
635 -- As the primary key argument(s)
636 -- are specified as an OUT's we must set these values.
637 --
638 p_enrt_rt_id := l_rec.enrt_rt_id;
639 p_object_version_number := l_rec.object_version_number;
640 --
641 hr_utility.set_location(' Leaving:'||l_proc, 10);
642 End ins;
643 --
644 end ben_ecr_ins;