Lines 55-67
my @branchcodes = ( $library1->{branchcode}, $library2->{branchcode}, $library3-
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 => 'S', |
62 |
firstname => 'my firstname', |
63 |
branchcode => $branchcodes[$_], |
63 |
surname => 'my surname ' . $count, |
64 |
); |
64 |
categorycode => 'S', |
|
|
65 |
branchcode => $branchcodes[$count], |
66 |
}, |
67 |
}); |
68 |
my $borrowernumber = $patron->{borrowernumber}; |
65 |
push @borrowernumbers, $borrowernumber; |
69 |
push @borrowernumbers, $borrowernumber; |
66 |
} |
70 |
} |
67 |
|
71 |
|
68 |
- |
|
|