use C4::Koha;
use C4::Biblio;
use C4::Circulation;
-use C4::Dates qw/format_date/;
use C4::Members;
+use Koha::DateUtils;
use C4::Output;
# get borrower information ....
my ( $borr ) = GetMemberDetails( $borrowernumber );
-$template->param($borr);
+$template->param(%{$borr});
my $itemtypes = GetItemTypes();
my ( $issues ) = GetAllIssues( $borrowernumber, $order, $limit );
-my @bordat;
-$bordat[0] = $borr;
-$template->param( BORROWER_INFO => \@bordat );
my @loop_reading;
foreach my $issue (@{$issues} ) {
my %line;
- my $record = GetMarcBiblio($issues->[$i]->{'biblionumber'});
+ my $record = GetMarcBiblio($issue->{'biblionumber'});
# XISBN Stuff
my $isbn = GetNormalizedISBN($issue->{'isbn'});
$line{title} = $issue->{'title'};
$line{author} = $issue->{'author'};
$line{itemcallnumber} = $issue->{'itemcallnumber'};
- $line{date_due} = format_date( $issue->{'date_due'} );
- $line{returndate} = format_date( $issue->{'returndate'} );
+ $line{date_due} = $issue->{'date_due'};
+ $line{returndate} = $issue->{'returndate'};
$line{volumeddesc} = $issue->{'volumeddesc'};
- if($issue{'itemtype'}) {
+ $issue->{'itemtype'} = C4::Context->preference('item-level_itypes') ? $issue->{'itype'} : $issue->{'itemtype'};
+ if($issue->{'itemtype'}) {
$line{'description'} = $itemtypes->{ $issue->{'itemtype'} }->{'description'};
$line{imageurl} = getitemtypeimagelocation( 'opac', $itemtypes->{ $issue->{'itemtype'} }->{'imageurl'} );
}
push( @loop_reading, \%line );
- $line{subtitle} = GetRecordValue('subtitle', $record, GetFrameworkCode($issues->[$i]->{'biblionumber'}));
+ $line{subtitle} = GetRecordValue('subtitle', $record, GetFrameworkCode($issue->{'biblionumber'}));
}
if (C4::Context->preference('BakerTaylorEnabled')) {