95:
96: CURSOR csr_get_lease IS
97: SELECT name,
98: lease_num
99: FROM pn_leases_all
100: WHERE lease_id = p_lease_id;
101:
102: CURSOR csr_get_location IS
103: SELECT location_code
4084:
4085:
4086: CURSOR org_cur IS
4087: SELECT org_id
4088: FROM pn_leases_all
4089: WHERE lease_id = p_lease_id;
4090:
4091: l_org_id NUMBER;
4092:
4109: SELECT pl.lease_class_code
4110: ,pld.lease_change_id
4111: INTO l_lease_class_code
4112: ,l_lease_change_id
4113: FROM pn_leases_all pl
4114: ,pn_lease_details_all pld
4115: WHERE pl.lease_id = pld.lease_id
4116: AND pld.lease_id = p_lease_id;
4117: