Routine: LRMIPSZ4

Package	Total	Call Graph
Lab Service	2	PRE^LRMIPSU D^LRU

Package	Total	Caller Graph
Lab Service	2	LRMIPSZ1 LROR4

Entry Points

External References

Name	Field # of Occurrence
PRE^LRMIPSU	TB+4, FUNG+4
D^LRU	TB+2, FUNG+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: TB+3
Function Call: WRITE	Prompt: !,"* MYCOBACTERIOLOGY ",$S(LRTUS="F":"FINAL",LRTUS="P":"PRELIMINARY",1:"")," REPORT => "_Y_" TECH CODE: "_DZ Line Location: TB+3
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: TB+7
Function Call: WRITE	Prompt: !,"Mycobacteriology Remark(s):" Line Location: TB+7
Function Call: WRITE	Prompt: !,?3,^(B,0) Line Location: TB+7
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: AFS+0
Function Call: WRITE	Prompt: !,$S(LRAFS["D":"Direct",LRAFS["C":"Concentrate",1:"")," Acid Fast Stain: ",$S(LRAFS["P":"Positive",LRAFS["N":"Negative",1:LRAFS)," " Line Location: AFS+0
Function Call: WRITE	Prompt: !,?3,"Quantity: ",LRAMT Condition for execution: $L(LRAMT) Line Location: AFS+0
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: LIST+0
Function Call: WRITE	Prompt: !,"Mycobacterium: ",LRTBC Line Location: LIST+0
Function Call: WRITE	Prompt: !,?3,"Quantity: ",LRQU Condition for execution: $L(LRQU) Line Location: LIST+0
Function Call: WRITE	Prompt: !," Comment: " Line Location: LIST+1
Function Call: WRITE	Prompt: ?13,^(B,0),! Line Location: LIST+1
Function Call: WRITE	Prompt: !,?3,LRTBA,?20,LRTBS Line Location: SEN+0
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: FUNG+3
Function Call: WRITE	Prompt: !,"* MYCOLOGY ",$S(LRTUS="F":"FINAL",LRTUS="P":"PRELIMINARY",1:"")," REPORT => ",Y," TECH CODE: ",DZ Line Location: FUNG+3
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: FUNG+5
Function Call: WRITE	Prompt: !,"MYCOLOGY SMEAR/PREP:" Line Location: FUNG+5
Function Call: WRITE	Prompt: !?5,^(LRMYC,0) Line Location: FUNG+5
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: FUNG+6
Function Call: WRITE	Prompt: !,"Fungus/Yeast: " Line Location: FUNG+6
Function Call: WRITE	Prompt: ! Condition for execution: LRHC Line Location: FUNG+7
Function Call: WRITE	Prompt: !,"Mycology Remark(s):" Line Location: FUNG+7
Function Call: WRITE	Prompt: !,?3,^(LRMYC,0) Line Location: FUNG+7
Function Call: WRITE	Prompt: !,LRTBC Line Location: LIST1+0
Function Call: WRITE	Prompt: !,?3,"Quantity: ",LRQU Condition for execution: $L(LRQU) Line Location: LIST1+0
Function Call: WRITE	Prompt: !,?3,"Comment:" Line Location: LIST1+0
Function Call: WRITE	Prompt: !,?3,"Comment:" Line Location: LIST1+0

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.39	SEN
^LAB(61.2 - [#61.2]	AFS+1, SHOW
^LR - [#63]	TB+1, TB+2, TB+5, TB+7, AFS+1, LIST, LIST+1, SEN, FUNG+1, FUNG+2 , FUNG+5, FUNG+6, FUNG+7, SHOW, LIST1
^TMP("LR"	AFS+1!

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	AFS+1*
>> B	TB+7, LIST+1, LIST1*
>> DZ	TB+2, TB+3, FUNG+2, FUNG+3
>> I	TB+7, LIST+1, SEN, FUNG+5, FUNG+7, SHOW, LIST1*
>> LRAFS	TB+2*, TB+6, AFS
>> LRAMT	TB+2*, AFS
>> LRBUG(	AFS+1, SHOW
>> LRDFN	TB+1, TB+2, TB+5, TB+7, AFS+1, LIST, LIST+1, SEN, FUNG+1, FUNG+2 , FUNG+5, FUNG+6, FUNG+7, SHOW, LIST1
>> LRHC	TB+3, TB+7, AFS, LIST, FUNG+3, FUNG+5, FUNG+6, FUNG+7
>> LRIDT	TB+1, TB+2, TB+5, TB+7, AFS+1, LIST, LIST+1, SEN, FUNG+1, FUNG+2 , FUNG+5, FUNG+6, FUNG+7, SHOW, LIST1
>> LRMYC	FUNG+5, FUNG+7
>> LRPRE	TB+4, FUNG+4
>> LRQU	AFS+1, LIST, SHOW, LIST1
>> LRSB	TB+1, FUNG+1
LRTA	TB+5!, TB+6, AFS+1, LIST, LIST+1, SEN, SHOW*, LIST1
LRTB	SEN*, SEN+1!
LRTBA	SEN*, SEN+1!
>> LRTBC	AFS+1, LIST, SHOW, LIST1
LRTBS	SEN*, SEN+1!
LRTSTS	AFS+1!, LIST
>> LRTUS	TB+2, TB+3, FUNG+2, FUNG+3
>> LRWRDVEW	TB+1, FUNG+1
U	TB+1, TB+2, TB+5, TB+7, AFS+1, SEN, FUNG+1, FUNG+2, FUNG+6, FUNG+7 , SHOW
>> Y	TB+2, TB+3, FUNG+2, FUNG+3

Customize PDF page

Package: Lab Service

Routine: LRMIPSZ4

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Field # of Occurrence
^(	TB+7, AFS+1, LIST+1, FUNG+5, FUNG+7, SHOW, LIST1
^(0	TB+5, TB+7, AFS+1, FUNG+6, FUNG+7, SHOW
^(11	TB+2
^(8	FUNG+2

Name	Comments	DBIA/ICR reference
SHOW
LIST1
LIST
FUNG	;from LRMIPSZ1
SEN
TB	;from LRMIPSZ1
AFS