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 650-656
$amountold =~ s/^.*\$//; # remove upto the $, if any
Link Here
|
650 |
|
650 |
|
651 |
my ( $total, $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber ); |
651 |
my ( $total, $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber ); |
652 |
|
652 |
|
653 |
if ( $borrower->{'category_type'} eq 'C') { |
653 |
if ( $borrowernumber && $borrower->{'category_type'} eq 'C') { |
654 |
my ( $catcodes, $labels ) = GetborCatFromCatType( 'A', 'WHERE category_type = ?' ); |
654 |
my ( $catcodes, $labels ) = GetborCatFromCatType( 'A', 'WHERE category_type = ?' ); |
655 |
my $cnt = scalar(@$catcodes); |
655 |
my $cnt = scalar(@$catcodes); |
656 |
$template->param( 'CATCODE_MULTI' => 1) if $cnt > 1; |
656 |
$template->param( 'CATCODE_MULTI' => 1) if $cnt > 1; |
Lines 748-754
$template->param(
Link Here
|
748 |
inprocess => $inprocess, |
748 |
inprocess => $inprocess, |
749 |
memberofinstution => $member_of_institution, |
749 |
memberofinstution => $member_of_institution, |
750 |
CGIorganisations => $CGIorganisations, |
750 |
CGIorganisations => $CGIorganisations, |
751 |
is_child => ($borrower->{'category_type'} eq 'C'), |
751 |
is_child => ($borrowernumber && $borrower->{'category_type'} eq 'C'), |
752 |
circview => 1, |
752 |
circview => 1, |
753 |
soundon => C4::Context->preference("SoundOn"), |
753 |
soundon => C4::Context->preference("SoundOn"), |
754 |
fast_cataloging => $fast_cataloging, |
754 |
fast_cataloging => $fast_cataloging, |