Routine: MCARDC1

Package	Total	Call Graph
Medicine	4	(1,A,C,F,IX,NO,Q,R,X,Y)^MCARDC L^MCARDCM (NAME,Y)^MCARDCM2 YN^MCARDCN

Package

Total

Call Graph

Medicine

(1,A,C,F,IX,NO,Q,R,X,Y)^MCARDC L^MCARDCM (NAME,Y)^MCARDCM2 YN^MCARDCN

Package	Total	Caller Graph
Medicine	8	MCARDC MCARDCM MCARDCM1 MCARDCM2 MCARDCM3 MCARDCN MCARDCN1 MCARDCQ

Package

Total

Caller Graph

Medicine

MCARDC MCARDCM MCARDCM1 MCARDCM2 MCARDCM3 MCARDCN MCARDCN1 MCARDCQ

Name	Field # of Occurrence
1^MCARDC	RENUM+1
A^MCARDC	Y+6, BAD
C^MCARDC	Y+8
F^MCARDC	RENUM+2
IX^MCARDC	MIX+1
NO^MCARDC	N
Q^MCARDC	Y+1
R^MCARDC	OK+2
X^MCARDC	Y+7
Y^MCARDC	Y+6
L^MCARDCM	Y+6, OK+2
NAME^MCARDCM2	WR+1
Y^MCARDCM2	WR+4
YN^MCARDCN	OK+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "// " Timeout: DTIME Variable: X Line Location: B+0
Function Call: WRITE	Prompt: DD Line Location: B+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: B+1
Function Call: WRITE	Prompt: DD Line Location: B+1
Function Call: WRITE	Prompt: " " Line Location: WO+0
Function Call: WRITE	Prompt: " " Line Location: WO+0
Function Call: WRITE	Prompt: DINAME Line Location: WR+1
Function Call: WRITE	Prompt: DIY Line Location: WR+2
Function Call: WRITE	Prompt: +$E(DIY,4,5),"-" Condition for execution: $E(DIY,4,5) Line Location: WR+3
Function Call: WRITE	Prompt: +$E(DIY,6,7),"-" Condition for execution: $E(DIY,6,7) Line Location: WR+3
Function Call: WRITE	Prompt: DIY\10000+1700 Line Location: WR+3
Function Call: WRITE	Prompt: "@"_$E(DIY_0,9,10)_":"_$E(DIY_"000",11,12) Condition for execution: DIY["." Line Location: WR+3
Function Call: WRITE	Prompt: Y Line Location: WR+4
Function Call: WRITE	Prompt: DIY Line Location: WR+5
Function Call: WRITE	Prompt: !,"TYPE '^' TO STOP, OR" Line Location: Y+2
Function Call: READ	Prompt: ": " Timeout: DTIME Variable: DIY Line Location: Y+3
Function Call: WRITE	Prompt: !,"CHOOSE "_$O(DS(0))_"-"_DD Line Location: Y+3
Function Call: WRITE	Prompt: !,"TYPE '^' TO STOP, OR " Line Location: Y+4
Function Call: READ	Prompt: ": " Timeout: DTIME Variable: DIY Line Location: Y+5
Function Call: WRITE	Prompt: "CHOOSE "_$O(DS(0))_"-"_DD Line Location: Y+5
Function Call: WRITE	Prompt: *7 Line Location: TIME+0
Function Call: WRITE	Prompt: !?9,"...OK" Line Location: OK+1

Name	Line Occurrences (* Changed, ! Killed)
^DD(	MCARDC1+3, DO2, DO2+1, DO2+2, W+1, P, RENUM+1, WR+4
^DD("OS" - [#.7]	DS+1
^DIC - [#1]	P

Name	Line Occurrences
B	MCARDC1+2
BAD	Y+8
DO	MCARDC1+3, B, RENUM+1, WR
N	Y+4, Y+5, O
P	DO2+2
TIME	B, B+1, Y+5
W	W+1
WO	Y+1
WOV	DO2+2, W+1
WR	B, WO
Y	Y+1, Y+4

Name	Field # of Occurrence
^(	B, W+1
^("GL"	P
^("OS"	DS+1
^("SCR"	DO2+1
^(0	B, DO+2, DO+3*, P, DS+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D	MCARDC1+3, Y+7, MIX+1
>> DD	MCARDC1+2, MCARDC1+4, B, B+1, Y+1*, Y+4, Y+5, Y+6
>> DF	RENUM+1, Y+7
>> DFAST	O
>> DFOUT	O*
>> DIC	B, DO+2, DO2+2, WO
>> DIC("A"	MCARDC1+2
>> DIC("B"	B
>> DIC("P"	DO+3
>> DIC("W"	DO2+2, W+1, W+2, P+1, WOV*, WO, Y+4, Y+8!
>> DIC(0	B*, WR, Y+1, Y+4, BAD
>> DICR(	Y+1*
>> DICRS	Y+1
>> DID	MIX+1*
>> DID(1	MIX+1*
DINAME	WR+1!
>> DISMN	DS+1*
DIVP1	Y+8!
>> DIX	OK+2
DIY	B, WR+1, WR+2, WR+3, WR+4, WR+5, Y+1, Y+5*, Y+6, Y+7! , Y+8
DIY(	Y+1, Y+8*
DIYS	WR+1!, WR+4!
DJC	WR+4*!
>> DJCP	Y+6, Y+7, OK+2
>> DO	MCARDC1+3, DO+2, DO+3, DO2*
>> DO("SCR"	DO2+1*
>> DO(2	MCARDC1+3, DO2*, DO2+1, DO2+2, W+1, RENUM+1, WR+1, WR+3, WR+4, Y+6
DS	Y+1, Y+4, Y+5, Y+6, Y+7!, OK+1
DS(	Y+1, Y+8
DS(0	Y+5
DTIME	B, B+1, Y+5
>> DTOUT	TIME*
>> DUOUT	Y+6*
>> DZ	Y+1*
>> MCARDC	RENUM+1
>> MCPCT	DO2+2, W+1, P, P+1, OK+1, OK+2
>> MCPCTW	P*, P+1
MCPCTX	WR+1!, WR+4
>> MCPCTY	DO2+2*, P+1
U	B, DO+3, P, Y+1, Y+6, DS+1, MIX+1
>> X	MCARDC1+3, B, B+1, RENUM+1, WR, Y+1, Y+6, Y+7, Y+8, OK+2 , O
>> Y	MCARDC1+3, MCARDC1+4, B, RENUM+1, WR+1, WR+4, Y+1, Y+8*
>> Y(	Y+1*
>> YMLH	DO2*

Customize PDF page

Package: Medicine

Routine: MCARDC1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
DO	; ; Naked references in DO+2 is the global in the variable DIC
RENUM	;
B
Y	;
MIX	;
WO
WOV
O
N
P
BAD
WR
W	;
TIME
DO2
OK	;
DS	;