##### Records to set all register channels for given Hybrid
#     and given VMM chip.
# 
#     The aao record sets the register channel by channel.
#     The bo record sets all channels at once.

record(aao, "$(P)$(R)$(HYB)$(VMM)$(C)$(CH)-S") {
    field(DESC, "Set $(CH) channels array")
    field(DTYP, "asynInt8ArrayOut")
    field(NELM, "64")
    field(FTVL, "CHAR")
    field(FLNK, "$(P)$(R)$(HYB)$(VMM)$(C)$(CH)-R")
    field(OUT,  "@asyn($(PORT),$(ADDR),$(TIMEOUT))HYB_$(HYB)_$(VMM)_$(CH)")

    info(asyn:READBACK, "1")
}

record(aai, "$(P)$(R)$(HYB)$(VMM)$(C)$(CH)-R") {
    field(DESC, "Get $(CH) channels array")
    field(DTYP, "asynInt8ArrayIn")
    field(NELM, "64")
    field(FTVL, "CHAR")
    field(SCAN, "I/O Intr")
    field(PINI, "YES")
    field(INP,  "@asyn($(PORT),$(ADDR),$(TIMEOUT))HYB_$(HYB)_$(VMM)_$(CH)")
}

record(bo, "$(P)$(R)$(HYB)$(VMM)$(C)All$(CH)-S") {
    field(DESC, "Set all $(CH) channels")
    field(VAL,  "0")
}

record(acalcout, "$(P)$(R)$(HYB)$(VMM)$(C)#All$(CH)-S") {
    field(NELM, "64")
    field(CALC, "A=1?1:0")
    field(OOPT, "On Change")
    field(INPA, "$(P)$(R)$(HYB)$(VMM)$(C)All$(CH)-S CPP")
    field(INAA, "$(P)$(R)$(HYB)$(VMM)$(C)$(CH)-S")
    field(OUT,  "$(P)$(R)$(HYB)$(VMM)$(C)$(CH)-S PP")
}