|
Lines 85-90
my $sql = '
Link Here
|
| 85 |
items.itemnotes, |
85 |
items.itemnotes, |
| 86 |
items.itemnotes_nonpublic, |
86 |
items.itemnotes_nonpublic, |
| 87 |
items.itemcallnumber, |
87 |
items.itemcallnumber, |
|
|
88 |
items.copynumber, |
| 88 |
items.replacementprice, |
89 |
items.replacementprice, |
| 89 |
|
90 |
|
| 90 |
issues.branchcode, |
91 |
issues.branchcode, |
|
Lines 206-212
while ( my $c = $sth->fetchrow_hashref() ) {
Link Here
|
| 206 |
itemnotes_nonpublic => $c->{itemnotes_nonpublic}, |
207 |
itemnotes_nonpublic => $c->{itemnotes_nonpublic}, |
| 207 |
branchcode => $c->{branchcode}, |
208 |
branchcode => $c->{branchcode}, |
| 208 |
branchname => $c->{branchname}, |
209 |
branchname => $c->{branchname}, |
| 209 |
itemcallnumber => $c->{itemcallnumber} || q{}, |
210 |
itemcallnumber => $c->{itemcallnumber} || q{}, |
|
|
211 |
copynumber => $c->{copynumber} || q{}, |
| 210 |
charge => $charge, |
212 |
charge => $charge, |
| 211 |
fine => $fine, |
213 |
fine => $fine, |
| 212 |
price => $c->{replacementprice} || q{}, |
214 |
price => $c->{replacementprice} || q{}, |
| 213 |
- |
|
|