Routine: LRMIPSZ3

Package	Total	Call Graph
Lab Service	2	PRE^LRMIPSU D^LRU
VA Fileman	1	EN^DIQ

Package

Total

Call Graph

Lab Service

PRE^LRMIPSU D^LRU

VA Fileman

EN^DIQ

Package	Total	Caller Graph
Lab Service	2	LRMIPSZ1 LROR4

Package

Total

Caller Graph

Lab Service

LRMIPSZ1 LROR4

Name	Comments	DBIA/ICR reference
VIR	;from LRMIPSZ1
SET
PARA	;from LRMIPSZ1
LIST1
STER	;from LRMIPSZ1
STG

Name	Field # of Occurrence
EN^DIQ	STER+2
PRE^LRMIPSU	PARA+4, VIR+4
D^LRU	PARA+2, VIR+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: PARA+3
Function Call: WRITE	Prompt: !,"* PARASITOLOGY ",$S(LRTUS="F":"FINAL",LRTUS="P":"PRELIMINARY",1:"")," REPORT => ",Y," TECH CODE: ",DZ Line Location: PARA+3
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: PARA+5
Function Call: WRITE	Prompt: !,"PARASITOLOGY SMEAR/PREP:" Line Location: PARA+5
Function Call: WRITE	Prompt: !?5,^(LRMYC,0) Line Location: PARA+5
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: PARA+6
Function Call: WRITE	Prompt: !,"Parasite: ",$E($P(^LAB(61.2,^(LRPAR,0),0),U),1,25),?30," " Line Location: PARA+6
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: PARA+7
Function Call: WRITE	Prompt: !,"Parasitology Remark(s):" Line Location: PARA+7
Function Call: WRITE	Prompt: !,?3,^(LRPAR,0) Line Location: PARA+7
Function Call: WRITE	Prompt: !," Stage: " Line Location: STG+1
Function Call: WRITE	Prompt: !," Quantity: ",Y1 Condition for execution: $L(Y1) Line Location: STG+1
Function Call: WRITE	Prompt: !," Comment: " Line Location: LIST1+0
Function Call: WRITE	Prompt: ?13,^(C,0),! Line Location: LIST1+0
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: VIR+3
Function Call: WRITE	Prompt: !,"* VIROLOGY ",$S(LRTUS="F":"FINAL",LRTUS="P":"PRELIMINARY",1:"")," REPORT => ",Y," TECH CODE: ",DZ Line Location: VIR+3
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: VIR+5
Function Call: WRITE	Prompt: !,"Virus: ",$P(^LAB(61.2,$P(^(LRPAR,0),U),0),U) Line Location: VIR+5
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: VIR+6
Function Call: WRITE	Prompt: !,"Virology Remark(s):" Line Location: VIR+6
Function Call: WRITE	Prompt: !,?3,^(LRPAR,0) Line Location: VIR+6

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.35	SET
^LAB(61.2 - [#61.2]	PARA+6, VIR+5
^LR - [#63]	STER+1, PARA+1, PARA+2, PARA+5, PARA+6, PARA+7, STG, STG+1, LIST1, VIR+1 , VIR+2, VIR+5, VIR+6

Name	Line Occurrences
LIST1	STG+1
SET	STG+1
STG	PARA+6

Name	Field # of Occurrence
^(	PARA+5, PARA+6, PARA+7, STG+1, LIST1, VIR+5, VIR+6
^(0	PARA+7, VIR+6
^(1	STER+1
^(16	VIR+2
^(5	PARA+2

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SET*
>> B	STG+1*, LIST1
>> C	LIST1*
>> DA	STER+2*
>> DIC	STER+2*
>> DR	STER+2*
>> DTOUT	STER+2
>> DUOUT	STER+2
>> DZ	PARA+2, PARA+3, VIR+2, VIR+3
>> I	PARA+5, PARA+6, PARA+7, STG+1, LIST1, VIR+5, VIR+6*
>> LRBUG(	STG, VIR+5
>> LRDFN	STER+1, STER+2, PARA+1, PARA+2, PARA+5, PARA+6, PARA+7, STG, STG+1, LIST1 , VIR+1, VIR+2, VIR+5, VIR+6
>> LREND	STER+2*
>> LRHC	PARA+3, PARA+5, PARA+6, PARA+7, VIR+3, VIR+5, VIR+6
>> LRIDT	STER+1, STER+2, PARA+1, PARA+2, PARA+5, PARA+6, PARA+7, STG, STG+1, LIST1 , VIR+1, VIR+2, VIR+5, VIR+6
>> LRMYC	PARA+5*
>> LRPAR	PARA+6, PARA+7, STG, VIR+5, VIR+6
>> LRPRE	PARA+4, VIR+4
>> LRSB	PARA+1, VIR+1
>> LRSET	SET*
>> LRTA	STG*, STG+1, LIST1
>> LRTUS	PARA+2, PARA+3, VIR+2, VIR+3
>> LRWRDVEW	PARA+1, VIR+1
>> S1	STG*, STG+1, LIST1
U	STER+1, PARA+1, PARA+2, PARA+6, PARA+7, STG+1, SET, VIR+1, VIR+2, VIR+5 , VIR+6
>> Y	PARA+2, PARA+3, STG+1, SET, VIR+2*, VIR+3
>> Y1	STG+1*

Customize PDF page

Package: Lab Service

Routine: LRMIPSZ3

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: