7 use C4::Auth; # get_template_and_user
8 use C4::Interface::CGI::Output;
13 my $basketno = $input->param('basketno');
14 my $supplierid = $input->param('booksellerid');
16 my $title = $input->param('title');
17 my $author = $input->param('author');
18 my $note = $input->param('note');
19 my $copyrightdate =$input->param('copyrightdate');
20 my $publishercode = $input->param('publishercode');
21 my $volumedesc = $input->param('volumedesc');
22 my $publicationyear = $input->param('publicationyear');
23 my $place = $input->param('place');
24 my $isbn = $input->param('isbn');
25 my $status = 'ACCEPTED';
26 my $suggestedbyme = -1; # search ALL suggestors
27 my $op = $input->param('op');
28 $op = 'else' unless $op;
30 my $dbh = C4::Context->dbh;
31 my ($template, $borrowernumber, $cookie)
32 = get_template_and_user({template_name => "acqui/suggestion-select.tmpl",
36 flagsrequired => {acquisition => 1},
39 my $suggestions_loop= &searchsuggestion($borrowernumber,$author,$title,$publishercode,$status,$suggestedbyme);
40 $template->param(suggestions_loop => $suggestions_loop,
43 publishercode => $publishercode,
45 suggestedbyme => $suggestedbyme,
46 basketno => $basketno,
47 supplierid => $supplierid,
50 output_html_with_http_headers $input, $cookie, $template->output;