|
Lines 74-80
if ($do_it) {
Link Here
|
| 74 |
if ( $output eq "screen" ) { |
74 |
if ( $output eq "screen" ) { |
| 75 |
$template->param( mainloop => $results ); |
75 |
$template->param( mainloop => $results ); |
| 76 |
output_html_with_http_headers $input, $cookie, $template->output; |
76 |
output_html_with_http_headers $input, $cookie, $template->output; |
| 77 |
exit(1); |
77 |
exit; |
| 78 |
} else { |
78 |
} else { |
| 79 |
print $input->header( |
79 |
print $input->header( |
| 80 |
-type => 'application/vnd.sun.xml.calc', |
80 |
-type => 'application/vnd.sun.xml.calc', |
|
Lines 104-110
if ($do_it) {
Link Here
|
| 104 |
print $sep. $col->{totalcol}; |
104 |
print $sep. $col->{totalcol}; |
| 105 |
} |
105 |
} |
| 106 |
print $sep. @$results[0]->{total}; |
106 |
print $sep. @$results[0]->{total}; |
| 107 |
exit(1); |
107 |
exit; |
| 108 |
} |
108 |
} |
| 109 |
} else { |
109 |
} else { |
| 110 |
my $dbh = C4::Context->dbh; |
110 |
my $dbh = C4::Context->dbh; |
|
Lines 618-622
sub calculate {
Link Here
|
| 618 |
push @mainloop, \%globalline; |
618 |
push @mainloop, \%globalline; |
| 619 |
return \@mainloop; |
619 |
return \@mainloop; |
| 620 |
} |
620 |
} |
| 621 |
|
|
|
| 622 |
1; |
| 623 |
- |