@@ -, +, @@ --- C4/Serials.pm | 7 +++++-- 1 files changed, 5 insertions(+), 2 deletions(-) --- a/C4/Serials.pm +++ a/C4/Serials.pm @@ -265,8 +265,11 @@ returns the number of rows affected sub AddItem2Serial { my ( $serialid, $itemnumber ) = @_; my $dbh = C4::Context->dbh; - my $rq = $dbh->prepare("INSERT INTO `serialitems` SET serialid=? , itemnumber=?"); - $rq->execute( $serialid, $itemnumber ); + + $dbh->do( 'UPDATE serial SET itemnumber = ? WHERE serialid = ?', undef, $itemnumber, $serialid ); + + my $rq = $dbh->prepare("INSERT INTO serialitems ( itemnumber, serialid ) VALUES ( ?, ? )"); + $rq->execute( $itemnumber, $serialid ); return $rq->rows; } --