- #find out stats
-
- $$borrower{'dateexpiry'}= C4::Dates->new($$borrower{'dateexpiry'},'iso')->output('syspref');
-
- my %row = (
- count => $index++,
- %$borrower,
- %{$categories_dislay{$$borrower{categorycode}}},
- );
- push(@resultsdata, \%row);
+ # find out stats
+ $borrower->{'dateexpiry'}= C4::Dates->new($borrower->{'dateexpiry'},'iso')->output('syspref');
+ if ($categories_dislay{$borrower->{'categorycode'}}){
+ my %row = (
+ count => $index++,
+ %$borrower,
+ %{$categories_dislay{$$borrower{categorycode}}},
+ );
+ push(@resultsdata, \%row);
+ }
+ else {
+ warn $borrower->{'cardnumber'} ." has a bad category code of " . $borrower->{'categorycode'} ."\n";
+ }