From 6a924eb3639f786419dca77dc397df8c6e3d0f21 Mon Sep 17 00:00:00 2001 From: Paul POULAIN Date: Tue, 11 Dec 2007 11:15:49 +0100 Subject: [PATCH] reintroducing lateissues-excel Signed-off-by: Joshua Ferraro --- koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tmpl | 4 ++++ serials/lateissues-excel.pl | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tmpl index 002ddd0293..b881476b65 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tmpl +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tmpl @@ -70,6 +70,7 @@ Issue number Status sort Since sort + Began Claim @@ -101,6 +102,9 @@ + + &serialid=&op=claims">Export item data + diff --git a/serials/lateissues-excel.pl b/serials/lateissues-excel.pl index e07eb93c70..7433a6711d 100755 --- a/serials/lateissues-excel.pl +++ b/serials/lateissues-excel.pl @@ -51,7 +51,7 @@ my $totalcount2 = 0; my @loop2; my ($count2, @missingissues); for (my $k=0;$k<@serialid;$k++){ - ($count2, @missingissues) = GetMissingIssues($supplierid, $serialid[$k]); + ($count2, @missingissues) = GetLateOrMissingIssues($supplierid, $serialid[$k]); for (my $j=0;$j<@missingissues;$j++){ my @rows2 = ($missingissues[$j]->{'name'}, # lets build up a row -- 2.39.5