| Line 32... |
Line 32... |
| 32 |
print $h->close ("html");
|
32 |
print $h->close ("html");
|
| 33 |
exit;
|
33 |
exit;
|
| 34 |
}
|
34 |
}
|
| Line 35... |
Line 35... |
| 35 |
|
35 |
|
| 36 |
my $pageTitle = "MVP Classes";
|
36 |
my $pageTitle = "MVP Classes";
|
| 37 |
our $DBTABLE = 'v_class';
|
37 |
our $DBTABLE = 'v_class_new';
|
| 38 |
my %COLUMNS = (
|
38 |
my %COLUMNS = (
|
| 39 |
# colname => [qw(DisplayName N type status)], status -> static | default | <blank>
|
39 |
# colname => [qw(DisplayName N type status)], status -> static | default | <blank>
|
| 40 |
name => [qw(Class 5 text static )],
|
40 |
name => [qw(Class 5 text static )],
|
| 41 |
date => [qw(Date 10 date )],
|
41 |
date => [qw(Date 10 date )],
|
| 42 |
dayofweek => [qw(Day 15 select default )],
|
42 |
dayofweek => [qw(Day 15 select default )],
|
| 43 |
start_time => [qw(StartTime 20 text )],
|
43 |
start_time => [qw(StartTime 20 text )],
|
| 44 |
end_time => [qw(EndTime 25 text )],
|
44 |
end_time => [qw(EndTime 25 text )],
|
| 45 |
time => [qw(Time 30 text default )],
|
45 |
time => [qw(Time 30 text default )],
|
| 46 |
location => [qw(Track 35 select default )],
|
46 |
location => [qw(Track 35 select default )],
|
| 47 |
level => [qw(Level 37 select default )],
|
47 |
level => [qw(Level 37 select default )],
|
| - |
|
48 |
coach => [qw(Coach 40 select default )],
|
| 48 |
coach => [qw(Coach 40 select default )]
|
49 |
assistant => [qw(Assistant 41 select )]
|
| Line 49... |
Line 50... |
| 49 |
);
|
50 |
);
|
| 50 |
|
51 |
|
| 51 |
if ($LVL >= RollerCon::ADMIN) {
|
52 |
if ($LVL >= RollerCon::ADMIN) {
|
| Line 100... |
Line 101... |
| 100 |
|
101 |
|
| Line 101... |
Line 102... |
| 101 |
return "CLOSED" unless $now < $cutoff;
|
102 |
return "CLOSED" unless $now < $cutoff;
|
| Line 102... |
Line 103... |
| 102 |
|
103 |
|
| 103 |
my $classkey = join '|', $t->{date}, $t->{start_time}, $t->{location};
|
104 |
my $classkey = join '|', $t->{date}, $t->{start_time}, $t->{location};
|
| 104 |
|
105 |
|
| 105 |
($t->{signedup}) = $dbh->selectrow_array ("select role from v_class_signup where RCid = ? and id = ?", undef, $RCid, $t->{id} );
|
106 |
($t->{signedup}) = $dbh->selectrow_array ("select role from v_class_signup_new where RCid = ? and id = ?", undef, $RCid, $t->{id} );
|
| 106 |
my $droplink = $h->a ({ onClick=>"if (confirm('Really? You want to drop this class?')==true) { window.open('make_shift_change.pl?change=del&RCid=$RCid&id=$t->{id}&role=$t->{signedup}','Confirm Change','resizable,height=260,width=370'); return false; }" }, "[DROP]");
|
107 |
my $droplink = $h->a ({ onClick=>"if (confirm('Really? You want to drop this class?')==true) { window.open('make_shift_change.pl?change=del&RCid=$RCid&id=$t->{id}&role=$t->{signedup}','Confirm Change','resizable,height=260,width=370'); return false; }" }, "[DROP]");
|
| 107 |
if (!$t->{available}) {
|
108 |
if (!$t->{available}) {
|