ISIS Logo
FINS
FINS IOC
imat-plc-press.db
Go to the documentation of this file.
1 # Control Word: W510 (This word will self-reset to 0)
2 # W510.00 set true to request Sample Attenuator to Open
3 # W510.01 set true to request Sample Attenuator to Close
4 #
5 # Status Word: W511
6 # W511.00 true when Sample Attenuator requested to open via HMI or EPICS
7 # W511.01 true when Sample Attenuator is OPEN
8 # W511.02 true when Sample Attenuator is CLOSED
9 #
10 #
11 # Pressures
12 # The pressure value will be in range 10 to 99 corresponding to 1.0 to 9.9
13 # The exponent will be something like -3 encoded in two's complement and read back as e.g. 65533 (unsigned)
14 # Gauge Pressure x10_E description
15 # TPG300-1 A1 D100 D101 Section 1 pirani
16 # TPG300-1 A2 D102 D103 Section 2 pirani
17 # TPG300-1 B1 D104 D105 Section 3 pirani
18 # TPG300-1 B2 D106 D107 Spare
19 # TPG300-2 A1 D108 D109 Section 4 pirani
20 # TPG300-2 A2 D110 D111 Section 5 pirani
21 # TPG300-2 B1 D112 D113 Section 6 pirani
22 # TPG300-2 B2 D114 D115 Spare
23 
24 record(bo, "$(P)$(Q)SIM")
25 {
26  field(SCAN, "Passive")
27  field(DTYP, "Soft Channel")
28  field(ZNAM, "NO")
29  field(ONAM, "YES")
30 }
31 
32 ## read exponent, mantissa, exponent and check exponent still same
33 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
34 
35 record(longin, "$(P)$(Q)TPG300_1:A1:MEAS1EXP")
36 {
37  field(DTYP, "asynInt32")
38  field(SCAN, "10 second")
39  field(INP, "@asyn($(PORT=PLC), 101, 5.0) FINS_DM_READ")
40  field(FLNK, "$(P)$(Q)TPG300_1:A1:MEAS1")
41  field(SIML, "$(P)$(Q)SIM")
42  field(SIOL, "$(P)$(Q)TPG300_1:A1:MEAS1EXP:SIM")
43 }
44 
45 ## number in range 10 to 99 corresponding to 1.0 to 9.9
46 record(longin, "$(P)$(Q)TPG300_1:A1:MEAS1")
47 {
48  field(DTYP, "asynInt32")
49  field(INP, "@asyn($(PORT=PLC), 100, 5.0) FINS_DM_READ")
50  field(FLNK, "$(P)$(Q)TPG300_1:A1:MEAS2EXP")
51  field(SIML, "$(P)$(Q)SIM")
52  field(SIOL, "$(P)$(Q)TPG300_1:A1:MEAS1:SIM")
53 }
54 
55 record(longin, "$(P)$(Q)TPG300_1:A1:MEAS2EXP")
56 {
57  field(DTYP, "asynInt32")
58  field(INP, "@asyn($(PORT=PLC), 101, 5.0) FINS_DM_READ")
59  field(FLNK, "$(P)$(Q)TPG300_1:A1CHECK")
60  field(SIML, "$(P)$(Q)SIM")
61  field(SIOL, "$(P)$(Q)TPG300_1:A1:MEAS2EXP:SIM")
62 }
63 
64 ## if exponents haven't changed, counter did not rollover
65 ## during reads so value should be OK
66 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
67 record(calcout, "$(P)$(Q)TPG300_1:A1CHECK")
68 {
69  field(DESC, "Check Field")
70  field(INPA, "$(P)$(Q)TPG300_1:A1:MEAS1EXP")
71  field(INPB, "$(P)$(Q)TPG300_1:A1:MEAS1")
72  field(INPC, "$(P)$(Q)TPG300_1:A1:MEAS2EXP")
73  field(EGU, "mbar")
74  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
75  field(DOPT, "Use CALC")
76  field(OOPT, "When Non-zero")
77  field(OUT,"$(P)$(Q)TPG300_1:A1 PP")
78 }
79 
80 record(ai, "$(P)$(Q)TPG300_1:A1")
81 {
82  field(DESC, "Pressure")
83  field(EGU, "mbar")
84  field(PREC, 3)
85  info(INTEREST, "HIGH")
86  info(archive, "VAL")
87  alias("$(P)$(Q)SEC_1:PRESS")
88 }
89 
90 ### SIMULATION RECORDS ###
91 
92 
93 record(longin, "$(P)$(Q)TPG300_1:A1:MEAS1:SIM")
94 {
95  field(SCAN, "Passive")
96  field(DTYP, "Soft Channel")
97  field(VAL, "12")
98 }
99 record(longin, "$(P)$(Q)TPG300_1:A1:MEAS1EXP:SIM")
100 {
101  field(SCAN, "Passive")
102  field(DTYP, "Soft Channel")
103  field(VAL, "65532")
104 }
105 record(longin, "$(P)$(Q)TPG300_1:A1:MEAS2:SIM")
106 {
107  field(SCAN, "Passive")
108  field(DTYP, "Soft Channel")
109  field(VAL, "12")
110 }
111 record(longin, "$(P)$(Q)TPG300_1:A1:MEAS2EXP:SIM")
112 {
113  field(SCAN, "Passive")
114  field(DTYP, "Soft Channel")
115  field(VAL, "65532")
116 }
117 
118 ## read exponent, mantissa, exponent and check exponent still same
119 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
120 
121 record(longin, "$(P)$(Q)TPG300_1:A2:MEAS1EXP")
122 {
123  field(DTYP, "asynInt32")
124  field(SCAN, "10 second")
125  field(INP, "@asyn($(PORT=PLC), 103, 5.0) FINS_DM_READ")
126  field(FLNK, "$(P)$(Q)TPG300_1:A2:MEAS1")
127  field(SIML, "$(P)$(Q)SIM")
128  field(SIOL, "$(P)$(Q)TPG300_1:A2:MEAS1EXP:SIM")
129 }
130 
131 ## number in range 10 to 99 corresponding to 1.0 to 9.9
132 record(longin, "$(P)$(Q)TPG300_1:A2:MEAS1")
133 {
134  field(DTYP, "asynInt32")
135  field(INP, "@asyn($(PORT=PLC), 102, 5.0) FINS_DM_READ")
136  field(FLNK, "$(P)$(Q)TPG300_1:A2:MEAS2EXP")
137  field(SIML, "$(P)$(Q)SIM")
138  field(SIOL, "$(P)$(Q)TPG300_1:A2:MEAS1:SIM")
139 }
140 
141 record(longin, "$(P)$(Q)TPG300_1:A2:MEAS2EXP")
142 {
143  field(DTYP, "asynInt32")
144  field(INP, "@asyn($(PORT=PLC), 103, 5.0) FINS_DM_READ")
145  field(FLNK, "$(P)$(Q)TPG300_1:A2CHECK")
146  field(SIML, "$(P)$(Q)SIM")
147  field(SIOL, "$(P)$(Q)TPG300_1:A2:MEAS2EXP:SIM")
148 }
149 
150 ## if exponents haven't changed, counter did not rollover
151 ## during reads so value should be OK
152 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
153 record(calcout, "$(P)$(Q)TPG300_1:A2CHECK")
154 {
155  field(DESC, "Check Field")
156  field(INPA, "$(P)$(Q)TPG300_1:A2:MEAS1EXP")
157  field(INPB, "$(P)$(Q)TPG300_1:A2:MEAS1")
158  field(INPC, "$(P)$(Q)TPG300_1:A2:MEAS2EXP")
159  field(EGU, "mbar")
160  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
161  field(DOPT, "Use CALC")
162  field(OOPT, "When Non-zero")
163  field(OUT,"$(P)$(Q)TPG300_1:A2 PP")
164 }
165 
166 record(ai, "$(P)$(Q)TPG300_1:A2")
167 {
168  field(DESC, "Pressure")
169  field(EGU, "mbar")
170  field(PREC, 3)
171  info(INTEREST, "HIGH")
172  info(archive, "VAL")
173  alias("$(P)$(Q)SEC_2:PRESS")
174 }
175 
176 ### SIMULATION RECORDS ###
177 
178 
179 record(longin, "$(P)$(Q)TPG300_1:A2:MEAS1:SIM")
180 {
181  field(SCAN, "Passive")
182  field(DTYP, "Soft Channel")
183  field(VAL, "12")
184 }
185 record(longin, "$(P)$(Q)TPG300_1:A2:MEAS1EXP:SIM")
186 {
187  field(SCAN, "Passive")
188  field(DTYP, "Soft Channel")
189  field(VAL, "65532")
190 }
191 record(longin, "$(P)$(Q)TPG300_1:A2:MEAS2:SIM")
192 {
193  field(SCAN, "Passive")
194  field(DTYP, "Soft Channel")
195  field(VAL, "12")
196 }
197 record(longin, "$(P)$(Q)TPG300_1:A2:MEAS2EXP:SIM")
198 {
199  field(SCAN, "Passive")
200  field(DTYP, "Soft Channel")
201  field(VAL, "65532")
202 }
203 
204 ## read exponent, mantissa, exponent and check exponent still same
205 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
206 
207 record(longin, "$(P)$(Q)TPG300_1:B1:MEAS1EXP")
208 {
209  field(DTYP, "asynInt32")
210  field(SCAN, "10 second")
211  field(INP, "@asyn($(PORT=PLC), 105, 5.0) FINS_DM_READ")
212  field(FLNK, "$(P)$(Q)TPG300_1:B1:MEAS1")
213  field(SIML, "$(P)$(Q)SIM")
214  field(SIOL, "$(P)$(Q)TPG300_1:B1:MEAS1EXP:SIM")
215 }
216 
217 ## number in range 10 to 99 corresponding to 1.0 to 9.9
218 record(longin, "$(P)$(Q)TPG300_1:B1:MEAS1")
219 {
220  field(DTYP, "asynInt32")
221  field(INP, "@asyn($(PORT=PLC), 104, 5.0) FINS_DM_READ")
222  field(FLNK, "$(P)$(Q)TPG300_1:B1:MEAS2EXP")
223  field(SIML, "$(P)$(Q)SIM")
224  field(SIOL, "$(P)$(Q)TPG300_1:B1:MEAS1:SIM")
225 }
226 
227 record(longin, "$(P)$(Q)TPG300_1:B1:MEAS2EXP")
228 {
229  field(DTYP, "asynInt32")
230  field(INP, "@asyn($(PORT=PLC), 105, 5.0) FINS_DM_READ")
231  field(FLNK, "$(P)$(Q)TPG300_1:B1CHECK")
232  field(SIML, "$(P)$(Q)SIM")
233  field(SIOL, "$(P)$(Q)TPG300_1:B1:MEAS2EXP:SIM")
234 }
235 
236 ## if exponents haven't changed, counter did not rollover
237 ## during reads so value should be OK
238 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
239 record(calcout, "$(P)$(Q)TPG300_1:B1CHECK")
240 {
241  field(DESC, "Check Field")
242  field(INPA, "$(P)$(Q)TPG300_1:B1:MEAS1EXP")
243  field(INPB, "$(P)$(Q)TPG300_1:B1:MEAS1")
244  field(INPC, "$(P)$(Q)TPG300_1:B1:MEAS2EXP")
245  field(EGU, "mbar")
246  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
247  field(DOPT, "Use CALC")
248  field(OOPT, "When Non-zero")
249  field(OUT,"$(P)$(Q)TPG300_1:B1 PP")
250 }
251 
252 record(ai, "$(P)$(Q)TPG300_1:B1")
253 {
254  field(DESC, "Pressure")
255  field(EGU, "mbar")
256  field(PREC, 3)
257  info(INTEREST, "HIGH")
258  info(archive, "VAL")
259  alias("$(P)$(Q)SEC_3:PRESS")
260 }
261 
262 ### SIMULATION RECORDS ###
263 
264 
265 record(longin, "$(P)$(Q)TPG300_1:B1:MEAS1:SIM")
266 {
267  field(SCAN, "Passive")
268  field(DTYP, "Soft Channel")
269  field(VAL, "12")
270 }
271 record(longin, "$(P)$(Q)TPG300_1:B1:MEAS1EXP:SIM")
272 {
273  field(SCAN, "Passive")
274  field(DTYP, "Soft Channel")
275  field(VAL, "65532")
276 }
277 record(longin, "$(P)$(Q)TPG300_1:B1:MEAS2:SIM")
278 {
279  field(SCAN, "Passive")
280  field(DTYP, "Soft Channel")
281  field(VAL, "12")
282 }
283 record(longin, "$(P)$(Q)TPG300_1:B1:MEAS2EXP:SIM")
284 {
285  field(SCAN, "Passive")
286  field(DTYP, "Soft Channel")
287  field(VAL, "65532")
288 }
289 
290 ## read exponent, mantissa, exponent and check exponent still same
291 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
292 
293 record(longin, "$(P)$(Q)TPG300_1:B2:MEAS1EXP")
294 {
295  field(DTYP, "asynInt32")
296  field(SCAN, "10 second")
297  field(INP, "@asyn($(PORT=PLC), 107, 5.0) FINS_DM_READ")
298  field(FLNK, "$(P)$(Q)TPG300_1:B2:MEAS1")
299  field(SIML, "$(P)$(Q)SIM")
300  field(SIOL, "$(P)$(Q)TPG300_1:B2:MEAS1EXP:SIM")
301 }
302 
303 ## number in range 10 to 99 corresponding to 1.0 to 9.9
304 record(longin, "$(P)$(Q)TPG300_1:B2:MEAS1")
305 {
306  field(DTYP, "asynInt32")
307  field(INP, "@asyn($(PORT=PLC), 106, 5.0) FINS_DM_READ")
308  field(FLNK, "$(P)$(Q)TPG300_1:B2:MEAS2EXP")
309  field(SIML, "$(P)$(Q)SIM")
310  field(SIOL, "$(P)$(Q)TPG300_1:B2:MEAS1:SIM")
311 }
312 
313 record(longin, "$(P)$(Q)TPG300_1:B2:MEAS2EXP")
314 {
315  field(DTYP, "asynInt32")
316  field(INP, "@asyn($(PORT=PLC), 107, 5.0) FINS_DM_READ")
317  field(FLNK, "$(P)$(Q)TPG300_1:B2CHECK")
318  field(SIML, "$(P)$(Q)SIM")
319  field(SIOL, "$(P)$(Q)TPG300_1:B2:MEAS2EXP:SIM")
320 }
321 
322 ## if exponents haven't changed, counter did not rollover
323 ## during reads so value should be OK
324 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
325 record(calcout, "$(P)$(Q)TPG300_1:B2CHECK")
326 {
327  field(DESC, "Check Field")
328  field(INPA, "$(P)$(Q)TPG300_1:B2:MEAS1EXP")
329  field(INPB, "$(P)$(Q)TPG300_1:B2:MEAS1")
330  field(INPC, "$(P)$(Q)TPG300_1:B2:MEAS2EXP")
331  field(EGU, "mbar")
332  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
333  field(DOPT, "Use CALC")
334  field(OOPT, "When Non-zero")
335  field(OUT,"$(P)$(Q)TPG300_1:B2 PP")
336 }
337 
338 record(ai, "$(P)$(Q)TPG300_1:B2")
339 {
340  field(DESC, "Pressure")
341  field(EGU, "mbar")
342  field(PREC, 3)
343  info(INTEREST, "HIGH")
344  info(archive, "VAL")
345  alias("$(P)$(Q)SPARE_1")
346 }
347 
348 ### SIMULATION RECORDS ###
349 
350 
351 record(longin, "$(P)$(Q)TPG300_1:B2:MEAS1:SIM")
352 {
353  field(SCAN, "Passive")
354  field(DTYP, "Soft Channel")
355  field(VAL, "12")
356 }
357 record(longin, "$(P)$(Q)TPG300_1:B2:MEAS1EXP:SIM")
358 {
359  field(SCAN, "Passive")
360  field(DTYP, "Soft Channel")
361  field(VAL, "65532")
362 }
363 record(longin, "$(P)$(Q)TPG300_1:B2:MEAS2:SIM")
364 {
365  field(SCAN, "Passive")
366  field(DTYP, "Soft Channel")
367  field(VAL, "12")
368 }
369 record(longin, "$(P)$(Q)TPG300_1:B2:MEAS2EXP:SIM")
370 {
371  field(SCAN, "Passive")
372  field(DTYP, "Soft Channel")
373  field(VAL, "65532")
374 }
375 
376 ## read exponent, mantissa, exponent and check exponent still same
377 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
378 
379 record(longin, "$(P)$(Q)TPG300_2:A1:MEAS1EXP")
380 {
381  field(DTYP, "asynInt32")
382  field(SCAN, "10 second")
383  field(INP, "@asyn($(PORT=PLC), 109, 5.0) FINS_DM_READ")
384  field(FLNK, "$(P)$(Q)TPG300_2:A1:MEAS1")
385  field(SIML, "$(P)$(Q)SIM")
386  field(SIOL, "$(P)$(Q)TPG300_2:A1:MEAS1EXP:SIM")
387 }
388 
389 ## number in range 10 to 99 corresponding to 1.0 to 9.9
390 record(longin, "$(P)$(Q)TPG300_2:A1:MEAS1")
391 {
392  field(DTYP, "asynInt32")
393  field(INP, "@asyn($(PORT=PLC), 108, 5.0) FINS_DM_READ")
394  field(FLNK, "$(P)$(Q)TPG300_2:A1:MEAS2EXP")
395  field(SIML, "$(P)$(Q)SIM")
396  field(SIOL, "$(P)$(Q)TPG300_2:A1:MEAS1:SIM")
397 }
398 
399 record(longin, "$(P)$(Q)TPG300_2:A1:MEAS2EXP")
400 {
401  field(DTYP, "asynInt32")
402  field(INP, "@asyn($(PORT=PLC), 109, 5.0) FINS_DM_READ")
403  field(FLNK, "$(P)$(Q)TPG300_2:A1CHECK")
404  field(SIML, "$(P)$(Q)SIM")
405  field(SIOL, "$(P)$(Q)TPG300_2:A1:MEAS2EXP:SIM")
406 }
407 
408 ## if exponents haven't changed, counter did not rollover
409 ## during reads so value should be OK
410 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
411 record(calcout, "$(P)$(Q)TPG300_2:A1CHECK")
412 {
413  field(DESC, "Check Field")
414  field(INPA, "$(P)$(Q)TPG300_2:A1:MEAS1EXP")
415  field(INPB, "$(P)$(Q)TPG300_2:A1:MEAS1")
416  field(INPC, "$(P)$(Q)TPG300_2:A1:MEAS2EXP")
417  field(EGU, "mbar")
418  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
419  field(DOPT, "Use CALC")
420  field(OOPT, "When Non-zero")
421  field(OUT,"$(P)$(Q)TPG300_2:A1 PP")
422 }
423 
424 record(ai, "$(P)$(Q)TPG300_2:A1")
425 {
426  field(DESC, "Pressure")
427  field(EGU, "mbar")
428  field(PREC, 3)
429  info(INTEREST, "HIGH")
430  info(archive, "VAL")
431  alias("$(P)$(Q)SEC_4:PRESS")
432 }
433 
434 ### SIMULATION RECORDS ###
435 
436 
437 record(longin, "$(P)$(Q)TPG300_2:A1:MEAS1:SIM")
438 {
439  field(SCAN, "Passive")
440  field(DTYP, "Soft Channel")
441  field(VAL, "12")
442 }
443 record(longin, "$(P)$(Q)TPG300_2:A1:MEAS1EXP:SIM")
444 {
445  field(SCAN, "Passive")
446  field(DTYP, "Soft Channel")
447  field(VAL, "65532")
448 }
449 record(longin, "$(P)$(Q)TPG300_2:A1:MEAS2:SIM")
450 {
451  field(SCAN, "Passive")
452  field(DTYP, "Soft Channel")
453  field(VAL, "12")
454 }
455 record(longin, "$(P)$(Q)TPG300_2:A1:MEAS2EXP:SIM")
456 {
457  field(SCAN, "Passive")
458  field(DTYP, "Soft Channel")
459  field(VAL, "65532")
460 }
461 
462 ## read exponent, mantissa, exponent and check exponent still same
463 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
464 
465 record(longin, "$(P)$(Q)TPG300_2:A2:MEAS1EXP")
466 {
467  field(DTYP, "asynInt32")
468  field(SCAN, "10 second")
469  field(INP, "@asyn($(PORT=PLC), 111, 5.0) FINS_DM_READ")
470  field(FLNK, "$(P)$(Q)TPG300_2:A2:MEAS1")
471  field(SIML, "$(P)$(Q)SIM")
472  field(SIOL, "$(P)$(Q)TPG300_2:A2:MEAS1EXP:SIM")
473 }
474 
475 ## number in range 10 to 99 corresponding to 1.0 to 9.9
476 record(longin, "$(P)$(Q)TPG300_2:A2:MEAS1")
477 {
478  field(DTYP, "asynInt32")
479  field(INP, "@asyn($(PORT=PLC), 110, 5.0) FINS_DM_READ")
480  field(FLNK, "$(P)$(Q)TPG300_2:A2:MEAS2EXP")
481  field(SIML, "$(P)$(Q)SIM")
482  field(SIOL, "$(P)$(Q)TPG300_2:A2:MEAS1:SIM")
483 }
484 
485 record(longin, "$(P)$(Q)TPG300_2:A2:MEAS2EXP")
486 {
487  field(DTYP, "asynInt32")
488  field(INP, "@asyn($(PORT=PLC), 111, 5.0) FINS_DM_READ")
489  field(FLNK, "$(P)$(Q)TPG300_2:A2CHECK")
490  field(SIML, "$(P)$(Q)SIM")
491  field(SIOL, "$(P)$(Q)TPG300_2:A2:MEAS2EXP:SIM")
492 }
493 
494 ## if exponents haven't changed, counter did not rollover
495 ## during reads so value should be OK
496 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
497 record(calcout, "$(P)$(Q)TPG300_2:A2CHECK")
498 {
499  field(DESC, "Check Field")
500  field(INPA, "$(P)$(Q)TPG300_2:A2:MEAS1EXP")
501  field(INPB, "$(P)$(Q)TPG300_2:A2:MEAS1")
502  field(INPC, "$(P)$(Q)TPG300_2:A2:MEAS2EXP")
503  field(EGU, "mbar")
504  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
505  field(DOPT, "Use CALC")
506  field(OOPT, "When Non-zero")
507  field(OUT,"$(P)$(Q)TPG300_2:A2 PP")
508 }
509 
510 record(ai, "$(P)$(Q)TPG300_2:A2")
511 {
512  field(DESC, "Pressure")
513  field(EGU, "mbar")
514  field(PREC, 3)
515  info(INTEREST, "HIGH")
516  info(archive, "VAL")
517  alias("$(P)$(Q)SEC_5:PRESS")
518 }
519 
520 ### SIMULATION RECORDS ###
521 
522 
523 record(longin, "$(P)$(Q)TPG300_2:A2:MEAS1:SIM")
524 {
525  field(SCAN, "Passive")
526  field(DTYP, "Soft Channel")
527  field(VAL, "12")
528 }
529 record(longin, "$(P)$(Q)TPG300_2:A2:MEAS1EXP:SIM")
530 {
531  field(SCAN, "Passive")
532  field(DTYP, "Soft Channel")
533  field(VAL, "65532")
534 }
535 record(longin, "$(P)$(Q)TPG300_2:A2:MEAS2:SIM")
536 {
537  field(SCAN, "Passive")
538  field(DTYP, "Soft Channel")
539  field(VAL, "12")
540 }
541 record(longin, "$(P)$(Q)TPG300_2:A2:MEAS2EXP:SIM")
542 {
543  field(SCAN, "Passive")
544  field(DTYP, "Soft Channel")
545  field(VAL, "65532")
546 }
547 
548 ## read exponent, mantissa, exponent and check exponent still same
549 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
550 
551 record(longin, "$(P)$(Q)TPG300_2:B1:MEAS1EXP")
552 {
553  field(DTYP, "asynInt32")
554  field(SCAN, "10 second")
555  field(INP, "@asyn($(PORT=PLC), 113, 5.0) FINS_DM_READ")
556  field(FLNK, "$(P)$(Q)TPG300_2:B1:MEAS1")
557  field(SIML, "$(P)$(Q)SIM")
558  field(SIOL, "$(P)$(Q)TPG300_2:B1:MEAS1EXP:SIM")
559 }
560 
561 ## number in range 10 to 99 corresponding to 1.0 to 9.9
562 record(longin, "$(P)$(Q)TPG300_2:B1:MEAS1")
563 {
564  field(DTYP, "asynInt32")
565  field(INP, "@asyn($(PORT=PLC), 112, 5.0) FINS_DM_READ")
566  field(FLNK, "$(P)$(Q)TPG300_2:B1:MEAS2EXP")
567  field(SIML, "$(P)$(Q)SIM")
568  field(SIOL, "$(P)$(Q)TPG300_2:B1:MEAS1:SIM")
569 }
570 
571 record(longin, "$(P)$(Q)TPG300_2:B1:MEAS2EXP")
572 {
573  field(DTYP, "asynInt32")
574  field(INP, "@asyn($(PORT=PLC), 113, 5.0) FINS_DM_READ")
575  field(FLNK, "$(P)$(Q)TPG300_2:B1CHECK")
576  field(SIML, "$(P)$(Q)SIM")
577  field(SIOL, "$(P)$(Q)TPG300_2:B1:MEAS2EXP:SIM")
578 }
579 
580 ## if exponents haven't changed, counter did not rollover
581 ## during reads so value should be OK
582 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
583 record(calcout, "$(P)$(Q)TPG300_2:B1CHECK")
584 {
585  field(DESC, "Check Field")
586  field(INPA, "$(P)$(Q)TPG300_2:B1:MEAS1EXP")
587  field(INPB, "$(P)$(Q)TPG300_2:B1:MEAS1")
588  field(INPC, "$(P)$(Q)TPG300_2:B1:MEAS2EXP")
589  field(EGU, "mbar")
590  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
591  field(DOPT, "Use CALC")
592  field(OOPT, "When Non-zero")
593  field(OUT,"$(P)$(Q)TPG300_2:B1 PP")
594 }
595 
596 record(ai, "$(P)$(Q)TPG300_2:B1")
597 {
598  field(DESC, "Pressure")
599  field(EGU, "mbar")
600  field(PREC, 3)
601  info(INTEREST, "HIGH")
602  info(archive, "VAL")
603  alias("$(P)$(Q)SEC_6:PRESS")
604 }
605 
606 ### SIMULATION RECORDS ###
607 
608 
609 record(longin, "$(P)$(Q)TPG300_2:B1:MEAS1:SIM")
610 {
611  field(SCAN, "Passive")
612  field(DTYP, "Soft Channel")
613  field(VAL, "12")
614 }
615 record(longin, "$(P)$(Q)TPG300_2:B1:MEAS1EXP:SIM")
616 {
617  field(SCAN, "Passive")
618  field(DTYP, "Soft Channel")
619  field(VAL, "65532")
620 }
621 record(longin, "$(P)$(Q)TPG300_2:B1:MEAS2:SIM")
622 {
623  field(SCAN, "Passive")
624  field(DTYP, "Soft Channel")
625  field(VAL, "12")
626 }
627 record(longin, "$(P)$(Q)TPG300_2:B1:MEAS2EXP:SIM")
628 {
629  field(SCAN, "Passive")
630  field(DTYP, "Soft Channel")
631  field(VAL, "65532")
632 }
633 
634 ## read exponent, mantissa, exponent and check exponent still same
635 ## if not, we had a rollover from e.g. 9e4 to 1e5 during read and may be inconsistent
636 
637 record(longin, "$(P)$(Q)TPG300_2:B2:MEAS1EXP")
638 {
639  field(DTYP, "asynInt32")
640  field(SCAN, "10 second")
641  field(INP, "@asyn($(PORT=PLC), 115, 5.0) FINS_DM_READ")
642  field(FLNK, "$(P)$(Q)TPG300_2:B2:MEAS1")
643  field(SIML, "$(P)$(Q)SIM")
644  field(SIOL, "$(P)$(Q)TPG300_2:B2:MEAS1EXP:SIM")
645 }
646 
647 ## number in range 10 to 99 corresponding to 1.0 to 9.9
648 record(longin, "$(P)$(Q)TPG300_2:B2:MEAS1")
649 {
650  field(DTYP, "asynInt32")
651  field(INP, "@asyn($(PORT=PLC), 114, 5.0) FINS_DM_READ")
652  field(FLNK, "$(P)$(Q)TPG300_2:B2:MEAS2EXP")
653  field(SIML, "$(P)$(Q)SIM")
654  field(SIOL, "$(P)$(Q)TPG300_2:B2:MEAS1:SIM")
655 }
656 
657 record(longin, "$(P)$(Q)TPG300_2:B2:MEAS2EXP")
658 {
659  field(DTYP, "asynInt32")
660  field(INP, "@asyn($(PORT=PLC), 115, 5.0) FINS_DM_READ")
661  field(FLNK, "$(P)$(Q)TPG300_2:B2CHECK")
662  field(SIML, "$(P)$(Q)SIM")
663  field(SIOL, "$(P)$(Q)TPG300_2:B2:MEAS2EXP:SIM")
664 }
665 
666 ## if exponents haven't changed, counter did not rollover
667 ## during reads so value should be OK
668 ## (A-(A>32767?65536:0)) is to convert between signed and two's complement
669 record(calcout, "$(P)$(Q)TPG300_2:B2CHECK")
670 {
671  field(DESC, "Check Field")
672  field(INPA, "$(P)$(Q)TPG300_2:B2:MEAS1EXP")
673  field(INPB, "$(P)$(Q)TPG300_2:B2:MEAS1")
674  field(INPC, "$(P)$(Q)TPG300_2:B2:MEAS2EXP")
675  field(EGU, "mbar")
676  field(CALC, "(A=C)?(B/10*10^(A-(A>32767?65536:0))):0")
677  field(DOPT, "Use CALC")
678  field(OOPT, "When Non-zero")
679  field(OUT,"$(P)$(Q)TPG300_2:B2 PP")
680 }
681 
682 record(ai, "$(P)$(Q)TPG300_2:B2")
683 {
684  field(DESC, "Pressure")
685  field(EGU, "mbar")
686  field(PREC, 3)
687  info(INTEREST, "HIGH")
688  info(archive, "VAL")
689  alias("$(P)$(Q)SPARE_2")
690 }
691 
692 ### SIMULATION RECORDS ###
693 
694 
695 record(longin, "$(P)$(Q)TPG300_2:B2:MEAS1:SIM")
696 {
697  field(SCAN, "Passive")
698  field(DTYP, "Soft Channel")
699  field(VAL, "12")
700 }
701 record(longin, "$(P)$(Q)TPG300_2:B2:MEAS1EXP:SIM")
702 {
703  field(SCAN, "Passive")
704  field(DTYP, "Soft Channel")
705  field(VAL, "65532")
706 }
707 record(longin, "$(P)$(Q)TPG300_2:B2:MEAS2:SIM")
708 {
709  field(SCAN, "Passive")
710  field(DTYP, "Soft Channel")
711  field(VAL, "12")
712 }
713 record(longin, "$(P)$(Q)TPG300_2:B2:MEAS2EXP:SIM")
714 {
715  field(SCAN, "Passive")
716  field(DTYP, "Soft Channel")
717  field(VAL, "65532")
718 }
719 
alias
alias("$(P)$(Q)MOVE:SP:RBV","$(P)$(Q)MOVE")
Definition: larmor-air-header.template:72
record
record(longin,"$(P)$(Q)$(NAME):RAW")
Definition: address-read.template:2
Copyright © 2013 Science and Technology Facilities Council | Generated by   doxygen 1.8.5