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(-type => 'application/vnd.sun.xml.calc', |
79 |
print $input->header(-type => 'application/vnd.sun.xml.calc', |
80 |
-encoding => 'utf-8', |
80 |
-encoding => 'utf-8', |
Lines 102-108
if ($do_it) {
Link Here
|
102 |
print $sep.$col->{totalcol}; |
102 |
print $sep.$col->{totalcol}; |
103 |
} |
103 |
} |
104 |
print $sep.@$results[0]->{total}; |
104 |
print $sep.@$results[0]->{total}; |
105 |
exit(1); |
105 |
exit; |
106 |
} |
106 |
} |
107 |
} else { |
107 |
} else { |
108 |
my $dbh = C4::Context->dbh; |
108 |
my $dbh = C4::Context->dbh; |