From 846bef3f8590bf5c0cd253b5e1a2aa8a8517dc73 Mon Sep 17 00:00:00 2001 From: Nahuel ANGELINETTI Date: Tue, 19 Jan 2010 12:00:42 +0100 Subject: [PATCH] (bug #4051) add columns in csv export of overdues this patch add 2 columns in the csv export : * item callnumber * issue date --- circ/overdue.pl | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/circ/overdue.pl b/circ/overdue.pl index 2140206b66..2360028e0e 100755 --- a/circ/overdue.pl +++ b/circ/overdue.pl @@ -121,7 +121,9 @@ my $strsth="SELECT date_due, borrowers.phone, borrowers.email, issues.itemnumber, + issues.issuedate, items.barcode, + items.itemcallnumber, biblio.title, biblio.author, borrowers.borrowernumber, @@ -155,10 +157,12 @@ $sth->execute(); my @overduedata; while (my $data=$sth->fetchrow_hashref) { push @overduedata, { + issuedate => format_date($data->{issuedate}), duedate => format_date($data->{date_due}), borrowernumber => $data->{borrowernumber}, barcode => $data->{barcode}, itemnum => $data->{itemnumber}, + itemcallnumber => $data->{itemcallnumber}, name => $data->{borrower}, address => $data->{address}, city => $data->{city}, -- 2.39.5