644: pnp_debug_pkg.debug ('PN_LEASES_PKG.check_UNIQUE_lease_number (+)');
645:
646: SELECT 1
647: INTO l_dummy
648: FROM DUAL
649: WHERE NOT EXISTS (SELECT 1
650: FROM pn_leases pnl
651: WHERE pnl.lease_num = x_lease_number
652: AND ((x_lease_id IS NULL) OR (pnl.lease_id <> x_lease_id))
684: pnp_debug_pkg.debug ('PN_LEASES_PKG.check_UNIQUE_lease_number (+)');
685:
686: SELECT 1
687: INTO l_dummy
688: FROM DUAL
689: WHERE NOT EXISTS (SELECT 1
690: FROM pn_leases_all pnl
691: WHERE pnl.lease_num = x_lease_number
692: AND ((x_lease_id IS NULL) OR (pnl.lease_id <> x_lease_id))