Subversion Repositories VORC

Rev

Rev 180 | Rev 200 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 180 Rev 190
Line 710... Line 710...
710 
	my ($dname) = $sth->fetchrow_array();
 710 
	my ($dname) = $sth->fetchrow_array();
711 
	return $dname;
 711 
	return $dname;
712 
}
 712 
}
Line 713... Line 713...
713 
 
 713 
 
714 
sub getYears {
 714 
sub getYears {
715 
	my $sth = $dbh->prepare("select distinct year from (select distinct year(date) as year from v_shift_admin_view union select year(now()) as year) years order by year");
 715 
	my $sth = $dbh->prepare("select distinct year from (select distinct year(date) as year from shift union select distinct year(date) as year from game union select distinct year(date) as year from class union select year(now()) as year) years order by year");
716 
#	my $sth = $dbh->prepare("select distinct year(date) from v_shift_admin_view");
 716 
#	my $sth = $dbh->prepare("select distinct year(date) from v_shift_admin_view");
717 
	$sth->execute();
 717 
	$sth->execute();
718 
	my @years;
 718 
	my @years;
719 
	while (my ($y) =$sth->fetchrow_array()) { push @years, $y; }
 719 
	while (my ($y) =$sth->fetchrow_array()) { push @years, $y; }