ISIS Logo
INSTETC
INSTETC IOC
inst_string_parameters.db
Go to the documentation of this file.
1 record(waveform, "$(P)PARS:SAMPLE:NAME")
2 {
3  field(DESC, "Sample Name")
4  field(NELM, "256")
5  field(FTVL, "CHAR")
6  field(DTYP, "Soft Channel")
7  field(FLNK, "$(P)PARS:SAMPLE:NAME:SEND")
8  field(EGU, "")
9  info(autosaveFields, "VAL")
10  info(PVCATEGORY, "SAMPLEPAR")
11 }
12 alias("$(P)PARS:SAMPLE:NAME", "$(P)PARS:SAMPLE:NAME:SP")
13 
14 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
15 # we use this rather than PINI in above as DAE may not be running when we start this ioc
16 record(bo, "$(P)PARS:SAMPLE:NAME:_SP_UPDATE")
17 {
18  field(SCAN, "10 second")
19  field(FLNK, "$(P)PARS:SAMPLE:NAME:SP.PROC")
20 }
21 
22 ## Send value to ICP.
23 ## Sample Name must match the parameter name as used within the ISISICP
24 ## NELM above and NOD below must match
25 ## NOVA below must match with output DAE waveform (see substitutions)
26 record(aSub, "$(P)PARS:SAMPLE:NAME:SEND")
27 {
28  field(DESC, "Send Sample Name to ICP")
29  field(SNAM, "stringConcatWithCtrlB")
30  field(FTA, "STRING")
31  field(INPA, "$(P)PARS:SAMPLE:NAME:SP.DESC NPP NMS")
32  field(FTB, "STRING")
33  field(INPB, "$(P)PARS:SAMPLE:NAME:SP.FTVL NPP NMS")
34  field(FTC, "STRING")
35  field(INPC, "$(P)PARS:SAMPLE:NAME:SP.EGU NPP NMS")
36  field(FTD, "CHAR")
37  field(NOD, "256")
38  field(INPD, "$(P)PARS:SAMPLE:NAME:SP.VAL NPP NMS")
39  field(FTVA, "CHAR")
40  field(NOVA, "512")
41  field(OUTA, "$(P)PARS:SAMPLE:NAME:_SENDV")
42  field(FLNK, "$(P)PARS:SAMPLE:NAME:_SENDPV")
43 }
44 
45 record(waveform, "$(P)PARS:SAMPLE:NAME:_SENDV")
46 {
47  field(FTVL, "CHAR")
48  field(NELM, "512")
49 }
50 
51 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
52 record(waveform, "$(P)PARS:SAMPLE:NAME:_SENDPV")
53 {
54  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
55  field(FTVL, "CHAR")
56  field(NELM, "128")
57  field(FLNK, "$(P)PARS:SAMPLE:NAME:_SENDQ")
58 }
59 
60 record(aSub, "$(P)PARS:SAMPLE:NAME:_SENDQ")
61 {
62  field(SNAM, "queuedPVSet")
63  field(INPA, "$(P)PARS:SAMPLE:NAME:_SENDPV NPP")
64  field(FTA, "CHAR")
65  field(NOA, "128")
66  field(INPB, "$(P)PARS:SAMPLE:NAME:_SENDV NPP")
67  field(FTB, "CHAR")
68  field(NOB, "512")
69  field(INPC, "5")
70  field(FTC, "DOUBLE")
71  field(NOC, "1")
72 }
73 record(waveform, "$(P)PARS:SAMPLE:TYPE")
74 {
75  field(DESC, "Sample Type")
76  field(NELM, "256")
77  field(FTVL, "CHAR")
78  field(DTYP, "Soft Channel")
79  field(FLNK, "$(P)PARS:SAMPLE:TYPE:SEND")
80  field(EGU, "")
81  info(autosaveFields, "VAL")
82  info(PVCATEGORY, "SAMPLEPAR")
83 }
84 alias("$(P)PARS:SAMPLE:TYPE", "$(P)PARS:SAMPLE:TYPE:SP")
85 
86 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
87 # we use this rather than PINI in above as DAE may not be running when we start this ioc
88 record(bo, "$(P)PARS:SAMPLE:TYPE:_SP_UPDATE")
89 {
90  field(SCAN, "10 second")
91  field(FLNK, "$(P)PARS:SAMPLE:TYPE:SP.PROC")
92 }
93 
94 ## Send value to ICP.
95 ## Sample Type must match the parameter name as used within the ISISICP
96 ## NELM above and NOD below must match
97 ## NOVA below must match with output DAE waveform (see substitutions)
98 record(aSub, "$(P)PARS:SAMPLE:TYPE:SEND")
99 {
100  field(DESC, "Send Sample Type to ICP")
101  field(SNAM, "stringConcatWithCtrlB")
102  field(FTA, "STRING")
103  field(INPA, "$(P)PARS:SAMPLE:TYPE:SP.DESC NPP NMS")
104  field(FTB, "STRING")
105  field(INPB, "$(P)PARS:SAMPLE:TYPE:SP.FTVL NPP NMS")
106  field(FTC, "STRING")
107  field(INPC, "$(P)PARS:SAMPLE:TYPE:SP.EGU NPP NMS")
108  field(FTD, "CHAR")
109  field(NOD, "256")
110  field(INPD, "$(P)PARS:SAMPLE:TYPE:SP.VAL NPP NMS")
111  field(FTVA, "CHAR")
112  field(NOVA, "512")
113  field(OUTA, "$(P)PARS:SAMPLE:TYPE:_SENDV")
114  field(FLNK, "$(P)PARS:SAMPLE:TYPE:_SENDPV")
115 }
116 
117 record(waveform, "$(P)PARS:SAMPLE:TYPE:_SENDV")
118 {
119  field(FTVL, "CHAR")
120  field(NELM, "512")
121 }
122 
123 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
124 record(waveform, "$(P)PARS:SAMPLE:TYPE:_SENDPV")
125 {
126  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
127  field(FTVL, "CHAR")
128  field(NELM, "128")
129  field(FLNK, "$(P)PARS:SAMPLE:TYPE:_SENDQ")
130 }
131 
132 record(aSub, "$(P)PARS:SAMPLE:TYPE:_SENDQ")
133 {
134  field(SNAM, "queuedPVSet")
135  field(INPA, "$(P)PARS:SAMPLE:TYPE:_SENDPV NPP")
136  field(FTA, "CHAR")
137  field(NOA, "128")
138  field(INPB, "$(P)PARS:SAMPLE:TYPE:_SENDV NPP")
139  field(FTB, "CHAR")
140  field(NOB, "512")
141  field(INPC, "5")
142  field(FTC, "DOUBLE")
143  field(NOC, "1")
144 }
145 record(waveform, "$(P)PARS:SAMPLE:GEOMETRY")
146 {
147  field(DESC, "Sample Geometry")
148  field(NELM, "256")
149  field(FTVL, "CHAR")
150  field(DTYP, "Soft Channel")
151  field(FLNK, "$(P)PARS:SAMPLE:GEOMETRY:SEND")
152  field(EGU, "")
153  info(autosaveFields, "VAL")
154  info(PVCATEGORY, "SAMPLEPAR")
155 }
156 alias("$(P)PARS:SAMPLE:GEOMETRY", "$(P)PARS:SAMPLE:GEOMETRY:SP")
157 
158 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
159 # we use this rather than PINI in above as DAE may not be running when we start this ioc
160 record(bo, "$(P)PARS:SAMPLE:GEOMETRY:_SP_UPDATE")
161 {
162  field(SCAN, "10 second")
163  field(FLNK, "$(P)PARS:SAMPLE:GEOMETRY:SP.PROC")
164 }
165 
166 ## Send value to ICP.
167 ## Sample Geometry must match the parameter name as used within the ISISICP
168 ## NELM above and NOD below must match
169 ## NOVA below must match with output DAE waveform (see substitutions)
170 record(aSub, "$(P)PARS:SAMPLE:GEOMETRY:SEND")
171 {
172  field(DESC, "Send Sample Geometry to ICP")
173  field(SNAM, "stringConcatWithCtrlB")
174  field(FTA, "STRING")
175  field(INPA, "$(P)PARS:SAMPLE:GEOMETRY:SP.DESC NPP NMS")
176  field(FTB, "STRING")
177  field(INPB, "$(P)PARS:SAMPLE:GEOMETRY:SP.FTVL NPP NMS")
178  field(FTC, "STRING")
179  field(INPC, "$(P)PARS:SAMPLE:GEOMETRY:SP.EGU NPP NMS")
180  field(FTD, "CHAR")
181  field(NOD, "256")
182  field(INPD, "$(P)PARS:SAMPLE:GEOMETRY:SP.VAL NPP NMS")
183  field(FTVA, "CHAR")
184  field(NOVA, "512")
185  field(OUTA, "$(P)PARS:SAMPLE:GEOMETRY:_SENDV")
186  field(FLNK, "$(P)PARS:SAMPLE:GEOMETRY:_SENDPV")
187 }
188 
189 record(waveform, "$(P)PARS:SAMPLE:GEOMETRY:_SENDV")
190 {
191  field(FTVL, "CHAR")
192  field(NELM, "512")
193 }
194 
195 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
196 record(waveform, "$(P)PARS:SAMPLE:GEOMETRY:_SENDPV")
197 {
198  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
199  field(FTVL, "CHAR")
200  field(NELM, "128")
201  field(FLNK, "$(P)PARS:SAMPLE:GEOMETRY:_SENDQ")
202 }
203 
204 record(aSub, "$(P)PARS:SAMPLE:GEOMETRY:_SENDQ")
205 {
206  field(SNAM, "queuedPVSet")
207  field(INPA, "$(P)PARS:SAMPLE:GEOMETRY:_SENDPV NPP")
208  field(FTA, "CHAR")
209  field(NOA, "128")
210  field(INPB, "$(P)PARS:SAMPLE:GEOMETRY:_SENDV NPP")
211  field(FTB, "CHAR")
212  field(NOB, "512")
213  field(INPC, "5")
214  field(FTC, "DOUBLE")
215  field(NOC, "1")
216 }
217 record(waveform, "$(P)PARS:SAMPLE:SCRIPT:NAME")
218 {
219  field(DESC, "Script Name")
220  field(NELM, "256")
221  field(FTVL, "CHAR")
222  field(DTYP, "Soft Channel")
223  field(FLNK, "$(P)PARS:SAMPLE:SCRIPT:NAME:SEND")
224  field(EGU, "")
225  info(autosaveFields, "VAL")
226  info(PVCATEGORY, "SAMPLEPAR")
227 }
228 alias("$(P)PARS:SAMPLE:SCRIPT:NAME", "$(P)PARS:SAMPLE:SCRIPT:NAME:SP")
229 
230 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
231 # we use this rather than PINI in above as DAE may not be running when we start this ioc
232 record(bo, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SP_UPDATE")
233 {
234  field(SCAN, "10 second")
235  field(FLNK, "$(P)PARS:SAMPLE:SCRIPT:NAME:SP.PROC")
236 }
237 
238 ## Send value to ICP.
239 ## Script Name must match the parameter name as used within the ISISICP
240 ## NELM above and NOD below must match
241 ## NOVA below must match with output DAE waveform (see substitutions)
242 record(aSub, "$(P)PARS:SAMPLE:SCRIPT:NAME:SEND")
243 {
244  field(DESC, "Send Script Name to ICP")
245  field(SNAM, "stringConcatWithCtrlB")
246  field(FTA, "STRING")
247  field(INPA, "$(P)PARS:SAMPLE:SCRIPT:NAME:SP.DESC NPP NMS")
248  field(FTB, "STRING")
249  field(INPB, "$(P)PARS:SAMPLE:SCRIPT:NAME:SP.FTVL NPP NMS")
250  field(FTC, "STRING")
251  field(INPC, "$(P)PARS:SAMPLE:SCRIPT:NAME:SP.EGU NPP NMS")
252  field(FTD, "CHAR")
253  field(NOD, "256")
254  field(INPD, "$(P)PARS:SAMPLE:SCRIPT:NAME:SP.VAL NPP NMS")
255  field(FTVA, "CHAR")
256  field(NOVA, "512")
257  field(OUTA, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDV")
258  field(FLNK, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDPV")
259 }
260 
261 record(waveform, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDV")
262 {
263  field(FTVL, "CHAR")
264  field(NELM, "512")
265 }
266 
267 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
268 record(waveform, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDPV")
269 {
270  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
271  field(FTVL, "CHAR")
272  field(NELM, "128")
273  field(FLNK, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDQ")
274 }
275 
276 record(aSub, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDQ")
277 {
278  field(SNAM, "queuedPVSet")
279  field(INPA, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDPV NPP")
280  field(FTA, "CHAR")
281  field(NOA, "128")
282  field(INPB, "$(P)PARS:SAMPLE:SCRIPT:NAME:_SENDV NPP")
283  field(FTB, "CHAR")
284  field(NOB, "512")
285  field(INPC, "5")
286  field(FTC, "DOUBLE")
287  field(NOC, "1")
288 }
289 record(waveform, "$(P)PARS:SAMPLE:ID")
290 {
291  field(DESC, "Sample ID")
292  field(NELM, "256")
293  field(FTVL, "CHAR")
294  field(DTYP, "Soft Channel")
295  field(FLNK, "$(P)PARS:SAMPLE:ID:SEND")
296  field(EGU, "")
297  info(autosaveFields, "VAL")
298  info(PVCATEGORY, "SAMPLEPAR")
299 }
300 alias("$(P)PARS:SAMPLE:ID", "$(P)PARS:SAMPLE:ID:SP")
301 
302 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
303 # we use this rather than PINI in above as DAE may not be running when we start this ioc
304 record(bo, "$(P)PARS:SAMPLE:ID:_SP_UPDATE")
305 {
306  field(SCAN, "10 second")
307  field(FLNK, "$(P)PARS:SAMPLE:ID:SP.PROC")
308 }
309 
310 ## Send value to ICP.
311 ## Sample ID must match the parameter name as used within the ISISICP
312 ## NELM above and NOD below must match
313 ## NOVA below must match with output DAE waveform (see substitutions)
314 record(aSub, "$(P)PARS:SAMPLE:ID:SEND")
315 {
316  field(DESC, "Send Sample ID to ICP")
317  field(SNAM, "stringConcatWithCtrlB")
318  field(FTA, "STRING")
319  field(INPA, "$(P)PARS:SAMPLE:ID:SP.DESC NPP NMS")
320  field(FTB, "STRING")
321  field(INPB, "$(P)PARS:SAMPLE:ID:SP.FTVL NPP NMS")
322  field(FTC, "STRING")
323  field(INPC, "$(P)PARS:SAMPLE:ID:SP.EGU NPP NMS")
324  field(FTD, "CHAR")
325  field(NOD, "256")
326  field(INPD, "$(P)PARS:SAMPLE:ID:SP.VAL NPP NMS")
327  field(FTVA, "CHAR")
328  field(NOVA, "512")
329  field(OUTA, "$(P)PARS:SAMPLE:ID:_SENDV")
330  field(FLNK, "$(P)PARS:SAMPLE:ID:_SENDPV")
331 }
332 
333 record(waveform, "$(P)PARS:SAMPLE:ID:_SENDV")
334 {
335  field(FTVL, "CHAR")
336  field(NELM, "512")
337 }
338 
339 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
340 record(waveform, "$(P)PARS:SAMPLE:ID:_SENDPV")
341 {
342  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
343  field(FTVL, "CHAR")
344  field(NELM, "128")
345  field(FLNK, "$(P)PARS:SAMPLE:ID:_SENDQ")
346 }
347 
348 record(aSub, "$(P)PARS:SAMPLE:ID:_SENDQ")
349 {
350  field(SNAM, "queuedPVSet")
351  field(INPA, "$(P)PARS:SAMPLE:ID:_SENDPV NPP")
352  field(FTA, "CHAR")
353  field(NOA, "128")
354  field(INPB, "$(P)PARS:SAMPLE:ID:_SENDV NPP")
355  field(FTB, "CHAR")
356  field(NOB, "512")
357  field(INPC, "5")
358  field(FTC, "DOUBLE")
359  field(NOC, "1")
360 }
361 record(waveform, "$(P)PARS:SAMPLE:MEAS:ID")
362 {
363  field(DESC, "Measurement ID")
364  field(NELM, "256")
365  field(FTVL, "CHAR")
366  field(DTYP, "Soft Channel")
367  field(FLNK, "$(P)PARS:SAMPLE:MEAS:ID:SEND")
368  field(EGU, "")
369  info(autosaveFields, "VAL")
370  info(PVCATEGORY, "SAMPLEPAR")
371 }
372 alias("$(P)PARS:SAMPLE:MEAS:ID", "$(P)PARS:SAMPLE:MEAS:ID:SP")
373 
374 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
375 # we use this rather than PINI in above as DAE may not be running when we start this ioc
376 record(bo, "$(P)PARS:SAMPLE:MEAS:ID:_SP_UPDATE")
377 {
378  field(SCAN, "10 second")
379  field(FLNK, "$(P)PARS:SAMPLE:MEAS:ID:SP.PROC")
380 }
381 
382 ## Send value to ICP.
383 ## Measurement ID must match the parameter name as used within the ISISICP
384 ## NELM above and NOD below must match
385 ## NOVA below must match with output DAE waveform (see substitutions)
386 record(aSub, "$(P)PARS:SAMPLE:MEAS:ID:SEND")
387 {
388  field(DESC, "Send Measurement ID to ICP")
389  field(SNAM, "stringConcatWithCtrlB")
390  field(FTA, "STRING")
391  field(INPA, "$(P)PARS:SAMPLE:MEAS:ID:SP.DESC NPP NMS")
392  field(FTB, "STRING")
393  field(INPB, "$(P)PARS:SAMPLE:MEAS:ID:SP.FTVL NPP NMS")
394  field(FTC, "STRING")
395  field(INPC, "$(P)PARS:SAMPLE:MEAS:ID:SP.EGU NPP NMS")
396  field(FTD, "CHAR")
397  field(NOD, "256")
398  field(INPD, "$(P)PARS:SAMPLE:MEAS:ID:SP.VAL NPP NMS")
399  field(FTVA, "CHAR")
400  field(NOVA, "512")
401  field(OUTA, "$(P)PARS:SAMPLE:MEAS:ID:_SENDV")
402  field(FLNK, "$(P)PARS:SAMPLE:MEAS:ID:_SENDPV")
403 }
404 
405 record(waveform, "$(P)PARS:SAMPLE:MEAS:ID:_SENDV")
406 {
407  field(FTVL, "CHAR")
408  field(NELM, "512")
409 }
410 
411 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
412 record(waveform, "$(P)PARS:SAMPLE:MEAS:ID:_SENDPV")
413 {
414  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
415  field(FTVL, "CHAR")
416  field(NELM, "128")
417  field(FLNK, "$(P)PARS:SAMPLE:MEAS:ID:_SENDQ")
418 }
419 
420 record(aSub, "$(P)PARS:SAMPLE:MEAS:ID:_SENDQ")
421 {
422  field(SNAM, "queuedPVSet")
423  field(INPA, "$(P)PARS:SAMPLE:MEAS:ID:_SENDPV NPP")
424  field(FTA, "CHAR")
425  field(NOA, "128")
426  field(INPB, "$(P)PARS:SAMPLE:MEAS:ID:_SENDV NPP")
427  field(FTB, "CHAR")
428  field(NOB, "512")
429  field(INPC, "5")
430  field(FTC, "DOUBLE")
431  field(NOC, "1")
432 }
433 record(waveform, "$(P)PARS:SAMPLE:MEAS:TYPE")
434 {
435  field(DESC, "Measurement Type")
436  field(NELM, "256")
437  field(FTVL, "CHAR")
438  field(DTYP, "Soft Channel")
439  field(FLNK, "$(P)PARS:SAMPLE:MEAS:TYPE:SEND")
440  field(EGU, "")
441  info(autosaveFields, "VAL")
442  info(PVCATEGORY, "SAMPLEPAR")
443 }
444 alias("$(P)PARS:SAMPLE:MEAS:TYPE", "$(P)PARS:SAMPLE:MEAS:TYPE:SP")
445 
446 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
447 # we use this rather than PINI in above as DAE may not be running when we start this ioc
448 record(bo, "$(P)PARS:SAMPLE:MEAS:TYPE:_SP_UPDATE")
449 {
450  field(SCAN, "10 second")
451  field(FLNK, "$(P)PARS:SAMPLE:MEAS:TYPE:SP.PROC")
452 }
453 
454 ## Send value to ICP.
455 ## Measurement Type must match the parameter name as used within the ISISICP
456 ## NELM above and NOD below must match
457 ## NOVA below must match with output DAE waveform (see substitutions)
458 record(aSub, "$(P)PARS:SAMPLE:MEAS:TYPE:SEND")
459 {
460  field(DESC, "Send Measurement Type to ICP")
461  field(SNAM, "stringConcatWithCtrlB")
462  field(FTA, "STRING")
463  field(INPA, "$(P)PARS:SAMPLE:MEAS:TYPE:SP.DESC NPP NMS")
464  field(FTB, "STRING")
465  field(INPB, "$(P)PARS:SAMPLE:MEAS:TYPE:SP.FTVL NPP NMS")
466  field(FTC, "STRING")
467  field(INPC, "$(P)PARS:SAMPLE:MEAS:TYPE:SP.EGU NPP NMS")
468  field(FTD, "CHAR")
469  field(NOD, "256")
470  field(INPD, "$(P)PARS:SAMPLE:MEAS:TYPE:SP.VAL NPP NMS")
471  field(FTVA, "CHAR")
472  field(NOVA, "512")
473  field(OUTA, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDV")
474  field(FLNK, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDPV")
475 }
476 
477 record(waveform, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDV")
478 {
479  field(FTVL, "CHAR")
480  field(NELM, "512")
481 }
482 
483 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
484 record(waveform, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDPV")
485 {
486  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
487  field(FTVL, "CHAR")
488  field(NELM, "128")
489  field(FLNK, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDQ")
490 }
491 
492 record(aSub, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDQ")
493 {
494  field(SNAM, "queuedPVSet")
495  field(INPA, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDPV NPP")
496  field(FTA, "CHAR")
497  field(NOA, "128")
498  field(INPB, "$(P)PARS:SAMPLE:MEAS:TYPE:_SENDV NPP")
499  field(FTB, "CHAR")
500  field(NOB, "512")
501  field(INPC, "5")
502  field(FTC, "DOUBLE")
503  field(NOC, "1")
504 }
505 record(waveform, "$(P)PARS:SAMPLE:MEAS:SUBID")
506 {
507  field(DESC, "Measurement SubID")
508  field(NELM, "256")
509  field(FTVL, "CHAR")
510  field(DTYP, "Soft Channel")
511  field(FLNK, "$(P)PARS:SAMPLE:MEAS:SUBID:SEND")
512  field(EGU, "")
513  info(autosaveFields, "VAL")
514  info(PVCATEGORY, "SAMPLEPAR")
515 }
516 alias("$(P)PARS:SAMPLE:MEAS:SUBID", "$(P)PARS:SAMPLE:MEAS:SUBID:SP")
517 
518 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
519 # we use this rather than PINI in above as DAE may not be running when we start this ioc
520 record(bo, "$(P)PARS:SAMPLE:MEAS:SUBID:_SP_UPDATE")
521 {
522  field(SCAN, "10 second")
523  field(FLNK, "$(P)PARS:SAMPLE:MEAS:SUBID:SP.PROC")
524 }
525 
526 ## Send value to ICP.
527 ## Measurement SubID must match the parameter name as used within the ISISICP
528 ## NELM above and NOD below must match
529 ## NOVA below must match with output DAE waveform (see substitutions)
530 record(aSub, "$(P)PARS:SAMPLE:MEAS:SUBID:SEND")
531 {
532  field(DESC, "Send Measurement SubID to ICP")
533  field(SNAM, "stringConcatWithCtrlB")
534  field(FTA, "STRING")
535  field(INPA, "$(P)PARS:SAMPLE:MEAS:SUBID:SP.DESC NPP NMS")
536  field(FTB, "STRING")
537  field(INPB, "$(P)PARS:SAMPLE:MEAS:SUBID:SP.FTVL NPP NMS")
538  field(FTC, "STRING")
539  field(INPC, "$(P)PARS:SAMPLE:MEAS:SUBID:SP.EGU NPP NMS")
540  field(FTD, "CHAR")
541  field(NOD, "256")
542  field(INPD, "$(P)PARS:SAMPLE:MEAS:SUBID:SP.VAL NPP NMS")
543  field(FTVA, "CHAR")
544  field(NOVA, "512")
545  field(OUTA, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDV")
546  field(FLNK, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDPV")
547 }
548 
549 record(waveform, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDV")
550 {
551  field(FTVL, "CHAR")
552  field(NELM, "512")
553 }
554 
555 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
556 record(waveform, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDPV")
557 {
558  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
559  field(FTVL, "CHAR")
560  field(NELM, "128")
561  field(FLNK, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDQ")
562 }
563 
564 record(aSub, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDQ")
565 {
566  field(SNAM, "queuedPVSet")
567  field(INPA, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDPV NPP")
568  field(FTA, "CHAR")
569  field(NOA, "128")
570  field(INPB, "$(P)PARS:SAMPLE:MEAS:SUBID:_SENDV NPP")
571  field(FTB, "CHAR")
572  field(NOB, "512")
573  field(INPC, "5")
574  field(FTC, "DOUBLE")
575  field(NOC, "1")
576 }
577 record(waveform, "$(P)PARS:SAMPLE:MEAS:LABEL")
578 {
579  field(DESC, "Measurement Label")
580  field(NELM, "256")
581  field(FTVL, "CHAR")
582  field(DTYP, "Soft Channel")
583  field(FLNK, "$(P)PARS:SAMPLE:MEAS:LABEL:SEND")
584  field(EGU, "")
585  info(autosaveFields, "VAL")
586  info(PVCATEGORY, "SAMPLEPAR")
587 }
588 alias("$(P)PARS:SAMPLE:MEAS:LABEL", "$(P)PARS:SAMPLE:MEAS:LABEL:SP")
589 
590 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
591 # we use this rather than PINI in above as DAE may not be running when we start this ioc
592 record(bo, "$(P)PARS:SAMPLE:MEAS:LABEL:_SP_UPDATE")
593 {
594  field(SCAN, "10 second")
595  field(FLNK, "$(P)PARS:SAMPLE:MEAS:LABEL:SP.PROC")
596 }
597 
598 ## Send value to ICP.
599 ## Measurement Label must match the parameter name as used within the ISISICP
600 ## NELM above and NOD below must match
601 ## NOVA below must match with output DAE waveform (see substitutions)
602 record(aSub, "$(P)PARS:SAMPLE:MEAS:LABEL:SEND")
603 {
604  field(DESC, "Send Measurement Label to ICP")
605  field(SNAM, "stringConcatWithCtrlB")
606  field(FTA, "STRING")
607  field(INPA, "$(P)PARS:SAMPLE:MEAS:LABEL:SP.DESC NPP NMS")
608  field(FTB, "STRING")
609  field(INPB, "$(P)PARS:SAMPLE:MEAS:LABEL:SP.FTVL NPP NMS")
610  field(FTC, "STRING")
611  field(INPC, "$(P)PARS:SAMPLE:MEAS:LABEL:SP.EGU NPP NMS")
612  field(FTD, "CHAR")
613  field(NOD, "256")
614  field(INPD, "$(P)PARS:SAMPLE:MEAS:LABEL:SP.VAL NPP NMS")
615  field(FTVA, "CHAR")
616  field(NOVA, "512")
617  field(OUTA, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDV")
618  field(FLNK, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDPV")
619 }
620 
621 record(waveform, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDV")
622 {
623  field(FTVL, "CHAR")
624  field(NELM, "512")
625 }
626 
627 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
628 record(waveform, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDPV")
629 {
630  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
631  field(FTVL, "CHAR")
632  field(NELM, "128")
633  field(FLNK, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDQ")
634 }
635 
636 record(aSub, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDQ")
637 {
638  field(SNAM, "queuedPVSet")
639  field(INPA, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDPV NPP")
640  field(FTA, "CHAR")
641  field(NOA, "128")
642  field(INPB, "$(P)PARS:SAMPLE:MEAS:LABEL:_SENDV NPP")
643  field(FTB, "CHAR")
644  field(NOB, "512")
645  field(INPC, "5")
646  field(FTC, "DOUBLE")
647  field(NOC, "1")
648 }
649 record(waveform, "$(P)PARS:BL:BEAMSTOP:POS")
650 {
651  field(DESC, "Beamstop Position")
652  field(NELM, "256")
653  field(FTVL, "CHAR")
654  field(DTYP, "Soft Channel")
655  field(FLNK, "$(P)PARS:BL:BEAMSTOP:POS:SEND")
656  field(EGU, "")
657  info(autosaveFields, "VAL")
658  info(PVCATEGORY, "BEAMLINEPAR")
659 }
660 alias("$(P)PARS:BL:BEAMSTOP:POS", "$(P)PARS:BL:BEAMSTOP:POS:SP")
661 
662 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
663 # we use this rather than PINI in above as DAE may not be running when we start this ioc
664 record(bo, "$(P)PARS:BL:BEAMSTOP:POS:_SP_UPDATE")
665 {
666  field(SCAN, "10 second")
667  field(FLNK, "$(P)PARS:BL:BEAMSTOP:POS:SP.PROC")
668 }
669 
670 ## Send value to ICP.
671 ## Beamstop Position must match the parameter name as used within the ISISICP
672 ## NELM above and NOD below must match
673 ## NOVA below must match with output DAE waveform (see substitutions)
674 record(aSub, "$(P)PARS:BL:BEAMSTOP:POS:SEND")
675 {
676  field(DESC, "Send Beamstop Position to ICP")
677  field(SNAM, "stringConcatWithCtrlB")
678  field(FTA, "STRING")
679  field(INPA, "$(P)PARS:BL:BEAMSTOP:POS:SP.DESC NPP NMS")
680  field(FTB, "STRING")
681  field(INPB, "$(P)PARS:BL:BEAMSTOP:POS:SP.FTVL NPP NMS")
682  field(FTC, "STRING")
683  field(INPC, "$(P)PARS:BL:BEAMSTOP:POS:SP.EGU NPP NMS")
684  field(FTD, "CHAR")
685  field(NOD, "256")
686  field(INPD, "$(P)PARS:BL:BEAMSTOP:POS:SP.VAL NPP NMS")
687  field(FTVA, "CHAR")
688  field(NOVA, "512")
689  field(OUTA, "$(P)PARS:BL:BEAMSTOP:POS:_SENDV")
690  field(FLNK, "$(P)PARS:BL:BEAMSTOP:POS:_SENDPV")
691 }
692 
693 record(waveform, "$(P)PARS:BL:BEAMSTOP:POS:_SENDV")
694 {
695  field(FTVL, "CHAR")
696  field(NELM, "512")
697 }
698 
699 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
700 record(waveform, "$(P)PARS:BL:BEAMSTOP:POS:_SENDPV")
701 {
702  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
703  field(FTVL, "CHAR")
704  field(NELM, "128")
705  field(FLNK, "$(P)PARS:BL:BEAMSTOP:POS:_SENDQ")
706 }
707 
708 record(aSub, "$(P)PARS:BL:BEAMSTOP:POS:_SENDQ")
709 {
710  field(SNAM, "queuedPVSet")
711  field(INPA, "$(P)PARS:BL:BEAMSTOP:POS:_SENDPV NPP")
712  field(FTA, "CHAR")
713  field(NOA, "128")
714  field(INPB, "$(P)PARS:BL:BEAMSTOP:POS:_SENDV NPP")
715  field(FTB, "CHAR")
716  field(NOB, "512")
717  field(INPC, "5")
718  field(FTC, "DOUBLE")
719  field(NOC, "1")
720 }
721 record(waveform, "$(P)PARS:BL:JOURNAL:BLOCKS")
722 {
723  field(DESC, "Journal Blocks")
724  field(NELM, "256")
725  field(FTVL, "CHAR")
726  field(DTYP, "Soft Channel")
727  field(FLNK, "$(P)PARS:BL:JOURNAL:BLOCKS:SEND")
728  field(EGU, "")
729  info(autosaveFields, "VAL")
730  info(PVCATEGORY, "BEAMLINEPAR")
731 }
732 alias("$(P)PARS:BL:JOURNAL:BLOCKS", "$(P)PARS:BL:JOURNAL:BLOCKS:SP")
733 
734 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
735 # we use this rather than PINI in above as DAE may not be running when we start this ioc
736 record(bo, "$(P)PARS:BL:JOURNAL:BLOCKS:_SP_UPDATE")
737 {
738  field(SCAN, "10 second")
739  field(FLNK, "$(P)PARS:BL:JOURNAL:BLOCKS:SP.PROC")
740 }
741 
742 ## Send value to ICP.
743 ## Journal Blocks must match the parameter name as used within the ISISICP
744 ## NELM above and NOD below must match
745 ## NOVA below must match with output DAE waveform (see substitutions)
746 record(aSub, "$(P)PARS:BL:JOURNAL:BLOCKS:SEND")
747 {
748  field(DESC, "Send Journal Blocks to ICP")
749  field(SNAM, "stringConcatWithCtrlB")
750  field(FTA, "STRING")
751  field(INPA, "$(P)PARS:BL:JOURNAL:BLOCKS:SP.DESC NPP NMS")
752  field(FTB, "STRING")
753  field(INPB, "$(P)PARS:BL:JOURNAL:BLOCKS:SP.FTVL NPP NMS")
754  field(FTC, "STRING")
755  field(INPC, "$(P)PARS:BL:JOURNAL:BLOCKS:SP.EGU NPP NMS")
756  field(FTD, "CHAR")
757  field(NOD, "256")
758  field(INPD, "$(P)PARS:BL:JOURNAL:BLOCKS:SP.VAL NPP NMS")
759  field(FTVA, "CHAR")
760  field(NOVA, "512")
761  field(OUTA, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDV")
762  field(FLNK, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDPV")
763 }
764 
765 record(waveform, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDV")
766 {
767  field(FTVL, "CHAR")
768  field(NELM, "512")
769 }
770 
771 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
772 record(waveform, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDPV")
773 {
774  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
775  field(FTVL, "CHAR")
776  field(NELM, "128")
777  field(FLNK, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDQ")
778 }
779 
780 record(aSub, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDQ")
781 {
782  field(SNAM, "queuedPVSet")
783  field(INPA, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDPV NPP")
784  field(FTA, "CHAR")
785  field(NOA, "128")
786  field(INPB, "$(P)PARS:BL:JOURNAL:BLOCKS:_SENDV NPP")
787  field(FTB, "CHAR")
788  field(NOB, "512")
789  field(INPC, "5")
790  field(FTC, "DOUBLE")
791  field(NOC, "1")
792 }
alias("$(P)ED:RBNUMBER","$(P)ED:RBNUMBER:SP:RBV")
record(stringin,"$(P)ED:RBNUMBER")
RB number.
Copyright © 2013 Science and Technology Facilities Council | Generated by   doxygen 1.8.5