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, |