Subversion Repositories VORC

Rev

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

Rev 74 Rev 80
Line 283... Line 283...
283
  );
283
  );
Line 284... Line 284...
284
 
284
 
285
  print $actionbutton;
285
  print $actionbutton;
Line 286... Line 286...
286
  print $h->close ("form");
286
  print $h->close ("form");
287
 
287
 
288
  if ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::VOLUNTEER) {
288
  if ($LVL >= RollerCon::ADMIN or $user->{department}->{MVP} >= RollerCon::LEAD) {
Line 289... Line 289...
289
    my $dbh = WebDB::connect ();
289
    my $dbh = WebDB::connect ();
290
    my ($count) = $dbh->selectrow_array ("select count from v_class where $primary = ?", undef, $R->{$primary});
290
    my ($count) = $dbh->selectrow_array ("select count from v_class where $primary = ?", undef, $R->{$primary});