check errors (not new_acq related)
This commit is contained in:
parent
11eb4b57af
commit
95e571df60
|
|
@ -469,6 +469,33 @@ sub header_cell_loop {
|
|||
return \@headers;
|
||||
}
|
||||
|
||||
foreach (1..6) {
|
||||
$template->param('build' . $_) and $template->param(buildx => $_) and last;
|
||||
}
|
||||
$template->param( 'referer' => $input->referer(),
|
||||
'DHTMLcalendar_dateformat' => C4::Dates->DHTMLcalendar(),
|
||||
);
|
||||
|
||||
output_html_with_http_headers $input, $cookie, $template->output;
|
||||
my ($mastertables,$subtables) = create_compound($master,$subreport);
|
||||
$template->param( 'save_compound' => 1,
|
||||
master=>$mastertables,
|
||||
subsql=>$subtables
|
||||
);
|
||||
}
|
||||
|
||||
# pass $sth, get back an array of names for the column headers
|
||||
sub header_cell_values {
|
||||
my $sth = shift or return ();
|
||||
return @{$sth->{NAME}};
|
||||
}
|
||||
|
||||
# pass $sth, get back a TMPL_LOOP-able set of names for the column headers
|
||||
sub header_cell_loop {
|
||||
my @headers = map { +{ cell => $_ } } header_cell_values (shift);
|
||||
return \@headers;
|
||||
}
|
||||
|
||||
foreach (1..6) {
|
||||
$template->param('build' . $_) and $template->param(buildx => $_) and last;
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue