| Line 17... |
Line 17... |
| 17 |
# Add checking to make sure they're in this department
|
17 |
# Add checking to make sure they're in this department
|
| 18 |
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;
|
18 |
our ($EML, $PWD, $LVL) = split /&/, $cookie_string;
|
| 19 |
my $user = getUser ($EML);
|
19 |
my $user = getUser ($EML);
|
| 20 |
$user->{department} = convertDepartments $user->{department};
|
20 |
$user->{department} = convertDepartments $user->{department};
|
| Line 21... |
Line 21... |
| 21 |
|
21 |
|
| 22 |
if ($user->{department}->{"ANN"} < 1 or $LVL < 4) {
|
22 |
if ($user->{department}->{"ANN"} < 1 and $LVL < 4) {
|
| 23 |
print header(-cookie=>$RCAUTH_cookie);
|
23 |
print header(-cookie=>$RCAUTH_cookie);
|
| 24 |
printRCHeader("Unauthorized Page");
|
24 |
printRCHeader("Unauthorized Page");
|
| 25 |
print $h->div ({ class=>"error" }, "You're not an Announcer");
|
25 |
print $h->div ({ class=>"error" }, "You're not an Announcer");
|
| 26 |
print $h->div ("Your user account is not registered as an Announcer, so you can't see these shifts. It's possible that your access is still being reviewed. Please be patient.");
|
26 |
print $h->div ("Your user account is not registered as an Announcer, so you can't see these shifts. It's possible that your access is still being reviewed. Please be patient.");
|