+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});
+}