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

(-)a/C4/Items.pm (-3 / +3 lines)
Lines 240-246 sub AddItemFromMarc { Link Here
240
	
240
	
241
	my $localitemmarc=MARC::Record->new;
241
	my $localitemmarc=MARC::Record->new;
242
	$localitemmarc->append_fields($source_item_marc->field($itemtag));
242
	$localitemmarc->append_fields($source_item_marc->field($itemtag));
243
    my $item = &TransformMarcToKoha( $localitemmarc, $frameworkcode ,'items');
243
    my $item = C4::Biblio::TransformMarcToKoha( $localitemmarc, $frameworkcode ,'items');
244
    my $unlinked_item_subfields = _get_unlinked_item_subfields($localitemmarc, $frameworkcode);
244
    my $unlinked_item_subfields = _get_unlinked_item_subfields($localitemmarc, $frameworkcode);
245
    return AddItem($item, $biblionumber, $dbh, $frameworkcode, $unlinked_item_subfields);
245
    return AddItem($item, $biblionumber, $dbh, $frameworkcode, $unlinked_item_subfields);
246
}
246
}
Lines 299-305 sub AddItem { Link Here
299
299
300
    $item->{'itemnumber'} = $itemnumber;
300
    $item->{'itemnumber'} = $itemnumber;
301
301
302
    ModZebra( $item->{biblionumber}, "specialUpdate", "biblioserver" );
302
    C4::Biblio::ModZebra( $item->{biblionumber}, "specialUpdate", "biblioserver" );
303
303
304
    logaction( "CATALOGUING", "ADD", $itemnumber, "item" )
304
    logaction( "CATALOGUING", "ADD", $itemnumber, "item" )
305
      if C4::Context->preference("CataloguingLog");
305
      if C4::Context->preference("CataloguingLog");
Lines 2190-2196 sub _get_unlinked_item_subfields { Link Here
2190
    my $original_item_marc = shift;
2190
    my $original_item_marc = shift;
2191
    my $frameworkcode = shift;
2191
    my $frameworkcode = shift;
2192
2192
2193
    my $marcstructure = GetMarcStructure(1, $frameworkcode, { unsafe => 1 });
2193
    my $marcstructure = C4::Biblio::GetMarcStructure(1, $frameworkcode, { unsafe => 1 });
2194
2194
2195
    # assume that this record has only one field, and that that
2195
    # assume that this record has only one field, and that that
2196
    # field contains only the item information
2196
    # field contains only the item information
(-)a/C4/Reserves.pm (-1 / +1 lines)
Lines 449-455 sub CanItemBeReserved { Link Here
449
        unless ($destination->pickup_location) {
449
        unless ($destination->pickup_location) {
450
            return 'libraryNotPickupLocation';
450
            return 'libraryNotPickupLocation';
451
        }
451
        }
452
        unless ($item->can_be_transferred({ to => $destination->branchcode })) {
452
        unless ($item->can_be_transferred({ to => $destination })) {
453
            return 'cannotBeTransferred';
453
            return 'cannotBeTransferred';
454
        }
454
        }
455
    }
455
    }
(-)a/koha-tmpl/opac-tmpl/bootstrap/en/modules/opac-reserve.tt (-1 lines)
Lines 224-230 Link Here
224
                                                        </li>
224
                                                        </li>
225
                                                    [% END %]
225
                                                    [% END %]
226
226
227
228
                                                    [% UNLESS ( singleBranchMode ) %]
227
                                                    [% UNLESS ( singleBranchMode ) %]
229
                                                        [% IF ( bibitemloo.holdable && choose_branch ) %]
228
                                                        [% IF ( bibitemloo.holdable && choose_branch ) %]
230
                                                            <li class="branch">
229
                                                            <li class="branch">
(-)a/opac/opac-reserve.pl (-2 / +7 lines)
Lines 178-183 foreach my $biblioNumber (@biblionumbers) { Link Here
178
178
179
    # Compute the priority rank.
179
    # Compute the priority rank.
180
    my $biblio = Koha::Biblios->find( $biblioNumber );
180
    my $biblio = Koha::Biblios->find( $biblioNumber );
181
    $biblioData->{object} = $biblio;
181
    my $holds = $biblio->holds;
182
    my $holds = $biblio->holds;
182
    my $rank = $holds->count;
183
    my $rank = $holds->count;
183
    $biblioData->{reservecount} = 1;    # new reserve
184
    $biblioData->{reservecount} = 1;    # new reserve
Lines 394-400 $template->param('item_level_itypes' => $itemLevelTypes); Link Here
394
395
395
foreach my $biblioNum (@biblionumbers) {
396
foreach my $biblioNum (@biblionumbers) {
396
397
397
    my @not_available_at = ();
398
    my $record = GetMarcBiblio({ biblionumber => $biblioNum });
398
    my $record = GetMarcBiblio({ biblionumber => $biblioNum });
399
    # Init the bib item with the choices for branch pickup
399
    # Init the bib item with the choices for branch pickup
400
    my %biblioLoopIter;
400
    my %biblioLoopIter;
Lines 406-411 foreach my $biblioNum (@biblionumbers) { Link Here
406
        &get_out($query, $cookie, $template->output);
406
        &get_out($query, $cookie, $template->output);
407
    }
407
    }
408
408
409
    my @not_available_at = ();
410
    my $biblio = $biblioData->{object}; 
411
    foreach my $library ( $pickup_locations->as_list ) {
412
        push( @not_available_at, $library->branchcode ) unless $biblio->can_be_transferred({ to => $library });
413
    }
414
409
    my $frameworkcode = GetFrameworkCode( $biblioData->{biblionumber} );
415
    my $frameworkcode = GetFrameworkCode( $biblioData->{biblionumber} );
410
    $biblioLoopIter{biblionumber} = $biblioData->{biblionumber};
416
    $biblioLoopIter{biblionumber} = $biblioData->{biblionumber};
411
    $biblioLoopIter{title} = $biblioData->{title};
417
    $biblioLoopIter{title} = $biblioData->{title};
412
- 

Return to bug 7614