-my $search_category = 'A';
-if ( $category_type eq 'P' ) {
- $search_category = 'I';
-}
-
-my ( $count, $results );
-my @resultsdata;
-
-if ( $member ne '' ) {
- $results =
- Search( { '' => $member, category_type => $search_category }, $orderby );
-
- $count = $results ? @$results : 0;
-
- for ( my $i = 0 ; $i < $count ; $i++ ) {
- my %row = (
- count => $i + 1,
- borrowernumber => $results->[$i]{'borrowernumber'},
- cardnumber => $results->[$i]{'cardnumber'},
- surname => $results->[$i]{'surname'},
- firstname => $results->[$i]{'firstname'},
- categorycode => $results->[$i]{'categorycode'},
- streetnumber => $results->[$i]{'streetnumber'},
- address => $results->[$i]{'address'},
- address2 => $results->[$i]{'address2'},
- city => $results->[$i]{'city'},
- state => $results->[$i]{'state'},
- zipcode => $results->[$i]{'zipcode'},
- country => $results->[$i]{'country'},
- branchcode => $results->[$i]{'branchcode'},
- dateofbirth => format_date( $results->[$i]{'dateofbirth'} ),
- borrowernotes => $results->[$i]{'borrowernotes'}
- );
-
- push( @resultsdata, \%row );
- }
-}