6 use C4::Interface::CGI::Output;
14 my $dbh=C4::Context->dbh;
15 my $sth=$dbh->prepare("select description,itemtype from itemtypes order by description");
17 while (my ($description,$itemtype) = $sth->fetchrow) {
18 $classlist.="<option value=\"$itemtype\">$description</option>\n";
24 my ($template, $borrowernumber, $cookie)
25 = get_template_and_user({template_name => "opac-search.tmpl",
29 flagsrequired => {borrow => 1},
33 $template->param(classlist => $classlist,
34 LibraryName => C4::Context->preference("LibraryName"),
37 output_html_with_http_headers $query, $cookie, $template->output;