DBA Data[Home] [Help]

APPS.BEN_PREM_PL_OIPL_MONTHLY dependencies on HR_UTILITY

Line 195: hr_utility.set_location ('Entering '||l_package,10);

191: l_outputs ff_exec.outputs_t;
192:
193:
194: begin
195: hr_utility.set_location ('Entering '||l_package,10);
196: hr_utility.set_location ('actl_prem_id:'||
197: to_char(p_actl_prem_id),10);
198:
199: -- p_pl_id is the actl_prem.pl_id, which can be null

Line 196: hr_utility.set_location ('actl_prem_id:'||

192:
193:
194: begin
195: hr_utility.set_location ('Entering '||l_package,10);
196: hr_utility.set_location ('actl_prem_id:'||
197: to_char(p_actl_prem_id),10);
198:
199: -- p_pl_id is the actl_prem.pl_id, which can be null
200: -- p_pl2_id is the pl_id of the actl_prem.oipl_id or actl_prem.pl_id. will

Line 296: hr_utility.set_location ('looping for person '||

292: l_people.person_id := l_persons(i).person_id;
293: l_people.pgm_id := l_persons(i).pgm_id;
294: l_people.bnft_amt := l_persons(i).bnft_amt;
295: end if;
296: hr_utility.set_location ('looping for person '||
297: to_char(l_people.person_id),12);
298:
299: -- these calls are required so we can call ben_evaluate_rate_profiles.main
300: ben_env_object.setenv(p_person_id => l_people.person_id);

Line 349: hr_utility.set_location ('g_no_match_cnt:'||

345: ----------- compute total premium value -------------------------------
346: -- first use the actual premium value for those persons that didn't match
347: -- any variable profiles:
348: if ben_evaluate_rate_profiles.g_no_match_cnt > 0 then
349: hr_utility.set_location ('g_no_match_cnt:'||
350: to_char(ben_evaluate_rate_profiles.g_no_match_cnt),18);
351: if p_mlt_cd = 'NSVU' then
352: if p_vrbl_rt_add_on_calc_rl is null then
353: -- there is no standard value and no profiles matched, error.

Line 373: hr_utility.set_location ('ttlprtt p_actl_prem_id:'||to_char(p_actl_prem_id)||

369: p_jurisdiction_code => null);
370: p_val := l_outputs(l_outputs.first).value;
371: end if;
372: elsif p_mlt_cd = 'TTLPRTT' then
373: hr_utility.set_location ('ttlprtt p_actl_prem_id:'||to_char(p_actl_prem_id)||
374: ' p_bnft_rt_typ_cd:'||p_bnft_rt_typ_cd, 22);
375: benutils.rt_typ_calc
376: (p_rt_typ_cd => p_bnft_rt_typ_cd
377: ,p_val => ben_evaluate_rate_profiles.g_no_match_cnt

Line 381: hr_utility.set_location ('ttlcvg p_actl_prem_id:'||to_char(p_actl_prem_id)||

377: ,p_val => ben_evaluate_rate_profiles.g_no_match_cnt
378: ,p_val_2 => p_actl_prem_val
379: ,p_calculated_val => p_val); -- output p_val
380: else -- p_mlt_cd = 'TTLCVG'
381: hr_utility.set_location ('ttlcvg p_actl_prem_id:'||to_char(p_actl_prem_id)||
382: ' p_bnft_rt_typ_cd:'||p_bnft_rt_typ_cd, 24);
383: benutils.rt_typ_calc
384: (p_rt_typ_cd => p_bnft_rt_typ_cd
385: ,p_val => ben_evaluate_rate_profiles.g_no_match_cvg

Line 400: hr_utility.set_location('vrbl_rt_prfl_id'||

396: -- then loop thru profiles matched and add up rates based on number of people
397: -- that matched that profile or amount of coverage of those people.
398: if ben_evaluate_rate_profiles.g_num_of_prfls_used > 0 then
399: for i in 1..ben_evaluate_rate_profiles.g_num_of_prfls_used loop
400: hr_utility.set_location('vrbl_rt_prfl_id'||
401: to_char(ben_evaluate_rate_profiles.g_use_prfls(i).vrbl_rt_prfl_id),26);
402: open c_vrbl_val(p_vrbl_rt_prfl_id =>
403: ben_evaluate_rate_profiles.g_use_prfls(i).vrbl_rt_prfl_id);
404: fetch c_vrbl_val into l_vrbl_val;

Line 427: hr_utility.set_location('Variable Limits Checking',28);

423: (p_rounding_cd => l_vrbl_val.rndg_cd
424: ,p_rounding_rl => l_vrbl_val.rndg_rl
425: ,p_value => l_val
426: ,p_effective_date => p_effective_date);
427: hr_utility.set_location('Variable Limits Checking',28);
428: benutils.limit_checks
429: (p_upr_lmt_val => l_vrbl_val.upr_lmt_val,
430: p_lwr_lmt_val => l_vrbl_val.lwr_lmt_val,
431: p_upr_lmt_calc_rl => l_vrbl_val.upr_lmt_calc_rl,

Line 453: hr_utility.set_location ('Leaving '||l_package,99);

449: end if;
450: close c_vrbl_val;
451: end loop;
452: end if;
453: hr_utility.set_location ('Leaving '||l_package,99);
454: exception
455: when others then
456: l_error_text := sqlerrm;
457: hr_utility.set_location ('Fail in '||l_package||' error:',999);

Line 457: hr_utility.set_location ('Fail in '||l_package||' error:',999);

453: hr_utility.set_location ('Leaving '||l_package,99);
454: exception
455: when others then
456: l_error_text := sqlerrm;
457: hr_utility.set_location ('Fail in '||l_package||' error:',999);
458: hr_utility.set_location (l_error_text,999);
459: fnd_message.raise_error;
460: end determine_vrbl_prfls;
461: -- ----------------------------------------------------------------------------

Line 458: hr_utility.set_location (l_error_text,999);

454: exception
455: when others then
456: l_error_text := sqlerrm;
457: hr_utility.set_location ('Fail in '||l_package||' error:',999);
458: hr_utility.set_location (l_error_text,999);
459: fnd_message.raise_error;
460: end determine_vrbl_prfls;
461: -- ----------------------------------------------------------------------------
462: -- |------------------------------< main >------------------------------------|

Line 668: hr_utility.set_location ('Entering '||l_package,10);

664: l_outputs ff_exec.outputs_t;
665: l_effective_date_mo date;
666: l_last_effective_dt date;
667: begin
668: hr_utility.set_location ('Entering '||l_package,10);
669: Savepoint process_pl_premium_savepoint;
670:
671: -- this call is required so we can call ben_evaluate_rate_profiles.main
672: ben_env_object.init(p_business_group_id => p_business_group_id,

Line 682: hr_utility.set_location ('process actl_prem_id:'||to_char(p_actl_prem_id),12);

678: p_benefit_action_id => null) ;
679:
680: -- p_effective_date is always the last day of the month this is being run
681:
682: hr_utility.set_location ('process actl_prem_id:'||to_char(p_actl_prem_id),12);
683:
684: open c_prems;
685: fetch c_prems into l_prems;
686: close c_prems;

Line 704: hr_utility.set_location ('pl_id:'||to_char(l_prems.pl_id)||

700: end if;
701: l_last_effective_dt := last_day(l_last_day_of_month) ;
702:
703: -- Find total number of prtt for this premium.
704: hr_utility.set_location ('pl_id:'||to_char(l_prems.pl_id)||
705: ' oipl_id:'||to_char(l_prems.oipl_id)||' washrule:'||
706: to_char(l_prems.wsh_rl_dy_mo_num)||' last:'||to_char(l_last_day_of_month)||
707: ' first:'||to_char(l_first_day_of_month),1);
708:

Line 722: hr_utility.set_location ('total results:'||to_char(l_results.num_of_prtts)||

718: -- c_results%notfound is irrelevant when cursor uses a 'sum'
719: -- if no people, skip all the vrbl prfl stuff and write a zero value premium
720: l_val := 0;
721: else
722: hr_utility.set_location ('total results:'||to_char(l_results.num_of_prtts)||
723: ' tot cvg:'||to_char(l_results.total_cvg),14);
724:
725: ben_prem_pl_oipl_monthly.get_comp_object_info
726: (p_oipl_id => l_prems.oipl_id

Line 760: hr_utility.set_location ('l_matched_vrbl_prfl = N',16);

756: ,p_vrbl_rt_add_on_calc_rl => l_prems.vrbl_rt_add_on_calc_rl
757: ,p_val => l_val
758: ,p_matched_vrbl_prfl => l_matched_vrbl_prfl);
759: if l_matched_vrbl_prfl = 'N' then
760: hr_utility.set_location ('l_matched_vrbl_prfl = N',16);
761: -- compute total premium based on number of participants or
762: -- total coverage amt of prtts.
763: if l_prems.mlt_cd = 'NSVU' then
764: if l_prems.vrbl_rt_add_on_calc_rl is null then

Line 805: hr_utility.set_location('Premium Limits Checking',20);

801: ,p_value => l_val
802: ,p_effective_date => p_effective_date);
803: end if;
804:
805: hr_utility.set_location('Premium Limits Checking',20);
806: benutils.limit_checks
807: (p_upr_lmt_val => l_prems.upr_lmt_val,
808: p_lwr_lmt_val => l_prems.lwr_lmt_val,
809: p_upr_lmt_calc_rl => l_prems.upr_lmt_calc_rl,

Line 856: hr_utility.set_location ('looping c_each_result',28);

852: ,p_pl_id => l_prems.pl_id
853: ,p_oipl_id => l_prems.oipl_id) loop
854: -- for each result find a prtt prem row matching the actl_prem_id.
855: -- If it doesn't exist, create one.
856: hr_utility.set_location ('looping c_each_result',28);
857: open c_ppe(p_prtt_enrt_rslt_id => l_each_result.prtt_enrt_rslt_id
858: ,p_actl_prem_id => l_prems.actl_prem_id);
859: fetch c_ppe into l_ppe;
860: if c_ppe%notfound or c_ppe%notfound is null then

Line 884: hr_utility.set_location ('write prtt premium by mo. val:'||

880: /* End of Changes for WWBUG: 1646442 */
881: l_ppe.std_prem_uom := l_prems.uom;
882: end if;
883: close c_ppe;
884: hr_utility.set_location ('write prtt premium by mo. val:'||
885: to_char(l_prtt_val),31);
886: open c_prm(p_prtt_prem_id => l_ppe.prtt_prem_id
887: ,p_mo_num => l_mo_num
888: ,p_yr_num => l_yr_num);

Line 930: hr_utility.set_location ('update the premium:'|| l_prm.prtt_prem_by_mo_id, 10) ;

926: --
927: if l_prm.mnl_adj_flag = 'N' then
928: if l_prm.cr_val> 0 and l_prtt_val > 0 then
929:
930: hr_utility.set_location ('update the premium:'|| l_prm.prtt_prem_by_mo_id, 10) ;
931:
932: ben_prtt_prem_by_mo_api.update_prtt_prem_by_mo
933: (p_prtt_prem_by_mo_id => l_prm.prtt_prem_by_mo_id
934: ,p_effective_start_date => l_effective_start_date

Line 996: hr_utility.set_location ('write costing 2 ',40);

992: end loop; -- looping thru results matching actl_prem's pl and oipl
993: end if;
994: end if; -- if found participants enrolled (c_results)
995:
996: hr_utility.set_location ('write costing 2 ',40);
997: -- first insert into cost allocation keyflex ??
998: if l_prems.prem_asnmt_lvl_cd = 'PLOIPL' then
999: -- premiums were not allocated to prtts, cost at the pl/oipl level.
1000: -- Costing a PROC premium is simply pointing to the same cak id

Line 1007: hr_utility.set_location ('write premium by mo. val:'||to_char(l_val),41);

1003: l_cak := l_prems.cost_allocation_keyflex_id;
1004: else l_cak := null;
1005: end if;
1006:
1007: hr_utility.set_location ('write premium by mo. val:'||to_char(l_val),41);
1008: open c_pbm(p_actl_prem_id => l_prems.actl_prem_id
1009: ,p_mo_num => l_mo_num
1010: ,p_yr_num => l_yr_num);
1011: fetch c_pbm into l_pbm;

Line 1074: hr_utility.set_location ('Leaving '||l_package,99);

1070: If (p_validate = 'Y') then
1071: Rollback to process_pl_premium_savepoint;
1072: End if;
1073:
1074: hr_utility.set_location ('Leaving '||l_package,99);
1075: exception
1076: when others then
1077: l_error_text := sqlerrm;
1078: hr_utility.set_location ('Fail in '||l_package||' error:',999);

Line 1078: hr_utility.set_location ('Fail in '||l_package||' error:',999);

1074: hr_utility.set_location ('Leaving '||l_package,99);
1075: exception
1076: when others then
1077: l_error_text := sqlerrm;
1078: hr_utility.set_location ('Fail in '||l_package||' error:',999);
1079: hr_utility.set_location (l_error_text,999);
1080: fnd_message.raise_error;
1081: end main;
1082: end ben_prem_pl_oipl_monthly;

Line 1079: hr_utility.set_location (l_error_text,999);

1075: exception
1076: when others then
1077: l_error_text := sqlerrm;
1078: hr_utility.set_location ('Fail in '||l_package||' error:',999);
1079: hr_utility.set_location (l_error_text,999);
1080: fnd_message.raise_error;
1081: end main;
1082: end ben_prem_pl_oipl_monthly;