Global: ^CIAZG(19950.46

FileMan FileNo	FileMan Filename	Package
19950.46	GENERIC RETRIEVAL COMPUTED VALUE	Generic Retrieval Utility

Package	Total	FileMan Files
Generic Retrieval Utility	1	GENERIC RETRIEVAL DATATYPE(#19950.43)[4]
Kernel	1	NEW PERSON(#200)[2]

Fields, Total: 7

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `DEC 09, 2004` HELP-PROMPT: `Answer must be 3-50 characters in length.` CROSS-REFERENCE: `19950.46^B` 1)= S ^CIAZG(19950.46,"B",$E(X,1,30),DA)="" 2)= K ^CIAZG(19950.46,"B",$E(X,1,30),DA)
1	SOURCE	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."7N.N) X` LAST EDITED: `DEC 09, 2004` HELP-PROMPT: `Source file or subfile #.`
2	OWNER	0;3	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `DEC 09, 2004` HELP-PROMPT: `Owner of this computed value definition.`
3	ACCESS	0;4	SET	'0' FOR PRIVATE; '1' FOR PUBLIC; LAST EDITED: `DEC 09, 2004`
4	DATATYPE	0;5	POINTER TO GENERIC RETRIEVAL DATATYPE FILE (#19950.43)	GENERIC RETRIEVAL DATATYPE(#19950.43) LAST EDITED: `DEC 09, 2004` HELP-PROMPT: `Datatype of returned value.`
10	RETRIEVAL LOGIC	10;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `DEC 09, 2004` HELP-PROMPT: `M logic to set computed value into X.` WRITE AUTHORITY: @
99	DESCRIPTION	99;0	WORD-PROCESSING #19950.4699