107: l_var_rent_id := p_var_rent_id;
108:
109: SELECT lease_id
110: INTO l_lease_id
111: FROM pn_var_rents_all
112: WHERE var_rent_id = l_var_rent_id;
113:
114: SELECT reptg_freq_code
115: INTO l_reporting_freq
426: IF p_lease_id IS NULL AND p_var_rent_id IS NOT NULL THEN
427:
428: SELECT lease_id
429: INTO l_lease_id
430: FROM pn_var_rents_all
431: WHERE var_rent_id = p_var_rent_id;
432:
433: ELSE
434: l_lease_id := p_lease_id;
615:
616: CURSOR lease_var_cur (p_var_rent_id IN NUMBER)
617: IS
618: SELECT lease_id, rent_num
619: FROM PN_VAR_RENTS_ALL
620: WHERE var_rent_id = p_var_rent_id;
621:
622: CURSOR var_cur(p_lease_id IN NUMBER)
623: IS
621:
622: CURSOR var_cur(p_lease_id IN NUMBER)
623: IS
624: SELECT var_rent_id,rent_num
625: FROM pn_var_rents_All
626: WHERE lease_id = p_lease_id
627: ORDER BY var_rent_id DESC;
628:
629: CURSOR periods_cur (p_var_rent_id IN NUMBER)