Lines 9-16
use Test::More tests => 10;
Link Here
|
9 |
use t::lib::TestBuilder; |
9 |
use t::lib::TestBuilder; |
10 |
|
10 |
|
11 |
BEGIN { |
11 |
BEGIN { |
12 |
use FindBin; |
|
|
13 |
use lib $FindBin::Bin; |
14 |
use_ok('C4::Reserves'); |
12 |
use_ok('C4::Reserves'); |
15 |
} |
13 |
} |
16 |
|
14 |
|
Lines 46-56
my $borrowernumber = $borrower->{borrowernumber};
Link Here
|
46 |
my $library_A = $library1->{branchcode}; |
44 |
my $library_A = $library1->{branchcode}; |
47 |
my $library_B = $library2->{branchcode}; |
45 |
my $library_B = $library2->{branchcode}; |
48 |
my $library_C = $library3->{branchcode}; |
46 |
my $library_C = $library3->{branchcode}; |
49 |
$dbh->do("DELETE FROM reserves"); |
|
|
50 |
$dbh->do("DELETE FROM issues"); |
51 |
$dbh->do("DELETE FROM items"); |
52 |
$dbh->do("DELETE FROM biblio"); |
53 |
$dbh->do("DELETE FROM biblioitems"); |
54 |
$dbh->do("DELETE FROM transport_cost"); |
47 |
$dbh->do("DELETE FROM transport_cost"); |
55 |
$dbh->do("DELETE FROM tmp_holdsqueue"); |
48 |
$dbh->do("DELETE FROM tmp_holdsqueue"); |
56 |
$dbh->do("DELETE FROM hold_fill_targets"); |
49 |
$dbh->do("DELETE FROM hold_fill_targets"); |
Lines 145-152
$reserve_id = AddReserve( $library_C, $borrowernumber, $biblionumber, '', 1 );
Link Here
|
145 |
( $status ) = CheckReserves($itemnumber); |
138 |
( $status ) = CheckReserves($itemnumber); |
146 |
is( $status, 'Reserved', "Hold where pickup ne home, pickup ne holding targeted" ); |
139 |
is( $status, 'Reserved', "Hold where pickup ne home, pickup ne holding targeted" ); |
147 |
CancelReserve( { reserve_id => $reserve_id } ); |
140 |
CancelReserve( { reserve_id => $reserve_id } ); |
148 |
|
|
|
149 |
# End testing hold_fulfillment_policy |
150 |
|
151 |
# Cleanup |
152 |
$schema->storage->txn_rollback; |
153 |
- |