[Home] [Help]
98: )
99: IS
100: CURSOR C IS
101: SELECT ROWID
102: FROM pn_tenancies_all
103: WHERE tenancy_id = x_tenancy_id;
104:
105: l_returnStatus VARCHAR2(30) := NULL;
106:
175: FROM DUAL;
176:
177: END IF;
178:
179: INSERT INTO pn_tenancies_all
180: (
181: TENANCY_ID,
182: LAST_UPDATE_DATE,
183: LAST_UPDATED_BY,
349: )
350: IS
351: CURSOR c1 IS
352: SELECT *
353: FROM pn_tenancies_all
354: WHERE tenancy_id = x_tenancy_id
355: FOR UPDATE OF tenancy_id NOWAIT;
356:
357: tlinfo c1%ROWTYPE;
621: IS
622:
623: CURSOR c2 IS
624: SELECT *
625: FROM pn_tenancies_all
626: WHERE tenancy_id = x_tenancy_id;
627:
628: recInfoForHist c2%ROWTYPE;
629:
798: );
799: END IF;
800: END IF;
801:
802: UPDATE pn_tenancies_all
803: SET LOCATION_ID = X_LOCATION_ID,
804: LEASE_CHANGE_ID = X_LEASE_CHANGE_ID,
805: TENANCY_USAGE_LOOKUP_CODE = X_TENANCY_USAGE_LOOKUP_CODE,
806: PRIMARY_FLAG = X_PRIMARY_FLAG,
867: IS
868: BEGIN
869: pnp_debug_pkg.debug('PN_TENANCIES_PKG.DELETE_ROW (+)');
870:
871: DELETE FROM pn_tenancies_all
872: WHERE tenancy_id = x_tenancy_id;
873:
874: IF (SQL%NOTFOUND) THEN
875: RAISE NO_DATA_FOUND;
899: INTO l_dummy
900: FROM DUAL
901: WHERE NOT EXISTS
902: (SELECT 1
903: FROM pn_tenancies_all pnt
904: WHERE pnt.lease_id = x_lease_id
905: AND pnt.status = 'A'
906: AND pnt.primary_flag = 'Y'
907: AND ((x_tenancy_id IS NULL) or (pnt.tenancy_id <> x_tenancy_id))
989: BEGIN
990:
991: SELECT pnt.lease_id
992: INTO l_LeaseId
993: FROM pn_tenancies_all pnt
994: WHERE pnt.status = 'A'
995: AND pnt.lease_id = x_lease_id
996: AND pnt.location_id IN
997: (SELECT b.parent_location_id
1031: WHERE lease_id <> x_lease_id
1032: AND parent_lease_id IS NULL
1033: AND lease_id =
1034: (SELECT lease_id
1035: FROM pn_tenancies_all pnt
1036: WHERE pnt.status = 'A'
1037: AND pnt.location_id IN
1038: (SELECT a.location_id
1039: FROM pn_locations_all a
1082: FROM pn_leases_all
1083: WHERE parent_lease_id = x_lease_id
1084: AND lease_id =
1085: (SELECT lease_id
1086: FROM pn_tenancies_all pnt
1087: WHERE pnt.status = 'A'
1088: AND pnt.location_id IN
1089: (SELECT b.location_id
1090: FROM pn_locations_all b
1132: FROM pn_locations_all b
1133: CONNECT BY PRIOR b.location_id = b.parent_location_id
1134: START WITH b.location_id IN
1135: (SELECT pnt.location_id
1136: FROM pn_tenancies_all pnt
1137: WHERE pnt.status = 'A'
1138: AND pnt.lease_id = l_parentLeaseId
1139: AND (TRUNC(NVL(x_occupancy_date, x_estimated_occupancy_date))
1140: BETWEEN TRUNC(NVL(pnt.occupancy_date, pnt.estimated_occupancy_date))
1166: INTO l_leaseNumber
1167: FROM pn_leases_all
1168: WHERE lease_id =
1169: (SELECT lease_id
1170: FROM pn_tenancies_all pnt
1171: WHERE pnt.status = 'A'
1172: AND pnt.lease_id <> l_parentLeaseId
1173: AND pnt.location_id IN
1174: (SELECT a.location_id
1903: SELECT 'Y'
1904: FROM DUAl
1905: WHERE EXISTS (SELECT NULL
1906: FROM pn_leases_all pnl,
1907: pn_tenancies_all ten
1908: WHERE pnl.lease_id <> p_lease_id
1909: AND pnl.lease_class_code <> 'DIRECT'
1910: AND pnl.lease_id = ten.lease_id
1911: AND ten.location_id = p_location_id
2178: l_auto_space_dist VARCHAR2(20) := NULL;
2179:
2180: CURSOR org_cur IS
2181: SELECT org_id
2182: FROM pn_tenancies_all
2183: WHERE tenancy_id = p_tenancy_id;
2184:
2185: l_org_id NUMBER;
2186:
2334:
2335:
2336: CURSOR org_cur IS
2337: SELECT org_id
2338: FROM pn_tenancies_all
2339: WHERE tenancy_id = p_tenancy_id;
2340:
2341: CURSOR cur_alloc_area IS
2342: SELECT cust_assign_start_date,
3093: CURSOR cur_lease_code IS
3094: SELECT leases.lease_class_code lease_code,
3095: allocated_area_pct
3096: FROM pn_leases_all leases,
3097: pn_tenancies_all tenant
3098: WHERE leases.lease_id = tenant.lease_id
3099: AND tenant.tenancy_id = p_tenancy_id;
3100:
3101: BEGIN
3145: CURSOR get_lease_class IS
3146: SELECT leases.lease_class_code lease_code,
3147: allocated_area
3148: FROM pn_leases_all leases,
3149: pn_tenancies_all tenant
3150: WHERE leases.lease_id = tenant.lease_id
3151: AND tenant.tenancy_id = p_tenancy_id;
3152:
3153: