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

(-)a/circ/waitingreserves.pl (-4 / +3 lines)
Lines 89-101 foreach my $num (@getreserves) { Link Here
89
89
90
    my $itemnumber = $num->{'itemnumber'};
90
    my $itemnumber = $num->{'itemnumber'};
91
    my $gettitle     = GetBiblioFromItemNumber( $itemnumber );
91
    my $gettitle     = GetBiblioFromItemNumber( $itemnumber );
92
    my $borrowernum = $num->{'borrowernumber'};
92
    my $borrowernumber = $num->{'borrowernumber'};
93
    my $holdingbranch = $gettitle->{'holdingbranch'};
93
    my $holdingbranch = $gettitle->{'holdingbranch'};
94
    my $homebranch = $gettitle->{'homebranch'};
94
    my $homebranch = $gettitle->{'homebranch'};
95
95
96
    my %getreserv = (
96
    my %getreserv = (
97
        itemnumber => $itemnumber,
97
        itemnumber => $itemnumber,
98
        borrowernum => $borrowernum,
98
        borrowernum => $borrowernumber,
99
    );
99
    );
100
100
101
    # fix up item type for display
101
    # fix up item type for display
Lines 109-115 foreach my $num (@getreserves) { Link Here
109
        $getreserv{maxpickupdate} = $maxpickupdate;
109
        $getreserv{maxpickupdate} = $maxpickupdate;
110
        if ( DateTime->compare( $today, $maxpickupdate ) == 1 ) {
110
        if ( DateTime->compare( $today, $maxpickupdate ) == 1 ) {
111
            if ($cancelall) {
111
            if ($cancelall) {
112
                my $res = cancel( $itemnumber, $borrowernum, $holdingbranch, $homebranch, !$transfer_when_cancel_all );
112
                my $res = cancel( $itemnumber, $borrowernumber, $holdingbranch, $homebranch, !$transfer_when_cancel_all );
113
                push @cancel_result, $res if $res;
113
                push @cancel_result, $res if $res;
114
                next;
114
                next;
115
            } else {
115
            } else {
116
- 

Return to bug 8367