|
Lines 1184-1189
sub GetBorNotifyAcctRecord {
Link Here
|
| 1184 |
$sth->execute( $borrowernumber, $notifyid ); |
1184 |
$sth->execute( $borrowernumber, $notifyid ); |
| 1185 |
my $total = 0; |
1185 |
my $total = 0; |
| 1186 |
while ( my $data = $sth->fetchrow_hashref ) { |
1186 |
while ( my $data = $sth->fetchrow_hashref ) { |
|
|
1187 |
if ( $data->{itemnumber} ) { |
| 1188 |
my $biblio = GetBiblioFromItemNumber( $data->{itemnumber} ); |
| 1189 |
$data->{biblionumber} = $biblio->{biblionumber}; |
| 1190 |
$data->{title} = $biblio->{title}; |
| 1191 |
} |
| 1187 |
$acctlines[$numlines] = $data; |
1192 |
$acctlines[$numlines] = $data; |
| 1188 |
$numlines++; |
1193 |
$numlines++; |
| 1189 |
$total += int(100 * $data->{'amountoutstanding'}); |
1194 |
$total += int(100 * $data->{'amountoutstanding'}); |
| 1190 |
- |
|
|