X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=catalogue%2Fissuehistory.pl;h=ffb8d0284d28e740dd48e8ba9ef08d1e9b8eddbd;hb=de03c263f0579d28a735e3b1261121e439263a82;hp=2f0825a2aea33a28e5acff412b9e7830aeada845;hpb=c16539a291c27c733ecacc18ac99820edbbde269;p=koha.git diff --git a/catalogue/issuehistory.pl b/catalogue/issuehistory.pl index 2f0825a2ae..ffb8d0284d 100755 --- a/catalogue/issuehistory.pl +++ b/catalogue/issuehistory.pl @@ -17,14 +17,15 @@ use strict; -require Exporter; +#use warnings; FIXME - Bug 2505 + use CGI; use C4::Auth; use C4::Output; use C4::Circulation; # GetBiblioIssues use C4::Biblio; # GetBiblio GetBiblioFromItemNumber -use C4::Date; +use C4::Search; # enabled_staff_search_views my $query = new CGI; my ( $template, $borrowernumber, $cookie ) = get_template_and_user( @@ -33,7 +34,7 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user( query => $query, type => "intranet", authnotrequired => 0, - flagsrequired => { circulate => 1 }, + flagsrequired => { circulate => "circulate_remaining_permissions" }, } ); @@ -41,38 +42,36 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user( my $params = $query->Vars; my $biblionumber = $params->{'biblionumber'}; -my $itemnumber = $params->{'itemnumber'}; -my $title = $params->{'title'}; -my $author = $params->{'author'}; +my $itemnumber = $params->{'itemnumber'}; + +if (C4::Context->preference("HidePatronName")) { + $template->param(HidePatronName => 1); +} -my ($issues,$biblio,$title,$author,$barcode); +my ($issues,$biblio,$barcode); if ($itemnumber){ -$issues=GetItemIssues($itemnumber); -$biblio=GetBiblioFromItemNumber($itemnumber); -$biblionumber=$biblio->{biblionumber}; -$barcode=$issues->[0]->{barcode}; -$template->param( - %$biblio, - barcode=> $barcode, -); + $issues=GetItemIssues($itemnumber); + $biblio=GetBiblioFromItemNumber($itemnumber); + $biblionumber=$biblio->{biblionumber}; + $barcode=$issues->[0]->{barcode}; + $template->param( + %$biblio, + barcode=> $barcode, + ); } else { -my @biblio; -$issues = GetBiblioIssues($biblionumber); -my (undef,@biblio)=GetBiblio($biblionumber); -my $total = scalar @$issues; -$template->param( - %{$biblio[0]}, -); + $issues = GetBiblioIssues($biblionumber); + my $biblio = GetBiblio($biblionumber); + my $total = scalar @$issues; + $template->param( + %{$biblio}, + ); } -foreach (@$issues){ - $_->{date_due}=format_date($_->{date_due}); - $_->{issuedate}=format_date($_->{issuedate}); - $_->{returndate}=format_date($_->{returndate}); -} + $template->param( total => scalar @$issues, issues => $issues, issuehistoryview => 1, + C4::Search::enabled_staff_search_views, ); output_html_with_http_headers $query, $cookie, $template->output;