Routine: GMTSLRMB

Package	Total	Call Graph
Health Summary	4	$$DRAW^GMTSLRM ^GMTSLRME $$WRAP^GMTSORC CKP^GMTSUP
VA Fileman	1	$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
WRTGRM	; Writes Gram Stain Results
WRTNODE	; Writes current node of ^TMP("LRM",$J
ANTIBX	; Writes Antibiotic susceptability data
INTRP	; Interprets ^TMP("LRM",$J
RDNODE	; Reads current node of ^TMP("LRM",$J
REMARKS	; Write remarks
WRTTEST	; Writes Lab Test for Accession
MAIN	; Microbioloby Brief

External References

Name	Field # of Occurrence
$$GET1^DIQ	MAIN+2
$$DRAW^GMTSLRM	WRTNODE+12
^GMTSLRME	MAIN+5
$$WRAP^GMTSORC	WRTNODE+20
CKP^GMTSUP	MAIN+4, MAIN+6, RDNODE+3, RDNODE+9, RDNODE+12, RDNODE+15, RDNODE+18, WRTNODE+2, WRTNODE+7, WRTNODE+8 , WRTNODE+10, WRTNODE+17, WRTNODE+22, REMARKS+4, WRTGRM+1, ANTIBX+5, ANTIBX+12, WRTTEST+3, WRTTEST+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $P($P(^TMP("LRM",$J,GMTSJ),U)," "),?12,$P(^TMP("LRM",$J,GMTSJ),U,3),! Line Location: RDNODE+3
Function Call: WRITE	Prompt: "AFB Sme:",?12,$E($P(^TMP("LRM",$J,GMTSJ,0),U,2),1,20),! Line Location: RDNODE+10
Function Call: WRITE	Prompt: ?12,$P(^TMP("LRM",$J,GMTSJ,0),U,3),! Line Location: RDNODE+13
Function Call: WRITE	Prompt: ?2,"Smear:" Line Location: RDNODE+16
Function Call: WRITE	Prompt: ?12,^(SMEAR),! Line Location: RDNODE+18
Function Call: WRITE	Prompt: ?1,"Report:",?12,$P(^TMP("LRM",$J,GMTSJ,GMK),U),! Line Location: WRTNODE+2
Function Call: WRITE	Prompt: "Organsm:",?12,$P(^TMP("LRM",$J,GMTSJ,GMK),U),! Line Location: WRTNODE+7
Function Call: WRITE	Prompt: ?4,"QTY:",?12,$P(^TMP("LRM",$J,GMTSJ,GMK),U,2),! Line Location: WRTNODE+8
Function Call: WRITE	Prompt: ?12,$E($P(^TMP("LRM",$J,GMTSJ,GMK),U),1,18),?30,$$DRAW^GMTSLRM($P(^TMP("LRM",$J,GMTSJ,GMK),U,2)),?38,$P(^(GMK),U,3)," ug/ml",! Line Location: WRTNODE+12
Function Call: WRITE	Prompt: ?12,$P(^TMP("LRM",$J,GMTSJ,GMK,GML),U) Line Location: WRTNODE+18
Function Call: WRITE	Prompt: ?35,$P(QTY,"\|"),! Line Location: WRTNODE+21
Function Call: WRITE	Prompt: ?35,$P(QTY,"\|",2),! Line Location: WRTNODE+22
Function Call: WRITE	Prompt: "Remarks:" Line Location: REMARKS+6
Function Call: WRITE	Prompt: ?12,^TMP("LRM",$J,GMTSJ,GMK,NUM),! Line Location: REMARKS+7
Function Call: WRITE	Prompt: ! Condition for execution: $X>0 Line Location: WRTGRM+1
Function Call: WRITE	Prompt: ?3,"Gram:" Condition for execution: GMK=1 Line Location: WRTGRM+1
Function Call: WRITE	Prompt: ?12,$E(^TMP("LRM",$J,GMTSJ,GMK),1,69),! Line Location: WRTGRM+1
Function Call: WRITE	Prompt: ?12 Line Location: ANTIBX+12
Function Call: WRITE	Prompt: ANAM,$S(ANEXT]"":", ",1:"") Line Location: ANTIBX+13
Function Call: WRITE	Prompt: ! Line Location: ANTIBX+14
Function Call: WRITE	Prompt: "Test(s): " Line Location: WRTTEST+3
Function Call: WRITE	Prompt: ?12 Line Location: WRTTEST+6
Function Call: WRITE	Prompt: TNAM,$S(TNEXT]"":", ",1:"") Line Location: WRTTEST+7
Function Call: WRITE	Prompt: ! Line Location: WRTTEST+8

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LR - [#63]	MAIN+2, MAIN+4
^TMP("LRM"	MAIN+5, MAIN+7!, INTRP+3, RDNODE+3, RDNODE+6, RDNODE+8, RDNODE+10, RDNODE+11, RDNODE+13, RDNODE+14 , RDNODE+18, WRTNODE+2, WRTNODE+7, WRTNODE+8, WRTNODE+12, WRTNODE+13, WRTNODE+14, WRTNODE+16, WRTNODE+18, WRTNODE+19 , REMARKS+3, REMARKS+7, WRTGRM+1, ANTIBX+4, ANTIBX+11, WRTTEST+2, WRTTEST+5

Label References

Name	Line Occurrences
ANTIBX	WRTNODE+13
INTRP	MAIN+6
RDNODE	INTRP+3
REMARKS	WRTNODE+5
WRTGRM	WRTNODE+3
WRTNODE	RDNODE+6
WRTTEST	RDNODE+4

Naked Globals

Name	Field # of Occurrence
^(	RDNODE+18, WRTNODE+12, ANTIBX+11, WRTTEST+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANAM	ANTIBX+1~, ANTIBX+11*, ANTIBX+12, ANTIBX+13
ANEXT	ANTIBX+1~, ANTIBX+11*, ANTIBX+13
ANLEN	ANTIBX+1~, ANTIBX+10, ANTIBX+12, ANTIBX+13*
D1	MAIN+1~
D2	MAIN+1~
D3	MAIN+1~
>> DFN	MAIN+2
FIRST	REMARKS+1~, REMARKS+2, REMARKS+6
GMABX	INTRP+1~, ANTIBX+2*
GMCNT	ANTIBX+1~, WRTTEST+1~
GMK	INTRP+1~, INTRP+2, RDNODE+5, RDNODE+6*, WRTNODE+2, WRTNODE+4, WRTNODE+5, WRTNODE+7, WRTNODE+8, WRTNODE+11 , WRTNODE+12, WRTNODE+13, WRTNODE+14, WRTNODE+16, WRTNODE+18, WRTNODE+19, REMARKS+3, REMARKS+7, WRTGRM+1, ANTIBX+4 , ANTIBX+11
GML	WRTNODE+1~, WRTNODE+15, WRTNODE+16, WRTNODE+18, WRTNODE+19, ANTIBX+1~, ANTIBX+10, ANTIBX+11, WRTTEST+1~, WRTTEST+4* , WRTTEST+5*
GMSUB	ANTIBX+1~, ANTIBX+3*, ANTIBX+4, ANTIBX+6, ANTIBX+7, ANTIBX+8, ANTIBX+9, ANTIBX+11
>> GMTS1	MAIN+4
>> GMTS2	MAIN+4
GMTSJ	INTRP+1~, INTRP+2, INTRP+3, RDNODE+1, RDNODE+2, RDNODE+3, RDNODE+6, RDNODE+7, RDNODE+8, RDNODE+10 , RDNODE+11, RDNODE+13, RDNODE+14, RDNODE+18, WRTNODE+2, WRTNODE+3, WRTNODE+6, WRTNODE+7, WRTNODE+8, WRTNODE+9 , WRTNODE+12, WRTNODE+13, WRTNODE+14, WRTNODE+16, WRTNODE+18, WRTNODE+19, REMARKS+3, REMARKS+7, WRTGRM+1, ANTIBX+4 , ANTIBX+11, WRTTEST+2, WRTTEST+5
>> GMTSNDM	MAIN+3
>> GMTSNPG	MAIN+6, ANTIBX+12, WRTTEST+6
>> GMTSQIT	MAIN+4, MAIN+6, INTRP+3, RDNODE+3, RDNODE+6, RDNODE+7, RDNODE+9, RDNODE+12, RDNODE+15, RDNODE+18 , WRTNODE+2, WRTNODE+6, WRTNODE+7, WRTNODE+8, WRTNODE+10, WRTNODE+16, WRTNODE+17, WRTNODE+22, REMARKS+3, REMARKS+4 , WRTGRM+1, ANTIBX+3, ANTIBX+5, ANTIBX+11, ANTIBX+12, WRTTEST+3, WRTTEST+5, WRTTEST+6
GMW	INTRP+1~
IX	MAIN+1~, MAIN+4*
IX0	MAIN+1~, MAIN+4*, MAIN+6
LRDFN	MAIN+1~, MAIN+2*, MAIN+4
MAX	MAIN+1~, MAIN+3*, MAIN+4
NUM	REMARKS+1~, REMARKS+2, REMARKS+3, REMARKS+7
QTY	WRTNODE+1~, WRTNODE+19, WRTNODE+20, WRTNODE+21, WRTNODE+22
SMEAR	INTRP+1~, RDNODE+17, RDNODE+18
TLEN	WRTTEST+1~, WRTTEST+4, WRTTEST+6, WRTTEST+7*
TNAM	WRTTEST+1~, WRTTEST+5*, WRTTEST+6, WRTTEST+7
TNEXT	WRTTEST+1~, WRTTEST+5*, WRTTEST+7
U	RDNODE+3, RDNODE+8, RDNODE+10, RDNODE+11, RDNODE+13, WRTNODE+2, WRTNODE+7, WRTNODE+8, WRTNODE+12, WRTNODE+18 , WRTNODE+19, ANTIBX+11, WRTTEST+5

Customize PDF page

Package: Health Summary

Routine: GMTSLRMB

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: