Lines 307-313
if ($op eq 'save' || $op eq 'insert'){
Link Here
|
307 |
|
307 |
|
308 |
if ( $newdata{dateofbirth} ) { |
308 |
if ( $newdata{dateofbirth} ) { |
309 |
my $age = GetAge($newdata{dateofbirth}); |
309 |
my $age = GetAge($newdata{dateofbirth}); |
310 |
my $borrowercategory = Koha::Patron::Categories->find($newdata{categorycode}); |
310 |
my $borrowercategory = Koha::Patron::Categories->find($categorycode); |
311 |
my ($low,$high) = ($borrowercategory->dateofbirthrequired, $borrowercategory->upperagelimit); |
311 |
my ($low,$high) = ($borrowercategory->dateofbirthrequired, $borrowercategory->upperagelimit); |
312 |
if (($high && ($age > $high)) or ($age < $low)) { |
312 |
if (($high && ($age > $high)) or ($age < $low)) { |
313 |
push @errors, 'ERROR_age_limitations'; |
313 |
push @errors, 'ERROR_age_limitations'; |
314 |
- |
|
|