|
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 |
- |
|
|