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