|
Lines 44-50
use C4::Members;
Link Here
|
| 44 |
use C4::Biblio; |
44 |
use C4::Biblio; |
| 45 |
use C4::Items; |
45 |
use C4::Items; |
| 46 |
use Koha::DateUtils qw( dt_from_string ); |
46 |
use Koha::DateUtils qw( dt_from_string ); |
| 47 |
use Koha::Acquisition::Currencies; |
|
|
| 48 |
use Koha::Patrons; |
47 |
use Koha::Patrons; |
| 49 |
use Koha::Patron::Images; |
48 |
use Koha::Patron::Images; |
| 50 |
use Koha::Patron::Messages; |
49 |
use Koha::Patron::Messages; |
|
Lines 114-124
if ( $patronid ) {
Link Here
|
| 114 |
$borrower = $patron->unblessed if $patron; |
113 |
$borrower = $patron->unblessed if $patron; |
| 115 |
} |
114 |
} |
| 116 |
|
115 |
|
| 117 |
my $currencySymbol = ""; |
|
|
| 118 |
if ( my $active_currency = Koha::Acquisition::Currencies->get_active ) { |
| 119 |
$currencySymbol = $active_currency->symbol; |
| 120 |
} |
| 121 |
|
| 122 |
my $branch = $issuer->{branchcode}; |
116 |
my $branch = $issuer->{branchcode}; |
| 123 |
my $confirm_required = 0; |
117 |
my $confirm_required = 0; |
| 124 |
my $return_only = 0; |
118 |
my $return_only = 0; |
|
Lines 163-170
elsif ( $patron and $op eq "checkout" ) {
Link Here
|
| 163 |
hide_main => 1, |
157 |
hide_main => 1, |
| 164 |
); |
158 |
); |
| 165 |
if ($issue_error eq 'DEBT') { |
159 |
if ($issue_error eq 'DEBT') { |
| 166 |
$template->param(currencySym => $currencySymbol, |
160 |
$template->param(amount => $impossible->{DEBT}); |
| 167 |
amount => $impossible->{DEBT}); |
|
|
| 168 |
} |
161 |
} |
| 169 |
#warn "issue_error: " . $issue_error ; |
162 |
#warn "issue_error: " . $issue_error ; |
| 170 |
if ( $issue_error eq "NO_MORE_RENEWALS" ) { |
163 |
if ( $issue_error eq "NO_MORE_RENEWALS" ) { |
|
Lines 196-203
elsif ( $patron and $op eq "checkout" ) {
Link Here
|
| 196 |
hide_main => 1, |
189 |
hide_main => 1, |
| 197 |
); |
190 |
); |
| 198 |
if ($issue_error eq 'DEBT') { |
191 |
if ($issue_error eq 'DEBT') { |
| 199 |
$template->param(currencySym => $currencySymbol, |
192 |
$template->param(amount => $needconfirm->{DEBT}); |
| 200 |
amount => $needconfirm->{DEBT}); |
|
|
| 201 |
} |
193 |
} |
| 202 |
} else { |
194 |
} else { |
| 203 |
if ( $confirmed || $issuenoconfirm ) { # we'll want to call getpatroninfo again to get updated issues. |
195 |
if ( $confirmed || $issuenoconfirm ) { # we'll want to call getpatroninfo again to get updated issues. |
| 204 |
- |
|
|