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