|
Lines 3305-3313
sub LostItem{
Link Here
|
| 3305 |
my $borrower = C4::Members::GetMemberDetails( $borrowernumber ); |
3305 |
my $borrower = C4::Members::GetMemberDetails( $borrowernumber ); |
| 3306 |
|
3306 |
|
| 3307 |
if (C4::Context->preference('WhenLostForgiveFine')){ |
3307 |
if (C4::Context->preference('WhenLostForgiveFine')){ |
| 3308 |
my $exemptfine=1; |
3308 |
my $fix = _FixOverduesOnReturn($borrowernumber, $itemnumber, 1, 0); # 1, 0 = exemptfine, no-dropbox |
| 3309 |
my $dropbox=0; |
|
|
| 3310 |
my $fix = _FixOverduesOnReturn($borrowernumber, $itemnumber, $exemptfine, $dropbox); |
| 3311 |
defined($fix) or warn "_FixOverduesOnReturn($borrowernumber, $itemnumber...) failed!"; # zero is OK, check defined |
3309 |
defined($fix) or warn "_FixOverduesOnReturn($borrowernumber, $itemnumber...) failed!"; # zero is OK, check defined |
| 3312 |
} |
3310 |
} |
| 3313 |
if (C4::Context->preference('WhenLostChargeReplacementFee')){ |
3311 |
if (C4::Context->preference('WhenLostChargeReplacementFee')){ |
| 3314 |
- |
|
|