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

(-)a/acqui/neworderbiblio.pl (-2 / +16 lines)
Lines 65-70 use C4::Biblio; Link Here
65
use C4::Auth;
65
use C4::Auth;
66
use C4::Output;
66
use C4::Output;
67
use C4::Koha;
67
use C4::Koha;
68
use C4::Members qw/ GetMember /;
69
use C4::Budgets qw/ GetBudgetHierarchy /;
68
70
69
my $input = new CGI;
71
my $input = new CGI;
70
72
Lines 121-130 foreach my $result ( @{$marcresults} ) { Link Here
121
123
122
}
124
}
123
125
126
my $borrower= GetMember('borrowernumber' => $loggedinuser);
127
my $budgets = GetBudgetHierarchy(q{},$borrower->{branchcode},$borrower->{borrowernumber});
128
my $has_budgets = 0;
129
foreach my $r (@{$budgets}) {
130
    if (!defined $r->{budget_amount} || $r->{budget_amount} == 0) {
131
        next;
132
    }
133
    $has_budgets = 1;
134
    last;
135
}
136
124
$template->param(
137
$template->param(
138
    has_budgets          => $has_budgets,
125
    basketno             => $basketno,
139
    basketno             => $basketno,
126
    booksellerid     => $bookseller->{'id'},
140
    booksellerid         => $bookseller->{'id'},
127
    name             => $bookseller->{'name'},
141
    name                 => $bookseller->{'name'},
128
    resultsloop          => \@results,
142
    resultsloop          => \@results,
129
    total                => $total_hits,
143
    total                => $total_hits,
130
    query                => $query,
144
    query                => $query,
(-)a/koha-tmpl/intranet-tmpl/prog/en/includes/acquisitions-add-to-basket.inc (-2 / +1 lines)
Lines 15-18 Link Here
15
    [% ELSE %]
15
    [% ELSE %]
16
        You can't create any orders unless you first <a href="/cgi-bin/koha/admin/aqbudgetperiods.pl">define a budget and a fund</a>.
16
        You can't create any orders unless you first <a href="/cgi-bin/koha/admin/aqbudgetperiods.pl">define a budget and a fund</a>.
17
    [% END %]
17
    [% END %]
18
</fieldset>
18
</fieldset>
19
- 

Return to bug 6994