View | Details | Raw Unified | Return to bug 9788
Collapse All | Expand All

(-)a/t/db_dependent/Reserves.t (-2 / +28 lines)
Lines 2-8 Link Here
2
2
3
use Modern::Perl;
3
use Modern::Perl;
4
4
5
use Test::More tests => 16;
5
use Test::More tests => 19;
6
use MARC::Record;
6
use MARC::Record;
7
use DateTime::Duration;
7
use DateTime::Duration;
8
8
Lines 263-266 is(exists $messages->{ResFound}?1:0, 1, 'AddReturn considers future reserve with Link Here
263
263
264
# End of tests for bug 9761 (ConfirmFutureHolds)
264
# End of tests for bug 9761 (ConfirmFutureHolds)
265
265
266
# Tests for bug 9788: Does GetReservesFromItemnumber return a future wait?
267
# 9788a: GetReservesFromItemnumber does not return future next available hold
268
$dbh->do("DELETE FROM reserves WHERE biblionumber=?",undef,($bibnum));
269
C4::Context->set_preference('ConfirmFutureHolds', 2);
270
C4::Context->set_preference('AllowHoldDateInFuture', 1);
271
$resdate= dt_from_string();
272
$resdate->add_duration(DateTime::Duration->new(days => 2));
273
$resdate=output_pref($resdate);
274
AddReserve('CPL',  $requesters{'CPL'}, $bibnum,
275
           $constraint, $bibitems,  1, $resdate, $expdate, $notes,
276
           $title,      $checkitem, $found);
277
my @results= GetReservesFromItemnumber($itemnumber);
278
is(defined $results[3]?1:0, 0, 'GetReservesFromItemnumber does not return a future next available hold');
279
# 9788b: GetReservesFromItemnumber does not return future item level hold
280
$dbh->do("DELETE FROM reserves WHERE biblionumber=?",undef,($bibnum));
281
AddReserve('CPL',  $requesters{'CPL'}, $bibnum,
282
           $constraint, $bibitems,  1, $resdate, $expdate, $notes,
283
           $title,      $itemnumber, $found); #item level hold
284
my @results= GetReservesFromItemnumber($itemnumber);
285
is(defined $results[3]?1:0, 0, 'GetReservesFromItemnumber does not return a future item level hold');
286
# 9788c: GetReservesFromItemnumber returns future wait (confirmed future hold)
287
ModReserveAffect( $itemnumber,  $requesters{'CPL'} , 0); #confirm hold
288
my @results= GetReservesFromItemnumber($itemnumber);
289
is(defined $results[3]?1:0, 1, 'GetReservesFromItemnumber returns a future wait (confirmed future hold)');
290
291
# End of tests for bug 9788
292
266
$dbh->rollback;
293
$dbh->rollback;
267
- 

Return to bug 9788