oracle8.1.6 begin location_rel.delete(:rel_id); end; declare v_rel_id subplace_rels.rel_id%TYPE; cursor subplace_rel_cursor is select sr.rel_id from subplace_rels sr, acs_rels ar where ar.rel_id = sr.rel_id and ar.object_id_two = :address_id; begin open subplace_rel_cursor; fetch subplace_rel_cursor into v_rel_id; if not subplace_rel_cursor%NOTFOUND then subplace_rel.delete(v_rel_id); end if; close subplace_rel_cursor; pl_address.delete(:address_id); end;