# tv301sf.db   Uwe Hoppe   Fritz-Haber-Institut der MPG   3/2014
#
# Record Definition for the Agilent TV 301SF Navigator pumping system.

record(bo, "$(P)$(R)StartStop") {
  field(DESC, "Start or Stop Pump")
  field(DTYP, "stream")
  field(OUT, "@tv301sf.proto setStartStop(0x80) $(BUS)")
  field(ZNAM, "Stop")
  field(ONAM, "Start")
}

record(bo, "$(P)$(R)Remote") {
  field(DESC, "Set Serial or Remote")
  field(DTYP, "stream")
  field(OUT, "@tv301sf.proto setRemote(0x80) $(BUS)")
  field(ZNAM, "Serial")
  field(ONAM, "Remote")
}

record(bo, "$(P)$(R)VentValve") {
  field(DESC, "Set Vent Valve")
  field(DTYP, "stream")
  field(OUT, "@tv301sf.proto setVentValve(0x80) $(BUS)")
  field(ZNAM, "Off (open)")
  field(ONAM, "On (Closed)")
}

record(bo, "$(P)$(R)VentValveOperation") {
  field(DESC, "Set Vent Valve Operation")
  field(DTYP, "stream")
  field(OUT, "@tv301sf.proto setVentValveOperation(0x80) $(BUS)")
  field(ZNAM, "Automatic")
  field(ONAM, "On Command")
}

record(ao, "$(P)$(R)RotFreqSetting") {
  field(DESC, "Rot. Frequency Setting")
  field(DTYP, "stream")
  field(OUT, "@tv301sf.proto setRotFreqSetting(0x80) $(BUS)")
  field(EGU, "Hz")
}

record(ai, "$(P)$(R)PumpCurrent") {
  field(DESC, "Get Pump Current")
  field(DTYP, "stream")
  field(INP, "@tv301sf.proto getPumpCurrent(0x80) $(BUS)")
  field(EGU, "mA")
  field(PINI, "YES")
  field(FLNK, "$(P)$(R)PumpVoltage")
}

record(ai, "$(P)$(R)PumpVoltage") {
  field(DESC, "Get Pump Voltage")
  field(DTYP, "stream")
  field(INP, "@tv301sf.proto getPumpVoltage(0x80) $(BUS)")
  field(EGU, "V")
  field(PINI, "YES")
  field(FLNK, "$(P)$(R)PumpPower")
}

record(ai, "$(P)$(R)PumpPower") {
  field(DESC, "Get Pump Power")
  field(DTYP, "stream")
  field(INP, "@tv301sf.proto getPumpPower(0x80) $(BUS)")
  field(EGU, "W")
  field(PINI, "YES")
  field(FLNK, "$(P)$(R)DrivingFrequency")
}

record(ai, "$(P)$(R)DrivingFrequency") {
  field(DESC, "Get Driving Frequency")
  field(DTYP, "stream")
  field(INP, "@tv301sf.proto getDrivingFrequency(0x80) $(BUS)")
  field(EGU, "Hz")
  field(PINI, "YES")
  field(FLNK, "$(P)$(R)ErrorCode")
}

record(ai, "$(P)$(R)PumpTemperature") {
  field(DESC, "Get Pump Temperature")
  field(DTYP, "stream")
  field(INP, "@tv301sf.proto getPumpTemperature(0x80) $(BUS)")
  field(EGU, "DegC")
  field(PINI, "YES")
}

record(mbbi, "$(P)$(R)PumpStatus") {
  field(DESC, "Pump Status")
  field(DTYP, "stream")
  field(SCAN, "10 second")
  field(INP, "@tv301sf.proto getPumpStatus(0x80) $(BUS)")
  field(ZRST, "Stop")
  field(ZRVL, "0")
  field(ONST, "Waiting intlk")
  field(ONVL, "1")
  field(TWST, "Starting")
  field(TWVL, "2")
  field(THST, "Auto-tuning")
  field(THVL, "3")
  field(FRST, "Braking")
  field(FRVL, "4")
  field(FVST, "Normal")
  field(FVVL, "5")
  field(SXST, "Fail")
  field(SXVL, "6")
  field(PINI, "YES")
  field(FLNK, "$(P)$(R)PumpCurrent")
}

record(ai, "$(P)$(R)ErrorCode") {
  field(DESC, "Pump Error Code")
  field(DTYP, "stream")
  field(INP, "@tv301sf.proto getErrorCode(0x80) $(BUS)")
  field(PINI, "YES")
  field(FLNK, "$(P)$(R)PumpTemperature")
}