Routine: SRSAVL

Package	Total	Call Graph
Surgery	5	$$ORDIV^SROUTL0 ^SRSAVL1 ^SRSDIS1 ^SRSDISP ^SRSKILL
VA Fileman	3	^%DT (,C)^%DTC ^DIC
Kernel	2	^%ZIS (ENDR,KILL)^%ZISS

Package	Total	Caller Graph
Surgery	2	SRODISP SRSBD1

Entry Points

Name	Comments	DBIA/ICR reference
END
GRAPH	; set graph in ^SRS
REQ	; list requests ?
START
CHNG	; change graph
LINE

External References

Name	Field # of Occurrence
^%DT	START+7, REQ+5
^%DTC	GRAPH+4
C^%DTC	START+13, CHNG+1
^%ZIS	START+11, END+1, REQ+7
ENDR^%ZISS	START+1
KILL^%ZISS	START+1
^DIC	START+9
$$ORDIV^SROUTL0	REQ+9
^SRSAVL1	START+6
^SRSDIS1	START+10
^SRSDISP	REQ+6
^SRSKILL	END+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: SRYN Line Location: START+2
Function Call: WRITE	Prompt: !!,"Enter RETURN if you want to view the availabilty of all operating rooms for a",!,"particular date, or 'NO' to view the availability of one specific operating",!,"room over a two week period." Line Location: START+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: START+5
Function Call: WRITE	Prompt: !!,"Press RETURN to continue " Line Location: START+5
Function Call: WRITE	Prompt: !! Line Location: START+7
Function Call: WRITE	Prompt: !! Line Location: START+9
Function Call: WRITE	Prompt: SR16 Line Location: START+11
Function Call: WRITE	Prompt: @IOF,!,"Operating Room: "_SROOM,!!," DATE 12 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24" Line Location: START+12
Function Call: WRITE	Prompt: !!,"Press RETURN to continue " Line Location: END+0
Function Call: WRITE	Prompt: SR10 Line Location: END+1
Function Call: WRITE	Prompt: @IOF Line Location: END+1
Function Call: READ	Timeout: DTIME Variable: SRYN Line Location: REQ+1
Function Call: WRITE	Prompt: !!,"Enter RETURN if you only want to view the availability of operating",!,"rooms, or 'YES' to also list requested cases for the date selected.",! Line Location: REQ+3
Function Call: WRITE	Prompt: ! Line Location: REQ+5
Function Call: WRITE	Prompt: SR16 Line Location: REQ+7
Function Call: WRITE	Prompt: @IOF,!!,"ROOM 12 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24" Line Location: REQ+8
Function Call: WRITE	Prompt: !,$S($D(SR1DAY):SRDATE,1:$E(SROR1,1,6)),?8,$E(^SRS(SROR,"S",SRSDATE,1),11,200) Line Location: LINE+2
Routine Call	DIC Line Location: START+9
Routine Call	%ZIS Line Location: START+11 END+1 REQ+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^SRS - [#131.7]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	START+10, LINE+1
^SRS - [#131.7]	REQ+9, LINE, LINE+1, LINE+2, GRAPH+1, GRAPH+2, GRAPH+3, CHNG+7
^SRS("R"	GRAPH+5

Label References

Name	Line Occurrences
CHNG	GRAPH+5
END	START+2, START+6, START+7, START+9, START+10
GRAPH	LINE
LINE	START+13, REQ+9
REQ	START+6, REQ+3
START	START+5

Naked Globals

Name	Field # of Occurrence
^(	REQ+9, GRAPH+5
^(1	CHNG+7*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	START+7!, REQ+5!
%DT("A"	START+7, REQ+5
>> %ZIS	START+11, END+1, REQ+7*
DIC	START+9!*
DIC("S"	START+9*
DIC(0	START+9*
DTIME	START+2, START+5, END, REQ+1
>> FLAG	GRAPH+5, CHNG+1, CHNG+2*, CHNG+3
>> I	GRAPH+5*
IO	START+11, END+1, REQ+7
IOF	START+2, START+12, END+1, REQ+8
>> IOP	START+11, END+1, REQ+7*
>> IOPTCH10	START+1
>> IOPTCH16	START+1
>> NUMB	GRAPH+5*
>> P	CHNG+4, CHNG+6, CHNG+7
>> SERV	CHNG+4*, CHNG+6
>> SR10	START+1*, END+1
>> SR16	START+1*, START+10, START+11, REQ+6, REQ+7
SR1DAY	START+8*, REQ+5!, LINE+2
>> SRDATE	START+13*, LINE+2
>> SRDAY	GRAPH+4*, GRAPH+5, CHNG+1, CHNG+2
>> SRDAZE	START+13*
>> SRDT	START+13*
>> SRDY	GRAPH+4*, CHNG+1, CHNG+2
>> SREQ	START+6, REQ+1, REQ+4
>> SRET	CHNG+4*, CHNG+5
>> SRNUMB	GRAPH+5*, CHNG+1, CHNG+2
>> SROOM	START+10*, START+12
>> SROR	START+10, REQ+9, LINE, LINE+1, LINE+2, GRAPH+1, GRAPH+2, GRAPH+3, GRAPH+5, CHNG+7
>> SROR1	LINE+1*, LINE+2
SRSDATE	START!, START+8, START+13, REQ+5*, LINE, LINE+2, GRAPH+1, GRAPH+2, GRAPH+3, GRAPH+4 , CHNG+1, CHNG+7
>> SRSDAY	GRAPH+5*, CHNG+1, CHNG+2
>> SRSITE("DIV"	REQ+9
>> SRSOUT	START, START+2, START+6, START+7, START+9, END, REQ+1, REQ+5
>> SRST	CHNG+4*, CHNG+5
>> SRTIME	GRAPH+5*
SRTN	END+1!
>> SRX1	CHNG+5*, CHNG+6, CHNG+7
>> SRX2	CHNG+5*, CHNG+6, CHNG+7
>> SRXREF	GRAPH+5*, CHNG+4
>> SRYN	START+2, START+3, START+4, START+5, START+6, REQ+1, REQ+2, REQ+3, REQ+4
>> X	START+1, START+5, START+13, END, GRAPH+4, CHNG+1, CHNG+6
>> X1	START+13, GRAPH+4, CHNG+1, CHNG+7
>> X2	START+13, GRAPH+4, CHNG+1*
>> X3	GRAPH+4*, CHNG+2
>> X5	CHNG+1*
>> Y	START+7, START+8, START+9, START+10, REQ+5
>> Y(0	START+10

Customize PDF page

Package: Surgery

Routine: SRSAVL

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: