Lines 101-106
my %data = (
Link Here
|
101 |
categorycode => 'S', |
101 |
categorycode => 'S', |
102 |
branchcode => 'CPL', |
102 |
branchcode => 'CPL', |
103 |
); |
103 |
); |
|
|
104 |
Koha::Patron::Categories->find('S')->set({ enrolmentfee => 0})->store; |
104 |
my $borrowernumber = AddMember(%data); |
105 |
my $borrowernumber = AddMember(%data); |
105 |
my $borrower = GetMember( borrowernumber => $borrowernumber ); |
106 |
my $borrower = GetMember( borrowernumber => $borrowernumber ); |
106 |
my $biblionumber = $bibnum; |
107 |
my $biblionumber = $bibnum; |
107 |
- |
|
|