| Lines 2-8
          package C4::Utils::DataTables::Members;
      
      
        Link Here | 
        
          | 2 |  | 2 |  | 
        
          | 3 | use Modern::Perl; | 3 | use Modern::Perl; | 
        
          | 4 | use C4::Context; | 4 | use C4::Context; | 
          
            
              | 5 | use C4::Members qw/GetMemberIssuesAndFines/; | 5 | use C4::Members; | 
        
          | 6 | use C4::Members::Attributes qw/get_guarantor_shared_attributes/; | 6 | use C4::Members::Attributes qw/get_guarantor_shared_attributes/; | 
        
          | 7 | use C4::Utils::DataTables; | 7 | use C4::Utils::DataTables; | 
        
          | 8 | use Koha::DateUtils; | 8 | use Koha::DateUtils; | 
  
    | Lines 49-62
          sub search {
      
      
        Link Here | 
        
          | 49 |  | 49 |  | 
        
          | 50 |     } | 50 |     } | 
        
          | 51 |  | 51 |  | 
          
            
              | 52 |     my $dbh = C4::Context->dbh; | 52 |     $dbh = C4::Context->dbh; | 
        
          | 53 |     my @columns = qw( borrowernumber surname firstname streetnumber streettype address address2 city state zipcode country cardnumber dateexpiry borrowernotes branchcode email userid dateofbirth categorycode ); | 53 |     my @columns = qw( borrowernumber surname firstname streetnumber streettype address address2 city state zipcode country cardnumber dateexpiry borrowernotes branchcode email userid dateofbirth categorycode ); | 
        
          | 54 |     if( my @guarantor_attributes = @{ get_guarantor_shared_attributes() }){ | 54 |     if( my @guarantor_attributes = @{ get_guarantor_shared_attributes() }){ | 
        
          | 55 |         foreach my $item (@guarantor_attributes) { | 55 |         foreach my $item (@guarantor_attributes) { | 
        
          | 56 |              if (! grep {$_ eq $item} @columns) { | 56 |              if (! grep {$_ eq $item} @columns) { | 
        
          | 57 |                  push @columns, $item; | 57 |                  push @columns, $item; | 
          
            
              | 58 | 	     } | 58 |             } | 
            
              | 59 | 	} | 59 |         } | 
        
          | 60 |     }; | 60 |     }; | 
        
          | 61 |     my $borrowers_columns = ""; | 61 |     my $borrowers_columns = ""; | 
        
          | 62 |     foreach my $item (@columns) { | 62 |     foreach my $item (@columns) { |