Lines 108-114
BEGIN {
Link Here
|
108 |
&GetReservesForBranch |
108 |
&GetReservesForBranch |
109 |
&GetReservesToBranch |
109 |
&GetReservesToBranch |
110 |
&GetReserveCount |
110 |
&GetReserveCount |
111 |
&GetReserveInfo |
|
|
112 |
&GetReserveStatus |
111 |
&GetReserveStatus |
113 |
|
112 |
|
114 |
&GetOtherReserves |
113 |
&GetOtherReserves |
Lines 1231-1289
sub ModReserveMinusPriority {
Link Here
|
1231 |
_FixPriority({ reserve_id => $reserve_id, rank => '0' }); |
1230 |
_FixPriority({ reserve_id => $reserve_id, rank => '0' }); |
1232 |
} |
1231 |
} |
1233 |
|
1232 |
|
1234 |
=head2 GetReserveInfo |
|
|
1235 |
|
1236 |
&GetReserveInfo($reserve_id); |
1237 |
|
1238 |
Get item and borrower details for a current hold. |
1239 |
Current implementation this query should have a single result. |
1240 |
|
1241 |
=cut |
1242 |
|
1243 |
sub GetReserveInfo { |
1244 |
my ( $reserve_id ) = @_; |
1245 |
my $dbh = C4::Context->dbh; |
1246 |
my $strsth="SELECT |
1247 |
reserve_id, |
1248 |
reservedate, |
1249 |
reservenotes, |
1250 |
reserves.borrowernumber, |
1251 |
reserves.biblionumber, |
1252 |
reserves.branchcode, |
1253 |
reserves.waitingdate, |
1254 |
notificationdate, |
1255 |
reminderdate, |
1256 |
priority, |
1257 |
found, |
1258 |
firstname, |
1259 |
surname, |
1260 |
phone, |
1261 |
email, |
1262 |
address, |
1263 |
address2, |
1264 |
cardnumber, |
1265 |
city, |
1266 |
zipcode, |
1267 |
biblio.title, |
1268 |
biblio.author, |
1269 |
items.holdingbranch, |
1270 |
items.itemcallnumber, |
1271 |
items.itemnumber, |
1272 |
items.location, |
1273 |
barcode, |
1274 |
notes |
1275 |
FROM reserves |
1276 |
LEFT JOIN items USING(itemnumber) |
1277 |
LEFT JOIN borrowers USING(borrowernumber) |
1278 |
LEFT JOIN biblio ON (reserves.biblionumber=biblio.biblionumber) |
1279 |
WHERE reserves.reserve_id = ?"; |
1280 |
my $sth = $dbh->prepare($strsth); |
1281 |
$sth->execute($reserve_id); |
1282 |
|
1283 |
my $data = $sth->fetchrow_hashref; |
1284 |
return $data; |
1285 |
} |
1286 |
|
1287 |
=head2 IsAvailableForItemLevelRequest |
1233 |
=head2 IsAvailableForItemLevelRequest |
1288 |
|
1234 |
|
1289 |
my $is_available = IsAvailableForItemLevelRequest($item_record,$borrower_record); |
1235 |
my $is_available = IsAvailableForItemLevelRequest($item_record,$borrower_record); |
1290 |
- |
|
|