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

Info | Desc | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | All

Print Page as PDF

Global: ^LAB(62.06

Package: Lab Service

Global: ^LAB(62.06

Information

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')=""

Accessed By FileMan Db Calls, Total: 8

Pointed To By FileMan Files, Total: 6

Pointer To FileMan Files, Total: 4

Fields, Total: 14

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`
1.1	AFB DRUG NODE	0;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 22, 2006` HELP-PROMPT: `Answer must be 1-15 characters in length` DESCRIPTION: `Defines the position of the NAME in the database. The subscript location of the AFB antibiotic in the LAB DATA file.` `WRITE AUTHORITY: ^` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` `TRIGGERED by the AFB INTERNAL NAME field of the ANTIMICROBIAL SUSCEPTIBILITY File` FIELD INDEX: `AD1 (#1047) REGULAR IR SORTING ONLY` `Short Descr: Cross-reference to link AFB drugs with corresponding drug node in file #63.` `Description: This cross-reference is used to link the AFB drug nodes in the MYCOBACTERIUM subfile (#63.39) of LAB DATA file (#63) with the corresponding antimicrobial drug in this file (#62.06).` `Set Logic: S ^LAB(62.06,"AD1",$E(X,1,30),DA)=""` `Kill Logic: K ^LAB(62.06,"AD1",$E(X,1,30),DA)` `Whole Kill: K ^LAB(62.06,"AD1")` `X(1): AFB DRUG NODE (62.06,1.1) (Subscr 1) (Len 30) (forwards)`
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)	LAB DATA(#63) INPUT TRANSFORM: `S DIC("S")="I Y>2,Y<200,X'[""INTERP"",X'[""SCREEN""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X K:$P(^LAB(62.06,DA,0),U,8) X` OUTPUT TRANSFORM: `S Y=$$GET1^DID(63.3,Y,"","LABEL")` LAST EDITED: `MAR 22, 2006` 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)`
5.1	AFB INTERNAL NAME	0;8	POINTER TO MYCOBACTERIUM SUB-FIELD FILE (#63)	LAB DATA(#63) INPUT TRANSFORM: `S DIC("S")="I $$GET1^DID(63.39,Y,"""",""GLOBAL SUBSCRIPT LOCATION"")?1""2.""1.N1"";1""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X K:$P(^LAB(62.06,DA,0),U,4) X` OUTPUT TRANSFORM: `S Y=$$GET1^DID(63.39,Y,"","LABEL")` LAST EDITED: `OCT 10, 2008` HELP-PROMPT: `The internally used name of the AFB antibiotic, usually a shortened version.` SCREEN: `S DIC("S")="I $$GET1^DID(63.39,Y,"""",""GLOBAL SUBSCRIPT LOCATION"")?1""2.""1.N1"";1"""` EXPLANATION: `Select only AFB antibiotic names.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `^^TRIGGER^62.06^1.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,9),X=X S DIU=X K Y X ^DD(62.06,5.1,1,1,1.1) S DIH=$G(^LAB(62.06,DIV(0),0)),DIV=X S $P(^(0),U,9)=DIV,DIH=62.06,DIG=1.1 D ^DICR` `1.1)= S X=DIV S X=$P($$GET1^DID(63.39,$P(^LAB(62.06,DA,0),U,8),"","GLOBAL SUBSCRIPT LOCATION"),";")` `2)= 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,9),X=X S DIU=X K Y S X="" S DIH=$G(^LAB(62.06,DIV(0),0)),DIV=X S $P(^(0),U,9)=DIV,DIH=62.06,DIG=1.1 D ^DICR` `3)= DO NOT DELETE - used by Lab software to determine NLT/LOINC coding of AFB drugs.` `CREATE VALUE)= S X=$P($$GET1^DID(63.39,$P(^LAB(62.06,DA,0),U,8),"","GLOBAL SUBSCRIPT LOCATION"),";")` `DELETE VALUE)= @` `FIELD)= AFB DRUG NODE`
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.`

Found Entries, Total: 36

ICR, Total: 3

Info | Desc | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | All