Routine: SRORIN

Package	Total	Call Graph
VA Fileman	4	^%DT H^%DTC FILE^DICN D^DIQ
Surgery	1	$$ORDIV^SROUTL0

Package	Total	Caller Graph
Surgery	1	SRORUT

Entry Points

Name	Comments	DBIA/ICR reference
SETSP	; set information in global
PAGE
DATE	; correct date
MSG
SETOR	; set information for OR in global
STILL
DAY

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,"The start and end times for each operating room for the above dates have been",!,"entered with default start and end times. Do you still want to print the" Line Location: STILL+0
Function Call: READ	Timeout: DTIME Variable: SRYN Line Location: STILL+1
Function Call: WRITE	Prompt: !!,"Enter RETURN if you want to update the start and end times to accurately",!,"reflect utilization, or 'YES' to print the report with the days listed" Line Location: STILL+3
Function Call: WRITE	Prompt: !,"having the default start and end times.",!! Line Location: STILL+4
Function Call: WRITE	Prompt: @IOF,"The following dates are missing start and end times for all operating rooms.",!,"The times will be automatically entered.",! Line Location: MSG+0
Function Call: WRITE	Prompt: "-" Line Location: MSG+0
Function Call: WRITE	Prompt: !!,SRDT,?16,"This date is a holiday, some/all Operating Rooms and Specialties",!,?16,"may have been inactivated." Line Location: MSG+1
Function Call: WRITE	Prompt: !!,SRDT,?17,"Start Times and End Times Entered." Line Location: MSG+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAGE+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAGE+0
Function Call: WRITE	Prompt: !!,"The Utilization Report can not be generated with incomplete dates.",!!,"Press RETURN to exit the option " Line Location: PAGE+0
Function Call: WRITE	Prompt: @IOF Line Location: PAGE+1

FileNo	Call Tags
^SRU - [#131.8]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^HOLIDAY - [#40.5]	MSG+1, SETSP+1, SETSP+2, SETOR+2, SETOR+3
^SC - [#44]	SETOR+1
^SRO(133 - [#133]	SETSP+1, SETOR+1, SETOR+2
^SRS - [#131.7]	DAY+5, SETOR+1, SETOR+4, SETOR+5, SETOR+6, SETOR+8
^SRU - [#131.8]	DAY+2, DAY+3, DAY+5, DAY+6

Name	Field # of Occurrence
^(0	DAY+6*, SETOR+5, SETOR+6

Name	Field # of Occurrence
>> %DT	DAY*
>> %Y	DAY+4
DA	DAY+2!
DD	DAY+2!
DIC	DAY+2!*
DIC(0	DAY+2*
DINUM	DAY+2!*
DLAYGO	DAY+2*!
DO	DAY+2!
DTIME	STILL+1, PAGE
IOF	MSG, PAGE+1
IOSL	DAY+9
>> LINE	MSG*
>> SRACT	SETOR+4, SETOR+8, SETOR+9, SETOR+10
>> SRDAY	DAY+4*, SETOR+4
>> SRDIV	DAY+5
>> SRDT	DAY+1*, MSG+1, MSG+2
>> SRED1	SRORIN+2
>> SRET	SETOR+4, SETOR+6, SETOR+7, SETOR+9*, SETOR+10
>> SRFLAG	SRORIN+2, SRORIN+3, MSG, MSG+1, PAGE
>> SRHOLID	SETSP+1*, SETSP+2
SRINST	SRORIN+2~, SETSP+1, SETOR+1, SETOR+2, SETOR+3
>> SRMG	DAY+4, DAY+5, DAY+7
>> SRMSG	SRORIN+2, MSG
>> SRMSG1	SRORIN+2, DAY+2, DAY+7*, MSG, MSG+2
>> SRNEWM	DATE+2*
>> SROR	DAY+4, DAY+5, DAY+6, SETOR+1, SETOR+4, SETOR+5, SETOR+6, SETOR+8
>> SRSD	SRORIN+2
>> SRSDATE	SRORIN+2, DAY, DAY+1, DAY+2, DAY+3, DAY+4, DAY+5, DAY+6, MSG+1, DATE+1 , DATE+2*, SETSP+1, SETSP+2, SETSP+3, SETOR+2, SETOR+3, SETOR+4, SETOR+5, SETOR+6, SETOR+9
>> SRSOUT	SRORIN+2, DAY+9, PAGE
>> SRSS	DAY+4*
>> SRST	SETOR+4, SETOR+5, SETOR+6, SETOR+7, SETOR+9, SETOR+10
>> SRTMS	DAY+6, SETSP+2, SETSP+3, SETOR+2, SETOR+3, SETOR+4, SETOR+10
SRTN	DAY+2!
>> SRWD	SETOR+4*, SETOR+5, SETOR+6, SETOR+8
>> SRYN	SRORIN+3, STILL+1, STILL+2, STILL+3, STILL+4, PAGE
>> X	SRORIN+2, DAY, DAY+2, DAY+4, DAY+6, PAGE
>> Y	DAY, DAY+1*