|
Lines 2249-2254
sub _debar_user_on_return {
Link Here
|
| 2249 |
if DateTime::Duration->compare( $max_sd, $suspension_days ) < 0; |
2249 |
if DateTime::Duration->compare( $max_sd, $suspension_days ) < 0; |
| 2250 |
} |
2250 |
} |
| 2251 |
|
2251 |
|
|
|
2252 |
if ( C4::Context->preference('CumulativeRestrictionPeriods') and $borrower->{debarred} ) { |
| 2253 |
my $debarment = @{ GetDebarments( { borrowernumber => $borrower->{borrowernumber}, type => 'SUSPENSION' } ) }[0]; |
| 2254 |
if ( $debarment ) { |
| 2255 |
$return_date = dt_from_string( $debarment->{expiration}, 'sql' ); |
| 2256 |
} |
| 2257 |
} |
| 2258 |
|
| 2252 |
my $new_debar_dt = |
2259 |
my $new_debar_dt = |
| 2253 |
$dt_today->clone()->add_duration( $suspension_days ); |
2260 |
$dt_today->clone()->add_duration( $suspension_days ); |
| 2254 |
|
2261 |
|
| 2255 |
- |
|
|