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

(-)a/t/db_dependent/Circulation.t (-3 / +9 lines)
Lines 9-15 use C4::Items; Link Here
9
use C4::Members;
9
use C4::Members;
10
use C4::Reserves;
10
use C4::Reserves;
11
11
12
use Test::More tests => 48;
12
use Test::More tests => 50;
13
13
14
BEGIN {
14
BEGIN {
15
    use_ok('C4::Circulation');
15
    use_ok('C4::Circulation');
Lines 244-250 C4::Context->dbh->do("DELETE FROM accountlines"); Link Here
244
    my $datedue = AddIssue( $renewing_borrower, $barcode);
244
    my $datedue = AddIssue( $renewing_borrower, $barcode);
245
    is (defined $datedue, 1, "Item 1 checked out, due date: $datedue");
245
    is (defined $datedue, 1, "Item 1 checked out, due date: $datedue");
246
246
247
    my $datedue2 = AddIssue( $renewing_borrower, $barcode2);
247
    my $datedue2 = AddIssue( $renewing_borrower, $barcode2, DateTime->now(time_zone => C4::Context->tz())->subtract( days =>  1 ) );
248
    is (defined $datedue2, 1, "Item 2 checked out, due date: $datedue2");
248
    is (defined $datedue2, 1, "Item 2 checked out, due date: $datedue2");
249
249
250
    my $borrowing_borrowernumber = GetItemIssue($itemnumber)->{borrowernumber};
250
    my $borrowing_borrowernumber = GetItemIssue($itemnumber)->{borrowernumber};
Lines 253-258 C4::Context->dbh->do("DELETE FROM accountlines"); Link Here
253
    my ( $renewokay, $error ) = CanBookBeRenewed($renewing_borrowernumber, $itemnumber, 1);
253
    my ( $renewokay, $error ) = CanBookBeRenewed($renewing_borrowernumber, $itemnumber, 1);
254
    is( $renewokay, 1, 'Can renew, no holds for this title or item');
254
    is( $renewokay, 1, 'Can renew, no holds for this title or item');
255
255
256
    my $overdues = C4::Overdues::Getoverdues();
257
    ok( scalar @$overdues == 1, 'One overdue item found as expected' );
258
    $dbh->do("UPDATE items SET itemlost = 1 WHERE itemnumber = ?", undef, $itemnumber2);
259
    $overdues = C4::Overdues::Getoverdues();
260
    ok( scalar @$overdues == 0, 'Zero overdue items found as expected, only overdue item is marked as lost' );
261
262
256
263
257
    diag("Biblio-level hold, renewal test");
264
    diag("Biblio-level hold, renewal test");
258
    AddReserve(
265
    AddReserve(
259
- 

Return to bug 11872