Routine: SCMCU1

Information

SCMCU1 ;ALB/CMM - Team Information Display ;7/25/99 18:46

Source file <SCMCU1.m>

Name	Comments	DBIA/ICR reference
INIT	;gather team data
SEL	;selection - getting patient	ICR #3311 Status: Active Usage: Private
HDR	;header code
GETPT()	;function to get patient

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	HDR+2, HDR+3
^TMP("SDAMIDX"	SEL+7, SEL+8

Name	Line Occurrences
$$GETPT	SEL+2, SEL+6

Name	Field # of Occurrence
DIC	GETPT+3*, GETPT+5!
DIC("A"	GETPT+3*
DIC(0	GETPT+3*
ENT	SEL+1~, SEL+5*, SEL+6, SEL+7, SEL+8
GBL	INIT+1~, INIT+3*, INIT+4
>> IOINHI	INIT+6
>> IOINORM	INIT+6
PTNAME	HDR+1~, HDR+2*, HDR+3
>> SDFN	GETPT+1
>> SDLN	INIT+5*, INIT+6
TDFN	SEL+2, SEL+6, SEL+7, SEL+8, GETPT+2~, GETPT+6, GETPT+7, GETPT+8, INIT+2, INIT+7 , HDR+2, HDR+3
U	HDR+3
>> VALMAR	SEL+2
>> VALMCNT	INIT+7
>> VALMHDR(1	GETPT+1
>> VALMHDR(2	HDR+3*
>> VALMPGE	HDR+4*
>> VALMQUIT	INIT+2*
>> VALMY(0	SEL+5
>> X	GETPT+6
>> XQORNOD(0	SEL+4
>> Y	GETPT+6, GETPT+7