@@ -, +, @@ --- Koha/Template/Plugin/Borrowers.pm | 10 --- .../prog/en/includes/members-toolbar.inc | 4 +- members/boraccount.pl | 59 ++++++++++---------- members/deletemem.pl | 41 +++++++------ members/files.pl | 5 +- members/mancredit.pl | 54 +++++++++--------- members/maninvoice.pl | 54 +++++++++--------- members/member-flags.pl | 55 +++++++++--------- members/member-password.pl | 58 ++++++++++--------- members/moremember.pl | 1 + members/notices.pl | 17 +++--- members/pay.pl | 7 +- members/paycollect.pl | 13 ++-- members/readingrec.pl | 59 ++++++++++---------- members/routing-lists.pl | 52 +++++++++--------- members/statistics.pl | 15 +++-- 16 files changed, 257 insertions(+), 247 deletions(-) --- a/Koha/Template/Plugin/Borrowers.pm +++ a/Koha/Template/Plugin/Borrowers.pm @@ -23,7 +23,6 @@ use Modern::Perl; use base qw( Template::Plugin ); use Koha::Borrower::Debarments qw(); -use C4::Members qw(HasOverdues); =pod @@ -49,13 +48,4 @@ sub IsDebarred { return Koha::Borrower::Debarments::IsDebarred($borrower->{borrowernumber}); } -sub HasOverdues { - my ( $self, $borrowernumber ) = @_; - - return unless $borrowernumber; - - return C4::Members::HasOverdues($borrowernumber); -} - - 1; --- a/koha-tmpl/intranet-tmpl/prog/en/includes/members-toolbar.inc +++ a/koha-tmpl/intranet-tmpl/prog/en/includes/members-toolbar.inc @@ -167,8 +167,8 @@ function searchToHold(){ --- a/members/boraccount.pl +++ a/members/boraccount.pl @@ -109,35 +109,36 @@ my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettyp my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'}; $template->param( - finesview => 1, - firstname => $data->{'firstname'}, - surname => $data->{'surname'}, - othernames => $data->{'othernames'}, - borrowernumber => $borrowernumber, - cardnumber => $data->{'cardnumber'}, - categorycode => $data->{'categorycode'}, - category_type => $data->{'category_type'}, - categoryname => $data->{'description'}, - address => $address, - address2 => $data->{'address2'}, - city => $data->{'city'}, - state => $data->{'state'}, - zipcode => $data->{'zipcode'}, - country => $data->{'country'}, - phone => $data->{'phone'}, - phonepro => $data->{'phonepro'}, - mobile => $data->{'mobile'}, - email => $data->{'email'}, - emailpro => $data->{'emailpro'}, - branchcode => $data->{'branchcode'}, - branchname => GetBranchName($data->{'branchcode'}), - total => sprintf("%.2f",$total), - totalcredit => $totalcredit, - is_child => ($data->{'category_type'} eq 'C'), - reverse_col => $reverse_col, - accounts => $accts, - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), + has_overdues => HasOverdues($borrowernumber), + finesview => 1, + firstname => $data->{'firstname'}, + surname => $data->{'surname'}, + othernames => $data->{'othernames'}, + borrowernumber => $borrowernumber, + cardnumber => $data->{'cardnumber'}, + categorycode => $data->{'categorycode'}, + category_type => $data->{'category_type'}, + categoryname => $data->{'description'}, + address => $address, + address2 => $data->{'address2'}, + city => $data->{'city'}, + state => $data->{'state'}, + zipcode => $data->{'zipcode'}, + country => $data->{'country'}, + phone => $data->{'phone'}, + phonepro => $data->{'phonepro'}, + mobile => $data->{'mobile'}, + email => $data->{'email'}, + emailpro => $data->{'emailpro'}, + branchcode => $data->{'branchcode'}, + branchname => GetBranchName( $data->{'branchcode'} ), + total => sprintf( "%.2f", $total ), + totalcredit => $totalcredit, + is_child => ( $data->{'category_type'} eq 'C' ), + reverse_col => $reverse_col, + accounts => $accts, + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), ); output_html_with_http_headers $input, $cookie, $template->output; --- a/members/deletemem.pl +++ a/members/deletemem.pl @@ -105,26 +105,29 @@ if ($countissues > 0 or $flags->{'CHARGES'} or $data->{'borrowernumber'} or $de my ($picture, $dberror) = GetPatronImage($bor->{'borrowernumber'}); $template->param( picture => 1 ) if $picture; - $template->param(borrowernumber => $member, - surname => $bor->{'surname'}, - title => $bor->{'title'}, - cardnumber => $bor->{'cardnumber'}, - firstname => $bor->{'firstname'}, - categorycode => $bor->{'categorycode'}, - category_type => $bor->{'category_type'}, - categoryname => $bor->{'description'}, - address => $bor->{'address'}, - address2 => $bor->{'address2'}, - city => $bor->{'city'}, - zipcode => $bor->{'zipcode'}, - country => $bor->{'country'}, - phone => $bor->{'phone'}, - email => $bor->{'email'}, - branchcode => $bor->{'branchcode'}, - branchname => GetBranchName($bor->{'branchcode'}), - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), + $template->param( + has_overdues => HasOverdues($borrowernumber), + borrowernumber => $member, + surname => $bor->{'surname'}, + title => $bor->{'title'}, + cardnumber => $bor->{'cardnumber'}, + firstname => $bor->{'firstname'}, + categorycode => $bor->{'categorycode'}, + category_type => $bor->{'category_type'}, + categoryname => $bor->{'description'}, + address => $bor->{'address'}, + address2 => $bor->{'address2'}, + city => $bor->{'city'}, + zipcode => $bor->{'zipcode'}, + country => $bor->{'country'}, + phone => $bor->{'phone'}, + email => $bor->{'email'}, + branchcode => $bor->{'branchcode'}, + branchname => GetBranchName( $bor->{'branchcode'} ), + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), ); + if ($countissues >0) { $template->param(ItemsOnIssues => $countissues); } --- a/members/files.pl +++ a/members/files.pl @@ -44,7 +44,10 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( debug => 1, } ); -$template->param( 'borrower_files' => 1 ); +$template->param( + 'borrower_files' => 1, + has_overdues => HasOverdues($borrowernumber), +); my $borrowernumber = $cgi->param('borrowernumber'); my $bf = Koha::Borrower::Files->new( borrowernumber => $borrowernumber ); --- a/members/mancredit.pl +++ a/members/mancredit.pl @@ -96,31 +96,33 @@ my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettyp my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'}; $template->param( - finesview => 1, - borrowernumber => $borrowernumber, - firstname => $data->{'firstname'}, - surname => $data->{'surname'}, - othernames => $data->{'othernames'}, - cardnumber => $data->{'cardnumber'}, - categorycode => $data->{'categorycode'}, - category_type => $data->{'category_type'}, - categoryname => $data->{'description'}, - address => $address, - address2 => $data->{'address2'}, - city => $data->{'city'}, - state => $data->{'state'}, - zipcode => $data->{'zipcode'}, - country => $data->{'country'}, - phone => $data->{'phone'}, - phonepro => $data->{'phonepro'}, - mobile => $data->{'mobile'}, - email => $data->{'email'}, - emailpro => $data->{'emailpro'}, - branchcode => $data->{'branchcode'}, - branchname => GetBranchName($data->{'branchcode'}), - is_child => ($data->{'category_type'} eq 'C'), - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), - ); + has_overdues => HasOverdues($borrowernumber), + finesview => 1, + borrowernumber => $borrowernumber, + firstname => $data->{'firstname'}, + surname => $data->{'surname'}, + othernames => $data->{'othernames'}, + cardnumber => $data->{'cardnumber'}, + categorycode => $data->{'categorycode'}, + category_type => $data->{'category_type'}, + categoryname => $data->{'description'}, + address => $address, + address2 => $data->{'address2'}, + city => $data->{'city'}, + state => $data->{'state'}, + zipcode => $data->{'zipcode'}, + country => $data->{'country'}, + phone => $data->{'phone'}, + phonepro => $data->{'phonepro'}, + mobile => $data->{'mobile'}, + email => $data->{'email'}, + emailpro => $data->{'emailpro'}, + branchcode => $data->{'branchcode'}, + branchname => GetBranchName( $data->{'branchcode'} ), + is_child => ( $data->{'category_type'} eq 'C' ), + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), + ); + output_html_with_http_headers $input, $cookie, $template->output; } --- a/members/maninvoice.pl +++ a/members/maninvoice.pl @@ -121,32 +121,34 @@ if (C4::Context->preference('ExtendedPatronAttributes')) { my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettype} ); my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'}; - $template->param( - finesview => 1, - borrowernumber => $borrowernumber, - firstname => $data->{'firstname'}, - surname => $data->{'surname'}, - othernames => $data->{'othernames'}, - cardnumber => $data->{'cardnumber'}, - categorycode => $data->{'categorycode'}, - category_type => $data->{'category_type'}, - categoryname => $data->{'description'}, - address => $address, - address2 => $data->{'address2'}, - city => $data->{'city'}, - state => $data->{'state'}, - zipcode => $data->{'zipcode'}, - country => $data->{'country'}, - phone => $data->{'phone'}, - phonepro => $data->{'phonepro'}, - mobile => $data->{'mobile'}, - email => $data->{'email'}, - emailpro => $data->{'emailpro'}, - branchcode => $data->{'branchcode'}, - branchname => GetBranchName($data->{'branchcode'}), - is_child => ($data->{'category_type'} eq 'C'), - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), + $template->param( + has_overdues => HasOverdues($borrowernumber), + finesview => 1, + borrowernumber => $borrowernumber, + firstname => $data->{'firstname'}, + surname => $data->{'surname'}, + othernames => $data->{'othernames'}, + cardnumber => $data->{'cardnumber'}, + categorycode => $data->{'categorycode'}, + category_type => $data->{'category_type'}, + categoryname => $data->{'description'}, + address => $address, + address2 => $data->{'address2'}, + city => $data->{'city'}, + state => $data->{'state'}, + zipcode => $data->{'zipcode'}, + country => $data->{'country'}, + phone => $data->{'phone'}, + phonepro => $data->{'phonepro'}, + mobile => $data->{'mobile'}, + email => $data->{'email'}, + emailpro => $data->{'emailpro'}, + branchcode => $data->{'branchcode'}, + branchname => GetBranchName( $data->{'branchcode'} ), + is_child => ( $data->{'category_type'} eq 'C' ), + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), ); + output_html_with_http_headers $input, $cookie, $template->output; } --- a/members/member-flags.pl +++ a/members/member-flags.pl @@ -175,33 +175,34 @@ if (C4::Context->preference('ExtendedPatronAttributes')) { my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $bor->{streettype} ); my $address = $bor->{'streetnumber'} . " $roadtype " . $bor->{'address'}; -$template->param( - borrowernumber => $bor->{'borrowernumber'}, - cardnumber => $bor->{'cardnumber'}, - surname => $bor->{'surname'}, - firstname => $bor->{'firstname'}, - othernames => $bor->{'othernames'}, - categorycode => $bor->{'categorycode'}, - category_type => $bor->{'category_type'}, - categoryname => $bor->{'description'}, - address => $address, - address2 => $bor->{'address2'}, - city => $bor->{'city'}, - state => $bor->{'state'}, - zipcode => $bor->{'zipcode'}, - country => $bor->{'country'}, - phone => $bor->{'phone'}, - phonepro => $bor->{'phonepro'}, - mobile => $bor->{'mobile'}, - email => $bor->{'email'}, - emailpro => $bor->{'emailpro'}, - branchcode => $bor->{'branchcode'}, - branchname => GetBranchName($bor->{'branchcode'}), - loop => \@loop, - is_child => ($bor->{'category_type'} eq 'C'), - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), - ); + $template->param( + has_overdues => HasOverdues($borrowernumber), + borrowernumber => $bor->{'borrowernumber'}, + cardnumber => $bor->{'cardnumber'}, + surname => $bor->{'surname'}, + firstname => $bor->{'firstname'}, + othernames => $bor->{'othernames'}, + categorycode => $bor->{'categorycode'}, + category_type => $bor->{'category_type'}, + categoryname => $bor->{'description'}, + address => $address, + address2 => $bor->{'address2'}, + city => $bor->{'city'}, + state => $bor->{'state'}, + zipcode => $bor->{'zipcode'}, + country => $bor->{'country'}, + phone => $bor->{'phone'}, + phonepro => $bor->{'phonepro'}, + mobile => $bor->{'mobile'}, + email => $bor->{'email'}, + emailpro => $bor->{'emailpro'}, + branchcode => $bor->{'branchcode'}, + branchname => GetBranchName( $bor->{'branchcode'} ), + loop => \@loop, + is_child => ( $bor->{'category_type'} eq 'C' ), + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), + ); output_html_with_http_headers $input, $cookie, $template->output; --- a/members/member-password.pl +++ a/members/member-password.pl @@ -104,34 +104,36 @@ if (C4::Context->preference('ExtendedPatronAttributes')) { my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $bor->{streettype} ); my $address = $bor->{'streetnumber'} . " $roadtype " . $bor->{'address'}; - $template->param( othernames => $bor->{'othernames'}, - surname => $bor->{'surname'}, - firstname => $bor->{'firstname'}, - borrowernumber => $bor->{'borrowernumber'}, - cardnumber => $bor->{'cardnumber'}, - categorycode => $bor->{'categorycode'}, - category_type => $bor->{'category_type'}, - categoryname => $bor->{'description'}, - address => $address, - address2 => $bor->{'address2'}, - city => $bor->{'city'}, - state => $bor->{'state'}, - zipcode => $bor->{'zipcode'}, - country => $bor->{'country'}, - phone => $bor->{'phone'}, - phonepro => $bor->{'phonepro'}, - mobile => $bor->{'mobile'}, - email => $bor->{'email'}, - emailpro => $bor->{'emailpro'}, - branchcode => $bor->{'branchcode'}, - branchname => GetBranchName($bor->{'branchcode'}), - userid => $bor->{'userid'}, - destination => $destination, - is_child => ($bor->{'category_type'} eq 'C'), - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - minPasswordLength => $minpw, - RoutingSerials => C4::Context->preference('RoutingSerials'), - ); + $template->param( + othernames => $bor->{'othernames'}, + has_overdues => HasOverdues($borrowernumber), + surname => $bor->{'surname'}, + firstname => $bor->{'firstname'}, + borrowernumber => $bor->{'borrowernumber'}, + cardnumber => $bor->{'cardnumber'}, + categorycode => $bor->{'categorycode'}, + category_type => $bor->{'category_type'}, + categoryname => $bor->{'description'}, + address => $address, + address2 => $bor->{'address2'}, + city => $bor->{'city'}, + state => $bor->{'state'}, + zipcode => $bor->{'zipcode'}, + country => $bor->{'country'}, + phone => $bor->{'phone'}, + phonepro => $bor->{'phonepro'}, + mobile => $bor->{'mobile'}, + email => $bor->{'email'}, + emailpro => $bor->{'emailpro'}, + branchcode => $bor->{'branchcode'}, + branchname => GetBranchName( $bor->{'branchcode'} ), + userid => $bor->{'userid'}, + destination => $destination, + is_child => ( $bor->{'category_type'} eq 'C' ), + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + minPasswordLength => $minpw, + RoutingSerials => C4::Context->preference('RoutingSerials'), + ); if( scalar(@errors )){ $template->param( errormsg => 1 ); --- a/members/moremember.pl +++ a/members/moremember.pl @@ -358,6 +358,7 @@ my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'}; # in template => instutitional (A for Adult, C for children) $template->param( $data->{'categorycode'} => 1 ); $template->param( + has_overdues => HasOverdues($borrowernumber), detailview => 1, AllowRenewalLimitOverride => C4::Context->preference("AllowRenewalLimitOverride"), CANDELETEUSER => $candeleteuser, --- a/members/notices.pl +++ a/members/notices.pl @@ -67,14 +67,15 @@ my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{'stre my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'}; $template->param( - QUEUED_MESSAGES => $queued_messages, - borrowernumber => $borrowernumber, - sentnotices => 1, - branchname => GetBranchName($borrower->{'branchcode'}), - categoryname => $borrower->{'description'}, - address => $address, - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), + has_overdues => HasOverdues($borrowernumber), + QUEUED_MESSAGES => $queued_messages, + borrowernumber => $borrowernumber, + sentnotices => 1, + branchname => GetBranchName( $borrower->{'branchcode'} ), + categoryname => $borrower->{'description'}, + address => $address, + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), ); output_html_with_http_headers $input, $cookie, $template->output; --- a/members/pay.pl +++ a/members/pay.pl @@ -104,9 +104,10 @@ for (@names) { } $template->param( - finesview => 1, - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), + has_overdues => HasOverdues($borrowernumber), + finesview => 1, + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), ); add_accounts_to_template(); --- a/members/paycollect.pl +++ a/members/paycollect.pl @@ -144,12 +144,13 @@ if ( $total_paid and $total_paid ne '0.00' ) { borrower_add_additional_fields($borrower); $template->param( - borrowernumber => $borrowernumber, # some templates require global - borrower => $borrower, - total => $total_due, - activeBorrowerRelationship => (C4::Context->preference('borrowerRelationship') ne ''), - RoutingSerials => C4::Context->preference('RoutingSerials'), - ExtendedPatronAttributes => C4::Context->preference('ExtendedPatronAttributes'), + has_overdues => HasOverdues($borrowernumber), + borrowernumber => $borrowernumber, # some templates require global + borrower => $borrower, + total => $total_due, + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), + ExtendedPatronAttributes => C4::Context->preference('ExtendedPatronAttributes'), ); output_html_with_http_headers $input, $cookie, $template->output; --- a/members/readingrec.pl +++ a/members/readingrec.pl @@ -128,35 +128,36 @@ my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $data->{streettyp my $address = $data->{'streetnumber'} . " $roadtype " . $data->{'address'}; $template->param( - readingrecordview => 1, - title => $data->{title}, - initials => $data->{initials}, - surname => $data->{surname}, - othernames => $data->{othernames}, - borrowernumber => $borrowernumber, - firstname => $data->{firstname}, - cardnumber => $data->{cardnumber}, - categorycode => $data->{categorycode}, - category_type => $data->{category_type}, - categoryname => $data->{description}, - address => $address, - address2 => $data->{address2}, - city => $data->{city}, - state => $data->{state}, - zipcode => $data->{zipcode}, - country => $data->{country}, - phone => $data->{phone}, - phonepro => $data->{phonepro}, - mobile => $data->{mobile}, - email => $data->{email}, - emailpro => $data->{emailpro}, - branchcode => $data->{branchcode}, - is_child => ( $data->{category_type} eq 'C' ), - branchname => $branches->{ $data->{branchcode} }->{branchname}, - loop_reading => $issues, - activeBorrowerRelationship => - ( C4::Context->preference('borrowerRelationship') ne '' ), - RoutingSerials => C4::Context->preference('RoutingSerials'), + has_overdues => HasOverdues($borrowernumber), + readingrecordview => 1, + title => $data->{title}, + initials => $data->{initials}, + surname => $data->{surname}, + othernames => $data->{othernames}, + borrowernumber => $borrowernumber, + firstname => $data->{firstname}, + cardnumber => $data->{cardnumber}, + categorycode => $data->{categorycode}, + category_type => $data->{category_type}, + categoryname => $data->{description}, + address => $address, + address2 => $data->{address2}, + city => $data->{city}, + state => $data->{state}, + zipcode => $data->{zipcode}, + country => $data->{country}, + phone => $data->{phone}, + phonepro => $data->{phonepro}, + mobile => $data->{mobile}, + email => $data->{email}, + emailpro => $data->{emailpro}, + branchcode => $data->{branchcode}, + is_child => ( $data->{category_type} eq 'C' ), + branchname => $branches->{ $data->{branchcode} }->{branchname}, + loop_reading => $issues, + activeBorrowerRelationship => ( C4::Context->preference('borrowerRelationship') ne '' ), + RoutingSerials => C4::Context->preference('RoutingSerials'), ); + output_html_with_http_headers $input, $cookie, $template->output; --- a/members/routing-lists.pl +++ a/members/routing-lists.pl @@ -106,32 +106,32 @@ my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{stree my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'}; $template->param( - - findborrower => $findborrower, - borrower => $borrower, - borrowernumber => $borrowernumber, - branch => $branch, - branchname => GetBranchName($borrower->{'branchcode'}), - title => $borrower->{'title'}, - initials => $borrower->{'initials'}, - firstname => $borrower->{'firstname'}, - surname => $borrower->{'surname'}, - othernames => $borrower->{'othernames'}, - categorycode => $borrower->{'categorycode'}, - categoryname => $borrower->{description}, - address => $address, - address2 => $borrower->{'address2'}, - phone => $borrower->{'phone'}, - phonepro => $borrower->{'phonepro'}, - mobile => $borrower->{'mobile'}, - email => $borrower->{'email'}, - emailpro => $borrower->{'emailpro'}, - borrowernotes => $borrower->{'borrowernotes'}, - city => $borrower->{'city'}, - state => $borrower->{'state'}, - zipcode => $borrower->{'zipcode'}, - country => $borrower->{'country'}, - cardnumber => $borrower->{'cardnumber'}, + has_overdues => HasOverdues($borrowernumber), + findborrower => $findborrower, + borrower => $borrower, + borrowernumber => $borrowernumber, + branch => $branch, + branchname => GetBranchName( $borrower->{'branchcode'} ), + title => $borrower->{'title'}, + initials => $borrower->{'initials'}, + firstname => $borrower->{'firstname'}, + surname => $borrower->{'surname'}, + othernames => $borrower->{'othernames'}, + categorycode => $borrower->{'categorycode'}, + categoryname => $borrower->{description}, + address => $address, + address2 => $borrower->{'address2'}, + phone => $borrower->{'phone'}, + phonepro => $borrower->{'phonepro'}, + mobile => $borrower->{'mobile'}, + email => $borrower->{'email'}, + emailpro => $borrower->{'emailpro'}, + borrowernotes => $borrower->{'borrowernotes'}, + city => $borrower->{'city'}, + state => $borrower->{'state'}, + zipcode => $borrower->{'zipcode'}, + country => $borrower->{'country'}, + cardnumber => $borrower->{'cardnumber'}, RoutingSerials => C4::Context->preference('RoutingSerials'), ); --- a/members/statistics.pl +++ a/members/statistics.pl @@ -101,15 +101,16 @@ my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{stree my $address = $borrower->{'streetnumber'} . " $roadtype " . $borrower->{'address'}; $template->param( - statisticsview => 1, - datas => $datas, - address => $address, - column_names => \@statistic_column_names, - count_total_issues => $count_total_issues, + has_overdues => HasOverdues($borrowernumber), + statisticsview => 1, + datas => $datas, + address => $address, + column_names => \@statistic_column_names, + count_total_issues => $count_total_issues, count_total_issues_returned => $count_total_issues_returned, count_total_precedent_state => $count_total_precedent_state, - count_total_actual_state => $count_total_actual_state, - RoutingSerials => C4::Context->preference('RoutingSerials'), + count_total_actual_state => $count_total_actual_state, + RoutingSerials => C4::Context->preference('RoutingSerials'), ); output_html_with_http_headers $input, $cookie, $template->output; --