Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  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

Directly Accessed By Routines, Total: 72

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    

Accessed By FileMan Db Calls, Total: 13

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    

Pointed To By FileMan Files, Total: 6

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]    

Pointer To FileMan Files, Total: 4

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]    

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

    External References

    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)

    Naked Globals

    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)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All