From: miker Date: Tue, 26 Jun 2007 17:18:22 +0000 (+0000) Subject: excluding deleted volumes X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=b399f7d3f8546e7ef11a2a3336654cdda56aa809;p=Evergreen.git excluding deleted volumes git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_0@7473 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm index 80576d729b..b5c6dc6db0 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm @@ -229,8 +229,8 @@ sub cn_browse_pagedown { from $table cn where - (upper(label) > ? - or ( cn.id > ? and upper(label) = ? )) + not deleted + and (upper(label) > ? or ( cn.id > ? and upper(label) = ? )) and owning_lib in ($orgs) order by upper(label), 4, 2 limit $size; @@ -284,8 +284,8 @@ sub cn_browse_pageup { from $table cn where - (upper(label) < ? - or ( cn.id < ? and upper(label) = ? )) + not deleted + and (upper(label) < ? or ( cn.id < ? and upper(label) = ? )) and owning_lib in ($orgs) order by upper(label) desc, 4 desc, 2 desc limit $size @@ -342,7 +342,8 @@ sub cn_browse_target { from $table cn where - upper(label) < ? + not deleted + and upper(label) < ? and owning_lib in ($orgs) order by upper(label) desc, 4 desc, 2 desc limit $topsize @@ -359,7 +360,8 @@ sub cn_browse_target { from $table cn where - upper(label) >= ? + not deleted + and upper(label) >= ? and owning_lib in ($orgs) order by upper(label),4,2 limit $bottomsize;