Attachment 82842 Details for Bug 15422 – Bug 15422: Consider partial copies needed as whole numbers

[patch] Bug 15422: Consider partial copies needed as whole numbers

Bug-15422-Consider-partial-copies-needed-as-whole-.patch (text/plain), 1.22 KB, created by Nick Clemens (kidclamp) on 2018-12-04 14:59:09 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Nick Clemens (kidclamp)

Created: 2018-12-04 14:59:09 UTC

Size: 1.22 KB

patch

obsolete

>From a3d338e545cd3b9bb5522fe280c915e8a62c1a87 Mon Sep 17 00:00:00 2001
>From: Nick Clemens <nick@bywatersolutions.com>
>Date: Tue, 4 Dec 2018 14:58:35 +0000
>Subject: [PATCH] Bug 15422: Consider partial copies needed as whole numbers
>
>---
> circ/reserveratios.pl | 3 ++-
> 1 file changed, 2 insertions(+), 1 deletion(-)
>
>diff --git a/circ/reserveratios.pl b/circ/reserveratios.pl
>index dc04b3358f..530dfb6b54 100755
>--- a/circ/reserveratios.pl
>+++ b/circ/reserveratios.pl
>@@ -22,6 +22,7 @@ use Modern::Perl;
> 
> use CGI qw ( -utf8 );
> use Date::Calc qw/Today Add_Delta_YM/;
>+use POSIX qw( ceil );
> 
> use C4::Context;
> use C4::Output;
>@@ -151,7 +152,7 @@ $sth->execute(@query_params);
> my @reservedata;
> while ( my $data = $sth->fetchrow_hashref ) {
>     my $thisratio = $data->{reservecount} / $data->{itemcount};
>-    my $ratiocalc = $data->{reservecount}/$ratio - $data->{itemcount};
>+    my $ratiocalc = ceil($data->{reservecount}/$ratio - $data->{itemcount});
>     $ratiocalc >= 1 or next;  # TODO: tighter targeting -- get ratio limit into SQL using HAVING clause
>     my $record = GetMarcBiblio({ biblionumber => $data->{biblionumber} });
>     $data->{subtitle} = GetRecordValue('subtitle', $record, GetFrameworkCode($data->{biblionumber}));
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 15422: 82718 | 82842 | 82873 | 82874 | 92145 | 92146 | 93670 | 93671