Lines 198-203
sub DebitLostItem {
Link Here
|
198 |
$params->{amount} = $item->replacementprice(); |
198 |
$params->{amount} = $item->replacementprice(); |
199 |
$params->{itemnumber} = $item->itemnumber(); |
199 |
$params->{itemnumber} = $item->itemnumber(); |
200 |
$params->{issue_id} = $issue->issue_id(); |
200 |
$params->{issue_id} = $issue->issue_id(); |
|
|
201 |
$params->{description} = "Lost Item " . $issue->item()->biblio()->title() . " " . $issue->item()->barcode(); |
201 |
|
202 |
|
202 |
#TODO: Shouldn't we have a default replacement price as a syspref? |
203 |
#TODO: Shouldn't we have a default replacement price as a syspref? |
203 |
if ( $params->{amount} ) { |
204 |
if ( $params->{amount} ) { |
204 |
- |
|
|