* multiple biblio subtitles are correctly stored & shown in simple (non-MARC) view, even after a biblio modif.

This commit is contained in:
tipaul 2005-02-10 13:15:27 +00:00
parent a4add09ef9
commit 89e4e6ba20
3 changed files with 20 additions and 3 deletions

View File

@ -1487,6 +1487,17 @@ sub bibdata {
my $data;
$data = $sth->fetchrow_hashref;
$sth->finish;
# handle management of repeated subtitle
$sth = $dbh->prepare("Select * from bibliosubtitle where biblionumber = ?");
$sth->execute($bibnum);
my @subtitles;
while (my $dat = $sth->fetchrow_hashref){
my %line;
$line{subtitle} = $dat->{subtitle};
push @subtitles, \%line;
} # while
$data->{subtitles} = \@subtitles;
$sth->finish;
$sth = $dbh->prepare("Select * from bibliosubject where biblionumber = ?");
$sth->execute($bibnum);
my @subjects;

View File

@ -109,7 +109,7 @@ if ($op eq 'add_form') {
# other subfields
push @kohafields, "additionalauthors.author";
push @kohafields, "bibliosubject.subject";
push @kohafields, "bibliosubtitle.title";
push @kohafields, "bibliosubtitle.subtitle";
# build authorised value list
$sth2->finish;
$sth2 = $dbh->prepare("select distinct category from authorised_values");

View File

@ -40,12 +40,18 @@
<!-- BIBLIO RECORD TABLE -->
<tr>
<th>
<!-- TMPL_VAR NAME="title" --> (record <!-- TMPL_VAR NAME="biblionumber" -->)
<!-- TMPL_VAR NAME="title" -->
</th>
</tr>
<tr>
<td>
<!-- TMPL_IF name="subtitle" --><b>Subtitle:</b><!-- /TMPL_IF --> <!-- TMPL_VAR NAME="subtitle" -->
<!-- TMPL_IF name="subtitles" -->
<b>Subtitle(s):</b>
<!-- TMPL_LOOP name="subtitles" -->
<!-- TMPL_VAR NAME="subtitle" --> ;
<!-- /TMPL_LOOP -->
<br />
<!-- /TMPL_IF -->
<!-- TMPL_IF name="author" --><b>Author:</b> <!-- TMPL_VAR NAME="author" --><br /><!-- /TMPL_IF -->
<!-- TMPL_IF name="additional" --><b>Additional Author:</b><!-- TMPL_VAR NAME="additional" --><br /><!-- /TMPL_IF -->
<!-- TMPL_IF name="publishercode" --><b>Published by :</b><!-- /TMPL_IF --> <!-- TMPL_VAR NAME="publishercode" -->