Routine: MCAROAT1

Package	Total	Call Graph
VA Fileman	4	$$OUT^DIALOGU CSTP^DIO2 ^DIWP (,0,NX)^DIWW

Package

Total

Call Graph

$$OUT^DIALOGU CSTP^DIO2 ^DIWP (,0,NX)^DIWW

Package	Total	Caller Graph
Medicine	1	MCAROAT

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: N+0
Function Call: WRITE	Prompt: $$OUT^DIALOGU(Y,"DD") Line Location: DT+0
Function Call: WRITE	Prompt: $P("JAN^FEB^MAR^APR^MAY^JUN^JUL^AUG^SEP^OCT^NOV^DEC",U,$E(Y,4,5))_" " Line Location: DT+1
Function Call: WRITE	Prompt: $J(Y#100\1,2)_"," Condition for execution: Y#100 Line Location: DT+1
Function Call: WRITE	Prompt: Y\10000+1700 Line Location: DT+1
Function Call: WRITE	Prompt: " "_$E(Y_0,9,10)_":"_$E(Y_"000",11,12) Condition for execution: Y#1 Line Location: DT+1
Function Call: WRITE	Prompt: Y Line Location: DT+2
Function Call: WRITE	Prompt: ?9 Line Location: BEGIN+5
Function Call: WRITE	Prompt: "INTERPRETATION: " Line Location: BEGIN+5
Function Call: WRITE	Prompt: ?7 Line Location: C1R+1
Function Call: WRITE	Prompt: "COMMENTS: " Line Location: C1R+1
Function Call: WRITE	Prompt: ?4 Line Location: E1+1
Function Call: WRITE	Prompt: "DISCHARGE DATE: " Line Location: E1+1
Function Call: WRITE	Prompt: ?22 Line Location: E1+2
Function Call: WRITE	Prompt: ?7 Line Location: E1+3
Function Call: WRITE	Prompt: "MEDICATIONS ON DISCHARGE: " Line Location: E1+3
Function Call: WRITE	Prompt: ?0,$E($P(X,U,2),1,40) Line Location: E1+4
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------",!! Line Location: HEAD+1
Routine Call	DIALOGU Line Location: DT

Name	Line Occurrences (* Changed, ! Killed)
^MCAR(691.9 - [#691.9]	BEGIN+6, C1R+2, D1+1, D1R+3, E1+2
^MCAR(693.3 - [#693.3]	BEGIN+2
^UTILITY($J	T

Name	Field # of Occurrence
>> D0	BEGIN+2*, BEGIN+6, C1R+2, D1+1, D1R+3, E1+2
>> D1	BEGIN+2, BEGIN+6, C1R+2, D1+1, D1R+3*, E1+2
>> D2	BEGIN+2*
>> DICMX	BEGIN+2*
>> DILCT	T+1, BEGIN+1
>> DIOT(2	T
DIP	BEGIN+2!
DIP(103	BEGIN+2
>> DISTP	T+1, BEGIN+1
DIWF	T, E1R+1!
>> DIWL	BEGIN+2, BEGIN+6, D1+1*
>> DIWR	BEGIN+2, BEGIN+6, D1+1*
>> DIXX	M
>> DN	T, BEGIN+1*, BEGIN+2, BEGIN+5, BEGIN+6, C1R+1, C1R+2, E1+1, E1+3
>> DSC(	D1R+3
DUZ("LANG"	DT
>> DXS(7	BEGIN+2
>> I(0	BEGIN+2
>> I(1	BEGIN+2, C1R+2, D1R+3
>> I(2	BEGIN+2
IOSL	T
>> J(1	C1R+2, D1R+3
U	DT+1, BEGIN+2, BEGIN+6, E1+2, E1+4
>> X	BEGIN+2, BEGIN+6, D1+1, E1+2, E1+4
Y	DT, DT+1, DT+2, BEGIN+2!, BEGIN+6, E1+2, E1R+1!

Information