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

(-)a/members/memberentry.pl (-4 / +1 lines)
Lines 135-142 my @field_check=split(/\|/,$check_BorrowerMandatoryField); Link Here
135
foreach (@field_check) {
135
foreach (@field_check) {
136
	$template->param( "mandatory$_" => 1);    
136
	$template->param( "mandatory$_" => 1);    
137
}
137
}
138
# we'll need this, later.
139
my $dateofbirthmandatory = (scalar grep {$_ eq "dateofbirth"} @field_check) ? 1 : 0;
140
# function to designate unwanted fields
138
# function to designate unwanted fields
141
my $check_BorrowerUnwantedField=C4::Context->preference("BorrowerUnwantedField");
139
my $check_BorrowerUnwantedField=C4::Context->preference("BorrowerUnwantedField");
142
@field_check=split(/\|/,$check_BorrowerUnwantedField);
140
@field_check=split(/\|/,$check_BorrowerUnwantedField);
Lines 305-311 if ($op eq 'save' || $op eq 'insert'){ Link Here
305
                : ()
303
                : ()
306
    }
304
    }
307
305
308
    if ($newdata{dateofbirth} && $dateofbirthmandatory) {
306
    if ( $newdata{dateofbirth} ) {
309
        my $age = GetAge($newdata{dateofbirth});
307
        my $age = GetAge($newdata{dateofbirth});
310
        my $borrowercategory=GetBorrowercategory($newdata{'categorycode'});   
308
        my $borrowercategory=GetBorrowercategory($newdata{'categorycode'});   
311
        my ($low,$high) = ($borrowercategory->{'dateofbirthrequired'}, $borrowercategory->{'upperagelimit'});
309
        my ($low,$high) = ($borrowercategory->{'dateofbirthrequired'}, $borrowercategory->{'upperagelimit'});
312
- 

Return to bug 11925