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

(-)a/t/db_dependent/Hold.t (-12 / +14 lines)
Lines 25-30 use Koha::Libraries; Link Here
25
use Koha::Patrons;
25
use Koha::Patrons;
26
use Koha::Item;
26
use Koha::Item;
27
use Koha::DateUtils;
27
use Koha::DateUtils;
28
use t::lib::TestBuilder;
28
29
29
use Test::More tests => 31;
30
use Test::More tests => 31;
30
31
Lines 33-43 use_ok('Koha::Hold'); Link Here
33
my $schema = Koha::Database->new()->schema();
34
my $schema = Koha::Database->new()->schema();
34
$schema->storage->txn_begin();
35
$schema->storage->txn_begin();
35
36
36
my $dbh = C4::Context->dbh;
37
# add two branches and a borrower
37
$dbh->{RaiseError} = 1;
38
my $builder = t::lib::TestBuilder->new;
38
39
my @branches;
39
my @branches = Koha::Libraries->search();
40
foreach( 1..2 ) {
40
my $borrower = Koha::Patrons->search()->next();
41
    push @branches, $builder->build({ source => 'Branch' });
42
}
43
my $borrower = $builder->build({ source => 'Borrower' });
41
44
42
my $biblio = MARC::Record->new();
45
my $biblio = MARC::Record->new();
43
my $title  = 'Silence in the library';
46
my $title  = 'Silence in the library';
Lines 51-58 my $item = Koha::Item->new( Link Here
51
    {
54
    {
52
        biblionumber     => $biblionumber,
55
        biblionumber     => $biblionumber,
53
        biblioitemnumber => $biblioitemnumber,
56
        biblioitemnumber => $biblioitemnumber,
54
        holdingbranch    => $branches[0]->branchcode(),
57
        holdingbranch    => $branches[0]->{branchcode},
55
        homebranch       => $branches[0]->branchcode(),
58
        homebranch       => $branches[0]->{branchcode},
56
    }
59
    }
57
);
60
);
58
$item->store();
61
$item->store();
Lines 62-69 my $hold = Koha::Hold->new( Link Here
62
        biblionumber   => $biblionumber,
65
        biblionumber   => $biblionumber,
63
        itemnumber     => $item->id(),
66
        itemnumber     => $item->id(),
64
        waitingdate    => '2000-01-01',
67
        waitingdate    => '2000-01-01',
65
        borrowernumber => $borrower->borrowernumber(),
68
        borrowernumber => $borrower->{borrowernumber},
66
        branchcode     => $branches[1]->branchcode(),
69
        branchcode     => $branches[1]->{branchcode},
67
        suspend        => 0,
70
        suspend        => 0,
68
    }
71
    }
69
);
72
);
Lines 90-96 $item = $hold->item(); Link Here
90
93
91
my $hold_borrower = $hold->borrower();
94
my $hold_borrower = $hold->borrower();
92
ok( $hold_borrower, 'Got hold borrower' );
95
ok( $hold_borrower, 'Got hold borrower' );
93
is( $hold_borrower->borrowernumber(), $borrower->borrowernumber(), 'Hold borrower matches correct borrower' );
96
is( $hold_borrower->borrowernumber(), $borrower->{borrowernumber}, 'Hold borrower matches correct borrower' );
94
97
95
t::lib::Mocks::mock_preference( 'ReservesMaxPickUpDelay', '' );
98
t::lib::Mocks::mock_preference( 'ReservesMaxPickUpDelay', '' );
96
$dt = $hold->waiting_expires_on();
99
$dt = $hold->waiting_expires_on();
Lines 134-140 $hold->found('T'); Link Here
134
ok( !$hold->is_at_destination(), "In transit hold cannot be at destination" );
137
ok( !$hold->is_at_destination(), "In transit hold cannot be at destination" );
135
$hold->found('W');
138
$hold->found('W');
136
ok( !$hold->is_at_destination(), "Waiting hold where hold branchcode is not the same as the item's holdingbranch is not at destination" );
139
ok( !$hold->is_at_destination(), "Waiting hold where hold branchcode is not the same as the item's holdingbranch is not at destination" );
137
$item->holdingbranch( $branches[1]->branchcode() );
140
$item->holdingbranch( $branches[1]->{branchcode} );
138
ok( $hold->is_at_destination(), "Waiting hold where hold branchcode is the same as the item's holdingbranch is at destination" );
141
ok( $hold->is_at_destination(), "Waiting hold where hold branchcode is the same as the item's holdingbranch is at destination" );
139
142
140
$schema->storage->txn_rollback();
143
$schema->storage->txn_rollback();
141
- 

Return to bug 16411