Lines 238-244
if ($noreport) {
Link Here
|
238 |
biblio.biblionumber, |
238 |
biblio.biblionumber, |
239 |
items.itemcallnumber, |
239 |
items.itemcallnumber, |
240 |
items.replacementprice, |
240 |
items.replacementprice, |
241 |
items.enumchron |
241 |
items.enumchron, |
|
|
242 |
items.itemnotes_nonpublic |
242 |
FROM issues |
243 |
FROM issues |
243 |
LEFT JOIN borrowers ON (issues.borrowernumber=borrowers.borrowernumber ) |
244 |
LEFT JOIN borrowers ON (issues.borrowernumber=borrowers.borrowernumber ) |
244 |
LEFT JOIN items ON (issues.itemnumber=items.itemnumber) |
245 |
LEFT JOIN items ON (issues.itemnumber=items.itemnumber) |
Lines 325-330
if ($noreport) {
Link Here
|
325 |
holdingbranchcode => $data->{holdingbranchcode}, |
326 |
holdingbranchcode => $data->{holdingbranchcode}, |
326 |
itemcallnumber => $data->{itemcallnumber}, |
327 |
itemcallnumber => $data->{itemcallnumber}, |
327 |
replacementprice => $data->{replacementprice}, |
328 |
replacementprice => $data->{replacementprice}, |
|
|
329 |
itemnotes_nonpublic => $data->{itemnotes_nonpublic}, |
328 |
enumchron => $data->{enumchron}, |
330 |
enumchron => $data->{enumchron}, |
329 |
patron_attr_value_loop => \@patron_attr_value_loop, |
331 |
patron_attr_value_loop => \@patron_attr_value_loop, |
330 |
}; |
332 |
}; |
Lines 374-380
sub build_csv {
Link Here
|
374 |
# build header ... |
376 |
# build header ... |
375 |
my @keys = |
377 |
my @keys = |
376 |
qw ( duedate title author borrowertitle firstname surname phone barcode email address address2 zipcode city country |
378 |
qw ( duedate title author borrowertitle firstname surname phone barcode email address address2 zipcode city country |
377 |
branchcode itemcallnumber biblionumber borrowernumber itemnum issuedate replacementprice streetnumber streettype); |
379 |
branchcode itemcallnumber biblionumber borrowernumber itemnum issuedate replacementprice itemnotes_nonpublic streetnumber streettype); |
378 |
my $csv = Text::CSV_XS->new(); |
380 |
my $csv = Text::CSV_XS->new(); |
379 |
$csv->combine(@keys); |
381 |
$csv->combine(@keys); |
380 |
push @lines, $csv->string(); |
382 |
push @lines, $csv->string(); |