From 227ff212f0143b0a714dcd4b1f239c50b039c193 Mon Sep 17 00:00:00 2001 From: miker Date: Thu, 7 Sep 2006 06:41:25 +0000 Subject: [PATCH] updating the reshelving complete query git-svn-id: svn://svn.open-ils.org/ILS/trunk@6013 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../OpenILS/Application/Storage/Publisher/action.pm | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm index 78c3bd29d3..a058feee41 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm @@ -126,12 +126,17 @@ sub complete_reshelving { my $sql = <<" SQL"; UPDATE $cp SET status = 0 - WHERE id IN ( SELECT cp.id + WHERE id IN + ( SELECT id FROM ( + SELECT cp.id, MAX(circ.checkin_time) FROM $cp cp JOIN $circ circ ON (circ.target_copy = cp.id) WHERE circ.checkin_time IS NOT NULL - AND circ.checkin_time < NOW() - CAST(? AS INTERVAL) - AND cp.status = 7 ) + AND cp.status = 7 + GROUP BY 1 + HAVING MAX(circ.checkin_time) < NOW() - CAST(? AS INTERVAL) + ) AS foo + ) SQL my $sth = action::circulation->db_Main->prepare_cached($sql); -- 2.43.2