DBA Data[Home] [Help]

APPS.BEN_MAINTAIN_DESIGNEE_ELIG dependencies on HR_UTILITY

Line 178: hr_utility.set_location(' Entering:'||l_proc,10);

174: l_cvg_end_rl number(15);
175: l_step integer;
176: l_effective date;
177: begin
178: hr_utility.set_location(' Entering:'||l_proc,10);
179: ben_prtt_enrt_result_api.determine_dpnt_cvg_dt_cd
180: (p_pgm_id => p_pgm_id
181: ,P_ptip_id => p_ptip_id
182: ,p_pl_id => p_pl_id

Line 191: hr_utility.set_location(' cvg end dt cd :'||l_cvg_end_cd ,10);

187: ,p_cvg_strt_rl => l_cvg_strt_rl
188: ,p_cvg_end_cd => l_cvg_end_cd
189: ,p_cvg_end_rl => l_cvg_end_rl
190: );
191: hr_utility.set_location(' cvg end dt cd :'||l_cvg_end_cd ,10);
192: hr_utility.set_location(' elig chnage dt:'||ben_evaluate_dpnt_elg_profiles.get_elig_change_dt,109);
193: -- tilak 2455430 : I dont think we need the if condition as it is
194: -- only AED and ODBED are avaialble
195: -- for end dt codes This conditon makes the AED calc wrong , get_elig_change_dt return

Line 192: hr_utility.set_location(' elig chnage dt:'||ben_evaluate_dpnt_elg_profiles.get_elig_change_dt,109);

188: ,p_cvg_end_cd => l_cvg_end_cd
189: ,p_cvg_end_rl => l_cvg_end_rl
190: );
191: hr_utility.set_location(' cvg end dt cd :'||l_cvg_end_cd ,10);
192: hr_utility.set_location(' elig chnage dt:'||ben_evaluate_dpnt_elg_profiles.get_elig_change_dt,109);
193: -- tilak 2455430 : I dont think we need the if condition as it is
194: -- only AED and ODBED are avaialble
195: -- for end dt codes This conditon makes the AED calc wrong , get_elig_change_dt return
196: -- Date of birth -1 that is not the AED date but ODBED

Line 202: -- hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,110);

198: --if (l_cvg_end_cd in ('AED','ODBED','AFDEM','ALDEM','AFDFEM','OMFED',
199: -- 'TMFED','30DFLED','TDBED','60DFLED','SDFED','SDBED',
200: -- 'TODFED')) then
201: -- l_enrt_cvg_end_dt:=ben_evaluate_dpnt_elg_profiles.get_elig_change_dt;
202: -- hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,110);
203: --else
204: ben_determine_date.main
205: (P_DATE_CD => l_cvg_end_cd
206: ,p_formula_id => l_cvg_end_rl -- l_cvg_strt_rl Bug: 3657077; end-date-rule should be passed.

Line 218: hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,111);

214: ,P_LF_EVT_OCRD_DT => ben_evaluate_dpnt_elg_profiles.
215: get_elig_change_dt + 1
216: ,P_RETURNED_DATE => l_enrt_cvg_end_dt
217: );
218: hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,111);
219: --end if;
220: if l_enrt_cvg_end_dt is null then
221: l_enrt_cvg_end_dt:=ben_evaluate_dpnt_elg_profiles.get_elig_change_dt;
222: hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,112);

Line 222: hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,112);

218: hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,111);
219: --end if;
220: if l_enrt_cvg_end_dt is null then
221: l_enrt_cvg_end_dt:=ben_evaluate_dpnt_elg_profiles.get_elig_change_dt;
222: hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,112);
223: end if;
224: p_returned_end_dt := l_enrt_cvg_end_dt;
225: hr_utility.set_location(' Leaving:'||l_proc, 70);
226: end calc_dpnt_cvg_end_dt;

Line 225: hr_utility.set_location(' Leaving:'||l_proc, 70);

221: l_enrt_cvg_end_dt:=ben_evaluate_dpnt_elg_profiles.get_elig_change_dt;
222: hr_utility.set_location(' cvg end dt :'||l_enrt_cvg_end_dt ,112);
223: end if;
224: p_returned_end_dt := l_enrt_cvg_end_dt;
225: hr_utility.set_location(' Leaving:'||l_proc, 70);
226: end calc_dpnt_cvg_end_dt;
227: --
228: -- ===========================================================================
229: -- << Procedure: ben_batch_utils.batch_report >>

Line 237: hr_utility.set_location ('Entering '||l_proc,05);

233: l_proc varchar2(80) := g_package||'.submit_all_reports';
234: l_actn varchar2(80);
235: l_request_id number;
236: Begin
237: hr_utility.set_location ('Entering '||l_proc,05);
238: l_actn := 'Calling ben_batch_utils.batch_report (BENDEAUD)...';
239: --
240: If fnd_global.conc_request_id <> -1 then
241: --

Line 270: hr_utility.set_location ('Leaving '||l_proc,10);

266: -- ,p_subtitle =>
267: -- 'MANAGE DEFAULT ENROLLMENTS - ERROR DETAIL BY PERSON'
268: );
269: end if;
270: hr_utility.set_location ('Leaving '||l_proc,10);
271: Exception
272: When others then
273: ben_batch_utils.rpt_error(p_proc => l_proc
274: ,p_last_actn => l_actn

Line 345: hr_utility.set_location ('Entering '||l_proc,05);

341: l_parm c_parameter%rowtype;
342: l_commit number;
343: --
344: Begin
345: hr_utility.set_location ('Entering '||l_proc,05);
346: --
347: /*
348: l_effective_date:=to_date(p_effective_date,'YYYY/MM/DD HH24:MI:SS');
349: l_effective_date:=to_date(to_char(trunc(l_effective_date),'DD/MM/RRRR'),'DD/MM/RRRR');

Line 501: hr_utility.set_location ('Leaving '||l_proc,70);

497: l_actn := 'Calling Log_statistics...';
498: ben_batch_utils.write_logfile(p_num_pers_processed => g_persons_processed
499: ,p_num_pers_errored => g_persons_errored
500: );
501: hr_utility.set_location ('Leaving '||l_proc,70);
502: Exception
503: When others then
504: ben_batch_utils.rpt_error(p_proc => l_proc
505: ,p_last_actn => l_actn

Line 558: hr_utility.set_location ('Entering '||l_proc,10);

554: l_errbuf varchar2(80);
555: l_retcode number;
556: l_actn varchar2(80);
557: Begin
558: hr_utility.set_location ('Entering '||l_proc,10);
559: --
560: -- get the parameters for a previous run and do a restart
561: --
562: l_actn := 'Getting parameter data...';

Line 598: hr_utility.set_location ('Leaving '||l_proc,70);

594: ,p_legal_entity_id => l_parameters.legal_entity_id
595: ,p_payroll_id => l_parameters.payroll_id
596: ,p_debug_messages => l_parameters.debug_messages_flag
597: );
598: hr_utility.set_location ('Leaving '||l_proc,70);
599: Exception
600: when others then
601: ben_batch_utils.rpt_error(p_proc => l_proc
602: ,p_last_actn => l_actn

Line 775: hr_utility.set_location ('Entering '||l_proc,10);

771: l_commit number;
772: --
773: Begin
774:
775: hr_utility.set_location ('Entering '||l_proc,10);
776:
777: --
778: /*
779: l_effective_date:=to_date(p_effective_date,'YYYY/MM/DD HH24:MI:SS');

Line 887: hr_utility.set_location('person_id='||to_char(l_person_id),999);

883: fetch c_person into l_person_id,l_part_person_id;
884: Exit when c_person%notfound;
885: l_cnt := l_cnt + 1;
886: l_actn := 'Calling ben_batch_utils.person_selection_rule...';
887: hr_utility.set_location('person_id='||to_char(l_person_id),999);
888: --
889: -- if p_person_selection_rule_id is pass, test rule.
890: -- If the rule return 'N' then
891: -- Bug 5662220: If the rule doesnt return 'Y' or 'N' then also skip the person

Line 1053: hr_utility.set_location ('Leaving '||l_proc,70);

1049: ben_batch_utils.end_process(p_benefit_action_id => l_benefit_action_id
1050: ,p_person_selected => l_person_cnt
1051: ,p_business_group_id => p_business_group_id);
1052: submit_all_reports;
1053: hr_utility.set_location ('Leaving '||l_proc,70);
1054: --
1055: Exception
1056: when others then
1057: ben_batch_utils.rpt_error(p_proc => l_proc

Line 1124: hr_utility.set_location ('Entering '||l_proc,10);

1120: l_organization_id number;
1121: l_step integer;
1122: begin
1123: l_step := 10;
1124: hr_utility.set_location ('Entering '||l_proc,10);
1125: --
1126: -- Get assignment ID,organization_id form per_assignments_f table.
1127: --
1128: open c1;

Line 1186: hr_utility.set_location ('Leaving '||l_proc,10);

1182: fnd_message.set_token('PROC',l_proc);
1183: raise ben_maintain_designee_elig.g_record_error;
1184: end if;
1185: return l_return;
1186: hr_utility.set_location ('Leaving '||l_proc,10);
1187: exception
1188: when others then
1189: ben_batch_utils.rpt_error(p_proc => l_proc,
1190: p_last_actn => 'Step = '||to_char(l_step),p_rpt_flag => TRUE);

Line 1398: hr_utility.set_location ('Entering '|| l_proc,10);

1394: l_egd_elig_thru_dt date; -- 5100008
1395:
1396: --
1397: begin
1398: hr_utility.set_location ('Entering '|| l_proc,10);
1399: l_actn := 'Initializing...';
1400: Savepoint process_default_enrt_savepoint;
1401: --
1402: -- Cache person data and write personal data into cache.

Line 1414: hr_utility.set_location(l_proc,101);

1410: --
1411: l_actn := 'Calling ben_batch_utils.ini(COMP_OBJ)...';
1412: ben_batch_utils.ini('COMP_OBJ');
1413: For l_rec in c_designation loop
1414: hr_utility.set_location(l_proc,101);
1415:
1416: l_returned_end_dt:=null;
1417:
1418: if l_rec.oipl_id is not null then

Line 1438: hr_utility.set_location(l_proc,102);

1434: -- Note: pgm_id and pl_id args already checked in the cursor
1435: --
1436: l_rule_ret:='Y';
1437: if p_comp_selection_rl is not null then
1438: hr_utility.set_location(l_proc,102);
1439: l_rule_ret:=comp_selection_rule(
1440: p_person_id => p_person_id
1441: ,p_business_group_id => p_business_group_id
1442: ,p_pgm_id => l_rec.pgm_id

Line 1452: hr_utility.set_location(l_proc,103);

1448: ,p_comp_selection_rule_id => p_comp_selection_rl
1449: ,p_effective_date => p_effective_date
1450: );
1451: end if;
1452: hr_utility.set_location(l_proc,103);
1453: if l_rule_ret='Y' then
1454: hr_utility.set_location(l_proc,104);
1455: --
1456: -- Check to see if the dependent is still eligible

Line 1454: hr_utility.set_location(l_proc,104);

1450: );
1451: end if;
1452: hr_utility.set_location(l_proc,103);
1453: if l_rule_ret='Y' then
1454: hr_utility.set_location(l_proc,104);
1455: --
1456: -- Check to see if the dependent is still eligible
1457: --
1458: hr_utility.set_location('contact_person_id='||to_char(p_person_id),1100);

Line 1458: hr_utility.set_location('contact_person_id='||to_char(p_person_id),1100);

1454: hr_utility.set_location(l_proc,104);
1455: --
1456: -- Check to see if the dependent is still eligible
1457: --
1458: hr_utility.set_location('contact_person_id='||to_char(p_person_id),1100);
1459: hr_utility.set_location('oipl_id='||to_char(l_rec.oipl_id),1100);
1460: hr_utility.set_location('ptip_id='||to_char(l_rec.ptip_id),1100);
1461: hr_utility.set_location('pl_id='||to_char(l_rec.pl_id),1100);
1462: hr_utility.set_location('pgm_id='||to_char(l_rec.pgm_id),1100);

Line 1459: hr_utility.set_location('oipl_id='||to_char(l_rec.oipl_id),1100);

1455: --
1456: -- Check to see if the dependent is still eligible
1457: --
1458: hr_utility.set_location('contact_person_id='||to_char(p_person_id),1100);
1459: hr_utility.set_location('oipl_id='||to_char(l_rec.oipl_id),1100);
1460: hr_utility.set_location('ptip_id='||to_char(l_rec.ptip_id),1100);
1461: hr_utility.set_location('pl_id='||to_char(l_rec.pl_id),1100);
1462: hr_utility.set_location('pgm_id='||to_char(l_rec.pgm_id),1100);
1463: hr_utility.set_location('contact_relationship_id_id='||to_char(l_rec.contact_relationship_id),1100);

Line 1460: hr_utility.set_location('ptip_id='||to_char(l_rec.ptip_id),1100);

1456: -- Check to see if the dependent is still eligible
1457: --
1458: hr_utility.set_location('contact_person_id='||to_char(p_person_id),1100);
1459: hr_utility.set_location('oipl_id='||to_char(l_rec.oipl_id),1100);
1460: hr_utility.set_location('ptip_id='||to_char(l_rec.ptip_id),1100);
1461: hr_utility.set_location('pl_id='||to_char(l_rec.pl_id),1100);
1462: hr_utility.set_location('pgm_id='||to_char(l_rec.pgm_id),1100);
1463: hr_utility.set_location('contact_relationship_id_id='||to_char(l_rec.contact_relationship_id),1100);
1464: --

Line 1461: hr_utility.set_location('pl_id='||to_char(l_rec.pl_id),1100);

1457: --
1458: hr_utility.set_location('contact_person_id='||to_char(p_person_id),1100);
1459: hr_utility.set_location('oipl_id='||to_char(l_rec.oipl_id),1100);
1460: hr_utility.set_location('ptip_id='||to_char(l_rec.ptip_id),1100);
1461: hr_utility.set_location('pl_id='||to_char(l_rec.pl_id),1100);
1462: hr_utility.set_location('pgm_id='||to_char(l_rec.pgm_id),1100);
1463: hr_utility.set_location('contact_relationship_id_id='||to_char(l_rec.contact_relationship_id),1100);
1464: --
1465: if l_rec.pgm_id is not null then

Line 1462: hr_utility.set_location('pgm_id='||to_char(l_rec.pgm_id),1100);

1458: hr_utility.set_location('contact_person_id='||to_char(p_person_id),1100);
1459: hr_utility.set_location('oipl_id='||to_char(l_rec.oipl_id),1100);
1460: hr_utility.set_location('ptip_id='||to_char(l_rec.ptip_id),1100);
1461: hr_utility.set_location('pl_id='||to_char(l_rec.pl_id),1100);
1462: hr_utility.set_location('pgm_id='||to_char(l_rec.pgm_id),1100);
1463: hr_utility.set_location('contact_relationship_id_id='||to_char(l_rec.contact_relationship_id),1100);
1464: --
1465: if l_rec.pgm_id is not null then
1466: --

Line 1463: hr_utility.set_location('contact_relationship_id_id='||to_char(l_rec.contact_relationship_id),1100);

1459: hr_utility.set_location('oipl_id='||to_char(l_rec.oipl_id),1100);
1460: hr_utility.set_location('ptip_id='||to_char(l_rec.ptip_id),1100);
1461: hr_utility.set_location('pl_id='||to_char(l_rec.pl_id),1100);
1462: hr_utility.set_location('pgm_id='||to_char(l_rec.pgm_id),1100);
1463: hr_utility.set_location('contact_relationship_id_id='||to_char(l_rec.contact_relationship_id),1100);
1464: --
1465: if l_rec.pgm_id is not null then
1466: --
1467: open c_dpnt_dsgn_lvl(l_rec.pgm_id);

Line 1497: hr_utility.set_location(l_proc,105);

1493: p_dpnt_inelig_rsn_cd => l_inelig_rsn_cd);
1494: --
1495: -- If the dependent is not eligible end date row
1496: --
1497: hr_utility.set_location(l_proc,105);
1498: hr_utility.set_location('l_elig_flag'||l_elig_flag,8888);
1499: --
1500: if l_elig_flag<>'Y' then
1501: --

Line 1498: hr_utility.set_location('l_elig_flag'||l_elig_flag,8888);

1494: --
1495: -- If the dependent is not eligible end date row
1496: --
1497: hr_utility.set_location(l_proc,105);
1498: hr_utility.set_location('l_elig_flag'||l_elig_flag,8888);
1499: --
1500: if l_elig_flag<>'Y' then
1501: --
1502: hr_utility.set_location(l_proc,106);

Line 1502: hr_utility.set_location(l_proc,106);

1498: hr_utility.set_location('l_elig_flag'||l_elig_flag,8888);
1499: --
1500: if l_elig_flag<>'Y' then
1501: --
1502: hr_utility.set_location(l_proc,106);
1503: --
1504: -- 5100008 : Added this to fetch EGD ELIG_THRU_DT
1505: if (l_rec.date_end <= p_effective_date) then
1506: l_egd_elig_thru_dt := l_rec.date_end;

Line 1515: hr_utility.set_location('SARKAR l_rec.ovrdn_flag '||l_rec.ovrdn_flag,8888);

1511:
1512: --
1513: -- Get the dpnt cvg end date
1514: -- Bug 5442301 -- dont update cvg_thru date if it is overriden
1515: hr_utility.set_location('SARKAR l_rec.ovrdn_flag '||l_rec.ovrdn_flag,8888);
1516: hr_utility.set_location('SARKAR l_rec.ovrdn_thru_dt '||l_rec.ovrdn_thru_dt,8888);
1517:
1518:
1519: if nvl(l_rec.ovrdn_flag,'N') = 'Y' and

Line 1516: hr_utility.set_location('SARKAR l_rec.ovrdn_thru_dt '||l_rec.ovrdn_thru_dt,8888);

1512: --
1513: -- Get the dpnt cvg end date
1514: -- Bug 5442301 -- dont update cvg_thru date if it is overriden
1515: hr_utility.set_location('SARKAR l_rec.ovrdn_flag '||l_rec.ovrdn_flag,8888);
1516: hr_utility.set_location('SARKAR l_rec.ovrdn_thru_dt '||l_rec.ovrdn_thru_dt,8888);
1517:
1518:
1519: if nvl(l_rec.ovrdn_flag,'N') = 'Y' and
1520: nvl(l_rec.ovrdn_thru_dt,hr_api.g_eot) >= p_effective_date then

Line 1569: hr_utility.set_location('pdp_id='||to_char(l_rec.elig_cvrd_dpnt_id),111);

1565: l_returned_end_dt := p_effective_date;
1566: --
1567: end if;
1568: --
1569: hr_utility.set_location('pdp_id='||to_char(l_rec.elig_cvrd_dpnt_id),111);
1570: hr_utility.set_location('cvg_thru_dt='||to_char(l_returned_end_dt),112);
1571: -- -- Bug 5442301 -- dont update cvg_thru date if it is overriden
1572: if nvl(l_rec.ovrdn_flag,'N') = 'Y' and
1573: nvl(l_rec.ovrdn_thru_dt,hr_api.g_eot) >= p_effective_date then

Line 1570: hr_utility.set_location('cvg_thru_dt='||to_char(l_returned_end_dt),112);

1566: --
1567: end if;
1568: --
1569: hr_utility.set_location('pdp_id='||to_char(l_rec.elig_cvrd_dpnt_id),111);
1570: hr_utility.set_location('cvg_thru_dt='||to_char(l_returned_end_dt),112);
1571: -- -- Bug 5442301 -- dont update cvg_thru date if it is overriden
1572: if nvl(l_rec.ovrdn_flag,'N') = 'Y' and
1573: nvl(l_rec.ovrdn_thru_dt,hr_api.g_eot) >= p_effective_date then
1574:

Line 1734: hr_utility.set_location(l_proc,107);

1730: g_designations_ended:=g_designations_ended+1;
1731: l_person_ended:='Y';
1732: l_this_person_ended:='Y';
1733: else
1734: hr_utility.set_location(l_proc,107);
1735: g_designations_remaining:=g_designations_remaining+1;
1736: end if;
1737: hr_utility.set_location(l_proc,108);
1738: --

Line 1737: hr_utility.set_location(l_proc,108);

1733: else
1734: hr_utility.set_location(l_proc,107);
1735: g_designations_remaining:=g_designations_remaining+1;
1736: end if;
1737: hr_utility.set_location(l_proc,108);
1738: --
1739: end if;
1740: --
1741: -- write the audit info for this

Line 1763: hr_utility.set_location(l_proc,109);

1759: l_cache(l_cache_cnt).contact_type:=l_rec.contact_type;
1760: l_cache(l_cache_cnt).dpnt_cvg_strt_dt:=l_rec.cvg_strt_dt;
1761: l_cache(l_cache_cnt).dpnt_cvg_thru_dt:=l_returned_end_dt;
1762: --
1763: hr_utility.set_location(l_proc,109);
1764: --
1765: end loop;
1766: --
1767: if l_comp_ineligible then

Line 1783: hr_utility.set_location(l_proc,110);

1779: );
1780: --
1781: end if;
1782: --
1783: hr_utility.set_location(l_proc,110);
1784: l_actn := 'Calling Ben_batch_utils.write_comp...';
1785: Ben_batch_utils.write_comp(p_business_group_id => p_business_group_id
1786: ,p_effective_date => p_effective_date
1787: );

Line 1797: hr_utility.set_location('g_profile_value = '||g_profile_value,100);

1793: -- Store the participant Id on the related_person_id so that
1794: -- may get participant counts for summary report
1795: --
1796: ben_batch_utils.g_rec.related_person_id:=l_part_person_id;
1797: hr_utility.set_location('g_profile_value = '||g_profile_value,100);
1798: if l_person_ended='Y' then
1799: Ben_batch_utils.write_rec(p_typ_cd => 'DSGENDED');
1800: else
1801: --

Line 1819: hr_utility.set_location(l_proc||' pgm_id='||to_char(l_cache(i).pgm_id),111);

1815: -- ben_batch_dpnt_info if the g_profile_value set to "No". This is
1816: -- done for improving the performance of audit log
1817: --
1818: For i in 1..l_cache_cnt Loop
1819: hr_utility.set_location(l_proc||' pgm_id='||to_char(l_cache(i).pgm_id),111);
1820: if((l_cache(i).actn_cd = 'ENDED')
1821: or (l_cache(i).actn_cd = 'NOCHG'
1822: and nvl(g_profile_value, 'Y') = 'Y')) then
1823: ben_batch_dpnt_info_api.create_batch_dpnt_info

Line 1855: hr_utility.set_location ('Leaving '|| l_proc,10);

1851: );
1852: End if;
1853: g_persons_processed := g_persons_processed + 1;
1854: commit;
1855: hr_utility.set_location ('Leaving '|| l_proc,10);
1856: Exception
1857: When others then
1858: rollback to process_default_enrt_savepoint;
1859: g_persons_errored := g_persons_errored + 1;