| 
      
            Lines 382-390
          sub GetReservesFromBorrowernumber {
      
      
        Link Here
      
     | 
  
        
          | 382 | 
          sub CanBookBeReserved{ | 
          382 | 
          sub CanBookBeReserved{ | 
        
        
          | 383 | 
              my ($borrowernumber, $biblionumber) = @_;  | 
          383 | 
              my ($borrowernumber, $biblionumber) = @_;  | 
        
        
          | 384 | 
           | 
          384 | 
           | 
        
          
            
              | 385 | 
                  my @items = GetItemsInfo($biblionumber);  | 
              385 | 
                  my @items = get_itemnumbers_of($biblionumber);  | 
            
        
          | 386 | 
              foreach my $item (@items){ | 
          386 | 
              foreach my $item (@items){ | 
        
          
            
              | 387 | 
                      return 1 if CanItemBeReserved($borrowernumber, $item->{itemnumber}); | 
              387 | 
                      return 1 if CanItemBeReserved($borrowernumber, $item);  | 
            
        
          | 388 | 
              }  | 
          388 | 
              }  | 
        
        
          | 389 | 
              return 0;  | 
          389 | 
              return 0;  | 
        
        
          | 390 | 
          }  | 
          390 | 
          }  | 
        
            
              | 391 | 
              -   | 
               | 
               |