Lines 62-76
my ($template, $loggedinuser, $cookie);
Link Here
|
62 |
|
62 |
|
63 |
if($ok){ |
63 |
if($ok){ |
64 |
# get biblio information.... |
64 |
# get biblio information.... |
65 |
my $biblio = $subs->{'biblionumber'}; |
65 |
my $biblionumber = $subs->{'bibnum'}; |
66 |
my ($count2,@bibitems) = GetBiblioItemByBiblioNumber($biblio); |
66 |
my ($count2,@bibitems) = GetBiblioItemByBiblioNumber($biblionumber); |
67 |
my @itemresults = GetItemsInfo( $subs->{biblionumber} ); |
67 |
my @itemresults = GetItemsInfo( $biblionumber ); |
68 |
my $branch = $itemresults[0]->{'holdingbranch'}; |
68 |
my $branch = scalar @itemresults ? $itemresults[0]->{'holdingbranch'} : $subs->{branchcode}; |
69 |
my $branchname = Koha::Libraries->find($branch)->branchname; |
69 |
my $branchname = Koha::Libraries->find($branch)->branchname; |
70 |
|
70 |
|
71 |
if (C4::Context->preference('RoutingListAddReserves')){ |
71 |
if (C4::Context->preference('RoutingListAddReserves')){ |
72 |
# get existing reserves ..... |
72 |
# get existing reserves ..... |
73 |
my $reserves = GetReservesFromBiblionumber({ biblionumber => $biblio }); |
73 |
my $reserves = GetReservesFromBiblionumber({ biblionumber => $biblionumber }); |
74 |
my $count = scalar( @$reserves ); |
74 |
my $count = scalar( @$reserves ); |
75 |
my $totalcount = $count; |
75 |
my $totalcount = $count; |
76 |
foreach my $res (@$reserves) { |
76 |
foreach my $res (@$reserves) { |
Lines 82-99
if($ok){
Link Here
|
82 |
my $title = $subs->{'bibliotitle'}; |
82 |
my $title = $subs->{'bibliotitle'}; |
83 |
for my $routing ( @routinglist ) { |
83 |
for my $routing ( @routinglist ) { |
84 |
my $sth = $dbh->prepare('SELECT * FROM reserves WHERE biblionumber = ? AND borrowernumber = ? LIMIT 1'); |
84 |
my $sth = $dbh->prepare('SELECT * FROM reserves WHERE biblionumber = ? AND borrowernumber = ? LIMIT 1'); |
85 |
$sth->execute($biblio,$routing->{borrowernumber}); |
85 |
$sth->execute($biblionumber,$routing->{borrowernumber}); |
86 |
my $reserve = $sth->fetchrow_hashref; |
86 |
my $reserve = $sth->fetchrow_hashref; |
87 |
|
87 |
|
88 |
if($routing->{borrowernumber} == $reserve->{borrowernumber}){ |
88 |
if($routing->{borrowernumber} == $reserve->{borrowernumber}){ |
89 |
ModReserve({ |
89 |
ModReserve({ |
90 |
rank => $routing->{ranking}, |
90 |
rank => $routing->{ranking}, |
91 |
biblionumber => $biblio, |
91 |
biblionumber => $biblionumber, |
92 |
borrowernumber => $routing->{borrowernumber}, |
92 |
borrowernumber => $routing->{borrowernumber}, |
93 |
branchcode => $branch |
93 |
branchcode => $branch |
94 |
}); |
94 |
}); |
95 |
} else { |
95 |
} else { |
96 |
AddReserve($branch,$routing->{borrowernumber},$biblio,\@bibitems,$routing->{ranking}, undef, undef, $notes,$title); |
96 |
AddReserve($branch,$routing->{borrowernumber},$biblionumber,\@bibitems,$routing->{ranking}, undef, undef, $notes,$title); |
97 |
} |
97 |
} |
98 |
} |
98 |
} |
99 |
} |
99 |
} |
100 |
- |
|
|