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 |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^LRT(67.2

Package: Lab Service

Global: ^LRT(67.2


Information

FileMan FileNo FileMan Filename Package
67.2 STERILIZER Lab Service

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
IHS Changes To Lab 1 BLRTNORD    
Lab Service 1 ^LRT(67.2    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Lab Service 2 WKLD LOG FILE(#64.03)[2]    WKLD DATA(#64.1)[#64.1111(9)]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[.104]    
Lab Service 1 LAB DATA(#63)[63]    

Fields, Total: 6

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
  • HELP-PROMPT:  NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
  • DESCRIPTION:  
    Name of the sterilizer.
  • CROSS-REFERENCE:  67.2^B
    1)= S ^LRT(67.2,"B",$E(X,1,30),DA)=""
    2)= K ^LRT(67.2,"B",$E(X,1,30),DA)
.1 LOCATION .1;1 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  MAR 22, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-10 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Location of the sterilizer.
  • CROSS-REFERENCE:  67.2^AC^MUMPS
    1)= S:$D(^LRT(67.2,DA,"LR")) ^LR(+^LRT(67.2,DA,"LR"),.1)=^LRT(67.2,DA,.1)
    2)= K:$D(^LRT(67.2,DA,"LR")) ^LR(+^LRT(67.2,DA,"LR"),.1)
.104 PROVIDER .104;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 14, 1993
  • DESCRIPTION:  
    Name of provider
3 DATE INSTALLED 0;3 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    Date of installation of the sterilizer.
9 IDENTIFIER 0;9 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2) X I $D(X),$O(^LRT(67.2,"C",X,0))>0 K X W *7,!,"Already exists",!
  • LAST EDITED:  OCT 18, 1984
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Short description categorizing the sterilizer.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  67.2^C
    1)= S ^LRT(67.2,"C",$E(X,1,30),DA)=""
    2)= K ^LRT(67.2,"C",$E(X,1,30),DA)
63 LABORATORY REFERENCE LR;1 POINTER TO LAB DATA FILE (#63) LAB DATA(#63)

  • INPUT TRANSFORM:  K X
  • LAST EDITED:  APR 25, 1985
  • HELP-PROMPT:  Any changes to this entry must be made from the lab data entry routines. This is the patient's record number in the lab data file.
  • DESCRIPTION:  
    Sterilizer's record number in the lab data file.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY:  ^
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

External References

Name Field # of Occurrence
^%DT 3+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] .1(XREF 1S), .1(XREF 1K)
^LRT(67.2 - [#67.2] .01(XREF 1S), .01(XREF 1K), .1(XREF 1S), .1(XREF 1K), 9+1, 9(XREF 1S), 9(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(".1" ID.1+1
^("0" ID3+1, ID9+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 3+1*
>> DA .01(XREF 1S), .01(XREF 1K), .1(XREF 1S), .1(XREF 1K), 9(XREF 1S), 9(XREF 1K)
U ID.1+1, ID3+1, ID9+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .1+1!, 3+1*!, 9+1!, 9(XREF 1S), 9(XREF 1K), 63+1!
>> Y 3+1
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All