3 # This Koha test module is a stub!
4 # Add more tests here!!!
9 use Test
::More tests
=> 4;
13 use lib
"$FindBin::Bin/../../C4/SIP";
14 use_ok
('C4::SIP::ILS');
17 my $transaction = ILS
::Transaction
::RenewAll
->new();
19 $transaction->patron(my $patron = ILS
::Patron
->new(23529000120056));
21 ok
(defined $patron, "patron code: 23529000120056 is valid");
23 my $transaction2 = ILS
::Transaction
::RenewAll
->new();
24 $transaction2->patron(my $patron2 = ILS
::Patron
->new("ABCDE12345"));
26 #This test assumes that the patron code ABCDE12345 is invalid
27 ok
(!defined $patron2, "patron code: ABCDE12345 is invalid");
29 ok
($transaction->do_renew_all(), "items renewed correctly");