Subversion Repositories VORC

Rev

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

Rev 208 Rev 222
Line 27... Line 27...
27
  print header(-cookie=>$RCAUTH_cookie);
27
  print header(-cookie=>$RCAUTH_cookie);
28
  printRCHeader("Unauthorized Page");
28
  printRCHeader("Unauthorized Page");
29
  print $h->div ({ class=>"error" }, "No Access");
29
  print $h->div ({ class=>"error" }, "No Access");
30
  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.");
30
  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.");
31
  print $h->a ({ href=>"/schedule/" }, "[Go Home]");
31
  print $h->a ({ href=>"/schedule/" }, "[Go Home]");
-
 
32
  print $h->close ("body");
32
  print $h->close ("html");
33
  print $h->close ("html");
33
  exit; 
34
  exit; 
34
}
35
}
Line 35... Line 36...
35
 
36
 
Line 72... Line 73...
72
# If we need to modify line item values, create a subroutine named "modify_$columnname"
73
# If we need to modify line item values, create a subroutine named "modify_$columnname"
73
#    It will receive a hashref to the object lineitem
74
#    It will receive a hashref to the object lineitem
Line 74... Line 75...
74
 
75
 
Line -... Line 76...
-
 
76
my $dbh = getRCDBH;
-
 
77
 
-
 
78
sub modify_coach {
-
 
79
  my $line = shift;
-
 
80
  if ($line->{coachRCid} =~ / & /) {
-
 
81
    return join " & ", map { $h->a ({ href=>"view_coach.pl?RCid=".$_ }, getUser($_)->{derby_name}) } split / & /, $line->{coachRCid};
-
 
82
  }
-
 
83
  return $line->{coach} ? $h->a ({ href=>"view_coach.pl?RCid=".$line->{coachRCid} }, $line->{coach}) : "";
75
my $dbh = getRCDBH;
84
}
76
 
85
 
77
sub modify_id {
86
sub modify_id {
78
  my $hr = shift;
87
  my $hr = shift;
79
  my $clicky = $hr->{count} ? "event.stopPropagation(); if (confirm('WARNING!\\nYou are modifying a class that someone has signed up for.')==true) {return true;} else {return false;}" : "return true;";
88
  my $clicky = $hr->{count} ? "event.stopPropagation(); if (confirm('WARNING!\\nYou are modifying a class that someone has signed up for.')==true) {return true;} else {return false;}" : "return true;";
Line 202... Line 211...
202
                  Columns => \%COLUMNS, 
211
                  Columns => \%COLUMNS, 
203
                  RCAuth  => $RCAUTH_cookie,
212
                  RCAuth  => $RCAUTH_cookie,
204
                  DisplayYearSelect => 1,
213
                  DisplayYearSelect => 1,
205
                  ShowMyShifts       => 1,
214
                  ShowMyShifts       => 1,
206
                  PersonalTimeButton => 1,
215
                  PersonalTimeButton => 1,
-
 
216
                  HeaderButton => { field  => "id",
-
 
217
                                    button => $h->input ({ type=>"button", value=>"Add", onClick=>"event.stopPropagation(); window.location.href='view_class.pl'" }) }
207
                 });
218
                 });