Routine: SRSTCH

Information

SRSTCH ;B'HAM ISC/SJA - SCHEDULE REQUESTED CASES ; [ 04/18/03 4:51 PM ]

Source file <SRSTCH.m>

Package	Total	Call Graph
VA Fileman	3	FILE^DIE EN^DIQ1 ^DIR

Package	Total	Caller Graph
Surgery	4	SRSCHCA SRSCHD2 SRSDT SRSUP1

Name	Comments	DBIA/ICR reference
CASE	; display list of entered items
TR
PBD	;;.24^ANES CARE END TIME
PBCB	;;.232^TIME PAT OUT OR
DEL
PBJE	;;.205^TIME PAT IN OR
PBC	;;.23^TIME OPERATION ENDS
PBB	;;.22^TIME OPERATION BEGAN
PBA	;;.21^ANES CARE START TIME

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: SRSTCH+4
Function Call: WRITE	Prompt: ! Line Location: SRSTCH+7
Function Call: WRITE	Prompt: !,"Deleting information..." Line Location: DEL+0
Function Call: WRITE	Prompt: !!,"The following information for case #"_SRTN_" and must be removed before continuing:",! Line Location: CASE+5
Function Call: WRITE	Prompt: !,?5,SRX(SRZ) Line Location: CASE+6
Routine Call	DIE Line Location: DEL+1 DEL+2
Routine Call	DIR Line Location: SRSTCH+7

FileNo	Call Tags
^SRF - [#130]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	SRSTCH+5

Name	Line Occurrences
CASE	SRSTCH+4, SRSTCH+5
TR	CASE+3

Name	Field # of Occurrence
^("CON"	SRSTCH+5

Name	Field # of Occurrence
DA	CASE+2*!
DIC	CASE+2*!
DIQ	CASE+2*!
DIQ(0	CASE+2*
DIR	SRSTCH+7!
DIR("A"	SRSTCH+7*
DIR("B"	SRSTCH+7*
DIR(0	SRSTCH+7*
DR	CASE+2*!
>> DTOUT	SRSTCH+8
>> DUOUT	SRSTCH+8
IOF	SRSTCH+4
SRFL	SRSTCH+3~, SRSTCH+4, SRSTCH+6, CASE+6
SRFLD	SRSTCH+3~, CASE+3*
SRM	SRSTCH+3~, DEL+1, DEL+2
SRP	SRSTCH+3~, TR*
>> SRSOUT	SRSTCH+8*
SRT	SRSTCH+3~, CASE+3*
>> SRTN	SRSTCH+2, SRSTCH+4, SRSTCH+5*, DEL+1, CASE+2, CASE+3, CASE+5
SRTNC	SRSTCH+3~, SRSTCH+5*, DEL+2
SRTNO	SRSTCH+3~, SRSTCH+4*, SRSTCH+5
SRX	SRSTCH+3~, SRSTCH+7!, CASE+1!, CASE+4
SRX(	CASE+3*, CASE+6
SRY	SRSTCH+3~, DEL+1!, DEL+2!, CASE+1!
SRY(130	DEL+1, DEL+2, CASE+3
SRZ	SRSTCH+3~, CASE+3, CASE+6, TR
Y	SRSTCH+3~, SRSTCH+8

Name	Field # of Occurrence
$T(@SRP	CASE+3