use C4::Serials;
use C4::Search qw/enabled_staff_search_views/;
use Koha::DateUtils;
+use Koha::Serial::Items;
use List::MoreUtils qw/uniq/;
my $previous = GetPreviousSerialid($subscriptionids[$i]);
if ($previous) {
- # Getting the itemnumber matching the serialid
- my $query = "SELECT itemnumber FROM serialitems WHERE serialid=?";
- my $sth = $dbh->prepare($query);
- $sth->execute($previous);
- my @row = $sth->fetchrow_array;
- if ($row[0]) {
- my $itemnumber = $row[0];
+ my $serialitem = Koha::Serial::Items->search( {serialid => $previous} )->next;
+ my $itemnumber = $serialitem ? $serialitem->itemnumber : undef;
+ if ($itemnumber) {
# Getting the itemtype to set from the database
my $subscriptioninfos = GetSubscription($subscriptionids[$i]);