| Line 426... |
Line 426... |
| 426 |
# View the list of people signed up for the class...
|
426 |
# View the list of people signed up for the class...
|
| 427 |
if ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) {
|
427 |
if ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) {
|
| 428 |
my ($count) = $dbh->selectrow_array ("select count from v_class_new where $primary = ?", undef, $R->{$primary});
|
428 |
my ($count) = $dbh->selectrow_array ("select count from v_class_new where $primary = ?", undef, $R->{$primary});
|
| Line 429... |
Line 429... |
| 429 |
|
429 |
|
| 430 |
if ($F{$DBFields[0]} !~ /^(NEW|COPY)/) {
|
430 |
if ($F{$DBFields[0]} !~ /^(NEW|COPY)/) {
|
| Line 431... |
Line 431... |
| 431 |
my @A = @{$dbh->selectall_arrayref ("select role, official.RCid, derby_name from v_class_signup_new join official on v_class_signup_new.RCid = official.RCid where $primary = ? order by cast(right(role, if(char_length(role) = 5, 1, 2)) as UNSIGNED) asc", undef, $R->{$primary})};
|
431 |
my @A = @{$dbh->selectall_arrayref ("select role, official.RCid, derby_name, timestamp from v_class_signup_new join official on v_class_signup_new.RCid = official.RCid where $primary = ? order by cast(right(role, if(char_length(role) = 5, 1, 2)) as UNSIGNED) asc", undef, $R->{$primary})};
|
| 432 |
|
432 |
|
| Line 433... |
Line 433... |
| 433 |
my $classkey = join '|', $F{date}, $F{start_time}, $F{location};
|
433 |
my $classkey = join '|', $F{date}, $F{start_time}, $F{location};
|
| 434 |
my $adduserlink = ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) ? $h->a ({ style=>"color:unset;font-size:x-small;", onClick=>"window.open('make_shift_change.pl?change=lookup&RCid=$RCid&id=$classkey','Confirm Shift Change','resizable,height=260,width=370'); return false;" }, "[ADD USER]") : "";
|
434 |
my $adduserlink = ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) ? $h->a ({ style=>"color:unset;font-size:x-small;", onClick=>"window.open('make_shift_change.pl?change=lookup&RCid=$RCid&id=$classkey','Confirm Shift Change','resizable,height=260,width=370'); return false;" }, "[ADD USER]") : "";
|
| 435 |
|
435 |
|
| 436 |
print $h->br, $h->br;
|
436 |
print $h->br, $h->br;
|
| 437 |
print $h->div ({ class=>"index", style=>"max-width:610px" }, [ $h->p ({ class=>"heading" }, [ "Sign-ups: ", $adduserlink ]),
|
437 |
print $h->div ({ class=>"index", style=>"max-width:610px" }, [ $h->p ({ class=>"heading" }, [ "Sign-ups: ", $adduserlink ]),
|
| 438 |
$h->ul ( [ map { $h->li ({ class=>"shaded", style=>"margin:4px;" },
|
438 |
$h->ul ( [ map { $h->li ({ class=>"shaded", style=>"margin:4px;" },
|
| 439 |
$h->div ({ class=>"lisp0" }, [
|
439 |
$h->div ({ class=>"lisp0" }, [
|
| 440 |
$h->div ({ class=>"liLeft" }, [ $$_[0], ": ", $h->a ({ href=>"/schedule/view_user.pl?RCid=$$_[1]" }, $$_[2]) ]),
|
440 |
$h->div ({ class=>"liLeft" }, [ $$_[0], ": ", $h->a ({ href=>"/schedule/view_user.pl?RCid=$$_[1]" }, $$_[2]), ' '.$h->h5 ("[".$$_[3]."]") ]),
|
| 441 |
$h->div ({ class=>"liRight" }, ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) ? $h->a ({ style=>"font-size:small", onClick=>"if (confirm('Really? Delete $$_[2] from this class?')==true) { window.open('make_shift_change.pl?change=del&RCid=$$_[1]&id=$R->{$primary}&role=$$_[0]','Confirm Shift Change','resizable,height=260,width=370'); return false; }" }, "[DROP]") : "")
|
441 |
$h->div ({ class=>"liRight" }, ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) ? $h->a ({ style=>"font-size:small", onClick=>"if (confirm('Really? Delete $$_[2] from this class?')==true) { window.open('make_shift_change.pl?change=del&RCid=$$_[1]&id=$R->{$primary}&role=$$_[0]','Confirm Shift Change','resizable,height=260,width=370'); return false; }" }, "[DROP]") : "")
|
| 442 |
])
|
442 |
])
|