| 
      
            Lines 614-620
          foreach my $category_type (qw(C A S P I X)) {
      
      
        Link Here
      
     | 
  
        
          | 614 | 
                    { 'categorycode' => $patron_category->categorycode, | 
          614 | 
                    { 'categorycode' => $patron_category->categorycode, | 
        
        
          | 615 | 
                      'categoryname' => $patron_category->description,  | 
          615 | 
                      'categoryname' => $patron_category->description,  | 
        
        
          | 616 | 
                      'categorycodeselected' =>  | 
          616 | 
                      'categorycodeselected' =>  | 
        
          
            
              | 617 | 
                            ( ( defined( $borrower_data->{'categorycode'} ) && $patron_category->categorycode eq $borrower_data->{'categorycode'} ) || ( defined($categorycode) && $patron_category->categorycode eq $categorycode ) ), | 
              617 | 
                            ( defined($categorycode) && $patron_category->categorycode eq $categorycode ),  | 
            
        
          | 618 | 
                    };  | 
          618 | 
                    };  | 
        
        
          | 619 | 
              }  | 
          619 | 
              }  | 
        
        
          | 620 | 
              my %typehash;  | 
          620 | 
              my %typehash;  | 
        
            
              | 621 | 
              -   | 
               | 
               |