|
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 |
- |
|
|