View | Details | Raw Unified | Return to bug 17521
Collapse All | Expand All

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

Return to bug 17521