ISIS Logo
INSTETC
INSTETC IOC
inst_real_parameters.db
Go to the documentation of this file.
1 record(ao, "$(P)PARS:SAMPLE:WIDTH")
2 {
3  field(DESC, "Sample Width")
4  field(DTYP, "Soft Channel")
5  field(FLNK, "$(P)PARS:SAMPLE:WIDTH:SEND")
6  field(EGU, "mm")
7  field(OMSL, "supervisory")
8  field(PREC, 3)
9  info(autosaveFields, "VAL")
10  info(PVCATEGORY, "SAMPLEPAR")
11 }
12 alias("$(P)PARS:SAMPLE:WIDTH", "$(P)PARS:SAMPLE:WIDTH: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:WIDTH:_SP_UPDATE")
17 {
18  field(SCAN, "10 second")
19  field(FLNK, "$(P)PARS:SAMPLE:WIDTH:SP.PROC")
20 }
21 
22 # aSub records must read from links, hence need to create a record
23 # to store data type string for above ao record
24 record(stringout, "$(P)PARS:SAMPLE:WIDTH:TYPE")
25 {
26  field(DESC, "Sample Width data type")
27  field(DTYP, "Soft Channel")
28  field(VAL, "DOUBLE")
29 }
30 
31 ## Send parameter to ICP.
32 ## Sample Width must match the parameter name as used within the ISISICP
33 ## NOVA below must match with output DAE waveform size (see substitutions)
34 record(aSub, "$(P)PARS:SAMPLE:WIDTH:SEND")
35 {
36  field(DESC, "Send Sample Width to ICP")
37  field(SNAM, "stringConcatWithCtrlB")
38  field(FTA, "STRING")
39  field(INPA, "$(P)PARS:SAMPLE:WIDTH:SP.DESC NPP NMS")
40  field(FTB, "STRING")
41  field(INPB, "$(P)PARS:SAMPLE:WIDTH:TYPE.VAL NPP NMS")
42  field(FTC, "STRING")
43  field(INPC, "$(P)PARS:SAMPLE:WIDTH:SP.EGU NPP NMS")
44  field(FTD, "DOUBLE")
45  field(NOD, "1")
46  field(INPD, "$(P)PARS:SAMPLE:WIDTH:SP.VAL NPP NMS")
47  field(FTVA, "CHAR")
48  field(NOVA, "512")
49  field(OUTA, "$(P)PARS:SAMPLE:WIDTH:_SENDV")
50  field(FLNK, "$(P)PARS:SAMPLE:WIDTH:_SENDPV")
51 }
52 
53 record(waveform, "$(P)PARS:SAMPLE:WIDTH:_SENDV")
54 {
55  field(FTVL, "CHAR")
56  field(NELM, "512")
57 }
58 
59 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
60 record(waveform, "$(P)PARS:SAMPLE:WIDTH:_SENDPV")
61 {
62  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
63  field(FTVL, "CHAR")
64  field(NELM, "128")
65  field(FLNK, "$(P)PARS:SAMPLE:WIDTH:_SENDQ")
66 }
67 
68 record(aSub, "$(P)PARS:SAMPLE:WIDTH:_SENDQ")
69 {
70  field(SNAM, "queuedPVSet")
71  field(INPA, "$(P)PARS:SAMPLE:WIDTH:_SENDPV NPP")
72  field(FTA, "CHAR")
73  field(NOA, "128")
74  field(INPB, "$(P)PARS:SAMPLE:WIDTH:_SENDV NPP")
75  field(FTB, "CHAR")
76  field(NOB, "512")
77  field(INPC, "5")
78  field(FTC, "DOUBLE")
79  field(NOC, "1")
80 }
81 record(ao, "$(P)PARS:SAMPLE:HEIGHT")
82 {
83  field(DESC, "Sample Height")
84  field(DTYP, "Soft Channel")
85  field(FLNK, "$(P)PARS:SAMPLE:HEIGHT:SEND")
86  field(EGU, "mm")
87  field(OMSL, "supervisory")
88  field(PREC, 3)
89  info(autosaveFields, "VAL")
90  info(PVCATEGORY, "SAMPLEPAR")
91 }
92 alias("$(P)PARS:SAMPLE:HEIGHT", "$(P)PARS:SAMPLE:HEIGHT:SP")
93 
94 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
95 # we use this rather than PINI in above as DAE may not be running when we start this ioc
96 record(bo, "$(P)PARS:SAMPLE:HEIGHT:_SP_UPDATE")
97 {
98  field(SCAN, "10 second")
99  field(FLNK, "$(P)PARS:SAMPLE:HEIGHT:SP.PROC")
100 }
101 
102 # aSub records must read from links, hence need to create a record
103 # to store data type string for above ao record
104 record(stringout, "$(P)PARS:SAMPLE:HEIGHT:TYPE")
105 {
106  field(DESC, "Sample Height data type")
107  field(DTYP, "Soft Channel")
108  field(VAL, "DOUBLE")
109 }
110 
111 ## Send parameter to ICP.
112 ## Sample Height must match the parameter name as used within the ISISICP
113 ## NOVA below must match with output DAE waveform size (see substitutions)
114 record(aSub, "$(P)PARS:SAMPLE:HEIGHT:SEND")
115 {
116  field(DESC, "Send Sample Height to ICP")
117  field(SNAM, "stringConcatWithCtrlB")
118  field(FTA, "STRING")
119  field(INPA, "$(P)PARS:SAMPLE:HEIGHT:SP.DESC NPP NMS")
120  field(FTB, "STRING")
121  field(INPB, "$(P)PARS:SAMPLE:HEIGHT:TYPE.VAL NPP NMS")
122  field(FTC, "STRING")
123  field(INPC, "$(P)PARS:SAMPLE:HEIGHT:SP.EGU NPP NMS")
124  field(FTD, "DOUBLE")
125  field(NOD, "1")
126  field(INPD, "$(P)PARS:SAMPLE:HEIGHT:SP.VAL NPP NMS")
127  field(FTVA, "CHAR")
128  field(NOVA, "512")
129  field(OUTA, "$(P)PARS:SAMPLE:HEIGHT:_SENDV")
130  field(FLNK, "$(P)PARS:SAMPLE:HEIGHT:_SENDPV")
131 }
132 
133 record(waveform, "$(P)PARS:SAMPLE:HEIGHT:_SENDV")
134 {
135  field(FTVL, "CHAR")
136  field(NELM, "512")
137 }
138 
139 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
140 record(waveform, "$(P)PARS:SAMPLE:HEIGHT:_SENDPV")
141 {
142  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
143  field(FTVL, "CHAR")
144  field(NELM, "128")
145  field(FLNK, "$(P)PARS:SAMPLE:HEIGHT:_SENDQ")
146 }
147 
148 record(aSub, "$(P)PARS:SAMPLE:HEIGHT:_SENDQ")
149 {
150  field(SNAM, "queuedPVSet")
151  field(INPA, "$(P)PARS:SAMPLE:HEIGHT:_SENDPV NPP")
152  field(FTA, "CHAR")
153  field(NOA, "128")
154  field(INPB, "$(P)PARS:SAMPLE:HEIGHT:_SENDV NPP")
155  field(FTB, "CHAR")
156  field(NOB, "512")
157  field(INPC, "5")
158  field(FTC, "DOUBLE")
159  field(NOC, "1")
160 }
161 record(ao, "$(P)PARS:SAMPLE:THICK")
162 {
163  field(DESC, "Sample Thickness")
164  field(DTYP, "Soft Channel")
165  field(FLNK, "$(P)PARS:SAMPLE:THICK:SEND")
166  field(EGU, "mm")
167  field(OMSL, "supervisory")
168  field(PREC, 3)
169  info(autosaveFields, "VAL")
170  info(PVCATEGORY, "SAMPLEPAR")
171 }
172 alias("$(P)PARS:SAMPLE:THICK", "$(P)PARS:SAMPLE:THICK:SP")
173 
174 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
175 # we use this rather than PINI in above as DAE may not be running when we start this ioc
176 record(bo, "$(P)PARS:SAMPLE:THICK:_SP_UPDATE")
177 {
178  field(SCAN, "10 second")
179  field(FLNK, "$(P)PARS:SAMPLE:THICK:SP.PROC")
180 }
181 
182 # aSub records must read from links, hence need to create a record
183 # to store data type string for above ao record
184 record(stringout, "$(P)PARS:SAMPLE:THICK:TYPE")
185 {
186  field(DESC, "Sample Thickness data type")
187  field(DTYP, "Soft Channel")
188  field(VAL, "DOUBLE")
189 }
190 
191 ## Send parameter to ICP.
192 ## Sample Thickness must match the parameter name as used within the ISISICP
193 ## NOVA below must match with output DAE waveform size (see substitutions)
194 record(aSub, "$(P)PARS:SAMPLE:THICK:SEND")
195 {
196  field(DESC, "Send Sample Thickness to ICP")
197  field(SNAM, "stringConcatWithCtrlB")
198  field(FTA, "STRING")
199  field(INPA, "$(P)PARS:SAMPLE:THICK:SP.DESC NPP NMS")
200  field(FTB, "STRING")
201  field(INPB, "$(P)PARS:SAMPLE:THICK:TYPE.VAL NPP NMS")
202  field(FTC, "STRING")
203  field(INPC, "$(P)PARS:SAMPLE:THICK:SP.EGU NPP NMS")
204  field(FTD, "DOUBLE")
205  field(NOD, "1")
206  field(INPD, "$(P)PARS:SAMPLE:THICK:SP.VAL NPP NMS")
207  field(FTVA, "CHAR")
208  field(NOVA, "512")
209  field(OUTA, "$(P)PARS:SAMPLE:THICK:_SENDV")
210  field(FLNK, "$(P)PARS:SAMPLE:THICK:_SENDPV")
211 }
212 
213 record(waveform, "$(P)PARS:SAMPLE:THICK:_SENDV")
214 {
215  field(FTVL, "CHAR")
216  field(NELM, "512")
217 }
218 
219 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
220 record(waveform, "$(P)PARS:SAMPLE:THICK:_SENDPV")
221 {
222  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
223  field(FTVL, "CHAR")
224  field(NELM, "128")
225  field(FLNK, "$(P)PARS:SAMPLE:THICK:_SENDQ")
226 }
227 
228 record(aSub, "$(P)PARS:SAMPLE:THICK:_SENDQ")
229 {
230  field(SNAM, "queuedPVSet")
231  field(INPA, "$(P)PARS:SAMPLE:THICK:_SENDPV NPP")
232  field(FTA, "CHAR")
233  field(NOA, "128")
234  field(INPB, "$(P)PARS:SAMPLE:THICK:_SENDV NPP")
235  field(FTB, "CHAR")
236  field(NOB, "512")
237  field(INPC, "5")
238  field(FTC, "DOUBLE")
239  field(NOC, "1")
240 }
241 record(ao, "$(P)PARS:SAMPLE:PHI")
242 {
243  field(DESC, "Sample Phi Angle")
244  field(DTYP, "Soft Channel")
245  field(FLNK, "$(P)PARS:SAMPLE:PHI:SEND")
246  field(EGU, "")
247  field(OMSL, "supervisory")
248  field(PREC, 3)
249  info(autosaveFields, "VAL")
250  info(PVCATEGORY, "SAMPLEPAR")
251 }
252 alias("$(P)PARS:SAMPLE:PHI", "$(P)PARS:SAMPLE:PHI:SP")
253 
254 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
255 # we use this rather than PINI in above as DAE may not be running when we start this ioc
256 record(bo, "$(P)PARS:SAMPLE:PHI:_SP_UPDATE")
257 {
258  field(SCAN, "10 second")
259  field(FLNK, "$(P)PARS:SAMPLE:PHI:SP.PROC")
260 }
261 
262 # aSub records must read from links, hence need to create a record
263 # to store data type string for above ao record
264 record(stringout, "$(P)PARS:SAMPLE:PHI:TYPE")
265 {
266  field(DESC, "Sample Phi Angle data type")
267  field(DTYP, "Soft Channel")
268  field(VAL, "DOUBLE")
269 }
270 
271 ## Send parameter to ICP.
272 ## Sample Phi Angle must match the parameter name as used within the ISISICP
273 ## NOVA below must match with output DAE waveform size (see substitutions)
274 record(aSub, "$(P)PARS:SAMPLE:PHI:SEND")
275 {
276  field(DESC, "Send Sample Phi Angle to ICP")
277  field(SNAM, "stringConcatWithCtrlB")
278  field(FTA, "STRING")
279  field(INPA, "$(P)PARS:SAMPLE:PHI:SP.DESC NPP NMS")
280  field(FTB, "STRING")
281  field(INPB, "$(P)PARS:SAMPLE:PHI:TYPE.VAL NPP NMS")
282  field(FTC, "STRING")
283  field(INPC, "$(P)PARS:SAMPLE:PHI:SP.EGU NPP NMS")
284  field(FTD, "DOUBLE")
285  field(NOD, "1")
286  field(INPD, "$(P)PARS:SAMPLE:PHI:SP.VAL NPP NMS")
287  field(FTVA, "CHAR")
288  field(NOVA, "512")
289  field(OUTA, "$(P)PARS:SAMPLE:PHI:_SENDV")
290  field(FLNK, "$(P)PARS:SAMPLE:PHI:_SENDPV")
291 }
292 
293 record(waveform, "$(P)PARS:SAMPLE:PHI:_SENDV")
294 {
295  field(FTVL, "CHAR")
296  field(NELM, "512")
297 }
298 
299 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
300 record(waveform, "$(P)PARS:SAMPLE:PHI:_SENDPV")
301 {
302  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
303  field(FTVL, "CHAR")
304  field(NELM, "128")
305  field(FLNK, "$(P)PARS:SAMPLE:PHI:_SENDQ")
306 }
307 
308 record(aSub, "$(P)PARS:SAMPLE:PHI:_SENDQ")
309 {
310  field(SNAM, "queuedPVSet")
311  field(INPA, "$(P)PARS:SAMPLE:PHI:_SENDPV NPP")
312  field(FTA, "CHAR")
313  field(NOA, "128")
314  field(INPB, "$(P)PARS:SAMPLE:PHI:_SENDV NPP")
315  field(FTB, "CHAR")
316  field(NOB, "512")
317  field(INPC, "5")
318  field(FTC, "DOUBLE")
319  field(NOC, "1")
320 }
321 record(ao, "$(P)PARS:SAMPLE:AOI")
322 {
323  field(DESC, "Angle of Incidence")
324  field(DTYP, "Soft Channel")
325  field(FLNK, "$(P)PARS:SAMPLE:AOI:SEND")
326  field(EGU, "")
327  field(OMSL, "supervisory")
328  field(PREC, 3)
329  info(autosaveFields, "VAL")
330  info(PVCATEGORY, "SAMPLEPAR")
331 }
332 alias("$(P)PARS:SAMPLE:AOI", "$(P)PARS:SAMPLE:AOI:SP")
333 
334 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
335 # we use this rather than PINI in above as DAE may not be running when we start this ioc
336 record(bo, "$(P)PARS:SAMPLE:AOI:_SP_UPDATE")
337 {
338  field(SCAN, "10 second")
339  field(FLNK, "$(P)PARS:SAMPLE:AOI:SP.PROC")
340 }
341 
342 # aSub records must read from links, hence need to create a record
343 # to store data type string for above ao record
344 record(stringout, "$(P)PARS:SAMPLE:AOI:TYPE")
345 {
346  field(DESC, "Angle of Incidence data type")
347  field(DTYP, "Soft Channel")
348  field(VAL, "DOUBLE")
349 }
350 
351 ## Send parameter to ICP.
352 ## Angle of Incidence must match the parameter name as used within the ISISICP
353 ## NOVA below must match with output DAE waveform size (see substitutions)
354 record(aSub, "$(P)PARS:SAMPLE:AOI:SEND")
355 {
356  field(DESC, "Send Angle of Incidence to ICP")
357  field(SNAM, "stringConcatWithCtrlB")
358  field(FTA, "STRING")
359  field(INPA, "$(P)PARS:SAMPLE:AOI:SP.DESC NPP NMS")
360  field(FTB, "STRING")
361  field(INPB, "$(P)PARS:SAMPLE:AOI:TYPE.VAL NPP NMS")
362  field(FTC, "STRING")
363  field(INPC, "$(P)PARS:SAMPLE:AOI:SP.EGU NPP NMS")
364  field(FTD, "DOUBLE")
365  field(NOD, "1")
366  field(INPD, "$(P)PARS:SAMPLE:AOI:SP.VAL NPP NMS")
367  field(FTVA, "CHAR")
368  field(NOVA, "512")
369  field(OUTA, "$(P)PARS:SAMPLE:AOI:_SENDV")
370  field(FLNK, "$(P)PARS:SAMPLE:AOI:_SENDPV")
371 }
372 
373 record(waveform, "$(P)PARS:SAMPLE:AOI:_SENDV")
374 {
375  field(FTVL, "CHAR")
376  field(NELM, "512")
377 }
378 
379 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
380 record(waveform, "$(P)PARS:SAMPLE:AOI:_SENDPV")
381 {
382  field(INP, "$(P)DAE:SAMPLEPAR:SP.NAME$")
383  field(FTVL, "CHAR")
384  field(NELM, "128")
385  field(FLNK, "$(P)PARS:SAMPLE:AOI:_SENDQ")
386 }
387 
388 record(aSub, "$(P)PARS:SAMPLE:AOI:_SENDQ")
389 {
390  field(SNAM, "queuedPVSet")
391  field(INPA, "$(P)PARS:SAMPLE:AOI:_SENDPV NPP")
392  field(FTA, "CHAR")
393  field(NOA, "128")
394  field(INPB, "$(P)PARS:SAMPLE:AOI:_SENDV NPP")
395  field(FTB, "CHAR")
396  field(NOB, "512")
397  field(INPC, "5")
398  field(FTC, "DOUBLE")
399  field(NOC, "1")
400 }
401 record(ao, "$(P)PARS:BL:L1")
402 {
403  field(DESC, "Primary Flight Path (L1)")
404  field(DTYP, "Soft Channel")
405  field(FLNK, "$(P)PARS:BL:L1:SEND")
406  field(EGU, "m")
407  field(OMSL, "supervisory")
408  field(PREC, 3)
409  info(autosaveFields, "VAL")
410  info(PVCATEGORY, "BEAMLINEPAR")
411 }
412 alias("$(P)PARS:BL:L1", "$(P)PARS:BL:L1:SP")
413 
414 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
415 # we use this rather than PINI in above as DAE may not be running when we start this ioc
416 record(bo, "$(P)PARS:BL:L1:_SP_UPDATE")
417 {
418  field(SCAN, "10 second")
419  field(FLNK, "$(P)PARS:BL:L1:SP.PROC")
420 }
421 
422 # aSub records must read from links, hence need to create a record
423 # to store data type string for above ao record
424 record(stringout, "$(P)PARS:BL:L1:TYPE")
425 {
426  field(DESC, "Primary Flight Path (L1) data type")
427  field(DTYP, "Soft Channel")
428  field(VAL, "DOUBLE")
429 }
430 
431 ## Send parameter to ICP.
432 ## Primary Flight Path (L1) must match the parameter name as used within the ISISICP
433 ## NOVA below must match with output DAE waveform size (see substitutions)
434 record(aSub, "$(P)PARS:BL:L1:SEND")
435 {
436  field(DESC, "Send Primary Flight Path (L1) to ICP")
437  field(SNAM, "stringConcatWithCtrlB")
438  field(FTA, "STRING")
439  field(INPA, "$(P)PARS:BL:L1:SP.DESC NPP NMS")
440  field(FTB, "STRING")
441  field(INPB, "$(P)PARS:BL:L1:TYPE.VAL NPP NMS")
442  field(FTC, "STRING")
443  field(INPC, "$(P)PARS:BL:L1:SP.EGU NPP NMS")
444  field(FTD, "DOUBLE")
445  field(NOD, "1")
446  field(INPD, "$(P)PARS:BL:L1:SP.VAL NPP NMS")
447  field(FTVA, "CHAR")
448  field(NOVA, "512")
449  field(OUTA, "$(P)PARS:BL:L1:_SENDV")
450  field(FLNK, "$(P)PARS:BL:L1:_SENDPV")
451 }
452 
453 record(waveform, "$(P)PARS:BL:L1:_SENDV")
454 {
455  field(FTVL, "CHAR")
456  field(NELM, "512")
457 }
458 
459 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
460 record(waveform, "$(P)PARS:BL:L1:_SENDPV")
461 {
462  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
463  field(FTVL, "CHAR")
464  field(NELM, "128")
465  field(FLNK, "$(P)PARS:BL:L1:_SENDQ")
466 }
467 
468 record(aSub, "$(P)PARS:BL:L1:_SENDQ")
469 {
470  field(SNAM, "queuedPVSet")
471  field(INPA, "$(P)PARS:BL:L1:_SENDPV NPP")
472  field(FTA, "CHAR")
473  field(NOA, "128")
474  field(INPB, "$(P)PARS:BL:L1:_SENDV NPP")
475  field(FTB, "CHAR")
476  field(NOB, "512")
477  field(INPC, "5")
478  field(FTC, "DOUBLE")
479  field(NOC, "1")
480 }
481 record(ao, "$(P)PARS:BL:A1")
482 {
483  field(DESC, "Aperture 1 Diameter")
484  field(DTYP, "Soft Channel")
485  field(FLNK, "$(P)PARS:BL:A1:SEND")
486  field(EGU, "mm")
487  field(OMSL, "supervisory")
488  field(PREC, 3)
489  info(autosaveFields, "VAL")
490  info(PVCATEGORY, "BEAMLINEPAR")
491 }
492 alias("$(P)PARS:BL:A1", "$(P)PARS:BL:A1:SP")
493 
494 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
495 # we use this rather than PINI in above as DAE may not be running when we start this ioc
496 record(bo, "$(P)PARS:BL:A1:_SP_UPDATE")
497 {
498  field(SCAN, "10 second")
499  field(FLNK, "$(P)PARS:BL:A1:SP.PROC")
500 }
501 
502 # aSub records must read from links, hence need to create a record
503 # to store data type string for above ao record
504 record(stringout, "$(P)PARS:BL:A1:TYPE")
505 {
506  field(DESC, "Aperture 1 Diameter data type")
507  field(DTYP, "Soft Channel")
508  field(VAL, "DOUBLE")
509 }
510 
511 ## Send parameter to ICP.
512 ## Aperture 1 Diameter must match the parameter name as used within the ISISICP
513 ## NOVA below must match with output DAE waveform size (see substitutions)
514 record(aSub, "$(P)PARS:BL:A1:SEND")
515 {
516  field(DESC, "Send Aperture 1 Diameter to ICP")
517  field(SNAM, "stringConcatWithCtrlB")
518  field(FTA, "STRING")
519  field(INPA, "$(P)PARS:BL:A1:SP.DESC NPP NMS")
520  field(FTB, "STRING")
521  field(INPB, "$(P)PARS:BL:A1:TYPE.VAL NPP NMS")
522  field(FTC, "STRING")
523  field(INPC, "$(P)PARS:BL:A1:SP.EGU NPP NMS")
524  field(FTD, "DOUBLE")
525  field(NOD, "1")
526  field(INPD, "$(P)PARS:BL:A1:SP.VAL NPP NMS")
527  field(FTVA, "CHAR")
528  field(NOVA, "512")
529  field(OUTA, "$(P)PARS:BL:A1:_SENDV")
530  field(FLNK, "$(P)PARS:BL:A1:_SENDPV")
531 }
532 
533 record(waveform, "$(P)PARS:BL:A1:_SENDV")
534 {
535  field(FTVL, "CHAR")
536  field(NELM, "512")
537 }
538 
539 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
540 record(waveform, "$(P)PARS:BL:A1:_SENDPV")
541 {
542  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
543  field(FTVL, "CHAR")
544  field(NELM, "128")
545  field(FLNK, "$(P)PARS:BL:A1:_SENDQ")
546 }
547 
548 record(aSub, "$(P)PARS:BL:A1:_SENDQ")
549 {
550  field(SNAM, "queuedPVSet")
551  field(INPA, "$(P)PARS:BL:A1:_SENDPV NPP")
552  field(FTA, "CHAR")
553  field(NOA, "128")
554  field(INPB, "$(P)PARS:BL:A1:_SENDV NPP")
555  field(FTB, "CHAR")
556  field(NOB, "512")
557  field(INPC, "5")
558  field(FTC, "DOUBLE")
559  field(NOC, "1")
560 }
561 record(ao, "$(P)PARS:BL:A2")
562 {
563  field(DESC, "Aperture 2 Diameter")
564  field(DTYP, "Soft Channel")
565  field(FLNK, "$(P)PARS:BL:A2:SEND")
566  field(EGU, "mm")
567  field(OMSL, "supervisory")
568  field(PREC, 3)
569  info(autosaveFields, "VAL")
570  info(PVCATEGORY, "BEAMLINEPAR")
571 }
572 alias("$(P)PARS:BL:A2", "$(P)PARS:BL:A2:SP")
573 
574 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
575 # we use this rather than PINI in above as DAE may not be running when we start this ioc
576 record(bo, "$(P)PARS:BL:A2:_SP_UPDATE")
577 {
578  field(SCAN, "10 second")
579  field(FLNK, "$(P)PARS:BL:A2:SP.PROC")
580 }
581 
582 # aSub records must read from links, hence need to create a record
583 # to store data type string for above ao record
584 record(stringout, "$(P)PARS:BL:A2:TYPE")
585 {
586  field(DESC, "Aperture 2 Diameter data type")
587  field(DTYP, "Soft Channel")
588  field(VAL, "DOUBLE")
589 }
590 
591 ## Send parameter to ICP.
592 ## Aperture 2 Diameter must match the parameter name as used within the ISISICP
593 ## NOVA below must match with output DAE waveform size (see substitutions)
594 record(aSub, "$(P)PARS:BL:A2:SEND")
595 {
596  field(DESC, "Send Aperture 2 Diameter to ICP")
597  field(SNAM, "stringConcatWithCtrlB")
598  field(FTA, "STRING")
599  field(INPA, "$(P)PARS:BL:A2:SP.DESC NPP NMS")
600  field(FTB, "STRING")
601  field(INPB, "$(P)PARS:BL:A2:TYPE.VAL NPP NMS")
602  field(FTC, "STRING")
603  field(INPC, "$(P)PARS:BL:A2:SP.EGU NPP NMS")
604  field(FTD, "DOUBLE")
605  field(NOD, "1")
606  field(INPD, "$(P)PARS:BL:A2:SP.VAL NPP NMS")
607  field(FTVA, "CHAR")
608  field(NOVA, "512")
609  field(OUTA, "$(P)PARS:BL:A2:_SENDV")
610  field(FLNK, "$(P)PARS:BL:A2:_SENDPV")
611 }
612 
613 record(waveform, "$(P)PARS:BL:A2:_SENDV")
614 {
615  field(FTVL, "CHAR")
616  field(NELM, "512")
617 }
618 
619 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
620 record(waveform, "$(P)PARS:BL:A2:_SENDPV")
621 {
622  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
623  field(FTVL, "CHAR")
624  field(NELM, "128")
625  field(FLNK, "$(P)PARS:BL:A2:_SENDQ")
626 }
627 
628 record(aSub, "$(P)PARS:BL:A2:_SENDQ")
629 {
630  field(SNAM, "queuedPVSet")
631  field(INPA, "$(P)PARS:BL:A2:_SENDPV NPP")
632  field(FTA, "CHAR")
633  field(NOA, "128")
634  field(INPB, "$(P)PARS:BL:A2:_SENDV NPP")
635  field(FTB, "CHAR")
636  field(NOB, "512")
637  field(INPC, "5")
638  field(FTC, "DOUBLE")
639  field(NOC, "1")
640 }
641 record(ao, "$(P)PARS:BL:A3")
642 {
643  field(DESC, "Aperture 3 Diameter")
644  field(DTYP, "Soft Channel")
645  field(FLNK, "$(P)PARS:BL:A3:SEND")
646  field(EGU, "mm")
647  field(OMSL, "supervisory")
648  field(PREC, 3)
649  info(autosaveFields, "VAL")
650  info(PVCATEGORY, "BEAMLINEPAR")
651 }
652 alias("$(P)PARS:BL:A3", "$(P)PARS:BL:A3:SP")
653 
654 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
655 # we use this rather than PINI in above as DAE may not be running when we start this ioc
656 record(bo, "$(P)PARS:BL:A3:_SP_UPDATE")
657 {
658  field(SCAN, "10 second")
659  field(FLNK, "$(P)PARS:BL:A3:SP.PROC")
660 }
661 
662 # aSub records must read from links, hence need to create a record
663 # to store data type string for above ao record
664 record(stringout, "$(P)PARS:BL:A3:TYPE")
665 {
666  field(DESC, "Aperture 3 Diameter data type")
667  field(DTYP, "Soft Channel")
668  field(VAL, "DOUBLE")
669 }
670 
671 ## Send parameter to ICP.
672 ## Aperture 3 Diameter must match the parameter name as used within the ISISICP
673 ## NOVA below must match with output DAE waveform size (see substitutions)
674 record(aSub, "$(P)PARS:BL:A3:SEND")
675 {
676  field(DESC, "Send Aperture 3 Diameter to ICP")
677  field(SNAM, "stringConcatWithCtrlB")
678  field(FTA, "STRING")
679  field(INPA, "$(P)PARS:BL:A3:SP.DESC NPP NMS")
680  field(FTB, "STRING")
681  field(INPB, "$(P)PARS:BL:A3:TYPE.VAL NPP NMS")
682  field(FTC, "STRING")
683  field(INPC, "$(P)PARS:BL:A3:SP.EGU NPP NMS")
684  field(FTD, "DOUBLE")
685  field(NOD, "1")
686  field(INPD, "$(P)PARS:BL:A3:SP.VAL NPP NMS")
687  field(FTVA, "CHAR")
688  field(NOVA, "512")
689  field(OUTA, "$(P)PARS:BL:A3:_SENDV")
690  field(FLNK, "$(P)PARS:BL:A3:_SENDPV")
691 }
692 
693 record(waveform, "$(P)PARS:BL:A3:_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:A3:_SENDPV")
701 {
702  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
703  field(FTVL, "CHAR")
704  field(NELM, "128")
705  field(FLNK, "$(P)PARS:BL:A3:_SENDQ")
706 }
707 
708 record(aSub, "$(P)PARS:BL:A3:_SENDQ")
709 {
710  field(SNAM, "queuedPVSet")
711  field(INPA, "$(P)PARS:BL:A3:_SENDPV NPP")
712  field(FTA, "CHAR")
713  field(NOA, "128")
714  field(INPB, "$(P)PARS:BL:A3:_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(ao, "$(P)PARS:BL:FOEMIRROR")
722 {
723  field(DESC, "FOE Mirror Angle")
724  field(DTYP, "Soft Channel")
725  field(FLNK, "$(P)PARS:BL:FOEMIRROR:SEND")
726  field(EGU, "")
727  field(OMSL, "supervisory")
728  field(PREC, 3)
729  info(autosaveFields, "VAL")
730  info(PVCATEGORY, "BEAMLINEPAR")
731 }
732 alias("$(P)PARS:BL:FOEMIRROR", "$(P)PARS:BL:FOEMIRROR: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:FOEMIRROR:_SP_UPDATE")
737 {
738  field(SCAN, "10 second")
739  field(FLNK, "$(P)PARS:BL:FOEMIRROR:SP.PROC")
740 }
741 
742 # aSub records must read from links, hence need to create a record
743 # to store data type string for above ao record
744 record(stringout, "$(P)PARS:BL:FOEMIRROR:TYPE")
745 {
746  field(DESC, "FOE Mirror Angle data type")
747  field(DTYP, "Soft Channel")
748  field(VAL, "DOUBLE")
749 }
750 
751 ## Send parameter to ICP.
752 ## FOE Mirror Angle must match the parameter name as used within the ISISICP
753 ## NOVA below must match with output DAE waveform size (see substitutions)
754 record(aSub, "$(P)PARS:BL:FOEMIRROR:SEND")
755 {
756  field(DESC, "Send FOE Mirror Angle to ICP")
757  field(SNAM, "stringConcatWithCtrlB")
758  field(FTA, "STRING")
759  field(INPA, "$(P)PARS:BL:FOEMIRROR:SP.DESC NPP NMS")
760  field(FTB, "STRING")
761  field(INPB, "$(P)PARS:BL:FOEMIRROR:TYPE.VAL NPP NMS")
762  field(FTC, "STRING")
763  field(INPC, "$(P)PARS:BL:FOEMIRROR:SP.EGU NPP NMS")
764  field(FTD, "DOUBLE")
765  field(NOD, "1")
766  field(INPD, "$(P)PARS:BL:FOEMIRROR:SP.VAL NPP NMS")
767  field(FTVA, "CHAR")
768  field(NOVA, "512")
769  field(OUTA, "$(P)PARS:BL:FOEMIRROR:_SENDV")
770  field(FLNK, "$(P)PARS:BL:FOEMIRROR:_SENDPV")
771 }
772 
773 record(waveform, "$(P)PARS:BL:FOEMIRROR:_SENDV")
774 {
775  field(FTVL, "CHAR")
776  field(NELM, "512")
777 }
778 
779 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
780 record(waveform, "$(P)PARS:BL:FOEMIRROR:_SENDPV")
781 {
782  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
783  field(FTVL, "CHAR")
784  field(NELM, "128")
785  field(FLNK, "$(P)PARS:BL:FOEMIRROR:_SENDQ")
786 }
787 
788 record(aSub, "$(P)PARS:BL:FOEMIRROR:_SENDQ")
789 {
790  field(SNAM, "queuedPVSet")
791  field(INPA, "$(P)PARS:BL:FOEMIRROR:_SENDPV NPP")
792  field(FTA, "CHAR")
793  field(NOA, "128")
794  field(INPB, "$(P)PARS:BL:FOEMIRROR:_SENDV NPP")
795  field(FTB, "CHAR")
796  field(NOB, "512")
797  field(INPC, "5")
798  field(FTC, "DOUBLE")
799  field(NOC, "1")
800 }
801 record(ao, "$(P)PARS:BL:BCX")
802 {
803  field(DESC, "Beam Centre X")
804  field(DTYP, "Soft Channel")
805  field(FLNK, "$(P)PARS:BL:BCX:SEND")
806  field(EGU, "mm")
807  field(OMSL, "supervisory")
808  field(PREC, 3)
809  info(autosaveFields, "VAL")
810  info(PVCATEGORY, "BEAMLINEPAR")
811 }
812 alias("$(P)PARS:BL:BCX", "$(P)PARS:BL:BCX:SP")
813 
814 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
815 # we use this rather than PINI in above as DAE may not be running when we start this ioc
816 record(bo, "$(P)PARS:BL:BCX:_SP_UPDATE")
817 {
818  field(SCAN, "10 second")
819  field(FLNK, "$(P)PARS:BL:BCX:SP.PROC")
820 }
821 
822 # aSub records must read from links, hence need to create a record
823 # to store data type string for above ao record
824 record(stringout, "$(P)PARS:BL:BCX:TYPE")
825 {
826  field(DESC, "Beam Centre X data type")
827  field(DTYP, "Soft Channel")
828  field(VAL, "DOUBLE")
829 }
830 
831 ## Send parameter to ICP.
832 ## Beam Centre X must match the parameter name as used within the ISISICP
833 ## NOVA below must match with output DAE waveform size (see substitutions)
834 record(aSub, "$(P)PARS:BL:BCX:SEND")
835 {
836  field(DESC, "Send Beam Centre X to ICP")
837  field(SNAM, "stringConcatWithCtrlB")
838  field(FTA, "STRING")
839  field(INPA, "$(P)PARS:BL:BCX:SP.DESC NPP NMS")
840  field(FTB, "STRING")
841  field(INPB, "$(P)PARS:BL:BCX:TYPE.VAL NPP NMS")
842  field(FTC, "STRING")
843  field(INPC, "$(P)PARS:BL:BCX:SP.EGU NPP NMS")
844  field(FTD, "DOUBLE")
845  field(NOD, "1")
846  field(INPD, "$(P)PARS:BL:BCX:SP.VAL NPP NMS")
847  field(FTVA, "CHAR")
848  field(NOVA, "512")
849  field(OUTA, "$(P)PARS:BL:BCX:_SENDV")
850  field(FLNK, "$(P)PARS:BL:BCX:_SENDPV")
851 }
852 
853 record(waveform, "$(P)PARS:BL:BCX:_SENDV")
854 {
855  field(FTVL, "CHAR")
856  field(NELM, "512")
857 }
858 
859 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
860 record(waveform, "$(P)PARS:BL:BCX:_SENDPV")
861 {
862  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
863  field(FTVL, "CHAR")
864  field(NELM, "128")
865  field(FLNK, "$(P)PARS:BL:BCX:_SENDQ")
866 }
867 
868 record(aSub, "$(P)PARS:BL:BCX:_SENDQ")
869 {
870  field(SNAM, "queuedPVSet")
871  field(INPA, "$(P)PARS:BL:BCX:_SENDPV NPP")
872  field(FTA, "CHAR")
873  field(NOA, "128")
874  field(INPB, "$(P)PARS:BL:BCX:_SENDV NPP")
875  field(FTB, "CHAR")
876  field(NOB, "512")
877  field(INPC, "5")
878  field(FTC, "DOUBLE")
879  field(NOC, "1")
880 }
881 record(ao, "$(P)PARS:BL:BCY")
882 {
883  field(DESC, "Beam Centre Y")
884  field(DTYP, "Soft Channel")
885  field(FLNK, "$(P)PARS:BL:BCY:SEND")
886  field(EGU, "mm")
887  field(OMSL, "supervisory")
888  field(PREC, 3)
889  info(autosaveFields, "VAL")
890  info(PVCATEGORY, "BEAMLINEPAR")
891 }
892 alias("$(P)PARS:BL:BCY", "$(P)PARS:BL:BCY:SP")
893 
894 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
895 # we use this rather than PINI in above as DAE may not be running when we start this ioc
896 record(bo, "$(P)PARS:BL:BCY:_SP_UPDATE")
897 {
898  field(SCAN, "10 second")
899  field(FLNK, "$(P)PARS:BL:BCY:SP.PROC")
900 }
901 
902 # aSub records must read from links, hence need to create a record
903 # to store data type string for above ao record
904 record(stringout, "$(P)PARS:BL:BCY:TYPE")
905 {
906  field(DESC, "Beam Centre Y data type")
907  field(DTYP, "Soft Channel")
908  field(VAL, "DOUBLE")
909 }
910 
911 ## Send parameter to ICP.
912 ## Beam Centre Y must match the parameter name as used within the ISISICP
913 ## NOVA below must match with output DAE waveform size (see substitutions)
914 record(aSub, "$(P)PARS:BL:BCY:SEND")
915 {
916  field(DESC, "Send Beam Centre Y to ICP")
917  field(SNAM, "stringConcatWithCtrlB")
918  field(FTA, "STRING")
919  field(INPA, "$(P)PARS:BL:BCY:SP.DESC NPP NMS")
920  field(FTB, "STRING")
921  field(INPB, "$(P)PARS:BL:BCY:TYPE.VAL NPP NMS")
922  field(FTC, "STRING")
923  field(INPC, "$(P)PARS:BL:BCY:SP.EGU NPP NMS")
924  field(FTD, "DOUBLE")
925  field(NOD, "1")
926  field(INPD, "$(P)PARS:BL:BCY:SP.VAL NPP NMS")
927  field(FTVA, "CHAR")
928  field(NOVA, "512")
929  field(OUTA, "$(P)PARS:BL:BCY:_SENDV")
930  field(FLNK, "$(P)PARS:BL:BCY:_SENDPV")
931 }
932 
933 record(waveform, "$(P)PARS:BL:BCY:_SENDV")
934 {
935  field(FTVL, "CHAR")
936  field(NELM, "512")
937 }
938 
939 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
940 record(waveform, "$(P)PARS:BL:BCY:_SENDPV")
941 {
942  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
943  field(FTVL, "CHAR")
944  field(NELM, "128")
945  field(FLNK, "$(P)PARS:BL:BCY:_SENDQ")
946 }
947 
948 record(aSub, "$(P)PARS:BL:BCY:_SENDQ")
949 {
950  field(SNAM, "queuedPVSet")
951  field(INPA, "$(P)PARS:BL:BCY:_SENDPV NPP")
952  field(FTA, "CHAR")
953  field(NOA, "128")
954  field(INPB, "$(P)PARS:BL:BCY:_SENDV NPP")
955  field(FTB, "CHAR")
956  field(NOB, "512")
957  field(INPC, "5")
958  field(FTC, "DOUBLE")
959  field(NOC, "1")
960 }
961 record(ao, "$(P)PARS:BL:SDD")
962 {
963  field(DESC, "Sample Detector Distance")
964  field(DTYP, "Soft Channel")
965  field(FLNK, "$(P)PARS:BL:SDD:SEND")
966  field(EGU, "m")
967  field(OMSL, "supervisory")
968  field(PREC, 3)
969  info(autosaveFields, "VAL")
970  info(PVCATEGORY, "BEAMLINEPAR")
971 }
972 alias("$(P)PARS:BL:SDD", "$(P)PARS:BL:SDD:SP")
973 
974 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
975 # we use this rather than PINI in above as DAE may not be running when we start this ioc
976 record(bo, "$(P)PARS:BL:SDD:_SP_UPDATE")
977 {
978  field(SCAN, "10 second")
979  field(FLNK, "$(P)PARS:BL:SDD:SP.PROC")
980 }
981 
982 # aSub records must read from links, hence need to create a record
983 # to store data type string for above ao record
984 record(stringout, "$(P)PARS:BL:SDD:TYPE")
985 {
986  field(DESC, "Sample Detector Distance data type")
987  field(DTYP, "Soft Channel")
988  field(VAL, "DOUBLE")
989 }
990 
991 ## Send parameter to ICP.
992 ## Sample Detector Distance must match the parameter name as used within the ISISICP
993 ## NOVA below must match with output DAE waveform size (see substitutions)
994 record(aSub, "$(P)PARS:BL:SDD:SEND")
995 {
996  field(DESC, "Send Sample Detector Distance to ICP")
997  field(SNAM, "stringConcatWithCtrlB")
998  field(FTA, "STRING")
999  field(INPA, "$(P)PARS:BL:SDD:SP.DESC NPP NMS")
1000  field(FTB, "STRING")
1001  field(INPB, "$(P)PARS:BL:SDD:TYPE.VAL NPP NMS")
1002  field(FTC, "STRING")
1003  field(INPC, "$(P)PARS:BL:SDD:SP.EGU NPP NMS")
1004  field(FTD, "DOUBLE")
1005  field(NOD, "1")
1006  field(INPD, "$(P)PARS:BL:SDD:SP.VAL NPP NMS")
1007  field(FTVA, "CHAR")
1008  field(NOVA, "512")
1009  field(OUTA, "$(P)PARS:BL:SDD:_SENDV")
1010  field(FLNK, "$(P)PARS:BL:SDD:_SENDPV")
1011 }
1012 
1013 record(waveform, "$(P)PARS:BL:SDD:_SENDV")
1014 {
1015  field(FTVL, "CHAR")
1016  field(NELM, "512")
1017 }
1018 
1019 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
1020 record(waveform, "$(P)PARS:BL:SDD:_SENDPV")
1021 {
1022  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
1023  field(FTVL, "CHAR")
1024  field(NELM, "128")
1025  field(FLNK, "$(P)PARS:BL:SDD:_SENDQ")
1026 }
1027 
1028 record(aSub, "$(P)PARS:BL:SDD:_SENDQ")
1029 {
1030  field(SNAM, "queuedPVSet")
1031  field(INPA, "$(P)PARS:BL:SDD:_SENDPV NPP")
1032  field(FTA, "CHAR")
1033  field(NOA, "128")
1034  field(INPB, "$(P)PARS:BL:SDD:_SENDV NPP")
1035  field(FTB, "CHAR")
1036  field(NOB, "512")
1037  field(INPC, "5")
1038  field(FTC, "DOUBLE")
1039  field(NOC, "1")
1040 }
1041 record(ao, "$(P)PARS:BL:CHOPEN:ANG")
1042 {
1043  field(DESC, "Chopper Opening Angle")
1044  field(DTYP, "Soft Channel")
1045  field(FLNK, "$(P)PARS:BL:CHOPEN:ANG:SEND")
1046  field(EGU, "")
1047  field(OMSL, "supervisory")
1048  field(PREC, 3)
1049  info(autosaveFields, "VAL")
1050  info(PVCATEGORY, "BEAMLINEPAR")
1051 }
1052 alias("$(P)PARS:BL:CHOPEN:ANG", "$(P)PARS:BL:CHOPEN:ANG:SP")
1053 
1054 # force periodic update of values in case we get out of sync with DAE e.g. program restarts
1055 # we use this rather than PINI in above as DAE may not be running when we start this ioc
1056 record(bo, "$(P)PARS:BL:CHOPEN:ANG:_SP_UPDATE")
1057 {
1058  field(SCAN, "10 second")
1059  field(FLNK, "$(P)PARS:BL:CHOPEN:ANG:SP.PROC")
1060 }
1061 
1062 # aSub records must read from links, hence need to create a record
1063 # to store data type string for above ao record
1064 record(stringout, "$(P)PARS:BL:CHOPEN:ANG:TYPE")
1065 {
1066  field(DESC, "Chopper Opening Angle data type")
1067  field(DTYP, "Soft Channel")
1068  field(VAL, "DOUBLE")
1069 }
1070 
1071 ## Send parameter to ICP.
1072 ## Chopper Opening Angle must match the parameter name as used within the ISISICP
1073 ## NOVA below must match with output DAE waveform size (see substitutions)
1074 record(aSub, "$(P)PARS:BL:CHOPEN:ANG:SEND")
1075 {
1076  field(DESC, "Send Chopper Opening Angle to ICP")
1077  field(SNAM, "stringConcatWithCtrlB")
1078  field(FTA, "STRING")
1079  field(INPA, "$(P)PARS:BL:CHOPEN:ANG:SP.DESC NPP NMS")
1080  field(FTB, "STRING")
1081  field(INPB, "$(P)PARS:BL:CHOPEN:ANG:TYPE.VAL NPP NMS")
1082  field(FTC, "STRING")
1083  field(INPC, "$(P)PARS:BL:CHOPEN:ANG:SP.EGU NPP NMS")
1084  field(FTD, "DOUBLE")
1085  field(NOD, "1")
1086  field(INPD, "$(P)PARS:BL:CHOPEN:ANG:SP.VAL NPP NMS")
1087  field(FTVA, "CHAR")
1088  field(NOVA, "512")
1089  field(OUTA, "$(P)PARS:BL:CHOPEN:ANG:_SENDV")
1090  field(FLNK, "$(P)PARS:BL:CHOPEN:ANG:_SENDPV")
1091 }
1092 
1093 record(waveform, "$(P)PARS:BL:CHOPEN:ANG:_SENDV")
1094 {
1095  field(FTVL, "CHAR")
1096  field(NELM, "512")
1097 }
1098 
1099 # add $ to PV name to trigger long string support, which gives array of char needed for waveform
1100 record(waveform, "$(P)PARS:BL:CHOPEN:ANG:_SENDPV")
1101 {
1102  field(INP, "$(P)DAE:BEAMLINEPAR:SP.NAME$")
1103  field(FTVL, "CHAR")
1104  field(NELM, "128")
1105  field(FLNK, "$(P)PARS:BL:CHOPEN:ANG:_SENDQ")
1106 }
1107 
1108 record(aSub, "$(P)PARS:BL:CHOPEN:ANG:_SENDQ")
1109 {
1110  field(SNAM, "queuedPVSet")
1111  field(INPA, "$(P)PARS:BL:CHOPEN:ANG:_SENDPV NPP")
1112  field(FTA, "CHAR")
1113  field(NOA, "128")
1114  field(INPB, "$(P)PARS:BL:CHOPEN:ANG:_SENDV NPP")
1115  field(FTB, "CHAR")
1116  field(NOB, "512")
1117  field(INPC, "5")
1118  field(FTC, "DOUBLE")
1119  field(NOC, "1")
1120 }
alias
alias("$(P)ED:RBNUMBER","$(P)ED:RBNUMBER:SP:RBV")
Definition: experiment_data.db:31
record
record(stringin,"$(P)ED:RBNUMBER")
RB number.
Definition: experiment_data.db:6
Copyright © 2013 Science and Technology Facilities Council | Generated by   doxygen 1.8.5