From: Paul Poulain <paul.poul...@biblibre.com>
on a new order, the branch limits for the budgets where not managed properly
if a budget had a limit on branch, it was not respected : the list displayed
all budgets, including other branches than mine
Signed-off-by: Henri-Damien LAURENT <henridamien.laur...@biblibre.com>
---
acqui/neworderempty.pl | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/acqui/neworderempty.pl b/acqui/neworderempty.pl
index cde8653..a580ae7 100755
--- a/acqui/neworderempty.pl
+++ b/acqui/neworderempty.pl
@@ -231,7 +231,7 @@ my ( $flags, $homebranch )=
($borrower->{'flags'},$borrower->{'branchcode'});
my $budget = GetBudget($budget_id);
# build budget list
my $budget_loop = [];
-my $budgets = GetBudgetHierarchy(q{},q{},$borrower->{borrowernumber});
+my $budgets =
GetBudgetHierarchy(q{},$borrower->{branchcode},$borrower->{borrowernumber});
foreach my $r (@{$budgets}) {
if (!defined $r->{budget_amount} || $r->{budget_amount} == 0) {
next;
--
1.6.3.3
_______________________________________________
Koha-patches mailing list
Koha-patches@lists.koha.org
http://lists.koha.org/mailman/listinfo/koha-patches
