|
Lines 46-52
my $fullreportname = "reports/catalogue_stats.tt";
Link Here
|
| 46 |
my $do_it = $input->param('do_it'); |
46 |
my $do_it = $input->param('do_it'); |
| 47 |
my $line = $input->param("Line"); |
47 |
my $line = $input->param("Line"); |
| 48 |
my $column = $input->param("Column"); |
48 |
my $column = $input->param("Column"); |
| 49 |
my $cellvalue = $input->param("Cellvalue"); # one of 'items', 'biblios' |
49 |
my $cellvalue = $input->param("Cellvalue"); # one of 'items', 'biblios', 'deleteditems', 'allitems' |
| 50 |
my @filters = $input->multi_param("Filter"); |
50 |
my @filters = $input->multi_param("Filter"); |
| 51 |
my $cotedigits = $input->param("cotedigits"); |
51 |
my $cotedigits = $input->param("cotedigits"); |
| 52 |
my $output = $input->param("output"); |
52 |
my $output = $input->param("output"); |
|
Lines 175-181
sub calculate {
Link Here
|
| 175 |
my $itemstable = 'items'; |
175 |
my $itemstable = 'items'; |
| 176 |
my $deleted_where = "items.deleted_on IS NULL"; |
176 |
my $deleted_where = "items.deleted_on IS NULL"; |
| 177 |
$deleted_where = "1" if $cellvalue eq 'allitems'; |
177 |
$deleted_where = "1" if $cellvalue eq 'allitems'; |
| 178 |
$deleted_where = "items.deleted_on IS NOT NULL" if $cellvalue eq 'items'; |
178 |
$deleted_where = "items.deleted_on IS NOT NULL" if $cellvalue eq 'deleteditems'; |
| 179 |
|
179 |
|
| 180 |
my $dbh = C4::Context->dbh; |
180 |
my $dbh = C4::Context->dbh; |
| 181 |
|
181 |
|
| 182 |
- |
|
|