Lines 53-58
my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
Link Here
|
53 |
|
53 |
|
54 |
my $status = $query->param('status') || "ASKED"; |
54 |
my $status = $query->param('status') || "ASKED"; |
55 |
my $suggestions_count = CountSuggestion($status); |
55 |
my $suggestions_count = CountSuggestion($status); |
|
|
56 |
my $userid = $query->param('userid'); |
56 |
|
57 |
|
57 |
my $budget_arr = GetBudgetHierarchy; |
58 |
my $budget_arr = GetBudgetHierarchy; |
58 |
|
59 |
|
Lines 124-134
$template->param(
Link Here
|
124 |
suggestions_count => $suggestions_count, |
125 |
suggestions_count => $suggestions_count, |
125 |
); |
126 |
); |
126 |
|
127 |
|
127 |
|
|
|
128 |
|
129 |
|
130 |
|
131 |
|
132 |
my $aqstep; |
128 |
my $aqstep; |
133 |
my $cur = Koha::Acquisition::Currencies->get_active; |
129 |
my $cur = Koha::Acquisition::Currencies->get_active; |
134 |
|
130 |
|
Lines 141-158
if ( $cur ) {
Link Here
|
141 |
my $budget = GetPeriodsCount(); |
137 |
my $budget = GetPeriodsCount(); |
142 |
my $budgetid = C4::Budgets->GetHighestBudgetPeriod(); |
138 |
my $budgetid = C4::Budgets->GetHighestBudgetPeriod(); |
143 |
if (!@budget_loop){ |
139 |
if (!@budget_loop){ |
144 |
if (!$cur) { |
140 |
if (!$cur) { |
145 |
$aqstep = 1; |
141 |
$aqstep = 1; |
146 |
$template->param( step => $aqstep ); |
142 |
$template->param( step => $aqstep ); |
147 |
} elsif ($budget && $budgetid == 1){ |
143 |
} elsif ($budget && $budgetid == 1){ |
148 |
$aqstep = 3; |
144 |
$aqstep = 3; |
149 |
$template->param( step => $aqstep ); |
145 |
$template->param( step => $aqstep ); |
150 |
} elsif ($budgetid > 1) { |
146 |
} elsif ($budgetid > 1) { |
151 |
print $query->redirect("/cgi-bin/koha/admin/aqbudgetperiods.pl"); |
147 |
print $query->redirect("/cgi-bin/koha/admin/aqbudgetperiods.pl"); |
152 |
exit; |
148 |
exit; |
153 |
} else { |
149 |
} else { |
154 |
$aqstep = 2; |
150 |
$aqstep = 2; |
155 |
$template->param( step => $aqstep ); |
151 |
$template->param( step => $aqstep ); |
|
|
152 |
} |
156 |
} |
153 |
} |
|
|
154 |
|
155 |
if ( C4::Context->IsSuperLibrarian() ) { |
156 |
my $displayonboard = 1; |
157 |
$template->param( displayonboard => $displayonboard ); |
157 |
} |
158 |
} |
|
|
159 |
|
158 |
output_html_with_http_headers $query, $cookie, $template->output; |
160 |
output_html_with_http_headers $query, $cookie, $template->output; |