From e73a26e23f34b0c6c8c45f6f2dde962d24fa477e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9rick?= Date: Thu, 27 Feb 2014 15:54:01 -0500 Subject: [PATCH] Add more informations to the account printing pages. --- .../prog/en/modules/members/moremember-print.tt | 37 ++++++++++++++++++++ .../prog/en/modules/members/moremember-receipt.tt | 2 +- members/moremember.pl | 13 +++++++ 3 files changed, 51 insertions(+), 1 deletions(-) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-print.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-print.tt index 4642628..bb381fb 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-print.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-print.tt @@ -1,3 +1,4 @@ +[% USE KohaDates %] [% INCLUDE 'doc-head-open.inc' %] Summary for [% firstname %] [% surname %] ([% cardnumber %]) @@ -23,6 +24,12 @@
  • [% IF ( email ) %][% email %][% ELSE %](no primary email on file)[% END %]
  • [% IF ( emailpro ) %]
  • [% emailpro %]
  • [% END %] + [% IF ( issueloop ) %] @@ -86,4 +93,34 @@
    [% END %] +[% IF ( accounts ) %] + + + + + + + + + [% FOREACH account IN accounts %] + + + + + + + [% END %] + + + + + + +
    Account fines and payments
    Description of chargesDateAmountOutstanding
    + [% IF ( account.itemnumber ) %][% END %] + [% account.description %] [% IF ( account.printtitle ) %] [% account.title |html %][% END %] + [% IF ( account.itemnumber ) %][% END %] + [% account.date | $KohaDates %][% account.amount %][% account.amountoutstanding %]
    Total due[% totaldue %]
    +[% END %] + [% INCLUDE 'intranet-bottom.inc' %] diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-receipt.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-receipt.tt index 80d3dc0..ec35975 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-receipt.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/members/moremember-receipt.tt @@ -19,7 +19,7 @@ [% IF ( branchname ) %][% branchname %]
    [% END %] Checked out to [% firstname %] [% surname %]
    ([% cardnumber %])
    - +Address: [% address %]
    [% todaysdate %]
    [% IF ( quickslip ) %] diff --git a/members/moremember.pl b/members/moremember.pl index 86c61c1..74f4e0d 100755 --- a/members/moremember.pl +++ b/members/moremember.pl @@ -229,6 +229,19 @@ my $lib2 = &GetSortDetails( "Bsort2", $data->{'sort2'} ); $template->param( lib1 => $lib1 ) if ($lib1); $template->param( lib2 => $lib2 ) if ($lib2); +# If printing a page, send the account informations to the template +if ($print eq "page") { + foreach my $accountline (@$accts) { + $accountline->{amount} = sprintf '%.2f', $accountline->{amount}; + $accountline->{amountoutstanding} = sprintf '%.2f', $accountline->{amountoutstanding}; + + if ($accountline->{accounttype} ne 'F' && $accountline->{accounttype} ne 'FU'){ + $accountline->{printtitle} = 1; + } + } + $template->param( accounts => $accts ); +} + # Show OPAC privacy preference is system preference is set if ( C4::Context->preference('OPACPrivacy') ) { $template->param( OPACPrivacy => 1); -- 1.7.2.5