Lines 55-67
my ($item_bibnum, $item_bibitemnum, $itemnumber)
Link Here
|
55 |
|
55 |
|
56 |
# Create some borrowers |
56 |
# Create some borrowers |
57 |
my @borrowernumbers; |
57 |
my @borrowernumbers; |
58 |
foreach (1..$borrowers_count) { |
58 |
foreach my $count (1..$borrowers_count) { |
59 |
my $borrowernumber = AddMember( |
59 |
my $patron = $builder->build({ |
60 |
firstname => 'my firstname', |
60 |
source => 'Borrower', |
61 |
surname => 'my surname ' . $_, |
61 |
value => { |
62 |
categorycode => $category->{categorycode}, |
62 |
firstname => 'my firstname', |
63 |
branchcode => $branch_1, |
63 |
surname => 'my surname ' . $count, |
64 |
); |
64 |
categorycode => $category->{categorycode}, |
|
|
65 |
branchcode => $branch_1, |
66 |
}, |
67 |
}); |
68 |
my $borrowernumber = $patron->{borrowernumber}; |
65 |
push @borrowernumbers, $borrowernumber; |
69 |
push @borrowernumbers, $borrowernumber; |
66 |
} |
70 |
} |
67 |
|
71 |
|
68 |
- |
|
|