(bug #4051) add columns in csv export of overdues

this patch add 2 columns in the csv export :
* item callnumber
* issue date

diff --git a/circ/overdue.pl b/circ/overdue.pl
index 2140206..2360028 100755 (executable)
--- 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},