DBA Data[Home] [Help]

APPS.PQP_SERVICE_HISTORY_CALC_PKG dependencies on HR_UTILITY

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

16: l_end_date DATE := trunc(p_end_date);
17: l_days NUMBER(12);
18: --
19: BEGIN
20: hr_utility.set_location('Entering: '||l_proc, 10);
21: --
22: SELECT l_end_date - l_start_date
23: INTO l_days
24: FROM dual;

Line 29: hr_utility.set_location('Leaving: '||l_proc, 20);

25: --
26: l_days := l_days + 1;
27: p_days := l_days;
28: --
29: hr_utility.set_location('Leaving: '||l_proc, 20);
30:
31:
32: -- Added by tmehra for nocopy changes Feb'03
33:

Line 36: hr_utility.set_location('Entering excep:'||l_proc, 35);

32: -- Added by tmehra for nocopy changes Feb'03
33:
34: EXCEPTION
35: WHEN OTHERS THEN
36: hr_utility.set_location('Entering excep:'||l_proc, 35);
37: p_days := 0;
38: raise;
39:
40: --

Line 72: hr_utility.set_location('Entering: '||l_func, 10);

68: l_func VARCHAR2(60) := 'pqp_service_history_calc_pkg.calculate_current_service';
69: l_days NUMBER(12) := 0 ;
70: --
71: BEGIN
72: hr_utility.set_location('Entering: '||l_func, 10);
73: --
74: FOR c_curr_serv_rec IN c_curr_serv LOOP
75: --
76: -- Calculate the service period

Line 83: hr_utility.set_location(l_func, 20);

79: ,p_end_date => p_calculation_date
80: ,p_days => l_days
81: );
82: --
83: hr_utility.set_location(l_func, 20);
84: END LOOP;
85: --
86: return l_days;
87: --

Line 88: hr_utility.set_location('Leaving: '||l_func, 30);

84: END LOOP;
85: --
86: return l_days;
87: --
88: hr_utility.set_location('Leaving: '||l_func, 30);
89: --
90: END calculate_current_service;
91: --
92: -- ----------------------------------------------------------------------------

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

102: l_end_date DATE;
103: --
104: BEGIN
105: --
106: hr_utility.set_location('Entering: '||l_proc, 10);
107: --
108: SELECT ADD_MONTHS(p_start_date,(p_period_years * 12))
109: INTO l_end_date
110: FROM dual;

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

108: SELECT ADD_MONTHS(p_start_date,(p_period_years * 12))
109: INTO l_end_date
110: FROM dual;
111:
112: hr_utility.set_location(l_proc, 20);
113: SELECT l_end_date - p_start_date
114: INTO l_days
115: FROM dual;
116:

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

115: FROM dual;
116:
117: p_days := l_days;
118:
119: hr_utility.set_location('Leaving: '||l_proc, 30);
120: --
121: END convert_years_to_days;
122: --
123: -- ----------------------------------------------------------------------------

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

151: l_days NUMBER(12) := 0 ;
152: l_exists VARCHAR2(1);
153: --
154: BEGIN
155: hr_utility.set_location('Entering: '||l_proc, 10);
156: --
157: OPEN c_overlap_serv2;
158: FETCH c_overlap_serv2 INTO l_exists;
159: hr_utility.set_location (l_proc, 20);

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

155: hr_utility.set_location('Entering: '||l_proc, 10);
156: --
157: OPEN c_overlap_serv2;
158: FETCH c_overlap_serv2 INTO l_exists;
159: hr_utility.set_location (l_proc, 20);
160: If c_overlap_serv2%FOUND THEN
161:
162: --
163: -- Reset the end_date to calculation_date

Line 197: hr_utility.set_location(l_proc, 25);

193:
194: -- l_days := nvl(p_period_years,0) * 365;
195: l_days := 0;
196: IF NVL(p_period_years, 0) <> 0 THEN
197: hr_utility.set_location(l_proc, 25);
198: convert_years_to_days (p_start_date => p_start_date
199: ,p_period_years => p_period_years
200: ,p_days => l_days
201: );

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

208: End If;
209: CLOSE c_overlap_serv2;
210: --
211: p_days := l_days;
212: hr_utility.set_location('Leaving: '||l_proc, 30);
213: --
214:
215: -- Added by tmehra for nocopy changes Feb'03
216:

Line 219: hr_utility.set_location('Entering excep:'||l_proc, 35);

215: -- Added by tmehra for nocopy changes Feb'03
216:
217: EXCEPTION
218: WHEN OTHERS THEN
219: hr_utility.set_location('Entering excep:'||l_proc, 35);
220: p_days := 0;
221: raise;
222:
223: END check_overlap_curr_serv;

Line 286: hr_utility.set_location('Entering: '||l_func, 10);

282: l_days NUMBER(12);
283: l_tot_days NUMBER(12) := 0;
284: --
285: BEGIN
286: hr_utility.set_location('Entering: '||l_func, 10);
287: --
288: FOR c_serv_hist_rec in c_serv_hist LOOP
289:
290: If c_serv_hist_rec.start_date IS NOT NULL And

Line 296: hr_utility.set_location(l_func, 20);

292: --
293: -- Before calculating check whether this date
294: -- overlaps with current service period
295: --
296: hr_utility.set_location(l_func, 20);
297: check_overlap_curr_serv (p_start_date => c_serv_hist_rec.start_date
298: ,p_end_date => c_serv_hist_rec.end_date
299: ,p_period_years => c_serv_hist_rec.period_years
300: ,p_period_days => c_serv_hist_rec.period_days

Line 310: hr_utility.set_location(l_func, 30);

306: l_tot_days := l_tot_days + l_days;
307: --
308: End If;
309: --
310: hr_utility.set_location(l_func, 30);
311: END LOOP;
312: --
313: FOR c_overlap_rec IN c_overlap_serv LOOP
314: If c_overlap_rec.start_date IS NOT NULL And

Line 320: hr_utility.set_location(l_func, 40);

316: --
317: -- Before calculating check whether this date
318: -- overlaps with current service period
319: --
320: hr_utility.set_location(l_func, 40);
321: check_overlap_curr_serv (p_start_date => c_overlap_rec.start_date
322: ,p_end_date => c_overlap_rec.end_date
323: ,p_period_years => NULL
324: ,p_period_days => NULL

Line 334: hr_utility.set_location(l_func, 50);

330: l_tot_days := l_tot_days + l_days;
331: --
332: End If;
333: --
334: hr_utility.set_location(l_func, 50);
335: END LOOP;
336: --
337: --
338: -- Calculate the current service period

Line 346: hr_utility.set_location(l_func, 60);

342: ,p_continuous_service => NULL
343: );
344: l_tot_days := l_tot_days + l_days;
345: --
346: hr_utility.set_location(l_func, 60);
347: --
348: return l_tot_days;
349: --
350: hr_utility.set_location('Leaving: '||l_func, 70);

Line 350: hr_utility.set_location('Leaving: '||l_func, 70);

346: hr_utility.set_location(l_func, 60);
347: --
348: return l_tot_days;
349: --
350: hr_utility.set_location('Leaving: '||l_func, 70);
351: --
352: END calculate_service_history;
353: --
354: -- Added this new function

Line 382: hr_utility.set_location('Entering: '||l_func, 10);

378: l_days NUMBER(12);
379: l_tot_days NUMBER(12) := 0;
380: --
381: BEGIN
382: hr_utility.set_location('Entering: '||l_func, 10);
383: --
384: FOR c_all_serv_hist_rec in c_all_serv_hist LOOP
385:
386: --

Line 389: hr_utility.set_location(l_func, 20);

385:
386: --
387: -- Calculate period if period_years and period_days do not have values
388: --
389: hr_utility.set_location(l_func, 20);
390:
391: If c_all_serv_hist_rec.period_years Is Null And
392: c_all_serv_hist_rec.period_days Is Null Then
393:

Line 409: hr_utility.set_location(l_func, 25);

405:
406: -- l_days := nvl(c_all_serv_hist_rec.period_years,0) * 365;;
407: l_days := 0;
408: IF NVL(c_all_serv_hist_rec.period_years, 0) <> 0 THEN
409: hr_utility.set_location(l_func, 25);
410: convert_years_to_days (p_start_date => c_all_serv_hist_rec.start_date
411: ,p_period_years => c_all_serv_hist_rec.period_years
412: ,p_days => l_days
413: );

Line 426: hr_utility.set_location(l_func, 30);

422:
423: END LOOP;
424:
425: --
426: hr_utility.set_location(l_func, 30);
427: --
428: return l_tot_days;
429: --
430: hr_utility.set_location('Leaving: '||l_func, 40);

Line 430: hr_utility.set_location('Leaving: '||l_func, 40);

426: hr_utility.set_location(l_func, 30);
427: --
428: return l_tot_days;
429: --
430: hr_utility.set_location('Leaving: '||l_func, 40);
431: --
432: END calculate_all_service_history;
433: --
434: -- ----------------------------------------------------------------------------

Line 500: hr_utility.set_location('Entering: '||l_func, 10);

496: l_days NUMBER(12);
497: l_tot_days NUMBER(12) := 0;
498: --
499: BEGIN
500: hr_utility.set_location('Entering: '||l_func, 10);
501: --
502: FOR c_cont_serv_rec IN c_cont_serv LOOP
503: If c_cont_serv_rec.start_date IS NOT NULL And
504: c_cont_serv_rec.end_date IS NOT NULL Then

Line 509: hr_utility.set_location(l_func, 20);

505: --
506: -- Before calculating check whether this date
507: -- overlaps with current service period
508: --
509: hr_utility.set_location(l_func, 20);
510: check_overlap_curr_serv (p_start_date => c_cont_serv_rec.start_date
511: ,p_end_date => c_cont_serv_rec.end_date
512: ,p_period_years => c_cont_serv_rec.period_years
513: ,p_period_days => c_cont_serv_rec.period_days

Line 523: hr_utility.set_location(l_func, 30);

519: l_tot_days := l_tot_days + l_days;
520: --
521: End If;
522: END LOOP;
523: hr_utility.set_location(l_func, 30);
524: --
525: FOR c_cont_overlap_rec IN c_cont_overlap_serv LOOP
526: If c_cont_overlap_rec.start_date IS NOT NULL And
527: c_cont_overlap_rec.end_date IS NOT NULL Then

Line 532: hr_utility.set_location(l_func, 40);

528: --
529: -- Before calculating check whether this date
530: -- overlaps with current service period
531: --
532: hr_utility.set_location(l_func, 40);
533: check_overlap_curr_serv (p_start_date => c_cont_overlap_rec.start_date
534: ,p_end_date => c_cont_overlap_rec.end_date
535: ,p_period_years => NULL
536: ,p_period_days => NULL

Line 546: hr_utility.set_location(l_func, 50);

542: l_tot_days := l_tot_days + l_days;
543: --
544: End If;
545: END LOOP;
546: hr_utility.set_location(l_func, 50);
547: --
548: -- Calculate the current service period
549: --
550: l_days := calculate_current_service (p_calculation_date => p_calculation_date

Line 556: hr_utility.set_location(l_func, 60);

552: ,p_continuous_service => 'Y'
553: );
554: l_tot_days := l_tot_days + l_days;
555: --
556: hr_utility.set_location(l_func, 60);
557: --
558: return l_tot_days;
559: --
560: hr_utility.set_location('Leaving: '||l_func, 70);

Line 560: hr_utility.set_location('Leaving: '||l_func, 70);

556: hr_utility.set_location(l_func, 60);
557: --
558: return l_tot_days;
559: --
560: hr_utility.set_location('Leaving: '||l_func, 70);
561: --
562: END calculate_continuous_service;
563: --
564: -- Added this new function

Line 593: hr_utility.set_location('Entering: '||l_func, 10);

589: l_days NUMBER(12);
590: l_tot_days NUMBER(12) := 0;
591: --
592: BEGIN
593: hr_utility.set_location('Entering: '||l_func, 10);
594: --
595: FOR c_all_cont_serv_rec in c_all_cont_serv LOOP
596:
597: --

Line 600: hr_utility.set_location(l_func, 20);

596:
597: --
598: -- Calculate period if period_years and period_days do not have values
599: --
600: hr_utility.set_location(l_func, 20);
601:
602: If c_all_cont_serv_rec.period_years Is Null And
603: c_all_cont_serv_rec.period_days Is Null Then
604:

Line 620: hr_utility.set_location(l_func, 25);

616:
617: -- l_days := nvl(c_all_cont_serv_rec.period_years,0) * 365;
618: l_days := 0;
619: IF NVL(c_all_cont_serv_rec.period_years, 0) <> 0 THEN
620: hr_utility.set_location(l_func, 25);
621: convert_years_to_days (p_start_date => c_all_cont_serv_rec.start_date
622: ,p_period_years => c_all_cont_serv_rec.period_years
623: ,p_days => l_days
624: );

Line 637: hr_utility.set_location(l_func, 30);

633:
634: END LOOP;
635:
636: --
637: hr_utility.set_location(l_func, 30);
638: --
639: return l_tot_days;
640: --
641: hr_utility.set_location('Leaving: '||l_func, 40);

Line 641: hr_utility.set_location('Leaving: '||l_func, 40);

637: hr_utility.set_location(l_func, 30);
638: --
639: return l_tot_days;
640: --
641: hr_utility.set_location('Leaving: '||l_func, 40);
642: --
643: END calculate_all_continuous_serv;
644: --
645: -- ----------------------------------------------------------------------------

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

664: l_years NUMBER(12);
665: l_days NUMBER(12);
666: --
667: BEGIN
668: hr_utility.set_location('Entering: '||l_proc, 10);
669: --
670: SELECT (l_end_date - l_start_date)
671: INTO l_tot_days
672: FROM dual;

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

670: SELECT (l_end_date - l_start_date)
671: INTO l_tot_days
672: FROM dual;
673: --
674: hr_utility.set_location(l_proc, 30);
675: --
676: -- The following conversion of days to years
677: -- is incorrect as 365 days for a year will be incorrect
678: -- for leap years

Line 683: -- hr_utility.set_location(l_proc, 40);

679: -- See Bug 4318334 for details
680:
681: -- l_years := trunc(l_tot_days/365);
682: --
683: -- hr_utility.set_location(l_proc, 40);
684: --
685:
686: -- SELECT MOD(l_tot_days,365)
687: -- INTO l_days

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

700: FROM dual;
701:
702: -- Get the new start date based on the l_years figure from the start date
703:
704: hr_utility.set_location(l_proc, 40);
705: SELECT ADD_MONTHS(l_start_date, l_years * 12)
706: INTO l_new_start_date
707: FROM dual;
708:

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

707: FROM dual;
708:
709: -- Get the number of days based on this new start date
710:
711: hr_utility.set_location(l_proc, 50);
712: SELECT l_end_date - l_new_start_date
713: INTO l_days
714: FROM dual;
715:

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

717: --
718: p_years := l_years;
719: p_days := l_days;
720: --
721: hr_utility.set_location('Leaving: '||l_proc, 60);
722: --
723:
724: -- Added by tmehra for nocopy changes Feb'03
725:

Line 728: hr_utility.set_location('Entering excep:'||l_proc, 35);

724: -- Added by tmehra for nocopy changes Feb'03
725:
726: EXCEPTION
727: WHEN OTHERS THEN
728: hr_utility.set_location('Entering excep:'||l_proc, 35);
729: p_years := 0;
730: p_days := 0;
731: raise;
732: