View | Details | Raw Unified | Return to bug 9948
Collapse All | Expand All

(-)a/acqui/finishreceive.pl (-3 / +2 lines)
Lines 56-61 my $rrp = $input->param('rrp'); Link Here
56
my $note             = $input->param("note");
56
my $note             = $input->param("note");
57
my $bookfund         = $input->param("bookfund");
57
my $bookfund         = $input->param("bookfund");
58
my $order            = GetOrder($ordernumber);
58
my $order            = GetOrder($ordernumber);
59
my $new_ordernumber  = $ordernumber;
59
60
60
#need old recievedate if we update the order, parcel.pl only shows the right parcel this way FIXME
61
#need old recievedate if we update the order, parcel.pl only shows the right parcel this way FIXME
61
if ($quantityrec > $origquantityrec ) {
62
if ($quantityrec > $origquantityrec ) {
Lines 97-103 if ($quantityrec > $origquantityrec ) { Link Here
97
        }
98
        }
98
    }
99
    }
99
100
100
    my $new_ordernumber = $ordernumber;
101
    # save the quantity received.
101
    # save the quantity received.
102
    if ( $quantityrec > 0 ) {
102
    if ( $quantityrec > 0 ) {
103
        ($datereceived, $new_ordernumber) = ModReceiveOrder(
103
        ($datereceived, $new_ordernumber) = ModReceiveOrder(
Lines 163-168 ModItem( Link Here
163
    },
163
    },
164
    $biblionumber,
164
    $biblionumber,
165
    $_
165
    $_
166
) foreach GetItemnumbersFromOrder($ordernumber);
166
) foreach GetItemnumbersFromOrder($new_ordernumber);
167
167
168
print $input->redirect("/cgi-bin/koha/acqui/parcel.pl?invoiceid=$invoiceid");
168
print $input->redirect("/cgi-bin/koha/acqui/parcel.pl?invoiceid=$invoiceid");
169
- 

Return to bug 9948