diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm index 2f8bf86fe8..1f1132b9ca 100644 --- a/C4/Acquisition.pm +++ b/C4/Acquisition.pm @@ -1141,7 +1141,10 @@ sub ModReceiveOrder { $datereceived = C4::Dates->output('iso') unless $datereceived; my $suggestionid = GetSuggestionFromBiblionumber( $dbh, $biblionumber ); if ($suggestionid) { - ModStatus( $suggestionid, 'AVAILABLE', '', $biblionumber ); + ModSuggestion( {suggestionid=>$suggestionid, + STATUS=>'AVAILABLE', + biblionumber=> $biblionumber} + ); } my $sth=$dbh->prepare("