Routine: SROATCM2

Package

Total

Call Graph

NOW^%DTC ^DIE D^DIQ

$$SITE^SROVAR ^SRSKILL

$$ACTIVE^XUSER

^XMD

DEM^VADPT

Package	Total	Caller Graph
Surgery	1	SROATCM

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
STATUS	; update status
MSG	; send message to G.CARDIAC RISK ASSESSMENTS at Denver
END
UPDATE	; change status to 'T'

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	UPDATE+5
^TMP("SRA"	SROATCM2+2, STATUS+2, END!, UPDATE+1
^TMP("SRAMSG"	STATUS+8, STATUS+9, END!, UPDATE+6*
^XMB("NETNAME"	STATUS+6, MSG+1, MSG+2

Name	Field # of Occurrence
>> %	STATUS+7, UPDATE+2
>> CURLEY	STATUS+2*
>> DA	UPDATE+3*
>> DFN	UPDATE+5*
>> DIE	UPDATE+3*
DR	UPDATE+3!*
DT	MSG+4
DUZ	STATUS+4, MSG+5
>> EMILY	UPDATE+1*, UPDATE+3, UPDATE+5, UPDATE+6
I	SROATCM2+2, STATUS+2, STATUS+10~, MSG+6~, UPDATE+2~, UPDATE+3~
>> ISC	MSG+1*, MSG+2, MSG+3
>> MM	UPDATE+1*
>> NAME	MSG+1*
>> SHEMP	SROATCM2+2, UPDATE+6
>> SRACNT	STATUS+2*, UPDATE+1
>> SRADT	UPDATE+5*, UPDATE+6
>> SRAMNUM	SROATCM2+2, STATUS+1, STATUS+2*, MSG+6, UPDATE+1
>> SRANAME	UPDATE+5*, UPDATE+6
>> SRASS	STATUS+1, STATUS+3, STATUS+8, UPDATE+4
>> SRATDATE	MSG+4*, MSG+6
>> SRATIME	STATUS+7*, STATUS+8
>> SRATOTM	MSG+6
>> SRNOW	UPDATE+2*, UPDATE+3
VADM	UPDATE+5!
VADM(1	UPDATE+5
>> X	STATUS+4, MSG+5, UPDATE+1, UPDATE+5
>> XMDUZ	STATUS+4, MSG+5
>> XMSUB	STATUS+5, MSG+6
>> XMTEXT	STATUS+10, MSG+6
>> XMY("G.CARDIA	C RISK ASSESSMENTS@DENVER.VA.GOV" , MSG+3*
>> XMY("G.RISK A	SSESSMENT@" , STATUS+6, MSG+2
>> XMY("G.SRCARDIAC@ISC-CHICAGO.VA.GOV"	MSG+3*
>> Y	STATUS+7*

Information