Subversion Repositories VORC

Rev

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

Rev 208 Rev 217
Line 122... Line 122...
122 
    $cathan = $internalDBH->prepare("select RCid, derby_name from official where access > 0 order by derby_name");
 122 
    $cathan = $internalDBH->prepare("select RCid, derby_name from official where access > 0 order by derby_name");
123 
    $cathan->execute();
 123 
    $cathan->execute();
124 
  } elsif ($DEPT eq "CLA") {
 124 
  } elsif ($DEPT eq "CLA") {
125 
    $cathan = $internalDBH->prepare("select RCid, derby_name from v_official where access > 0 and isnull(MVPid) = false and last_login > CURRENT_DATE - INTERVAL 365 DAY order by derby_name");
 125 
    $cathan = $internalDBH->prepare("select RCid, derby_name from v_official where access > 0 and isnull(MVPid) = false and last_login > CURRENT_DATE - INTERVAL 365 DAY order by derby_name");
126 
    $cathan->execute;
 126 
    $cathan->execute;
- 
 
 127 
  } elsif ($DEPT eq "EMT") {
- 
 
 128 
    $cathan = $internalDBH->prepare("select RCid, derby_name from v_official where access > 0 and emt_verified = true and last_login > CURRENT_DATE - INTERVAL 365 DAY order by derby_name");
- 
 
 129 
    $cathan->execute;
127 
  } else {
 130 
  } else {
128 
    $cathan = $internalDBH->prepare("select RCid, derby_name from official where access > 0 and (department like ? and department not like ?) and last_login > CURRENT_DATE - INTERVAL 365 DAY order by derby_name");
 131 
    $cathan = $internalDBH->prepare("select RCid, derby_name from official where access > 0 and (department like ? and department not like ?) and last_login > CURRENT_DATE - INTERVAL 365 DAY order by derby_name");
129 
    $cathan->execute("%".$DEPT."%", "%".$DEPT."-0%");
 132 
    $cathan->execute("%".$DEPT."%", "%".$DEPT."-0%");
130 
  }
 133 
  }