Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRMISEZ2

Package: Lab Service

Routine: LRMISEZ2


Information

LRMISEZ2 ; IHS/DIR/AAB - MICRO INFECTION CTRL SURVEY 10/1/87 17:12 ; [ 05/15/2003 12:30 PM ]

Source Information

Source file <LRMISEZ2.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 3 ^LRMISEZ3  D^LRU  $$Y2K^LRX  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRMISEZ1  

Entry Points

Name Comments DBIA/ICR reference
LLOC
BG
NAME
SIT
FX ;S X=^TMP($J,S,M,LRLLOC,LRNAME,LRSIT,LRAC,LROR,LRBG),SSN=$P(X,U,2),LRQUANT=$P(X,U,3),X=+X,LRDAT=$$Y2K^LRX(X)_" ",LRPNM=$P(LRNAME,U)
LIN
M
AC
LD
NLOC
NOD
TYPE
OR
HDR

External References

Name Field # of Occurrence
^%DT HDR
^LRMISEZ3 TYPE+1
D^LRU M, HDR
$$Y2K^LRX FX+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TYPE+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TYPE+3
Function Call: WRITE
  • Prompt: !!,$E($P(LRNLOC,U),1,25)
  • Line Location: LLOC+0
Function Call: WRITE
  • Prompt: LIN
  • Condition for execution: S'="PAT" ! S LRPAT=0,X=43 D:S'="PAT"
  • Line Location: LLOC+0
Function Call: WRITE
  • Prompt: ?25,$E(SSN,1,3),"-",$E(SSN,4,5),"-",$E(SSN,6,9),!
  • Line Location: FX+2
Function Call: WRITE
  • Prompt: ?25,HRCN,!
  • Line Location: FX+3
Function Call: WRITE
  • Prompt: !,$E(LRBUG,1,13),?13,$E($P(LRSIT,U),1,7)
  • Line Location: FX+4
Function Call: WRITE
  • Prompt: !?2,$E(LRBUG,1,32),?34,$J(LRSUM,3),")",?37,$J(LRAC,5),?43
  • Line Location: FX+8
Function Call: WRITE
  • Prompt: LRLIN,!
  • Line Location: FX+11
Function Call: WRITE
  • Prompt: @IOF,!,Y,?21,"INFECTION CONTROL SURVEY REPORT BY ",$S(S="LOC":"LOCATION",S="DOC":"PROVIDER",1:"PATIENT"),?70,"PAGE ",$J(LRPG,5)
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,?2,"** Reports only those specimens collected > ",LRLOS,$S(LRLOS>1:" days",1:" day")," from admission date **"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,LRAAN,?6,"From: ",LRST," To: ",LRLST,?43
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "|",$E($P(B(I),U,2),1)
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?25,"SSN"
  • Condition for execution: S="PAT"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?43
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "|",$E($P(B(I),U,2),2)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "|",!,$S(S="LOC":"Location",S="DOC":"Provider",1:"Patient")
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?25,"HRCN"
  • Condition for execution: S="PAT"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?43
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?43
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "|",$E($P(B(I),U,2),3)
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: "|",!,?10,"** ANTIBIOTIC PATTERN **",?43
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: "|",$S($L($P(B(I),U,3)):$P(B(I),U,3),1:" ")
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: "|",!
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: !!,$E($P(LRNLOC,U),1,14),?15,LRMY,":"
  • Line Location: LD+0
Function Call: WRITE
  • Prompt: !
  • Line Location: LD+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: LIN+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61.2 - [#61.2] BG
^TMP($J M, LLOC, NLOC+1, NLOC+2, NAME, SIT, AC, OR, BG*, FX+1
, FX+10*, NOD

Label References

Name Line Occurrences
AC SIT
BG OR
FX BG
HDR TYPE, TYPE+2, TYPE+3, LLOC, NAME, SIT, AC, OR, BG, FX+4
LD NAME, SIT, AC, OR, BG, FX+4
LIN LLOC, FX+3, LD
LLOC M
M TYPE, TYPE+2, TYPE+3
NAME LLOC
NLOC LLOC
NOD FX+10
OR AC
SIT NAME

Naked Globals

Name Field # of Occurrence
^( BG, FX+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT HDR*
>> A1 HDR+12*, LIN*
>> B( HDR+2, HDR+4, HDR+10, HDR+11
>> HRCN FX+1*, FX+3, FX+6
>> I M*, LLOC*, NAME*, SIT*, AC*, OR*, BG*, FX+10*, HDR+2*, HDR+4*
, HDR+10*, HDR+11*
IOF TYPE, TYPE+1, TYPE+2, TYPE+3, HDR
IOM HDR+12
>> LRAAN HDR+2
>> LRAC AC*, OR, BG, FX+1, FX+8, FX+10, NOD
>> LRAD M*
>> LRAP HDR+11
>> LRBG BG*, FX+1, FX+10, NOD
>> LRBUG BG*, FX+4, FX+8
>> LRDAT FX+1*, FX+6, FX+7
>> LRLIN FX+9*, FX+11, NOD*
>> LRLLOC LLOC*, NLOC, NLOC+1, NAME, SIT, AC, OR, BG, FX+1, FX+10
, NOD
>> LRLOS HDR+1
>> LRLST HDR+2
>> LRM("D" TYPE+2
>> LRM("L" TYPE
>> LRM("O" TYPE+1
>> LRM("P" TYPE+3
>> LRMY M*, LD
>> LRNAME NAME*, SIT, AC, OR, BG, FX+1, FX+10, NOD
>> LRNLOC LLOC, NLOC*, NLOC+1*, NLOC+2*, LD
>> LROR OR*, BG, FX+1, FX+10, NOD
>> LRPAT LLOC*, FX+3*
>> LRPG TYPE*, TYPE+2*, TYPE+3*, HDR*
>> LRPNM FX+1*, FX+6
>> LRQUANT FX+1*, FX+6, FX+7
>> LRSIT SIT*, AC, OR, BG, FX+1, FX+4, FX+6, FX+7, FX+10, NOD
>> LRSIT(1 HDR+7
>> LRST HDR+2
>> LRSUM AC*, FX+8*
>> LRYA FX+10*, NOD
>> LRZ( NOD
>> M M*, LLOC, NAME, SIT, AC, OR, BG, FX+1, FX+10, NOD
>> O FX+9
>> S TYPE*, TYPE+2*, TYPE+3*, M, LLOC, NLOC, NLOC+1, NLOC+2, NAME, SIT
, AC, OR, BG, FX+1, FX+3, FX+6, FX+7, FX+10, NOD, HDR
, HDR+4, HDR+7, HDR+9
>> SSN FX+1*
U LLOC, NLOC+1, BG, FX+1, FX+4, FX+6, FX+7, HDR+2, HDR+4, HDR+10
, HDR+11, LD
>> X LLOC*, FX+1*, FX+3*, HDR*, LD*, LIN
>> Y M*, HDR
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All