my ( $shelfnumber ,$sortfield) = @_;
my $dbh=C4::Context->dbh();
if(!$sortfield) {
- my $sthsort = $dbh->prepare('select sortfield from virtualshelves where shelfnumber=?');
+ my $sthsort = $dbh->prepare('SELECT sortfield FROM virtualshelves WHERE shelfnumber=?');
$sthsort->execute($shelfnumber);
($sortfield) = $sthsort->fetchrow_array;
}
my $query =
- " SELECT vc.biblionumber, vc.shelfnumber,
+ " SELECT vc.biblionumber, vc.shelfnumber, vc.dateadded,
biblio.*, biblioitems.itemtype, itemtypes.*
FROM virtualshelfcontents vc
LEFT JOIN biblio ON vc.biblionumber = biblio.biblionumber
use C4::Auth qw/get_session/;
use C4::Members;
use C4::Output;
+use C4::Date qw/format_date/;
use Exporter;
use vars qw($debug @EXPORT @ISA $VERSION);
for my $this_item (@$items) {
$this_item->{imageurl} = $imgdir."/".$itemtypes->{ $this_item->{itemtype} }->{'imageurl'};
$this_item->{'description'} = $itemtypes->{ $this_item->{itemtype} }->{'description'};
+ $this_item->{'dateadded'} = format_date($this_item->{'dateadded'});
}
$showadd = 1;
my $i = 0;
<!-- TMPL_VAR NAME="title" --> <!-- TMPL_VAR NAME="subtitle" --></a>
</td>
<td><!-- TMPL_VAR NAME="author" --></td>
- <td><!-- TMPL_VAR NAME="classification" --></td>
+ <td><!-- TMPL_VAR NAME="dateadded" --></td>
<td>
<!-- TMPL_UNLESS name="notforloan" -->
<a href="/cgi-bin/koha/reserve/request.pl?biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->">Holds</a>