| Lines 100-105
          $dbh->{RaiseError} = 0;
      
      
        Link Here | 
        
          | 100 | my $schema = Koha::Database->schema; | 100 | my $schema = Koha::Database->schema; | 
        
          | 101 | $schema->storage->txn_begin; | 101 | $schema->storage->txn_begin; | 
        
          | 102 |  | 102 |  | 
            
              |  |  | 103 | $schema->resultset( 'Issue' )->delete_all; | 
        
          | 103 | $schema->resultset( 'Borrower' )->delete_all; | 104 | $schema->resultset( 'Borrower' )->delete_all; | 
        
          | 104 | $schema->resultset( 'BorrowerAttribute' )->delete_all; | 105 | $schema->resultset( 'BorrowerAttribute' )->delete_all; | 
        
          | 105 | $schema->resultset( 'BorrowerAttributeType' )->delete_all; | 106 | $schema->resultset( 'BorrowerAttributeType' )->delete_all; | 
  
    | Lines 180-186
          $schema->resultset( 'Branch' )->delete_all;
      
      
        Link Here | 
        
          | 180 |  | 181 |  | 
        
          | 181 |     my $reply = C4::ILSDI::Services::GetPatronInfo( $query ); | 182 |     my $reply = C4::ILSDI::Services::GetPatronInfo( $query ); | 
        
          | 182 |  | 183 |  | 
          
            
              | 183 |     # Build a structure for comparision: | 184 |     # Build a structure for comparison: | 
        
          | 184 |     my $cmp = { | 185 |     my $cmp = { | 
        
          | 185 |         category_code     => $attr_type->{'category_code'}, | 186 |         category_code     => $attr_type->{'category_code'}, | 
        
          | 186 |         class             => $attr_type->{'class'}, | 187 |         class             => $attr_type->{'class'}, | 
  
    | Lines 193-199
          $schema->resultset( 'Branch' )->delete_all;
      
      
        Link Here | 
        
          | 193 |     }; | 194 |     }; | 
        
          | 194 |  | 195 |  | 
        
          | 195 |     # Check results: | 196 |     # Check results: | 
          
            
              | 196 |     is_deeply( $reply->{'attributes'}, [ $cmp ] ); | 197 |     is_deeply( $reply->{'attributes'}, [ $cmp ], 'Test GetPatronInfo - show_attributes parameter' ); | 
        
          | 197 | } | 198 | } | 
        
          | 198 |  | 199 |  | 
        
          | 199 | # Cleanup | 200 | # Cleanup | 
            
              | 200 | -  |  |  |