Lines 6-18
use t::lib::Mocks;
Link Here
|
6 |
use C4::Context; |
6 |
use C4::Context; |
7 |
use C4::Branch; |
7 |
use C4::Branch; |
8 |
|
8 |
|
9 |
use Test::More tests => 35; |
9 |
use Test::More tests => 38; |
10 |
use MARC::Record; |
10 |
use MARC::Record; |
11 |
use C4::Biblio; |
11 |
use C4::Biblio; |
12 |
use C4::Items; |
12 |
use C4::Items; |
13 |
use C4::Members; |
13 |
use C4::Members; |
14 |
use C4::Calendar; |
14 |
use C4::Calendar; |
15 |
|
15 |
|
|
|
16 |
use Koha::DateUtils qw( dt_from_string output_pref ); |
17 |
|
16 |
BEGIN { |
18 |
BEGIN { |
17 |
use FindBin; |
19 |
use FindBin; |
18 |
use lib $FindBin::Bin; |
20 |
use lib $FindBin::Bin; |
Lines 82-87
is( scalar(@$reserves), $borrowers_count, "Test GetReserves()" );
Link Here
|
82 |
|
84 |
|
83 |
|
85 |
|
84 |
my ( $reservedate, $borrowernumber, $branchcode, $reserve_id ) = GetReservesFromItemnumber($itemnumber); |
86 |
my ( $reservedate, $borrowernumber, $branchcode, $reserve_id ) = GetReservesFromItemnumber($itemnumber); |
|
|
87 |
is( $reservedate, output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 }), "GetReservesFromItemnumber should return a valid reserve date"); |
88 |
is( $borrowernumber, $borrowernumbers[0], "GetReservesFromItemnumber should return a valid borrowernumber"); |
89 |
is( $branchcode, 'CPL', "GetReservesFromItemnumber should return a valid branchcode"); |
85 |
ok($reserve_id, "Test GetReservesFromItemnumber()"); |
90 |
ok($reserve_id, "Test GetReservesFromItemnumber()"); |
86 |
|
91 |
|
87 |
|
92 |
|
88 |
- |
|
|