From 86e4cdf54b2f9b942407078bd02165ccb0a9b439 Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Thu, 13 Mar 2008 17:17:59 -0500 Subject: [PATCH] use 'F' or 'W', not 'f' or 'w' when using reserves.found Signed-off-by: Joshua Ferraro --- cataloguing/additem.pl | 2 +- circ/pendingreserves.pl | 8 ++++---- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/cataloguing/additem.pl b/cataloguing/additem.pl index 144e780c66..f9d77ac942 100755 --- a/cataloguing/additem.pl +++ b/cataloguing/additem.pl @@ -142,7 +142,7 @@ if ($op eq "additem") { $nextop="additem"; } else { # check it doesnt have a waiting reserve - $sth=$dbh->prepare("SELECT * FROM reserves WHERE found = 'w' AND cancellationdate IS NULL AND itemnumber = ?"); + $sth=$dbh->prepare("SELECT * FROM reserves WHERE found = 'W' AND cancellationdate IS NULL AND itemnumber = ?"); $sth->execute($itemnumber); my $reserve=$sth->fetchrow; if ($reserve){ diff --git a/circ/pendingreserves.pl b/circ/pendingreserves.pl index c7a8ee2f0b..0f5fc0e0ef 100755 --- a/circ/pendingreserves.pl +++ b/circ/pendingreserves.pl @@ -141,8 +141,8 @@ while ( my $data = $sth->fetchrow_hashref ) { phone => $previous eq $this?"":$data->{phone}, email => $previous eq $this?"":$data->{email}, biblionumber => $previous eq $this?"":$data->{biblionumber}, - statusw => ( $data->{found} eq "w" ), - statusf => ( $data->{found} eq "f" ), + statusw => ( $data->{found} eq "W" ), + statusf => ( $data->{found} eq "F" ), holdingbranch => $data->{holdingbranch}, branch => $previous eq $this?"":$data->{branch}, itemcallnumber => $data->{itemcallnumber}, @@ -180,8 +180,8 @@ while ( my $data = $sth->fetchrow_hashref ) { phone => $previous eq $this?"":$data->{phone}, email => $previous eq $this?"":$data->{email}, biblionumber => $previous eq $this?"":$data->{biblionumber}, - statusw => ( $data->{found} eq "w" ), - statusf => ( $data->{found} eq "f" ), + statusw => ( $data->{found} eq "W" ), + statusf => ( $data->{found} eq "F" ), holdingbranch => $data->{holdingbranch}, branch => $previous eq $this?"":$data->{branch}, itemcallnumber => $data->{itemcallnumber}, -- 2.20.1