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 2344: AND NVL(status, pn_var_rent_calc_pkg.G_PERIOD_ACTIVE_STATUS)

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

Line 2345: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;

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

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

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

Line 2358: <> pn_var_rent_calc_pkg.G_PERIOD_REVERSED_STATUS;

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

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

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

Line 2509: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_FY

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

Line 2510: ,pn_var_rent_calc_pkg.G_PRORUL_FLY

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

Line 2511: ,pn_var_rent_calc_pkg.G_PRORUL_CYP

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

Line 2512: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP) AND

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

Line 2522: l_proration_rule IN ( pn_var_rent_calc_pkg.G_PRORUL_LY

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

Line 2523: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

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

Line 2623: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_STRATIFIED

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

Line 2667: ELSIF l_bkpt_type IN ( pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT

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

Line 2668: ,pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING)

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

Line 2685: IF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_SLIDING THEN

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

Line 2690: ELSIF l_bkpt_type = pn_var_rent_calc_pkg.G_BKPT_TYP_FLAT THEN

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

Line 2748: pn_var_rent_calc_pkg.reset_abatements(p_var_rent_id);

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

Line 2762: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_CYP

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

Line 2763: ,pn_var_rent_calc_pkg.G_PRORUL_CYNP

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

Line 2764: ,pn_var_rent_calc_pkg.G_PRORUL_FY

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

Line 2765: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

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

Line 2768: l_proration_rule IN (pn_var_rent_calc_pkg.G_PRORUL_LY

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

Line 2769: ,pn_var_rent_calc_pkg.G_PRORUL_FLY) AND

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

Line 2833: vr.cumulative_vol = pn_var_rent_calc_pkg.G_CALC_TRUE_UP AND

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