IOCDOSEApp/Db/fht.db
author Heinz Junkes <junkes@fhi-berlin.mpg.de>
Tue, 02 Nov 2021 13:19:46 +0100
changeset 5 85c191e174df
permissions -rw-r--r--
Add Mpdbus pressure Reading
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     1
record(ai, "$(P)$(R)GetRadiation_1")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     2
{
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     3
    field(DESC, "Get Radiation")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     4
    field(DTYP, "stream")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     5
    field(INP,  "@fht.proto getRadiation(138) $(BUS)")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     6
    field(SCAN, "1 second")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     7
    field(EGU, "uSv/h") 
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     8
    field(FLNK, "$(P)$(R)GetRadiation_1:Hour")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
     9
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    10
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    11
record(calc, "$(P)$(R)GetRadiation_1:Add") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    12
    field(INPA, "$(P)$(R)GetRadiation_1 CP NMS")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    13
    field(INPB, "1")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    14
    field(CALC, "B>0?VAL+A:0;B:=1")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    15
    field(FLNK, "$(P)$(R)GetRadiation_1:Counter") 
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    16
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    17
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    18
record(calc, "$(P)$(R)GetRadiation_1:Counter") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    19
    field(INPA, "$(P)$(R)GetRadiation_1:Add NPP ")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    20
    field(CALC, "A>0?VAL+1:0")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    21
    field(FLNK, "$(P)$(R)GetRadiation_1:SumOneHour") 
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    22
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    23
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    24
record(calc, "$(P)$(R)GetRadiation_1:SumOneHour") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    25
    field(INPA, "$(P)$(R)GetRadiation_1:Add NPP ")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    26
    field(INPB, "$(P)$(R)GetRadiation_1:Counter NPP ")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    27
    field(CALC, "B>0?A/B:0")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    28
    field(EGU, "uSv/h") 
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    29
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    30
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    31
record(stringin, "$(P)$(R)GetRadiation_1:Hour") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    32
    field(DTYP, "Soft Timestamp")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    33
    field(INP, "@%M")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    34
    field(TSEL, "$(P)$(R)GetRadiation_1.TIME")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    35
    field(FLNK, "$(P)$(R)GetRadiation_1:HourClear")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    36
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    37
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    38
record(calcout, "$(P)$(R)GetRadiation_1:HourClear") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    39
    field(INPA, "$(P)$(R)GetRadiation_1:Hour NPP NMS")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    40
    field(INPB, "0")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    41
    field(CALC, "A<B?0:1;B:=A")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    42
    field(DOPT, "Use CALC")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    43
    field(OOPT, "When Zero")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    44
    field(OUT,  "$(P)$(R)GetRadiation_1:Add.B PP")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    45
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    46
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    47
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    48
record(ai, "$(P)$(R)GetRadiation_2")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    49
{
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    50
    field(DESC, "Get Radiation")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    51
    field(DTYP, "stream")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    52
    field(INP,  "@fht.proto getRadiation(239) $(BUS)")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    53
    field(EGU, "uSiv")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    54
    field(SCAN, "1 second")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    55
    field(FLNK, "$(P)$(R)GetRadiation_2:Hour")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    56
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    57
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    58
record(calc, "$(P)$(R)GetRadiation_2:Add") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    59
    field(INPA, "$(P)$(R)GetRadiation_2 CP NMS")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    60
    field(INPB, "1")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    61
    field(CALC, "B>0?VAL+A:0;B:=1")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    62
    field(FLNK, "$(P)$(R)GetRadiation_2:Counter") 
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    63
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    64
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    65
record(calc, "$(P)$(R)GetRadiation_2:Counter") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    66
    field(INPA, "$(P)$(R)GetRadiation_2:Add NPP ")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    67
    field(CALC, "A>0?VAL+1:0")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    68
    field(FLNK, "$(P)$(R)GetRadiation_2:SumOneHour") 
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    69
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    70
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    71
record(calc, "$(P)$(R)GetRadiation_2:SumOneHour") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    72
    field(INPA, "$(P)$(R)GetRadiation_2:Add NPP ")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    73
    field(INPB, "$(P)$(R)GetRadiation_2:Counter NPP ")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    74
    field(CALC, "B>0?A/B:0")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    75
    field(EGU, "uSv/h") 
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    76
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    77
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    78
record(stringin, "$(P)$(R)GetRadiation_2:Hour") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    79
    field(DTYP, "Soft Timestamp")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    80
    field(INP, "@%M")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    81
    field(TSEL, "$(P)$(R)GetRadiation_2.TIME")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    82
    field(FLNK, "$(P)$(R)GetRadiation_2:HourClear")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    83
}
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    84
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    85
record(calcout, "$(P)$(R)GetRadiation_2:HourClear") {
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    86
    field(INPA, "$(P)$(R)GetRadiation_2:Hour NPP NMS")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    87
    field(INPB, "0")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    88
    field(CALC, "A<B?0:1;B:=A")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    89
    field(DOPT, "Use CALC")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    90
    field(OOPT, "When Zero")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    91
    field(OUT,  "$(P)$(R)GetRadiation_2:Add.B PP")
85c191e174df Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff changeset
    92
}