DBA Data[Home] [Help]

APPS.PN_VAR_TRUEUP_PKG dependencies on PN_VAR_RENT_CALC_PKG

Line 194: IF p_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP

190: /* Note:
191: Handling to take the rent for first year in account
192: while calculating the true up for second year in CYNP
193: and CYP */
194: IF p_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP
195: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) THEN
196:
197:
198: /* Fetch the details for the first partial year */

Line 195: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) THEN

191: Handling to take the rent for first year in account
192: while calculating the true up for second year in CYNP
193: and CYP */
194: IF p_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP
195: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) THEN
196:
197:
198: /* Fetch the details for the first partial year */
199: FOR first_period_rec IN first_period_c(p_vr_id => p_var_rent_id) LOOP

Line 369: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);

365: l_org_id := vr_rec.org_id;
366: l_vr_termination_date := vr_rec.termination_date;
367: END LOOP;
368:
369: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);
370: pnp_debug_pkg.log('l_precision:'||l_precision);
371: FOR i IN 1..G_ABATED_RENT.COUNT LOOP
372: IF G_ABATED_RENT(i).period_id = p_period_id THEN
373: l_total_period_rent := G_ABATED_RENT(i).AMOUNT;

Line 590: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED;

586: DELETE
587: pn_payment_terms_all
588: WHERE
589: var_rent_inv_id = l_var_rent_inv_id AND
590: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED;
591:
592: /* update the invoice */
593: UPDATE
594: pn_var_rent_inv_all

Line 806: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ALLO

802: ,end_date
803: ,abatement_id
804: FROM PN_VAR_ABAT_DEFAULTS_ALL
805: WHERE var_rent_id = ip_var_rent_id
806: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ALLO
807: ORDER BY start_date;
808:
809: -- Get the details of exported status
810: CURSOR is_act_or_rec_exp_c(ip_var_rent_inv_id NUMBER) IS

Line 812: pn_var_rent_calc_pkg.G_INV_ON_ACTUAL, actual_exp_code,

808:
809: -- Get the details of exported status
810: CURSOR is_act_or_rec_exp_c(ip_var_rent_inv_id NUMBER) IS
811: SELECT DECODE(invoice_on,
812: pn_var_rent_calc_pkg.G_INV_ON_ACTUAL, actual_exp_code,
813: pn_var_rent_calc_pkg.G_INV_ON_FORECASTED, variance_exp_code) AS
814: exp_code,
815: inv.actual_invoiced_amount
816: FROM pn_var_rents_all vr,

Line 813: pn_var_rent_calc_pkg.G_INV_ON_FORECASTED, variance_exp_code) AS

809: -- Get the details of exported status
810: CURSOR is_act_or_rec_exp_c(ip_var_rent_inv_id NUMBER) IS
811: SELECT DECODE(invoice_on,
812: pn_var_rent_calc_pkg.G_INV_ON_ACTUAL, actual_exp_code,
813: pn_var_rent_calc_pkg.G_INV_ON_FORECASTED, variance_exp_code) AS
814: exp_code,
815: inv.actual_invoiced_amount
816: FROM pn_var_rents_all vr,
817: pn_var_rent_inv_all inv

Line 881: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);

877: FETCH rolling_allow_c BULK COLLECT INTO l_allow_tu_t;
878: CLOSE rolling_allow_c;
879:
880:
881: l_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);
882:
883: FOR inv_rec IN inv_c(p_var_rent_id, p_period_id, l_vr_termination_date) LOOP
884:
885: --If this is a non cummulative apply_defered_neg_rent

Line 895: IF (l_abat_order = pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN

891: G_UNABATED_RENT(G_UNABATED_RENT.COUNT+1).period_id := p_period_id;
892: G_UNABATED_RENT(G_UNABATED_RENT.COUNT).amount := l_abated_rent;
893: END IF;
894:
895: IF (l_abat_order = pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
896: pnp_debug_pkg.log('call pnp_debug_pkg.log');
897: PN_VAR_TRUEUP_PKG.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_allow_t, l_allow_tu_t, l_abated_rent);
898: pnp_debug_pkg.log('complete');
899: END IF;--Apply allowance.

Line 912: IF(l_abat_order <> pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN

908: PN_VAR_TRUEUP_PKG.apply_abat(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_abated_rent);
909: pnp_debug_pkg.log('complete');
910:
911:
912: IF(l_abat_order <> pn_var_rent_calc_pkg.G_ALLOWANCE_FIRST) THEN
913: pnp_debug_pkg.log('call pnp_debug_pkg.log');
914: PN_VAR_TRUEUP_PKG.apply_allow(p_var_rent_id, p_period_id, inv_rec.var_rent_inv_id, l_allow_t, l_allow_tu_t, l_abated_rent);
915: pnp_debug_pkg.log('complete');
916: END IF;--Apply allowance

Line 945: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND

941: DELETE
942: pn_payment_terms_all
943: WHERE
944: var_rent_inv_id = inv_rec.var_rent_inv_id AND
945: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
946: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
947:
948: -- Update the current invoice
949: pnp_debug_pkg.log('Abatements - updating');

Line 946: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;

942: pn_payment_terms_all
943: WHERE
944: var_rent_inv_id = inv_rec.var_rent_inv_id AND
945: status <> pn_var_rent_calc_pkg.G_TERM_STATUS_APPROVED AND
946: var_rent_type = pn_var_rent_calc_pkg.G_INV_ON_ACTUAL;
947:
948: -- Update the current invoice
949: pnp_debug_pkg.log('Abatements - updating');
950: UPDATE

Line 1209: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

1205: WHERE var_rent_id = p_var_rent_id
1206: AND period_id = (SELECT max(period_id)
1207: FROM pn_var_periods_all
1208: WHERE var_rent_id = p_var_rent_id
1209: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
1210: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
1211:
1212: CURSOR csr_neg_avail (ip_var_rent_id NUMBER,
1213: ip_invoice_date DATE) IS

Line 1210: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);

1206: AND period_id = (SELECT max(period_id)
1207: FROM pn_var_periods_all
1208: WHERE var_rent_id = p_var_rent_id
1209: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
1210: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
1211:
1212: CURSOR csr_neg_avail (ip_var_rent_id NUMBER,
1213: ip_invoice_date DATE) IS
1214: SELECT ABS(NVL(SUM(def_neg_rent),0)) negative_available

Line 1289: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER) THEN

1285: END LOOP;
1286:
1287: l_negative_remaining := ABS(l_negative_available - l_negative_applied);
1288: pnp_debug_pkg.log('l_negative_remaining:'||l_negative_remaining);
1289: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER) THEN
1290: -- Deffered negative rent can be applied only when consT-rent >0
1291: IF (l_last_invoice_dt <> inv_rec.invoice_date AND inv_rec.constr_actual_rent > 0) THEN
1292: --This invoice is not the last invoice
1293: l_abated_rent := GREATEST(0, inv_rec.constr_actual_rent - l_negative_remaining);

Line 1369: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

1365: WHERE var_rent_id = p_var_rent_id
1366: AND period_id = (SELECT max(period_id)
1367: FROM pn_var_periods_all
1368: WHERE var_rent_id = p_var_rent_id
1369: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
1370: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
1371:
1372:
1373: CURSOR csr_get_abt(ip_var_rent_id NUMBER)

Line 1370: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);

1366: AND period_id = (SELECT max(period_id)
1367: FROM pn_var_periods_all
1368: WHERE var_rent_id = p_var_rent_id
1369: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
1370: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS);
1371:
1372:
1373: CURSOR csr_get_abt(ip_var_rent_id NUMBER)
1374: IS

Line 1401: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN

1397: pnp_debug_pkg.log('l_last_invoice_dt:'||l_last_invoice_dt);
1398: END LOOP;
1399: -- Loop for all invoices.
1400: FOR inv_rec IN invoices_c(p_var_rent_id, p_period_id, p_inv_id) LOOP
1401: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN
1402: --We are ignoring negative rents. Set abated rent =0, if <0.
1403: l_abated_rent := GREATEST(0, x_abated_rent);
1404:
1405: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN

Line 1405: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN

1401: IF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_IGNORE) THEN
1402: --We are ignoring negative rents. Set abated rent =0, if <0.
1403: l_abated_rent := GREATEST(0, x_abated_rent);
1404:
1405: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN
1406: l_abated_rent := x_abated_rent;
1407: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
1408: AND inv_rec.invoice_date <> l_last_invoice_dt) THEN
1409: l_abated_rent := GREATEST(0,x_abated_rent);

Line 1407: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER

1403: l_abated_rent := GREATEST(0, x_abated_rent);
1404:
1405: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_CREDIT) THEN
1406: l_abated_rent := x_abated_rent;
1407: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
1408: AND inv_rec.invoice_date <> l_last_invoice_dt) THEN
1409: l_abated_rent := GREATEST(0,x_abated_rent);
1410: l_neg_rent_def := ABS(x_abated_rent - l_abated_rent);
1411: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER

Line 1411: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER

1407: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
1408: AND inv_rec.invoice_date <> l_last_invoice_dt) THEN
1409: l_abated_rent := GREATEST(0,x_abated_rent);
1410: l_neg_rent_def := ABS(x_abated_rent - l_abated_rent);
1411: ELSIF (l_negative_rent_flag = pn_var_rent_calc_pkg.G_NEG_RENT_DEFER
1412: AND inv_rec.invoice_date = l_last_invoice_dt) THEN
1413: l_abated_rent := x_abated_rent;
1414: END IF;
1415: pnp_debug_pkg.log('l_abated_rent:'||l_abated_rent);

Line 1507: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ABAT;

1503: FROM PN_VAR_ABAT_DEFAULTS_ALL
1504: WHERE var_rent_id = ip_var_rent_id
1505: AND start_date <= ip_inv_end_date
1506: AND NVL(end_date, ip_inv_end_date) >= ip_inv_start_date
1507: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ABAT;
1508: -- Get the details of
1509: CURSOR EXCESS_ABAT_C(ip_var_rent_id NUMBER) IS
1510: SELECT EXCESS_ABAT_CODE
1511: FROM PN_VAR_RENTS_ALL ABAT

Line 1694: IF (p_period_id = l_ly_max_prd_id AND NOT(p_inv_id = l_ly_max_inv_id) AND l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FLY, pn_var_rent_calc_pkg.G_PRORUL_LY) ) THEN

1690:
1691:
1692: --For LY/FLY, if last period and not last invoice,
1693: -- Invoices are dummy. Return immdiately.
1694: IF (p_period_id = l_ly_max_prd_id AND NOT(p_inv_id = l_ly_max_inv_id) AND l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FLY, pn_var_rent_calc_pkg.G_PRORUL_LY) ) THEN
1695: pnp_debug_pkg.log('Ly invoice, not last - return immedietly');
1696: RETURN;
1697: END IF;
1698: FOR abat_rec IN EXCESS_ABAT_C(p_var_rent_id) LOOP

Line 1738: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)

1734:
1735: pnp_debug_pkg.log('l_inv_end_date:'||l_inv_end_date);
1736:
1737: -- The special handling is if this is FL/LY special invoice and non true up.
1738: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
1739: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
1740: --
1741: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
1742: l_inv_start_date := inv_rec.start_date;

Line 1739: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN

1735: pnp_debug_pkg.log('l_inv_end_date:'||l_inv_end_date);
1736:
1737: -- The special handling is if this is FL/LY special invoice and non true up.
1738: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
1739: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
1740: --
1741: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
1742: l_inv_start_date := inv_rec.start_date;
1743: l_inv_end_date := inv_rec.end_date;

Line 1814: IF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_IGNORE

1810: l_total_abat := l_abat_override;
1811: END IF;
1812:
1813: pnp_debug_pkg.log('l_total_abat:'||l_total_abat);
1814: IF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_IGNORE
1815: AND x_abated_rent>0 ) THEN
1816: l_abated_rent := GREATEST(0, x_abated_rent - l_total_abat);
1817: ELSIF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_NEG_RENT ) THEN
1818: l_abated_rent := x_abated_rent - l_total_abat;

Line 1817: ELSIF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_NEG_RENT ) THEN

1813: pnp_debug_pkg.log('l_total_abat:'||l_total_abat);
1814: IF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_IGNORE
1815: AND x_abated_rent>0 ) THEN
1816: l_abated_rent := GREATEST(0, x_abated_rent - l_total_abat);
1817: ELSIF (l_excess_abat = pn_var_rent_calc_pkg.G_EXC_ABAT_NEG_RENT ) THEN
1818: l_abated_rent := x_abated_rent - l_total_abat;
1819: END IF;
1820: l_total_abat := l_unabated_rent - l_abated_rent;
1821: pnp_debug_pkg.log('total_abat_applied:'||l_total_abat);

Line 1912: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ALLO

1908: FROM PN_VAR_ABAT_DEFAULTS_ALL
1909: WHERE var_rent_id = ip_var_rent_id
1910: AND start_date <= ip_inv_start_date
1911: AND NVL(end_date, ip_inv_end_date) >= ip_inv_end_date
1912: AND type_code = pn_var_rent_calc_pkg.G_ABAT_TYPE_CODE_ALLO
1913: ORDER BY start_date;
1914: -- Get the details of inv_start, end_date
1915: CURSOR invoice_dates_c(ip_var_rent_id NUMBER,
1916: ip_invoice_date DATE

Line 2021: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)

2017: END LOOP;
2018: --Special FY/LY/FLY handling
2019: --If this invoice is FY/FLY and the first year
2020: --Or proration is LY/FLY and the last invoice
2021: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
2022: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
2023: --
2024: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
2025: l_inv_start_date := inv_rec.start_date;

Line 2022: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN

2018: --Special FY/LY/FLY handling
2019: --If this invoice is FY/FLY and the first year
2020: --Or proration is LY/FLY and the last invoice
2021: IF ((l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_FY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_first_inv_id)
2022: OR (l_proration_type IN (pn_var_rent_calc_pkg.G_PRORUL_LY, pn_var_rent_calc_pkg.G_PRORUL_FLY) AND p_inv_id = l_last_inv_id) ) THEN
2023: --
2024: FOR inv_rec IN invoice_dates_fyly_c(p_inv_id) LOOP
2025: l_inv_start_date := inv_rec.start_date;
2026: l_inv_end_date := inv_rec.end_date;

Line 2250: pn_var_rent_calc_pkg.populate_abat(p_var_rent_id, p_period_id, p_inv_id);

2246:
2247:
2248: ELSE
2249: --Populate for non cumulative. Just call the normal populate_abat
2250: pn_var_rent_calc_pkg.populate_abat(p_var_rent_id, p_period_id, p_inv_id);
2251:
2252: END IF;
2253: END LOOP;
2254:

Line 2345: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

2341: pn_var_periods_all
2342: WHERE
2343: var_rent_id = p_vr_id AND
2344: end_date <= p_prd_date
2345: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
2346: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;
2347:
2348: -- Get the details of periods to calculate abatements for.
2349: -- We need to calculate abatements for all periods.

Line 2346: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;

2342: WHERE
2343: var_rent_id = p_vr_id AND
2344: end_date <= p_prd_date
2345: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
2346: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;
2347:
2348: -- Get the details of periods to calculate abatements for.
2349: -- We need to calculate abatements for all periods.
2350: -- The idea is that True up calc runs from start to a specific period

Line 2358: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

2354: ) IS
2355: SELECT period_id
2356: FROM pn_var_periods_all
2357: WHERE var_rent_id = ip_var_rent_id
2358: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
2359: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;
2360:
2361:
2362:

Line 2359: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;

2355: SELECT period_id
2356: FROM pn_var_periods_all
2357: WHERE var_rent_id = ip_var_rent_id
2358: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)
2359: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;
2360:
2361:
2362:
2363: l_prd_counter NUMBER;

Line 2483: g_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);

2479: l_org_id := vr_rec.org_id;
2480:
2481: END LOOP;
2482:
2483: g_precision := nvl(pn_var_rent_calc_pkg.get_currency_precision(l_org_id),4);
2484:
2485: l_prd_counter := 0;
2486:
2487: /* loop for all periods ending before p_prd_date */

Line 2511: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY

2507: G_TOT_ABATEMENT.DELETE;
2508:
2509: /* check if we need to calculate TRUE UP */
2510: IF prd_rec.start_date = l_vr_start_date AND
2511: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
2512: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
2513: ,pn_var_rent_calc_pkg.G_PRORUL_CYP
2514: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) AND
2515: prd_rec.partial_period = 'Y'

Line 2512: ,pn_var_rent_calc_pkg.G_PRORUL_FLY

2508:
2509: /* check if we need to calculate TRUE UP */
2510: IF prd_rec.start_date = l_vr_start_date AND
2511: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
2512: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
2513: ,pn_var_rent_calc_pkg.G_PRORUL_CYP
2514: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) AND
2515: prd_rec.partial_period = 'Y'
2516: THEN

Line 2513: ,pn_var_rent_calc_pkg.G_PRORUL_CYP

2509: /* check if we need to calculate TRUE UP */
2510: IF prd_rec.start_date = l_vr_start_date AND
2511: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
2512: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
2513: ,pn_var_rent_calc_pkg.G_PRORUL_CYP
2514: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) AND
2515: prd_rec.partial_period = 'Y'
2516: THEN
2517:

Line 2514: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) AND

2510: IF prd_rec.start_date = l_vr_start_date AND
2511: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY
2512: ,pn_var_rent_calc_pkg.G_PRORUL_FLY
2513: ,pn_var_rent_calc_pkg.G_PRORUL_CYP
2514: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) AND
2515: prd_rec.partial_period = 'Y'
2516: THEN
2517:
2518: /* no true up for the first partial in case of

Line 2524: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY

2520: */
2521: NULL;
2522:
2523: ELSIF prd_rec.end_date = l_vr_end_date AND
2524: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
2525: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2526: prd_rec.partial_period = 'Y'
2527: THEN
2528:

Line 2525: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

2521: NULL;
2522:
2523: ELSIF prd_rec.end_date = l_vr_end_date AND
2524: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY
2525: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2526: prd_rec.partial_period = 'Y'
2527: THEN
2528:
2529: /* no true up for the last partial in case of

Line 2625: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED

2621: /* net volume trips any bkpt? - YES */
2622: ELSE
2623:
2624: /* get rent based on breakpoint type */
2625: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED
2626: THEN
2627:
2628: l_part_trueup_rent := 0;
2629:

Line 2669: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT

2665: END IF; /* net vol > bkpt start */
2666:
2667: END LOOP; /* loop for all bkpt details */
2668:
2669: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
2670: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
2671: THEN
2672:
2673: /* loop for all bkpt details */

Line 2670: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)

2666:
2667: END LOOP; /* loop for all bkpt details */
2668:
2669: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT
2670: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)
2671: THEN
2672:
2673: /* loop for all bkpt details */
2674: FOR i IN trueup_bkpt_t.FIRST..trueup_bkpt_t.LAST LOOP

Line 2687: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN

2683: IF l_net_trueup_volume >= l_bkpt_start AND
2684: l_net_trueup_volume <= NVL(l_bkpt_end, l_net_trueup_volume)
2685: THEN
2686:
2687: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN
2688:
2689: l_part_trueup_rent
2690: := l_net_trueup_volume * trueup_bkpt_t(i).bkpt_rate;
2691:

Line 2692: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN

2688:
2689: l_part_trueup_rent
2690: := l_net_trueup_volume * trueup_bkpt_t(i).bkpt_rate;
2691:
2692: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN
2693:
2694: l_part_trueup_rent
2695: := (l_net_trueup_volume - l_bkpt_start)
2696: * trueup_bkpt_t(i).bkpt_rate;

Line 2750: pn_var_rent_calc_pkg.reset_abatements(p_var_rent_id);

2746:
2747: END IF; /* check if we need to calculate TRUE UP */
2748:
2749: --Rest the abatements, and reapply them.
2750: pn_var_rent_calc_pkg.reset_abatements(p_var_rent_id);
2751:
2752: END LOOP;
2753:
2754: FOR period_rec IN periods_abat_c(p_var_rent_id) LOOP

Line 2764: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP

2760: FOR prd_rec IN periods_c( p_vr_id => p_var_rent_id
2761: ,p_date => p_prd_date) LOOP
2762:
2763: IF NOT ((prd_rec.start_date = l_vr_start_date AND
2764: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP
2765: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP
2766: ,pn_var_rent_calc_pkg.G_PRORUL_FY
2767: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2768: prd_rec.partial_period = 'Y')

Line 2765: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP

2761: ,p_date => p_prd_date) LOOP
2762:
2763: IF NOT ((prd_rec.start_date = l_vr_start_date AND
2764: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP
2765: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP
2766: ,pn_var_rent_calc_pkg.G_PRORUL_FY
2767: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2768: prd_rec.partial_period = 'Y')
2769: OR (prd_rec.end_date = l_vr_end_date AND

Line 2766: ,pn_var_rent_calc_pkg.G_PRORUL_FY

2762:
2763: IF NOT ((prd_rec.start_date = l_vr_start_date AND
2764: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP
2765: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP
2766: ,pn_var_rent_calc_pkg.G_PRORUL_FY
2767: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2768: prd_rec.partial_period = 'Y')
2769: OR (prd_rec.end_date = l_vr_end_date AND
2770: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_LY

Line 2767: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

2763: IF NOT ((prd_rec.start_date = l_vr_start_date AND
2764: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP
2765: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP
2766: ,pn_var_rent_calc_pkg.G_PRORUL_FY
2767: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2768: prd_rec.partial_period = 'Y')
2769: OR (prd_rec.end_date = l_vr_end_date AND
2770: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_LY
2771: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

Line 2770: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_LY

2766: ,pn_var_rent_calc_pkg.G_PRORUL_FY
2767: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2768: prd_rec.partial_period = 'Y')
2769: OR (prd_rec.end_date = l_vr_end_date AND
2770: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_LY
2771: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2772: prd_rec.partial_period = 'Y'))
2773: THEN
2774: pn_var_trueup_pkg.insert_invoice_trueup

Line 2771: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

2767: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2768: prd_rec.partial_period = 'Y')
2769: OR (prd_rec.end_date = l_vr_end_date AND
2770: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_LY
2771: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND
2772: prd_rec.partial_period = 'Y'))
2773: THEN
2774: pn_var_trueup_pkg.insert_invoice_trueup
2775: ( p_var_rent_id => p_var_rent_id

Line 2835: vr.cumulative_vol = pn_var_rent_calc_pkg.G_CALC_TRUE_UP AND

2831: FROM
2832: pn_leases_all lease
2833: ,pn_var_rents_all vr
2834: WHERE
2835: vr.cumulative_vol = pn_var_rent_calc_pkg.G_CALC_TRUE_UP AND
2836: vr.lease_id = lease.lease_id AND
2837: lease.lease_num BETWEEN l_lease_num_low AND l_lease_num_high AND
2838: vr.rent_num BETWEEN l_vr_num_low AND l_vr_num_high AND
2839: vr.location_id IN