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

(-)a/acqui/addorderiso2709.pl (-2 / +3 lines)
Lines 257-263 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
                # Use default budget if no budget selected in the UI
261
                $budget_codes[$i] = $budget_id
262
                  if !$budget_codes[$i];
261
                $budget_hash->{$budget_codes[$i]}->{quantity} += 1;
263
                $budget_hash->{$budget_codes[$i]}->{quantity} += 1;
262
                $budget_hash->{$budget_codes[$i]}->{price} = $itemprices[$i];
264
                $budget_hash->{$budget_codes[$i]}->{price} = $itemprices[$i];
263
                $budget_hash->{$budget_codes[$i]}->{replacementprice} = $replacementprices[$i];
265
                $budget_hash->{$budget_codes[$i]}->{replacementprice} = $replacementprices[$i];
264
- 

Return to bug 34445