Lines 305-312
if ($op eq 'save' || $op eq 'insert'){
Link Here
|
305 |
: () |
305 |
: () |
306 |
} |
306 |
} |
307 |
|
307 |
|
308 |
if ( $newdata{dateofbirth} ) { |
308 |
my $dateofbirth; |
309 |
my $age = GetAge($newdata{dateofbirth}); |
309 |
if ($op eq 'save' && $step == 3) { |
|
|
310 |
my $borrower = C4::Members::GetMember(borrowernumber => $borrowernumber); |
311 |
$dateofbirth = $borrower->{dateofbirth}; |
312 |
} |
313 |
else { |
314 |
$dateofbirth = $newdata{dateofbirth}; |
315 |
} |
316 |
|
317 |
if ( $dateofbirth ) { |
318 |
my $age = GetAge($dateofbirth); |
310 |
my $borrowercategory = Koha::Patron::Categories->find($categorycode); |
319 |
my $borrowercategory = Koha::Patron::Categories->find($categorycode); |
311 |
my ($low,$high) = ($borrowercategory->dateofbirthrequired, $borrowercategory->upperagelimit); |
320 |
my ($low,$high) = ($borrowercategory->dateofbirthrequired, $borrowercategory->upperagelimit); |
312 |
if (($high && ($age > $high)) or ($age < $low)) { |
321 |
if (($high && ($age > $high)) or ($age < $low)) { |
313 |
- |
|
|