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

(-)a/acqui/addorderiso2709.pl (-1 / +9 lines)
Lines 200-205 if ($op eq ""){ Link Here
200
        my @copynos = $input->multi_param('copyno_' . $biblio_count);
200
        my @copynos = $input->multi_param('copyno_' . $biblio_count);
201
        my @budget_codes = $input->multi_param('budget_code_' . $biblio_count);
201
        my @budget_codes = $input->multi_param('budget_code_' . $biblio_count);
202
        my @itemprices = $input->multi_param('itemprice_' . $biblio_count);
202
        my @itemprices = $input->multi_param('itemprice_' . $biblio_count);
203
        my @replacementprices = $input->multi_param('replacementprice_' . $biblio_count);
204
        my @itemcallnumbers = $input->multi_param('itemcallnumber_' . $biblio_count);
203
        my $itemcreation = 0;
205
        my $itemcreation = 0;
204
        for (my $i = 0; $i < $count; $i++) {
206
        for (my $i = 0; $i < $count; $i++) {
205
            $itemcreation = 1;
207
            $itemcreation = 1;
Lines 214-219 if ($op eq ""){ Link Here
214
                uri => $uris[$i],
216
                uri => $uris[$i],
215
                copynumber => $copynos[$i],
217
                copynumber => $copynos[$i],
216
                price => $itemprices[$i],
218
                price => $itemprices[$i],
219
                replacementprice => $replacementprices[$i],
220
                itemcallnumber => $itemcallnumbers[$i],
217
            }, $biblionumber);
221
            }, $biblionumber);
218
        }
222
        }
219
        if ($itemcreation == 1) {
223
        if ($itemcreation == 1) {
Lines 495-501 sub import_biblios_list { Link Here
495
        # Items
499
        # Items
496
        my @itemlist = ();
500
        my @itemlist = ();
497
        my $all_items_quantity = 0;
501
        my $all_items_quantity = 0;
498
        my $alliteminfos = get_infos_syspref_on_item('MarcItemFieldsToOrder', $marcrecord, ['homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'quantity', 'budget_code']);
502
        my $alliteminfos = get_infos_syspref_on_item('MarcItemFieldsToOrder', $marcrecord, ['homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'replacementprice', 'itemcallnumber', 'quantity', 'budget_code']);
499
        if ($alliteminfos != -1) {
503
        if ($alliteminfos != -1) {
500
            foreach my $iteminfos (@$alliteminfos) {
504
            foreach my $iteminfos (@$alliteminfos) {
501
                my $item_homebranch = $iteminfos->{homebranch};
505
                my $item_homebranch = $iteminfos->{homebranch};
Lines 511-516 sub import_biblios_list { Link Here
511
                my $item_quantity = $iteminfos->{quantity} || 1;
515
                my $item_quantity = $iteminfos->{quantity} || 1;
512
                my $item_budget_code = $iteminfos->{budget_code};
516
                my $item_budget_code = $iteminfos->{budget_code};
513
                my $item_price = $iteminfos->{price};
517
                my $item_price = $iteminfos->{price};
518
                my $item_replacement_price = $iteminfos->{replacementprice};
519
                my $item_callnumber = $iteminfos->{itemcallnumber};
514
520
515
                for (my $i = 0; $i < $item_quantity; $i++) {
521
                for (my $i = 0; $i < $item_quantity; $i++) {
516
522
Lines 530-535 sub import_biblios_list { Link Here
530
                        'quantity' => $item_quantity,
536
                        'quantity' => $item_quantity,
531
                        'budget_code' => $item_budget_code || $budget_code,
537
                        'budget_code' => $item_budget_code || $budget_code,
532
                        'itemprice' => $item_price || $price,
538
                        'itemprice' => $item_price || $price,
539
                        'replacementprice' => $item_replacement_price,
540
                        'itemcallnumber' => $item_callnumber,
533
                    );
541
                    );
534
                    $all_items_quantity++;
542
                    $all_items_quantity++;
535
                    push @itemlist, \%itemrecord;
543
                    push @itemlist, \%itemrecord;
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/addorderiso2709.tt (+2 lines)
Lines 355-360 Link Here
355
                        </select>
355
                        </select>
356
                        </li>
356
                        </li>
357
                        <li><label for="price_item_[% item.item_id %]">price</label><input type="text" id="price_item_[% item.item_id %]" name="itemprice_[% item.biblio_count %]" value="[% item.itemprice %]"></li>
357
                        <li><label for="price_item_[% item.item_id %]">price</label><input type="text" id="price_item_[% item.item_id %]" name="itemprice_[% item.biblio_count %]" value="[% item.itemprice %]"></li>
358
                        <li><label for="replacementprice_item_[% item.item_id %]">replacement price</label><input type="text" id="replacementprice_item_[% item.item_id %]" name="replacementprice_[% item.biblio_count %]" value="[% item.replacementprice %]"></li>
359
                        <li><label for="callnumber_item_[% item.item_id %]">callnumber</label><input type="text" id="callnumber_item_[% item.item_id %]" name="itemcallnumber_[% item.biblio_count %]" value="[% item.itemcallnumber %]"></li>
358
                        </ol>
360
                        </ol>
359
                        </fieldset>
361
                        </fieldset>
360
                        [% END %]
362
                        [% END %]
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/acquisitions.pref (-2 / +1 lines)
Lines 65-71 Acquisitions: Link Here
65
            - Set the mapping values for new item records created from a MARC record in a staged file.
65
            - Set the mapping values for new item records created from a MARC record in a staged file.
66
            - pref: MarcItemFieldsToOrder
66
            - pref: MarcItemFieldsToOrder
67
              type: textarea
67
              type: textarea
68
            - "You can use the following fields: homebranch, holdingbranch, itype, nonpublic_note, public_note, loc, ccode, notforloan, uri, copyno and price. Special fields: quantity and budget_code"
68
            - "You can use the following fields: homebranch, holdingbranch, itype, nonpublic_note, public_note, loc, ccode, notforloan, uri, copyno, price, replacementprice and itemcallnumber. Special fields: quantity and budget_code"
69
            - "<br/>For example:<br/>holdingbranch: 975$b<br/>itype: 975$9|975$z"
69
            - "<br/>For example:<br/>holdingbranch: 975$b<br/>itype: 975$9|975$z"
70
        -
70
        -
71
            - pref: ClaimsBccCopy
71
            - pref: ClaimsBccCopy
72
- 

Return to bug 15503