|
Lines 2993-2999
sub AddRenewal {
Link Here
|
| 2993 |
} |
2993 |
} |
| 2994 |
|
2994 |
|
| 2995 |
# Remove any OVERDUES related debarment if the borrower has no overdues |
2995 |
# Remove any OVERDUES related debarment if the borrower has no overdues |
| 2996 |
my $borrower = C4::Members::GetMember( borrowernumber => $borrowernumber ); |
2996 |
$borrower = C4::Members::GetMember( borrowernumber => $borrowernumber ); |
| 2997 |
if ( $borrowernumber |
2997 |
if ( $borrowernumber |
| 2998 |
&& $borrower->{'debarred'} |
2998 |
&& $borrower->{'debarred'} |
| 2999 |
&& !C4::Members::HasOverdues( $borrowernumber ) |
2999 |
&& !C4::Members::HasOverdues( $borrowernumber ) |
| 3000 |
- |
|
|