[Home] [Help]
29: returned a row or not was not valid
30: because MAX ensures a row is always
31: returned. Changed the test to look for
32: a value in the return variable.
33: 15 Nov 95 N Simpson Removed hr_utility.trace from
34: linked_PIW_end_date because of pragma
35: added to header.
36: 16 Nov 95 N Simpson Renamed parameter call to
37: get_entry_details
363: procedure check_parameters is
364: --
365: begin
366: --
367: hr_utility.trace (l_proc||' p_absence_attendance_id = ' ||
368: to_char (p_absence_attendance_id));
369: --
370: hr_api.mandatory_arg_error (
371: p_api_name => l_proc,
375: end check_parameters;
376: --
377: begin
378: --
379: hr_utility.set_location('Entering:'||l_proc,1);
380: --
381: check_parameters;
382: --
383: open csr_absence_details (p_absence_attendance_id);
396: else
397: close csr_absence_details;
398: end if;
399: --
400: hr_utility.set_location('Leaving :'||l_proc,100);
401: --
402: end get_absence_details;
403: --------------------------------------------------------------------------------
404: function Standard_week_fraction (
419: and p_qualifying_days in (1,2,3,4,5,6,7));
420: --
421: begin
422: --
423: hr_utility.trace (l_proc||' p_qualifying_days = ' ||
424: to_char (p_qualifying_days));
425: --
426: hr_general.assert_condition (all_parameters_valid);
427: --
428: end check_parameters;
429: --
430: begin
431: --
432: hr_utility.set_location('Entering:'||l_proc,1);
433: --
434: check_parameters;
435: --
436: if p_qualifying_days = 1 then standard_fraction := 1;
441: elsif p_qualifying_days = 6 then standard_fraction := 0.167;
442: elsif p_qualifying_days = 7 then standard_fraction := 0.143;
443: end if;
444: --
445: hr_utility.trace (l_proc||' standard_fraction = '||to_char(standard_fraction));
446: hr_utility.set_location('Leaving :'||l_proc,100);
447: --
448: return standard_fraction;
449: --
442: elsif p_qualifying_days = 7 then standard_fraction := 0.143;
443: end if;
444: --
445: hr_utility.trace (l_proc||' standard_fraction = '||to_char(standard_fraction));
446: hr_utility.set_location('Leaving :'||l_proc,100);
447: --
448: return standard_fraction;
449: --
450: end standard_week_fraction;
528: procedure check_parameters is
529: --
530: begin
531: --
532: hr_utility.trace (l_proc||' p_effective_date = ' ||
533: to_char (p_effective_date));
534: --
535: hr_api.mandatory_arg_error (
536: p_api_name => l_proc,
540: end check_parameters;
541: --
542: begin
543: --
544: hr_utility.set_location('Entering:'||l_proc,1);
545: --
546: check_parameters;
547: --
548: hr_utility.set_location(l_proc,2);
544: hr_utility.set_location('Entering:'||l_proc,1);
545: --
546: check_parameters;
547: --
548: hr_utility.set_location(l_proc,2);
549: if g_SSP_correction.element_type_id is null or
550: p_effective_date not between g_SSP_correction.effective_start_date
551: and g_SSP_correction.effective_end_date
552: then
552: then
553: --
554: -- If we have not already done so, do the following:
555: --
556: hr_utility.set_location(l_proc,3);
557: open ssp_SSP_pkg.csr_SSP_element_details (p_effective_date,
558: c_SSP_correction_element_name);
559: fetch ssp_SSP_pkg.csr_SSP_element_details into g_SSP_correction;
560: close ssp_SSP_pkg.csr_SSP_element_details;
558: c_SSP_correction_element_name);
559: fetch ssp_SSP_pkg.csr_SSP_element_details into g_SSP_correction;
560: close ssp_SSP_pkg.csr_SSP_element_details;
561: end if;
562: hr_utility.trace(l_proc||' g_SSP_correction.element_type_id :'||g_SSP_correction.element_type_id);
563: hr_utility.trace(l_proc||' g_SSP_correction.effective_start_date :'||g_SSP_correction.effective_start_date);
564: hr_utility.trace(l_proc||' g_SSP_correction.effective_end_date :'||g_SSP_correction.effective_end_date);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
559: fetch ssp_SSP_pkg.csr_SSP_element_details into g_SSP_correction;
560: close ssp_SSP_pkg.csr_SSP_element_details;
561: end if;
562: hr_utility.trace(l_proc||' g_SSP_correction.element_type_id :'||g_SSP_correction.element_type_id);
563: hr_utility.trace(l_proc||' g_SSP_correction.effective_start_date :'||g_SSP_correction.effective_start_date);
564: hr_utility.trace(l_proc||' g_SSP_correction.effective_end_date :'||g_SSP_correction.effective_end_date);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
560: close ssp_SSP_pkg.csr_SSP_element_details;
561: end if;
562: hr_utility.trace(l_proc||' g_SSP_correction.element_type_id :'||g_SSP_correction.element_type_id);
563: hr_utility.trace(l_proc||' g_SSP_correction.effective_start_date :'||g_SSP_correction.effective_start_date);
564: hr_utility.trace(l_proc||' g_SSP_correction.effective_end_date :'||g_SSP_correction.effective_end_date);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
561: end if;
562: hr_utility.trace(l_proc||' g_SSP_correction.element_type_id :'||g_SSP_correction.element_type_id);
563: hr_utility.trace(l_proc||' g_SSP_correction.effective_start_date :'||g_SSP_correction.effective_start_date);
564: hr_utility.trace(l_proc||' g_SSP_correction.effective_end_date :'||g_SSP_correction.effective_end_date);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
562: hr_utility.trace(l_proc||' g_SSP_correction.element_type_id :'||g_SSP_correction.element_type_id);
563: hr_utility.trace(l_proc||' g_SSP_correction.effective_start_date :'||g_SSP_correction.effective_start_date);
564: hr_utility.trace(l_proc||' g_SSP_correction.effective_end_date :'||g_SSP_correction.effective_end_date);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
563: hr_utility.trace(l_proc||' g_SSP_correction.effective_start_date :'||g_SSP_correction.effective_start_date);
564: hr_utility.trace(l_proc||' g_SSP_correction.effective_end_date :'||g_SSP_correction.effective_end_date);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
564: hr_utility.trace(l_proc||' g_SSP_correction.effective_end_date :'||g_SSP_correction.effective_end_date);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
565: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_SSP_PERIOD :'||g_SSP_correction.MAXIMUM_SSP_PERIOD);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
566: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_AGE :'||g_SSP_correction.MAXIMUM_AGE);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
567: hr_utility.trace(l_proc||' g_SSP_correction.LINKING_PERIOD_DAYS :'||g_SSP_correction.LINKING_PERIOD_DAYS);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
568: hr_utility.trace(l_proc||' g_SSP_correction.WAITING_DAYS :'||g_SSP_correction.WAITING_DAYS);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
569: hr_utility.trace(l_proc||' g_SSP_correction.PIW_THRESHHOLD :'||g_SSP_correction.PIW_THRESHHOLD);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
570: hr_utility.trace(l_proc||' g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS :'||g_SSP_correction.MAXIMUM_LINKED_PIW_YEARS);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
578: hr_utility.trace(l_proc||' g_SSP_correction.SSP_WEEKS_ID :'||g_SSP_correction.SSP_WEEKS_ID);
571: hr_utility.trace(l_proc||' g_SSP_correction.PERCENTAGE_THRESHHOLD :'||g_SSP_correction.PERCENTAGE_THRESHHOLD);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
578: hr_utility.trace(l_proc||' g_SSP_correction.SSP_WEEKS_ID :'||g_SSP_correction.SSP_WEEKS_ID);
579: hr_utility.trace(l_proc||' g_SSP_correction.QUALIFYING_DAYS_ID :'||g_SSP_correction.QUALIFYING_DAYS_ID);
572: hr_utility.trace(l_proc||' g_SSP_correction.SSP_DAYS_DUE_ID :'||g_SSP_correction.SSP_DAYS_DUE_ID);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
578: hr_utility.trace(l_proc||' g_SSP_correction.SSP_WEEKS_ID :'||g_SSP_correction.SSP_WEEKS_ID);
579: hr_utility.trace(l_proc||' g_SSP_correction.QUALIFYING_DAYS_ID :'||g_SSP_correction.QUALIFYING_DAYS_ID);
580: hr_utility.trace(l_proc||' g_SSP_correction.input_currency_code :'||g_SSP_correction.input_currency_code);
573: hr_utility.trace(l_proc||' g_SSP_correction.AMOUNT_ID :'||g_SSP_correction.AMOUNT_ID);
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
578: hr_utility.trace(l_proc||' g_SSP_correction.SSP_WEEKS_ID :'||g_SSP_correction.SSP_WEEKS_ID);
579: hr_utility.trace(l_proc||' g_SSP_correction.QUALIFYING_DAYS_ID :'||g_SSP_correction.QUALIFYING_DAYS_ID);
580: hr_utility.trace(l_proc||' g_SSP_correction.input_currency_code :'||g_SSP_correction.input_currency_code);
581:
574: hr_utility.trace(l_proc||' g_SSP_correction.FROM_ID :'||g_SSP_correction.FROM_ID);
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
578: hr_utility.trace(l_proc||' g_SSP_correction.SSP_WEEKS_ID :'||g_SSP_correction.SSP_WEEKS_ID);
579: hr_utility.trace(l_proc||' g_SSP_correction.QUALIFYING_DAYS_ID :'||g_SSP_correction.QUALIFYING_DAYS_ID);
580: hr_utility.trace(l_proc||' g_SSP_correction.input_currency_code :'||g_SSP_correction.input_currency_code);
581:
582: --
575: hr_utility.trace(l_proc||' g_SSP_correction.TO_ID :'||g_SSP_correction.TO_ID);
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
578: hr_utility.trace(l_proc||' g_SSP_correction.SSP_WEEKS_ID :'||g_SSP_correction.SSP_WEEKS_ID);
579: hr_utility.trace(l_proc||' g_SSP_correction.QUALIFYING_DAYS_ID :'||g_SSP_correction.QUALIFYING_DAYS_ID);
580: hr_utility.trace(l_proc||' g_SSP_correction.input_currency_code :'||g_SSP_correction.input_currency_code);
581:
582: --
583: -- Check element returned expected values (this is belt and braces checking,
576: hr_utility.trace(l_proc||' g_SSP_correction.RATE_ID :'||g_SSP_correction.RATE_ID);
577: hr_utility.trace(l_proc||' g_SSP_correction.WITHHELD_DAYS_ID :'||g_SSP_correction.WITHHELD_DAYS_ID);
578: hr_utility.trace(l_proc||' g_SSP_correction.SSP_WEEKS_ID :'||g_SSP_correction.SSP_WEEKS_ID);
579: hr_utility.trace(l_proc||' g_SSP_correction.QUALIFYING_DAYS_ID :'||g_SSP_correction.QUALIFYING_DAYS_ID);
580: hr_utility.trace(l_proc||' g_SSP_correction.input_currency_code :'||g_SSP_correction.input_currency_code);
581:
582: --
583: -- Check element returned expected values (this is belt and braces checking,
584: -- if the check fails then it was seed data which has been incorrectly set up.
626: fnd_message.raise_error;
627: end if;
628: end if;
629: --
630: hr_utility.set_location('Leaving :'||l_proc,100);
631: --
632: end get_SSP_correction_element;
633: --------------------------------------------------------------------------------
634: procedure update_linked_absence_ids is
656: and transaction.locked = to_char(userenv('sessionid'));
657: --
658: begin
659: --
660: hr_utility.set_location('Entering:'||l_proc,1);
661: --
662: for new_link in csr_missing_links
663: LOOP
664: --
701: end if;
702: end if;
703: end loop;
704: --
705: hr_utility.set_location('Leaving :'||l_proc, 100);
706: --
707: end update_linked_absence_ids;
708: --------------------------------------------------------------------------------
709: --
745: p_sickness_start_date <= p_sickness_end_date and
746: p_sickness_start_date = trunc (p_sickness_start_date) and
747: p_sickness_end_date = trunc (p_sickness_end_date));
748: begin
749: hr_utility.trace(l_proc||' p_person_id = '||to_char (p_person_id));
750: hr_utility.trace(l_proc||' p_sickness_start_date = '||to_char (p_sickness_start_date));
751: hr_utility.trace(l_proc||' p_sickness_end_date = '||to_char (p_sickness_end_date));
752: hr_general.assert_condition (all_parameters_valid);
753: end check_parameters;
746: p_sickness_start_date = trunc (p_sickness_start_date) and
747: p_sickness_end_date = trunc (p_sickness_end_date));
748: begin
749: hr_utility.trace(l_proc||' p_person_id = '||to_char (p_person_id));
750: hr_utility.trace(l_proc||' p_sickness_start_date = '||to_char (p_sickness_start_date));
751: hr_utility.trace(l_proc||' p_sickness_end_date = '||to_char (p_sickness_end_date));
752: hr_general.assert_condition (all_parameters_valid);
753: end check_parameters;
754: begin
747: p_sickness_end_date = trunc (p_sickness_end_date));
748: begin
749: hr_utility.trace(l_proc||' p_person_id = '||to_char (p_person_id));
750: hr_utility.trace(l_proc||' p_sickness_start_date = '||to_char (p_sickness_start_date));
751: hr_utility.trace(l_proc||' p_sickness_end_date = '||to_char (p_sickness_end_date));
752: hr_general.assert_condition (all_parameters_valid);
753: end check_parameters;
754: begin
755: --
752: hr_general.assert_condition (all_parameters_valid);
753: end check_parameters;
754: begin
755: --
756: hr_utility.set_location('Entering:'||l_proc,1);
757: --
758: check_parameters;
759: --
760: -- If the sickness start date is null then this cannot be a sickness absence.
797: end loop;
798: end if;
799: end if;
800: --
801: hr_utility.set_location('Leaving :'||l_proc||', l_PIW_id = '||to_char (l_PIW_id),100);
802: --
803: return l_PIW_id;
804: --
805: end linked_absence_id;
807: --
808: -- Returns TRUE if the parameter absence constitutes a PIW in its own right
809: -- or if it forms part of a contiguous set of rows which together form a PIW
810: --
811: -- NB Do not add hr_utility calls in here because this function is used by
812: -- other functions which must maintain purity level WNDS, WNPS.
813: --
814: function absence_is_a_PIW(p_person_id number,
815: p_sickness_start_date date,
1056: p_absence_attendance_id is not null);
1057: --
1058: begin
1059: --
1060: hr_utility.trace (' p_person_id = '||to_char (p_person_id));
1061: hr_utility.trace (' p_linked_absence_id = '
1062: ||to_char (p_linked_absence_id));
1063: hr_utility.trace (' p_absence_attendance_id = '
1064: ||to_char (p_absence_attendance_id));
1057: --
1058: begin
1059: --
1060: hr_utility.trace (' p_person_id = '||to_char (p_person_id));
1061: hr_utility.trace (' p_linked_absence_id = '
1062: ||to_char (p_linked_absence_id));
1063: hr_utility.trace (' p_absence_attendance_id = '
1064: ||to_char (p_absence_attendance_id));
1065: hr_utility.trace (' p_new_sickness_start_date = '
1059: --
1060: hr_utility.trace (' p_person_id = '||to_char (p_person_id));
1061: hr_utility.trace (' p_linked_absence_id = '
1062: ||to_char (p_linked_absence_id));
1063: hr_utility.trace (' p_absence_attendance_id = '
1064: ||to_char (p_absence_attendance_id));
1065: hr_utility.trace (' p_new_sickness_start_date = '
1066: ||to_char (p_new_sickness_start_date));
1067: hr_utility.trace (' p_new_sickness_end_date = '
1061: hr_utility.trace (' p_linked_absence_id = '
1062: ||to_char (p_linked_absence_id));
1063: hr_utility.trace (' p_absence_attendance_id = '
1064: ||to_char (p_absence_attendance_id));
1065: hr_utility.trace (' p_new_sickness_start_date = '
1066: ||to_char (p_new_sickness_start_date));
1067: hr_utility.trace (' p_new_sickness_end_date = '
1068: ||to_char (p_new_sickness_end_date));
1069: hr_utility.trace (' p_old_sickness_end_date = '
1063: hr_utility.trace (' p_absence_attendance_id = '
1064: ||to_char (p_absence_attendance_id));
1065: hr_utility.trace (' p_new_sickness_start_date = '
1066: ||to_char (p_new_sickness_start_date));
1067: hr_utility.trace (' p_new_sickness_end_date = '
1068: ||to_char (p_new_sickness_end_date));
1069: hr_utility.trace (' p_old_sickness_end_date = '
1070: ||to_char (p_old_sickness_end_date));
1071: --
1065: hr_utility.trace (' p_new_sickness_start_date = '
1066: ||to_char (p_new_sickness_start_date));
1067: hr_utility.trace (' p_new_sickness_end_date = '
1068: ||to_char (p_new_sickness_end_date));
1069: hr_utility.trace (' p_old_sickness_end_date = '
1070: ||to_char (p_old_sickness_end_date));
1071: --
1072: hr_general.assert_condition (all_parameters_valid);
1073: --
1074: end check_parameters;
1075: --
1076: begin
1077: --
1078: hr_utility.set_location('Entering:'||l_proc,1);
1079: --
1080: check_parameters;
1081: --
1082: open csr_next_absence;
1110: else
1111: close csr_next_absence;
1112: end if;
1113: --
1114: hr_utility.set_location('Leaving :'||l_proc,100);
1115: --
1116: exception
1117: --
1118: when PIW_broken then
1181: and p_linked_absence_id <> p_absence_attendance_id);
1182: --
1183: begin
1184: --
1185: hr_utility.trace (l_proc||' p_sickness_start_date = '
1186: ||to_char (p_sickness_start_date));
1187: hr_utility.trace (l_proc||' p_sickness_end_date = '
1188: ||to_char (p_sickness_end_date));
1189: hr_utility.trace (l_proc||' p_linked_absence_id = '
1183: begin
1184: --
1185: hr_utility.trace (l_proc||' p_sickness_start_date = '
1186: ||to_char (p_sickness_start_date));
1187: hr_utility.trace (l_proc||' p_sickness_end_date = '
1188: ||to_char (p_sickness_end_date));
1189: hr_utility.trace (l_proc||' p_linked_absence_id = '
1190: ||to_char (p_linked_absence_id));
1191: hr_utility.trace (l_proc||' p_absence_attendance_id = '
1185: hr_utility.trace (l_proc||' p_sickness_start_date = '
1186: ||to_char (p_sickness_start_date));
1187: hr_utility.trace (l_proc||' p_sickness_end_date = '
1188: ||to_char (p_sickness_end_date));
1189: hr_utility.trace (l_proc||' p_linked_absence_id = '
1190: ||to_char (p_linked_absence_id));
1191: hr_utility.trace (l_proc||' p_absence_attendance_id = '
1192: ||to_char (p_absence_attendance_id));
1193: --
1187: hr_utility.trace (l_proc||' p_sickness_end_date = '
1188: ||to_char (p_sickness_end_date));
1189: hr_utility.trace (l_proc||' p_linked_absence_id = '
1190: ||to_char (p_linked_absence_id));
1191: hr_utility.trace (l_proc||' p_absence_attendance_id = '
1192: ||to_char (p_absence_attendance_id));
1193: --
1194: hr_general.assert_condition (all_parameters_valid);
1195: --
1196: end check_parameters;
1197: --
1198: begin
1199: --
1200: hr_utility.set_location('Entering:'||l_proc,1);
1201: --
1202: check_parameters;
1203: --
1204: if SSP_is_installed and p_sickness_start_date is not null
1257: end if;
1258: end if;
1259: end if;
1260: --
1261: hr_utility.set_location('Leaving :'||l_proc,100);
1262: --
1263: exception
1264: when break_in_PIW then
1265: --
1268: -- result in a linked Period of Incapacity for Work (PIW) being broken. To
1269: -- get round this, you must first remove all the later sickness absences in
1270: -- the same PIW."
1271: --
1272: hr_utility.set_location('Leaving :'||l_proc||', Error',999);
1273: fnd_message.set_name ('SSP','SSP_35037_PIW_BROKEN');
1274: fnd_message.raise_error;
1275: --
1276: end check_for_break_in_linked_PIW;
1984: and p_business_group_id is not null);
1985: --
1986: begin
1987: --
1988: hr_utility.trace(' p_period_from: '||to_char(p_period_from));
1989: hr_utility.trace(' p_period_to: '||to_char(p_period_to));
1990: hr_utility.trace(' p_person_id: '||to_char(p_person_id));
1991: hr_utility.trace(' p_business_group_id: '||to_char(p_business_group_id));
1992: --
1985: --
1986: begin
1987: --
1988: hr_utility.trace(' p_period_from: '||to_char(p_period_from));
1989: hr_utility.trace(' p_period_to: '||to_char(p_period_to));
1990: hr_utility.trace(' p_person_id: '||to_char(p_person_id));
1991: hr_utility.trace(' p_business_group_id: '||to_char(p_business_group_id));
1992: --
1993: hr_general.assert_condition (all_parameters_valid);
1986: begin
1987: --
1988: hr_utility.trace(' p_period_from: '||to_char(p_period_from));
1989: hr_utility.trace(' p_period_to: '||to_char(p_period_to));
1990: hr_utility.trace(' p_person_id: '||to_char(p_person_id));
1991: hr_utility.trace(' p_business_group_id: '||to_char(p_business_group_id));
1992: --
1993: hr_general.assert_condition (all_parameters_valid);
1994: --
1987: --
1988: hr_utility.trace(' p_period_from: '||to_char(p_period_from));
1989: hr_utility.trace(' p_period_to: '||to_char(p_period_to));
1990: hr_utility.trace(' p_person_id: '||to_char(p_person_id));
1991: hr_utility.trace(' p_business_group_id: '||to_char(p_business_group_id));
1992: --
1993: hr_general.assert_condition (all_parameters_valid);
1994: --
1995: end check_parameters;
1995: end check_parameters;
1996: --
1997: begin
1998: --
1999: hr_utility.set_location('Entering:'||l_proc,1);
2000: --
2001: check_parameters;
2002: --
2003: -- Look for a personal SSP qualifying pattern.
2129: --
2130: -- Having found the purpose usage, determine the number of qualifying days
2131: -- in the period according to the appropriate calendar
2132: --
2133: hr_utility.trace('PERSON PATTERN USAGE ID: '||l_person_purpose_usage_id);
2134: hr_utility.trace('PERSON PRIMARY KEY VAL: '||l_person_primary_key_value);
2135: hr_utility.trace('BG PATTERN USAGE ID: '||l_bg_purpose_usage_id);
2136: hr_utility.trace('BG PRIMARY KEY VALUE: '||l_bg_primary_key_value);
2137: hr_utility.trace('PERIOD FROM/TO: '||p_period_from||' -> '||p_period_to);
2130: -- Having found the purpose usage, determine the number of qualifying days
2131: -- in the period according to the appropriate calendar
2132: --
2133: hr_utility.trace('PERSON PATTERN USAGE ID: '||l_person_purpose_usage_id);
2134: hr_utility.trace('PERSON PRIMARY KEY VAL: '||l_person_primary_key_value);
2135: hr_utility.trace('BG PATTERN USAGE ID: '||l_bg_purpose_usage_id);
2136: hr_utility.trace('BG PRIMARY KEY VALUE: '||l_bg_primary_key_value);
2137: hr_utility.trace('PERIOD FROM/TO: '||p_period_from||' -> '||p_period_to);
2138: --
2131: -- in the period according to the appropriate calendar
2132: --
2133: hr_utility.trace('PERSON PATTERN USAGE ID: '||l_person_purpose_usage_id);
2134: hr_utility.trace('PERSON PRIMARY KEY VAL: '||l_person_primary_key_value);
2135: hr_utility.trace('BG PATTERN USAGE ID: '||l_bg_purpose_usage_id);
2136: hr_utility.trace('BG PRIMARY KEY VALUE: '||l_bg_primary_key_value);
2137: hr_utility.trace('PERIOD FROM/TO: '||p_period_from||' -> '||p_period_to);
2138: --
2139: -- call new overloaded version of hr_calendar_pkg.total_availability
2132: --
2133: hr_utility.trace('PERSON PATTERN USAGE ID: '||l_person_purpose_usage_id);
2134: hr_utility.trace('PERSON PRIMARY KEY VAL: '||l_person_primary_key_value);
2135: hr_utility.trace('BG PATTERN USAGE ID: '||l_bg_purpose_usage_id);
2136: hr_utility.trace('BG PRIMARY KEY VALUE: '||l_bg_primary_key_value);
2137: hr_utility.trace('PERIOD FROM/TO: '||p_period_from||' -> '||p_period_to);
2138: --
2139: -- call new overloaded version of hr_calendar_pkg.total_availability
2140: --
2133: hr_utility.trace('PERSON PATTERN USAGE ID: '||l_person_purpose_usage_id);
2134: hr_utility.trace('PERSON PRIMARY KEY VAL: '||l_person_primary_key_value);
2135: hr_utility.trace('BG PATTERN USAGE ID: '||l_bg_purpose_usage_id);
2136: hr_utility.trace('BG PRIMARY KEY VALUE: '||l_bg_primary_key_value);
2137: hr_utility.trace('PERIOD FROM/TO: '||p_period_from||' -> '||p_period_to);
2138: --
2139: -- call new overloaded version of hr_calendar_pkg.total_availability
2140: --
2141: l_qualifying_days := hr_calendar_pkg.total_availability (
2147: p_period_from => p_period_from,
2148: p_period_to => p_period_to + 1,
2149: p_processing_level => p_processing_level);
2150: --
2151: hr_utility.set_location('Leaving :'||l_proc||
2152: '. Qual days: '||to_char(l_qualifying_days),100);
2153: --
2154: return l_qualifying_days;
2155: --
2155: --
2156: exception
2157: --
2158: when no_SSP_pattern then
2159: hr_utility.set_location('Leaving :'||l_proc||', Error',999);
2160: fnd_message.set_name ('SSP','SSP_35048_NO_SSP_QUAL_PATTERN');
2161: fnd_message.raise_error;
2162: --
2163: end qualifying_days_in_period;
2176: l_proc varchar2 (72) := g_package||'SSP_is_installed';
2177: --
2178: begin
2179: --
2180: hr_utility.set_location('Entering:'||l_proc,1);
2181: --
2182: if g_SSP_is_installed is null
2183: then
2184: -- We need to determine if SSP is installed.
2212:
2213: exception
2214:
2215: when too_many_rows then
2216: hr_utility.trace('Error: more than 1 row on FND_APPLICATION table for SSP');
2217:
2218: when others then
2219: raise;
2220:
2223: end if;
2224: --
2225: if g_SSP_is_installed
2226: then
2227: hr_utility.trace('SSP is installed');
2228: else
2229: hr_utility.trace('SSP is NOT installed');
2230: end if;
2231: --
2225: if g_SSP_is_installed
2226: then
2227: hr_utility.trace('SSP is installed');
2228: else
2229: hr_utility.trace('SSP is NOT installed');
2230: end if;
2231: --
2232: hr_utility.set_location('Leaving :'||l_proc,100);
2233: --
2228: else
2229: hr_utility.trace('SSP is NOT installed');
2230: end if;
2231: --
2232: hr_utility.set_location('Leaving :'||l_proc,100);
2233: --
2234: return g_SSP_is_installed;
2235: --
2236: end SSP_is_installed;
2285: and p_withhold_to = trunc (p_withhold_to)
2286: and p_withhold_from <= p_withhold_to
2287: and p_reason is not null);
2288: begin
2289: hr_utility.trace(' p_reason: ' || p_reason);
2290: hr_utility.trace(' withhold_from/to: ' ||
2291: to_char(p_withhold_from)||', '||to_char(p_withhold_to));
2292: hr_general.assert_condition (all_parameters_valid);
2293: end check_parameters;
2286: and p_withhold_from <= p_withhold_to
2287: and p_reason is not null);
2288: begin
2289: hr_utility.trace(' p_reason: ' || p_reason);
2290: hr_utility.trace(' withhold_from/to: ' ||
2291: to_char(p_withhold_from)||', '||to_char(p_withhold_to));
2292: hr_general.assert_condition (all_parameters_valid);
2293: end check_parameters;
2294: --
2292: hr_general.assert_condition (all_parameters_valid);
2293: end check_parameters;
2294: --
2295: begin
2296: hr_utility.set_location('Entering:'||l_proc,1);
2297: --
2298: check_parameters;
2299: --
2300: l_reason_id := ssp_smp_support_pkg.withholding_reason_id(
2322: --
2323: p_overridden := TRUE;
2324: end if;
2325: --
2326: hr_utility.set_location('Leaving :'||l_proc,100);
2327: --
2328: end create_stoppage;
2329: --
2330:
2349: and person_id = p_absence.person_id
2350: and sickness_start_date is not null
2351: order by sickness_end_date DESC;
2352: begin
2353: hr_utility.set_location('Entering:'||l_proc,1);
2354: --
2355: hr_utility.trace('Age at PIW start date: '||to_char(Age_at_PIW_start_date));
2356: hr_utility.trace('g_SSP_legislation.maximum_age: '||to_char(g_SSP_legislation.maximum_age));
2357: --
2351: order by sickness_end_date DESC;
2352: begin
2353: hr_utility.set_location('Entering:'||l_proc,1);
2354: --
2355: hr_utility.trace('Age at PIW start date: '||to_char(Age_at_PIW_start_date));
2356: hr_utility.trace('g_SSP_legislation.maximum_age: '||to_char(g_SSP_legislation.maximum_age));
2357: --
2358: -- Calculate the absentee's age as at the PIW start date
2359: --
2352: begin
2353: hr_utility.set_location('Entering:'||l_proc,1);
2354: --
2355: hr_utility.trace('Age at PIW start date: '||to_char(Age_at_PIW_start_date));
2356: hr_utility.trace('g_SSP_legislation.maximum_age: '||to_char(g_SSP_legislation.maximum_age));
2357: --
2358: -- Calculate the absentee's age as at the PIW start date
2359: --
2360: if age_at_PIW_start_date >= g_SSP_legislation.maximum_age then
2363: --
2364: open get_end_date;
2365: fetch get_end_date into l_end_date;
2366: close get_end_date;
2367: hr_utility.trace(l_proc||'l_end_date: '||l_end_date);
2368: hr_utility.trace(l_proc||'PIW_end_date: '||PIW_end_date);
2369:
2370: create_stoppage(p_withhold_from => PIW_start_date,
2371: p_withhold_to => least(PIW_end_date,l_end_date),
2364: open get_end_date;
2365: fetch get_end_date into l_end_date;
2366: close get_end_date;
2367: hr_utility.trace(l_proc||'l_end_date: '||l_end_date);
2368: hr_utility.trace(l_proc||'PIW_end_date: '||PIW_end_date);
2369:
2370: create_stoppage(p_withhold_from => PIW_start_date,
2371: p_withhold_to => least(PIW_end_date,l_end_date),
2372: p_reason => 'Employee too old',
2376: raise employee_too_old;
2377: end if;
2378: end if;
2379: --
2380: hr_utility.set_location('Leaving :'||l_proc,100);
2381: --
2382: end check_age;
2383: --
2384: /*--------------------------------------------------*/
2389: l_proc varchar2(72) := g_package||'check_death';
2390: l_stoppage_overridden boolean := FALSE;
2391: begin
2392: --
2393: hr_utility.set_location('Entering:'||l_proc,1);
2394: --
2395: -- Bug 2984458 to display 'Employee Died' when the employee is
2396: -- deceased
2397: if absentee.actual_termination_date is not null and
2400: p_reason => 'Employee died',
2401: p_overridden => l_stoppage_overridden);
2402: end if;
2403: --
2404: hr_utility.set_location('Leaving :'||l_proc,100);
2405: --
2406: end check_death;
2407: --
2408: /*------------------------------------------------*/
2424: and withhold_to is null;
2425: --
2426: begin
2427: --
2428: hr_utility.set_location('Entering:'||l_proc,1);
2429: --
2430: open csr_last_entitled_day;
2431: fetch csr_last_entitled_day into last_entitled_day;
2432: close csr_last_entitled_day;
2436: --
2437: last_entitled_day := least (last_entitled_day,max_PIW_end_date -1,
2438: absentee.actual_termination_date);
2439: --
2440: hr_utility.set_location('Leaving :'||l_proc,100);
2441: --
2442: end get_last_entitled_day;
2443: --
2444: /*----------------------------------------------------------------*/
2560: all_parameters_valid constant boolean
2561: :=(p_effective_date is not null and
2562: p_effective_date = trunc (p_effective_date));
2563: begin
2564: hr_utility.trace (l_proc||' p_effective_date = '||to_char (p_effective_date));
2565: --
2566: hr_general.assert_condition (all_parameters_valid);
2567: --
2568: end check_parameters;
2567: --
2568: end check_parameters;
2569: --
2570: begin
2571: hr_utility.set_location('Entering:'||l_proc,1);
2572: check_parameters;
2573: if rate_start_date is null or
2574: p_effective_date NOT between rate_start_date and rate_end_date then
2575: --
2587: if l_rate is null then
2588: raise cannot_get_SSP_rate;
2589: end if;
2590: --
2591: hr_utility.set_location('Leaving :'||l_proc,100);
2592: --
2593: return l_rate;
2594: --
2595: exception
2593: return l_rate;
2594: --
2595: exception
2596: when cannot_get_SSP_rate then
2597: hr_utility.set_location('Leaving :'||l_proc||', Error',999);
2598: fnd_message.set_name ('SSP','SSP_35079_NO_SSP_RATE');
2599: fnd_message.set_token ('EFFECTIVE_DATE',p_effective_date);
2600: fnd_message.raise_error;
2601: end SSP_rate;
2620: p_start_date = trunc(p_start_date) and
2621: p_end_date = trunc(p_end_date) and
2622: p_start_date <= p_end_date);
2623: begin
2624: hr_utility.trace (' p_start_date = '||to_char (p_start_date));
2625: hr_utility.trace (' p_end_date = '||to_char (p_end_date));
2626: hr_utility.trace (' p_PIW_id = '||to_char (p_PIW_id));
2627: hr_general.assert_condition (all_parameters_valid);
2628: end check_parameters;
2621: p_end_date = trunc(p_end_date) and
2622: p_start_date <= p_end_date);
2623: begin
2624: hr_utility.trace (' p_start_date = '||to_char (p_start_date));
2625: hr_utility.trace (' p_end_date = '||to_char (p_end_date));
2626: hr_utility.trace (' p_PIW_id = '||to_char (p_PIW_id));
2627: hr_general.assert_condition (all_parameters_valid);
2628: end check_parameters;
2629: begin
2622: p_start_date <= p_end_date);
2623: begin
2624: hr_utility.trace (' p_start_date = '||to_char (p_start_date));
2625: hr_utility.trace (' p_end_date = '||to_char (p_end_date));
2626: hr_utility.trace (' p_PIW_id = '||to_char (p_PIW_id));
2627: hr_general.assert_condition (all_parameters_valid);
2628: end check_parameters;
2629: begin
2630: hr_utility.set_location('Entering:'||l_proc,1);
2626: hr_utility.trace (' p_PIW_id = '||to_char (p_PIW_id));
2627: hr_general.assert_condition (all_parameters_valid);
2628: end check_parameters;
2629: begin
2630: hr_utility.set_location('Entering:'||l_proc,1);
2631: --
2632: check_parameters;
2633: --
2634: -- moved inside loop for bug 886707
2682: --
2683: l_this_day := l_this_day + 1;
2684: end loop;
2685: --
2686: hr_utility.trace('Stopped Days in Period:'||
2687: to_char(l_stopped_days_in_period));
2688: hr_utility.set_location('Leaving :'||l_proc,100);
2689: --
2690: return l_stopped_days_in_period;
2684: end loop;
2685: --
2686: hr_utility.trace('Stopped Days in Period:'||
2687: to_char(l_stopped_days_in_period));
2688: hr_utility.set_location('Leaving :'||l_proc,100);
2689: --
2690: return l_stopped_days_in_period;
2691: --
2692: end stopped_days;
2718: p_sickness_end_date = trunc(p_sickness_end_date) and
2719: p_pregnancy_related_illness is not null and
2720: p_pregnancy_related_illness in ('Y','N'));
2721: begin
2722: hr_utility.trace(l_proc||' p_sickness_start_date = '
2723: ||to_char (p_sickness_start_date));
2724: hr_utility.trace(l_proc||' p_sickness_end_date = '
2725: ||to_char (p_sickness_end_date));
2726: hr_utility.trace(l_proc||' p_pregnancy_related_illness = '
2720: p_pregnancy_related_illness in ('Y','N'));
2721: begin
2722: hr_utility.trace(l_proc||' p_sickness_start_date = '
2723: ||to_char (p_sickness_start_date));
2724: hr_utility.trace(l_proc||' p_sickness_end_date = '
2725: ||to_char (p_sickness_end_date));
2726: hr_utility.trace(l_proc||' p_pregnancy_related_illness = '
2727: ||p_pregnancy_related_illness);
2728: hr_general.assert_condition (all_parameters_valid);
2722: hr_utility.trace(l_proc||' p_sickness_start_date = '
2723: ||to_char (p_sickness_start_date));
2724: hr_utility.trace(l_proc||' p_sickness_end_date = '
2725: ||to_char (p_sickness_end_date));
2726: hr_utility.trace(l_proc||' p_pregnancy_related_illness = '
2727: ||p_pregnancy_related_illness);
2728: hr_general.assert_condition (all_parameters_valid);
2729: end check_parameters;
2730: begin
2727: ||p_pregnancy_related_illness);
2728: hr_general.assert_condition (all_parameters_valid);
2729: end check_parameters;
2730: begin
2731: hr_utility.set_location('Entering:'||l_proc,1);
2732: --
2733: check_parameters;
2734: --
2735: for maternity in maternity_details loop
2748: if p_pregnancy_related_illness = 'Y' and
2749: (maternity.EWC - sickness_trigger_weeks) <= p_sickness_end_date and
2750: maternity.EWC >= p_sickness_start_date then
2751: --
2752: hr_utility.trace(l_proc||'Condition 1 true');
2753: --
2754: -- the illness starts before sickness trigger weeks
2755: -- (6 weeks before 06-APR-2003, four weeks after)
2756: -- prior to the EWC
2756: -- prior to the EWC
2757: if (maternity.EWC - sickness_trigger_weeks) >=
2758: p_sickness_start_date then
2759: --
2760: hr_utility.trace(l_proc||'Condition 2 true');
2761: --
2762: -- there is no recored start_date OR
2763: -- the start date is later than
2764: -- the fourth or sixth week prior to the EWC
2772: -- sixth week prior to the EWC
2773: if maternity.due_date <
2774: fnd_date.canonical_to_date('2003/04/06 00:00:00') then
2775: --
2776: hr_utility.trace(l_proc||'Condition 3 true');
2777: --
2778: if rtrim (to_char (maternity.EWC, 'DAY')) = l_sunday then
2779: hr_utility.trace(l_proc||'Condition 4 true');
2780: maternity.MPP_start_date:=
2775: --
2776: hr_utility.trace(l_proc||'Condition 3 true');
2777: --
2778: if rtrim (to_char (maternity.EWC, 'DAY')) = l_sunday then
2779: hr_utility.trace(l_proc||'Condition 4 true');
2780: maternity.MPP_start_date:=
2781: (maternity.EWC - sickness_trigger_weeks);
2782: else
2783: --
2780: maternity.MPP_start_date:=
2781: (maternity.EWC - sickness_trigger_weeks);
2782: else
2783: --
2784: hr_utility.trace(l_proc||'Condition 4 untrue');
2785: --
2786: maternity.MPP_start_date :=
2787: next_day((maternity.EWC - sickness_trigger_weeks), l_sunday);
2788: end if;
2805: maternity.MPP_start_date := (maternity.EWC - sickness_trigger_weeks) + 1;
2806: end if;
2807: end if;
2808: --
2809: hr_utility.trace(l_proc||'About to update MPP Start Date');
2810: ssp_mat_upd.upd(p_maternity_id => maternity.maternity_id,
2811: p_MPP_start_date => maternity.MPP_start_date,
2812: p_object_version_number => maternity.object_version_number);
2813: hr_utility.trace(l_proc||'Back from updating MPP Start Date');
2809: hr_utility.trace(l_proc||'About to update MPP Start Date');
2810: ssp_mat_upd.upd(p_maternity_id => maternity.maternity_id,
2811: p_MPP_start_date => maternity.MPP_start_date,
2812: p_object_version_number => maternity.object_version_number);
2813: hr_utility.trace(l_proc||'Back from updating MPP Start Date');
2814: end if;
2815: else
2816: if maternity.due_date < fnd_date.canonical_to_date('2003/04/06 00:00:00') then
2817: --
2817: --
2818: -- Start the MPP on the first Sunday of the sickness
2819: -- as due date before 06-APR-2003
2820: --
2821: hr_utility.trace(l_proc||'Condition 2 untrue');
2822: if rtrim(to_char (p_sickness_start_date,'DAY')) = l_sunday then
2823: hr_utility.trace(l_proc||'Condition 5 true');
2824: first_sunday_of_sickness := p_sickness_start_date;
2825: else
2819: -- as due date before 06-APR-2003
2820: --
2821: hr_utility.trace(l_proc||'Condition 2 untrue');
2822: if rtrim(to_char (p_sickness_start_date,'DAY')) = l_sunday then
2823: hr_utility.trace(l_proc||'Condition 5 true');
2824: first_sunday_of_sickness := p_sickness_start_date;
2825: else
2826: hr_utility.trace(l_proc||'Condition 5 untrue');
2827: first_sunday_of_sickness := next_day(p_sickness_start_date,l_sunday);
2822: if rtrim(to_char (p_sickness_start_date,'DAY')) = l_sunday then
2823: hr_utility.trace(l_proc||'Condition 5 true');
2824: first_sunday_of_sickness := p_sickness_start_date;
2825: else
2826: hr_utility.trace(l_proc||'Condition 5 untrue');
2827: first_sunday_of_sickness := next_day(p_sickness_start_date,l_sunday);
2828: end if;
2829: --
2830: -- there is no recorded MPP start date or
2831: -- the MPP start date is later than the first Sunday
2832: if (maternity.MPP_start_date is null or
2833: maternity.MPP_start_date > first_sunday_of_sickness) then
2834: --
2835: hr_utility.trace(l_proc||'Condition 6 true');
2836: --
2837: -- Update the recorded MPP start date.
2838: --
2839: maternity.MPP_start_date := first_sunday_of_sickness;
2837: -- Update the recorded MPP start date.
2838: --
2839: maternity.MPP_start_date := first_sunday_of_sickness;
2840: --
2841: hr_utility.trace(l_proc||'About to update MPP Start Date');
2842: ssp_mat_upd.upd (p_maternity_id => maternity.maternity_id,
2843: p_MPP_start_date => maternity.MPP_start_date,
2844: p_object_version_number=> maternity.object_version_number);
2845: hr_utility.trace(l_proc||'Back from updating MPP Start Date');
2841: hr_utility.trace(l_proc||'About to update MPP Start Date');
2842: ssp_mat_upd.upd (p_maternity_id => maternity.maternity_id,
2843: p_MPP_start_date => maternity.MPP_start_date,
2844: p_object_version_number=> maternity.object_version_number);
2845: hr_utility.trace(l_proc||'Back from updating MPP Start Date');
2846: end if;
2847: else
2848: --
2849: -- Due date after 06-APR-2003, therefore MPP starts
2865: else
2866: maternity.MPP_start_date:= p_sickness_start_date + 1;
2867: end if;
2868: --
2869: hr_utility.trace(l_proc||'About to update MPP Start Date');
2870: ssp_mat_upd.upd (p_maternity_id => maternity.maternity_id,
2871: p_MPP_start_date => maternity.MPP_start_date,
2872: p_object_version_number => maternity.object_version_number);
2873: hr_utility.trace(l_proc||'Back from updating MPP Start Date');
2869: hr_utility.trace(l_proc||'About to update MPP Start Date');
2870: ssp_mat_upd.upd (p_maternity_id => maternity.maternity_id,
2871: p_MPP_start_date => maternity.MPP_start_date,
2872: p_object_version_number => maternity.object_version_number);
2873: hr_utility.trace(l_proc||'Back from updating MPP Start Date');
2874: end if;
2875: end if;
2876: end if;
2877: end if;
2878: --
2879: start_disqualifying_period := maternity.MPP_start_date;
2880: --
2881: if start_disqualifying_period is not null then
2882: hr_utility.trace(l_proc||'Condition 7 true');
2883: begin
2884: --
2885: -- The disqualifying period lasts for the period of time
2886: -- allowed by legislation for the Maternity Pay Period
2888: -- to days before deriving end date).
2889: --
2890: end_disqualifying_period := start_disqualifying_period
2891: + (l_SMP_element.Maximum_MPP * 7) -1;
2892: hr_utility.trace('start_disqualifying_period : '||
2893: fnd_date.date_to_canonical(start_disqualifying_period));
2894: hr_utility.trace('end_disqualifying_period : '||
2895: fnd_date.date_to_canonical(end_disqualifying_period));
2896: --
2890: end_disqualifying_period := start_disqualifying_period
2891: + (l_SMP_element.Maximum_MPP * 7) -1;
2892: hr_utility.trace('start_disqualifying_period : '||
2893: fnd_date.date_to_canonical(start_disqualifying_period));
2894: hr_utility.trace('end_disqualifying_period : '||
2895: fnd_date.date_to_canonical(end_disqualifying_period));
2896: --
2897: exception
2898: when attempt_to_add_to_end_of_time then
2927: end if;
2928: end if;
2929: end loop;
2930: --
2931: hr_utility.set_location('Leaving :'||l_proc,100);
2932: --
2933: end check_disqualifying_period;
2934: --
2935: procedure check_SSP1L is
2935: procedure check_SSP1L is
2936: l_proc varchar2 (72) := g_package||'check_SSP1L';
2937: begin
2938: --
2939: hr_utility.set_location('Entering:'||l_proc,1);
2940: --
2941: -- take prior employment SSP into account in total liability.
2942: if (PIW_start_date - absentee.prior_employment_SSP_paid_to)
2943: <= g_SSP_legislation.linking_period_days then
2941: -- take prior employment SSP into account in total liability.
2942: if (PIW_start_date - absentee.prior_employment_SSP_paid_to)
2943: <= g_SSP_legislation.linking_period_days then
2944: --
2945: hr_utility.trace('There is prior employment SSP');
2946: --
2947: total_SSP_weeks := absentee.prior_employment_SSP_weeks;
2948: end if;
2949: --
2946: --
2947: total_SSP_weeks := absentee.prior_employment_SSP_weeks;
2948: end if;
2949: --
2950: hr_utility.set_location('Leaving :'||l_proc,100);
2951: --
2952: end check_SSP1L;
2953: --
2954: function check_emp_too_old(p_start date,
2979: end check_emp_too_old;
2980: --
2981: begin
2982: -- Start of do_PIW_calculations
2983: hr_utility.set_location ('Entering:'||l_proc,1);
2984: --
2985: open ssp_SMP_pkg.csr_SMP_element_details(p_effective_date => PIW_start_date);
2986: fetch ssp_SMP_pkg.csr_SMP_element_details into l_SMP_element;
2987: close ssp_SMP_pkg.csr_SMP_element_details;
3003: l_max_absence_start_date := each_abs_tab.sickness_start_date;
3004: l_max_absence_end_date := each_abs_tab.sickness_end_date;
3005: l_nos_absences := l_nos_absences + 1;
3006: --
3007: hr_utility.trace('PIWl: dates: ' || to_char(l_max_absence_start_date)
3008: || ' -> ' || to_char(l_max_absence_end_date));
3009: --
3010: absence_table.t_sickness_start_date(l_nos_absences) :=
3011: each_abs_tab.sickness_start_date;
3030: absence_table.t_absence_attendance_id(each_absence);
3031: l_pregnancy_related_illness :=
3032: absence_table.t_pregnancy_related_illness(each_absence);
3033: --
3034: hr_utility.trace('In PIW Loop');
3035: hr_utility.trace(' for sickness dated: ' ||
3036: to_char(l_sickness_start_date) || ' -> ' ||
3037: to_char(l_sickness_end_date));
3038: --
3031: l_pregnancy_related_illness :=
3032: absence_table.t_pregnancy_related_illness(each_absence);
3033: --
3034: hr_utility.trace('In PIW Loop');
3035: hr_utility.trace(' for sickness dated: ' ||
3036: to_char(l_sickness_start_date) || ' -> ' ||
3037: to_char(l_sickness_end_date));
3038: --
3039: if ssp_ssp_pkg.absence_is_a_PIW (p_person_id => p_absence.person_id,
3115: else
3116: cal_end_date := ssp_smp_support_pkg.end_of_week(l_max_absence_end_date);
3117: end if;
3118: --
3119: hr_utility.trace('Calendar end date: '||to_char(cal_end_date));
3120: cal_start_date := ssp_smp_support_pkg.start_of_week(nvl(PIW_start_date, start_date));
3121: --
3122: if cal_end_date > max_cal_end_date or
3123: cal_start_date < min_cal_start_date then
3161: l_max_withheld_to := each_stoppage.withhold_to;
3162: end if;
3163: end loop;
3164: --
3165: hr_utility.trace('No of stoppages between ' ||
3166: to_char(l_min_withheld_from) ||
3167: ' and ' || to_char(l_max_withheld_to) ||
3168: ': ' || to_char(l_nos_stoppages));
3169: --
3181: N := N + 1;
3182: --
3183: -- Find number of qualifying days in the current calendar week.
3184: --
3185: hr_utility.trace('Finding qualifying days in current week...');
3186: qualifying_days := greatest (1,qualifying_days_in_period(
3187: ssp_smp_support_pkg.start_of_week(start_date),
3188: ssp_smp_support_pkg.end_of_week(start_date),
3189: p_absence.person_id,
3319: --
3320: -------------------------------------------------
3321: -- Trace the calculations for debugging purposes
3322: begin
3323: hr_utility.trace ('----------------------------');
3324: hr_utility.trace (l_proc||'Entry number ' ||to_char (N));
3325: hr_utility.trace (l_proc||' Payroll period '||to_char (new_entry.effective_start_date (N)) ||' to '
3326: ||to_char (new_entry.effective_end_date (N)));
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3320: -------------------------------------------------
3321: -- Trace the calculations for debugging purposes
3322: begin
3323: hr_utility.trace ('----------------------------');
3324: hr_utility.trace (l_proc||'Entry number ' ||to_char (N));
3325: hr_utility.trace (l_proc||' Payroll period '||to_char (new_entry.effective_start_date (N)) ||' to '
3326: ||to_char (new_entry.effective_end_date (N)));
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3321: -- Trace the calculations for debugging purposes
3322: begin
3323: hr_utility.trace ('----------------------------');
3324: hr_utility.trace (l_proc||'Entry number ' ||to_char (N));
3325: hr_utility.trace (l_proc||' Payroll period '||to_char (new_entry.effective_start_date (N)) ||' to '
3326: ||to_char (new_entry.effective_end_date (N)));
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3323: hr_utility.trace ('----------------------------');
3324: hr_utility.trace (l_proc||'Entry number ' ||to_char (N));
3325: hr_utility.trace (l_proc||' Payroll period '||to_char (new_entry.effective_start_date (N)) ||' to '
3326: ||to_char (new_entry.effective_end_date (N)));
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3330: hr_utility.trace (l_proc||' SSP_days_due = '||to_char (new_entry.SSP_days_due (N)));
3331: hr_utility.trace (l_proc||' withheld_days = '||to_char (new_entry.withheld_days (N)));
3324: hr_utility.trace (l_proc||'Entry number ' ||to_char (N));
3325: hr_utility.trace (l_proc||' Payroll period '||to_char (new_entry.effective_start_date (N)) ||' to '
3326: ||to_char (new_entry.effective_end_date (N)));
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3330: hr_utility.trace (l_proc||' SSP_days_due = '||to_char (new_entry.SSP_days_due (N)));
3331: hr_utility.trace (l_proc||' withheld_days = '||to_char (new_entry.withheld_days (N)));
3332: hr_utility.trace (l_proc||' rate = '||to_char (new_entry.rate (N)));
3325: hr_utility.trace (l_proc||' Payroll period '||to_char (new_entry.effective_start_date (N)) ||' to '
3326: ||to_char (new_entry.effective_end_date (N)));
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3330: hr_utility.trace (l_proc||' SSP_days_due = '||to_char (new_entry.SSP_days_due (N)));
3331: hr_utility.trace (l_proc||' withheld_days = '||to_char (new_entry.withheld_days (N)));
3332: hr_utility.trace (l_proc||' rate = '||to_char (new_entry.rate (N)));
3333: hr_utility.trace (l_proc||' amount ' || to_char (daily_rate)
3326: ||to_char (new_entry.effective_end_date (N)));
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3330: hr_utility.trace (l_proc||' SSP_days_due = '||to_char (new_entry.SSP_days_due (N)));
3331: hr_utility.trace (l_proc||' withheld_days = '||to_char (new_entry.withheld_days (N)));
3332: hr_utility.trace (l_proc||' rate = '||to_char (new_entry.rate (N)));
3333: hr_utility.trace (l_proc||' amount ' || to_char (daily_rate)
3334: ||' ( ' || to_char (new_entry.SSP_days_due (N))
3327: hr_utility.trace (l_proc||' from = '||to_char (new_entry.date_from (N))||' to = ' ||to_char ( new_entry.date_to (N)));
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3330: hr_utility.trace (l_proc||' SSP_days_due = '||to_char (new_entry.SSP_days_due (N)));
3331: hr_utility.trace (l_proc||' withheld_days = '||to_char (new_entry.withheld_days (N)));
3332: hr_utility.trace (l_proc||' rate = '||to_char (new_entry.rate (N)));
3333: hr_utility.trace (l_proc||' amount ' || to_char (daily_rate)
3334: ||' ( ' || to_char (new_entry.SSP_days_due (N))
3335: ||' - ' || to_char (new_entry.withheld_days (N))
3328: hr_utility.trace (l_proc||' qualifying_days = '||to_char (new_entry.qualifying_days (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3330: hr_utility.trace (l_proc||' SSP_days_due = '||to_char (new_entry.SSP_days_due (N)));
3331: hr_utility.trace (l_proc||' withheld_days = '||to_char (new_entry.withheld_days (N)));
3332: hr_utility.trace (l_proc||' rate = '||to_char (new_entry.rate (N)));
3333: hr_utility.trace (l_proc||' amount ' || to_char (daily_rate)
3334: ||' ( ' || to_char (new_entry.SSP_days_due (N))
3335: ||' - ' || to_char (new_entry.withheld_days (N))
3336: ||') = '|| to_char (new_entry.amount (N)));
3329: hr_utility.trace (l_proc||' SSP_weeks = '||to_char (new_entry.SSP_weeks (N)));
3330: hr_utility.trace (l_proc||' SSP_days_due = '||to_char (new_entry.SSP_days_due (N)));
3331: hr_utility.trace (l_proc||' withheld_days = '||to_char (new_entry.withheld_days (N)));
3332: hr_utility.trace (l_proc||' rate = '||to_char (new_entry.rate (N)));
3333: hr_utility.trace (l_proc||' amount ' || to_char (daily_rate)
3334: ||' ( ' || to_char (new_entry.SSP_days_due (N))
3335: ||' - ' || to_char (new_entry.withheld_days (N))
3336: ||') = '|| to_char (new_entry.amount (N)));
3337: hr_utility.trace (l_proc||' Total SSP weeks = '||to_char (total_ssp_weeks));
3333: hr_utility.trace (l_proc||' amount ' || to_char (daily_rate)
3334: ||' ( ' || to_char (new_entry.SSP_days_due (N))
3335: ||' - ' || to_char (new_entry.withheld_days (N))
3336: ||') = '|| to_char (new_entry.amount (N)));
3337: hr_utility.trace (l_proc||' Total SSP weeks = '||to_char (total_ssp_weeks));
3338: hr_utility.trace (l_proc||' weeks remaining = '||to_char (weeks_remaining));
3339: hr_utility.trace (l_proc||' waiting_days_left = '||to_char (waiting_days_left));
3340: hr_utility.trace (l_proc||' waiting_days_this_period = '||to_char (waiting_days_this_period));
3341: hr_utility.trace (l_proc||' Element_link_id = '||to_char (new_entry.element_link_id (N)));
3334: ||' ( ' || to_char (new_entry.SSP_days_due (N))
3335: ||' - ' || to_char (new_entry.withheld_days (N))
3336: ||') = '|| to_char (new_entry.amount (N)));
3337: hr_utility.trace (l_proc||' Total SSP weeks = '||to_char (total_ssp_weeks));
3338: hr_utility.trace (l_proc||' weeks remaining = '||to_char (weeks_remaining));
3339: hr_utility.trace (l_proc||' waiting_days_left = '||to_char (waiting_days_left));
3340: hr_utility.trace (l_proc||' waiting_days_this_period = '||to_char (waiting_days_this_period));
3341: hr_utility.trace (l_proc||' Element_link_id = '||to_char (new_entry.element_link_id (N)));
3342: hr_utility.trace (l_proc||' Assignment_id = '||to_char (new_entry.assignment_id (N)));
3335: ||' - ' || to_char (new_entry.withheld_days (N))
3336: ||') = '|| to_char (new_entry.amount (N)));
3337: hr_utility.trace (l_proc||' Total SSP weeks = '||to_char (total_ssp_weeks));
3338: hr_utility.trace (l_proc||' weeks remaining = '||to_char (weeks_remaining));
3339: hr_utility.trace (l_proc||' waiting_days_left = '||to_char (waiting_days_left));
3340: hr_utility.trace (l_proc||' waiting_days_this_period = '||to_char (waiting_days_this_period));
3341: hr_utility.trace (l_proc||' Element_link_id = '||to_char (new_entry.element_link_id (N)));
3342: hr_utility.trace (l_proc||' Assignment_id = '||to_char (new_entry.assignment_id (N)));
3343: hr_utility.trace ('----------------------------');
3336: ||') = '|| to_char (new_entry.amount (N)));
3337: hr_utility.trace (l_proc||' Total SSP weeks = '||to_char (total_ssp_weeks));
3338: hr_utility.trace (l_proc||' weeks remaining = '||to_char (weeks_remaining));
3339: hr_utility.trace (l_proc||' waiting_days_left = '||to_char (waiting_days_left));
3340: hr_utility.trace (l_proc||' waiting_days_this_period = '||to_char (waiting_days_this_period));
3341: hr_utility.trace (l_proc||' Element_link_id = '||to_char (new_entry.element_link_id (N)));
3342: hr_utility.trace (l_proc||' Assignment_id = '||to_char (new_entry.assignment_id (N)));
3343: hr_utility.trace ('----------------------------');
3344: exception
3337: hr_utility.trace (l_proc||' Total SSP weeks = '||to_char (total_ssp_weeks));
3338: hr_utility.trace (l_proc||' weeks remaining = '||to_char (weeks_remaining));
3339: hr_utility.trace (l_proc||' waiting_days_left = '||to_char (waiting_days_left));
3340: hr_utility.trace (l_proc||' waiting_days_this_period = '||to_char (waiting_days_this_period));
3341: hr_utility.trace (l_proc||' Element_link_id = '||to_char (new_entry.element_link_id (N)));
3342: hr_utility.trace (l_proc||' Assignment_id = '||to_char (new_entry.assignment_id (N)));
3343: hr_utility.trace ('----------------------------');
3344: exception
3345: when not_logged_on or program_error or storage_error then
3338: hr_utility.trace (l_proc||' weeks remaining = '||to_char (weeks_remaining));
3339: hr_utility.trace (l_proc||' waiting_days_left = '||to_char (waiting_days_left));
3340: hr_utility.trace (l_proc||' waiting_days_this_period = '||to_char (waiting_days_this_period));
3341: hr_utility.trace (l_proc||' Element_link_id = '||to_char (new_entry.element_link_id (N)));
3342: hr_utility.trace (l_proc||' Assignment_id = '||to_char (new_entry.assignment_id (N)));
3343: hr_utility.trace ('----------------------------');
3344: exception
3345: when not_logged_on or program_error or storage_error then
3346: -- a serious error must be indicated.
3339: hr_utility.trace (l_proc||' waiting_days_left = '||to_char (waiting_days_left));
3340: hr_utility.trace (l_proc||' waiting_days_this_period = '||to_char (waiting_days_this_period));
3341: hr_utility.trace (l_proc||' Element_link_id = '||to_char (new_entry.element_link_id (N)));
3342: hr_utility.trace (l_proc||' Assignment_id = '||to_char (new_entry.assignment_id (N)));
3343: hr_utility.trace ('----------------------------');
3344: exception
3345: when not_logged_on or program_error or storage_error then
3346: -- a serious error must be indicated.
3347: raise;
3348: when others then
3349: -- Do not let minor errors in debugging code stop the process
3350: null;
3351: end;
3352: hr_utility.trace ('Weeks remaining:'||to_char(weeks_remaining));
3353: hr_utility.trace (' end date :'||to_char(end_date));
3354: hr_utility.trace (' last ent day :'||to_char(last_entitled_day));
3355: --
3356: --if weeks_remaining <= 0 then --old line
3349: -- Do not let minor errors in debugging code stop the process
3350: null;
3351: end;
3352: hr_utility.trace ('Weeks remaining:'||to_char(weeks_remaining));
3353: hr_utility.trace (' end date :'||to_char(end_date));
3354: hr_utility.trace (' last ent day :'||to_char(last_entitled_day));
3355: --
3356: --if weeks_remaining <= 0 then --old line
3357: if weeks_remaining <= 0.00000000000000000000000000000000000001 then --line added for bug 6860926
3350: null;
3351: end;
3352: hr_utility.trace ('Weeks remaining:'||to_char(weeks_remaining));
3353: hr_utility.trace (' end date :'||to_char(end_date));
3354: hr_utility.trace (' last ent day :'||to_char(last_entitled_day));
3355: --
3356: --if weeks_remaining <= 0 then --old line
3357: if weeks_remaining <= 0.00000000000000000000000000000000000001 then --line added for bug 6860926
3358: raise maximum_SSP_paid;
3412: end;
3413: end if;
3414: end loop;
3415: --
3416: hr_utility.set_location('Leaving :'||l_proc,100);
3417: --
3418: exception
3419: when stoppage_invoked then
3420: --
3467: l_stoppage_overridden boolean := FALSE;
3468: l_01_October_06 date := to_date('01/10/2006','DD/MM/YYYY');
3469: l_PIW_date date;
3470: begin
3471: hr_utility.set_location('Entering:'||l_proc,1);
3472: --
3473: -- Look on the table for previously-calculated earnings figure
3474: --
3475: open csr_average_earnings;
3527: raise earnings_too_low;
3528: end if;
3529: end if;
3530: --
3531: hr_utility.set_location('Leaving :'||l_proc,100);
3532: --
3533: end check_average_earnings;
3534: --
3535: /*----------------------------------------*/
3558: l_dummy integer (1);
3559: l_stoppage_overridden boolean := FALSE;
3560: --
3561: begin
3562: hr_utility.set_location('Entering:'||l_proc,1);
3563: --
3564: /*BUG 2984577- Added code to handle linked absences.*/
3565: for each_absence in PIW loop
3566: -- Determine whether or not the user requires medical evidence of
3575: --
3576: -- Look for a sick note.
3577: open csr_evidence(each_absence.absence_attendance_id);
3578: fetch csr_evidence into l_dummy;
3579: hr_utility.set_location('Entering:'||l_dummy,5555);
3580: --
3581: -- no medical evidence was found for this absence
3582: if csr_evidence%notfound then
3583: /*BUG 2984577 Added exception */
3597: close csr_evidence;
3598: end if;
3599: end loop;
3600: --
3601: hr_utility.set_location('Leaving :'||l_proc,100);
3602: --
3603: end check_evidence;
3604: --
3605: /*--------------------------------------------------------------*/
3610: l_stoppage_overridden boolean := FALSE;
3611: l_proc varchar2 (72) := g_package||'check_service';
3612: begin
3613: --
3614: hr_utility.set_location('Entering:'||l_proc,1);
3615: -- the employment is scheduled to end
3616: -- bug 2984458 to avoid displaying 'Contract ends' when
3617: -- employee is deceased
3618: if (absentee.actual_termination_date < hr_general.end_of_time) and
3621: p_reason => 'Contract ends',
3622: p_overridden => l_stoppage_overridden);
3623: end if;
3624: --
3625: hr_utility.set_location('Leaving :'||l_proc,100);
3626: --
3627: end check_service;
3628: --
3629: /*-----------------------------------------------------------*/
3645: l_link_letter_end_date date;
3646: --
3647: begin
3648: --
3649: hr_utility.set_location('Entering:'||l_proc,1);
3650: --
3651: open csr_link_letter;
3652: fetch csr_link_letter into l_link_letter_end_date;
3653: close csr_link_letter;
3651: open csr_link_letter;
3652: fetch csr_link_letter into l_link_letter_end_date;
3653: close csr_link_letter;
3654:
3655: hr_utility.trace('Linking letter end date: '||l_link_letter_end_date);
3656: --
3657: -- check if link letter end date is after start date of current PIW
3658: if l_link_letter_end_date is not null and
3659: l_link_letter_end_date > PIW_start_date then
3663: p_reason => 'Linking letter',
3664: p_overridden => l_stoppage_overridden);
3665: end if;
3666: --
3667: hr_utility.set_location('Leaving :'||l_proc,100);
3668: --
3669: end check_linking_letter;
3670: --
3671: --
3672: begin
3673: --
3674: -- Start of Entitled_to_SSP
3675: --
3676: hr_utility.set_location('Entering:'||l_proc,1);
3677: --
3678: new_entry := empty_record;
3679: --
3680: -- SSP not installed or the absence is not sick leave
3701: p_absence.sickness_start_date,
3702: p_absence.sickness_end_date,
3703: p_absence.absence_attendance_id);
3704: --
3705: hr_utility.trace('Piw_start_date ' || to_char(PIW_start_date,'DD-MON-YYYY'));
3706: --
3707: -- The absence passed in is not a PIW
3708: if PIW_start_date is null then
3709: -- Start Bug 418895 fixing
3730: p_absence.sickness_end_date,
3731: p_absence.absence_attendance_id),
3732: hr_general.end_of_time);
3733: --
3734: hr_utility.trace('Piw_end_date ' || to_char(PIW_end_date,'DD-MON-YYYY'));
3735: --
3736: g_PIW_id := nvl(p_absence.linked_absence_id,p_absence.absence_attendance_id);
3737: --
3738: hr_utility.trace('Piw_id ' || to_char(g_PIW_id));
3734: hr_utility.trace('Piw_end_date ' || to_char(PIW_end_date,'DD-MON-YYYY'));
3735: --
3736: g_PIW_id := nvl(p_absence.linked_absence_id,p_absence.absence_attendance_id);
3737: --
3738: hr_utility.trace('Piw_id ' || to_char(g_PIW_id));
3739: --
3740: -- Get the legislative parameters for SSP
3741: --
3742: get_SSP_element (p_absence.sickness_start_date);
3775: -- Work out the amounts of SSP due in entries covering approx. one week each.
3776: --
3777: do_PIW_calculations;
3778: --
3779: hr_utility.set_location('Leaving :'||l_proc,100);
3780: --
3781: -- If we have got this far then the person is entitled to SSP
3782: -- (though stoppages may apply).
3783: --
3785: end if;
3786: exception
3787: when no_prima_facia_entitlement or employee_too_old or
3788: earnings_too_low or evidence_not_available then
3789: hr_utility.set_location('Leaving :'||l_proc||', Exception',999);
3790: --
3791: return FALSE; -- employee not entitled to SSP
3792: --
3793: end entitled_to_SSP;
3886: Y integer := 0;
3887: --
3888: begin
3889: --
3890: hr_utility.set_location('Entering:'||l_proc,1);
3891: hr_utility.trace(l_proc||' PIW_START_DATE:'||PIW_start_date);
3892: --
3893: if PIW_start_date is not null
3894: then
3887: --
3888: begin
3889: --
3890: hr_utility.set_location('Entering:'||l_proc,1);
3891: hr_utility.trace(l_proc||' PIW_START_DATE:'||PIW_start_date);
3892: --
3893: if PIW_start_date is not null
3894: then
3895: -- begin
3895: -- begin
3896: -- Y:=0;
3897: -- loop
3898: -- Y:=Y+1;
3899: -- hr_utility.trace('NEW ENTRY '||to_char(Y));
3900: -- hr_utility.trace(' Date From: '||to_char(new_entry.date_from(Y)));
3901: -- hr_utility.trace(' Date To : '||to_char(new_entry.date_to(Y)));
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3896: -- Y:=0;
3897: -- loop
3898: -- Y:=Y+1;
3899: -- hr_utility.trace('NEW ENTRY '||to_char(Y));
3900: -- hr_utility.trace(' Date From: '||to_char(new_entry.date_from(Y)));
3901: -- hr_utility.trace(' Date To : '||to_char(new_entry.date_to(Y)));
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3904: -- hr_utility.trace(' Weeks : '||to_char(new_entry.ssp_weeks(Y)));
3897: -- loop
3898: -- Y:=Y+1;
3899: -- hr_utility.trace('NEW ENTRY '||to_char(Y));
3900: -- hr_utility.trace(' Date From: '||to_char(new_entry.date_from(Y)));
3901: -- hr_utility.trace(' Date To : '||to_char(new_entry.date_to(Y)));
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3904: -- hr_utility.trace(' Weeks : '||to_char(new_entry.ssp_weeks(Y)));
3905: -- hr_utility.trace(' Withheld : '||to_char(new_entry.withheld_days(Y)));
3898: -- Y:=Y+1;
3899: -- hr_utility.trace('NEW ENTRY '||to_char(Y));
3900: -- hr_utility.trace(' Date From: '||to_char(new_entry.date_from(Y)));
3901: -- hr_utility.trace(' Date To : '||to_char(new_entry.date_to(Y)));
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3904: -- hr_utility.trace(' Weeks : '||to_char(new_entry.ssp_weeks(Y)));
3905: -- hr_utility.trace(' Withheld : '||to_char(new_entry.withheld_days(Y)));
3906: -- hr_utility.trace(' Rate : '||to_char(new_entry.rate(Y)));
3899: -- hr_utility.trace('NEW ENTRY '||to_char(Y));
3900: -- hr_utility.trace(' Date From: '||to_char(new_entry.date_from(Y)));
3901: -- hr_utility.trace(' Date To : '||to_char(new_entry.date_to(Y)));
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3904: -- hr_utility.trace(' Weeks : '||to_char(new_entry.ssp_weeks(Y)));
3905: -- hr_utility.trace(' Withheld : '||to_char(new_entry.withheld_days(Y)));
3906: -- hr_utility.trace(' Rate : '||to_char(new_entry.rate(Y)));
3907: -- end loop;
3900: -- hr_utility.trace(' Date From: '||to_char(new_entry.date_from(Y)));
3901: -- hr_utility.trace(' Date To : '||to_char(new_entry.date_to(Y)));
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3904: -- hr_utility.trace(' Weeks : '||to_char(new_entry.ssp_weeks(Y)));
3905: -- hr_utility.trace(' Withheld : '||to_char(new_entry.withheld_days(Y)));
3906: -- hr_utility.trace(' Rate : '||to_char(new_entry.rate(Y)));
3907: -- end loop;
3908: -- --
3901: -- hr_utility.trace(' Date To : '||to_char(new_entry.date_to(Y)));
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3904: -- hr_utility.trace(' Weeks : '||to_char(new_entry.ssp_weeks(Y)));
3905: -- hr_utility.trace(' Withheld : '||to_char(new_entry.withheld_days(Y)));
3906: -- hr_utility.trace(' Rate : '||to_char(new_entry.rate(Y)));
3907: -- end loop;
3908: -- --
3909: -- exception
3902: -- hr_utility.trace(' Amount : '||to_char(new_entry.amount(Y)));
3903: -- hr_utility.trace(' Days Due : '||to_char(new_entry.ssp_days_due(Y)));
3904: -- hr_utility.trace(' Weeks : '||to_char(new_entry.ssp_weeks(Y)));
3905: -- hr_utility.trace(' Withheld : '||to_char(new_entry.withheld_days(Y)));
3906: -- hr_utility.trace(' Rate : '||to_char(new_entry.rate(Y)));
3907: -- end loop;
3908: -- --
3909: -- exception
3910: -- when no_data_found then
3910: -- when no_data_found then
3911: -- null;
3912: -- end;
3913: --
3914: hr_utility.set_location(l_proc,2);
3915: get_SSP_correction_element (PIW_start_date);
3916: hr_utility.set_location(l_proc,3);
3917: --
3918: -- Check each existing SSP entry in turn against all the potential new ones.
3912: -- end;
3913: --
3914: hr_utility.set_location(l_proc,2);
3915: get_SSP_correction_element (PIW_start_date);
3916: hr_utility.set_location(l_proc,3);
3917: --
3918: -- Check each existing SSP entry in turn against all the potential new ones.
3919: --
3920: <
3919: --
3920: <
3921: for old_entry in csr_existing_entries
3922: LOOP
3923: hr_utility.trace(l_proc||'OLD ENTRY');
3924: hr_utility.trace(l_proc||'Ele_entryid: '||to_char(old_entry.element_entry_id));
3925: hr_utility.trace(l_proc||'Ele_link_id: '||to_char(old_entry.element_link_id));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3920: <
3921: for old_entry in csr_existing_entries
3922: LOOP
3923: hr_utility.trace(l_proc||'OLD ENTRY');
3924: hr_utility.trace(l_proc||'Ele_entryid: '||to_char(old_entry.element_entry_id));
3925: hr_utility.trace(l_proc||'Ele_link_id: '||to_char(old_entry.element_link_id));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3921: for old_entry in csr_existing_entries
3922: LOOP
3923: hr_utility.trace(l_proc||'OLD ENTRY');
3924: hr_utility.trace(l_proc||'Ele_entryid: '||to_char(old_entry.element_entry_id));
3925: hr_utility.trace(l_proc||'Ele_link_id: '||to_char(old_entry.element_link_id));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3922: LOOP
3923: hr_utility.trace(l_proc||'OLD ENTRY');
3924: hr_utility.trace(l_proc||'Ele_entryid: '||to_char(old_entry.element_entry_id));
3925: hr_utility.trace(l_proc||'Ele_link_id: '||to_char(old_entry.element_link_id));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3923: hr_utility.trace(l_proc||'OLD ENTRY');
3924: hr_utility.trace(l_proc||'Ele_entryid: '||to_char(old_entry.element_entry_id));
3925: hr_utility.trace(l_proc||'Ele_link_id: '||to_char(old_entry.element_link_id));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3924: hr_utility.trace(l_proc||'Ele_entryid: '||to_char(old_entry.element_entry_id));
3925: hr_utility.trace(l_proc||'Ele_link_id: '||to_char(old_entry.element_link_id));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3925: hr_utility.trace(l_proc||'Ele_link_id: '||to_char(old_entry.element_link_id));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3933: hr_utility.trace(l_proc||' Weeks : '||to_char(old_entry.ssp_weeks));
3926: hr_utility.trace(l_proc||'Assgment_id: '||to_char(old_entry.assignment_id));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3933: hr_utility.trace(l_proc||' Weeks : '||to_char(old_entry.ssp_weeks));
3934: hr_utility.trace(l_proc||' Withheld : '||to_char(old_entry.withheld_days));
3927: hr_utility.trace(l_proc||'Eff_star_dt: '||to_char(old_entry.effective_start_date));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3933: hr_utility.trace(l_proc||' Weeks : '||to_char(old_entry.ssp_weeks));
3934: hr_utility.trace(l_proc||' Withheld : '||to_char(old_entry.withheld_days));
3935: hr_utility.trace(l_proc||' Rate : '||to_char(old_entry.rate));
3928: hr_utility.trace(l_proc||' Eff_end_dt: '||to_char(old_entry.effective_end_date));
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3933: hr_utility.trace(l_proc||' Weeks : '||to_char(old_entry.ssp_weeks));
3934: hr_utility.trace(l_proc||' Withheld : '||to_char(old_entry.withheld_days));
3935: hr_utility.trace(l_proc||' Rate : '||to_char(old_entry.rate));
3936: --
3929: hr_utility.trace(l_proc||' Date From: '||to_char(old_entry.date_from));
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3933: hr_utility.trace(l_proc||' Weeks : '||to_char(old_entry.ssp_weeks));
3934: hr_utility.trace(l_proc||' Withheld : '||to_char(old_entry.withheld_days));
3935: hr_utility.trace(l_proc||' Rate : '||to_char(old_entry.rate));
3936: --
3937: -- See if the existing entry exactly matches one we are going to insert.
3930: hr_utility.trace(l_proc||' Date To : '||to_char(old_entry.date_to));
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3933: hr_utility.trace(l_proc||' Weeks : '||to_char(old_entry.ssp_weeks));
3934: hr_utility.trace(l_proc||' Withheld : '||to_char(old_entry.withheld_days));
3935: hr_utility.trace(l_proc||' Rate : '||to_char(old_entry.rate));
3936: --
3937: -- See if the existing entry exactly matches one we are going to insert.
3938: -- If it does, then we do not need to change it or insert the new one.
3931: hr_utility.trace(l_proc||' Amount : '||to_char(old_entry.amount));
3932: hr_utility.trace(l_proc||' Days Due : '||to_char(old_entry.ssp_days_due));
3933: hr_utility.trace(l_proc||' Weeks : '||to_char(old_entry.ssp_weeks));
3934: hr_utility.trace(l_proc||' Withheld : '||to_char(old_entry.withheld_days));
3935: hr_utility.trace(l_proc||' Rate : '||to_char(old_entry.rate));
3936: --
3937: -- See if the existing entry exactly matches one we are going to insert.
3938: -- If it does, then we do not need to change it or insert the new one.
3939: -- If there is no exact match, then we must reverse the existing entry.
3970: -- The existing entry is OK so leave it alone. Simply mark the new one
3971: -- so that we do not attempt to insert it.
3972: --
3973: new_entry.dealt_with (Y) := 'TRUE';
3974: hr_utility.trace(l_proc||' Inside not l_invalid_entry');
3975: else
3976: --
3977: -- The existing entry has been superseded by a new one.
3978: --
3975: else
3976: --
3977: -- The existing entry has been superseded by a new one.
3978: --
3979: hr_utility.set_location(l_proc,5);
3980: if (ssp_smp_support_pkg.entry_already_processed(old_entry.element_entry_id))
3981: then
3982: --
3983: -- The processed entry must be reversed, its values are superseded.
3986: -- period, with the old entry's amounts reversed in sign so that it
3987: -- will cancel out the old entry.
3988: --
3989: --Changed the last_process_date to FINAL_PROCESS_DATE for debug purpose
3990: hr_utility.set_location(l_proc,6);
3991: ssp_smp_support_pkg.get_entry_details (
3992: p_date_earned => old_entry.date_from,
3993: p_person_id => absentee.person_id,
3994: p_last_process_date => absentee.final_process_date, /*7688727 changed from LSP date to FPD */
3997: p_assignment_id => old_entry.assignment_id,
3998: p_effective_start_date => old_entry.effective_start_date,
3999: p_effective_end_date => old_entry.effective_end_date);
4000: --
4001: hr_utility.set_location(l_proc,20);
4002: hr_utility.trace(l_proc||' OLD: Before calling hr_entry_api.insert_element_entry');
4003: hr_utility.trace(l_proc||' old_entry.effective_start_date'||old_entry.effective_start_date);
4004: hr_utility.trace(l_proc||' old_entry.effective_end_date'||old_entry.effective_end_date);
4005: --
3998: p_effective_start_date => old_entry.effective_start_date,
3999: p_effective_end_date => old_entry.effective_end_date);
4000: --
4001: hr_utility.set_location(l_proc,20);
4002: hr_utility.trace(l_proc||' OLD: Before calling hr_entry_api.insert_element_entry');
4003: hr_utility.trace(l_proc||' old_entry.effective_start_date'||old_entry.effective_start_date);
4004: hr_utility.trace(l_proc||' old_entry.effective_end_date'||old_entry.effective_end_date);
4005: --
4006: hr_entry_api.insert_element_entry (
3999: p_effective_end_date => old_entry.effective_end_date);
4000: --
4001: hr_utility.set_location(l_proc,20);
4002: hr_utility.trace(l_proc||' OLD: Before calling hr_entry_api.insert_element_entry');
4003: hr_utility.trace(l_proc||' old_entry.effective_start_date'||old_entry.effective_start_date);
4004: hr_utility.trace(l_proc||' old_entry.effective_end_date'||old_entry.effective_end_date);
4005: --
4006: hr_entry_api.insert_element_entry (
4007: p_effective_start_date => old_entry.effective_start_date,
4000: --
4001: hr_utility.set_location(l_proc,20);
4002: hr_utility.trace(l_proc||' OLD: Before calling hr_entry_api.insert_element_entry');
4003: hr_utility.trace(l_proc||' old_entry.effective_start_date'||old_entry.effective_start_date);
4004: hr_utility.trace(l_proc||' old_entry.effective_end_date'||old_entry.effective_end_date);
4005: --
4006: hr_entry_api.insert_element_entry (
4007: p_effective_start_date => old_entry.effective_start_date,
4008: p_effective_end_date => old_entry.effective_end_date,
4033: p_entry_value6 => old_entry.SSP_weeks * -1,
4034: p_entry_value7 => old_entry.SSP_days_due * -1,
4035: p_entry_value8 => old_entry.qualifying_days * -1);
4036: --
4037: hr_utility.set_location(l_proc,25);
4038: else
4039: --
4040: -- Delete the unprocessed, invalid entry
4041: --
4038: else
4039: --
4040: -- Delete the unprocessed, invalid entry
4041: --
4042: hr_utility.set_location (l_proc,30);
4043: --
4044: hr_entry_api.delete_element_entry (
4045: p_dt_delete_mode => 'ZAP',
4046: p_session_date => old_entry.effective_start_date,
4045: p_dt_delete_mode => 'ZAP',
4046: p_session_date => old_entry.effective_start_date,
4047: p_element_entry_id => old_entry.element_entry_id);
4048: --
4049: hr_utility.set_location (l_proc,35);
4050: end if;
4051: end if;
4052: end loop;
4053: --
4059: --
4060: -- Now go through the new entries, inserting any which are not marked as
4061: -- having been dealt with already.
4062: --
4063: hr_utility.set_location (l_proc,4);
4064: --
4065: begin
4066: Y := 0;
4067: --
4078: -- correct, processed entry and where the stoppage days are less
4079: -- than the due days or the due days are zero (because of waiting
4080: -- days) and where the entry is for part or all of an SSP week.
4081: --
4082: hr_utility.set_location(l_proc,40);
4083: hr_utility.trace(l_proc||' NEW: Before calling hr_entry_api.insert_element_entry');
4084: hr_utility.trace(l_proc||' new_entry.effective_start_date('||Y||') :'||new_entry.effective_start_date(Y));
4085: hr_utility.trace(l_proc||' new_entry.effective_end_date('||Y||') :'||new_entry.effective_end_date(Y));
4086: --
4079: -- than the due days or the due days are zero (because of waiting
4080: -- days) and where the entry is for part or all of an SSP week.
4081: --
4082: hr_utility.set_location(l_proc,40);
4083: hr_utility.trace(l_proc||' NEW: Before calling hr_entry_api.insert_element_entry');
4084: hr_utility.trace(l_proc||' new_entry.effective_start_date('||Y||') :'||new_entry.effective_start_date(Y));
4085: hr_utility.trace(l_proc||' new_entry.effective_end_date('||Y||') :'||new_entry.effective_end_date(Y));
4086: --
4087: hr_entry_api.insert_element_entry (
4080: -- days) and where the entry is for part or all of an SSP week.
4081: --
4082: hr_utility.set_location(l_proc,40);
4083: hr_utility.trace(l_proc||' NEW: Before calling hr_entry_api.insert_element_entry');
4084: hr_utility.trace(l_proc||' new_entry.effective_start_date('||Y||') :'||new_entry.effective_start_date(Y));
4085: hr_utility.trace(l_proc||' new_entry.effective_end_date('||Y||') :'||new_entry.effective_end_date(Y));
4086: --
4087: hr_entry_api.insert_element_entry (
4088: p_effective_start_date => new_entry.effective_start_date (Y),
4081: --
4082: hr_utility.set_location(l_proc,40);
4083: hr_utility.trace(l_proc||' NEW: Before calling hr_entry_api.insert_element_entry');
4084: hr_utility.trace(l_proc||' new_entry.effective_start_date('||Y||') :'||new_entry.effective_start_date(Y));
4085: hr_utility.trace(l_proc||' new_entry.effective_end_date('||Y||') :'||new_entry.effective_end_date(Y));
4086: --
4087: hr_entry_api.insert_element_entry (
4088: p_effective_start_date => new_entry.effective_start_date (Y),
4089: p_effective_end_date => new_entry.effective_end_date (Y),
4114: p_entry_value6 => new_entry.SSP_weeks (Y),
4115: p_entry_value7 => new_entry.SSP_days_due (Y),
4116: p_entry_value8 => new_entry.qualifying_days (Y));
4117: --
4118: hr_utility.set_location(l_proc,45);
4119: end if;
4120: end loop;
4121: --
4122: exception
4129: end;
4130: end if;
4131: end if;
4132: --
4133: hr_utility.set_location('Leaving :'||l_proc,100);
4134: --
4135: end generate_payments;
4136: --------------------------------------------------------------------------------
4137: procedure ins_ssp_temp_affected_rows_PIW(p_absence_id in number,
4143: l_deleting_ch varchar2(1);
4144: --
4145: begin
4146: --
4147: hr_utility.set_location('Entering:'||l_proc,1);
4148: if p_deleting then
4149: l_deleting_ch := 'Y';
4150: else
4151: l_deleting_ch := 'N';
4151: l_deleting_ch := 'N';
4152: end if;
4153: --
4154: if p_absence_id is not null then
4155: hr_utility.trace('inserting record for absence '||to_char(p_absence_id)||
4156: 'deleting is '||l_deleting_ch);
4157: --
4158: insert into ssp_temp_affected_rows (PIW_id, p_deleting, locked)
4159: select p_absence_id, l_deleting_ch, userenv('sessionid')
4163: from ssp_temp_affected_rows t2
4164: where t2.PIW_id = p_absence_id);
4165: end if;
4166: --
4167: hr_utility.set_location('Leaving :'||l_proc,100);
4168: --
4169: end ins_ssp_temp_affected_rows_PIW;
4170: --------------------------------------------------------------------------------
4171: procedure SSP1L_control (
4198: and p_date_start is not null);
4199: --
4200: begin
4201: --
4202: hr_utility.trace (l_proc||' p_person_id: '||to_char(p_person_id));
4203: hr_utility.trace (l_proc||' p_date_start: ' ||to_char(p_date_start));
4204: --
4205: hr_general.assert_condition (all_parameters_valid);
4206: --
4199: --
4200: begin
4201: --
4202: hr_utility.trace (l_proc||' p_person_id: '||to_char(p_person_id));
4203: hr_utility.trace (l_proc||' p_date_start: ' ||to_char(p_date_start));
4204: --
4205: hr_general.assert_condition (all_parameters_valid);
4206: --
4207: end check_parameters;
4207: end check_parameters;
4208: --
4209: begin
4210: --
4211: hr_utility.set_location('Entering:'||l_proc,1);
4212: --
4213: check_parameters;
4214: --
4215: get_SSP_element (p_date_start);
4226: --
4227: ins_ssp_temp_affected_rows_PIW (l_PIW_ID, p_deleting => FALSE);
4228: end if;
4229: --
4230: hr_utility.set_location('Leaving :'||l_proc,100);
4231: --
4232: end SSP1L_control;
4233: --------------------------------------------------------------------------------
4234: --
4260: all_parameters_valid constant boolean :=
4261: (p_person_id is not null and
4262: p_date_of_death >= p_date_of_birth);
4263: begin
4264: hr_utility.trace (l_proc||' p_person_id = '||to_char (p_person_id));
4265: hr_utility.trace (l_proc||' p_date_of_death = '||to_char (p_date_of_death));
4266: hr_utility.trace (l_proc||' p_date_of_birth = '||to_char (p_date_of_birth));
4267: --
4268: hr_general.assert_condition (all_parameters_valid);
4261: (p_person_id is not null and
4262: p_date_of_death >= p_date_of_birth);
4263: begin
4264: hr_utility.trace (l_proc||' p_person_id = '||to_char (p_person_id));
4265: hr_utility.trace (l_proc||' p_date_of_death = '||to_char (p_date_of_death));
4266: hr_utility.trace (l_proc||' p_date_of_birth = '||to_char (p_date_of_birth));
4267: --
4268: hr_general.assert_condition (all_parameters_valid);
4269: --
4262: p_date_of_death >= p_date_of_birth);
4263: begin
4264: hr_utility.trace (l_proc||' p_person_id = '||to_char (p_person_id));
4265: hr_utility.trace (l_proc||' p_date_of_death = '||to_char (p_date_of_death));
4266: hr_utility.trace (l_proc||' p_date_of_birth = '||to_char (p_date_of_birth));
4267: --
4268: hr_general.assert_condition (all_parameters_valid);
4269: --
4270: end check_parameters;
4269: --
4270: end check_parameters;
4271: --
4272: begin
4273: hr_utility.set_location('Entering:'||l_proc,1);
4274: --
4275: check_parameters;
4276: --
4277: for l_absence in affected_PIWs LOOP
4307: --
4308: -- Call the ssp_smp_support_pkg.recalculate_ssp_and_smp directly.
4309: ssp_smp_support_pkg.recalculate_ssp_and_smp(p_deleting => FALSE);
4310: --
4311: hr_utility.set_location('Leaving :'||l_proc,100);
4312: --
4313: end person_control;
4314: --------------------------------------------------------------------------------
4315: -- If absence details are updated then we must recalculate SSP.
4328: p_sickness_start_date = trunc (p_sickness_start_date) and
4329: p_absence_attendance_id <> p_linked_absence_id);
4330: begin
4331: --
4332: hr_utility.trace (l_proc||' p_absence_attendance_id = '||to_char (p_absence_attendance_id));
4333: hr_utility.trace (l_proc||' p_linked_absence_id'||to_char (p_linked_absence_id));
4334: hr_utility.trace ('p_person_id'||to_char (p_person_id));
4335: hr_utility.trace ('p_sickness_start_date' ||to_char (p_sickness_start_date));
4336: if p_deleting then
4329: p_absence_attendance_id <> p_linked_absence_id);
4330: begin
4331: --
4332: hr_utility.trace (l_proc||' p_absence_attendance_id = '||to_char (p_absence_attendance_id));
4333: hr_utility.trace (l_proc||' p_linked_absence_id'||to_char (p_linked_absence_id));
4334: hr_utility.trace ('p_person_id'||to_char (p_person_id));
4335: hr_utility.trace ('p_sickness_start_date' ||to_char (p_sickness_start_date));
4336: if p_deleting then
4337: hr_utility.trace (l_proc||' p_deleting is TRUE');
4330: begin
4331: --
4332: hr_utility.trace (l_proc||' p_absence_attendance_id = '||to_char (p_absence_attendance_id));
4333: hr_utility.trace (l_proc||' p_linked_absence_id'||to_char (p_linked_absence_id));
4334: hr_utility.trace ('p_person_id'||to_char (p_person_id));
4335: hr_utility.trace ('p_sickness_start_date' ||to_char (p_sickness_start_date));
4336: if p_deleting then
4337: hr_utility.trace (l_proc||' p_deleting is TRUE');
4338: else
4331: --
4332: hr_utility.trace (l_proc||' p_absence_attendance_id = '||to_char (p_absence_attendance_id));
4333: hr_utility.trace (l_proc||' p_linked_absence_id'||to_char (p_linked_absence_id));
4334: hr_utility.trace ('p_person_id'||to_char (p_person_id));
4335: hr_utility.trace ('p_sickness_start_date' ||to_char (p_sickness_start_date));
4336: if p_deleting then
4337: hr_utility.trace (l_proc||' p_deleting is TRUE');
4338: else
4339: hr_utility.trace (l_proc||' p_deleting is FALSE');
4333: hr_utility.trace (l_proc||' p_linked_absence_id'||to_char (p_linked_absence_id));
4334: hr_utility.trace ('p_person_id'||to_char (p_person_id));
4335: hr_utility.trace ('p_sickness_start_date' ||to_char (p_sickness_start_date));
4336: if p_deleting then
4337: hr_utility.trace (l_proc||' p_deleting is TRUE');
4338: else
4339: hr_utility.trace (l_proc||' p_deleting is FALSE');
4340: end if;
4341: --
4335: hr_utility.trace ('p_sickness_start_date' ||to_char (p_sickness_start_date));
4336: if p_deleting then
4337: hr_utility.trace (l_proc||' p_deleting is TRUE');
4338: else
4339: hr_utility.trace (l_proc||' p_deleting is FALSE');
4340: end if;
4341: --
4342: hr_general.assert_condition (all_parameters_valid);
4343: --
4342: hr_general.assert_condition (all_parameters_valid);
4343: --
4344: end check_parameters;
4345: begin
4346: hr_utility.set_location('Entering:'||l_proc,1);
4347: --
4348: check_parameters;
4349: --
4350: if p_deleting then
4358: g_PIW_id := p_absence_attendance_id;
4359: new_entry := empty_record;
4360: PIW_start_date := p_sickness_start_date;
4361: --
4362: hr_utility.trace('Deleting parent absence, id '||to_char(g_PIW_id));
4363: --
4364: open csr_person (p_sickness_start_date, p_person_id);
4365: fetch csr_person into absentee;
4366: close csr_person;
4375: ins_ssp_temp_affected_rows_PIW (nvl(p_linked_absence_id,p_absence_attendance_id)
4376: ,p_deleting);
4377: end if;
4378: --
4379: hr_utility.set_location('Leaving :'||l_proc,100);
4380: --
4381: end absence_control;
4382: --------------------------------------------------------------------------------
4383: procedure earnings_control (
4407: and p_effective_date = trunc (p_effective_date));
4408: --
4409: begin
4410: --
4411: hr_utility.trace (l_proc||' p_person_id = '||to_char (p_person_id));
4412: hr_utility.trace (l_proc||' p_effective_date = '
4413: ||to_char (p_effective_date));
4414: --
4415: hr_general.assert_condition (all_parameters_valid);
4408: --
4409: begin
4410: --
4411: hr_utility.trace (l_proc||' p_person_id = '||to_char (p_person_id));
4412: hr_utility.trace (l_proc||' p_effective_date = '
4413: ||to_char (p_effective_date));
4414: --
4415: hr_general.assert_condition (all_parameters_valid);
4416: --
4417: end check_parameters;
4418: --
4419: begin
4420: --
4421: hr_utility.set_location('Entering:'||l_proc,1);
4422: --
4423: check_parameters;
4424: --
4425: open affected_PIW;
4427: close affected_PIW;
4428: --
4429: if g_absence.absence_attendance_id is not null
4430: then
4431: hr_utility.set_location (l_proc,10);
4432: --
4433: ins_ssp_temp_affected_rows_PIW (g_absence.absence_attendance_id,
4434: p_deleting => FALSE);
4435: end if;
4433: ins_ssp_temp_affected_rows_PIW (g_absence.absence_attendance_id,
4434: p_deleting => FALSE);
4435: end if;
4436: --
4437: hr_utility.set_location('Leaving :'||l_proc,100);
4438: --
4439: end earnings_control;
4440: --------------------------------------------------------------------------------
4441: procedure stoppage_control (p_absence_id in number) is
4445: l_proc varchar2 (72) := g_package||'stoppage_control';
4446: --
4447: begin
4448: --
4449: hr_utility.set_location('Entering:'||l_proc,1);
4450: --
4451: if p_absence_id is not null
4452: then
4453: ins_ssp_temp_affected_rows_PIW (p_absence_id, p_deleting => FALSE);
4452: then
4453: ins_ssp_temp_affected_rows_PIW (p_absence_id, p_deleting => FALSE);
4454: end if;
4455: --
4456: hr_utility.set_location('Leaving :'||l_proc,100);
4457: --
4458: end stoppage_control;
4459:
4460: --------------------------------------------------------------------------------
4465: l_proc varchar2 (72) := g_package||'medical_control';
4466: --
4467: begin
4468: --
4469: hr_utility.set_location('Entering:'||l_proc,1);
4470: --
4471: if p_absence_id is not null and g_absence_del = 'N'
4472: then
4473: ins_ssp_temp_affected_rows_PIW (p_absence_id, p_deleting => FALSE);
4474: end if;
4475:
4476: g_absence_del := 'N';
4477: --
4478: hr_utility.set_location('Leaving :'||l_proc,100);
4479: --
4480: end medical_control;
4481:
4482: --------------------------------------------------------------------------------
4495: --
4496: procedure check_parameters is
4497: all_parameters_valid constant boolean := (p_absence_attendance_id is not null);
4498: begin
4499: hr_utility.trace (l_proc||' p_absence_attendance_id = '||to_char (p_absence_attendance_id));
4500: --
4501: hr_general.assert_condition (all_parameters_valid);
4502: --
4503: end check_parameters;
4501: hr_general.assert_condition (all_parameters_valid);
4502: --
4503: end check_parameters;
4504: begin
4505: hr_utility.set_location('Entering:'||l_proc,1);
4506: hr_utility.trace(l_proc||'---------PARAMS------------');
4507: hr_utility.trace(l_proc||'p_absence_attendance_id:'||p_absence_attendance_id);
4508: hr_utility.trace(l_proc||'---------------------------');
4509: --
4502: --
4503: end check_parameters;
4504: begin
4505: hr_utility.set_location('Entering:'||l_proc,1);
4506: hr_utility.trace(l_proc||'---------PARAMS------------');
4507: hr_utility.trace(l_proc||'p_absence_attendance_id:'||p_absence_attendance_id);
4508: hr_utility.trace(l_proc||'---------------------------');
4509: --
4510: check_parameters;
4503: end check_parameters;
4504: begin
4505: hr_utility.set_location('Entering:'||l_proc,1);
4506: hr_utility.trace(l_proc||'---------PARAMS------------');
4507: hr_utility.trace(l_proc||'p_absence_attendance_id:'||p_absence_attendance_id);
4508: hr_utility.trace(l_proc||'---------------------------');
4509: --
4510: check_parameters;
4511: hr_utility.set_location(l_proc,2);
4504: begin
4505: hr_utility.set_location('Entering:'||l_proc,1);
4506: hr_utility.trace(l_proc||'---------PARAMS------------');
4507: hr_utility.trace(l_proc||'p_absence_attendance_id:'||p_absence_attendance_id);
4508: hr_utility.trace(l_proc||'---------------------------');
4509: --
4510: check_parameters;
4511: hr_utility.set_location(l_proc,2);
4512: --
4507: hr_utility.trace(l_proc||'p_absence_attendance_id:'||p_absence_attendance_id);
4508: hr_utility.trace(l_proc||'---------------------------');
4509: --
4510: check_parameters;
4511: hr_utility.set_location(l_proc,2);
4512: --
4513: get_absence_details (p_absence_attendance_id);
4514: --
4515: open csr_previous_reason;
4514: --
4515: open csr_previous_reason;
4516: fetch csr_previous_reason into l_rows_reason;
4517: if l_rows_reason > 0 then
4518: hr_utility.set_location(l_proc,3);
4519: ssp_smp_support_pkg.reason_for_no_earnings:='SSP_36076_EMP_REHIRED';
4520: hr_utility.set_location(l_proc,4);
4521: end if;
4522: close csr_previous_reason;
4516: fetch csr_previous_reason into l_rows_reason;
4517: if l_rows_reason > 0 then
4518: hr_utility.set_location(l_proc,3);
4519: ssp_smp_support_pkg.reason_for_no_earnings:='SSP_36076_EMP_REHIRED';
4520: hr_utility.set_location(l_proc,4);
4521: end if;
4522: close csr_previous_reason;
4523: --
4524: hr_utility.set_location(l_proc,5);
4520: hr_utility.set_location(l_proc,4);
4521: end if;
4522: close csr_previous_reason;
4523: --
4524: hr_utility.set_location(l_proc,5);
4525: generate_payments (entitled_to_SSP (g_absence));
4526: --
4527: hr_utility.set_location('Leaving :'||l_proc,100);
4528: --
4523: --
4524: hr_utility.set_location(l_proc,5);
4525: generate_payments (entitled_to_SSP (g_absence));
4526: --
4527: hr_utility.set_location('Leaving :'||l_proc,100);
4528: --
4529: end SSP_control;
4530: --------------------------------------------------------------------------------
4531: end ssp_SSP_pkg;