From 2cd38dc1bf76adff1fce5a5b211c093485f1fa89 Mon Sep 17 00:00:00 2001 From: Katrin Fischer Date: Sat, 11 Aug 2018 18:47:23 +0000 Subject: [PATCH] Bug 15139: Add non-public item notes to overdue report Sometimes libraries want to see internal notes on the overdue reports page, this patch adds the notes. Additional fixes: - Library column was always empty, now library displays - Replacement price was not formatted according to CurrencyFormat To test: - Make sure you have some overdue issues in your system - Circulation > Overdues report - Make sure everything displays as it should - Verify internal item note shows - Verify price is correctly formatted (syspref CurrencyFormat) - Library shows --- circ/overdue.pl | 7 +++++-- koha-tmpl/intranet-tmpl/prog/en/modules/circ/overdue.tt | 5 ++++- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/circ/overdue.pl b/circ/overdue.pl index fe3fdd0..a4d9c44 100755 --- a/circ/overdue.pl +++ b/circ/overdue.pl @@ -238,7 +238,8 @@ if ($noreport) { borrowers.branchcode, items.itemcallnumber, items.replacementprice, - items.enumchron + items.enumchron, + items.itemnotes_nonpublic FROM issues LEFT JOIN borrowers ON (issues.borrowernumber=borrowers.borrowernumber ) LEFT JOIN items ON (issues.itemnumber=items.itemnumber) @@ -308,8 +309,10 @@ if ($noreport) { author => $data->{author}, homebranchcode => $data->{homebranchcode}, holdingbranchcode => $data->{holdingbranchcode}, + branchcode => $data->{branchcode}, itemcallnumber => $data->{itemcallnumber}, replacementprice => $data->{replacementprice}, + itemnotes_nonpublic => $data->{itemnotes_nonpublic}, enumchron => $data->{enumchron}, patron_attr_value_loop => \@patron_attr_value_loop, }; @@ -359,7 +362,7 @@ sub build_csv { # build header ... my @keys = qw ( duedate title author borrowertitle firstname surname phone barcode email address address2 zipcode city country - branchcode itemcallnumber biblionumber borrowernumber itemnum issuedate replacementprice streetnumber streettype); + branchcode itemcallnumber biblionumber borrowernumber itemnum issuedate replacementprice itemnotes_nonpublic streetnumber streettype); my $csv = Text::CSV_XS->new(); $csv->combine(@keys); push @lines, $csv->string(); diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/circ/overdue.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/circ/overdue.tt index 12966ed..4d23ce6 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/circ/overdue.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/circ/overdue.tt @@ -1,6 +1,7 @@ [% USE Asset %] [% USE KohaDates %] [%- USE Branches -%] +[%- USE Price -%] [% SET footerjs = 1 %] [% INCLUDE 'doc-head-open.inc' %] Koha › Circulation › Items overdue as of [% todaysdate %] @@ -52,6 +53,7 @@ Barcode Call number Price + Non-public note [%- BLOCK subject -%]Overdue:[%- END -%] @@ -69,7 +71,8 @@ [% INCLUDE 'biblio-default-view.inc' biblionumber = overdueloo.biblionumber %][% overdueloo.title |html %] [% overdueloo.subtitle %] [% IF ( overdueloo.author ) %], by [% overdueloo.author %][% END %][% IF ( overdueloo.enumchron ) %], [% overdueloo.enumchron %][% END %] [% overdueloo.barcode %] [% overdueloo.itemcallnumber %] - [% overdueloo.replacementprice %] + [% overdueloo.replacementprice | $Price %] + [% overdueloo.itemnotes_nonpublic %] [% END %] -- 2.1.4