|
Lines 74-91
if ( $accountline->{'amountoutstanding'} <= 0 ) {
Link Here
|
| 74 |
$accountline->{'amountoutstandingcredit'} = 1; |
74 |
$accountline->{'amountoutstandingcredit'} = 1; |
| 75 |
} |
75 |
} |
| 76 |
|
76 |
|
| 77 |
my %row = ( |
|
|
| 78 |
'date' => dt_from_string( $accountline->{'date'} ), |
| 79 |
'amountcredit' => $accountline->{'amountcredit'}, |
| 80 |
'amountoutstandingcredit' => $accountline->{'amountoutstandingcredit'}, |
| 81 |
'description' => $accountline->{'description'}, |
| 82 |
'amount' => sprintf( "%.2f", $accountline->{'amount'} ), |
| 83 |
'amountoutstanding' => |
| 84 |
sprintf( "%.2f", $accountline->{'amountoutstanding'} ), |
| 85 |
'debit_type_code' => $accountline->{'debit_type_code'}, |
| 86 |
'note' => $accountline->{'note'}, |
| 87 |
); |
| 88 |
|
| 89 |
my @account_offsets = Koha::Account::Offsets->search( { debit_id => $accountline_object->id } ); |
77 |
my @account_offsets = Koha::Account::Offsets->search( { debit_id => $accountline_object->id } ); |
| 90 |
|
78 |
|
| 91 |
my $letter = C4::Letters::getletter( 'circulation', 'ACCOUNT_DEBIT', C4::Context::mybranch, 'print', $patron->lang ); |
79 |
my $letter = C4::Letters::getletter( 'circulation', 'ACCOUNT_DEBIT', C4::Context::mybranch, 'print', $patron->lang ); |
| 92 |
- |
|
|