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

(-)a/C4/SIP/ILS/Patron.pm (-3 / +2 lines)
Lines 90-100 sub new { Link Here
90
    } elsif ( $noissueschargeguarantorswithguarantees ) {
90
    } elsif ( $noissueschargeguarantorswithguarantees ) {
91
        $fines_amount += $patron->relationships_debt({ include_guarantors => 1, only_this_guarantor => 0, include_this_patron => 0 });
91
        $fines_amount += $patron->relationships_debt({ include_guarantors => 1, only_this_guarantor => 0, include_this_patron => 0 });
92
        $fine_blocked ||= $fines_amount > $noissueschargeguarantorswithguarantees;
92
        $fine_blocked ||= $fines_amount > $noissueschargeguarantorswithguarantees;
93
        $fines_msg .= " -- " . "Patron blocked by fines ($fines_amount) on related accounts";
93
        $fines_msg .= " -- " . "Patron blocked by fines ($fines_amount) on related accounts" if $fine_blocked;
94
    } elsif ( $noissueschargeguarantees ) {
94
    } elsif ( $noissueschargeguarantees ) {
95
        $fines_amount += $patron->relationships_debt({ include_guarantors => 0, only_this_guarantor => 0, include_this_patron => 0 });
95
        $fines_amount += $patron->relationships_debt({ include_guarantors => 0, only_this_guarantor => 0, include_this_patron => 0 });
96
        $fine_blocked ||= $fines_amount > $noissueschargeguarantees;
96
        $fine_blocked ||= $fines_amount > $noissueschargeguarantees;
97
        $fines_msg .= " -- " . "Patron blocked by fines ($fines_amount) on guaranteed accounts";
97
        $fines_msg .= " -- " . "Patron blocked by fines ($fines_amount) on guaranteed accounts" if $fine_blocked;
98
    }
98
    }
99
99
100
    my $circ_blocked =( C4::Context->preference('OverduesBlockCirc') ne "noblock" &&  defined $flags->{ODUES}->{itemlist} ) ? 1 : 0;
100
    my $circ_blocked =( C4::Context->preference('OverduesBlockCirc') ne "noblock" &&  defined $flags->{ODUES}->{itemlist} ) ? 1 : 0;
101
- 

Return to bug 33055