Routine: SRSUTL2

Information

SRSUTL2 ;B'HAM ISC/MAM - MISC. UTILITIES ; [ 04/28/97 1:40 PM ]

Source file <SRSUTL2.m>

Package	Total	Call Graph
Surgery	2	^SROERR0 ^SRSCG
VA Fileman	2	^%DTC ^DIE

Package	Total	Caller Graph
Surgery	15	SROADOC1 SROANP SROCNR1 SROCNR2 SRODIS0 SROINQ SRONUR1 SRONUR2 SROPLIST SROPLSTS SROPRI SROSNR1 SROSNR2 SROXR1 SRSCAN0

Name	Comments	DBIA/ICR reference
NOCC	; no longer concurrent cases
CANCC	; cancel concurrent cases
UPDTCC
TIMES	; calculated times
CAN	; scheduled ?
MINS	; difference between 2 times in minutes

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: SRBOTH Line Location: CANCC+3
Function Call: WRITE	Prompt: !!,"If you want to cancel both cases, enter 'YES'. If you answer 'NO', the cases",!,"will no longer be associated with each other" Line Location: CANCC+5
Function Call: WRITE	Prompt: !!,"This case has not been scheduled." Line Location: CAN+1
Routine Call	DIE Line Location: UPDTCC NOCC+1 NOCC+2

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	UPDTCC, UPDTCC+2*, NOCC+1, CAN+1
^SRO(135 - [#135]	CANCC+2
^TMP("CSLSUR1"	NOCC+1, NOCC+2

Name	Field # of Occurrence
^(31	UPDTCC+2*

Name	Field # of Occurrence
>> DA	UPDTCC, NOCC+1, NOCC+2*
>> DIE	UPDTCC, NOCC+1
>> DR	UPDTCC, NOCC+1
DTIME	CANCC+3
>> SRBOTH	CANCC+2, CANCC+3, CANCC+4, CANCC+5, CANCC+6, CANCC+7, UPDTCC
>> SRCON	UPDTCC+1*
>> SRDEAD	CANCC+2*
>> SROERR	NOCC+1, NOCC+2
>> SRSCAN	CANCC+2, UPDTCC
>> SRSCC	UPDTCC*
>> SRSDOC	UPDTCC+2*
>> SRSOP	UPDTCC+2*
>> SRSOUT	CANCC+1
>> SRTN	UPDTCC*, UPDTCC+1, UPDTCC+2, NOCC+1, CAN+1
>> SRTNEW	UPDTCC+1, NOCC+2
>> SRTOLD	UPDTCC, UPDTCC+1*
>> X	TIMES+1, MINS+1
X1	TIMES+1*!, MINS+1
X2	TIMES+1!, MINS+1
>> Y	MINS+1*
Z0	TIMES+1*!
Z1	TIMES+1*!
Z2	TIMES+1*!