sub AddBiblio {
my ( $record, $frameworkcode ) = @_;
- my ($biblionumber,$biblioitemnumber,$error);
+ my ($biblionumber,$biblioitemnumber,$error);
my $dbh = C4::Context->dbh;
# transform the data into koha-table style data
my $olddata = TransformMarcToKoha( $dbh, $record, $frameworkcode );
"SELECT tagfield,tagsubfield
FROM marc_subfield_structure
WHERE frameworkcode=?
- AND kohafield=?"
+ AND kohafield=?"
);
&TransformKohaToMarcOneField( $sth, $record, "items.itemnumber", $itemnumber,
$frameworkcode );
my ( $biblionumber ) = @_;
my $dbh = C4::Context->dbh;
my $error; # for error handling
-
- # First make sure this biblio has no items attached
- my $sth = $dbh->prepare("SELECT itemnumber FROM items WHERE biblionumber=?");
- $sth->execute($biblionumber);
- if (my $itemnumber = $sth->fetchrow){
- # Fix this to use a status the template can understand
- $error .= "This Biblio has items attached, please delete them first before deleting this biblio ";
- }
+
+ # First make sure this biblio has no items attached
+ my $sth = $dbh->prepare("SELECT itemnumber FROM items WHERE biblionumber=?");
+ $sth->execute($biblionumber);
+ if (my $itemnumber = $sth->fetchrow){
+ # Fix this to use a status the template can understand
+ $error .= "This Biblio has items attached, please delete them first before deleting this biblio ";
+ }
return $error if $error;
sub DelItem {
my ( $dbh, $biblionumber, $itemnumber ) = @_;
-
- # check the item has no current issues
-
-
+
+ # check the item has no current issues
+
+
&_koha_delete_item( $dbh, $itemnumber );
# get the MARC record
my $dbh = C4::Context->dbh;
# my $query = C4::Context->preference('item-level_itypes') ?
- # " SELECT * , biblioitems.notes AS bnotes, biblio.notes
- # FROM biblio
+ # " SELECT * , biblioitems.notes AS bnotes, biblio.notes
+ # FROM biblio
# LEFT JOIN biblioitems ON biblio.biblionumber = biblioitems.biblionumber
- # WHERE biblio.biblionumber = ?
+ # WHERE biblio.biblionumber = ?
# AND biblioitems.biblionumber = biblio.biblionumber
#";
-
- my $query = " SELECT * , biblioitems.notes AS bnotes, itemtypes.notforloan as bi_notforloan, biblio.notes
- FROM biblio
+
+ my $query = " SELECT * , biblioitems.notes AS bnotes, itemtypes.notforloan as bi_notforloan, biblio.notes
+ FROM biblio
LEFT JOIN biblioitems ON biblio.biblionumber = biblioitems.biblionumber
LEFT JOIN itemtypes ON biblioitems.itemtype = itemtypes.itemtype
- WHERE biblio.biblionumber = ?
+ WHERE biblio.biblionumber = ?
AND biblioitems.biblionumber = biblio.biblionumber ";
-
+
my $sth = $dbh->prepare($query);
$sth->execute($bibnum);
my $data;
FROM items
LEFT JOIN biblio ON biblio.biblionumber = items.biblionumber
LEFT JOIN biblioitems ON biblioitems.biblioitemnumber = items.biblioitemnumber";
- $query .= (C4::Context->preference('item-level_itypes')) ?
- " LEFT JOIN itemtypes on items.itype = itemtypes.itemtype "
- : " LEFT JOIN itemtypes on biblioitems.itemtype = itemtypes.itemtype ";
- $query .= "WHERE items.biblionumber = ? ORDER BY items.dateaccessioned desc" ;
+ $query .= (C4::Context->preference('item-level_itypes')) ?
+ " LEFT JOIN itemtypes on items.itype = itemtypes.itemtype "
+ : " LEFT JOIN itemtypes on biblioitems.itemtype = itemtypes.itemtype ";
+ $query .= "WHERE items.biblionumber = ? ORDER BY items.dateaccessioned desc" ;
my $sth = $dbh->prepare($query);
$sth->execute($biblionumber);
my $i = 0;
$data->{cardnumber} = $idata->{cardnumber};
$data->{surname} = $idata->{surname};
$data->{firstname} = $idata->{firstname};
- $datedue = format_date( $idata->{'date_due'} );
- if (C4::Context->preference("IndependantBranches")){
- my $userenv = C4::Context->userenv;
- if ( ($userenv) && ( $userenv->{flags} != 1 ) ) {
- $data->{'NOTSAMEBRANCH'} = 1 if ($idata->{'bcode'} ne $userenv->{branch});
- }
- }
+ $datedue = $idata->{'date_due'};
+ if (C4::Context->preference("IndependantBranches")){
+ my $userenv = C4::Context->userenv;
+ if ( ($userenv) && ( $userenv->{flags} != 1 ) ) {
+ $data->{'NOTSAMEBRANCH'} = 1 if ($idata->{'bcode'} ne $userenv->{branch});
+ }
+ }
}
if ( $datedue eq '' ) {
- #$datedue="Available";
my ( $restype, $reserves ) =
C4::Reserves::CheckReserves( $data->{'itemnumber'} );
if ($restype) {
- #$datedue=$restype;
$count_reserves = $restype;
}
}
if ( my $bdata = $bsth->fetchrow_hashref ) {
$data->{'branchname'} = $bdata->{'branchname'};
}
- my $date = format_date( $data->{'datelastseen'} );
- $data->{'datelastseen'} = $date;
$data->{'datedue'} = $datedue;
$data->{'count_reserves'} = $count_reserves;
my ($lib) = $stackstatus->fetchrow;
$data->{stack} = $lib;
}
+ # Find the last 3 people who borrowed this item.
+ my $sth2 = $dbh->prepare("SELECT * FROM issues,borrowers
+ WHERE itemnumber = ?
+ AND issues.borrowernumber = borrowers.borrowernumber
+ AND returndate IS NOT NULL LIMIT 3");
+ $sth2->execute($data->{'itemnumber'});
+ my $ii = 0;
+ while (my $data2 = $sth2->fetchrow_hashref()) {
+ $data->{"timestamp$ii"} = $data2->{'timestamp'} if $data2->{'timestamp'};
+ $data->{"card$ii"} = $data2->{'cardnumber'} if $data2->{'cardnumber'};
+ $data->{"borrower$ii"} = $data2->{'borrowernumber'} if $data2->{'borrowernumber'};
+ $ii++;
+ }
+
$results[$i] = $data;
$i++;
}
if ( $tag and $subfield ) {
my $sth =
$dbh->prepare(
- "SELECT authorised_value
- FROM marc_subfield_structure
- WHERE tagfield=?
- AND tagsubfield=?
- AND frameworkcode=?
- "
+ "SELECT authorised_value
+ FROM marc_subfield_structure
+ WHERE tagfield=?
+ AND tagsubfield=?
+ AND frameworkcode=?
+ "
);
$sth->execute( $tag, $subfield, $fwk );
if ( my ($authorisedvaluecat) = $sth->fetchrow ) {
my $authvalsth =
$dbh->prepare(
- "SELECT authorised_value,lib
- FROM authorised_values
- WHERE category=?
- ORDER BY lib
- "
+ "SELECT authorised_value,lib
+ FROM authorised_values
+ WHERE category=?
+ ORDER BY lib
+ "
);
$authvalsth->execute($authorisedvaluecat);
while ( my ( $authorisedvalue, $lib ) = $authvalsth->fetchrow ) {
if ( $tag and $subfield ) {
my $sth =
$dbh->prepare(
- "SELECT authorised_value
- FROM marc_subfield_structure
- WHERE tagfield=?
- AND tagsubfield=?
- AND frameworkcode=?"
+ "SELECT authorised_value
+ FROM marc_subfield_structure
+ WHERE tagfield=?
+ AND tagsubfield=?
+ AND frameworkcode=?"
);
$sth->execute( $tag, $subfield, $fwk );
if ( my ($authorisedvaluecat) = $sth->fetchrow ) {
my $authvalsth =
$dbh->prepare(
- "SELECT authorised_value,lib
- FROM authorised_values
- WHERE category=?
- ORDER BY lib"
+ "SELECT authorised_value,lib
+ FROM authorised_values
+ WHERE category=?
+ ORDER BY lib"
);
$authvalsth->execute($authorisedvaluecat);
while ( my ( $authorisedvalue, $lib ) = $authvalsth->fetchrow ) {
sub GetBiblioItemData {
my ($biblioitemnumber) = @_;
my $dbh = C4::Context->dbh;
- my $query = "SELECT *,biblioitems.notes AS bnotes
- FROM biblio, biblioitems ";
- unless(C4::Context->preference('item-level_itypes')) {
- $query .= "LEFT JOIN itemtypes on biblioitems.itemtype=itemtypes.itemtype ";
- }
- $query .= " WHERE biblio.biblionumber = biblioitems.biblionumber
- AND biblioitemnumber = ? ";
+ my $query = "SELECT *,biblioitems.notes AS bnotes
+ FROM biblio, biblioitems ";
+ unless(C4::Context->preference('item-level_itypes')) {
+ $query .= "LEFT JOIN itemtypes on biblioitems.itemtype=itemtypes.itemtype ";
+ }
+ $query .= " WHERE biblio.biblionumber = biblioitems.biblionumber
+ AND biblioitemnumber = ? ";
my $sth = $dbh->prepare($query);
my $data;
$sth->execute($biblioitemnumber);
my $dbh = C4::Context->dbh;
my $sth;
if($itemnumber) {
- $sth=$dbh->prepare( "SELECT * FROM items
- LEFT JOIN biblio ON biblio.biblionumber = items.biblionumber
- LEFT JOIN biblioitems ON biblioitems.biblioitemnumber = items.biblioitemnumber
- WHERE items.itemnumber = ?") ;
- $sth->execute($itemnumber);
- } else {
- $sth=$dbh->prepare( "SELECT * FROM items
- LEFT JOIN biblio ON biblio.biblionumber = items.biblionumber
- LEFT JOIN biblioitems ON biblioitems.biblioitemnumber = items.biblioitemnumber
- WHERE items.barcode = ?") ;
- $sth->execute($barcode);
- }
+ $sth=$dbh->prepare( "SELECT * FROM items
+ LEFT JOIN biblio ON biblio.biblionumber = items.biblionumber
+ LEFT JOIN biblioitems ON biblioitems.biblioitemnumber = items.biblioitemnumber
+ WHERE items.itemnumber = ?") ;
+ $sth->execute($itemnumber);
+ } else {
+ $sth=$dbh->prepare( "SELECT * FROM items
+ LEFT JOIN biblio ON biblio.biblionumber = items.biblionumber
+ LEFT JOIN biblioitems ON biblioitems.biblioitemnumber = items.biblioitemnumber
+ WHERE items.barcode = ?") ;
+ $sth->execute($barcode);
+ }
my $data = $sth->fetchrow_hashref;
$sth->finish;
return ($data);
=cut
sub GetItemsByBiblioitemnumber {
- my ( $bibitem ) = @_;
- my $dbh = C4::Context->dbh;
- my $sth = $dbh->prepare("SELECT * FROM items WHERE items.biblioitemnumber = ?") || die $dbh->errstr;
- # Get all items attached to a biblioitem
+ my ( $bibitem ) = @_;
+ my $dbh = C4::Context->dbh;
+ my $sth = $dbh->prepare("SELECT * FROM items WHERE items.biblioitemnumber = ?") || die $dbh->errstr;
+ # Get all items attached to a biblioitem
my $i = 0;
my @results;
$sth->execute($bibitem) || die $sth->errstr;
while ( my $data = $sth->fetchrow_hashref ) {
- # Foreach item, get circulation information
- my $sth2 = $dbh->prepare( "SELECT * FROM issues,borrowers
+ # Foreach item, get circulation information
+ my $sth2 = $dbh->prepare( "SELECT * FROM issues,borrowers
WHERE itemnumber = ?
AND returndate is NULL
AND issues.borrowernumber = borrowers.borrowernumber"
);
$sth2->execute( $data->{'itemnumber'} );
if ( my $data2 = $sth2->fetchrow_hashref ) {
- # if item is out, set the due date and who it is out too
- $data->{'date_due'} = $data2->{'date_due'};
- $data->{'cardnumber'} = $data2->{'cardnumber'};
- $data->{'borrowernumber'} = $data2->{'borrowernumber'};
- }
+ # if item is out, set the due date and who it is out too
+ $data->{'date_due'} = $data2->{'date_due'};
+ $data->{'cardnumber'} = $data2->{'cardnumber'};
+ $data->{'borrowernumber'} = $data2->{'borrowernumber'};
+ }
else {
- # set date_due to blank, so in the template we check itemlost, and wthdrawn
- $data->{'date_due'} = '';
- } # else
+ # set date_due to blank, so in the template we check itemlost, and wthdrawn
+ $data->{'date_due'} = '';
+ } # else
$sth2->finish;
# Find the last 3 people who borrowed this item.
my $query2 = "SELECT * FROM issues, borrowers WHERE itemnumber = ?
$sth2->execute( $data->{'itemnumber'} ) || die $sth2->errstr;
my $i2 = 0;
while ( my $data2 = $sth2->fetchrow_hashref ) {
- $data->{"timestamp$i2"} = $data2->{'timestamp'};
- $data->{"card$i2"} = $data2->{'cardnumber'};
- $data->{"borrower$i2"} = $data2->{'borrowernumber'};
- $i2++;
- }
+ $data->{"timestamp$i2"} = $data2->{'timestamp'};
+ $data->{"card$i2"} = $data2->{'cardnumber'};
+ $data->{"borrower$i2"} = $data2->{'borrowernumber'};
+ $i2++;
+ }
$sth2->finish;
push(@results,$data);
}
$frameworkcode = "" unless ( $total > 0 );
$sth =
$dbh->prepare(
- "SELECT tagfield,liblibrarian,libopac,mandatory,repeatable
- FROM marc_tag_structure
- WHERE frameworkcode=?
- ORDER BY tagfield"
+ "SELECT tagfield,liblibrarian,libopac,mandatory,repeatable
+ FROM marc_tag_structure
+ WHERE frameworkcode=?
+ ORDER BY tagfield"
);
$sth->execute($frameworkcode);
my ( $liblibrarian, $libopac, $tag, $res, $tab, $mandatory, $repeatable );
$sth =
$dbh->prepare(
- "SELECT tagfield,tagsubfield,liblibrarian,libopac,tab,mandatory,repeatable,authorised_value,authtypecode,value_builder,kohafield,seealso,hidden,isurl,link,defaultvalue
- FROM marc_subfield_structure
- WHERE frameworkcode=?
- ORDER BY tagfield,tagsubfield
- "
+ "SELECT tagfield,tagsubfield,liblibrarian,libopac,tab,mandatory,repeatable,authorised_value,authtypecode,value_builder,kohafield,seealso,hidden,isurl,link,defaultvalue
+ FROM marc_subfield_structure
+ WHERE frameworkcode=?
+ ORDER BY tagfield,tagsubfield
+ "
);
$sth->execute($frameworkcode);
$mintag = "600";
$maxtag = "611";
}
-
+
my @marcsubjects;
- my $subject = "";
- my $subfield = "";
- my $marcsubject;
+ my $subject = "";
+ my $subfield = "";
+ my $marcsubject;
foreach my $field ( $record->field('6..' )) {
next unless $field->tag() >= $mintag && $field->tag() <= $maxtag;
- my @subfields_loop;
+ my @subfields_loop;
my @subfields = $field->subfields();
- my $counter = 0;
- my @link_loop;
- # if there is an authority link, build the link with an= subfield9
- my $subfield9 = $field->subfield('9');
- for my $subject_subfield (@subfields ) {
- # don't load unimarc subfields 3,4,5
- next if (($marcflavour eq "UNIMARC") and ($subject_subfield->[0] =~ (3|4|5) ) );
- my $code = $subject_subfield->[0];
- my $value = $subject_subfield->[1];
- my $linkvalue = $value;
- $linkvalue =~ s/(\(|\))//g;
- my $operator = " and " unless $counter==0;
- if ($subfield9) {
+ my $counter = 0;
+ my @link_loop;
+ # if there is an authority link, build the link with an= subfield9
+ my $subfield9 = $field->subfield('9');
+ for my $subject_subfield (@subfields ) {
+ # don't load unimarc subfields 3,4,5
+ next if (($marcflavour eq "UNIMARC") and ($subject_subfield->[0] =~ (3|4|5) ) );
+ my $code = $subject_subfield->[0];
+ my $value = $subject_subfield->[1];
+ my $linkvalue = $value;
+ $linkvalue =~ s/(\(|\))//g;
+ my $operator = " and " unless $counter==0;
+ if ($subfield9) {
@link_loop = ({'limit' => 'an' ,link => "$subfield9" });
} else {
push @link_loop, {'limit' => 'su', link => $linkvalue, operator => $operator };
}
- my $separator = C4::Context->preference("authoritysep") unless $counter==0;
- # ignore $9
- my @this_link_loop = @link_loop;
- push @subfields_loop, {code => $code, value => $value, link_loop => \@this_link_loop, separator => $separator} unless ($subject_subfield->[0] == 9 );
- $counter++;
- }
+ my $separator = C4::Context->preference("authoritysep") unless $counter==0;
+ # ignore $9
+ my @this_link_loop = @link_loop;
+ push @subfields_loop, {code => $code, value => $value, link_loop => \@this_link_loop, separator => $separator} unless ($subject_subfield->[0] == 9 );
+ $counter++;
+ }
- push @marcsubjects, { MARCSUBJECT_SUBFIELDS_LOOP => \@subfields_loop };
+ push @marcsubjects, { MARCSUBJECT_SUBFIELDS_LOOP => \@subfields_loop };
- }
+ }
return \@marcsubjects;
} #end getMARCsubjects
$mintag = "700";
$maxtag = "712";
}
- else {
- return;
- }
+ else {
+ return;
+ }
my @marcauthors;
foreach my $field ( $record->fields ) {
next unless $field->tag() >= $mintag && $field->tag() <= $maxtag;
- my @subfields_loop;
+ my @subfields_loop;
my @link_loop;
my @subfields = $field->subfields();
my $count_auth = 0;
- # if there is an authority link, build the link with Koha-Auth-Number: subfield9
- my $subfield9 = $field->subfield('9');
+ # if there is an authority link, build the link with Koha-Auth-Number: subfield9
+ my $subfield9 = $field->subfield('9');
for my $authors_subfield (@subfields) {
- # don't load unimarc subfields 3, 5
+ # don't load unimarc subfields 3, 5
next if ($marcflavour eq 'UNIMARC' and ($authors_subfield->[0] =~ (3|5) ) );
my $subfieldcode = $authors_subfield->[0];
my $value = $authors_subfield->[1];
- my $linkvalue = $value;
- $linkvalue =~ s/(\(|\))//g;
- my $operator = " and " unless $count_auth==0;
- # if we have an authority link, use that as the link, otherwise use standard searching
- if ($subfield9) {
- @link_loop = ({'limit' => 'Koha-Auth-Number' ,link => "$subfield9" });
- }
- else {
- # reset $linkvalue if UNIMARC author responsibility
- if ( $marcflavour eq 'UNIMARC' and ($authors_subfield->[0] eq '4')) {
- $linkvalue = "(".GetAuthorisedValueDesc( $field->tag(), $authors_subfield->[0], $authors_subfield->[1], '', $tagslib ).")";
- }
- push @link_loop, {'limit' => 'au', link => $linkvalue, operator => $operator };
- }
- my @this_link_loop = @link_loop;
- my $separator = C4::Context->preference("authoritysep") unless $count_auth==0;
- push @subfields_loop, {code => $subfieldcode, value => $value, link_loop => \@this_link_loop, separator => $separator} unless ($authors_subfield->[0] == 9 );
- $count_auth++;
+ my $linkvalue = $value;
+ $linkvalue =~ s/(\(|\))//g;
+ my $operator = " and " unless $count_auth==0;
+ # if we have an authority link, use that as the link, otherwise use standard searching
+ if ($subfield9) {
+ @link_loop = ({'limit' => 'Koha-Auth-Number' ,link => "$subfield9" });
+ }
+ else {
+ # reset $linkvalue if UNIMARC author responsibility
+ if ( $marcflavour eq 'UNIMARC' and ($authors_subfield->[0] eq '4')) {
+ $linkvalue = "(".GetAuthorisedValueDesc( $field->tag(), $authors_subfield->[0], $authors_subfield->[1], '', $tagslib ).")";
+ }
+ push @link_loop, {'limit' => 'au', link => $linkvalue, operator => $operator };
+ }
+ my @this_link_loop = @link_loop;
+ my $separator = C4::Context->preference("authoritysep") unless $count_auth==0;
+ push @subfields_loop, {code => $subfieldcode, value => $value, link_loop => \@this_link_loop, separator => $separator} unless ($authors_subfield->[0] == 9 );
+ $count_auth++;
}
push @marcauthors, { MARCAUTHOR_SUBFIELDS_LOOP => \@subfields_loop };
}
}
$marcurl = { MARCURL => $url,
notes => \@notes,
- };
- if($marcflavour eq 'MARC21') {
- my $s3 = $field->subfield('3');
- my $link = $field->subfield('y');
+ };
+ if($marcflavour eq 'MARC21') {
+ my $s3 = $field->subfield('3');
+ my $link = $field->subfield('y');
$marcurl->{'linktext'} = $link || $s3 || $url ;;
$marcurl->{'part'} = $s3 if($link);
$marcurl->{'toc'} = 1 if($s3 =~ /^[Tt]able/) ;
- } else {
- $marcurl->{'linktext'} = $url;
- }
+ } else {
+ $marcurl->{'linktext'} = $url;
+ }
push @marcurls, $marcurl;
- }
+ }
return \@marcurls;
} #end GetMarcUrls
my $counter = 0;
my @link_loop;
for my $series_subfield (@subfields) {
- my $volume_number;
- undef $volume_number;
- # see if this is an instance of a volume
- if ($series_subfield->[0] eq 'v') {
- $volume_number=1;
- }
+ my $volume_number;
+ undef $volume_number;
+ # see if this is an instance of a volume
+ if ($series_subfield->[0] eq 'v') {
+ $volume_number=1;
+ }
my $code = $series_subfield->[0];
my $value = $series_subfield->[1];
my $operator = " and " unless $counter==0;
push @link_loop, {link => $linkvalue, operator => $operator };
my $separator = C4::Context->preference("authoritysep") unless $counter==0;
- if ($volume_number) {
- push @subfields_loop, {volumenum => $value};
- }
- else {
+ if ($volume_number) {
+ push @subfields_loop, {volumenum => $value};
+ }
+ else {
push @subfields_loop, {code => $code, value => $value, link_loop => \@link_loop, separator => $separator, volumenum => $volume_number};
- }
+ }
$counter++;
}
push @marcseries, { MARCSERIES_SUBFIELDS_LOOP => \@subfields_loop };
=over 4
- $result = TransformMarcToKoha( $dbh, $record, $frameworkcode )
+ $result = TransformMarcToKoha( $dbh, $record, $frameworkcode )
=back
{
my $sth =
$dbh->prepare(
- "SELECT branchcode,branchname FROM branches WHERE branchcode = ? ORDER BY branchname"
+ "SELECT branchcode,branchname FROM branches WHERE branchcode = ? ORDER BY branchname"
);
$sth->execute( C4::Context->userenv->{branch} );
push @authorised_values, ""
else {
my $sth =
$dbh->prepare(
- "SELECT branchcode,branchname FROM branches ORDER BY branchname"
+ "SELECT branchcode,branchname FROM branches ORDER BY branchname"
);
$sth->execute;
push @authorised_values, ""
{
my $sth =
$dbh->prepare(
- "SELECT itemtype,description FROM itemtypes ORDER BY description"
+ "SELECT itemtype,description FROM itemtypes ORDER BY description"
);
$sth->execute;
push @authorised_values, ""
sub _koha_add_biblio {
my ( $dbh, $biblio, $frameworkcode ) = @_;
- my $error;
+ my $error;
- # set the series flag
+ # set the series flag
my $serial = 0;
if ( $biblio->{'seriestitle'} ) { $serial = 1 };
- my $query =
+ my $query =
"INSERT INTO biblio
- SET frameworkcode = ?,
- author = ?,
- title = ?,
- unititle =?,
- notes = ?,
- serial = ?,
- seriestitle = ?,
- copyrightdate = ?,
- datecreated=NOW(),
- abstract = ?
- ";
+ SET frameworkcode = ?,
+ author = ?,
+ title = ?,
+ unititle =?,
+ notes = ?,
+ serial = ?,
+ seriestitle = ?,
+ copyrightdate = ?,
+ datecreated=NOW(),
+ abstract = ?
+ ";
my $sth = $dbh->prepare($query);
$sth->execute(
- $frameworkcode,
+ $frameworkcode,
$biblio->{'author'},
$biblio->{'title'},
- $biblio->{'unititle'},
+ $biblio->{'unititle'},
$biblio->{'notes'},
- $serial,
+ $serial,
$biblio->{'seriestitle'},
- $biblio->{'copyrightdate'},
+ $biblio->{'copyrightdate'},
$biblio->{'abstract'}
);
my $biblionumber = $dbh->{'mysql_insertid'};
- if ( $dbh->errstr ) {
- $error.="ERROR in _koha_add_biblio $query".$dbh->errstr;
+ if ( $dbh->errstr ) {
+ $error.="ERROR in _koha_add_biblio $query".$dbh->errstr;
warn $error;
}
$sth->finish();
- #warn "LEAVING _koha_add_biblio: ".$biblionumber."\n";
+ #warn "LEAVING _koha_add_biblio: ".$biblionumber."\n";
return ($biblionumber,$error);
}
sub _koha_modify_biblio {
my ( $dbh, $biblio, $frameworkcode ) = @_;
- my $error;
+ my $error;
my $query = "
UPDATE biblio
SET frameworkcode = ?,
- author = ?,
- title = ?,
- unititle = ?,
- notes = ?,
- serial = ?,
- seriestitle = ?,
- copyrightdate = ?,
+ author = ?,
+ title = ?,
+ unititle = ?,
+ notes = ?,
+ serial = ?,
+ seriestitle = ?,
+ copyrightdate = ?,
abstract = ?
WHERE biblionumber = ?
- "
- ;
+ "
+ ;
my $sth = $dbh->prepare($query);
$sth->execute(
- $frameworkcode,
+ $frameworkcode,
$biblio->{'author'},
$biblio->{'title'},
$biblio->{'unititle'},
$biblio->{'serial'},
$biblio->{'seriestitle'},
$biblio->{'copyrightdate'},
- $biblio->{'abstract'},
+ $biblio->{'abstract'},
$biblio->{'biblionumber'}
) if $biblio->{'biblionumber'};
if ( $dbh->errstr || !$biblio->{'biblionumber'} ) {
- $error.="ERROR in _koha_modify_biblio $query".$dbh->errstr;
+ $error.="ERROR in _koha_modify_biblio $query".$dbh->errstr;
warn $error;
}
return ( $biblio->{'biblionumber'},$error );
sub _koha_modify_biblioitem_nonmarc {
my ( $dbh, $biblioitem ) = @_;
- my $error;
+ my $error;
- # re-calculate the cn_sort, it may have changed
- my ($cn_sort) = GetClassSort($biblioitem->{'biblioitems.cn_source'}, $biblioitem->{'cn_class'}, $biblioitem->{'cn_item'} );
+ # re-calculate the cn_sort, it may have changed
+ my ($cn_sort) = GetClassSort($biblioitem->{'biblioitems.cn_source'}, $biblioitem->{'cn_class'}, $biblioitem->{'cn_item'} );
- my $query =
- "UPDATE biblioitems
- SET biblionumber = ?,
- volume = ?,
- number = ?,
+ my $query =
+ "UPDATE biblioitems
+ SET biblionumber = ?,
+ volume = ?,
+ number = ?,
itemtype = ?,
isbn = ?,
issn = ?,
- publicationyear = ?,
+ publicationyear = ?,
publishercode = ?,
- volumedate = ?,
- volumedesc = ?,
- collectiontitle = ?,
- collectionissn = ?,
- collectionvolume= ?,
- editionstatement= ?,
- editionresponsibility = ?,
- illus = ?,
- pages = ?,
- notes = ?,
- size = ?,
- place = ?,
- lccn = ?,
- url = ?,
- cn_source = ?,
+ volumedate = ?,
+ volumedesc = ?,
+ collectiontitle = ?,
+ collectionissn = ?,
+ collectionvolume= ?,
+ editionstatement= ?,
+ editionresponsibility = ?,
+ illus = ?,
+ pages = ?,
+ notes = ?,
+ size = ?,
+ place = ?,
+ lccn = ?,
+ url = ?,
+ cn_source = ?,
cn_class = ?,
- cn_item = ?,
- cn_suffix = ?,
- cn_sort = ?,
- totalissues = ?
+ cn_item = ?,
+ cn_suffix = ?,
+ cn_sort = ?,
+ totalissues = ?
where biblioitemnumber = ?
- ";
- my $sth = $dbh->prepare($query);
- $sth->execute(
- $biblioitem->{'biblionumber'},
- $biblioitem->{'volume'},
- $biblioitem->{'number'},
- $biblioitem->{'itemtype'},
- $biblioitem->{'isbn'},
- $biblioitem->{'issn'},
- $biblioitem->{'publicationyear'},
- $biblioitem->{'publishercode'},
- $biblioitem->{'volumedate'},
- $biblioitem->{'volumedesc'},
- $biblioitem->{'collectiontitle'},
- $biblioitem->{'collectionissn'},
- $biblioitem->{'collectionvolume'},
- $biblioitem->{'editionstatement'},
- $biblioitem->{'editionresponsibility'},
- $biblioitem->{'illus'},
- $biblioitem->{'pages'},
- $biblioitem->{'bnotes'},
- $biblioitem->{'size'},
- $biblioitem->{'place'},
- $biblioitem->{'lccn'},
- $biblioitem->{'url'},
- $biblioitem->{'biblioitems.cn_source'},
- $biblioitem->{'cn_class'},
- $biblioitem->{'cn_item'},
- $biblioitem->{'cn_suffix'},
- $cn_sort,
- $biblioitem->{'totalissues'},
- $biblioitem->{'biblioitemnumber'}
- );
+ ";
+ my $sth = $dbh->prepare($query);
+ $sth->execute(
+ $biblioitem->{'biblionumber'},
+ $biblioitem->{'volume'},
+ $biblioitem->{'number'},
+ $biblioitem->{'itemtype'},
+ $biblioitem->{'isbn'},
+ $biblioitem->{'issn'},
+ $biblioitem->{'publicationyear'},
+ $biblioitem->{'publishercode'},
+ $biblioitem->{'volumedate'},
+ $biblioitem->{'volumedesc'},
+ $biblioitem->{'collectiontitle'},
+ $biblioitem->{'collectionissn'},
+ $biblioitem->{'collectionvolume'},
+ $biblioitem->{'editionstatement'},
+ $biblioitem->{'editionresponsibility'},
+ $biblioitem->{'illus'},
+ $biblioitem->{'pages'},
+ $biblioitem->{'bnotes'},
+ $biblioitem->{'size'},
+ $biblioitem->{'place'},
+ $biblioitem->{'lccn'},
+ $biblioitem->{'url'},
+ $biblioitem->{'biblioitems.cn_source'},
+ $biblioitem->{'cn_class'},
+ $biblioitem->{'cn_item'},
+ $biblioitem->{'cn_suffix'},
+ $cn_sort,
+ $biblioitem->{'totalissues'},
+ $biblioitem->{'biblioitemnumber'}
+ );
if ( $dbh->errstr ) {
- $error.="ERROR in _koha_modify_biblioitem_nonmarc $query".$dbh->errstr;
+ $error.="ERROR in _koha_modify_biblioitem_nonmarc $query".$dbh->errstr;
warn $error;
}
- return ($biblioitem->{'biblioitemnumber'},$error);
+ return ($biblioitem->{'biblioitemnumber'},$error);
}
=head2 _koha_add_biblioitem
sub _koha_add_biblioitem {
my ( $dbh, $biblioitem ) = @_;
- my $error;
+ my $error;
- my ($cn_sort) = GetClassSort($biblioitem->{'biblioitems.cn_source'}, $biblioitem->{'cn_class'}, $biblioitem->{'cn_item'} );
+ my ($cn_sort) = GetClassSort($biblioitem->{'biblioitems.cn_source'}, $biblioitem->{'cn_class'}, $biblioitem->{'cn_item'} );
my $query =
"INSERT INTO biblioitems SET
biblionumber = ?,
cn_sort = ?,
totalissues = ?
";
- my $sth = $dbh->prepare($query);
+ my $sth = $dbh->prepare($query);
$sth->execute(
$biblioitem->{'biblionumber'},
$biblioitem->{'volume'},
);
my $bibitemnum = $dbh->{'mysql_insertid'};
if ( $dbh->errstr ) {
- $error.="ERROR in _koha_add_biblioitem $query".$dbh->errstr;
- warn $error;
+ $error.="ERROR in _koha_add_biblioitem $query".$dbh->errstr;
+ warn $error;
}
$sth->finish();
return ($bibitemnum,$error);
sub _koha_new_items {
my ( $dbh, $item, $barcode ) = @_;
- my $error;
+ my $error;
my ($items_cn_sort) = GetClassSort($item->{'items.cn_source'}, $item->{'itemcallnumber'}, "");
# if dateaccessioned is provided, use it. Otherwise, set to NOW()
if ( $item->{'dateaccessioned'} eq '' || !$item->{'dateaccessioned'} ) {
- my $today = C4::Dates->new();
- $item->{'dateaccessioned'} = $today->output("iso"); #TODO: check time issues
- }
- my $query =
+ my $today = C4::Dates->new();
+ $item->{'dateaccessioned'} = $today->output("iso"); #TODO: check time issues
+ }
+ my $query =
"INSERT INTO items SET
- biblionumber = ?,
+ biblionumber = ?,
biblioitemnumber = ?,
- barcode = ?,
- dateaccessioned = ?,
- booksellerid = ?,
+ barcode = ?,
+ dateaccessioned = ?,
+ booksellerid = ?,
homebranch = ?,
price = ?,
- replacementprice = ?,
+ replacementprice = ?,
replacementpricedate = NOW(),
- datelastborrowed = ?,
- datelastseen = NOW(),
- stack = ?,
- notforloan = ?,
- damaged = ?,
- itemlost = ?,
- wthdrawn = ?,
- itemcallnumber = ?,
- restricted = ?,
- itemnotes = ?,
- holdingbranch = ?,
- paidfor = ?,
- location = ?,
- onloan = ?,
- issues = ?,
- renewals = ?,
- reserves = ?,
- cn_source = ?,
- cn_sort = ?,
- ccode = ?,
- itype = ?,
- materials = ?,
- uri = ?
+ datelastborrowed = ?,
+ datelastseen = NOW(),
+ stack = ?,
+ notforloan = ?,
+ damaged = ?,
+ itemlost = ?,
+ wthdrawn = ?,
+ itemcallnumber = ?,
+ restricted = ?,
+ itemnotes = ?,
+ holdingbranch = ?,
+ paidfor = ?,
+ location = ?,
+ onloan = ?,
+ issues = ?,
+ renewals = ?,
+ reserves = ?,
+ cn_source = ?,
+ cn_sort = ?,
+ ccode = ?,
+ itype = ?,
+ materials = ?,
+ uri = ?
";
my $sth = $dbh->prepare($query);
- $sth->execute(
- $item->{'biblionumber'},
- $item->{'biblioitemnumber'},
+ $sth->execute(
+ $item->{'biblionumber'},
+ $item->{'biblioitemnumber'},
$barcode,
- $item->{'dateaccessioned'},
- $item->{'booksellerid'},
+ $item->{'dateaccessioned'},
+ $item->{'booksellerid'},
$item->{'homebranch'},
$item->{'price'},
- $item->{'replacementprice'},
- $item->{datelastborrowed},
- $item->{stack},
- $item->{'notforloan'},
- $item->{'damaged'},
+ $item->{'replacementprice'},
+ $item->{datelastborrowed},
+ $item->{stack},
+ $item->{'notforloan'},
+ $item->{'damaged'},
$item->{'itemlost'},
- $item->{'wthdrawn'},
- $item->{'itemcallnumber'},
+ $item->{'wthdrawn'},
+ $item->{'itemcallnumber'},
$item->{'restricted'},
- $item->{'itemnotes'},
- $item->{'holdingbranch'},
- $item->{'paidfor'},
- $item->{'location'},
- $item->{'onloan'},
- $item->{'issues'},
- $item->{'renewals'},
- $item->{'reserves'},
- $item->{'items.cn_source'},
- $items_cn_sort,
- $item->{'ccode'},
- $item->{'itype'},
- $item->{'materials'},
- $item->{'uri'},
+ $item->{'itemnotes'},
+ $item->{'holdingbranch'},
+ $item->{'paidfor'},
+ $item->{'location'},
+ $item->{'onloan'},
+ $item->{'issues'},
+ $item->{'renewals'},
+ $item->{'reserves'},
+ $item->{'items.cn_source'},
+ $items_cn_sort,
+ $item->{'ccode'},
+ $item->{'itype'},
+ $item->{'materials'},
+ $item->{'uri'},
);
my $itemnumber = $dbh->{'mysql_insertid'};
if ( defined $sth->errstr ) {
$error.="ERROR in _koha_new_items $query".$sth->errstr;
}
- $sth->finish();
+ $sth->finish();
return ( $itemnumber, $error );
}
sub _koha_modify_item {
my ( $dbh, $item ) = @_;
- my $error;
+ my $error;
- # calculate items.cn_sort
+ # calculate items.cn_sort
if($item->{'itemcallnumber'}) {
# This works, even when user is setting the call number blank (in which case
# how would we get here to calculate new (blank) of items.cn_sort?).
# blanked itemcallnumber, there is already a undef value for $item->{'items.cn_sort'}.
#
# This is subtle; it is also fragile.
- $item->{'items.cn_sort'} = GetClassSort($item->{'items.cn_source'}, $item->{'itemcallnumber'}, "");
- }
+ $item->{'items.cn_sort'} = GetClassSort($item->{'items.cn_source'}, $item->{'itemcallnumber'}, "");
+ }
my $query = "UPDATE items SET ";
- my @bind;
- for my $key ( keys %$item ) {
- $query.="$key=?,";
- push @bind, $item->{$key};
+ my @bind;
+ for my $key ( keys %$item ) {
+ $query.="$key=?,";
+ push @bind, $item->{$key};
}
- $query =~ s/,$//;
+ $query =~ s/,$//;
$query .= " WHERE itemnumber=?";
- push @bind, $item->{'itemnumber'};
+ push @bind, $item->{'itemnumber'};
my $sth = $dbh->prepare($query);
$sth->execute(@bind);
if ( $dbh->errstr ) {
warn $error;
}
$sth->finish();
- return ($item->{'itemnumber'},$error);
+ return ($item->{'itemnumber'},$error);
}
=head2 _koha_delete_biblio
sub _koha_delete_item {
my ( $dbh, $itemnum ) = @_;
- # save the deleted item to deleteditems table
+ # save the deleted item to deleteditems table
my $sth = $dbh->prepare("SELECT * FROM items WHERE itemnumber=?");
$sth->execute($itemnum);
my $data = $sth->fetchrow_hashref();
$sth->execute(@bind);
$sth->finish();
- # delete from items table
+ # delete from items table
$sth = $dbh->prepare("DELETE FROM items WHERE itemnumber=?");
$sth->execute($itemnum);
$sth->finish();
- return undef;
+ return undef;
}
=head1 UNEXPORTED FUNCTIONS
my ( $biblionumber ) = @_;
my $dbh = C4::Context->dbh;
my $query = "SELECT count(*)
- FROM items
- WHERE biblionumber=?";
+ FROM items
+ WHERE biblionumber=?";
my $sth = $dbh->prepare($query);
$sth->execute($biblionumber);
my $count = $sth->fetchrow;
<div id="doc3" class="yui-t2">
<div id="bd">
- <div id="yui-main">
- <div class="yui-b">
+ <div id="yui-main">
+ <div class="yui-b">
<!-- TMPL_INCLUDE NAME="cat-toolbar.inc" -->
<div id="catalogue_detail_biblio">
+ <!-- TMPL_LOOP NAME="BIBITEM_DATA" -->
+ <h2><!-- TMPL_VAR NAME="title" --> <!-- TMPL_IF NAME="author" -->, by <!-- TMPL_VAR NAME="author" --><!-- /TMPL_IF --></h2>
+ <ol class="bibliodetails">
+ <li><span class="label">Biblionumber:</span> <!-- TMPL_VAR NAME="biblionumber" --> </li>
+ <!-- TMPL_UNLESS NAME="item-level_itypes" -->
+ <li><span class="label">Item type:</span> <!-- TMPL_VAR NAME="itemtypename" --> </li>
+ <!-- /TMPL_UNLESS -->
+ <!-- TMPL_IF NAME="url" --><li><span class="label">URL:</span> <a href="<!-- TMPL_VAR NAME="url" -->"><!-- TMPL_VAR NAME="url" --></a></li><!-- /TMPL_IF -->
+ <!-- deprecated? <li><span class="label">Loan length:</span> <!-- TMPL_VAR NAME="loanlength" --> </li> -->
+ <li><span class="label">Rental charge:</span>$<!-- TMPL_VAR NAME="rentalcharge" --> </li>
+ <li><span class="label">Classification:</span> <!-- TMPL_VAR NAME="cn_class" --> <!-- TMPL_VAR NAME="cn_item" --> <!-- TMPL_VAR NAME="cn_suffix" --> </li>
+ <li><span class="label">ISBN:</span> <!-- TMPL_VAR NAME="isbn" --> </li>
+ <li><span class="label">Publisher:</span><!-- TMPL_VAR NAME="place" --> <!-- TMPL_VAR NAME="publishercode" --> <!-- TMPL_VAR NAME="publicationyear" --> </li>
+ <!-- TMPL_IF NAME="volumeddesc" --><li><span class="label">Volume:</span> <!-- TMPL_VAR NAME="volumeddesc" --></li><!-- /TMPL_IF -->
+ <li><span class="label">Physical Details:</span> <!-- TMPL_VAR NAME="pages" --> <!-- TMPL_VAR NAME="illus" --> <!-- TMPL_VAR NAME="size" --> </li>
+ <!-- TMPL_IF NAME="bnotes" --><li><span class="label">Notes:</span> <!-- TMPL_VAR NAME="bnotes" --></li><!-- /TMPL_IF -->
+ <li><span class="label">No. of Items:</span> <!-- TMPL_VAR NAME="count" --> </li>
+ </ol>
+ <!-- /TMPL_LOOP -->
+ <br clear="all" />
+ <!-- TMPL_LOOP NAME="ITEM_DATA" -->
+ <div class="yui-g">
+ <h2>Barcode <!-- TMPL_VAR NAME="barcode" --> <!-- TMPL_IF name="notforloantext" --><!-- TMPL_VAR name="notforloantext" --> <!-- /TMPL_IF --></h2>
+ <ol class="bibliodetails">
+ <li><span class="listgroup">Item Information</span> <!-- TMPL_IF NAME="CAN_user_editcatalogue" --><a href="/cgi-bin/koha/cataloguing/additem.pl?op=edititem&biblionumber=<!-- TMPL_VAR NAME="biblionumber"-->&itemnumber=<!-- TMPL_VAR NAME="itemnumber" -->">Edit Items</a><!-- /TMPL_IF --></li>
+ <li><ul>
+ <li><span class="label">Home Library:</span> <!-- TMPL_VAR NAME="homebranchname" --> </li>
+ <!-- TMPL_IF NAME="item-level_itypes" -->
+ <li><span class="label">Item type:</span> <!-- TMPL_VAR NAME="itype" --> </li>
+ <!-- /TMPL_IF -->
+ <li><span class="label">Collection:</span> <!-- TMPL_VAR NAME="ccode" --> </li>
+ <!-- TMPL_IF NAME="collection" --><li><span class="label">Collection:</span> <!-- TMPL_VAR NAME="collection" --></li> <!-- /TMPL_IF -->
+ <li><span class="label">Item Callnumber:</span> <!-- TMPL_VAR NAME="itemcallnumber" --> </li>
+ <!-- TMPL_IF NAME="copyvol" --><li><span class="label">Copy / Vol :</span> <!-- TMPL_VAR NAME="copyvol" --> </li> <!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="replacementprice" --><li><span class="label">Replacement Price:</span> <!-- TMPL_VAR NAME="replacementprice" --> </li> <!-- /TMPL_IF -->
+ </ul></li>
+ <li><span class="listgroup">Statuses</span>
+ (
+ <!-- TMPL_IF name="notforloantext" --><!-- TMPL_VAR name="notforloantext" --> <!-- /TMPL_IF -->
+ <!-- TMPL_IF name="itemlost"-->Lost<!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="damaged" -->Damaged<!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="wthdrawn" -->Withdrawn<!-- /TMPL_IF -->
+ )
+ </li>
+ <li><ul>
+ <li><span class="label">Current Location:</span> <!-- TMPL_VAR NAME="holdingbranchname" --> </li>
+ <li><span class="label">Circulation Status:</span> <!-- TMPL_IF NAME="issue" -->Checked out to <a href="/cgi-bin/koha/members/moremember.pl?borrowernumber=<!-- TMPL_VAR NAME="borrowernumber" -->"><!-- TMPL_VAR NAME="cardnumber" --></a><!-- TMPL_ELSE -->Not Checked out <!-- /TMPL_IF --></li>
+ <li><span class="label">Lost Status:</span>
+ <form action="updateitem.pl" method="post">
+ <input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
+ <input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" />
+ <input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
+ <select name="itemlost" >
+ <!-- TMPL_LOOP NAME="itemlostloop" -->
+ <!-- TMPL_IF NAME="selected" -->
+ <option value="<!-- TMPL_VAR NAME="authorised_value" -->" selected="selected"><!-- TMPL_VAR NAME="lib" --></option>
+ <!-- TMPL_ELSE -->
+ <option value="<!-- TMPL_VAR NAME="authorised_value" -->"><!-- TMPL_VAR NAME="lib" --></option>
+ <!-- /TMPL_IF -->
+ <!-- /TMPL_LOOP -->
+ </select>
+ <input type="hidden" name="wthdrawn" value="<!-- TMPL_VAR NAME="wthdrawn" -->" />
+ <input type="hidden" name="damaged" value="<!-- TMPL_VAR NAME="damaged" -->" />
+ <input type="submit" name="submit" class="submit" value="Set Status" /></form>
+ </li>
+ <li><span class="label">Damaged Status:</span>
+ <form action="updateitem.pl" method="post">
+ <input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
+ <input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" />
+ <input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
+ <select name="damaged" >
+ <!-- TMPL_LOOP NAME="itemdamagedloop" -->
+ <!-- TMPL_IF NAME="selected" -->
+ <option value="<!-- TMPL_VAR NAME="authorised_value" -->" selected="selected"><!-- TMPL_VAR NAME="lib" --></option>
+ <!-- TMPL_ELSE -->
+ <option value="<!-- TMPL_VAR NAME="authorised_value" -->"><!-- TMPL_VAR NAME="lib" --></option>
+ <!-- /TMPL_IF -->
+ <!-- /TMPL_LOOP -->
+ </select>
+ <input type="hidden" name="wthdrawn" value="<!-- TMPL_VAR NAME="wthdrawn" -->" />
+ <input type="hidden" name="itemlost" value="<!-- TMPL_VAR NAME="itemlost" -->" />
+ <input type="submit" name="submit" class="submit" value="Set Status" /></form>
+ </li>
+ <li><span class="label">Withdrawn?:</span><!-- TMPL_IF NAME="wthdrawn" -->Yes<!-- TMPL_ELSE -->No<!-- /TMPL_IF -->
+ <form action="updateitem.pl" method="post">
+ <input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
+ <input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" />
+ <input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
+ <input type="hidden" name="itemlost" value="<!-- TMPL_VAR NAME="itemlost" -->" />
+ <input type="hidden" name="damaged" value="<!-- TMPL_VAR NAME="damaged" -->" />
- <!-- TMPL_LOOP NAME="BIBITEM_DATA" -->
- <h2><!-- TMPL_VAR NAME="title" --> <!-- TMPL_IF NAME="author" -->, by <!-- TMPL_VAR NAME="author" --><!-- /TMPL_IF --></h2>
- <ol class="bibliodetails">
- <li><span class="label">Biblionumber:</span> <!-- TMPL_VAR NAME="biblionumber" --></li>
- <!-- TMPL_UNLESS NAME="item-level_itypes" --> <li><span class="label">Item type:</span> <!-- TMPL_IF NAME="itemtype" --><!-- TMPL_VAR NAME="itemtype" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li><!-- /TMPL_UNLESS -->
- <li><span class="label">Collection:</span><!-- TMPL_IF NAME="description" --><!-- TMPL_VAR NAME="description" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --> </li>
- <li><span class="label">URL:</span> <!-- TMPL_IF NAME="url" --><a href="<!-- TMPL_VAR NAME="url" -->"><!-- TMPL_VAR NAME="url" --></a><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <li><span class="label">Loan length:</span> <!-- TMPL_IF NAME="loanlength" --><!-- TMPL_VAR NAME="loanlength" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <li><span class="label">Rental charge:</span> <!-- TMPL_IF NAME="rentalcharge" --><!-- TMPL_VAR NAME="rentalcharge" --><!-- TMPL_ELSE -->0.00<!-- /TMPL_IF --></li>
- <li><span class="label">Classification:</span> <!-- TMPL_IF NAME="classification" --><!-- TMPL_VAR NAME="classification" --><!-- TMPL_VAR NAME="dewey" --><!-- TMPL_VAR NAME="subclass" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <li><span class="label">ISBN:</span> <!-- TMPL_IF NAME="isbn" --><!-- TMPL_VAR NAME="isbn" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <li><span class="label">Publisher:</span><!-- TMPL_IF NAME="place" --><!-- TMPL_VAR NAME="place" --><!-- /TMPL_IF --> <!-- TMPL_IF NAME="publishercode" --><!-- TMPL_VAR NAME="publishercode" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --><!-- TMPL_IF NAME="publicationyear" --> <!-- TMPL_VAR NAME="publicationyear" --><!-- /TMPL_IF --> </li>
- <!-- TMPL_IF NAME="volumeddesc" --><li><span class="label">Volume:</span> <!-- TMPL_VAR NAME="volumeddesc" --></li><!-- /TMPL_IF -->
- <li><span class="label">Physical Details:</span> <!-- TMPL_IF NAME="pages" --><!-- TMPL_VAR NAME="pages" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --> <!-- TMPL_IF NAME="illus" --><!-- TMPL_VAR NAME="illus" --><!-- /TMPL_IF --> <!-- TMPL_IF NAME="size" --><!-- TMPL_VAR NAME="size" --><!-- /TMPL_IF --></li>
- <!-- TMPL_IF NAME="bnotes" --><li><span class="label">Notes:</span> <!-- TMPL_VAR NAME="bnotes" --></li><!-- /TMPL_IF -->
- <li><span class="label">No. of Items:</span> <!-- TMPL_VAR NAME="count" --></li></ol>
- <!-- /TMPL_LOOP -->
- <br clear="all" />
-<!-- TMPL_LOOP NAME="ITEM_DATA" -->
-<div class="yui-g">
-<h2>Barcode <!-- TMPL_VAR NAME="barcode" --> <!-- TMPL_IF name="notforloantext" --><!-- TMPL_VAR name="notforloantext" --> <!-- /TMPL_IF --></h2>
-
- <ol class="bibliodetails">
- <li><span class="listgroup">Item Information</span> <!-- TMPL_IF NAME="CAN_user_editcatalogue" --><a href="/cgi-bin/koha/cataloguing/additem.pl?op=edititem&biblionumber=<!-- TMPL_VAR NAME="biblionumber"-->&itemnumber=<!-- TMPL_VAR NAME="itemnumber" -->">Edit Items</a><!-- /TMPL_IF --></li>
- <ul>
- <li><span class="label">Home Library:</span> <!-- TMPL_VAR NAME="homebranch" --></li>
- <li><span class="label">Itemtype:</span> <!-- TMPL_IF NAME="itype" --><!-- TMPL_VAR NAME="itype" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <!-- TMPL_IF NAME="collection" --><li><span class="label">Collection:</span> <!-- TMPL_VAR NAME="collection" --></li> <!-- /TMPL_IF -->
- <li><span class="label">Item Callnumber:</span> <!-- TMPL_IF NAME="itemcallnumber" --><!-- TMPL_VAR NAME="itemcallnumber" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <!-- TMPL_IF NAME="copyvol" --><li><span class="label">Copy / Vol :</span> <!-- TMPL_VAR NAME="copyvol" --></li> <!-- /TMPL_IF -->
- <!-- TMPL_IF NAME="replacementprice" --><li><span class="label">Replacement Price:</span> <!-- TMPL_VAR NAME="replacementprice" --></li> <!-- /TMPL_IF -->
- </ul>
- <li> <span class="listgroup">Status</span> ( <!-- TMPL_IF name="notforloantext" --><!-- TMPL_VAR name="notforloantext" --> <!-- /TMPL_IF --><!-- TMPL_IF name="itemlost"-->Item Lost<!-- /TMPL_IF --> <!-- TMPL_IF NAME="damaged" -->Item Damaged<!-- /TMPL_IF --> <!-- TMPL_IF NAME="wthdrawn" -->Item Withdrawn<!-- /TMPL_IF --> )</li>
- <ul>
- <li><span class="label">Current Location:</span> <!-- TMPL_VAR NAME="holdingbranch" --></li>
- <li><span class="label">Circulation Status:</span> <!-- TMPL_IF NAME="issue" -->Checked out to <a href="/cgi-bin/koha/members/moremember.pl?borrowernumber=<!-- TMPL_VAR NAME="borrowernumber" -->"><!-- TMPL_VAR NAME="cardnumber" --></a><!-- TMPL_ELSE -->Not Checked out <!-- /TMPL_IF --></li>
-<li><span class="label">Lost Status:</span>
- <form action="updateitem.pl" method="post">
- <input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
- <input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" />
- <input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
- <select name="itemlost" >
- <!-- TMPL_LOOP NAME="itemlostloop" -->
- <!-- TMPL_IF NAME="selected" -->
- <option value="<!-- TMPL_VAR NAME="authorised_value" -->" selected="selected"><!-- TMPL_VAR NAME="lib" --></option>
- <!-- TMPL_ELSE -->
- <option value="<!-- TMPL_VAR NAME="authorised_value" -->"><!-- TMPL_VAR NAME="lib" --></option>
- <!-- /TMPL_IF -->
- <!-- /TMPL_LOOP -->
- </select>
- <input type="hidden" name="wthdrawn" value="<!-- TMPL_VAR NAME="wthdrawn" -->" />
- <input type="hidden" name="damaged" value="<!-- TMPL_VAR NAME="damaged" -->" />
- <input type="submit" name="submit" class="submit" value="Set Status" /></form>
- </li>
-<li><span class="label">Damaged Status:</span>
- <form action="updateitem.pl" method="post">
- <input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
- <input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" />
- <input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
- <select name="damaged" >
- <!-- TMPL_LOOP NAME="itemdamagedloop" -->
- <!-- TMPL_IF NAME="selected" -->
- <option value="<!-- TMPL_VAR NAME="authorised_value" -->" selected="selected"><!-- TMPL_VAR NAME="lib" --></option>
- <!-- TMPL_ELSE -->
- <option value="<!-- TMPL_VAR NAME="authorised_value" -->"><!-- TMPL_VAR NAME="lib" --></option>
- <!-- /TMPL_IF -->
- <!-- /TMPL_LOOP -->
- </select>
- <input type="hidden" name="wthdrawn" value="<!-- TMPL_VAR NAME="wthdrawn" -->" />
- <input type="hidden" name="itemlost" value="<!-- TMPL_VAR NAME="itemlost" -->" />
- <input type="submit" name="submit" class="submit" value="Set Status" /></form>
-</li>
-<li><span class="label">Withdrawn:</span><!-- TMPL_IF NAME="wthdrawn" -->Yes<!-- TMPL_ELSE -->No<!-- /TMPL_IF --> <form action="updateitem.pl" method="post">
-<input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
-<input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" />
-<input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
-<input type="hidden" name="itemlost" value="<!-- TMPL_VAR NAME="itemlost" -->" />
-<input type="hidden" name="damaged" value="<!-- TMPL_VAR NAME="damaged" -->" />
+ <!-- TMPL_IF NAME="wthdrawn" -->
+ <input type="hidden" name="wthdrawn" value="0" /><!-- TMPL_ELSE --><input type="hidden" name="wthdrawn" value="1" />
+ <!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="wthdrawn" -->
+ <input type="submit" name="submit" class="submit" value="Restore" /><!-- TMPL_ELSE --><input type="submit" name="submit" class="submit" value="Withdraw" />
+ <!-- /TMPL_IF -->
+ </form>
+ </li>
+ </ul></li>
+ <li> <span class="listgroup">History</span></li>
+ <li><ul>
+ <li><span class="label">
+ <!-- TMPL_IF NAME="CAN_user_editcatalogue" --><a href="/cgi-bin/koha/acqui/orderreceive.pl?recieve=<!-- TMPL_VAR NAME="ordernumber" -->&biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->&invoice=<!-- TMPL_VAR NAME="booksellerinvoicenumber" -->&catview=yes">Accession Date:</a><!-- TMPL_ELSE -->Accession Date:<!-- /TMPL_IF --></span> <!-- TMPL_VAR NAME="dateaccessioned" --></li>
-<!-- TMPL_IF NAME="wthdrawn" --><input type="hidden" name="wthdrawn" value="0" /><!-- TMPL_ELSE --><input type="hidden" name="wthdrawn" value="1" /><!-- /TMPL_IF -->
-<!-- TMPL_IF NAME="wthdrawn" -->
- <input type="submit" name="submit" class="submit" value="Restore" />
-<!-- TMPL_ELSE -->
- <input type="submit" name="submit" class="submit" value="Withdraw from Catalog" />
-<!-- /TMPL_IF -->
-</form></li>
-</ul>
- <li> <span class="listgroup">History</span></li>
- <ul>
- <li><span class="label"><!-- TMPL_IF NAME="CAN_user_editcatalogue" --><a href="/cgi-bin/koha/acqui/orderreceive.pl?recieve=<!-- TMPL_VAR NAME="ordernumber" -->&biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->&invoice=<!-- TMPL_VAR NAME="booksellerinvoicenumber" -->&catview=yes">Accession Date:</a><!-- TMPL_ELSE -->Accession Date:<!-- /TMPL_IF --></span> <!-- TMPL_VAR NAME="dateaccessioned" --></li>
-<li><span class="label">Renewals:</span> <!-- TMPL_IF NAME="renewals" --><!-- TMPL_VAR NAME="renewals" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
-<li><span class="label">Total Issues:</span><!-- TMPL_IF NAME="issues" --><!-- TMPL_VAR NAME="issues" --><!-- TMPL_ELSE -->0<!-- /TMPL_IF --> (<a href="/cgi-bin/koha/circ/bookcount.pl?&biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->&bi=<!-- TMPL_VAR NAME="biblioitemnumber" -->&itm=<!-- TMPL_VAR NAME="itemnumber" -->">View Circulation History</a>)</li>
- <li><span class="label">Last seen:</span> <!-- TMPL_VAR NAME="datelastseen" --></li>
- <li><span class="label">Last borrowed:</span> <!-- TMPL_IF NAME="datelastborrowed" --><!-- TMPL_VAR NAME="datelastborrowed" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <!-- TMPL_IF NAME="issue" --><li><span class="label">Date Due:</span> <!-- TMPL_VAR NAME="date_due" --></li><!-- /TMPL_IF -->
- <li><span class="label">Last Borrower 1:</span> <!-- TMPL_IF NAME="card0" --><!-- TMPL_VAR NAME="card0" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <li><span class="label">Last Borrower 2:</span> <!-- TMPL_IF NAME="card1" --><!-- TMPL_VAR NAME="card1" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
- <li><span class="label">Paid for:</span> <!-- TMPL_IF NAME="paidfor" --><!-- TMPL_VAR NAME="paidfor" --><!-- TMPL_ELSE --> <!-- /TMPL_IF --></li>
+ <li><span class="label">Total Renewals:</span> <!-- TMPL_VAR NAME="renewals" --> </li>
- </ul>
-<li> <span class="listgroup">Notes</span></li>
-<ul>
- <li><span class="label">Public Note:</span>
- <form class="inline" action="updateitem.pl" method="post"><input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
- <input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" /><input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
- <textarea name="itemnotes" rows="2" cols="30" value="<!-- TMPL_VAR NAME="itemnotes" -->"><!-- TMPL_VAR NAME="itemnotes" --></textarea><input type="submit" name="submit" class="submit" value="Update" /> </form>
- </li>
+ <li><span class="label">Total Checkouts:</span><!-- TMPL_IF NAME="issues" --><!-- TMPL_VAR NAME="issues" --><!-- TMPL_ELSE -->0<!-- /TMPL_IF --> (<a href="/cgi-bin/koha/circ/bookcount.pl?&biblionumber=<!-- TMPL_VAR NAME="biblionumber" -->&bi=<!-- TMPL_VAR NAME="biblioitemnumber" -->&itm=<!-- TMPL_VAR NAME="itemnumber" -->">View Circulation History</a>)</li>
-</ul>
-</ol>
+ <li><span class="label">Last seen:</span> <!-- TMPL_VAR NAME="datelastseen" --> </li>
+ <li><span class="label">Last borrowed:</span> <!-- TMPL_VAR NAME="datelastborrowed" --> </li>
+ <!-- TMPL_IF NAME="issue" --><li><span class="label">Date Due:</span> <!-- TMPL_VAR NAME="date_due" --> </li><!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="card0" --><li><span class="label">Last Borrower:</span> <a href="/cgi-bin/koha/circ/circulation.pl?borrowernumber=<!-- TMPL_VAR NAME="borrower0" -->"><!-- TMPL_VAR NAME="card0" --></a> </li><!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="card1" --><li><span class="label">Previous Borrower:</span> <a href="/cgi-bin/koha/circ/circulation.pl?borrowernumber=<!-- TMPL_VAR NAME="borrower1" -->"><!-- TMPL_VAR NAME="card1" --></a> </li><!-- /TMPL_IF -->
+ <!-- TMPL_IF NAME="card2" --><li><span class="label">Previous Borrower:</span> <a href="/cgi-bin/koha/circ/circulation.pl?borrowernumber=<!-- TMPL_VAR NAME="borrower2" -->"><!-- TMPL_VAR NAME="card2" --></a> </li><!-- /TMPL_IF -->
+ <li><span class="label">Paid for?:</span> <!-- TMPL_VAR NAME="paidfor" --> </li>
+ </ul></li>
+ <li> <span class="listgroup">Notes</span></li>
+ <li><ul>
+ <li><span class="label">Public Note:</span>
+ <form class="inline" action="updateitem.pl" method="post"><input type="hidden" name="biblionumber" value="<!-- TMPL_VAR Name="biblionumber" -->" />
+ <input type="hidden" name="biblioitemnumber" value="<!-- TMPL_VAR Name="biblioitemnumber" -->" /><input type="hidden" name="itemnumber" value="<!-- TMPL_VAR Name="itemnumber" -->" />
+ <textarea name="itemnotes" rows="2" cols="30" value="<!-- TMPL_VAR NAME="itemnotes" -->"><!-- TMPL_VAR NAME="itemnotes" --></textarea><input type="submit" name="submit" class="submit" value="Update" /> </form>
+ </li>
+ </ul></li>
+ </ol>
</div>
<!-- /TMPL_LOOP -->