|
Lines 527-538
if($lib_messages_loop){ $template->param(flagged => 1 ); }
Link Here
|
| 527 |
my $bor_messages_loop = GetMessages( $borrowernumber, 'B', $branch ); |
527 |
my $bor_messages_loop = GetMessages( $borrowernumber, 'B', $branch ); |
| 528 |
if($bor_messages_loop){ $template->param(flagged => 1 ); } |
528 |
if($bor_messages_loop){ $template->param(flagged => 1 ); } |
| 529 |
|
529 |
|
| 530 |
# Computes full borrower address |
|
|
| 531 |
my @fulladdress; |
| 532 |
push @fulladdress, $borrower->{'streetnumber'} if ( $borrower->{'streetnumber'} ); |
| 533 |
push @fulladdress, C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{'streettype'} ) if ( $borrower->{'streettype'} ); |
| 534 |
push @fulladdress, $borrower->{'address'} if ( $borrower->{'address'} ); |
| 535 |
|
| 536 |
my $fast_cataloging = 0; |
530 |
my $fast_cataloging = 0; |
| 537 |
if (defined getframeworkinfo('FA')) { |
531 |
if (defined getframeworkinfo('FA')) { |
| 538 |
$fast_cataloging = 1 |
532 |
$fast_cataloging = 1 |
|
Lines 551-556
my $relatives_issues_count =
Link Here
|
| 551 |
Koha::Database->new()->schema()->resultset('Issue') |
545 |
Koha::Database->new()->schema()->resultset('Issue') |
| 552 |
->count( { borrowernumber => \@relatives } ); |
546 |
->count( { borrowernumber => \@relatives } ); |
| 553 |
|
547 |
|
|
|
548 |
my $roadtype = C4::Koha::GetAuthorisedValueByCode( 'ROADTYPE', $borrower->{streettype} ); |
| 549 |
|
| 550 |
$template->param(%$borrower); |
| 551 |
|
| 554 |
$template->param( |
552 |
$template->param( |
| 555 |
lib_messages_loop => $lib_messages_loop, |
553 |
lib_messages_loop => $lib_messages_loop, |
| 556 |
bor_messages_loop => $bor_messages_loop, |
554 |
bor_messages_loop => $bor_messages_loop, |
|
Lines 562-589
$template->param(
Link Here
|
| 562 |
branchname => GetBranchName($borrower->{'branchcode'}), |
560 |
branchname => GetBranchName($borrower->{'branchcode'}), |
| 563 |
printer => $printer, |
561 |
printer => $printer, |
| 564 |
printername => $printer, |
562 |
printername => $printer, |
| 565 |
firstname => $borrower->{'firstname'}, |
|
|
| 566 |
surname => $borrower->{'surname'}, |
| 567 |
showname => $borrower->{'showname'}, |
| 568 |
category_type => $borrower->{'category_type'}, |
| 569 |
was_renewed => $query->param('was_renewed') ? 1 : 0, |
563 |
was_renewed => $query->param('was_renewed') ? 1 : 0, |
| 570 |
expiry => format_date($borrower->{'dateexpiry'}), |
564 |
expiry => format_date($borrower->{'dateexpiry'}), |
| 571 |
categorycode => $borrower->{'categorycode'}, |
565 |
roadtype => $roadtype, |
| 572 |
categoryname => $borrower->{description}, |
|
|
| 573 |
address => join(' ', @fulladdress), |
| 574 |
address2 => $borrower->{'address2'}, |
| 575 |
email => $borrower->{'email'}, |
| 576 |
emailpro => $borrower->{'emailpro'}, |
| 577 |
borrowernotes => $borrower->{'borrowernotes'}, |
| 578 |
city => $borrower->{'city'}, |
| 579 |
state => $borrower->{'state'}, |
| 580 |
zipcode => $borrower->{'zipcode'}, |
| 581 |
country => $borrower->{'country'}, |
| 582 |
phone => $borrower->{'phone'}, |
| 583 |
mobile => $borrower->{'mobile'}, |
| 584 |
phonepro => $borrower->{'phonepro'}, |
| 585 |
cardnumber => $borrower->{'cardnumber'}, |
| 586 |
othernames => $borrower->{'othernames'}, |
| 587 |
amountold => $amountold, |
566 |
amountold => $amountold, |
| 588 |
barcode => $barcode, |
567 |
barcode => $barcode, |
| 589 |
stickyduedate => $stickyduedate, |
568 |
stickyduedate => $stickyduedate, |