#*************************************************************************
# Copyright (c) 2012 The University of Chicago, as Operator of Argonne
#     National Laboratory.
# Copyright (c) 2002 The Regents of the University of California, as
#     Operator of Los Alamos National Laboratory.
# EPICS BASE is distributed subject to a Software License Agreement found
# in file LICENSE that is included with this distribution. 
#*************************************************************************

=title Array Subroutine Record (aSub)

...

=head2 Record-specific Menus

=head3 Menu aSubLFLG

The LFLG field uses this menu to ...

=menu aSubLFLG

=head3 Menu aSubEFLG

The EFLG field uses this menu to ...

=menu aSubEFLG

...

=head2 Parameter Fields

The record-specific fields are described below.

=recordtype aSub

...

=cut

menu(aSubLFLG) {
	choice(aSubLFLG_IGNORE,"IGNORE")
	choice(aSubLFLG_READ,"READ")
}

menu(aSubEFLG) {
	choice(aSubEFLG_NEVER,"NEVER")
	choice(aSubEFLG_ON_CHANGE,"ON CHANGE")
	choice(aSubEFLG_ALWAYS,"ALWAYS")
}

recordtype(aSub) {
	include "dbCommon.dbd"
	field(VAL,DBF_LONG) {
		prompt("Subr. return value")
		asl(ASL0)
	}
	field(OVAL,DBF_LONG) {
		prompt("Old return value")
		special(SPC_NOMOD)
		interest(3)
	}
	field(INAM,DBF_STRING) {
		prompt("Initialize Subr. Name")
		promptgroup("30 - Action")
		special(SPC_NOMOD)
		interest(1)
		size(41)
	}
	field(LFLG,DBF_MENU) {
		prompt("Subr. Input Enable")
		promptgroup("30 - Action")
		interest(1)
		menu(aSubLFLG)
	}
	field(SUBL,DBF_INLINK) {
		prompt("Subroutine Name Link")
		promptgroup("30 - Action")
		special(SPC_NOMOD)
		interest(1)
	}
	field(SNAM,DBF_STRING) {
		prompt("Process Subr. Name")
		promptgroup("30 - Action")
		special(SPC_MOD)
		interest(1)
		size(41)
	}
	field(ONAM,DBF_STRING) {
		prompt("Old Subr. Name")
		promptgroup("30 - Action")
		special(SPC_NOMOD)
		interest(3)
		size(41)
	}
	%struct aSubRecord;
	field(SADR,DBF_NOACCESS) {
		prompt("Subroutine Address")
		special(SPC_NOMOD)
		interest(2)
		extra("long (*sadr)(struct aSubRecord *)")
	}
	field(CADR,DBF_NOACCESS) {
		prompt("Subroutine Cleanup Address")
		special(SPC_NOMOD)
		interest(2)
		extra("void (*cadr)(struct aSubRecord *)")
	}
	field(BRSV,DBF_MENU) {
		prompt("Bad Return Severity")
		promptgroup("70 - Alarm")
		pp(TRUE)
		interest(1)
		menu(menuAlarmSevr)
	}
	field(PREC,DBF_SHORT) {
		prompt("Display Precision")
		promptgroup("80 - Display")
		interest(1)
		prop(YES)
	}
	field(EFLG,DBF_MENU) {
		prompt("Output Event Flag")
		promptgroup("50 - Output")
		interest(1)
		menu(aSubEFLG)
		initial("1")
	}
	field(INPA,DBF_INLINK) {
		prompt("Input Link A")
		promptgroup("41 - Input A-G")
		interest(1)
	}
	field(INPB,DBF_INLINK) {
		prompt("Input Link B")
		promptgroup("41 - Input A-G")
		interest(1)
	}
	field(INPC,DBF_INLINK) {
		prompt("Input Link C")
		promptgroup("41 - Input A-G")
		interest(1)
	}
	field(INPD,DBF_INLINK) {
		prompt("Input Link D")
		promptgroup("41 - Input A-G")
		interest(1)
	}
	field(INPE,DBF_INLINK) {
		prompt("Input Link E")
		promptgroup("41 - Input A-G")
		interest(1)
	}
	field(INPF,DBF_INLINK) {
		prompt("Input Link F")
		promptgroup("41 - Input A-G")
		interest(1)
	}
	field(INPG,DBF_INLINK) {
		prompt("Input Link G")
		promptgroup("41 - Input A-G")
		interest(1)
	}
	field(INPH,DBF_INLINK) {
		prompt("Input Link H")
		promptgroup("42 - Input H-N")
		interest(1)
	}
	field(INPI,DBF_INLINK) {
		prompt("Input Link I")
		promptgroup("42 - Input H-N")
		interest(1)
	}
	field(INPJ,DBF_INLINK) {
		prompt("Input Link J")
		promptgroup("42 - Input H-N")
		interest(1)
	}
	field(INPK,DBF_INLINK) {
		prompt("Input Link K")
		promptgroup("42 - Input H-N")
		interest(1)
	}
	field(INPL,DBF_INLINK) {
		prompt("Input Link L")
		promptgroup("42 - Input H-N")
		interest(1)
	}
	field(INPM,DBF_INLINK) {
		prompt("Input Link M")
		promptgroup("42 - Input H-N")
		interest(1)
	}
	field(INPN,DBF_INLINK) {
		prompt("Input Link N")
		promptgroup("42 - Input H-N")
		interest(1)
	}
	field(INPO,DBF_INLINK) {
		prompt("Input Link O")
		promptgroup("43 - Input O-U")
		interest(1)
	}
	field(INPP,DBF_INLINK) {
		prompt("Input Link P")
		promptgroup("43 - Input O-U")
		interest(1)
	}
	field(INPQ,DBF_INLINK) {
		prompt("Input Link Q")
		promptgroup("43 - Input O-U")
		interest(1)
	}
	field(INPR,DBF_INLINK) {
		prompt("Input Link R")
		promptgroup("43 - Input O-U")
		interest(1)
	}
	field(INPS,DBF_INLINK) {
		prompt("Input Link S")
		promptgroup("43 - Input O-U")
		interest(1)
	}
	field(INPT,DBF_INLINK) {
		prompt("Input Link T")
		promptgroup("43 - Input O-U")
		interest(1)
	}
	field(INPU,DBF_INLINK) {
		prompt("Input Link U")
		promptgroup("43 - Input O-U")
		interest(1)
	}

=head3 Input Fields

...

=fields A, B, C, D, E, F, G, H, I, J, K, L, M, N, O, P, Q, R, S, T, U

=cut

	field(A,DBF_NOACCESS) {
		prompt("Input value A")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *a")
		#=read Yes
		#=write Yes
		#=type Set by FTA
	}
	field(B,DBF_NOACCESS) {
		prompt("Input value B")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *b")
		#=read Yes
		#=write Yes
		#=type Set by FTB
	}
	field(C,DBF_NOACCESS) {
		prompt("Input value C")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *c")
		#=read Yes
		#=write Yes
		#=type Set by FTC
	}
	field(D,DBF_NOACCESS) {
		prompt("Input value D")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *d")
		#=read Yes
		#=write Yes
		#=type Set by FTD
	}
	field(E,DBF_NOACCESS) {
		prompt("Input value E")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *e")
		#=read Yes
		#=write Yes
		#=type Set by FTE
	}
	field(F,DBF_NOACCESS) {
		prompt("Input value F")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *f")
		#=read Yes
		#=write Yes
		#=type Set by FTF
	}
	field(G,DBF_NOACCESS) {
		prompt("Input value G")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *g")
		#=read Yes
		#=write Yes
		#=type Set by FTG
	}
	field(H,DBF_NOACCESS) {
		prompt("Input value H")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *h")
		#=read Yes
		#=write Yes
		#=type Set by FTH
	}
	field(I,DBF_NOACCESS) {
		prompt("Input value I")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *i")
		#=read Yes
		#=write Yes
		#=type Set by FTI
	}
	field(J,DBF_NOACCESS) {
		prompt("Input value J")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *j")
		#=read Yes
		#=write Yes
		#=type Set by FTJ
	}
	field(K,DBF_NOACCESS) {
		prompt("Input value K")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *k")
		#=read Yes
		#=write Yes
		#=type Set by FTK
	}
	field(L,DBF_NOACCESS) {
		prompt("Input value L")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *l")
		#=read Yes
		#=write Yes
		#=type Set by FTL
	}
	field(M,DBF_NOACCESS) {
		prompt("Input value M")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *m")
		#=read Yes
		#=write Yes
		#=type Set by FTM
	}
	field(N,DBF_NOACCESS) {
		prompt("Input value N")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *n")
		#=read Yes
		#=write Yes
		#=type Set by FTN
	}
	field(O,DBF_NOACCESS) {
		prompt("Input value O")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *o")
		#=read Yes
		#=write Yes
		#=type Set by FTO
	}
	field(P,DBF_NOACCESS) {
		prompt("Input value P")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *p")
		#=read Yes
		#=write Yes
		#=type Set by FTP
	}
	field(Q,DBF_NOACCESS) {
		prompt("Input value Q")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *q")
		#=read Yes
		#=write Yes
		#=type Set by FTQ
	}
	field(R,DBF_NOACCESS) {
		prompt("Input value R")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *r")
		#=read Yes
		#=write Yes
		#=type Set by FTR
	}
	field(S,DBF_NOACCESS) {
		prompt("Input value S")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *s")
		#=read Yes
		#=write Yes
		#=type Set by FTS
	}
	field(T,DBF_NOACCESS) {
		prompt("Input value T")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *t")
		#=read Yes
		#=write Yes
		#=type Set by FTT
	}
	field(U,DBF_NOACCESS) {
		prompt("Input value U")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *u")
		#=read Yes
		#=write Yes
		#=type Set by FTU
	}
	field(FTA,DBF_MENU) {
		prompt("Type of A")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTB,DBF_MENU) {
		prompt("Type of B")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTC,DBF_MENU) {
		prompt("Type of C")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTD,DBF_MENU) {
		prompt("Type of D")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTE,DBF_MENU) {
		prompt("Type of E")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTF,DBF_MENU) {
		prompt("Type of F")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTG,DBF_MENU) {
		prompt("Type of G")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTH,DBF_MENU) {
		prompt("Type of H")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTI,DBF_MENU) {
		prompt("Type of I")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTJ,DBF_MENU) {
		prompt("Type of J")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTK,DBF_MENU) {
		prompt("Type of K")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTL,DBF_MENU) {
		prompt("Type of L")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTM,DBF_MENU) {
		prompt("Type of M")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTN,DBF_MENU) {
		prompt("Type of N")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTO,DBF_MENU) {
		prompt("Type of O")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTP,DBF_MENU) {
		prompt("Type of P")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTQ,DBF_MENU) {
		prompt("Type of Q")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTR,DBF_MENU) {
		prompt("Type of R")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTS,DBF_MENU) {
		prompt("Type of S")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTT,DBF_MENU) {
		prompt("Type of T")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTU,DBF_MENU) {
		prompt("Type of U")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(NOA,DBF_ULONG) {
		prompt("Max. elements in A")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOB,DBF_ULONG) {
		prompt("Max. elements in B")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOC,DBF_ULONG) {
		prompt("Max. elements in C")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOD,DBF_ULONG) {
		prompt("Max. elements in D")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOE,DBF_ULONG) {
		prompt("Max. elements in E")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOF,DBF_ULONG) {
		prompt("Max. elements in F")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOG,DBF_ULONG) {
		prompt("Max. elements in G")
		promptgroup("41 - Input A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOH,DBF_ULONG) {
		prompt("Max. elements in H")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOI,DBF_ULONG) {
		prompt("Max. elements in I")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOJ,DBF_ULONG) {
		prompt("Max. elements in J")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOK,DBF_ULONG) {
		prompt("Max. elements in K")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOL,DBF_ULONG) {
		prompt("Max. elements in L")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOM,DBF_ULONG) {
		prompt("Max. elements in M")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NON,DBF_ULONG) {
		prompt("Max. elements in N")
		promptgroup("42 - Input H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOO,DBF_ULONG) {
		prompt("Max. elements in O")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOP,DBF_ULONG) {
		prompt("Max. elements in P")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOQ,DBF_ULONG) {
		prompt("Max. elements in Q")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOR,DBF_ULONG) {
		prompt("Max. elements in R")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOS,DBF_ULONG) {
		prompt("Max. elements in S")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOT,DBF_ULONG) {
		prompt("Max. elements in T")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOU,DBF_ULONG) {
		prompt("Max. elements in U")
		promptgroup("43 - Input O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NEA,DBF_ULONG) {
		prompt("Num. elements in A")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEB,DBF_ULONG) {
		prompt("Num. elements in B")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEC,DBF_ULONG) {
		prompt("Num. elements in C")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NED,DBF_ULONG) {
		prompt("Num. elements in D")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEE,DBF_ULONG) {
		prompt("Num. elements in E")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEF,DBF_ULONG) {
		prompt("Num. elements in F")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEG,DBF_ULONG) {
		prompt("Num. elements in G")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEH,DBF_ULONG) {
		prompt("Num. elements in H")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEI,DBF_ULONG) {
		prompt("Num. elements in I")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEJ,DBF_ULONG) {
		prompt("Num. elements in J")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEK,DBF_ULONG) {
		prompt("Num. elements in K")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEL,DBF_ULONG) {
		prompt("Num. elements in L")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEM,DBF_ULONG) {
		prompt("Num. elements in M")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEN,DBF_ULONG) {
		prompt("Num. elements in N")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEO,DBF_ULONG) {
		prompt("Num. elements in O")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEP,DBF_ULONG) {
		prompt("Num. elements in P")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEQ,DBF_ULONG) {
		prompt("Num. elements in Q")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NER,DBF_ULONG) {
		prompt("Num. elements in R")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NES,DBF_ULONG) {
		prompt("Num. elements in S")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NET,DBF_ULONG) {
		prompt("Num. elements in T")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEU,DBF_ULONG) {
		prompt("Num. elements in U")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(OUTA,DBF_OUTLINK) {
		prompt("Output Link A")
		promptgroup("51 - Output A-G")
		interest(1)
	}
	field(OUTB,DBF_OUTLINK) {
		prompt("Output Link B")
		promptgroup("51 - Output A-G")
		interest(1)
	}
	field(OUTC,DBF_OUTLINK) {
		prompt("Output Link C")
		promptgroup("51 - Output A-G")
		interest(1)
	}
	field(OUTD,DBF_OUTLINK) {
		prompt("Output Link D")
		promptgroup("51 - Output A-G")
		interest(1)
	}
	field(OUTE,DBF_OUTLINK) {
		prompt("Output Link E")
		promptgroup("51 - Output A-G")
		interest(1)
	}
	field(OUTF,DBF_OUTLINK) {
		prompt("Output Link F")
		promptgroup("51 - Output A-G")
		interest(1)
	}
	field(OUTG,DBF_OUTLINK) {
		prompt("Output Link G")
		promptgroup("51 - Output A-G")
		interest(1)
	}
	field(OUTH,DBF_OUTLINK) {
		prompt("Output Link H")
		promptgroup("52 - Output H-N")
		interest(1)
	}
	field(OUTI,DBF_OUTLINK) {
		prompt("Output Link I")
		promptgroup("52 - Output H-N")
		interest(1)
	}
	field(OUTJ,DBF_OUTLINK) {
		prompt("Output Link J")
		promptgroup("52 - Output H-N")
		interest(1)
	}
	field(OUTK,DBF_OUTLINK) {
		prompt("Output Link K")
		promptgroup("52 - Output H-N")
		interest(1)
	}
	field(OUTL,DBF_OUTLINK) {
		prompt("Output Link L")
		promptgroup("52 - Output H-N")
		interest(1)
	}
	field(OUTM,DBF_OUTLINK) {
		prompt("Output Link M")
		promptgroup("52 - Output H-N")
		interest(1)
	}
	field(OUTN,DBF_OUTLINK) {
		prompt("Output Link N")
		promptgroup("52 - Output H-N")
		interest(1)
	}
	field(OUTO,DBF_OUTLINK) {
		prompt("Output Link O")
		promptgroup("53 - Output O-U")
		interest(1)
	}
	field(OUTP,DBF_OUTLINK) {
		prompt("Output Link P")
		promptgroup("53 - Output O-U")
		interest(1)
	}
	field(OUTQ,DBF_OUTLINK) {
		prompt("Output Link Q")
		promptgroup("53 - Output O-U")
		interest(1)
	}
	field(OUTR,DBF_OUTLINK) {
		prompt("Output Link R")
		promptgroup("53 - Output O-U")
		interest(1)
	}
	field(OUTS,DBF_OUTLINK) {
		prompt("Output Link S")
		promptgroup("53 - Output O-U")
		interest(1)
	}
	field(OUTT,DBF_OUTLINK) {
		prompt("Output Link T")
		promptgroup("53 - Output O-U")
		interest(1)
	}
	field(OUTU,DBF_OUTLINK) {
		prompt("Output Link U")
		promptgroup("53 - Output O-U")
		interest(1)
	}

=head3 Value Fields

...

=fields VALA, VALB, VALC, VALD, VALE, VALF, VALG, VALH, VALI, VALJ, VALK, VALL, VALM, VALN, VALO, VALP, VALQ, VALR, VALS, VALT, VALU

=cut

	field(VALA,DBF_NOACCESS) {
		prompt("Output value A")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *vala")
		#=read Yes
		#=write Yes
		#=type Set by FTVA
	}
	field(VALB,DBF_NOACCESS) {
		prompt("Output value B")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valb")
		#=read Yes
		#=write Yes
		#=type Set by FTVB
	}
	field(VALC,DBF_NOACCESS) {
		prompt("Output value C")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valc")
		#=read Yes
		#=write Yes
		#=type Set by FTVC
	}
	field(VALD,DBF_NOACCESS) {
		prompt("Output value D")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *vald")
		#=read Yes
		#=write Yes
		#=type Set by FTVD
	}
	field(VALE,DBF_NOACCESS) {
		prompt("Output value E")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *vale")
		#=read Yes
		#=write Yes
		#=type Set by FTVE
	}
	field(VALF,DBF_NOACCESS) {
		prompt("Output value F")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valf")
		#=read Yes
		#=write Yes
		#=type Set by FTVF
	}
	field(VALG,DBF_NOACCESS) {
		prompt("Output value G")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valg")
		#=read Yes
		#=write Yes
		#=type Set by FTVG
	}
	field(VALH,DBF_NOACCESS) {
		prompt("Output value H")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valh")
		#=read Yes
		#=write Yes
		#=type Set by FTVH
	}
	field(VALI,DBF_NOACCESS) {
		prompt("Output value I")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *vali")
		#=read Yes
		#=write Yes
		#=type Set by FTVI
	}
	field(VALJ,DBF_NOACCESS) {
		prompt("Output value J")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valj")
		#=read Yes
		#=write Yes
		#=type Set by FTVJ
	}
	field(VALK,DBF_NOACCESS) {
		prompt("Output value K")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valk")
		#=read Yes
		#=write Yes
		#=type Set by FTVK
	}
	field(VALL,DBF_NOACCESS) {
		prompt("Output value L")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *vall")
		#=read Yes
		#=write Yes
		#=type Set by FTVL
	}
	field(VALM,DBF_NOACCESS) {
		prompt("Output value M")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valm")
		#=read Yes
		#=write Yes
		#=type Set by FTVM
	}
	field(VALN,DBF_NOACCESS) {
		prompt("Output value N")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valn")
		#=read Yes
		#=write Yes
		#=type Set by FTVN
	}
	field(VALO,DBF_NOACCESS) {
		prompt("Output value O")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valo")
		#=read Yes
		#=write Yes
		#=type Set by FTVO
	}
	field(VALP,DBF_NOACCESS) {
		prompt("Output value P")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valp")
		#=read Yes
		#=write Yes
		#=type Set by FTVP
	}
	field(VALQ,DBF_NOACCESS) {
		prompt("Output value Q")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valq")
		#=read Yes
		#=write Yes
		#=type Set by FTVQ
	}
	field(VALR,DBF_NOACCESS) {
		prompt("Output value R")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valr")
		#=read Yes
		#=write Yes
		#=type Set by FTVR
	}
	field(VALS,DBF_NOACCESS) {
		prompt("Output value S")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *vals")
		#=read Yes
		#=write Yes
		#=type Set by FTVS
	}
	field(VALT,DBF_NOACCESS) {
		prompt("Output value T")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valt")
		#=read Yes
		#=write Yes
		#=type Set by FTVT
	}
	field(VALU,DBF_NOACCESS) {
		prompt("Output value U")
		asl(ASL0)
		special(SPC_DBADDR)
		interest(2)
		extra("void *valu")
		#=read Yes
		#=write Yes
		#=type Set by FTVU
	}
	field(OVLA,DBF_NOACCESS) {
		prompt("Old Output A")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovla")
	}
	field(OVLB,DBF_NOACCESS) {
		prompt("Old Output B")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlb")
	}
	field(OVLC,DBF_NOACCESS) {
		prompt("Old Output C")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlc")
	}
	field(OVLD,DBF_NOACCESS) {
		prompt("Old Output D")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovld")
	}
	field(OVLE,DBF_NOACCESS) {
		prompt("Old Output E")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovle")
	}
	field(OVLF,DBF_NOACCESS) {
		prompt("Old Output F")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlf")
	}
	field(OVLG,DBF_NOACCESS) {
		prompt("Old Output G")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlg")
	}
	field(OVLH,DBF_NOACCESS) {
		prompt("Old Output H")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlh")
	}
	field(OVLI,DBF_NOACCESS) {
		prompt("Old Output I")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovli")
	}
	field(OVLJ,DBF_NOACCESS) {
		prompt("Old Output J")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlj")
	}
	field(OVLK,DBF_NOACCESS) {
		prompt("Old Output K")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlk")
	}
	field(OVLL,DBF_NOACCESS) {
		prompt("Old Output L")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovll")
	}
	field(OVLM,DBF_NOACCESS) {
		prompt("Old Output M")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlm")
	}
	field(OVLN,DBF_NOACCESS) {
		prompt("Old Output N")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovln")
	}
	field(OVLO,DBF_NOACCESS) {
		prompt("Old Output O")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlo")
	}
	field(OVLP,DBF_NOACCESS) {
		prompt("Old Output P")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlp")
	}
	field(OVLQ,DBF_NOACCESS) {
		prompt("Old Output Q")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlq")
	}
	field(OVLR,DBF_NOACCESS) {
		prompt("Old Output R")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlr")
	}
	field(OVLS,DBF_NOACCESS) {
		prompt("Old Output S")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovls")
	}
	field(OVLT,DBF_NOACCESS) {
		prompt("Old Output T")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlt")
	}
	field(OVLU,DBF_NOACCESS) {
		prompt("Old Output U")
		asl(ASL0)
		special(SPC_NOMOD)
		interest(4)
		extra("void *ovlu")
	}
	field(FTVA,DBF_MENU) {
		prompt("Type of VALA")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVB,DBF_MENU) {
		prompt("Type of VALB")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVC,DBF_MENU) {
		prompt("Type of VALC")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVD,DBF_MENU) {
		prompt("Type of VALD")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVE,DBF_MENU) {
		prompt("Type of VALE")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVF,DBF_MENU) {
		prompt("Type of VALF")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVG,DBF_MENU) {
		prompt("Type of VALG")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVH,DBF_MENU) {
		prompt("Type of VALH")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVI,DBF_MENU) {
		prompt("Type of VALI")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVJ,DBF_MENU) {
		prompt("Type of VALJ")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVK,DBF_MENU) {
		prompt("Type of VALK")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVL,DBF_MENU) {
		prompt("Type of VALL")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVM,DBF_MENU) {
		prompt("Type of VALM")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVN,DBF_MENU) {
		prompt("Type of VALN")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVO,DBF_MENU) {
		prompt("Type of VALO")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVP,DBF_MENU) {
		prompt("Type of VALP")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVQ,DBF_MENU) {
		prompt("Type of VALQ")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVR,DBF_MENU) {
		prompt("Type of VALR")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVS,DBF_MENU) {
		prompt("Type of VALS")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVT,DBF_MENU) {
		prompt("Type of VALT")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(FTVU,DBF_MENU) {
		prompt("Type of VALU")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("DOUBLE")
		menu(menuFtype)
	}
	field(NOVA,DBF_ULONG) {
		prompt("Max. elements in VALA")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVB,DBF_ULONG) {
		prompt("Max. elements in VALB")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVC,DBF_ULONG) {
		prompt("Max. elements in VALC")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVD,DBF_ULONG) {
		prompt("Max. elements in VALD")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVE,DBF_ULONG) {
		prompt("Max. elements in VALE")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVF,DBF_ULONG) {
		prompt("Max. elements in VALF")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVG,DBF_ULONG) {
		prompt("Max. elements in VALG")
		promptgroup("51 - Output A-G")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVH,DBF_ULONG) {
		prompt("Max. elements in VAlH")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVI,DBF_ULONG) {
		prompt("Max. elements in VALI")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVJ,DBF_ULONG) {
		prompt("Max. elements in VALJ")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVK,DBF_ULONG) {
		prompt("Max. elements in VALK")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVL,DBF_ULONG) {
		prompt("Max. elements in VALL")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVM,DBF_ULONG) {
		prompt("Max. elements in VALM")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVN,DBF_ULONG) {
		prompt("Max. elements in VALN")
		promptgroup("52 - Output H-N")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVO,DBF_ULONG) {
		prompt("Max. elements in VALO")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVP,DBF_ULONG) {
		prompt("Max. elements in VALP")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVQ,DBF_ULONG) {
		prompt("Max. elements in VALQ")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVR,DBF_ULONG) {
		prompt("Max. elements in VALR")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVS,DBF_ULONG) {
		prompt("Max. elements in VALS")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVT,DBF_ULONG) {
		prompt("Max. elements in VALT")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NOVU,DBF_ULONG) {
		prompt("Max. elements in VALU")
		promptgroup("53 - Output O-U")
		special(SPC_NOMOD)
		interest(1)
		initial("1")
	}
	field(NEVA,DBF_ULONG) {
		prompt("Num. elements in VALA")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVB,DBF_ULONG) {
		prompt("Num. elements in VALB")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVC,DBF_ULONG) {
		prompt("Num. elements in VALC")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVD,DBF_ULONG) {
		prompt("Num. elements in VALD")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVE,DBF_ULONG) {
		prompt("Num. elements in VALE")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVF,DBF_ULONG) {
		prompt("Num. elements in VALF")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVG,DBF_ULONG) {
		prompt("Num. elements in VALG")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVH,DBF_ULONG) {
		prompt("Num. elements in VAlH")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVI,DBF_ULONG) {
		prompt("Num. elements in VALI")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVJ,DBF_ULONG) {
		prompt("Num. elements in VALJ")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVK,DBF_ULONG) {
		prompt("Num. elements in VALK")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVL,DBF_ULONG) {
		prompt("Num. elements in VALL")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVM,DBF_ULONG) {
		prompt("Num. elements in VALM")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVN,DBF_ULONG) {
		prompt("Num. elements in VALN")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVO,DBF_ULONG) {
		prompt("Num. elements in VALO")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVP,DBF_ULONG) {
		prompt("Num. elements in VALP")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVQ,DBF_ULONG) {
		prompt("Num. elements in VALQ")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVR,DBF_ULONG) {
		prompt("Num. elements in VALR")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVS,DBF_ULONG) {
		prompt("Num. elements in VALS")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVT,DBF_ULONG) {
		prompt("Num. elements in VALT")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(NEVU,DBF_ULONG) {
		prompt("Num. elements in VALU")
		special(SPC_NOMOD)
		interest(3)
		initial("1")
	}
	field(ONVA,DBF_ULONG) {
		prompt("Num. elements in OVLA")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVB,DBF_ULONG) {
		prompt("Num. elements in OVLB")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVC,DBF_ULONG) {
		prompt("Num. elements in OVLC")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVD,DBF_ULONG) {
		prompt("Num. elements in OVLD")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVE,DBF_ULONG) {
		prompt("Num. elements in OVLE")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVF,DBF_ULONG) {
		prompt("Num. elements in OVLF")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVG,DBF_ULONG) {
		prompt("Num. elements in OVLG")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVH,DBF_ULONG) {
		prompt("Num. elements in VAlH")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVI,DBF_ULONG) {
		prompt("Num. elements in OVLI")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVJ,DBF_ULONG) {
		prompt("Num. elements in OVLJ")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVK,DBF_ULONG) {
		prompt("Num. elements in OVLK")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVL,DBF_ULONG) {
		prompt("Num. elements in OVLL")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVM,DBF_ULONG) {
		prompt("Num. elements in OVLM")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVN,DBF_ULONG) {
		prompt("Num. elements in OVLN")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVO,DBF_ULONG) {
		prompt("Num. elements in OVLO")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVP,DBF_ULONG) {
		prompt("Num. elements in OVLP")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVQ,DBF_ULONG) {
		prompt("Num. elements in OVLQ")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVR,DBF_ULONG) {
		prompt("Num. elements in OVLR")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVS,DBF_ULONG) {
		prompt("Num. elements in OVLS")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVT,DBF_ULONG) {
		prompt("Num. elements in OVLT")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
	field(ONVU,DBF_ULONG) {
		prompt("Num. elements in OVLU")
		special(SPC_NOMOD)
		interest(4)
		initial("1")
	}
}
