Bug 22090: Add missing information to cash register CSV file
Some information was missing from the CSV export file of the Cash register report: manager surname, patron surname and payment notes. Also pretties up the column headers a bit and makes the sequence between GUI and CSV export match. To test: - Make sure you have some fines and fees and payments in your system - Make a search with the Cash register report - Export results as CSV - Proof read hader line and make sure contents match headings - Verify first name and surname are shown for manager and patron - Verify notes show up Signed-off-by: Michal Denar <black23@gmail.com> Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz> Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
parent
545a3a1295
commit
1a2572915b
3 changed files with 5 additions and 5 deletions
|
@ -1 +1 @@
|
|||
[%- BLOCK -%]mfirstname[% sep | html %]card number[% sep | html %]firstname[% sep | html %]branchname[% sep | html %]date[% sep | html %]accounttype[% sep | html %]amount[% sep | html %]title[% sep | html %]barcode[% sep | html %]itype[%- END -%]
|
||||
[%- BLOCK -%]Manager name[% sep | html %]Patron cardnumber[% sep | html %]Patron name[% sep | html %]Transaction library[% sep | html %]Transaction date[% sep | html %]Transaction type[% sep |html %]Notes[% sep | html %]Amount[% sep | html %]Title[% sep | html %]Barcode[% sep | html %]Item type[%- END -%]
|
||||
|
|
|
@ -131,7 +131,7 @@
|
|||
</select>
|
||||
</li>
|
||||
<li>
|
||||
<label>Transaction branch</label>
|
||||
<label>Transaction library</label>
|
||||
<select name="branch" id="branch">
|
||||
<option value="ALL">All</option>
|
||||
[% FOREACH branchloo IN branchloop %]
|
||||
|
|
|
@ -143,17 +143,17 @@ if ($do_it) {
|
|||
my $format = 'csv';
|
||||
my $reportname = $input->param('basename');
|
||||
my $reportfilename = $reportname ? "$reportname.$format" : "reportresults.$format" ;
|
||||
#my $reportfilename = "$reportname.html" ;
|
||||
my $delimiter = C4::Context->preference('delimiter') || ',';
|
||||
my @rows;
|
||||
foreach my $row (@loopresult) {
|
||||
my @rowValues;
|
||||
push @rowValues, $row->{mfirstname},
|
||||
push @rowValues, $row->{mfirstname}. ' ' . $row->{msurname},
|
||||
$row->{cardnumber},
|
||||
$row->{bfirstname},
|
||||
$row->{bfirstname} . ' ' . $row->{bsurname},
|
||||
$row->{branchname},
|
||||
$row->{date},
|
||||
$row->{accounttype},
|
||||
$row->{note},
|
||||
$row->{amount},
|
||||
$row->{title},
|
||||
$row->{barcode},
|
||||
|
|
Loading…
Reference in a new issue