X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=catalogue%2Fissuehistory.pl;h=288182ccd8c5197fc3867197ff19130511875928;hb=b93e6df3a1b7051bc92220cf6bd829c2229bfa70;hp=aa2d3452bd8f501512dd27650307f4d7d4215c12;hpb=c596d553740ebb6299b133fc6b71ca47ed0ff2e7;p=koha_fer diff --git a/catalogue/issuehistory.pl b/catalogue/issuehistory.pl index aa2d3452bd..288182ccd8 100755 --- a/catalogue/issuehistory.pl +++ b/catalogue/issuehistory.pl @@ -15,15 +15,18 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; -require Exporter; +#use warnings; FIXME - Bug 2505 + use CGI; use C4::Auth; -use C4::Interface::CGI::Output; +use C4::Output; use C4::Circulation; # GetBiblioIssues +use C4::Biblio; # GetBiblio GetBiblioFromItemNumber +use C4::Search; # enabled_staff_search_views +use Koha::DateUtils; my $query = new CGI; my ( $template, $borrowernumber, $cookie ) = get_template_and_user( @@ -32,7 +35,7 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user( query => $query, type => "intranet", authnotrequired => 0, - flagsrequired => { circulate => 1 }, + flagsrequired => { circulate => "circulate_remaining_permissions" }, } ); @@ -40,23 +43,41 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user( my $params = $query->Vars; my $biblionumber = $params->{'biblionumber'}; -my $title = $params->{'title'}; -my $author = $params->{'author'}; - -my $issues = GetBiblioIssues($biblionumber); -my $total = scalar @$issues; +my $itemnumber = $params->{'itemnumber'}; -if ( $total && !$title ) { - $title = $issues->[0]->{'title'}; - $author = $issues->[0]->{'author'}; +if (C4::Context->preference("HidePatronName")) { + $template->param(HidePatronName => 1); } +my ($issues,$biblio,$barcode); +if ($itemnumber){ + $issues=GetItemIssues($itemnumber); + $biblio=GetBiblioFromItemNumber($itemnumber); + $biblionumber=$biblio->{biblionumber}; + $barcode=$issues->[0]->{barcode}; + $template->param( + %$biblio, + barcode=> $barcode, + ); +} else { + $issues = GetBiblioIssues($biblionumber); + my (undef,@biblio)=GetBiblio($biblionumber); + my $total = scalar @$issues; + $template->param( + %{$biblio[0]}, + ); +} +foreach (@{$issues}){ + $_->{date_due} = format_sqldatetime($_->{date_due}); + $_->{issuedate} = format_sqldatetime($_->{issuedate}); + $_->{returndate} = format_sqldatetime($_->{returndate}); + $_->{lastreneweddate} = format_sqldatetime($_->{lastreneweddate}); +} $template->param( - biblionumber => $biblionumber, total => scalar @$issues, - title => $title, - author => $author, - issues => $issues + issues => $issues, + issuehistoryview => 1, + C4::Search::enabled_staff_search_views, ); output_html_with_http_headers $query, $cookie, $template->output;