7 use C4::Auth; # get_template_and_user
8 use C4::Interface::CGI::Output;
12 my $title = $input->param('title');
13 my $author = $input->param('author');
14 my $name = $input->param('name');
15 my $from_placed_on = $input->param('fromplacedon');
16 my $to_placed_on = $input->param('toplacedon');
18 my $dbh = C4::Context->dbh;
19 my ($template, $loggedinuser, $cookie)
20 = get_template_and_user({template_name => "acqui/histsearch.tmpl",
24 flagsrequired => {acquisition => 1},
27 my ($order_loop,$total_qty,$total_price,$total_qtyreceived)= &histsearch($title,$author,$name,$from_placed_on,$to_placed_on);
28 $template->param(suggestions_loop => $order_loop,
29 total_qty => $total_qty,
30 total_qtyreceived => $total_qtyreceived,
31 total_price => sprintf ("%.2f",$total_price),
32 numresults => scalar(@$order_loop),
36 from_placed_on =>$from_placed_on,
37 to_placed_on =>$to_placed_on,
38 intranetcolorstylesheet => C4::Context->preference("intranetcolorstylesheet"),
39 intranetstylesheet => C4::Context->preference("intranetstylesheet"),
40 IntranetNav => C4::Context->preference("IntranetNav"),
42 output_html_with_http_headers $input, $cookie, $template->output;