97: --
98: hr_utility.set_location(' Leaving:'||l_proc, 10);
99: --
100: Exception
101: When hr_api.check_integrity_violated Then
102: -- A check constraint has been violated
103: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
104: ben_bri_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.check_integrity_violated Then
102: -- A check constraint has been violated
103: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
104: ben_bri_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.parent_integrity_violated Then
107: -- Parent integrity has been violated
108: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
109: ben_bri_shd.constraint_error
102: -- A check constraint has been violated
103: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
104: ben_bri_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.parent_integrity_violated Then
107: -- Parent integrity has been violated
108: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
109: ben_bri_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.parent_integrity_violated Then
107: -- Parent integrity has been violated
108: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
109: ben_bri_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When hr_api.unique_integrity_violated Then
112: -- Unique integrity has been violated
113: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
114: ben_bri_shd.constraint_error
107: -- Parent integrity has been violated
108: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
109: ben_bri_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When hr_api.unique_integrity_violated Then
112: -- Unique integrity has been violated
113: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
114: ben_bri_shd.constraint_error
115: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When hr_api.unique_integrity_violated Then
112: -- Unique integrity has been violated
113: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
114: ben_bri_shd.constraint_error
115: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
116: When Others Then
117: ben_bri_shd.g_api_dml := false; -- Unset the api dml status
118: Raise;
119: End update_dml;
256: );
257: --
258: exception
259: --
260: when hr_api.cannot_find_prog_unit then
261: --
262: hr_api.cannot_find_prog_unit_error
263: (p_module_name => 'ben_batch_rate_info'
264: ,p_hook_type => 'AU');
258: exception
259: --
260: when hr_api.cannot_find_prog_unit then
261: --
262: hr_api.cannot_find_prog_unit_error
263: (p_module_name => 'ben_batch_rate_info'
264: ,p_hook_type => 'AU');
265: --
266: end;
326: -- p_rec plsql record structure
327: -- to see if a system default is being used. If a system default
328: -- is being used then we must set to the 'current' argument value.
329: --
330: If (p_rec.benefit_action_id = hr_api.g_number) then
331: p_rec.benefit_action_id :=
332: ben_bri_shd.g_old_rec.benefit_action_id;
333: End If;
334: If (p_rec.person_id = hr_api.g_number) then
330: If (p_rec.benefit_action_id = hr_api.g_number) then
331: p_rec.benefit_action_id :=
332: ben_bri_shd.g_old_rec.benefit_action_id;
333: End If;
334: If (p_rec.person_id = hr_api.g_number) then
335: p_rec.person_id :=
336: ben_bri_shd.g_old_rec.person_id;
337: End If;
338: If (p_rec.pgm_id = hr_api.g_number) then
334: If (p_rec.person_id = hr_api.g_number) then
335: p_rec.person_id :=
336: ben_bri_shd.g_old_rec.person_id;
337: End If;
338: If (p_rec.pgm_id = hr_api.g_number) then
339: p_rec.pgm_id :=
340: ben_bri_shd.g_old_rec.pgm_id;
341: End If;
342: If (p_rec.pl_id = hr_api.g_number) then
338: If (p_rec.pgm_id = hr_api.g_number) then
339: p_rec.pgm_id :=
340: ben_bri_shd.g_old_rec.pgm_id;
341: End If;
342: If (p_rec.pl_id = hr_api.g_number) then
343: p_rec.pl_id :=
344: ben_bri_shd.g_old_rec.pl_id;
345: End If;
346: If (p_rec.oipl_id = hr_api.g_number) then
342: If (p_rec.pl_id = hr_api.g_number) then
343: p_rec.pl_id :=
344: ben_bri_shd.g_old_rec.pl_id;
345: End If;
346: If (p_rec.oipl_id = hr_api.g_number) then
347: p_rec.oipl_id :=
348: ben_bri_shd.g_old_rec.oipl_id;
349: End If;
350: If (p_rec.bnft_rt_typ_cd = hr_api.g_varchar2) then
346: If (p_rec.oipl_id = hr_api.g_number) then
347: p_rec.oipl_id :=
348: ben_bri_shd.g_old_rec.oipl_id;
349: End If;
350: If (p_rec.bnft_rt_typ_cd = hr_api.g_varchar2) then
351: p_rec.bnft_rt_typ_cd :=
352: ben_bri_shd.g_old_rec.bnft_rt_typ_cd;
353: End If;
354: If (p_rec.dflt_flag = hr_api.g_varchar2) then
350: If (p_rec.bnft_rt_typ_cd = hr_api.g_varchar2) then
351: p_rec.bnft_rt_typ_cd :=
352: ben_bri_shd.g_old_rec.bnft_rt_typ_cd;
353: End If;
354: If (p_rec.dflt_flag = hr_api.g_varchar2) then
355: p_rec.dflt_flag :=
356: ben_bri_shd.g_old_rec.dflt_flag;
357: End If;
358: If (p_rec.val = hr_api.g_number) then
354: If (p_rec.dflt_flag = hr_api.g_varchar2) then
355: p_rec.dflt_flag :=
356: ben_bri_shd.g_old_rec.dflt_flag;
357: End If;
358: If (p_rec.val = hr_api.g_number) then
359: p_rec.val :=
360: ben_bri_shd.g_old_rec.val;
361: End If;
362: if (p_rec.old_val = hr_api.g_number) then
358: If (p_rec.val = hr_api.g_number) then
359: p_rec.val :=
360: ben_bri_shd.g_old_rec.val;
361: End If;
362: if (p_rec.old_val = hr_api.g_number) then
363: p_rec.old_val :=
364: ben_bri_shd.g_old_rec.old_val;
365: End If;
366: If (p_rec.tx_typ_cd = hr_api.g_varchar2) then
362: if (p_rec.old_val = hr_api.g_number) then
363: p_rec.old_val :=
364: ben_bri_shd.g_old_rec.old_val;
365: End If;
366: If (p_rec.tx_typ_cd = hr_api.g_varchar2) then
367: p_rec.tx_typ_cd :=
368: ben_bri_shd.g_old_rec.tx_typ_cd;
369: End If;
370: If (p_rec.acty_typ_cd = hr_api.g_varchar2) then
366: If (p_rec.tx_typ_cd = hr_api.g_varchar2) then
367: p_rec.tx_typ_cd :=
368: ben_bri_shd.g_old_rec.tx_typ_cd;
369: End If;
370: If (p_rec.acty_typ_cd = hr_api.g_varchar2) then
371: p_rec.acty_typ_cd :=
372: ben_bri_shd.g_old_rec.acty_typ_cd;
373: End If;
374: If (p_rec.mn_elcn_val = hr_api.g_number) then
370: If (p_rec.acty_typ_cd = hr_api.g_varchar2) then
371: p_rec.acty_typ_cd :=
372: ben_bri_shd.g_old_rec.acty_typ_cd;
373: End If;
374: If (p_rec.mn_elcn_val = hr_api.g_number) then
375: p_rec.mn_elcn_val :=
376: ben_bri_shd.g_old_rec.mn_elcn_val;
377: End If;
378: If (p_rec.mx_elcn_val = hr_api.g_number) then
374: If (p_rec.mn_elcn_val = hr_api.g_number) then
375: p_rec.mn_elcn_val :=
376: ben_bri_shd.g_old_rec.mn_elcn_val;
377: End If;
378: If (p_rec.mx_elcn_val = hr_api.g_number) then
379: p_rec.mx_elcn_val :=
380: ben_bri_shd.g_old_rec.mx_elcn_val;
381: End If;
382: If (p_rec.incrmt_elcn_val = hr_api.g_number) then
378: If (p_rec.mx_elcn_val = hr_api.g_number) then
379: p_rec.mx_elcn_val :=
380: ben_bri_shd.g_old_rec.mx_elcn_val;
381: End If;
382: If (p_rec.incrmt_elcn_val = hr_api.g_number) then
383: p_rec.incrmt_elcn_val :=
384: ben_bri_shd.g_old_rec.incrmt_elcn_val;
385: End If;
386: If (p_rec.dflt_val = hr_api.g_number) then
382: If (p_rec.incrmt_elcn_val = hr_api.g_number) then
383: p_rec.incrmt_elcn_val :=
384: ben_bri_shd.g_old_rec.incrmt_elcn_val;
385: End If;
386: If (p_rec.dflt_val = hr_api.g_number) then
387: p_rec.dflt_val :=
388: ben_bri_shd.g_old_rec.dflt_val;
389: End If;
390: If (p_rec.rt_strt_dt = hr_api.g_date) then
386: If (p_rec.dflt_val = hr_api.g_number) then
387: p_rec.dflt_val :=
388: ben_bri_shd.g_old_rec.dflt_val;
389: End If;
390: If (p_rec.rt_strt_dt = hr_api.g_date) then
391: p_rec.rt_strt_dt :=
392: ben_bri_shd.g_old_rec.rt_strt_dt;
393: End If;
394: If (p_rec.business_group_id = hr_api.g_number) then
390: If (p_rec.rt_strt_dt = hr_api.g_date) then
391: p_rec.rt_strt_dt :=
392: ben_bri_shd.g_old_rec.rt_strt_dt;
393: End If;
394: If (p_rec.business_group_id = hr_api.g_number) then
395: p_rec.business_group_id :=
396: ben_bri_shd.g_old_rec.business_group_id;
397: End If;
398: If (p_rec.enrt_cvg_strt_dt = hr_api.g_date) then
394: If (p_rec.business_group_id = hr_api.g_number) then
395: p_rec.business_group_id :=
396: ben_bri_shd.g_old_rec.business_group_id;
397: End If;
398: If (p_rec.enrt_cvg_strt_dt = hr_api.g_date) then
399: p_rec.enrt_cvg_strt_dt :=
400: ben_bri_shd.g_old_rec.enrt_cvg_strt_dt;
401: End If;
402: If (p_rec.enrt_cvg_thru_dt = hr_api.g_date) then
398: If (p_rec.enrt_cvg_strt_dt = hr_api.g_date) then
399: p_rec.enrt_cvg_strt_dt :=
400: ben_bri_shd.g_old_rec.enrt_cvg_strt_dt;
401: End If;
402: If (p_rec.enrt_cvg_thru_dt = hr_api.g_date) then
403: p_rec.enrt_cvg_thru_dt :=
404: ben_bri_shd.g_old_rec.enrt_cvg_thru_dt;
405: End If;
406: If (p_rec.actn_cd = hr_api.g_varchar2) then
402: If (p_rec.enrt_cvg_thru_dt = hr_api.g_date) then
403: p_rec.enrt_cvg_thru_dt :=
404: ben_bri_shd.g_old_rec.enrt_cvg_thru_dt;
405: End If;
406: If (p_rec.actn_cd = hr_api.g_varchar2) then
407: p_rec.actn_cd :=
408: ben_bri_shd.g_old_rec.actn_cd;
409: End If;
410: If (p_rec.close_actn_itm_dt = hr_api.g_date) then
406: If (p_rec.actn_cd = hr_api.g_varchar2) then
407: p_rec.actn_cd :=
408: ben_bri_shd.g_old_rec.actn_cd;
409: End If;
410: If (p_rec.close_actn_itm_dt = hr_api.g_date) then
411: p_rec.close_actn_itm_dt :=
412: ben_bri_shd.g_old_rec.close_actn_itm_dt;
413: End If;
414: --
468: Procedure upd
469: (
470: p_effective_date in date,
471: p_batch_rt_id in number,
472: p_benefit_action_id in number default hr_api.g_number,
473: p_person_id in number default hr_api.g_number,
474: p_pgm_id in number default hr_api.g_number,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
469: (
470: p_effective_date in date,
471: p_batch_rt_id in number,
472: p_benefit_action_id in number default hr_api.g_number,
473: p_person_id in number default hr_api.g_number,
474: p_pgm_id in number default hr_api.g_number,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
470: p_effective_date in date,
471: p_batch_rt_id in number,
472: p_benefit_action_id in number default hr_api.g_number,
473: p_person_id in number default hr_api.g_number,
474: p_pgm_id in number default hr_api.g_number,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
471: p_batch_rt_id in number,
472: p_benefit_action_id in number default hr_api.g_number,
473: p_person_id in number default hr_api.g_number,
474: p_pgm_id in number default hr_api.g_number,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
472: p_benefit_action_id in number default hr_api.g_number,
473: p_person_id in number default hr_api.g_number,
474: p_pgm_id in number default hr_api.g_number,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
473: p_person_id in number default hr_api.g_number,
474: p_pgm_id in number default hr_api.g_number,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
474: p_pgm_id in number default hr_api.g_number,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
475: p_pl_id in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
476: p_oipl_id in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
477: p_bnft_rt_typ_cd in varchar2 default hr_api.g_varchar2,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
478: p_dflt_flag in varchar2 default hr_api.g_varchar2,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
486: p_dflt_val in number default hr_api.g_number,
479: p_val in number default hr_api.g_number,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
486: p_dflt_val in number default hr_api.g_number,
487: p_rt_strt_dt in date default hr_api.g_date,
480: p_old_val in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
486: p_dflt_val in number default hr_api.g_number,
487: p_rt_strt_dt in date default hr_api.g_date,
488: p_business_group_id in number default hr_api.g_number,
481: p_tx_typ_cd in varchar2 default hr_api.g_varchar2,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
486: p_dflt_val in number default hr_api.g_number,
487: p_rt_strt_dt in date default hr_api.g_date,
488: p_business_group_id in number default hr_api.g_number,
489: p_object_version_number in out nocopy number,
482: p_acty_typ_cd in varchar2 default hr_api.g_varchar2,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
486: p_dflt_val in number default hr_api.g_number,
487: p_rt_strt_dt in date default hr_api.g_date,
488: p_business_group_id in number default hr_api.g_number,
489: p_object_version_number in out nocopy number,
490: p_enrt_cvg_strt_dt in date default hr_api.g_date,
483: p_mn_elcn_val in number default hr_api.g_number,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
486: p_dflt_val in number default hr_api.g_number,
487: p_rt_strt_dt in date default hr_api.g_date,
488: p_business_group_id in number default hr_api.g_number,
489: p_object_version_number in out nocopy number,
490: p_enrt_cvg_strt_dt in date default hr_api.g_date,
491: p_enrt_cvg_thru_dt in date default hr_api.g_date,
484: p_mx_elcn_val in number default hr_api.g_number,
485: p_incrmt_elcn_val in number default hr_api.g_number,
486: p_dflt_val in number default hr_api.g_number,
487: p_rt_strt_dt in date default hr_api.g_date,
488: p_business_group_id in number default hr_api.g_number,
489: p_object_version_number in out nocopy number,
490: p_enrt_cvg_strt_dt in date default hr_api.g_date,
491: p_enrt_cvg_thru_dt in date default hr_api.g_date,
492: p_actn_cd in varchar2 default hr_api.g_varchar2,
486: p_dflt_val in number default hr_api.g_number,
487: p_rt_strt_dt in date default hr_api.g_date,
488: p_business_group_id in number default hr_api.g_number,
489: p_object_version_number in out nocopy number,
490: p_enrt_cvg_strt_dt in date default hr_api.g_date,
491: p_enrt_cvg_thru_dt in date default hr_api.g_date,
492: p_actn_cd in varchar2 default hr_api.g_varchar2,
493: p_close_actn_itm_dt in date default hr_api.g_date
494: ) is
487: p_rt_strt_dt in date default hr_api.g_date,
488: p_business_group_id in number default hr_api.g_number,
489: p_object_version_number in out nocopy number,
490: p_enrt_cvg_strt_dt in date default hr_api.g_date,
491: p_enrt_cvg_thru_dt in date default hr_api.g_date,
492: p_actn_cd in varchar2 default hr_api.g_varchar2,
493: p_close_actn_itm_dt in date default hr_api.g_date
494: ) is
495: --
488: p_business_group_id in number default hr_api.g_number,
489: p_object_version_number in out nocopy number,
490: p_enrt_cvg_strt_dt in date default hr_api.g_date,
491: p_enrt_cvg_thru_dt in date default hr_api.g_date,
492: p_actn_cd in varchar2 default hr_api.g_varchar2,
493: p_close_actn_itm_dt in date default hr_api.g_date
494: ) is
495: --
496: l_rec ben_bri_shd.g_rec_type;
489: p_object_version_number in out nocopy number,
490: p_enrt_cvg_strt_dt in date default hr_api.g_date,
491: p_enrt_cvg_thru_dt in date default hr_api.g_date,
492: p_actn_cd in varchar2 default hr_api.g_varchar2,
493: p_close_actn_itm_dt in date default hr_api.g_date
494: ) is
495: --
496: l_rec ben_bri_shd.g_rec_type;
497: l_proc varchar2(72) := g_package||'upd';