X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=opac%2Fopac-main.pl;h=2398b6a4aad9f4e5b267c4e1a6377ba7dececfef;hb=4a060e18f994d98e6212c8578ab358c54820a97b;hp=421eb9c18872f9962a2dccaf5e0220a2eb4341eb;hpb=c6ea593971502833ff6f37c3eccc994d5b15171e;p=koha.git diff --git a/opac/opac-main.pl b/opac/opac-main.pl index 421eb9c188..2398b6a4aa 100755 --- a/opac/opac-main.pl +++ b/opac/opac-main.pl @@ -25,6 +25,10 @@ use C4::Output; use C4::NewsChannels; # GetNewsToDisplay use C4::Languages qw(getTranslatedLanguages accept_language); use C4::Koha qw( GetDailyQuote ); +use C4::Members; +use C4::Overdues; +use Koha::Checkouts; +use Koha::Holds; my $input = new CGI; my $dbh = C4::Context->dbh; @@ -54,7 +58,7 @@ if (C4::Context->userenv) { if (defined $input->param('branch') and length $input->param('branch')) { $homebranch = $input->param('branch'); } -if (C4::Context->userenv and defined $input->param('branch') and length $input->param('branch') == 0 ){ +elsif (C4::Context->userenv and defined $input->param('branch') and length $input->param('branch') == 0 ){ $homebranch = ""; } my $all_koha_news = &GetNewsToDisplay($news_lang,$homebranch); @@ -62,6 +66,29 @@ my $koha_news_count = scalar @$all_koha_news; my $quote = GetDailyQuote(); # other options are to pass in an exact quote id or select a random quote each pass... see perldoc C4::Koha +# For dashboard +my $patron = Koha::Patrons->find( $borrowernumber ); + +if ( $patron ) { + my $checkouts = Koha::Checkouts->search({ borrowernumber => $borrowernumber })->count; + my ( $overdues_count, $overdues ) = checkoverdues($borrowernumber); + my $holds_pending = Koha::Holds->search({ borrowernumber => $borrowernumber, found => undef })->count; + my $holds_waiting = Koha::Holds->search({ borrowernumber => $borrowernumber })->waiting->count; + + my $total = $patron->account->balance; + + if ( $checkouts > 0 || $overdues_count > 0 || $holds_pending > 0 || $holds_waiting > 0 || $total > 0 ) { + $template->param( + dashboard_info => 1, + checkouts => $checkouts, + overdues => $overdues_count, + holds_pending => $holds_pending, + holds_waiting => $holds_waiting, + total_owing => $total, + ); + } +} + $template->param( koha_news => $all_koha_news, koha_news_count => $koha_news_count, @@ -75,8 +102,4 @@ if (C4::Context->preference('GoogleIndicTransliteration')) { $template->param('GoogleIndicTransliteration' => 1); } -if (C4::Context->preference('OPACNumbersPreferPhrase')) { - $template->param('numbersphr' => 1); -} - output_html_with_http_headers $input, $cookie, $template->output;