Global: ^APCLGENG

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `SEP 23, 2008` HELP-PROMPT: `Answer must be 3-30 characters in length.` CROSS-REFERENCE: `9001201^B` 1)= S ^APCLGENG("B",$E(X,1,30),DA)="" 2)= K ^APCLGENG("B",$E(X,1,30),DA)
.02	ORDER TO DISPLAY	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 23, 2008` HELP-PROMPT: `Type a Number between 1 and 999, 0 Decimal Digits` CROSS-REFERENCE: `9001201^O` 1)= S ^APCLGENG("O",$E(X,1,30),DA)="" 2)= K ^APCLGENG("O",$E(X,1,30),DA)
.03	PATIENT/VISIT	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<1) X` LAST EDITED: `SEP 25, 2008` HELP-PROMPT: `Answer must be 1-2 characters in length.`
1101	DESCRIPTION	11;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `SEP 23, 2008` HELP-PROMPT: `Answer must be 1-80 characters in length.`

Information