DBA Data[Home] [Help]

APPS.PER_GET_ELIG dependencies on HR_UTILITY

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

34: c_elig_obj cur_type;
35:
36: BEGIN
37: l_proc := 'per_get_elig.get_elig_obj_for_per_asg_live';
38: hr_utility.set_location('Entering: '|| l_proc, 10);
39: l_per_elig_obj := per_elig_obj(NULL,NULL,NULL,NULL,NULL,NULL);
40: x_eligible_object := per_elig_obj_varray(); -- initialize empty
41: x_return_status := '0';
42: x_return_message := '';

Line 57: hr_utility.set_location(l_proc, 20);

53: , p_assignment_id
54: , p_effective_date
55: , p_effective_date;
56:
57: hr_utility.set_location(l_proc, 20);
58:
59: LOOP -- Loop for person assignments
60: FETCH c_per_asg INTO l_assignment_id
61: ,l_business_group_id;

Line 63: hr_utility.set_location('PerId '||p_person_id||

59: LOOP -- Loop for person assignments
60: FETCH c_per_asg INTO l_assignment_id
61: ,l_business_group_id;
62: EXIT WHEN c_per_asg%NOTFOUND;
63: hr_utility.set_location('PerId '||p_person_id||
64: ' AsgId '||l_assignment_id,25);
65:
66: -- Cursor to fetch eligibility objects
67: OPEN c_elig_obj FOR ' SELECT elig_obj_id,'||

Line 82: hr_utility.set_location(l_proc, 30);

78: , p_effective_date
79: , p_effective_date
80: , l_business_group_id;
81:
82: hr_utility.set_location(l_proc, 30);
83:
84: LOOP -- Loop for eligibility objects
85: FETCH c_elig_obj INTO l_elig_obj_id
86: ,l_elig_obj_eff_st_dt

Line 91: hr_utility.set_location('EligObjId '||l_elig_obj_id||

87: ,l_elig_obj_eff_en_dt
88: ,l_column_name
89: ,l_column_value;
90: EXIT WHEN c_elig_obj%NOTFOUND;
91: hr_utility.set_location('EligObjId '||l_elig_obj_id||
92: ' ColNm '||l_column_name||
93: ' ColVal '||l_column_value,33);
94:
95: -- Invoke BEN routine to test eligibility

Line 104: hr_utility.set_location('Eligible', 36);

100: , p_business_group_id => l_business_group_id
101: , p_save_results => FALSE
102: ) THEN
103:
104: hr_utility.set_location('Eligible', 36);
105:
106: -- Capture details of eligibile object
107: l_per_elig_obj.elig_obj_id := l_elig_obj_id;
108: l_per_elig_obj.tab_name := p_table_name;

Line 125: hr_utility.set_location('Leaving: '|| l_proc, 40);

121:
122: END LOOP; -- Loop for person assignments
123: CLOSE c_per_asg;
124:
125: hr_utility.set_location('Leaving: '|| l_proc, 40);
126: EXCEPTION
127:
128: WHEN OTHERS THEN
129: hr_utility.set_location('Leaving: '|| l_proc, 50);

Line 129: hr_utility.set_location('Leaving: '|| l_proc, 50);

125: hr_utility.set_location('Leaving: '|| l_proc, 40);
126: EXCEPTION
127:
128: WHEN OTHERS THEN
129: hr_utility.set_location('Leaving: '|| l_proc, 50);
130: hr_utility.set_location(SQLERRM, 55);
131: x_return_status := '2';
132: x_return_message := SQLERRM;
133:

Line 130: hr_utility.set_location(SQLERRM, 55);

126: EXCEPTION
127:
128: WHEN OTHERS THEN
129: hr_utility.set_location('Leaving: '|| l_proc, 50);
130: hr_utility.set_location(SQLERRM, 55);
131: x_return_status := '2';
132: x_return_message := SQLERRM;
133:
134: END get_elig_obj_for_per_asg_live;

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

176: AND OBJ.effective_end_date >= cp_effective_date;
177:
178: BEGIN
179: l_proc := 'per_get_elig.get_elig_obj_for_per_asg_cache';
180: hr_utility.set_location('Entering: '|| l_proc, 10);
181: l_per_elig_obj := per_elig_obj(NULL,NULL,NULL,NULL,NULL,NULL);
182: x_eligible_object := per_elig_obj_varray(); -- initialize empty
183: x_return_status := '0';
184: x_return_message := '';

Line 192: hr_utility.set_location(l_proc, 20);

188: , p_assignment_id
189: , p_effective_date
190: );
191:
192: hr_utility.set_location(l_proc, 20);
193:
194: LOOP -- for eligibility objects
195: FETCH c_elig_obj INTO l_per_elig_obj.elig_obj_id
196: ,l_per_elig_obj.tab_name

Line 202: hr_utility.set_location('EligObjId '||l_per_elig_obj.elig_obj_id, 25);

198: ,l_per_elig_obj.col_value
199: ,l_per_elig_obj.eff_start_date
200: ,l_per_elig_obj.eff_end_date;
201: EXIT WHEN c_elig_obj%NOTFOUND;
202: hr_utility.set_location('EligObjId '||l_per_elig_obj.elig_obj_id, 25);
203:
204: -- Save eligibile object into array
205: x_eligible_object.EXTEND(1);
206: x_eligible_object(x_eligible_object.COUNT) := l_per_elig_obj;

Line 211: hr_utility.set_location('Leaving: '|| l_proc, 30);

207:
208: END LOOP; -- for eligibility objects
209: CLOSE c_elig_obj;
210:
211: hr_utility.set_location('Leaving: '|| l_proc, 30);
212: EXCEPTION
213:
214: WHEN OTHERS THEN
215: hr_utility.set_location('Leaving: '|| l_proc, 40);

Line 215: hr_utility.set_location('Leaving: '|| l_proc, 40);

211: hr_utility.set_location('Leaving: '|| l_proc, 30);
212: EXCEPTION
213:
214: WHEN OTHERS THEN
215: hr_utility.set_location('Leaving: '|| l_proc, 40);
216: hr_utility.set_location(SQLERRM, 45);
217: x_return_status := '2';
218: x_return_message := SQLERRM;
219:

Line 216: hr_utility.set_location(SQLERRM, 45);

212: EXCEPTION
213:
214: WHEN OTHERS THEN
215: hr_utility.set_location('Leaving: '|| l_proc, 40);
216: hr_utility.set_location(SQLERRM, 45);
217: x_return_status := '2';
218: x_return_message := SQLERRM;
219:
220: END get_elig_obj_for_per_asg_cache;

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

268: c_asg cur_type;
269:
270: BEGIN
271: l_proc := 'per_get_elig.get_per_asg_for_elig_obj_live';
272: hr_utility.set_location('Entering: '|| l_proc, 10);
273: l_per_asg_obj := per_asg_obj(NULL,NULL,NULL,NULL,NULL);
274: x_person_assignment := per_asg_varray(); -- initialize empty
275: x_return_status := '0';
276: x_return_message := '';

Line 288: hr_utility.set_location('EligObjId: '||l_elig_obj_id, 20);

284: );
285: FETCH c_elig_obj INTO l_elig_obj_id;
286: CLOSE c_elig_obj;
287:
288: hr_utility.set_location('EligObjId: '||l_elig_obj_id, 20);
289:
290: -- Cursor to fetch persons in the business group
291: OPEN c_per FOR ' SELECT person_id,'||
292: ' party_id'||

Line 301: hr_utility.set_location(l_proc, 30);

297: USING p_business_group_id
298: , p_effective_date
299: , p_effective_date;
300:
301: hr_utility.set_location(l_proc, 30);
302:
303: LOOP -- Loop for persons in business group
304: FETCH c_per INTO l_person_id
305: ,l_party_id;

Line 307: hr_utility.set_location('PersonId '||l_person_id||

303: LOOP -- Loop for persons in business group
304: FETCH c_per INTO l_person_id
305: ,l_party_id;
306: EXIT WHEN c_per%NOTFOUND;
307: hr_utility.set_location('PersonId '||l_person_id||
308: ' PartyId '||l_party_id,33);
309:
310: -- Cursor to fetch assignments for a person
311: OPEN c_asg FOR ' SELECT assignment_id,'||

Line 324: hr_utility.set_location(l_proc, 40);

320: , p_business_group_id
321: , p_effective_date
322: , p_effective_date;
323:
324: hr_utility.set_location(l_proc, 40);
325:
326: LOOP -- Loop for assignments for the person
327: FETCH c_asg INTO l_assignment_id
328: ,l_asg_eff_st_dt

Line 331: hr_utility.set_location('AsgId '||l_assignment_id,43);

327: FETCH c_asg INTO l_assignment_id
328: ,l_asg_eff_st_dt
329: ,l_asg_eff_en_dt;
330: EXIT WHEN c_asg%NOTFOUND;
331: hr_utility.set_location('AsgId '||l_assignment_id,43);
332:
333: -- Invoke BEN routine to test eligibility
334: IF ben_per_asg_elig.eligible( p_person_id => l_person_id
335: , p_assignment_id => l_assignment_id

Line 342: hr_utility.set_location('Eligible', 46);

338: , p_business_group_id => p_business_group_id
339: , p_save_results => FALSE
340: ) THEN
341:
342: hr_utility.set_location('Eligible', 46);
343:
344: -- Capture details of eligibile object
345: l_per_asg_obj.person_id := l_person_id;
346: l_per_asg_obj.assignment_id := l_assignment_id;

Line 362: hr_utility.set_location('Leaving: '|| l_proc, 50);

358:
359: END LOOP; -- Loop for persons in business group
360: CLOSE c_per;
361:
362: hr_utility.set_location('Leaving: '|| l_proc, 50);
363: EXCEPTION
364:
365: WHEN OTHERS THEN
366: hr_utility.set_location('Leaving: '|| l_proc, 60);

Line 366: hr_utility.set_location('Leaving: '|| l_proc, 60);

362: hr_utility.set_location('Leaving: '|| l_proc, 50);
363: EXCEPTION
364:
365: WHEN OTHERS THEN
366: hr_utility.set_location('Leaving: '|| l_proc, 60);
367: hr_utility.set_location(SQLERRM, 65);
368: x_return_status := '2';
369: x_return_message := SQLERRM;
370:

Line 367: hr_utility.set_location(SQLERRM, 65);

363: EXCEPTION
364:
365: WHEN OTHERS THEN
366: hr_utility.set_location('Leaving: '|| l_proc, 60);
367: hr_utility.set_location(SQLERRM, 65);
368: x_return_status := '2';
369: x_return_message := SQLERRM;
370:
371: END get_per_asg_for_elig_obj_live;

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

437: AND effective_end_date >= cp_effective_date;
438:
439: BEGIN
440: l_proc := 'per_get_elig.get_per_asg_for_elig_obj_cache';
441: hr_utility.set_location('Entering: '|| l_proc, 10);
442: l_per_asg_obj := per_asg_obj(NULL,NULL,NULL,NULL,NULL);
443: x_person_assignment := per_asg_varray(); -- initialize empty
444: x_return_status := '0';
445: x_return_message := '';

Line 455: hr_utility.set_location(l_proc, 20);

451: , p_effective_date
452: , p_business_group_id
453: );
454:
455: hr_utility.set_location(l_proc, 20);
456:
457: LOOP -- for result person assignments
458: FETCH c_elig_per_asg INTO l_per_asg_obj.person_id
459: ,l_per_asg_obj.assignment_id;

Line 461: hr_utility.set_location('PerId '||l_per_asg_obj.person_id||

457: LOOP -- for result person assignments
458: FETCH c_elig_per_asg INTO l_per_asg_obj.person_id
459: ,l_per_asg_obj.assignment_id;
460: EXIT WHEN c_elig_per_asg%NOTFOUND;
461: hr_utility.set_location('PerId '||l_per_asg_obj.person_id||
462: ' AsgId '||l_per_asg_obj.assignment_id,23);
463:
464: hr_utility.set_location(l_proc, 22);
465:

Line 464: hr_utility.set_location(l_proc, 22);

460: EXIT WHEN c_elig_per_asg%NOTFOUND;
461: hr_utility.set_location('PerId '||l_per_asg_obj.person_id||
462: ' AsgId '||l_per_asg_obj.assignment_id,23);
463:
464: hr_utility.set_location(l_proc, 22);
465:
466: -- Get party id
467: OPEN c_party_id (l_per_asg_obj.person_id
468: ,p_effective_date

Line 473: hr_utility.set_location(l_proc, 24);

469: );
470: FETCH c_party_id INTO l_per_asg_obj.party_id;
471: CLOSE c_party_id;
472:
473: hr_utility.set_location(l_proc, 24);
474:
475: -- Get assignment dates
476: OPEN c_asg_eff_dates (l_per_asg_obj.person_id
477: ,l_per_asg_obj.assignment_id

Line 484: hr_utility.set_location(l_proc, 26);

480: FETCH c_asg_eff_dates INTO l_per_asg_obj.eff_start_date
481: ,l_per_asg_obj.eff_end_date;
482: CLOSE c_asg_eff_dates;
483:
484: hr_utility.set_location(l_proc, 26);
485:
486: -- Save person assignments into array
487: x_person_assignment.EXTEND(1);
488: x_person_assignment(x_person_assignment.COUNT) := l_per_asg_obj;

Line 493: hr_utility.set_location('Leaving: '|| l_proc, 30);

489:
490: END LOOP; -- for result person assignments
491: CLOSE c_elig_per_asg;
492:
493: hr_utility.set_location('Leaving: '|| l_proc, 30);
494: EXCEPTION
495:
496: WHEN OTHERS THEN
497: hr_utility.set_location('Leaving: '|| l_proc, 40);

Line 497: hr_utility.set_location('Leaving: '|| l_proc, 40);

493: hr_utility.set_location('Leaving: '|| l_proc, 30);
494: EXCEPTION
495:
496: WHEN OTHERS THEN
497: hr_utility.set_location('Leaving: '|| l_proc, 40);
498: hr_utility.set_location(SQLERRM, 45);
499: x_return_status := '2';
500: x_return_message := SQLERRM;
501:

Line 498: hr_utility.set_location(SQLERRM, 45);

494: EXCEPTION
495:
496: WHEN OTHERS THEN
497: hr_utility.set_location('Leaving: '|| l_proc, 40);
498: hr_utility.set_location(SQLERRM, 45);
499: x_return_status := '2';
500: x_return_message := SQLERRM;
501:
502: END get_per_asg_for_elig_obj_cache;

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

522: l_proc VARCHAR2(50);
523: l_data_mode VARCHAR2(1);
524: BEGIN
525: l_proc := 'per_get_elig.get_elig_obj_for_per_asg';
526: hr_utility.set_location('Entering: '|| l_proc, 10);
527:
528: CASE
529: WHEN p_data_mode IS NULL THEN
530: l_data_mode := 'L';

Line 538: hr_utility.set_location(l_proc, 20);

534: l_data_mode := 'L';
535: END CASE;
536:
537: IF l_data_mode = 'L' THEN
538: hr_utility.set_location(l_proc, 20);
539:
540: get_elig_obj_for_per_asg_live ( p_person_id => p_person_id
541: , p_assignment_id => p_assignment_id
542: , p_effective_date => p_effective_date

Line 549: hr_utility.set_location(l_proc, 30);

545: , x_return_status => x_return_status
546: , x_return_message => x_return_message
547: );
548: ELSE -- data mode is 'C'
549: hr_utility.set_location(l_proc, 30);
550:
551: get_elig_obj_for_per_asg_cache ( p_person_id => p_person_id
552: , p_assignment_id => p_assignment_id
553: , p_effective_date => p_effective_date

Line 561: hr_utility.set_location('Leaving: '|| l_proc, 40);

557: , x_return_message => x_return_message
558: );
559: END IF; -- data mode check
560:
561: hr_utility.set_location('Leaving: '|| l_proc, 40);
562: END get_elig_obj_for_per_asg;
563:
564: -----------------------------------------------------------------------------
565: --

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

582: l_proc VARCHAR2(50);
583: l_data_mode VARCHAR2(1);
584: BEGIN
585: l_proc := 'per_get_elig.get_per_asg_for_elig_obj';
586: hr_utility.set_location('Entering: '|| l_proc, 10);
587:
588: CASE
589: WHEN p_data_mode IS NULL THEN
590: l_data_mode := 'L';

Line 598: hr_utility.set_location(l_proc, 20);

594: l_data_mode := 'L';
595: END CASE;
596:
597: IF l_data_mode = 'L' THEN
598: hr_utility.set_location(l_proc, 20);
599:
600: get_per_asg_for_elig_obj_live ( p_table_name => p_table_name
601: , p_column_name => p_column_name
602: , p_column_value => p_column_value

Line 610: hr_utility.set_location(l_proc, 30);

606: , x_return_status => x_return_status
607: , x_return_message => x_return_message
608: );
609: ELSE -- data mode is 'C'
610: hr_utility.set_location(l_proc, 30);
611:
612: get_per_asg_for_elig_obj_cache ( p_table_name => p_table_name
613: , p_column_name => p_column_name
614: , p_column_value => p_column_value

Line 623: hr_utility.set_location('Leaving: '|| l_proc, 40);

619: , x_return_message => x_return_message
620: );
621: END IF; -- data mode check
622:
623: hr_utility.set_location('Leaving: '|| l_proc, 40);
624: END get_per_asg_for_elig_obj;
625:
626: -----------------------------------------------------------------------------
627: --

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

662: AND end_date_active = cp_end_date;
663:
664: BEGIN
665: l_proc := 'per_get_elig.get_sch_for_per_asg';
666: hr_utility.set_location('Entering: '|| l_proc, 10);
667: l_elig_obj_varray := per_elig_obj_varray();
668: l_elig_obj := per_elig_obj(NULL,NULL,NULL,NULL,NULL,NULL);
669: l_work_sch_obj := per_work_sch_obj(NULL,NULL,NULL,NULL,NULL);
670: x_schedule := per_work_sch_varray(); -- initialize empty

Line 685: hr_utility.set_location(l_proc, 20);

681: , x_return_status => x_return_status
682: , x_return_message => x_return_message
683: );
684:
685: hr_utility.set_location(l_proc, 20);
686:
687: -- Translate all the eligibility objects to work schedules
688: FOR i IN l_elig_obj_varray.FIRST..l_elig_obj_varray.LAST LOOP
689: l_elig_obj := l_elig_obj_varray(i);

Line 691: hr_utility.set_location('EligObjId: '||l_elig_obj.elig_obj_id||' ColVal: '||l_elig_obj.col_value, 23);

687: -- Translate all the eligibility objects to work schedules
688: FOR i IN l_elig_obj_varray.FIRST..l_elig_obj_varray.LAST LOOP
689: l_elig_obj := l_elig_obj_varray(i);
690:
691: hr_utility.set_location('EligObjId: '||l_elig_obj.elig_obj_id||' ColVal: '||l_elig_obj.col_value, 23);
692:
693: -- Get the schedule details
694: OPEN c_sch ( l_elig_obj.col_value
695: , l_elig_obj.eff_start_date

Line 702: hr_utility.set_location('SchCat: '||l_work_sch_obj.schedule_category||' SchName: '||l_work_sch_obj.schedule_name, 26);

698: FETCH c_sch INTO l_work_sch_obj.schedule_category
699: ,l_work_sch_obj.schedule_name;
700: CLOSE c_sch;
701:
702: hr_utility.set_location('SchCat: '||l_work_sch_obj.schedule_category||' SchName: '||l_work_sch_obj.schedule_name, 26);
703:
704: -- Save schedule details
705: l_work_sch_obj.schedule_id := l_elig_obj.col_value;
706: l_work_sch_obj.start_date_active := l_elig_obj.eff_start_date;

Line 711: hr_utility.set_location(l_proc, 29);

707: l_work_sch_obj.end_date_active := l_elig_obj.eff_end_date;
708: x_schedule.EXTEND(1);
709: x_schedule(x_schedule.COUNT) := l_work_sch_obj;
710:
711: hr_utility.set_location(l_proc, 29);
712: END LOOP;
713:
714: hr_utility.set_location('Leaving: '|| l_proc, 30);
715: EXCEPTION

Line 714: hr_utility.set_location('Leaving: '|| l_proc, 30);

710:
711: hr_utility.set_location(l_proc, 29);
712: END LOOP;
713:
714: hr_utility.set_location('Leaving: '|| l_proc, 30);
715: EXCEPTION
716:
717: WHEN OTHERS THEN
718: hr_utility.set_location('Leaving: '|| l_proc, 40);

Line 718: hr_utility.set_location('Leaving: '|| l_proc, 40);

714: hr_utility.set_location('Leaving: '|| l_proc, 30);
715: EXCEPTION
716:
717: WHEN OTHERS THEN
718: hr_utility.set_location('Leaving: '|| l_proc, 40);
719: hr_utility.set_location(SQLERRM, 45);
720: x_return_status := '2';
721: x_return_message := SQLERRM;
722:

Line 719: hr_utility.set_location(SQLERRM, 45);

715: EXCEPTION
716:
717: WHEN OTHERS THEN
718: hr_utility.set_location('Leaving: '|| l_proc, 40);
719: hr_utility.set_location(SQLERRM, 45);
720: x_return_status := '2';
721: x_return_message := SQLERRM;
722:
723: END get_sch_for_per_asg;

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

757: AND end_date_active >= cp_effective_date;
758:
759: BEGIN
760: l_proc := 'per_get_elig.get_per_asg_for_sch';
761: hr_utility.set_location('Entering: '|| l_proc, 10);
762: x_person_assignment := per_asg_varray(); -- initialize empty
763: x_return_status := '0';
764: x_return_message := '';
765:

Line 774: hr_utility.set_location('SchId: '||l_schedule_id, 20);

770: );
771: FETCH c_sch INTO l_schedule_id;
772: CLOSE c_sch;
773:
774: hr_utility.set_location('SchId: '||l_schedule_id, 20);
775:
776: -- Get the person assignments
777: get_per_asg_for_elig_obj( p_table_name => 'CAC_SR_SCHEDULES_VL'
778: , p_column_name => 'SCHEDULE_ID'

Line 788: hr_utility.set_location('Leaving: '|| l_proc, 30);

784: , x_return_status => x_return_status
785: , x_return_message => x_return_message
786: );
787:
788: hr_utility.set_location('Leaving: '|| l_proc, 30);
789: EXCEPTION
790:
791: WHEN OTHERS THEN
792: hr_utility.set_location('Leaving: '|| l_proc, 40);

Line 792: hr_utility.set_location('Leaving: '|| l_proc, 40);

788: hr_utility.set_location('Leaving: '|| l_proc, 30);
789: EXCEPTION
790:
791: WHEN OTHERS THEN
792: hr_utility.set_location('Leaving: '|| l_proc, 40);
793: hr_utility.set_location(SQLERRM, 45);
794: x_return_status := '2';
795: x_return_message := SQLERRM;
796:

Line 793: hr_utility.set_location(SQLERRM, 45);

789: EXCEPTION
790:
791: WHEN OTHERS THEN
792: hr_utility.set_location('Leaving: '|| l_proc, 40);
793: hr_utility.set_location(SQLERRM, 45);
794: x_return_status := '2';
795: x_return_message := SQLERRM;
796:
797: END get_per_asg_for_sch;