Lines 30-36
use DateTime::Duration;
Link Here
|
30 |
use C4::Output; |
30 |
use C4::Output; |
31 |
use C4::Print; |
31 |
use C4::Print; |
32 |
use C4::Auth qw/:DEFAULT get_session haspermission/; |
32 |
use C4::Auth qw/:DEFAULT get_session haspermission/; |
33 |
use C4::Dates qw/format_date/; |
|
|
34 |
use C4::Branch; # GetBranches |
33 |
use C4::Branch; # GetBranches |
35 |
use C4::Koha; # GetPrinter |
34 |
use C4::Koha; # GetPrinter |
36 |
use C4::Circulation; |
35 |
use C4::Circulation; |
Lines 259-265
if ($borrowernumber) {
Link Here
|
259 |
noissues => ($force_allow_issue) ? 0 : "1", |
258 |
noissues => ($force_allow_issue) ? 0 : "1", |
260 |
forceallow => $force_allow_issue, |
259 |
forceallow => $force_allow_issue, |
261 |
expired => "1", |
260 |
expired => "1", |
262 |
renewaldate => format_date("$renew_year-$renew_month-$renew_day") |
261 |
renewaldate => "$renew_year-$renew_month-$renew_day" |
263 |
); |
262 |
); |
264 |
} |
263 |
} |
265 |
# check for NotifyBorrowerDeparture |
264 |
# check for NotifyBorrowerDeparture |
Lines 268-274
if ($borrowernumber) {
Link Here
|
268 |
Date_to_Days( $today_year, $today_month, $today_day ) ) |
267 |
Date_to_Days( $today_year, $today_month, $today_day ) ) |
269 |
{ |
268 |
{ |
270 |
# borrower card soon to expire warn librarian |
269 |
# borrower card soon to expire warn librarian |
271 |
$template->param("warndeparture" => format_date($borrower->{dateexpiry}), |
270 |
$template->param("warndeparture" => $borrower->{dateexpiry}, |
272 |
flagged => "1",); |
271 |
flagged => "1",); |
273 |
if (C4::Context->preference('ReturnBeforeExpiry')){ |
272 |
if (C4::Context->preference('ReturnBeforeExpiry')){ |
274 |
$template->param("returnbeforeexpiry" => 1); |
273 |
$template->param("returnbeforeexpiry" => 1); |
Lines 287-294
if ($borrowernumber) {
Link Here
|
287 |
); |
286 |
); |
288 |
|
287 |
|
289 |
if ( $borrower->{debarred} ne "9999-12-31" ) { |
288 |
if ( $borrower->{debarred} ne "9999-12-31" ) { |
290 |
$template->param( 'userdebarreddate' => |
289 |
$template->param( 'userdebarreddate' => $borrower->{debarred} ); |
291 |
C4::Dates::format_date( $borrower->{debarred} ) ); |
|
|
292 |
} |
290 |
} |
293 |
} |
291 |
} |
294 |
|
292 |
|
Lines 531-537
$template->param(
Link Here
|
531 |
printer => $printer, |
529 |
printer => $printer, |
532 |
printername => $printer, |
530 |
printername => $printer, |
533 |
was_renewed => $query->param('was_renewed') ? 1 : 0, |
531 |
was_renewed => $query->param('was_renewed') ? 1 : 0, |
534 |
expiry => format_date($borrower->{'dateexpiry'}), |
532 |
expiry => $borrower->{'dateexpiry'}, |
535 |
roadtype => $roadtype, |
533 |
roadtype => $roadtype, |
536 |
amountold => $amountold, |
534 |
amountold => $amountold, |
537 |
barcode => $barcode, |
535 |
barcode => $barcode, |