Routine: LRMISEZ2

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

Package	Total	Caller Graph
Lab Service	1	LRMISEZ1

Entry Points

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

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

>>	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

Customize PDF page

Package: Lab Service

Routine: LRMISEZ2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

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

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