<%

  Select Case CStr(RS("ups_name"))
    Case "UPS01"
      ups_long_name="Silicon 1"
    Case "UPS02"
      ups_long_name="Silicon 2"
    Case "UPS03"
      ups_long_name="Silicon 3"
    Case "UPS04"
      ups_long_name="DMU Crate"
    Case "UPS05"
      ups_long_name="Console 1"
    Case "UPS06"
      ups_long_name="Console 2"
    Case "UPS07"
      ups_long_name="ToF Upper"
    Case "UPS08"
      ups_long_name="ToF Lower"
    Case "UPS09"
      ups_long_name="Cooling System" 
    Case "UPS10"
      ups_long_name="Trigger N"
    Case "UPS11"
      ups_long_name="Trigger P"
    Case "UPS12"
      ups_long_name="Spectrig"  
    Case "UPS13"
      ups_long_name="PCAL"  
    Case "UPS14"
      ups_long_name="Console 4"
    Case "UPS15"
      ups_long_name="Big River" 
    Case "UPS16"
      ups_long_name="New PCAL"       
    Case "UPS17"
      ups_long_name="New Database"                                             
    Case Else
      ups_long_name=CStr(RS("ups_name"))
  End Select

 %>