Bug 19943: Remove C4::Biblio::GetBiblioItemData
It is no longer used. Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com> Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io> Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
parent
6183c0e6a9
commit
d9bc1949e9
1 changed files with 0 additions and 29 deletions
29
C4/Biblio.pm
29
C4/Biblio.pm
|
@ -67,7 +67,6 @@ BEGIN {
|
|||
push @EXPORT, qw(
|
||||
GetBiblioData
|
||||
GetMarcBiblio
|
||||
GetBiblioItemData
|
||||
|
||||
&GetRecordValue
|
||||
|
||||
|
@ -720,34 +719,6 @@ sub GetBiblioData {
|
|||
return ($data);
|
||||
} # sub GetBiblioData
|
||||
|
||||
=head2 GetBiblioItemData
|
||||
|
||||
$itemdata = &GetBiblioItemData($biblioitemnumber);
|
||||
|
||||
Looks up the biblioitem with the given biblioitemnumber. Returns a
|
||||
reference-to-hash. The keys are the fields from the C<biblio>,
|
||||
C<biblioitems>, and C<itemtypes> tables in the Koha database, except
|
||||
that C<biblioitems.notes> is given as C<$itemdata-E<gt>{bnotes}>.
|
||||
|
||||
=cut
|
||||
|
||||
sub GetBiblioItemData {
|
||||
my ($biblioitemnumber) = @_;
|
||||
my $dbh = C4::Context->dbh;
|
||||
my $query = "SELECT *,biblioitems.notes AS bnotes
|
||||
FROM biblio LEFT JOIN biblioitems on biblio.biblionumber=biblioitems.biblionumber ";
|
||||
unless ( C4::Context->preference('item-level_itypes') ) {
|
||||
$query .= "LEFT JOIN itemtypes on biblioitems.itemtype=itemtypes.itemtype ";
|
||||
}
|
||||
$query .= " WHERE biblioitemnumber = ? ";
|
||||
my $sth = $dbh->prepare($query);
|
||||
my $data;
|
||||
$sth->execute($biblioitemnumber);
|
||||
$data = $sth->fetchrow_hashref;
|
||||
$sth->finish;
|
||||
return ($data);
|
||||
} # sub &GetBiblioItemData
|
||||
|
||||
=head2 GetISBDView
|
||||
|
||||
$isbd = &GetISBDView({
|
||||
|
|
Loading…
Reference in a new issue