From a5eb233c0cbf465fa306a9461399fe77e839db12 Mon Sep 17 00:00:00 2001
From: Ryan Higgins <rch@liblime.com>
Date: Sun, 1 Jun 2008 09:56:30 -0500
Subject: [PATCH] Remove commented deprecated code and a useless query on
 items.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 reports/catalogue_stats.pl | 70 --------------------------------------
 1 file changed, 70 deletions(-)

diff --git a/reports/catalogue_stats.pl b/reports/catalogue_stats.pl
index 485dca4160..276294f493 100755
--- a/reports/catalogue_stats.pl
+++ b/reports/catalogue_stats.pl
@@ -108,19 +108,6 @@ if ($do_it) {
 	# $req = $dbh->prepare("select count(dewey) from biblioitems ");
 	# $req->execute;
 	my $hasdewey = 0;
-# 	push @select,"";
-# 	while (my ($value) =$req->fetchrow) {
-# 		if (($value>2) and (! $hasdewey)) {
-# 			$hasdewey =1;
-# 			$count++;
-# 		}
-#		push @select, $value;
-# 	}
-# 	my $CGIdewey=CGI::scrolling_list( -name     => 'Filter',
-# 				-id => 'Filter',
-# 				-values   => \@select,
-# 				-size     => 1,
-# 				-multiple => 0 );
 
 # (rch) biblioitems.lccn is mapped to lccn MARC21 010$a in default framework.
 # This is not the LC Classification.  It's the Control Number.
@@ -147,32 +134,6 @@ if ($do_it) {
 #
 	 my $hascote = 1;
 	 my $highcote = 5;
-
-#	$req = $dbh->prepare("select count(itemcallnumber) from items");
-#	$req->execute;
-#	my $hlghtcote;
-#	while (my ($value) =$req->fetchrow) {
-#		$hascote =1 if (($value>2) and (! $hascote));
-#		$count++ if (($value) and (! $hascote));
-#		$hlghtcote = (($hasdewey) and ($haslccn)) or (!($hasdewey) and !($haslccn));
-##		push @select, $value;
-#	}
-# 	my $CGIcote=CGI::scrolling_list( -name     => 'Filter',
-# 				-id => 'Filter',
-# 				-values   => \@select,
-# 				-size     => 1,
-# 				-multiple => 0 );
-#	my $hglghtDT  = ++$count % 2;
-#	my $hglghtPub = ++$count % 2;
-#	my $hglghtPY  = ++$count % 2;
-#	my $hglghtHB  = ++$count % 2;
-#	my $hglghtLOC = ++$count % 2;
-#	warn "highlightDT "  .$hglghtDT;
-#	warn "highlightPub " .$hglghtPub;
-#	warn "highlightPY "  .$hglghtPY;
-#	warn "highlightHB "  .$hglghtHB;
-#	warn "highlightLOC " .$hglghtLOC;
-	
 	
 	$req = $dbh->prepare("select itemtype, description from itemtypes order by description");
 	$req->execute;
@@ -184,18 +145,6 @@ if ($do_it) {
 		push @authvals, { code => $_, description => $authvals->{$_} };
 	}
 	
-# 	$req = $dbh->prepare("select distinctrow left(publishercode,75) from biblioitems order by publishercode");
-# 	$req->execute;
-# 	undef @select;
-# 	push @select,"";
-# 	while (my ($value) =$req->fetchrow) {
-# 		push @select, $value;
-# 	}
-# 	my $CGIpublisher=CGI::scrolling_list( -name     => 'Filter',
-# 				-id => 'Filter',
-# 				-values   => \@select,
-# 				-size     => 1,
-# 				-multiple => 0 );
 
 	my $branches=GetBranches();
 	my @branchloop;
@@ -208,9 +157,6 @@ if ($do_it) {
 		push @branchloop, \%row;
 	}
 
-	$req = $dbh->prepare("select distinctrow location from items order by location");
-	$req->execute;
-	my $locationloop = $req->fetchall_arrayref({});
 	my $locations = GetKohaAuthorisedValues("items.location");
 	my @locations;
 	foreach (sort keys %$locations) {
@@ -221,25 +167,9 @@ if ($do_it) {
 	my @delim = ( map { +{delim=>$_} } (split //,C4::Context->preference("delimiter")) );
 	
 	$template->param(hasdewey=>$hasdewey,
-#					CGIFromDeweyClass => $CGIdewey,
-#					CGIToDeweyClass => $CGIdewey,
 					haslccn   => $haslccn,
-#					hlghtlccn => $hlghtlccn,
-#					CGIFromLoCClass => $CGIlccn,
-#					CGIToLoCClass => $CGIlccn,
 					hascote   => $hascote,
-#					hlghtcote => $hlghtcote,
-#					hglghtDT  => $hglghtDT,
-#					hglghtPub => $hglghtPub,
-#					hglghtPY  => $hglghtPY,
-#					hglghtHB  => $hglghtHB,
-#					hglghtLOC => $hglghtLOC,
-#					CGIFromCoteClass => $CGIcote,
-#					CGIToCoteClass => $CGIcote,
 					CGIItemType => $CGIitemtype,
-# 					CGIFromPublicationYear => $CGIpublicationyear,
-# 					CGIToPublicationYear => $CGIpublicationyear,
-#					CGIPublisher => $CGIpublisher,
 					CGIBranch    => \@branchloop,
 					locationloop => \@locations,
 					authvals     => \@authvals,
-- 
2.39.2