| Line 414... |
Line 414... |
| 414 |
# View the list of people signed up for the seminar...
|
414 |
# View the list of people signed up for the seminar...
|
| 415 |
if ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) {
|
415 |
if ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) {
|
| 416 |
my ($count) = $dbh->selectrow_array ("select count from v_seminar_new where $primary = ?", undef, $R->{$primary});
|
416 |
my ($count) = $dbh->selectrow_array ("select count from v_seminar_new where $primary = ?", undef, $R->{$primary});
|
| Line 417... |
Line 417... |
| 417 |
|
417 |
|
| 418 |
if ($F{$DBFields[0]} !~ /^(NEW|COPY)/) {
|
418 |
if ($F{$DBFields[0]} !~ /^(NEW|COPY)/) {
|
| Line 419... |
Line 419... |
| 419 |
my @A = @{$dbh->selectall_arrayref ("select role, official.RCid, derby_name from v_seminar_signup_new join official on v_seminar_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})};
|
419 |
my @A = @{$dbh->selectall_arrayref ("select role, official.RCid, derby_name, timestamp from v_seminar_signup_new join official on v_seminar_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})};
|
| 420 |
|
420 |
|
| Line 421... |
Line 421... |
| 421 |
my $seminarkey = join '|', "SEM", $F{date}, $F{start_time}, $F{location};
|
421 |
my $seminarkey = join '|', "SEM", $F{date}, $F{start_time}, $F{location};
|
| 422 |
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=$seminarkey','Confirm Shift Change','resizable,height=260,width=370'); return false;" }, "[ADD USER]") : "";
|
422 |
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=$seminarkey','Confirm Shift Change','resizable,height=260,width=370'); return false;" }, "[ADD USER]") : "";
|
| 423 |
|
423 |
|
| 424 |
print $h->br, $h->br;
|
424 |
print $h->br, $h->br;
|
| 425 |
print $h->div ({ class=>"index", style=>"max-width:610px" }, [ $h->p ({ class=>"heading" }, [ "Sign-ups: ", $adduserlink ]),
|
425 |
print $h->div ({ class=>"index", style=>"max-width:610px" }, [ $h->p ({ class=>"heading" }, [ "Sign-ups: ", $adduserlink ]),
|
| 426 |
$h->ul ( [ map { $h->li ({ class=>"shaded", style=>"margin:4px;" },
|
426 |
$h->ul ( [ map { $h->li ({ class=>"shaded", style=>"margin:4px;" },
|
| 427 |
$h->div ({ class=>"lisp0" }, [
|
427 |
$h->div ({ class=>"lisp0" }, [
|
| 428 |
$h->div ({ class=>"liLeft" }, [ $$_[0], ": ", $h->a ({ href=>"/schedule/view_user.pl?RCid=$$_[1]" }, $$_[2]) ]),
|
428 |
$h->div ({ class=>"liLeft" }, [ $$_[0], ": ", $h->a ({ href=>"/schedule/view_user.pl?RCid=$$_[1]" }, $$_[2]), ' '.$h->h5 ("[".$$_[3]."]") ]),
|
| 429 |
$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 seminar?')==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]") : "")
|
429 |
$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 seminar?')==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]") : "")
|
| 430 |
])
|
430 |
])
|