Attachment 18022 Details for Bug 8037 – Bug 8037 - Add holds and funds to items already received in parcel.pl - QA Followup

[patch] Bug 8037 - Add holds and funds to items already received in parcel.pl - QA Followup

Bug-8037---Add-holds-and-funds-to-items-already-re.patch (text/plain), 1.92 KB, created by Kyle M Hall (khall) on 2013-05-08 13:08:41 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Kyle M Hall (khall)

Created: 2013-05-08 13:08:41 UTC

Size: 1.92 KB

patch

obsolete

>From 413e6c606f4f2cc7630965725447c5a23f11c5b6 Mon Sep 17 00:00:00 2001
>From: Kyle M Hall <kyle@bywatersolutions.com>
>Date: Fri, 22 Mar 2013 03:35:41 -0700
>Subject: [PATCH] Bug 8037 - Add holds and funds to items already received in parcel.pl - QA Followup
>
>---
> C4/Reserves.pm           |    3 +--
> t/db_dependent/Budgets.t |    4 ++++
> 2 files changed, 5 insertions(+), 2 deletions(-)
>
>diff --git a/C4/Reserves.pm b/C4/Reserves.pm
>index b1b1175..e254d64 100644
>--- a/C4/Reserves.pm
>+++ b/C4/Reserves.pm
>@@ -257,7 +257,6 @@ sub GetReservesFromBiblionumber {
>     my ($biblionumber) = shift or return (0, []);
>     my ($all_dates) = shift;
>     my ($itemnumber) = shift;
>-    warn "ITEMNUMBER: $itemnumber";
>     my $dbh   = C4::Context->dbh;
> 
>     # Find the desired items in the reserves
>@@ -281,7 +280,7 @@ sub GetReservesFromBiblionumber {
>         WHERE biblionumber = ? ";
>     push( @params, $biblionumber );
>     unless ( $all_dates ) {
>-        $query .= " AND reservedate <= CURRENT_DATE() ";
>+        $query .= " AND reservedate <= CAST(NOW() AS DATE) ";
>     }
>     if ( $itemnumber ) {
>         $query .= " AND ( itemnumber IS NULL OR itemnumber = ? )";
>diff --git a/t/db_dependent/Budgets.t b/t/db_dependent/Budgets.t
>index 717f8fe..eb52f6f 100755
>--- a/t/db_dependent/Budgets.t
>+++ b/t/db_dependent/Budgets.t
>@@ -85,6 +85,10 @@ ok($budget_id=AddBudget(
> #| budget_owner_id        | int(11)       | YES  |     | NULL              |       | 
> #| budget_permission      | int(1)        | YES  |     | 0                 |       | 
> 
>+C4::Context::dbh->do('INSERT INTO aqorders ( ordernumber, budget_id ) VALUES ( 987654321, ? )', {}, ( $budget_id ) );
>+ok( GetBudgetByOrderNumber( '987654321' )->{'budget_id'} eq $budget_id, "GetBudgetByOrderNumber returns valid data" );
>+C4::Context::dbh->do('DELETE FROM aqorders WHERE ordernumber = 987654321');
>+
> my $budget;
> ok($budget=GetBudget($budget_id) ,"GetBudget OK");
> $$budget{budget_permission}=1;
>-- 
>1.7.2.5

Actions: View | Diff | Splinter Review

Attachments on bug 8037: 9383 | 9384 | 11089 | 13152 | 13153 | 14892 | 16336 | 16635 | 16651 | 16660 | 16749 | 18021 | 18022 | 18023 | 18693 | 19672 | 19789 | 19790 | 19791 | 22244 | 22390 | 22636 | 22637 | 22638 | 22639 | 22647