Lines 42-47
my $dewey = $input->param('dewey');
Link Here
|
42 |
my $controlnumber = $input->param('controlnumber'); |
42 |
my $controlnumber = $input->param('controlnumber'); |
43 |
my $stdid = $input->param('stdid'); |
43 |
my $stdid = $input->param('stdid'); |
44 |
my $srchany = $input->param('srchany'); |
44 |
my $srchany = $input->param('srchany'); |
|
|
45 |
my $publicationyear = $input->param('publicationyear'); |
45 |
my $op = $input->param('op')||''; |
46 |
my $op = $input->param('op')||''; |
46 |
|
47 |
|
47 |
my $page = $input->param('current_page') || 1; |
48 |
my $page = $input->param('current_page') || 1; |
Lines 68-73
$template->param(
Link Here
|
68 |
biblionumber => $biblionumber, |
69 |
biblionumber => $biblionumber, |
69 |
dewey => $dewey, |
70 |
dewey => $dewey, |
70 |
subject => $subject, |
71 |
subject => $subject, |
|
|
72 |
publicationyear => $publicationyear, |
71 |
); |
73 |
); |
72 |
|
74 |
|
73 |
if ( $op ne "do_search" ) { |
75 |
if ( $op ne "do_search" ) { |
Lines 111-116
my $pars= {
Link Here
|
111 |
controlnumber => $controlnumber, |
113 |
controlnumber => $controlnumber, |
112 |
stdid => $stdid, |
114 |
stdid => $stdid, |
113 |
srchany => $srchany, |
115 |
srchany => $srchany, |
|
|
116 |
publicationyear => $publicationyear, |
114 |
}; |
117 |
}; |
115 |
Z3950Search($pars, $template); |
118 |
Z3950Search($pars, $template); |
116 |
output_html_with_http_headers $input, $cookie, $template->output; |
119 |
output_html_with_http_headers $input, $cookie, $template->output; |