@@ -, +, @@ --- acqui/finishreceive.pl | 20 ++++++++------------ 1 files changed, 8 insertions(+), 12 deletions(-) --- a/acqui/finishreceive.pl +++ a/acqui/finishreceive.pl @@ -153,20 +153,16 @@ if ($quantityrec > $origquantityrec ) { } } -update_item( $_ ) foreach GetItemnumbersFromOrder( $ordernumber ); - -print $input->redirect("/cgi-bin/koha/acqui/parcel.pl?invoiceid=$invoiceid"); - -################################ End of script ################################ - -sub update_item { - my ( $itemnumber ) = @_; - - ModItem( { +ModItem( + { booksellerid => $booksellerid, dateaccessioned => $datereceived, price => $unitprice, replacementprice => $rrp, replacementpricedate => $datereceived, - }, $biblionumber, $itemnumber ); -} + }, + $biblionumber, + $_ +) foreach GetItemnumbersFromOrder($ordernumber); + +print $input->redirect("/cgi-bin/koha/acqui/parcel.pl?invoiceid=$invoiceid"); --