Routine: SROESTV

Information

SROESTV ;BIR/ADM - SURGERY E-SIG UTILITY ; [ 03/02/04 8:03 AM ]

Source file <SROESTV.m>

Package	Total	Call Graph
Text Integration Utility	1	GETDOCS^TIUSRVLR
VA Fileman	1	$$EXTERNAL^DILFD

Package	Total	Caller Graph
Text Integration Utility	2	TIUPUTS TIUSROI
Order Entry Results Reporting	1	ORWSR

Name	Comments	DBIA/ICR reference
CASE	; list case info
ONE(SRG,SROP)	; return documents associated with a single case	ICR #3533 Status: Active Usage: Controlled Subscription
DOCS	; fetch documents associated with surgical case
NON(SROP)	; determine if case is non-OR procedure ; returns 1 if case is non-OR procedure ; returns 0 if case is not non-OR procedure	ICR #3533 Status: Active Usage: Controlled Subscription
LIST(SRG,SRDFN,SRSDT,SREDT,SRMAX,SRLDOC)	; return list of completed cases between start and end dates in reverse chronological order	ICR #3533 Status: Active Usage: Controlled Subscription
OPTOP(SROP)	; return parameter value for showing OpTop on signature ; 0 - never display Op Top	ICR #3533 Status: Active Usage: Controlled Subscription

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	CASE+2, CASE+3, CASE+4, CASE+5, CASE+6, CASE+7, CASE+8, CASE+9, CASE+10, CASE+11 , NON+3
^SRF("ADT"	LIST+14, LIST+15
^TMP("SRTMP"	DOCS+1!, DOCS+5, DOCS+6, DOCS+7*, DOCS+8, DOCS+9!
^TMP("TIULIST"	DOCS+3, DOCS+4, DOCS+5, DOCS+6, DOCS+7

Name	Line Occurrences
CASE	LIST+17, ONE+8
DOCS	ONE+8, CASE+14

Name	Field # of Occurrence
DT	LIST+11
>> I	CASE+8*
SRCNT	LIST+9~, LIST+12, LIST+16, ONE+5~, ONE+7, CASE+12*, CASE+13, DOCS+8
SRDATE	LIST+9~, LIST+12, LIST+14, LIST+15
SRDFN	LIST~, LIST+14, LIST+15
SRDOC	CASE+1~, CASE+8*, CASE+13
SRDOC(	CASE+8*
SREDT	LIST~, LIST+11*, LIST+12
SREXT	LIST+9~, CASE+10, CASE+11, CASE+12
SRFLG	LIST+9~, LIST+17, ONE+5~, ONE+7, CASE+12, CASE+14
SRG	LIST~, LIST+10, ONE~, ONE+6, CASE+13, DOCS+8
SRLB	DOCS+1~, DOCS+8*
SRLDOC	LIST~, LIST+13*, CASE+14
SRMAX	LIST~, LIST+11, LIST+16, ONE+5~, ONE+7
SRN2	CASE+1~, CASE+2*, CASE+5
SRNON	CASE+1~, CASE+2, CASE+3, CASE+4, CASE+5, CASE+6, CASE+10, CASE+11, NON+3~*, NON+4
SRNUM	DOCS+1~, DOCS+3, DOCS+4, DOCS+5, DOCS+6, DOCS+7, DOCS+8
SRNUMX	DOCS+1~, DOCS+8*
SROP	LIST+9~, LIST+15*, ONE~, ONE+7, CASE+2, CASE+3, CASE+4, CASE+5, CASE+6, CASE+7 , CASE+8, CASE+9, CASE+10, CASE+11, CASE+13, DOCS+2, NON~, NON+3, OPTOP~
SROPER	CASE+1~, CASE+6, CASE+7, CASE+13
SROPTOP	OPTOP+2~*, OPTOP+3
SROVP	DOCS+1~, DOCS+2*
SRPROV	LIST+9~, CASE+10, CASE+11, CASE+12*, CASE+13
SRQ	LIST+9~, LIST+12, LIST+14, LIST+15, LIST+16
SRSDATE	LIST+9~, CASE+9*, CASE+13
SRSDT	LIST~, LIST+11*, LIST+12
SRSOUT	CASE+1~, CASE+2*
SRSTOP	LIST+9~, LIST+12*, LIST+14
SRTITLE	DOCS+1~, DOCS+4*, DOCS+5, DOCS+6, DOCS+7
SRTIUY	DOCS+1~, DOCS+2*
>> X	LIST+12, CASE+8