|
Lines 25-50
$schema->storage->txn_begin;
Link Here
|
| 25 |
|
25 |
|
| 26 |
my $builder = t::lib::TestBuilder->new; |
26 |
my $builder = t::lib::TestBuilder->new; |
| 27 |
|
27 |
|
| 28 |
my $library1 = $builder->build({ |
28 |
my $library1 = $builder->build({ source => 'Branch', }); |
| 29 |
source => 'Branch', |
29 |
my $library2 = $builder->build({ source => 'Branch', }); |
| 30 |
}); |
30 |
my $library3 = $builder->build({ source => 'Branch', }); |
| 31 |
my $library2 = $builder->build({ |
31 |
my $library4 = $builder->build({ source => 'Branch', }); |
| 32 |
source => 'Branch', |
32 |
my $itemtype = $builder->build( |
| 33 |
}); |
33 |
{ source => 'Itemtype', |
| 34 |
my $library3 = $builder->build({ |
34 |
value => { notforloan => undef, rentalcharge => 0 } |
| 35 |
source => 'Branch', |
35 |
} |
| 36 |
}); |
36 |
)->{itemtype}; |
| 37 |
my $library4 = $builder->build({ |
37 |
|
| 38 |
source => 'Branch', |
38 |
|
| 39 |
}); |
|
|
| 40 |
|
39 |
|
| 41 |
my $borrowers_count = 5; |
40 |
my $borrowers_count = 5; |
| 42 |
|
41 |
|
| 43 |
# Create a helper biblio |
42 |
# Create a helper biblio |
| 44 |
my ( $bibnum, $title, $bibitemnum ) = create_helper_biblio(); |
43 |
my ( $bibnum, $title, $bibitemnum ) = create_helper_biblio(); |
| 45 |
# Create a helper item for the biblio. |
44 |
# Create a helper item for the biblio. |
| 46 |
my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = |
45 |
my ( $item_bibnum, $item_bibitemnum, $itemnumber ) = AddItem( |
| 47 |
AddItem( { homebranch => $library4->{branchcode}, holdingbranch => $library3->{branchcode} }, $bibnum ); |
46 |
{ homebranch => $library4->{branchcode}, |
|
|
47 |
holdingbranch => $library3->{branchcode}, |
| 48 |
itype => $itemtype |
| 49 |
}, |
| 50 |
$bibnum |
| 51 |
); |
| 52 |
|
| 48 |
|
53 |
|
| 49 |
my @branchcodes = ( $library1->{branchcode}, $library2->{branchcode}, $library3->{branchcode}, $library4->{branchcode}, $library3->{branchcode}, $library4->{branchcode} ); |
54 |
my @branchcodes = ( $library1->{branchcode}, $library2->{branchcode}, $library3->{branchcode}, $library4->{branchcode}, $library3->{branchcode}, $library4->{branchcode} ); |
| 50 |
|
55 |
|
| 51 |
- |
|
|