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

(-)a/acqui/acqui-home.pl (-1 / +5 lines)
Lines 38-43 use C4::Budgets; Link Here
38
use C4::Members;
38
use C4::Members;
39
use C4::Branch;
39
use C4::Branch;
40
use C4::Debug;
40
use C4::Debug;
41
use C4::Suggestions;
41
42
42
my $query = CGI->new;
43
my $query = CGI->new;
43
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
44
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
Lines 74-79 if ( $cur_format eq 'FR' ) { Link Here
74
    );
75
    );
75
}
76
}
76
77
78
my $status           = $query->param('status') || "ASKED";
79
my $suggestions_count       = CountSuggestion($status);
80
77
my $budget_arr =
81
my $budget_arr =
78
  GetBudgetHierarchy( '', $user->{branchcode},
82
  GetBudgetHierarchy( '', $user->{branchcode},
79
    $template->{param_map}->{'USER_INFO'}[0]->{'borrowernumber'} );
83
    $template->{param_map}->{'USER_INFO'}[0]->{'borrowernumber'} );
Lines 123-129 foreach my $budget ( @{$budget_arr} ) { Link Here
123
}
127
}
124
128
125
$template->param(
129
$template->param(
126
127
    type          => 'intranet',
130
    type          => 'intranet',
128
    loop_budget   => $budget_arr,
131
    loop_budget   => $budget_arr,
129
    branchname    => $branchname,
132
    branchname    => $branchname,
Lines 132-137 $template->param( Link Here
132
    totordered    => $num_formatter->format_price($totordered),
135
    totordered    => $num_formatter->format_price($totordered),
133
    totcomtd      => $num_formatter->format_price($totcomtd),
136
    totcomtd      => $num_formatter->format_price($totcomtd),
134
    totavail      => $num_formatter->format_price($totavail),
137
    totavail      => $num_formatter->format_price($totavail),
138
    suggestions_count    => $suggestions_count,
135
);
139
);
136
140
137
output_html_with_http_headers $query, $cookie, $template->output;
141
output_html_with_http_headers $query, $cookie, $template->output;
(-)a/koha-tmpl/intranet-tmpl/prog/en/includes/acquisitions-menu.inc (-4 / +1 lines)
Lines 1-9 Link Here
1
<ul>
1
<ul>
2
	<li><a href="/cgi-bin/koha/acqui/lateorders.pl">Late orders</a></li>
2
	<li><a href="/cgi-bin/koha/acqui/lateorders.pl">Late orders</a></li>
3
    <li><!-- TMPL_IF name="suggestion" --> <a href="/cgi-bin/koha/suggestion/suggestion.pl"><!--TMPL_VAR NAME="suggestion" --> suggestions waiting</a>
3
	<!-- TMPL_IF NAME="suggestion" --><li><a href="/cgi-bin/koha/suggestion/suggestion.pl">Suggestions</a></li><!-- TMPL_ELSE --><!-- /TMPL_IF -->
4
        <!-- TMPL_ELSE --> <a href="/cgi-bin/koha/suggestion/suggestion.pl">No suggestions waiting</a> <!-- /TMPL_IF -->
5
    </li>
6
	<li><a href="/cgi-bin/koha/suggestion/suggestion.pl">Manage suggestions</a></li>
7
    <!-- TMPL_IF name="CAN_user_acquisition_budget_manage" -->
4
    <!-- TMPL_IF name="CAN_user_acquisition_budget_manage" -->
8
	<li><a href="/cgi-bin/koha/admin/aqbudgetperiods.pl">Budgets</a></li>
5
	<li><a href="/cgi-bin/koha/admin/aqbudgetperiods.pl">Budgets</a></li>
9
	<li><a href="/cgi-bin/koha/admin/aqbudgets.pl">Funds</a></li>
6
	<li><a href="/cgi-bin/koha/admin/aqbudgets.pl">Funds</a></li>
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/acqui-home.tmpl (-1 / +9 lines)
Lines 43-48 Link Here
43
    <!-- /TMPL_IF -->
43
    <!-- /TMPL_IF -->
44
    </fieldset>
44
    </fieldset>
45
</div>
45
</div>
46
47
<!-- TMPL_IF NAME="suggestion" --><!-- TMPL_IF name="suggestions_count" -->
48
<div id="acqui_acqui_home_suggestions">
49
    <fieldset>
50
    <legend>Pending suggestions</legend>
51
        <p><!--TMPL_VAR NAME="suggestions_count" --> suggestions waiting. <a href="/cgi-bin/koha/suggestion/suggestion.pl">Manage suggestions</a>.</p>
52
    </fieldset>
53
</div><!-- /TMPL_IF --><!-- /TMPL_IF -->
54
46
</div>
55
</div>
47
56
48
<div class="yui-u">
57
<div class="yui-u">
49
- 

Return to bug 4498