From: Ian Walls <[email protected]>

aqbasket.authorisedby is not foreign key constrainted to 
borrowers.borrowernumber,
so if it's anything other than that, vendor search breaks by using an undefined 
value
(GetMember() on an invalid borrowernumber) as a HASH ref.

This patch sets the branchcode (the desired value from GetMember) to a blank 
value, then only
changes it if GetMember is defined.  In the case where the authorisedby 
librarian has been deleted,
or the value is otherwise invalid, and AcqViewBaskets is set to 'branch', the 
basket will not appear
except to superlibrarians

Signed-off-by: Katrin Fischer <[email protected]>
Invalid borrowernumber in aqbasket.authorisedby no longer breaks search.
---
 acqui/booksellers.pl |    6 +++++-
 1 files changed, 5 insertions(+), 1 deletions(-)

diff --git a/acqui/booksellers.pl b/acqui/booksellers.pl
index 2b16fe4..634eb93 100755
--- a/acqui/booksellers.pl
+++ b/acqui/booksellers.pl
@@ -111,7 +111,11 @@ for my $vendor (@suppliers) {
     
     for my $basket ( @{$baskets} ) {
         my $authorisedby = $basket->{authorisedby};
-        my $basketbranch = GetMember( borrowernumber => $authorisedby 
)->{branchcode};
+        my $basketbranch = ''; # set a blank branch to start with
+        if ( GetMember( borrowernumber => $authorisedby ) ) {
+           # authorisedby may not be a valid borrowernumber; it's not 
foreign-key constrained!
+           $basketbranch = GetMember( borrowernumber => $authorisedby 
)->{branchcode};
+        }
         
         if ($userenv->{'flags'} & 1 || #user is superlibrarian
                (haspermission( $uid, { acquisition => q{*} } ) && #user has 
acq permissions and
-- 
1.7.5.4

_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-patches
website : http://www.koha-community.org/
git : http://git.koha-community.org/
bugs : http://bugs.koha-community.org/

Reply via email to