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

(-)a/acqui/addorderiso2709.pl (-1 / +1 lines)
Lines 257-262 if ($op eq ""){ Link Here
257
            # Group orderlines from MarcItemFieldsToOrder
257
            # Group orderlines from MarcItemFieldsToOrder
258
            my $budget_hash;
258
            my $budget_hash;
259
            for (my $i = 0; $i < $count; $i++) {
259
            for (my $i = 0; $i < $count; $i++) {
260
                $budget_codes[$i] = $budget_id if !$budget_codes[$i]; # Use default budget if no budget selected in the UI
260
                $budget_hash->{$budget_codes[$i]}->{quantity} += 1;
261
                $budget_hash->{$budget_codes[$i]}->{quantity} += 1;
261
                $budget_hash->{$budget_codes[$i]}->{price} = $itemprices[$i];
262
                $budget_hash->{$budget_codes[$i]}->{price} = $itemprices[$i];
262
                $budget_hash->{$budget_codes[$i]}->{replacementprice} = $replacementprices[$i];
263
                $budget_hash->{$budget_codes[$i]}->{replacementprice} = $replacementprices[$i];
263
- 

Return to bug 34445