Lines 2017-2023
sub AddReturn {
Link Here
|
2017 |
if ( $borrowernumber |
2017 |
if ( $borrowernumber |
2018 |
&& $borrower->{'debarred'} |
2018 |
&& $borrower->{'debarred'} |
2019 |
&& C4::Context->preference('AutoRemoveOverduesRestrictions') |
2019 |
&& C4::Context->preference('AutoRemoveOverduesRestrictions') |
2020 |
&& !HasOverdues( $borrowernumber ) |
2020 |
&& !C4::Members::HasOverdues( $borrowernumber ) |
2021 |
&& @{ GetDebarments({ borrowernumber => $borrowernumber, type => 'OVERDUES' }) } |
2021 |
&& @{ GetDebarments({ borrowernumber => $borrowernumber, type => 'OVERDUES' }) } |
2022 |
) { |
2022 |
) { |
2023 |
DelUniqueDebarment({ borrowernumber => $borrowernumber, type => 'OVERDUES' }); |
2023 |
DelUniqueDebarment({ borrowernumber => $borrowernumber, type => 'OVERDUES' }); |
Lines 2866-2872
sub AddRenewal {
Link Here
|
2866 |
my $borrower = C4::Members::GetMember( borrowernumber => $borrowernumber ); |
2866 |
my $borrower = C4::Members::GetMember( borrowernumber => $borrowernumber ); |
2867 |
if ( $borrowernumber |
2867 |
if ( $borrowernumber |
2868 |
&& $borrower->{'debarred'} |
2868 |
&& $borrower->{'debarred'} |
2869 |
&& !HasOverdues( $borrowernumber ) |
2869 |
&& !C4::Members::HasOverdues( $borrowernumber ) |
2870 |
&& @{ GetDebarments({ borrowernumber => $borrowernumber, type => 'OVERDUES' }) } |
2870 |
&& @{ GetDebarments({ borrowernumber => $borrowernumber, type => 'OVERDUES' }) } |
2871 |
) { |
2871 |
) { |
2872 |
DelUniqueDebarment({ borrowernumber => $borrowernumber, type => 'OVERDUES' }); |
2872 |
DelUniqueDebarment({ borrowernumber => $borrowernumber, type => 'OVERDUES' }); |
2873 |
- |
|
|