Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Print Page as PDF

Sub-Field: 690.231

Package: Medicine

MEDICINE VIEW(#690.2)-->690.23-->690.231

Sub-Field: 690.231

Information

Parent File	Name	Number	Package
690.23	SUB-FIELD	690.231	Medicine

Details

Field #	Name	Loc	Type	Details
.01	SUB-FIELD	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999.999)!(X<.001)!(X?.E1"."4N.N) X` LAST EDITED: `NOV 16, 1992` HELP-PROMPT: `Type a Number between .001 and 999999999.999, 3 Decimal Digits` CROSS-REFERENCE: `690.231^B` `1)= S ^MCAR(690.2,DA(2),2,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^MCAR(690.2,DA(2),2,DA(1),1,"B",$E(X,1,30),DA)`
1	ORDER ENTRY USAGE	0;2	SET	'D' FOR DIAGNOSIS; 'I' FOR INDICATION; 'T' FOR IDENTIFIER; 'O' FOR OTHER; 'U' FOR UNKNOWN; 'S' FOR SUMMARY; LAST EDITED: `NOV 16, 1992`
2	ASTM	0;3	POINTER TO ASTM FILE (#690.5)	ASTM(#690.5) LAST EDITED: `OCT 12, 1993`
3	VALUE TYPE	0;4	SET	'ST' FOR String data; 'TX' FOR Text; 'TS' FOR Time stamp; 'CE' FOR Coded entry; LAST EDITED: `OCT 12, 1993`
4	UNITS	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `OCT 12, 1993` HELP-PROMPT: `Answer must be 1-20 characters in length.`
5	RANGES	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>40!($L(X)<1) X` LAST EDITED: `OCT 12, 1993` HELP-PROMPT: `Answer must be 1-40 characters in length.`
6	SEG	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<3) X` LAST EDITED: `OCT 26, 1993` HELP-PROMPT: `Answer must be 3 characters in length.`
7	PIECE	0;8	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>254)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 26, 1993` HELP-PROMPT: `Type a Number between 1 and 254, 0 Decimal Digits`
8	CODING	0;9	SET	'ICD9' FOR ICD9 CODING; 'ASTM' FOR ASTM CODING; 'DD' FOR DATA DICTIONARY CODING; 'SUM' FOR SUMMARY CODING; 'MIS' FOR MISS; 'INFO' FOR PROGRAMMERS ONLY; 'OBR' FOR ADDITION TO OBR; LAST EDITED: `OCT 26, 1993` HELP-PROMPT: `Type a Number between 1 and 254, o Decimal Digits`