Lines 54-60
my @filters = $input->param("Filter");
Link Here
|
54 |
$filters[3]=format_date_in_iso($filters[3]); |
54 |
$filters[3]=format_date_in_iso($filters[3]); |
55 |
$filters[4]=format_date_in_iso($filters[4]); |
55 |
$filters[4]=format_date_in_iso($filters[4]); |
56 |
my $digits = $input->param("digits"); |
56 |
my $digits = $input->param("digits"); |
57 |
my $period = $input->param("period"); |
57 |
our $period = $input->param("period"); |
58 |
my $borstat = $input->param("status"); |
58 |
my $borstat = $input->param("status"); |
59 |
my $borstat1 = $input->param("activity"); |
59 |
my $borstat1 = $input->param("activity"); |
60 |
my $output = $input->param("output"); |
60 |
my $output = $input->param("output"); |
Lines 298-303
sub calculate {
Link Here
|
298 |
# warn " init table : $row->{rowtitle} / $col->{coltitle} "; |
298 |
# warn " init table : $row->{rowtitle} / $col->{coltitle} "; |
299 |
$table{$row->{rowtitle}}->{$col->{coltitle}}=0; |
299 |
$table{$row->{rowtitle}}->{$col->{coltitle}}=0; |
300 |
} |
300 |
} |
|
|
301 |
$row->{rowtitle} ||= ''; |
301 |
$table{$row->{rowtitle}}->{totalrow}=0; |
302 |
$table{$row->{rowtitle}}->{totalrow}=0; |
302 |
$table{$row->{rowtitle}}->{rowtitle_display} = $row->{rowtitle_display}; |
303 |
$table{$row->{rowtitle}}->{rowtitle_display} = $row->{rowtitle_display}; |
303 |
} |
304 |
} |
304 |
- |
|
|