Lines 327-333
if ($op eq 'save' || $op eq 'insert'){
Link Here
|
327 |
# If the cardnumber is blank, treat it as null. |
327 |
# If the cardnumber is blank, treat it as null. |
328 |
$newdata{'cardnumber'} = undef if $newdata{'cardnumber'} =~ /^\s*$/; |
328 |
$newdata{'cardnumber'} = undef if $newdata{'cardnumber'} =~ /^\s*$/; |
329 |
|
329 |
|
330 |
if (my $error_code = checkcardnumber($newdata{cardnumber},$newdata{borrowernumber})){ |
330 |
if (my $error_code = checkcardnumber($newdata{cardnumber}, $borrowernumber)){ |
331 |
push @errors, $error_code == 1 |
331 |
push @errors, $error_code == 1 |
332 |
? 'ERROR_cardnumber_already_exists' |
332 |
? 'ERROR_cardnumber_already_exists' |
333 |
: $error_code == 2 |
333 |
: $error_code == 2 |
334 |
- |
|
|