| 
      
            Lines 260-266
          sub calculate {
      
      
        Link Here
      
     | 
  
        
          | 260 | 
                  $linefield = $line;  | 
          260 | 
                  $linefield = $line;  | 
        
        
          | 261 | 
              }  | 
          261 | 
              }  | 
        
        
          | 262 | 
              my $patron_categories = Koha::Patron::Categories->search({}, {order_by => ['categorycode']}); | 
          262 | 
              my $patron_categories = Koha::Patron::Categories->search({}, {order_by => ['categorycode']}); | 
        
          
            
              | 263 | 
                  push @loopfilter, {debug=>1, crit=>"\%cathash", filter=>join(", ", map { $_->categorycode . ' (' . ( $_->description || 'NO_DESCRIPTION' ) . ')'} $patron_categories->as_list )}; | 
              263 | 
                  push @loopfilter,  | 
            
            
               | 
               | 
              264 | 
                      { | 
            
            
              | 265 | 
                          debug  => 1,  | 
            
            
              | 266 | 
                          crit   => "Patron category",  | 
            
            
              | 267 | 
                          filter => join( ", ", map { $_->categorycode . ' (' . ( $_->description || 'NO_DESCRIPTION' ) . ')' } $patron_categories->as_list ), | 
            
            
              | 268 | 
                      };  | 
            
        
          | 264 | 
           | 
          269 | 
           | 
        
        
          | 265 | 
              my $strsth;  | 
          270 | 
              my $strsth;  | 
        
        
          | 266 | 
              my @strparams; # bind parameters for the query  | 
          271 | 
              my @strparams; # bind parameters for the query  | 
        
            
              | 267 | 
              -   | 
               | 
               |