version 1.54, 2001/03/21 02:30:01
|
version 1.55, 2001/03/21 02:34:35
|
Line 52 my %metadatafields;
|
Line 52 my %metadatafields;
|
my %cprtag; |
my %cprtag; |
my %mimetag; |
my %mimetag; |
my $closebutton; |
my $closebutton; |
my $viewselect=<<END; |
my $basicviewselect=<<END; |
<select name='view'> |
<select name='basicviewselect'> |
|
<option value='Detailed Citation View'>Detailed Citation View</option> |
|
<option value='Summary View'>Summary View</option> |
|
<option value='Fielded Format'>Fielded Format</option> |
|
<option value='XML/SGML'>XML/SGML</option> |
|
</select> |
|
END |
|
my $advancedviewselect=<<END; |
|
<select name='advancedviewselect'> |
<option value='Detailed Citation View'>Detailed Citation View</option> |
<option value='Detailed Citation View'>Detailed Citation View</option> |
<option value='Summary View'>Summary View</option> |
<option value='Summary View'>Summary View</option> |
<option value='Fielded Format'>Fielded Format</option> |
<option value='Fielded Format'>Fielded Format</option> |
Line 262 ENDDOCUMENT
|
Line 270 ENDDOCUMENT
|
<input type="submit" name="basicsubmit" value="SEARCH"> |
<input type="submit" name="basicsubmit" value="SEARCH"> |
<input type="reset" name="reset" value="RESET"> |
<input type="reset" name="reset" value="RESET"> |
$closebutton |
$closebutton |
$viewselect |
$basicviewselect |
</p> |
</p> |
<hr> |
<hr> |
<h3>Advanced Search</h3> |
<h3>Advanced Search</h3> |
Line 271 $scrout
|
Line 279 $scrout
|
<input type="submit" name="advancedsubmit" value="SEARCH"> |
<input type="submit" name="advancedsubmit" value="SEARCH"> |
<input type="reset" name="reset" value="RESET"> |
<input type="reset" name="reset" value="RESET"> |
$closebutton |
$closebutton |
$viewselect |
$advancedviewselect |
</p> |
</p> |
</form> |
</form> |
</body> |
</body> |
Line 627 onClick="javascript:select_data('$title'
|
Line 635 onClick="javascript:select_data('$title'
|
END |
END |
my $httphost=$ENV{'HTTP_HOST'}; |
my $httphost=$ENV{'HTTP_HOST'}; |
|
|
if ($ENV{'form.viewselect'} eq 'Detailed Citation View') { |
my $viewselect; |
|
if ($mode eq 'Basic') { |
|
$viewselect=$ENV{'form.basicviewselect'}; |
|
} |
|
elsif ($mode eq 'Advanced') { |
|
$viewselect=$ENV{'form.advancedviewselect'}; |
|
} |
|
|
|
if ($viewselect eq 'Detailed Citation View') { |
$compiledresult.=&detailed_citation_view(@fields, |
$compiledresult.=&detailed_citation_view(@fields, |
$hostname,$httphost); |
$hostname,$httphost); |
} |
} |
elsif ($ENV{'form.viewselect'} eq 'Summary View') { |
elsif ($viewselect eq 'Summary View') { |
$compiledresult.=&summary_view(@fields,$hostname,$httphost); |
$compiledresult.=&summary_view(@fields,$hostname,$httphost); |
} |
} |
elsif ($ENV{'form.viewselect'} eq 'Fielded Format') { |
elsif ($viewselect eq 'Fielded Format') { |
$compiledresult.=&fielded_format_view(@fields,$hostname, |
$compiledresult.=&fielded_format_view(@fields,$hostname, |
$httphost); |
$httphost); |
} |
} |
elsif ($ENV{'form.viewselect'} eq 'XML/SGML') { |
elsif ($viewselect eq 'XML/SGML') { |
$compiledresult.=&xml_sgml_view(@fields,$hostname,$httphost); |
$compiledresult.=&xml_sgml_view(@fields,$hostname,$httphost); |
} |
} |
|
|