|
Lines 243-248
sub Z3950Search {
Link Here
|
| 243 |
my $lccn= $pars->{lccn}; |
243 |
my $lccn= $pars->{lccn}; |
| 244 |
my $lccall= $pars->{lccall}; |
244 |
my $lccall= $pars->{lccall}; |
| 245 |
my $controlnumber= $pars->{controlnumber}; |
245 |
my $controlnumber= $pars->{controlnumber}; |
|
|
246 |
my $srchany= $pars->{srchany}; |
| 247 |
my $stdid= $pars->{stdid}; |
| 246 |
|
248 |
|
| 247 |
my $show_next = 0; |
249 |
my $show_next = 0; |
| 248 |
my $total_pages = 0; |
250 |
my $total_pages = 0; |
|
Lines 280-291
sub Z3950Search {
Link Here
|
| 280 |
$nterms++; |
282 |
$nterms++; |
| 281 |
} |
283 |
} |
| 282 |
if ($title) { |
284 |
if ($title) { |
| 283 |
utf8::decode($title); |
|
|
| 284 |
$query .= " \@attr 1=4 \"$title\" "; |
285 |
$query .= " \@attr 1=4 \"$title\" "; |
| 285 |
$nterms++; |
286 |
$nterms++; |
| 286 |
} |
287 |
} |
| 287 |
if ($author) { |
288 |
if ($author) { |
| 288 |
utf8::decode($author); |
|
|
| 289 |
$query .= " \@attr 1=1003 \"$author\" "; |
289 |
$query .= " \@attr 1=1003 \"$author\" "; |
| 290 |
$nterms++; |
290 |
$nterms++; |
| 291 |
} |
291 |
} |
|
Lines 294-300
sub Z3950Search {
Link Here
|
| 294 |
$nterms++; |
294 |
$nterms++; |
| 295 |
} |
295 |
} |
| 296 |
if ($subject) { |
296 |
if ($subject) { |
| 297 |
utf8::decode($subject); |
|
|
| 298 |
$query .= " \@attr 1=21 \"$subject\" "; |
297 |
$query .= " \@attr 1=21 \"$subject\" "; |
| 299 |
$nterms++; |
298 |
$nterms++; |
| 300 |
} |
299 |
} |
|
Lines 310-315
sub Z3950Search {
Link Here
|
| 310 |
$query .= " \@attr 1=12 \"$controlnumber\" "; |
309 |
$query .= " \@attr 1=12 \"$controlnumber\" "; |
| 311 |
$nterms++; |
310 |
$nterms++; |
| 312 |
} |
311 |
} |
|
|
312 |
if($srchany) { |
| 313 |
$query .= " \@attr 1=1016 \"$srchany\" "; |
| 314 |
$nterms++; |
| 315 |
} |
| 316 |
if($stdid) { |
| 317 |
$query .= " \@attr 1=1007 \"$stdid\" "; |
| 318 |
$nterms++; |
| 319 |
} |
| 313 |
for my $i (1..$nterms-1) { |
320 |
for my $i (1..$nterms-1) { |
| 314 |
$query = "\@and " . $query; |
321 |
$query = "\@and " . $query; |
| 315 |
} |
322 |
} |