Global: ^LAB(64.062

FileMan FileNo	FileMan Filename	Package
64.062	LAB ELECTRONIC SUBTYPES	Lab Service

Directly Accessed By Routines, Total: 3

Package	Total	Routines
Lab Service	3	^LAB(64.061 RELATED NAME ^LAB(64.062

Package	Total	FileMan Files
Lab Service	1	LAB ELECTRONIC CODES(#64.061)[10]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.001	SEQUENCE		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<.1)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 20, 2007` HELP-PROMPT: `Type a Number between .1 and 9999, 0 Decimal Digits`
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `NOV 09, 2000` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION` DESCRIPTION: `This field contains the name or characteristic of the screen. Generally these name are related to LOINC terms describing units of measurement.` DELETE TEST: `1,0)= I 1` CROSS-REFERENCE: `64.062^B` `1)= S ^LAB(64.062,"B",$E(X,1,30),DA)=""` `2)= K ^LAB(64.062,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `64.062^C^MUMPS` `1)= S ^LAB(64.062,"C",$$UP^XLFSTR(X),DA)=""` `2)= K ^LAB(64.062,"C",$$UP^XLFSTR(X),DA)` `3)= Create upper case index` `This cross reference is used to provide an upper case lookup capability.`
1	ABBR	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<1) X` LAST EDITED: `NOV 13, 2000` HELP-PROMPT: `Answer must be 1-3 characters in length` DESCRIPTION: `This field contains abbreviations of the subtype. Abbreviation of the subtypes is also stored in LAB ELECTRONIC CODE (#64.061) file SCREEN (#11) field triggered by the SUBTYPE (#10) field.` `UNEDITABLE`

SEQUENCE

NUMBER

NAME

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: NOV 09, 2000
HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
DESCRIPTION:
This field contains the name or characteristic of the screen. Generally these name are related to LOINC terms describing units of measurement.
DELETE TEST: 1,0)= I 1
CROSS-REFERENCE: 64.062^B
1)= S ^LAB(64.062,"B",$E(X,1,30),DA)=""
2)= K ^LAB(64.062,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 64.062^C^MUMPS
1)= S ^LAB(64.062,"C",$$UP^XLFSTR(X),DA)=""
2)= K ^LAB(64.062,"C",$$UP^XLFSTR(X),DA)
3)= Create upper case index
This cross reference is used to provide an upper case lookup capability.

ABBR

0;2

FREE TEXT

INPUT TRANSFORM: K:$L(X)>3!($L(X)<1) X
LAST EDITED: NOV 13, 2000
HELP-PROMPT: Answer must be 1-3 characters in length
DESCRIPTION:
This field contains abbreviations of the subtype. Abbreviation of the subtypes is also stored in LAB ELECTRONIC CODE (#64.061) file SCREEN (#11) field triggered by the SUBTYPE (#10) field.
UNEDITABLE

NAME: Mass	NAME: Length	NAME: Volume	NAME: Speed	NAME: Time	NAME: Ratio	NAME: Class	NAME: Report Units
NAME: Fraction	NAME: Per	NAME: SP Db	NAME: MI Db	NAME: BB Db	NAME: SCT Heir	NAME: EM Db	NAME: CY Db

Name	Field # of Occurrence
$$UP^XLFSTR	.01(XREF 2S), .01(XREF 2K)

Name	Line Occurrences (* Changed, ! Killed)
^LAB(64.062 - [#64.062]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K)

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K)
X	.001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1+1!