eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PAY_AU_TERMINATIONS dependencies on PAY_AU_TERMINATIONS

Line 1: PACKAGE BODY pay_au_terminations AS

1: PACKAGE BODY pay_au_terminations AS
2: /* $Header: pyauterm.pkb 120.30.12020000.10 2013/02/21 06:31:45 skshin ship $
3: **
4: ** Copyright (c) 1999 Oracle Corporation
5: ** All Rights Reserved

Line 88: g_package constant varchar2(60) := 'pay_au_terminations.';

84: ** 21-Feb-2013 skshin 115.68 Bug# 16319860 Modifed calculate_marginal_tax to ignore the cents from lv_average_term_pay_period
85: */
86:
87: g_debug constant boolean := hr_utility.debug_enabled;
88: g_package constant varchar2(60) := 'pay_au_terminations.';
89: --
90: -------------------------------------------------------------------------------------------------
91: --
92: -- FUNCTION get_long_service_leave

Line 113: -- pay_au_terminations

109: -- p_post_aug_1978 - net leave amount from 16-AUG-1978 to 17-AUG-1993
110: -- p_post_aug_1993 - net leave amount from 18-AUG-1993 until effective_date
111: --
112: -- Uses : per_accrual_calc_functions
113: -- pay_au_terminations
114: -- hr_utility
115: --
116: ------------------------------------------------------------------------------------------------
117: function get_long_service_leave

Line 179: l_plan_id := pay_au_terminations.get_accrual_plan_by_category

175: END IF;
176: --
177: -- Get the accrual plan for long service leave
178: --
179: l_plan_id := pay_au_terminations.get_accrual_plan_by_category
180: (p_assignment_id => p_assignment_id
181: ,p_effective_date => p_effective_date
182: ,p_plan_category => l_long_service_leave
183: );

Line 3485: hr_utility.set_location('previous g_lump_sum_d.assignment_id '||nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0), 21);

3481: hr_utility.set_location('l_year_end_paid '||l_year_end_paid, 20);
3482: END IF;
3483:
3484: IF g_debug THEN
3485: hr_utility.set_location('previous g_lump_sum_d.assignment_id '||nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0), 21);
3486: hr_utility.set_location('previous g_lump_sum_d.value '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 21);
3487: END IF;
3488:
3489: IF l_year_end_atd = l_year_end_paid THEN -- paid in the termination year

Line 3486: hr_utility.set_location('previous g_lump_sum_d.value '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 21);

3482: END IF;
3483:
3484: IF g_debug THEN
3485: hr_utility.set_location('previous g_lump_sum_d.assignment_id '||nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0), 21);
3486: hr_utility.set_location('previous g_lump_sum_d.value '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 21);
3487: END IF;
3488:
3489: IF l_year_end_atd = l_year_end_paid THEN -- paid in the termination year
3490:

Line 3493: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN

3489: IF l_year_end_atd = l_year_end_paid THEN -- paid in the termination year
3490:
3491: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3492:
3493: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3494: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 30); END IF;
3495: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3496: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3497:

Line 3494: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 30); END IF;

3490:
3491: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3492:
3493: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3494: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 30); END IF;
3495: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3496: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3497:
3498: ELSE

Line 3495: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);

3491: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3492:
3493: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3494: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 30); END IF;
3495: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3496: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3497:
3498: ELSE
3499: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 30); END IF;

Line 3496: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

3492:
3493: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3494: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 30); END IF;
3495: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3496: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3497:
3498: ELSE
3499: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 30); END IF;
3500: l_max := l_max_lump_d;

Line 3501: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);

3497:
3498: ELSE
3499: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 30); END IF;
3500: l_max := l_max_lump_d;
3501: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);
3502:
3503: END IF;
3504:
3505: ELSE -- subsequent redundancy payment

Line 3507: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN

3503: END IF;
3504:
3505: ELSE -- subsequent redundancy payment
3506:
3507: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3508: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 31); END IF;
3509: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3510: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3511: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

Line 3508: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 31); END IF;

3504:
3505: ELSE -- subsequent redundancy payment
3506:
3507: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3508: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 31); END IF;
3509: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3510: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3511: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3512: ELSE

Line 3509: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN

3505: ELSE -- subsequent redundancy payment
3506:
3507: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3508: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 31); END IF;
3509: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3510: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3511: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3512: ELSE
3513: l_max := 0;

Line 3510: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);

3506:
3507: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3508: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 31); END IF;
3509: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3510: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3511: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3512: ELSE
3513: l_max := 0;
3514: END IF;

Line 3511: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

3507: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3508: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 31); END IF;
3509: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3510: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3511: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3512: ELSE
3513: l_max := 0;
3514: END IF;
3515: ELSE

Line 3519: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);

3515: ELSE
3516: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 31); END IF;
3517: IF p_redundancy_pay_ytd < l_max_lump_d THEN
3518: l_max := l_max_lump_d - p_redundancy_pay_ytd ;
3519: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);
3520: ELSE
3521: l_max := 0;
3522: END IF;
3523: END IF;

Line 3560: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN

3556: IF l_tot_prev_etp = 0 THEN -- the 1st redundancy payment after termination
3557:
3558: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3559:
3560: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3561: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 60); END IF;
3562: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3563: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3564:

Line 3561: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 60); END IF;

3557:
3558: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3559:
3560: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3561: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 60); END IF;
3562: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3563: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3564:
3565: ELSE

Line 3562: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);

3558: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3559:
3560: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3561: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 60); END IF;
3562: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3563: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3564:
3565: ELSE
3566: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 60); END IF;

Line 3563: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

3559:
3560: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3561: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 60); END IF;
3562: l_max := l_max_lump_d - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3563: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3564:
3565: ELSE
3566: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 60); END IF;
3567: l_max := l_max_lump_d;

Line 3568: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);

3564:
3565: ELSE
3566: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 60); END IF;
3567: l_max := l_max_lump_d;
3568: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);
3569:
3570: END IF;
3571:
3572: ELSE -- subsequent redundancy payment

Line 3574: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN

3570: END IF;
3571:
3572: ELSE -- subsequent redundancy payment
3573:
3574: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3575: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 61); END IF;
3576: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3577: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3578: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

Line 3575: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 61); END IF;

3571:
3572: ELSE -- subsequent redundancy payment
3573:
3574: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3575: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 61); END IF;
3576: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3577: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3578: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3579: ELSE

Line 3576: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN

3572: ELSE -- subsequent redundancy payment
3573:
3574: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3575: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 61); END IF;
3576: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3577: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3578: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3579: ELSE
3580: l_max := 0;

Line 3577: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);

3573:
3574: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3575: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 61); END IF;
3576: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3577: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3578: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3579: ELSE
3580: l_max := 0;
3581: END IF;

Line 3578: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

3574: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3575: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 61); END IF;
3576: IF p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3577: l_max := l_max_lump_d - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3578: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3579: ELSE
3580: l_max := 0;
3581: END IF;
3582: ELSE

Line 3586: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);

3582: ELSE
3583: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 61); END IF;
3584: IF p_redundancy_pay_ytd < l_max_lump_d THEN
3585: l_max := l_max_lump_d - p_redundancy_pay_ytd ;
3586: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);
3587: ELSE
3588: l_max := 0;
3589: END IF;
3590: END IF;

Line 3598: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN

3594: ELSE -- l_tot_prev_etp <> 0
3595:
3596: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3597:
3598: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3599: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 62); END IF;
3600: IF l_tot_prev_etp + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3601: l_max := l_max_lump_d - l_tot_prev_etp - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3602: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

Line 3599: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 62); END IF;

3595:
3596: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3597:
3598: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3599: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 62); END IF;
3600: IF l_tot_prev_etp + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3601: l_max := l_max_lump_d - l_tot_prev_etp - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3602: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3603: ELSE

Line 3600: IF l_tot_prev_etp + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN

3596: IF p_redundancy_pay_ytd = 0 THEN -- 1st redundancy payment
3597:
3598: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3599: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 62); END IF;
3600: IF l_tot_prev_etp + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3601: l_max := l_max_lump_d - l_tot_prev_etp - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3602: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3603: ELSE
3604: l_max := 0;

Line 3601: l_max := l_max_lump_d - l_tot_prev_etp - nvl(pay_au_terminations.g_lump_sum_d.value,0);

3597:
3598: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3599: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 62); END IF;
3600: IF l_tot_prev_etp + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3601: l_max := l_max_lump_d - l_tot_prev_etp - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3602: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3603: ELSE
3604: l_max := 0;
3605: END IF;

Line 3602: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

3598: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3599: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 62); END IF;
3600: IF l_tot_prev_etp + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3601: l_max := l_max_lump_d - l_tot_prev_etp - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3602: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3603: ELSE
3604: l_max := 0;
3605: END IF;
3606:

Line 3612: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);

3608:
3609: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 62); END IF;
3610: IF l_tot_prev_etp < l_max_lump_d THEN
3611: l_max := l_max_lump_d - l_tot_prev_etp;
3612: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);
3613: ELSE
3614: l_max := 0;
3615: END IF;
3616:

Line 3621: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN

3617: END IF;
3618:
3619: ELSE -- subsequent redundancy payment
3620:
3621: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3622: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 63); END IF;
3623: IF l_tot_prev_etp + p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3624: l_max := l_max_lump_d - l_tot_prev_etp - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3625: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

Line 3622: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 63); END IF;

3618:
3619: ELSE -- subsequent redundancy payment
3620:
3621: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3622: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 63); END IF;
3623: IF l_tot_prev_etp + p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3624: l_max := l_max_lump_d - l_tot_prev_etp - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3625: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3626: ELSE

Line 3623: IF l_tot_prev_etp + p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN

3619: ELSE -- subsequent redundancy payment
3620:
3621: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3622: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 63); END IF;
3623: IF l_tot_prev_etp + p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3624: l_max := l_max_lump_d - l_tot_prev_etp - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3625: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3626: ELSE
3627: l_max := 0;

Line 3624: l_max := l_max_lump_d - l_tot_prev_etp - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);

3620:
3621: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3622: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 63); END IF;
3623: IF l_tot_prev_etp + p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3624: l_max := l_max_lump_d - l_tot_prev_etp - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3625: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3626: ELSE
3627: l_max := 0;
3628: END IF;

Line 3625: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);

3621: IF p_assignment_id = nvl(pay_au_terminations.g_lump_sum_d.assignment_id,0) THEN
3622: IF g_debug THEN hr_utility.set_location('retrieving g_lumpsum_d '||nvl(pay_au_terminations.g_lump_sum_d.value,0), 63); END IF;
3623: IF l_tot_prev_etp + p_redundancy_pay_ytd + nvl(pay_au_terminations.g_lump_sum_d.value,0) < l_max_lump_d THEN
3624: l_max := l_max_lump_d - l_tot_prev_etp - p_redundancy_pay_ytd - nvl(pay_au_terminations.g_lump_sum_d.value,0);
3625: pay_au_terminations.g_lump_sum_d.value := nvl(pay_au_terminations.g_lump_sum_d.value,0) + least(l_max, p_redundancy_pay);
3626: ELSE
3627: l_max := 0;
3628: END IF;
3629:

Line 3635: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);

3631:
3632: IF g_debug THEN hr_utility.set_location('not retrieving g_lumpsum_d ', 63); END IF;
3633: IF l_tot_prev_etp + p_redundancy_pay_ytd < l_max_lump_d THEN
3634: l_max := l_max_lump_d - l_tot_prev_etp - p_redundancy_pay_ytd;
3635: pay_au_terminations.g_lump_sum_d.value := least(l_max, p_redundancy_pay);
3636: ELSE
3637: l_max := 0;
3638: END IF;
3639:

Line 3649: pay_au_terminations.g_lump_sum_d.assignment_id := p_assignment_id;

3645:
3646: END IF;
3647:
3648: l_lump_sum_d := least(l_max, p_redundancy_pay);
3649: pay_au_terminations.g_lump_sum_d.assignment_id := p_assignment_id;
3650:
3651: IF g_debug THEN
3652: hr_utility.set_location('l_max '||l_max, 90);
3653: hr_utility.set_location('l_lump_sum_d '||l_lump_sum_d, 90);

Line 3654: hr_utility.set_location('setting g_lumpsum_d assignment_id : '||pay_au_terminations.g_lump_sum_d.assignment_id||', value : '|| pay_au_terminations.g_lump_sum_d.value, 90);

3650:
3651: IF g_debug THEN
3652: hr_utility.set_location('l_max '||l_max, 90);
3653: hr_utility.set_location('l_lump_sum_d '||l_lump_sum_d, 90);
3654: hr_utility.set_location('setting g_lumpsum_d assignment_id : '||pay_au_terminations.g_lump_sum_d.assignment_id||', value : '|| pay_au_terminations.g_lump_sum_d.value, 90);
3655: hr_utility.set_location('Leaving '||l_procedure, 90);
3656: END IF;
3657:
3658: return l_lump_sum_d;

Line 4502: end pay_au_terminations;

4498:
4499: END calculate_etp_tax_2012;
4500:
4501:
4502: end pay_au_terminations;