|
Lines 200-205
my $strsth =
Link Here
|
| 200 |
ORDER BY items.itemnumber SEPARATOR '|') l_enumchron, |
200 |
ORDER BY items.itemnumber SEPARATOR '|') l_enumchron, |
| 201 |
GROUP_CONCAT(DISTINCT items.copynumber |
201 |
GROUP_CONCAT(DISTINCT items.copynumber |
| 202 |
ORDER BY items.itemnumber SEPARATOR '|') l_copynumber, |
202 |
ORDER BY items.itemnumber SEPARATOR '|') l_copynumber, |
|
|
203 |
GROUP_CONCAT(DISTINCT items.barcode |
| 204 |
ORDER BY items.itemnumber SEPARATOR '|') l_barcode, |
| 203 |
biblio.title, |
205 |
biblio.title, |
| 204 |
biblio.copyrightdate, |
206 |
biblio.copyrightdate, |
| 205 |
biblioitems.publicationyear, |
207 |
biblioitems.publicationyear, |
|
Lines 266-271
while ( my $data = $sth->fetchrow_hashref ) {
Link Here
|
| 266 |
itemcallnumber => [split('\|', $data->{l_itemcallnumber})], |
268 |
itemcallnumber => [split('\|', $data->{l_itemcallnumber})], |
| 267 |
enumchron => [split('\|', $data->{l_enumchron})], |
269 |
enumchron => [split('\|', $data->{l_enumchron})], |
| 268 |
copyno => [split('\|', $data->{l_copynumber})], |
270 |
copyno => [split('\|', $data->{l_copynumber})], |
|
|
271 |
barcode => [split('\|', $data->{l_barcode})], |
| 269 |
count => $data->{icount}, |
272 |
count => $data->{icount}, |
| 270 |
rcount => $data->{rcount}, |
273 |
rcount => $data->{rcount}, |
| 271 |
pullcount => $data->{icount} <= $data->{rcount} ? $data->{icount} : $data->{rcount}, |
274 |
pullcount => $data->{icount} <= $data->{rcount} ? $data->{icount} : $data->{rcount}, |