|
Lines 309-315
foreach my $startrange (sort keys %$lost) {
Link Here
|
| 309 |
printf ("Due %s: item %5s from borrower %5s to lost: %s\n", $row->{date_due}, $row->{itemnumber}, $row->{borrowernumber}, $lostvalue) if($verbose); |
309 |
printf ("Due %s: item %5s from borrower %5s to lost: %s\n", $row->{date_due}, $row->{itemnumber}, $row->{borrowernumber}, $lostvalue) if($verbose); |
| 310 |
if($confirm) { |
310 |
if($confirm) { |
| 311 |
ModItem({ itemlost => $lostvalue }, $row->{'biblionumber'}, $row->{'itemnumber'}); |
311 |
ModItem({ itemlost => $lostvalue }, $row->{'biblionumber'}, $row->{'itemnumber'}); |
| 312 |
LostItem($row->{'itemnumber'}, $mark_returned) if( $charge && $charge eq $lostvalue); |
312 |
if ( $charge && $charge eq $lostvalue ) { |
|
|
313 |
LostItem( $row->{'itemnumber'}, $mark_returned ); |
| 314 |
} elsif ( $mark_returned ) { |
| 315 |
my $patron = Koha::Patrons->find( $row->{borrowernumber} ); |
| 316 |
MarkIssueReturned($row->{borrowernumber},$row->{itemnumber},undef,undef,$patron->privacy) |
| 317 |
} |
| 313 |
} |
318 |
} |
| 314 |
$count++; |
319 |
$count++; |
| 315 |
} |
320 |
} |
| 316 |
- |
|
|