23,7 → 23,7 |
my $username = $h->a ({ href=>"/schedule/view_user.pl?submit=View&RCid=$user->{RCid}" }, $user->{derby_name}); |
my $RCid = $user->{RCid}; |
my $RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m"); |
my $YEAR; |
my $YEAR = 1900 + (localtime)[5]; |
|
|
my $pageTitle = "Volunteer Hours Year End Report"; |
40,9 → 40,6 |
my $homeURL = '/schedule/'; |
my @pagelimitoptions = ("All", 5, 10, 25); |
|
# Set any custom "where" DB filters here... |
my @whereClause; |
|
# If we need to modify line item values, create a subroutine named "modify_$columnname" |
# It will receive a hashref to the object lineitem |
|
95,6 → 92,8 |
{ push @displayFields, $_; } |
} |
|
# Set any custom "where" DB filters here... |
my @whereClause = ("year = $YEAR"); |
|
if (exists $FORM{autoload}) { # If the FORM was submitted (i.e. the page is being redisplayed), |
# build the data for the cookie that remembers the page setup |
243,6 → 242,10 |
} |
push @hiddenrows, $h->div ({ class=>'rTableRow' }, [ @hiddencheckboxes ]) unless --$c % 4 == 0; |
|
my @yearoptions; |
foreach (@{&getYears()}) { |
push @yearoptions, $YEAR eq $_ ? $h->option ({ selected=>[] }, $_) : $h->option ($_); |
} |
|
if (scalar @hideFields) { |
my @topleft; |
319,7 → 322,9 |
$h->br, |
"This page was displayed on ", currentTime (), |
$h->br, |
"Please direct questions, problems, and concerns to $SYSTEM_EMAIL" |
"Please direct questions, problems, and concerns to $SYSTEM_EMAIL", |
$h->br, |
"Displaying: ", $h->select ({ name=>"year", onchange=>"Req.submit();" }, [ @yearoptions ]) |
]) |
]), |
$h->div ({ class=>"spRight" }, [ |