View | Details | Raw Unified | Return to bug 9481
Collapse All | Expand All

(-)a/svc/checkouts (-1 / +3 lines)
Lines 27-32 use C4::Auth qw(check_cookie_auth); Link Here
27
use C4::Biblio qw(GetMarcBiblio GetFrameworkCode GetRecordValue );
27
use C4::Biblio qw(GetMarcBiblio GetFrameworkCode GetRecordValue );
28
use C4::Circulation qw(GetIssuingCharges CanBookBeRenewed GetRenewCount GetSoonestRenewDate);
28
use C4::Circulation qw(GetIssuingCharges CanBookBeRenewed GetRenewCount GetSoonestRenewDate);
29
use C4::Koha qw(GetAuthorisedValueByCode);
29
use C4::Koha qw(GetAuthorisedValueByCode);
30
use C4::Overdues qw(GetFine);
30
use C4::Context;
31
use C4::Context;
31
32
32
use Koha::DateUtils;
33
use Koha::DateUtils;
Lines 126-131 my @checkouts_today; Link Here
126
my @checkouts_previous;
127
my @checkouts_previous;
127
while ( my $c = $sth->fetchrow_hashref() ) {
128
while ( my $c = $sth->fetchrow_hashref() ) {
128
    my ($charge) = GetIssuingCharges( $c->{itemnumber}, $c->{borrowernumber} );
129
    my ($charge) = GetIssuingCharges( $c->{itemnumber}, $c->{borrowernumber} );
130
    my $fine = GetFine( $c->{itemnumber}, $c->{borrowernumber} );
131
    $charge += $fine if defined $fine;
129
132
130
    my ( $can_renew, $can_renew_error ) =
133
    my ( $can_renew, $can_renew_error ) =
131
      CanBookBeRenewed( $c->{borrowernumber}, $c->{itemnumber} );
134
      CanBookBeRenewed( $c->{borrowernumber}, $c->{itemnumber} );
132
- 

Return to bug 9481