|
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 221-227
while ( my $c = $sth->fetchrow_hashref() ) {
Link Here
|
| 221 |
itemnotes_nonpublic => $c->{itemnotes_nonpublic}, |
222 |
itemnotes_nonpublic => $c->{itemnotes_nonpublic}, |
| 222 |
branchcode => $c->{branchcode}, |
223 |
branchcode => $c->{branchcode}, |
| 223 |
branchname => $c->{branchname}, |
224 |
branchname => $c->{branchname}, |
| 224 |
itemcallnumber => $c->{itemcallnumber} || q{}, |
225 |
itemcallnumber => $c->{itemcallnumber} || q{}, |
|
|
226 |
copynumber => $c->{copynumber} || q{}, |
| 225 |
charge => $charge, |
227 |
charge => $charge, |
| 226 |
fine => $fine, |
228 |
fine => $fine, |
| 227 |
price => $c->{replacementprice} || q{}, |
229 |
price => $c->{replacementprice} || q{}, |
| 228 |
- |
|
|