Lines 270-276
if ($borrowernumber) {
Link Here
|
270 |
'userdebarred' => $borrower->{debarred}, |
270 |
'userdebarred' => $borrower->{debarred}, |
271 |
'debarredcomment' => $borrower->{debarredcomment}, |
271 |
'debarredcomment' => $borrower->{debarredcomment}, |
272 |
); |
272 |
); |
273 |
if ( $borrower->{debarred} ne "9999-12-31" ) { |
273 |
if ( $borrower->{debarred} && $borrower->{debarred} ne "9999-12-31" ) { |
274 |
$template->param( 'userdebarreddate' => C4::Dates::format_date( $borrower->{debarred} ) ); |
274 |
$template->param( 'userdebarreddate' => C4::Dates::format_date( $borrower->{debarred} ) ); |
275 |
} |
275 |
} |
276 |
|
276 |
|
Lines 651-657
$amountold =~ s/^.*\$//; # remove upto the $, if any
Link Here
|
651 |
|
651 |
|
652 |
my ( $total, $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber ); |
652 |
my ( $total, $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber ); |
653 |
|
653 |
|
654 |
if ( $borrower->{'category_type'} eq 'C') { |
654 |
if ( $borrowernumber && $borrower->{'category_type'} eq 'C') { |
655 |
my ( $catcodes, $labels ) = GetborCatFromCatType( 'A', 'WHERE category_type = ?' ); |
655 |
my ( $catcodes, $labels ) = GetborCatFromCatType( 'A', 'WHERE category_type = ?' ); |
656 |
my $cnt = scalar(@$catcodes); |
656 |
my $cnt = scalar(@$catcodes); |
657 |
$template->param( 'CATCODE_MULTI' => 1) if $cnt > 1; |
657 |
$template->param( 'CATCODE_MULTI' => 1) if $cnt > 1; |
Lines 749-755
$template->param(
Link Here
|
749 |
inprocess => $inprocess, |
749 |
inprocess => $inprocess, |
750 |
memberofinstution => $member_of_institution, |
750 |
memberofinstution => $member_of_institution, |
751 |
CGIorganisations => $CGIorganisations, |
751 |
CGIorganisations => $CGIorganisations, |
752 |
is_child => ($borrower->{'category_type'} eq 'C'), |
752 |
is_child => ($borrowernumber && $borrower->{'category_type'} eq 'C'), |
753 |
circview => 1, |
753 |
circview => 1, |
754 |
soundon => C4::Context->preference("SoundOn"), |
754 |
soundon => C4::Context->preference("SoundOn"), |
755 |
fast_cataloging => $fast_cataloging, |
755 |
fast_cataloging => $fast_cataloging, |