Lines 88-97
my $borrower_id = $template->{VARS}->{'USER_INFO'}->{'borrowernumber'};
Link Here
|
88 |
my $borrower_branchcode = $template->{VARS}->{'USER_INFO'}->{'branchcode'}; |
88 |
my $borrower_branchcode = $template->{VARS}->{'USER_INFO'}->{'branchcode'}; |
89 |
|
89 |
|
90 |
my $authcat = $input->param('authcat'); |
90 |
my $authcat = $input->param('authcat'); |
91 |
my $show_active = $input->param('show_active'); |
91 |
my $show_active = $input->param('show_active') // 0; |
92 |
my $show_actual = $input->param('show_actual'); |
92 |
my $show_actual = $input->param('show_actual'); |
93 |
my $show_percent = $input->param('show_percent'); |
93 |
my $show_percent = $input->param('show_percent'); |
94 |
my $output = $input->param("output"); |
94 |
my $output = $input->param("output") // q{}; |
95 |
our $basename = $input->param("basename"); |
95 |
our $basename = $input->param("basename"); |
96 |
our $del = $input->param("sep"); |
96 |
our $del = $input->param("sep"); |
97 |
|
97 |
|
Lines 106-112
if ( $budget_period_locked == 1 && not defined $show_actual ) {
Link Here
|
106 |
$authcat = 'Asort1' if not defined $authcat; # defaults to Asort if no authcat given |
106 |
$authcat = 'Asort1' if not defined $authcat; # defaults to Asort if no authcat given |
107 |
|
107 |
|
108 |
my $budget_id = $input->param('budget_id'); |
108 |
my $budget_id = $input->param('budget_id'); |
109 |
my $op = $input->param("op"); |
109 |
my $op = $input->param("op") // q{}; |
110 |
|
110 |
|
111 |
my $budgets_ref = GetBudgetHierarchy( $budget_period_id, $show_mine?$template->{VARS}->{'USER_INFO'}->{'branchcode'}:'', $show_mine?$template->{VARS}->{'USER_INFO'}->{'borrowernumber'}:'' ); |
111 |
my $budgets_ref = GetBudgetHierarchy( $budget_period_id, $show_mine?$template->{VARS}->{'USER_INFO'}->{'branchcode'}:'', $show_mine?$template->{VARS}->{'USER_INFO'}->{'borrowernumber'}:'' ); |
112 |
|
112 |
|
Lines 350-357
foreach my $budget (@budgets) {
Link Here
|
350 |
); |
350 |
); |
351 |
|
351 |
|
352 |
my ( $actual, $estimated, $display ) = GetBudgetsPlanCell( \%cell, $period, $budget ); |
352 |
my ( $actual, $estimated, $display ) = GetBudgetsPlanCell( \%cell, $period, $budget ); |
353 |
$cell{actual_amount} = sprintf( "%.2f", $actual ); |
353 |
$cell{actual_amount} = sprintf( "%.2f", $actual // 0 ); |
354 |
$cell{estimated_amount} = sprintf( "%.2f", $estimated ); |
354 |
$cell{estimated_amount} = sprintf( "%.2f", $estimated // 0 ); |
355 |
$cell{display} = $authvals_row[$i]{display}; |
355 |
$cell{display} = $authvals_row[$i]{display}; |
356 |
$cell{colnum} = $i; |
356 |
$cell{colnum} = $i; |
357 |
|
357 |
|
358 |
- |
|
|