Lines 482-488
sub build_issue_data {
Link Here
|
482 |
($it->{'charge'}, $it->{'itemtype_charge'}) = GetIssuingCharges( |
482 |
($it->{'charge'}, $it->{'itemtype_charge'}) = GetIssuingCharges( |
483 |
$it->{'itemnumber'}, $it->{'borrowernumber'} |
483 |
$it->{'itemnumber'}, $it->{'borrowernumber'} |
484 |
); |
484 |
); |
485 |
$it->{'charge'} = sprintf("%.2f", $it->{'charge'}); |
485 |
$it->{'charge'} = sprintf("%.2f", $it->{'charge'}) if defined $it->{'charge'}; |
486 |
my ($can_renew, $can_renew_error) = CanBookBeRenewed( |
486 |
my ($can_renew, $can_renew_error) = CanBookBeRenewed( |
487 |
$it->{'borrowernumber'},$it->{'itemnumber'} |
487 |
$it->{'borrowernumber'},$it->{'itemnumber'} |
488 |
); |
488 |
); |
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 ( $borrower->{'category_type'} && $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 => ($borrower->{'category_type'} && $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, |