Routine: SCMCMU3

Package	Total	Call Graph
Scheduling	2	(AFTER,BEFORE,INVOKE)^SCMCEV3 $$SDAPI^SDAMA301
VA Fileman	1	^DIE

Package	Total	Caller Graph
Scheduling	1	SCMCMU2

Entry Points

Name	Comments	DBIA/ICR reference
ERR(CODE)	;
DISCH(DFN,SCCLN,SCDATE,SCENR,SCREA)	; -- discharge from clinic
EN(DFN,SCCLN,SCDATE,SCREA)	; -- main entry point
RET	; -- return values
DISCHQ
ENQ
LOCK(NODE)	; -- lock node
TEST	;
UNLOCK(NODE)	; -- unlock node

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$$EN(7170643,446,DT,"TEST FROM SCMCMU3") Line Location: TEST+1
Routine Call	DIE Line Location: DISCH+26

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN+2, EN+7, DISCH+18, DISCH+19, DISCH+21
^TMP($J	DISCH+3!, DISCH+11!

Name	Field # of Occurrence
CODE	ERR~
DA	DISCH+2~, DISCH+24*
DA(1	DISCH+23*
DA(2	DISCH+23*
DFN	EN~, EN+2, EN+7, EN+12, EN+14, EN+16, EN+17, DISCH~, DISCH+6, DISCH+9 , DISCH+18, DISCH+19, DISCH+21, DISCH+23, DISCH+24
DIE	DISCH+2~, DISCH+24*
DR	DISCH+2~, DISCH+25*
DT	DISCH+5, TEST+1
NODE	LOCK~, LOCK+1, UNLOCK~, UNLOCK+1
SCARRAY	DISCH+2~, DISCH+10
SCARRAY("FLDS"	DISCH+9*
SCARRAY("MAX"	DISCH+9*
SCARRAY(1	DISCH+8*
SCARRAY(2	DISCH+8*
SCARRAY(3	DISCH+8*
SCARRAY(4	DISCH+9*
SCCLN	EN~, EN+2, EN+14, DISCH~, DISCH+6, DISCH+8
SCCOUNT	DISCH+2~, DISCH+10*, DISCH+13, DISCH+16
SCDAT	DISCH+2~, DISCH+17, DISCH+18, DISCH+19, DISCH+21, DISCH+24
SCDAT0	DISCH+2~, DISCH+19*, DISCH+20
SCDATE	EN~, EN+14, DISCH~, DISCH+25
SCDT	DISCH+2~, DISCH+5*, DISCH+8
SCDT0	DISCH+2~
SCENR	EN+1~, EN+2*, EN+5, EN+7, EN+14, DISCH~, DISCH+18, DISCH+19, DISCH+21, DISCH+23 , DISCH+24
SCENR0	EN+1~, EN+7*, EN+10
SCNODE	DISCH+2~, DISCH+21*, DISCH+22, DISCH+27
SCREA	EN~, EN+14, DISCH~, DISCH+25
SCRET	EN+1~, EN+14, EN+15, ENQ, DISCH+2~, DISCH+14, DISCH+28*, DISCHQ
U	EN+10, DISCH+20
Y	DISCH+2~

Name	Field # of Occurrence
$T(RET+CODE	ERR+1