Koha-community/Koha
15
7
Fork 0
Code Issues Releases Wiki Activity

tidying lists

Browse source
This commit is contained in:
hdl 2005-02-24 14:10:44 +00:00
parent 4ca134c52a
commit 49ee6854f2
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
reports/catalogue_stats.pl
View file

@ -103,7 +103,7 @@ if ($do_it) {
my @values;
my %labels;
my $req;
$req = $dbh->prepare("select distinctrow left(dewey,3) from biblioitems");
$req = $dbh->prepare("select distinctrow left(dewey,3) from biblioitems order by dewey");
$req->execute;
my $hasdewey=1;
my @select;
@ -118,7 +118,7 @@ if ($do_it) {
-size => 1,
-multiple => 0 );
$req = $dbh->prepare( "select distinctrow left(lccn,3) from biblioitems");
$req = $dbh->prepare( "select distinctrow left(lccn,3) from biblioitems order by lccn");
$req->execute;
undef @select;
push @select,"";
@ -135,7 +135,7 @@ if ($do_it) {
-size => 1,
-multiple => 0 );
$req = $dbh->prepare("select distinctrow left(itemcallnumber,5) from items");
$req = $dbh->prepare("select distinctrow left(itemcallnumber,5) from items order by itemcallnumber");
$req->execute;
undef @select;
push @select,"";
@ -163,7 +163,7 @@ if ($do_it) {
-size => 1,
-multiple => 0 );
$req = $dbh->prepare("select distinctrow itemtype from biblioitems");
$req = $dbh->prepare("select distinctrow itemtype from biblioitems order by itemtype");
$req->execute;
undef @select;
push @select,"";
@ -176,7 +176,7 @@ if ($do_it) {
-size => 1,
-multiple => 0 );
$req = $dbh->prepare("select distinctrow publishercode from biblioitems");
$req = $dbh->prepare("select distinctrow publishercode from biblioitems order by publishercode");
$req->execute;
undef @select;
push @select,"";
@ -205,7 +205,7 @@ if ($do_it) {
-size => 1,
-multiple => 0 );
$req = $dbh->prepare("select distinctrow location from items");
$req = $dbh->prepare("select distinctrow location from items order by location");
$req->execute;
undef @select;
push @select,"";