Global: ^LAB(62.06

FileMan FileNo	FileMan Filename	Package
62.06	ANTIMICROBIAL SUSCEPTIBILITY	Lab Service

FileMan FileNo

FileMan Filename

Package

62.06

ANTIMICROBIAL SUSCEPTIBILITY

Lab Service

Description

This file is used by each laboratory to define specific information about the types of antibacterial antibiotics your laboratory uses. (NOTE: TB drugs do not have entries in this file.) It contains approximately 40 pre-supplied entries. Each of the entries may be defined according to the needs of your hospital. Information which is site-configurable for each antibiotic includes the sensitivity result (S,I or R), the interpretation for each type of result, the type of specimen the antibiotic is used on, the type of template the system uses to display the result and the abbreviation. (The abbreviation is also used to report these antibiotics on the specialized 'Infection Control' and 'Antibiotic Trends' microbiology reports. ^LAB(62.06,"AJ",'DRUG NODE','INTERPRETATION')="" ^LAB(62.06,"AI",'DRUG NODE') = INTERNAL # ANTIBIOTIC ^ ABBREVIATION ^LAB(62.06,"AI",'DRUG NODE','RESULT') = INTERPRETATION ^LAB(62.06,"AI",'DRUG NODE','RESULT','ORGANISM (INTRP)','SPECIMEN (INTRP)') = ALTERNATE INTERPRETATION ^LAB(62.06,"AS",'DRUG NODE') = DEFAULT SCREEN ^LAB(62.06,"AS",'DRUG NODE','ORGANISM (SCREEN)','SPECIMEN (SCREEN)') = ALTERNATE SCREEN ^LAB(62.06,"AO",'PRINT ORDER','NUMBER')=""

Package	Total	Routines
Lab Service	35	*ORGANISM ALTERNATE INTERPRETATION DRUG LR132P LR7OSMZ5 LREPI LREPI1 LREPILK LREPISRV LRLNC0 LRMIPSZ5 LRMISEZ1 LRMISEZA LRMISEZB LRMISR LRMISR1 LRMITRZ1 LRMITRZA LRMITSE LRMIXALL ^LAB(62.06 LRMITSP LRMITSPO LRMIV4 LRMIXR1 LRMIXR2 LRMIXR3 LRMIZAP LRMIZAP1 LROR4B LRPXAPIU LRPXSXRB LRSRVR2 LRSRVR3 SUSCEPTIBILITY RESULT
Automated Lab Instruments	24	DRUG LA7CHLU5 LA7COBX3 LA7CORU1 LA7VCMI LA7VHLU5 LA7VOBX3 LA7VORU1 LAHWATCH LAMIAUT3 LAMIAUT6 LAMICRA LAMIVT5 LAMIVT6 LAMIVTE6 LAMIVTK LAMIVTK6 LAMIVTKU LAMIVTL2 LAMIVTL6 LAMIVTLC LAMSA1 LAMSBLD LAPOS
IHS Changes To Lab	10	BLR7OMZ5 BLRALBM4 BLRLINKO BLRLINKP BLRLINKR BLRMIEHR BLRMIRPT BLRMLTL BLRRLMUM BLRTNM
Mental Health Social Services	1	AMHSC1
Patient Chart	1	BPCSC1
VueCentric RPMS Support	1	CIAZPLMI

Package

Total

Routines

Lab Service

*ORGANISM    ALTERNATE INTERPRETATION    DRUG    LR132P    LR7OSMZ5    LREPI    LREPI1    LREPILK
LREPISRV    LRLNC0    LRMIPSZ5    LRMISEZ1    LRMISEZA    LRMISEZB    LRMISR    LRMISR1
LRMITRZ1    LRMITRZA    LRMITSE    LRMIXALL    ^LAB(62.06    LRMITSP    LRMITSPO    LRMIV4
LRMIXR1    LRMIXR2    LRMIXR3    LRMIZAP    LRMIZAP1    LROR4B    LRPXAPIU    LRPXSXRB
LRSRVR2    LRSRVR3    SUSCEPTIBILITY RESULT

Automated Lab Instruments

DRUG    LA7CHLU5    LA7COBX3    LA7CORU1    LA7VCMI    LA7VHLU5    LA7VOBX3    LA7VORU1
LAHWATCH    LAMIAUT3    LAMIAUT6    LAMICRA    LAMIVT5    LAMIVT6    LAMIVTE6    LAMIVTK
LAMIVTK6    LAMIVTKU    LAMIVTL2    LAMIVTL6    LAMIVTLC    LAMSA1    LAMSBLD    LAPOS

IHS Changes To Lab

BLR7OMZ5 BLRALBM4 BLRLINKO BLRLINKP BLRLINKR BLRMIEHR BLRMIRPT BLRMLTL
BLRRLMUM BLRTNM

Mental Health Social Services

AMHSC1

Patient Chart

BPCSC1

VueCentric RPMS Support

CIAZPLMI

Package	Total	Routines
Automated Lab Instruments	4	LA7CHLU5 LA7COBX3 LA7VHLU5 LA7VOBX3
IHS Changes To Lab	3	BLRMIEHR BLRMIRPT BLRRLMUM
Lab Service	3	LRLNC0 LRSRVR2 LRSRVR3
Health Summary	1	GMTSLRME
Order Entry Results Reporting	1	ORDV05E
VueCentric RPMS Support	1	CIAZPLMI

Package

Total

Routines

Automated Lab Instruments

LA7CHLU5 LA7COBX3 LA7VHLU5 LA7VOBX3

IHS Changes To Lab

BLRMIEHR BLRMIRPT BLRRLMUM

Lab Service

LRLNC0 LRSRVR2 LRSRVR3

Health Summary

GMTSLRME

Order Entry Results Reporting

ORDV05E

VueCentric RPMS Support

CIAZPLMI

Package	Total	FileMan Files
Lab Service	3	AUTO INSTRUMENT(#62.4)[#62.46(.01)] LAB SEARCH/EXTRACT(#69.5)[#69.55(.01)] WKLD CODE(#64)[#64.023(.01)]
Automated Lab Instruments	1	LABORATORY INSTRUMENT CODE(#61.39)[#61.392(2)]
IHS Changes To Lab	1	IHS LAB TRANSACTION LOG(#9009022)[1303]
IHS Patient	1	V MICROBIOLOGY(#9000010.25)[.05]

Package

Total

FileMan Files

Lab Service

AUTO INSTRUMENT(#62.4)[#62.46(.01)] LAB SEARCH/EXTRACT(#69.5)[#69.55(.01)] WKLD CODE(#64)[#64.023(.01)]

Automated Lab Instruments

LABORATORY INSTRUMENT CODE(#61.39)[#61.392(2)]

IHS Changes To Lab

IHS LAB TRANSACTION LOG(#9009022)[1303]

IHS Patient

V MICROBIOLOGY(#9000010.25)[.05]

Package	Total	FileMan Files
Lab Service	4	TOPOGRAPHY FIELD(#61)[#62.062(.01), #62.08(2), #62.091(2)] ETIOLOGY FIELD(#61.2)[#62.08(1), #62.081(.01), #62.091(1)] WKLD CODE(#64)[64] LAB DATA(#63)[5]

Package

Total

FileMan Files

Lab Service

TOPOGRAPHY FIELD(#61)[#62.062(.01), #62.08(2), #62.091(2)]
ETIOLOGY FIELD(#61.2)[#62.08(1), #62.081(.01), #62.091(1)]
WKLD CODE(#64)[64] LAB DATA(#63)[5]

Fields, Total: 12

Field #	Name	Loc	Type	Details
.001	NUMBER		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 20, 1984` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND 9999` DESCRIPTION: The internal number associated with the name. This number determines the sequence of display of antibiotics.
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` LAST EDITED: `MAY 22, 1984` HELP-PROMPT: `ANSWER MUST BE 3-30 CHARACTERS IN LENGTH` DESCRIPTION: The name of the antibiotic. CROSS-REFERENCE: `62.06^B` 1)= S ^LAB(62.06,"B",$E($P(X,"^",1),1,30),DA)="" 2)= K ^LAB(62.06,"B",$E($P(X,"^",1),1,30),DA)
.5	PRINT ORDER	0;7	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>999.999)!(X<.001)!(X?.E1"."4N.N) X Q:$D(DIU(0)) I $D(X),$O(^LAB(62.06,"AO",X,0)) W *7," PRINT ORDER is already used by another antibiotic.",! K X` LAST EDITED: `JUN 22, 1987` HELP-PROMPT: `TYPE A NUMBER BETWEEN .001 AND 999.999` DESCRIPTION: The print order will determine the order in which the antibiotic will be displayed on reports. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `62.06^AO` 1)= S ^LAB(62.06,"AO",$E(X,1,30),DA)="" 2)= K ^LAB(62.06,"AO",$E(X,1,30),DA)
1	DRUG NODE	0;2	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) S X=$P($P(^DD(63.3,$P(^LAB(62.06,DA,0),U,4),0),U,4),";",1)` LAST EDITED: `MAY 26, 1994` HELP-PROMPT: `STUFFED AUTOMATICALLY` DESCRIPTION: Defines the position of the NAME in the database. The subscript location of the antibiotic in the LAB DATA file. WRITE AUTHORITY: ^ NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` TRIGGERED by the INTERNAL NAME field of the ANTIMICROBIAL SUSCEPTIBILITY File CROSS-REFERENCE: `62.06^AJ^MUMPS` 1)= D BUGNODE^LRMIXR1 2)= K ^LAB(62.06,"AJ",+X) CROSS-REFERENCE: `62.06^AS^MUMPS` 1)= D BUGNODE^LRMIXR2 2)= K ^LAB(62.06,"AS",+X) CROSS-REFERENCE: `62.06^AI^MUMPS` 1)= D BUGNODE^LRMIXR3 2)= K ^LAB(62.06,"AI",+X) CROSS-REFERENCE: `62.06^AD` 1)= S ^LAB(62.06,"AD",$E(X,1,30),DA)="" 2)= K ^LAB(62.06,"AD",$E(X,1,30),DA) CROSS-REFERENCE: `62.06^AG^MUMPS` 1)= D ^LRMIXALL 2)= D ^LRMIXALL
2	SUSCEPTIBILITY RESULT	1;0	Multiple #62.061	62.061 DESCRIPTION: This is a multiple field. It contains the susceptibility result and the interpretation.
3	*PRIMARY DISPLAY	2;0	POINTER Multiple #62.062	62.062 DESCRIPTION: No longer used. Will be deleted after 1/89.
4	DISPLAY COMMENT	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>40!($L(X)<2) X` LAST EDITED: `MAY 22, 1984` HELP-PROMPT: `ANSWER MUST BE 2-40 CHARACTERS IN LENGTH` DESCRIPTION: This field contains any relevant comment that is to be displayed with this antibiotic susceptibility.
5	INTERNAL NAME	0;4	POINTER TO ORGANISM SUB-FIELD FILE (#63)	**********************REQUIRED FIELD********************** LAB DATA(#63) INPUT TRANSFORM: `S DIC("S")="I Y>2,Y<200,X'[""INTERP"",X'[""SCREEN""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `MAR 27, 1987` DESCRIPTION: The internally used name of the antibiotic, usually a shortened version. SCREEN: `S DIC("S")="I Y>2,Y<200,X'[""INTERP"",X'[""SCREEN"""` EXPLANATION: `Select on antibiotic names` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `^^TRIGGER^62.06^1` 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LAB(62.06,D0,0)):^(0),1:"") S X=$P(Y(1),U,2) S DIU=X K Y X ^DD(62.06,5,1,1,1.1) X ^DD(62.06,5,1,1,1.4) 1.1)= S X=DIV X $P(^DD(62.06,1,0),U,5,99) 1.4)= S DIH=$S($D(^LAB(62.06,DIV(0),0)):^(0),1:""),DIV=X S %=$P(DIH,U,3,999),^(0)=$P(DIH,U,1,1)_U_DIV_$S(%]"":U_%,1:""),DIH=62.06,DIG=1 D ^DICR:$O(^DD(DIH,DIG,1,0))>0 2)= Q CREATE VALUE)= X $P(^DD(62.06,1,0),U,5,99) DELETE VALUE)= NO EFFECT FIELD)= BUG PIECE CROSS-REFERENCE: `62.06^C^MUMPS` 1)= S ^LAB(62.06,"C",$P(^DD(63.3,X,0),U,1),DA)="" 2)= K ^LAB(62.06,"C",$P(^DD(63.3,X,0),U,1),DA)
6	ABBREVIATION	0;5	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<3) X Q:$D(DIU(0)) I $D(X) I $D(^LAB(62.06,"D",X)) W " DUPLICATE" K X` LAST EDITED: `DEC 16, 1986` HELP-PROMPT: `ANSWER MUST BE 3 CHARACTERS IN LENGTH` DESCRIPTION: `This is the three letter abbreviation used in the INFECTION CONTROL and ANTIBIOTIC TREND reports. An abbreviation must be defined for all antibiotics that need to go on these reports. The order of the antibiotics on the` report is determined by the order number (internal file number) of the antibiotic entry in the file. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `62.06^D` 1)= S ^LAB(62.06,"D",$E(X,1,30),DA)="" 2)= K ^LAB(62.06,"D",$E(X,1,30),DA) CROSS-REFERENCE: `62.06^AF^MUMPS` 1)= S:$P(^LAB(62.06,DA,0),U,2) ^LAB(62.06,"AI",+$P(^LAB(62.06,DA,0),U,2))=DA_U_X 2)= S:$P(^LAB(62.06,DA,0),U,2) ^LAB(62.06,"AI",+$P(^LAB(62.06,DA,0),U,2))=DA_U
7	DEFAULT SCREEN	0;6	SET	'A' FOR ALWAYS DISPLAY; 'N' FOR NEVER DISPLAY; 'R' FOR RESTRICT DISPLAY; LAST EDITED: `FEB 03, 1987` DESCRIPTION: `The DEFAULT SCREEN may be used to specify how the antibiotic results and/or interpretation will be displayed. 'A' will always display the result, 'N' will never display the result (unless the user has the LRLAB key), 'R'` restricts the display so that the result is only displayed if the interpretation of all antibiotics that are always displayed is resistant. No entry in this field will default to 'A'. This screen may be overridden by an ALTERNATE SCREEN (organism and/or specimen specific) or by direct user input of a screen when entering results. CROSS-REFERENCE: `62.06^AC^MUMPS` 1)= I $L($P(^LAB(62.06,DA,0),U,2)) S ^LAB(62.06,"AS",+$P(^(0),U,2))=X 2)= I $L($P(^LAB(62.06,DA,0),U,2)) S ^LAB(62.06,"AS",+$P(^(0),U,2))=""
8	ALTERNATE SCREEN	3;0	SET Multiple #62.08	62.08 DESCRIPTION: If for some reason the screen should be different for certain specimens or organisms, when compared to the normal display, indicate how the system should handle these cases. IDENTIFIED BY: `ORGANISM (SCREEN)(#1)[R], SPECIMEN (SCREEN)(#2)[R]`
64	NATIONAL VA LAB CODE	64;1	POINTER TO WKLD CODE FILE (#64)	WKLD CODE(#64) LAST EDITED: `SEP 23, 2001` HELP-PROMPT: `Enter the corresponding VA National Code.` DESCRIPTION: This field is used to map antimicrobial susceptibilty in file 62.06 to the VA National Labe codes found in file 64.

ICR, Total: 3

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #574	QUALITY IMPROVEMENT CHECKLIST	NAME (.01). Access: Read w/Fileman DRUG NODE (1). Access: Read w/Fileman	The above references will be made from the QIP5*routines which, while belonging to the QIP namespace, will be maintained bythe lab developers. Coordination of release and patches will be through theQIP custodial ISC.
ICR #4337	ORDER ENTRY/RESULTS REPORTING	NAME (.01). Access: Read w/Fileman	A lookup is done on the file using the "AD" crossreference and MIX^DIC
ICR #5432	Methicillin Resistant Staph Aurerus Initiative	DRUG NODE (1). Access: Direct Global Read & w/Fileman

Name	Field # of Occurrence
^DIC	5+1
^DICR	5(XREF 1n1.4)
^LRMIXALL	1(XREF 5S), 1(XREF 5K)
BUGNODE^LRMIXR1	1(XREF 1S)
BUGNODE^LRMIXR2	1(XREF 2S)
BUGNODE^LRMIXR3	1(XREF 3S)

Name

Field # of Occurrence

^DIC

5+1

^DICR

5(XREF 1n1.4)

^LRMIXALL

1(XREF 5S), 1(XREF 5K)

BUGNODE^LRMIXR1

1(XREF 1S)

BUGNODE^LRMIXR2

1(XREF 2S)

BUGNODE^LRMIXR3

1(XREF 3S)

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	5(XREF 1n1.4)
^DD(62.06	5(XREF 1S), 5(XREF 1n1.1)
^DD(63.3	ID5+1, 1+1, 5(XREF 2S), 5(XREF 2K)
^LAB(62.06 - [#62.06]	.01(XREF 1S), .01(XREF 1K), .5+1, .5(XREF 1S), .5(XREF 1K), 1+1, 1(XREF 1K), 1(XREF 2K), 1(XREF 3K), 1(XREF 4S) , 1(XREF 4K), 5(XREF 1S), 5(XREF 1n1.4), 5(XREF 2S), 5(XREF 2K), 6+1, 6(XREF 1S), 6(XREF 1K), 6(XREF 3S), 6(XREF 3K) , 7(XREF 1S), 7(XREF 1K)

Name	Field # of Occurrence
^("0"	ID5+1
^(0	ID5+1, 5(XREF 1S), 5(XREF 1n1.4), 7(XREF 1S), 7(XREF 1K)

Name

Field # of Occurrence

^("0"

ID5+1

^(0

ID5+1, 5(XREF 1S), 5(XREF 1n1.4), 7(XREF 1S), 7(XREF 1K)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	5(XREF 1n1.4)
>> D0	5(XREF 1S)
>> DA	.01(XREF 1S), .01(XREF 1K), .5(XREF 1S), .5(XREF 1K), 1+1, 1(XREF 4S), 1(XREF 4K), 5(XREF 1S), 5(XREF 2S), 5(XREF 2K) , 6(XREF 1S), 6(XREF 1K), 6(XREF 3S), 6(XREF 3K), 7(XREF 1S), 7(XREF 1K)
DIC	ID5+1, 5+1!*
DIC("S"	5+1, 5SCR+1
>> DIE	5+1
>> DIG	5(XREF 1n1.4)
>> DIH	5(XREF 1n1.4)
>> DIU	5(XREF 1S)
>> DIU(0	.5+1, 6+1
DIV	5(XREF 1S), 5(XREF 1n1.1), 5(XREF 1n1.4)
DIV(0	5(XREF 1S), 5(XREF 1n1.4)
U	ID5+1, 1+1, 5(XREF 1S), 5(XREF 1n1.1), 5(XREF 1n1.4), 5(XREF 2S), 5(XREF 2K), 6(XREF 3S), 6(XREF 3K), 7(XREF 1S) , 7(XREF 1K)
X	.001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .5+1!, .5(XREF 1S), .5(XREF 1K), 1+1!, 1(XREF 1K), 1(XREF 2K) , 1(XREF 3K), 1(XREF 4S), 1(XREF 4K), 4+1!, 5+1!, 5(XREF 1S), 5(XREF 1n1.1), 5(XREF 1n1.4), 5(XREF 2S), 5(XREF 2K) , 6+1!, 6(XREF 1S), 6(XREF 1K), 6(XREF 3S), 7(XREF 1S)
Y	5+1, 5(XREF 1S)
Y(1	5(XREF 1S)

Customize PDF page

Package: Lab Service

Global: ^LAB(62.06

Information

Description

Directly Accessed By Routines, Total: 72

Accessed By FileMan Db Calls, Total: 13

Pointed To By FileMan Files, Total: 6

Pointer To FileMan Files, Total: 4

Fields, Total: 12

ICR, Total: 3

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: