Subversion Repositories VORC

Rev

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

Rev 56 Rev 58
Line 33... Line 33...
33 
$user->{department} = convertDepartments $user->{department};
 33 
$user->{department} = convertDepartments $user->{department};
34 
$username = $h->a ({ href=>"/schedule/view_user.pl?submit=View&RCid=$user->{RCid}" }, $user->{derby_name});
 34 
$username = $h->a ({ href=>"/schedule/view_user.pl?submit=View&RCid=$user->{RCid}" }, $user->{derby_name});
35 
$RCid = $user->{RCid};
 35 
$RCid = $user->{RCid};
36 
$RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
 36 
$RCAUTH_cookie = CGI::Cookie->new(-name=>'RCAUTH',-value=>"$cookie_string",-expires=>"+30m");
Line 37... Line 37...
37 
 
 37 
 
38 
if (!$user->{mvp_pass} and $LVL < RollerCon::ADMIN and $user->{department}->{MVP} < RollerCon::USER) {
 38 
if (!$user->{MVPid} and $LVL < RollerCon::ADMIN and $user->{department}->{MVP} < RollerCon::USER) {
39 
	print header(-cookie=>$RCAUTH_cookie);
 39 
	print header(-cookie=>$RCAUTH_cookie);
40 
	printRCHeader("Unauthorized Page");
 40 
	printRCHeader("Unauthorized Page");
41 
	print $h->div ({ class=>"error" }, "No Access");
 41 
	print $h->div ({ class=>"error" }, "No Access");
42 
	print $h->div ("Your user account is not registered to sign up for MVP Classes, so you can't see this page.  It's possible that your access is still being reviewed.  Please be patient.");
 42 
	print $h->div ("Your user account is not registered to sign up for MVP Classes, so you can't see this page.  It's possible that your access is still being reviewed.  Please be patient.");
Line 69... Line 69...
69 
	$COLUMNS{note}     = [qw(Notes         60    text         )],
 69 
	$COLUMNS{note}     = [qw(Notes         60    text         )],
70 
	$COLUMNS{capacity} = [qw(Capacity      65    number        default )],
 70 
	$COLUMNS{capacity} = [qw(Capacity      65    number        default )],
71 
	$COLUMNS{count}    = [qw(Count         70    number      default )],
 71 
	$COLUMNS{count}    = [qw(Count         70    number      default )],
72 
}
 72 
}
Line 73... Line 73...
73 
 
 73 
 
74 
if ($user->{mvp_pass} and $LVL < RollerCon::ADMIN) {
 74 
if ($user->{MVPid} and $LVL < RollerCon::ADMIN) {
75 
	$COLUMNS{available}= [qw(SignUp       45    text       static)]
 75 
	$COLUMNS{available}= [qw(SignUp       45    text       static)]
Line 76... Line 76...
76 
}
 76 
}
Line 131... Line 131...
131 
  $t->{available} .= " | ".$droplink unless !$t->{signedup};
 131 
  $t->{available} .= " | ".$droplink unless !$t->{signedup};
132 
	if (signUpEligible ($ORCUSER, $t, "class")) {
 132 
	if (signUpEligible ($ORCUSER, $t, "class")) {
133 
		# SIGN UP
 133 
		# SIGN UP
134 
		$t->{available} .= " | ".$h->a ({ onClick=>"window.open('make_shift_change.pl?change=add&RCid=$RCid&id=$classkey','Confirm Class Change','resizable,height=260,width=370'); return false;" }, "[SIGN UP]");
 134 
		$t->{available} .= " | ".$h->a ({ onClick=>"window.open('make_shift_change.pl?change=add&RCid=$RCid&id=$classkey','Confirm Class Change','resizable,height=260,width=370'); return false;" }, "[SIGN UP]");
135 
	}
 135 
	}
136 
	if ($user->{mvp_pass} or $LVL > 4 or $user->{department}->{VCI} >= 2) {
 136 
	if ($LVL > 4 or $user->{department}->{VCI} >= 2) {
137 
		# ADD USER
 137 
		# ADD USER
138 
		$t->{available} ? $t->{available} .= " | " : {};
 138 
		$t->{available} ? $t->{available} .= " | " : {};
139 
		$t->{available} .= $h->a ({ onClick=>"window.open('make_shift_change.pl?change=lookup&RCid=$RCid&id=$classkey','Confirm Class Change','resizable,height=260,width=370'); return false;" }, "[ADD USER]");
 139 
		$t->{available} .= $h->a ({ onClick=>"window.open('make_shift_change.pl?change=lookup&RCid=$RCid&id=$classkey','Confirm Class Change','resizable,height=260,width=370'); return false;" }, "[ADD USER]");
140 
	}
 140 
	}