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

(-)a/C4/Reserves.pm (-4 / +3 lines)
Lines 429-435 See CanItemBeReserved() for possible return values. Link Here
429
sub CanBookBeReserved{
429
sub CanBookBeReserved{
430
    my ($borrowernumber, $biblionumber) = @_;
430
    my ($borrowernumber, $biblionumber) = @_;
431
431
432
    my $items = GetItemnumbersForBiblio($biblionumber);
432
    my $items = C4::Items::GetItemnumbersForBiblio($biblionumber);
433
    #get items linked via host records
433
    #get items linked via host records
434
    my @hostitems = get_hostitemnumbers_of($biblionumber);
434
    my @hostitems = get_hostitemnumbers_of($biblionumber);
435
    if (@hostitems){
435
    if (@hostitems){
Lines 468-474 sub CanItemBeReserved { Link Here
468
468
469
    # we retrieve borrowers and items informations #
469
    # we retrieve borrowers and items informations #
470
    # item->{itype} will come for biblioitems if necessery
470
    # item->{itype} will come for biblioitems if necessery
471
    my $item       = GetItem($itemnumber);
471
    my $item       = C4::Items::GetItem($itemnumber);
472
    my $biblioData = C4::Biblio::GetBiblioData( $item->{biblionumber} );
472
    my $biblioData = C4::Biblio::GetBiblioData( $item->{biblionumber} );
473
    my $borrower   = C4::Members::GetMember( 'borrowernumber' => $borrowernumber );
473
    my $borrower   = C4::Members::GetMember( 'borrowernumber' => $borrowernumber );
474
474
Lines 652-658 sub GetOtherReserves { Link Here
652
    my $nextreservinfo;
652
    my $nextreservinfo;
653
    my ( undef, $checkreserves, undef ) = CheckReserves($itemnumber);
653
    my ( undef, $checkreserves, undef ) = CheckReserves($itemnumber);
654
    if ($checkreserves) {
654
    if ($checkreserves) {
655
        my $iteminfo = GetItem($itemnumber);
655
        my $iteminfo = C4::Items::GetItem($itemnumber);
656
        if ( $iteminfo->{'holdingbranch'} ne $checkreserves->{'branchcode'} ) {
656
        if ( $iteminfo->{'holdingbranch'} ne $checkreserves->{'branchcode'} ) {
657
            $messages->{'transfert'} = $checkreserves->{'branchcode'};
657
            $messages->{'transfert'} = $checkreserves->{'branchcode'};
658
            #minus priorities of others reservs
658
            #minus priorities of others reservs
659
- 

Return to bug 17591