diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index b3111047ec..284b4a27d6 100644
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -70,7 +70,6 @@ BEGIN {
       GetBiblioItemData
       GetBiblioItemInfosOf
       GetBiblioItemByBiblioNumber
-      GetBiblionumberFromItemnumber
 
       &GetRecordValue
 
@@ -772,21 +771,6 @@ sub GetBiblioItemByBiblioNumber {
     return @results;
 }
 
-=head2 GetBiblionumberFromItemnumber
-
-
-=cut
-
-sub GetBiblionumberFromItemnumber {
-    my ($itemnumber) = @_;
-    my $dbh            = C4::Context->dbh;
-    my $sth            = $dbh->prepare("Select biblionumber FROM items WHERE itemnumber = ?");
-
-    $sth->execute($itemnumber);
-    my ($result) = $sth->fetchrow;
-    return ($result);
-}
-
 =head2 GetISBDView 
 
   $isbd = &GetISBDView({