544: ,pilp.current_index_line_value
545: ,pilp.previous_index_line_id
546: ,pilp.previous_index_line_value
547: ,pilp.unconstraint_rent_due
548: FROM pn_index_lease_periods_all pilp
549: WHERE pilp.index_lease_id = ip_index_lease_id
550: AND pilp.index_period_id = ip_index_period_id
551: ORDER BY pilp.line_number;
552:
650: --
651:
652: SELECT pilp.index_period_id
653: INTO op_prev_index_lease_id
654: FROM pn_index_lease_periods_all pilp
655: WHERE pilp.index_lease_id = p_index_lease_id
656: AND pilp.assessment_date = (SELECT MAX (pilp.assessment_date)
657: FROM pn_index_lease_periods_all pilp
658: WHERE pilp.index_lease_id = p_index_lease_id
653: INTO op_prev_index_lease_id
654: FROM pn_index_lease_periods_all pilp
655: WHERE pilp.index_lease_id = p_index_lease_id
656: AND pilp.assessment_date = (SELECT MAX (pilp.assessment_date)
657: FROM pn_index_lease_periods_all pilp
658: WHERE pilp.index_lease_id = p_index_lease_id
659: /*
660: -- if p_assessment_date is null, this will return the
661: -- assessment date of the last index rent period.
703: ,'UNCONSTRAINT', unconstraint_rent_due
704: ,'CONSTRAINT', constraint_rent_due
705: )
706: INTO op_index_amount
707: FROM pn_index_lease_periods_all pilp
708: WHERE index_period_id = v_index_period_id;
709: END IF;
710: EXCEPTION
711: WHEN OTHERS THEN
733: --put_log ('..In derive_next_peroid_details');
734:
735: SELECT pilp.index_period_id,pilp.basis_start_date,pilp.basis_end_date
736: INTO op_next_index_period_id,op_basis_start_date,op_basis_end_date
737: FROM pn_index_lease_periods_all pilp
738: WHERE pilp.index_lease_id = p_index_lease_id
739: AND pilp.assessment_date = (SELECT MIN (pilp.assessment_date)
740: FROM pn_index_lease_periods_all pilp
741: WHERE pilp.index_lease_id = p_index_lease_id
736: INTO op_next_index_period_id,op_basis_start_date,op_basis_end_date
737: FROM pn_index_lease_periods_all pilp
738: WHERE pilp.index_lease_id = p_index_lease_id
739: AND pilp.assessment_date = (SELECT MIN (pilp.assessment_date)
740: FROM pn_index_lease_periods_all pilp
741: WHERE pilp.index_lease_id = p_index_lease_id
742: AND pilp.assessment_date > p_assessment_date
743: );
744:
827: ,c_spread_frequency_one_time, 0
828: )
829: )
830: INTO p_prev_index_amount
831: FROM pn_payment_terms_all ppt, pn_index_lease_periods_all ppi
832: WHERE ppt.index_period_id = ppi.index_period_id
833: AND ppi.index_lease_id = p_index_lease_id
834: AND ppi.assessment_date < (SELECT assessment_date
835: FROM pn_index_lease_periods_all
831: FROM pn_payment_terms_all ppt, pn_index_lease_periods_all ppi
832: WHERE ppt.index_period_id = ppi.index_period_id
833: AND ppi.index_lease_id = p_index_lease_id
834: AND ppi.assessment_date < (SELECT assessment_date
835: FROM pn_index_lease_periods_all
836: WHERE index_period_id = p_index_period_id)
837: AND ppt.lease_id = p_lease_id;
838: EXCEPTION
839: WHEN OTHERS THEN
868: ,'CONSTRAINT', constraint_rent_due
869: )
870: )
871: INTO p_sum_prev_index_amts
872: FROM pn_index_lease_periods_all pilp
873: WHERE pilp.index_lease_id = p_index_lease_id
874: AND pilp.assessment_date < p_assessment_date;
875: EXCEPTION
876: WHEN OTHERS THEN
937: = DECODE(p_payment_type, c_increase_on_gross,
938: ppt.payment_term_type_code, p_payment_type)
939: AND NVL(ppt.index_period_id, -1) NOT IN
940: (SELECT index_period_id
941: FROM pn_index_lease_periods_all ppilx
942: WHERE ppilx.index_lease_id = p_index_lease_id)
943: AND NVL(ppt.status,'-1')
944: = DECODE(ppt.index_period_id, NULL,
945: NVL(ppt.status,'-1'), 'APPROVED')
977: = DECODE(p_payment_type, c_increase_on_gross,
978: ppt.payment_term_type_code, p_payment_type)
979: AND NVL(ppt.index_period_id, -1) NOT IN
980: (SELECT index_period_id
981: FROM pn_index_lease_periods_all ppilx
982: WHERE ppilx.index_lease_id = p_index_lease_id)
983: AND NVL(ppt.status,'-1')
984: = DECODE(ppt.index_period_id, NULL,
985: NVL(ppt.status,'-1'), 'APPROVED')
1501: ,nvl(pil.increase_on,c_increase_on_gross) "INCREASE_ON"
1502: ,pilp.index_period_id
1503: ,pilp.basis_start_date
1504: ,pilp.basis_end_date
1505: FROM pn_index_leases_all pil, pn_index_lease_periods_all pilp
1506: WHERE pil.index_lease_id = pilp.index_lease_id
1507: AND pil.index_lease_id = p_index_lease_id
1508: AND pilp.line_number = 1;
1509:
2100: v_lower_index_date_code NUMBER;
2101:
2102: CURSOR get_relationship IS
2103: SELECT relationship
2104: FROM pn_index_lease_periods_all
2105: WHERE assessment_date = p_assessment_date
2106: AND index_lease_id = p_index_lease_id;
2107:
2108: v_relationship_default VARCHAR2(30);
2259: -- Get the latest assessment date before the current assessment date
2260: --
2261: SELECT MAX (pilp.assessment_date)
2262: INTO v_prev_assessment_date
2263: FROM pn_index_lease_periods_all pilp
2264: WHERE pilp.index_lease_id = p_index_lease_id
2265: AND pilp.assessment_date < p_assessment_date;
2266: ELSE
2267: v_prev_assessment_date := p_prev_assessment_date;
2320: SELECT current_index_line_id
2321: ,current_index_line_value
2322: INTO v_previous_cpi_id
2323: ,v_previous_cpi_value
2324: FROM pn_index_lease_periods_all
2325: WHERE index_period_id = v_prev_period_id;
2326: ELSE
2327: -- Fix for bug # 1873888
2328: -- If no previous CPI is found, then use base index
2756: WHERE index_lease_id = p_index_lease_id;
2757:
2758: CURSOR assessment_date_cur(p_index_lease_id NUMBER) IS
2759: SELECT assessment_date, index_period_id
2760: FROM pn_index_lease_periods_all
2761: WHERE index_lease_id = p_index_lease_id
2762: ORDER BY assessment_date;
2763:
2764: BEGIN
3035: )
3036: )
3037: AND (( p_basis_type = c_basis_type_compound AND
3038: not exists( SELECT null
3039: FROM pn_index_lease_periods_all plpx
3040: WHERE plpx.index_period_id = ppt.index_period_id
3041: AND plpx.index_lease_id = p_index_lease_id))
3042: OR p_basis_type <> c_basis_type_compound)
3043: AND ppt.frequency_code <> c_spread_frequency_one_time
3103: )
3104: )
3105: AND ( ( p_basis_type = c_basis_type_compound AND
3106: not exists( SELECT null
3107: FROM pn_index_lease_periods_all plpx
3108: WHERE plpx.index_period_id = ppt.index_period_id
3109: AND plpx.index_lease_id = p_index_lease_id))
3110: OR p_basis_type <> c_basis_type_compound)
3111: AND ppt.end_date >= ip_basis_start_date AND ppt.start_date <= ip_basis_end_date
4433: NVL (v_prev_index_amt, 0);
4434: ELSE
4435: SELECT current_basis
4436: INTO v_normalize_basis_amount
4437: FROM pn_index_lease_periods_all pilp
4438: WHERE pilp.index_lease_id = p_index_lease_id
4439: AND line_number = 1;
4440: END IF;
4441:
5165: SELECT location_id
5166: FROM pn_index_leases_all
5167: WHERE index_lease_id =
5168: (SELECT index_lease_id
5169: FROM pn_index_lease_periods_all
5170: WHERE index_period_id = p_index_period_id);
5171:
5172: CURSOR org_id_cur IS
5173: SELECT org_id
5179: SELECT vr_nbp_flag
5180: FROM pn_index_leases_all
5181: WHERE index_lease_id =
5182: (SELECT index_lease_id
5183: FROM pn_index_lease_periods_all
5184: WHERE index_period_id = p_index_period_id);
5185:
5186: BEGIN
5187: put_log ('pn_index_amount_pkg.create_payment_term_record (+) :');
5449:
5450: BEGIN
5451: SELECT trunc(pilp.assessment_date)
5452: INTO v_assessment_date
5453: FROM pn_index_lease_periods_all pilp
5454: WHERE pilp.index_period_id = p_index_period_id;
5455:
5456: EXCEPTION
5457: WHEN TOO_MANY_ROWS THEN
6007: ,nvl (pil.proration_rule, 'NO_PRORATION') "PRORATION_RULE"
6008: ,pil.proration_period_start_date
6009: ,pil.assessment_interval
6010: FROM pn_index_leases_all pil,
6011: pn_index_lease_periods_all pilp,
6012: pn_leases_all pl
6013: WHERE pil.index_lease_id = pilp.index_lease_id
6014: AND pil.lease_id = pl.lease_id
6015: AND pilp.index_period_id = p_index_lease_period_id;
6567: ,pilp.index_period_id
6568: ,pil.lease_id
6569: ,pil.retain_initial_basis_flag
6570: ,pil.initial_basis
6571: FROM pn_index_leases_all pil, pn_index_lease_periods_all pilp
6572: WHERE pil.index_lease_id = pilp.index_lease_id
6573: AND pil.index_lease_id = p_index_lease_id
6574: ORDER BY pilp.line_number;
6575:
6581: ,pilp.index_period_id
6582: ,pil.lease_id
6583: ,pil.retain_initial_basis_flag
6584: ,pil.initial_basis
6585: FROM pn_index_leases_all pil, pn_index_lease_periods_all pilp
6586: WHERE pil.index_lease_id = pilp.index_lease_id
6587: AND pil.index_lease_id = p_index_lease_id
6588: AND pilp.index_period_id = p_index_lease_period_id
6589: ORDER BY pilp.line_number;
6659: p_new_msg => v_period_msg
6660: ,p_all_msg => v_all_msg
6661: );
6662:
6663: UPDATE pn_index_lease_periods_all
6664: SET current_basis = v_basis_amount
6665: ,unconstraint_rent_due = v_uncontrained_index_amount
6666: ,constraint_rent_due = v_p_constrained_rent_amount
6667: ,index_percent_change = v_index_percent_change
6754: ,pilp.assessment_date
6755: ,pil.index_lease_number
6756: ,pil.term_template_id
6757: ,pil.org_id
6758: FROM pn_leases_all pl, pn_index_leases pil, pn_index_lease_periods_all pilp
6759: WHERE pl.lease_id = pil.lease_id
6760: AND pil.index_lease_id = pilp.index_lease_id
6761: AND (pil.index_lease_number >= nvl(p_index_rent_number_lower,pil.index_lease_number))
6762: AND (pil.index_lease_number <= nvl(p_index_rent_number_upper,pil.index_lease_number))
6857: p_index_history_line_id IN NUMBER
6858: ) IS
6859: SELECT pilp.index_lease_id
6860: ,pilp.index_period_id
6861: FROM pn_index_lease_periods_all pilp
6862: WHERE ( pilp.previous_index_line_id = p_index_history_line_id
6863: OR pilp.current_index_line_id = p_index_history_line_id
6864: );
6865:
6933: ,pilp.current_index_line_id
6934: ,pilp.current_index_line_value
6935: ,pilp.previous_index_line_value
6936: ,pilp.constraint_rent_due
6937: FROM pn_index_lease_periods_all pilp
6938: WHERE ( pilp.previous_index_line_id = p_index_history_line_id
6939: OR pilp.current_index_line_id = p_index_history_line_id
6940: );
6941:
7029: --
7030:
7031: IF ilp_rec.constraint_rent_due IS NULL
7032: OR NVL (ip_recalculate, 'N') = 'Y' THEN
7033: UPDATE pn_index_lease_periods_all
7034: SET index_percent_change = v_index_percent_change
7035: ,current_index_line_value = v_current_cpi_value
7036: ,previous_index_line_value = v_previous_cpi_value
7037: WHERE index_period_id = ilp_rec.index_period_id;
7260: ,DECODE (ppt.normalize, 'Y', 'NORMALIZE') "NORMALIZE"
7261: ,ppt.schedule_day
7262: FROM pn_leases_all pl
7263: ,pn_index_leases pil
7264: ,pn_index_lease_periods_all pilp
7265: ,pn_payment_terms_all ppt
7266: WHERE pl.lease_id = pil.lease_id
7267: AND pil.index_lease_id = pilp.index_lease_id
7268: AND pilp.index_period_id = ppt.index_period_id
7551: op_carry_forward_percent OUT NOCOPY NUMBER) IS
7552: CURSOR csr_cum_carry_for IS
7553: SELECT pilp.carry_forward_amount,
7554: pilp.carry_forward_percent
7555: FROM pn_index_lease_periods_all pilp
7556: WHERE pilp.index_lease_id = p_index_lease_id
7557: AND pilp.assessment_date = (SELECT MAX (pilp.assessment_date)
7558: FROM pn_index_lease_periods_all pilp
7559: WHERE pilp.index_lease_id = p_index_lease_id
7554: pilp.carry_forward_percent
7555: FROM pn_index_lease_periods_all pilp
7556: WHERE pilp.index_lease_id = p_index_lease_id
7557: AND pilp.assessment_date = (SELECT MAX (pilp.assessment_date)
7558: FROM pn_index_lease_periods_all pilp
7559: WHERE pilp.index_lease_id = p_index_lease_id
7560: AND pilp.assessment_date < p_assessment_date);
7561:
7562: BEGIN
7594: RETURN number
7595: IS
7596: CURSOR csr_negative_rent IS
7597: SELECT unconstraint_rent_due, constraint_rent_due
7598: FROM pn_index_lease_periods_all
7599: WHERE index_lease_id = p_index_lease_id
7600: AND assessment_date < p_assessment_date
7601: ORDER BY assessment_date desc;
7602:
7675: IS
7676: CURSOR csr_get_dt
7677: IS
7678: SELECT max(assessment_date)
7679: FROM pn_index_lease_periods_all
7680: WHERE index_lease_id = p_index_lease_id
7681: AND assessment_date > p_assessment_date
7682: AND constraint_rent_due is not null;
7683:
7712: CURSOR csr_get_periods is
7713: SELECT index_lease_id,
7714: index_period_id,
7715: assessment_date
7716: FROM pn_index_lease_periods_all
7717: WHERE index_lease_id = p_index_lease_id
7718: AND assessment_date > p_assessment_date
7719: AND assessment_date <= get_max_assessment_dt(index_lease_id,p_assessment_date);
7720: