Routine: SROERR1

Package	Total	Call Graph
Registration	1	DEM^VADPT
Surgery	1	STATUS^SROERR0
VA Fileman	1	D^DIQ

Package	Total	Caller Graph
Surgery	1	SROERR

Entry Points

Name	Comments	DBIA/ICR reference
PRINT	;
OPTM	; find begin and end times
SCHED	; find scheduling times
LOOP	; break procedure if greater than J characters
CON

External References

Name	Field # of Occurrence
D^DIQ	SROERR1+6, SROERR1+17, SCHED+1, SCHED+2, OPTM+1, OPTM+2
STATUS^SROERR0	SROERR1+3
DEM^VADPT	SROERR1+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,"Patient: "_SRNAME,?40,"ID#: "_VA("PID"),?65,"Age: "_SRAGE,!,"Ward: "_SRWARD,?40,"Surgical Case #"_SRTN_SRSTAT,! Line Location: PRINT+1
Function Call: WRITE	Prompt: "-" Line Location: PRINT+1
Function Call: WRITE	Prompt: !,"Ward: "_SRWARD,?40,"Surgical Case #"_SRTN_SRSTAT Line Location: PRINT+2
Function Call: WRITE	Prompt: !,"Date of Operation: "_SRSDATE,?40,"Estimated Case Length: "_SRLENGTH Line Location: PRINT+3
Function Call: WRITE	Prompt: !,"Scheduled Start Time: "_SRST,?40,"Scheduled End Time: "_SRET Line Location: PRINT+4
Function Call: WRITE	Prompt: !,"Cancel Date: "_SRCAN,?34,"Cancel Reason: "_SREAS Line Location: PRINT+5
Function Call: WRITE	Prompt: !,"Time Operation Began: "_SRSTART,?40,"Time Operation Ended: "_SREND Line Location: PRINT+6
Function Call: WRITE	Prompt: !,"Operating Room: "_$P(^SC($P(^SRS(SROR,0),"^"),0),"^") Line Location: PRINT+7
Function Call: WRITE	Prompt: !!,"Surgical Specialty: "_SRSNM,!,"Surgeon: "_SROSUR,?40,"Attending: "_SROATT,!,"Preoperative Diagnosis: "_SRDIAG Line Location: PRINT+8
Function Call: WRITE	Prompt: !!,"Principal Procedure:",?22,SROPS(1) Line Location: PRINT+9
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+9
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+9
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+9
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+9
Function Call: WRITE	Prompt: !,?22,SROP(CNT) Line Location: PRINT+10
Function Call: WRITE	Prompt: !,"Case Schedule Order: "_SRORDER Line Location: PRINT+11
Function Call: WRITE	Prompt: !,"Requested Anesthesia Technique: "_SRANES Line Location: PRINT+12
Function Call: WRITE	Prompt: !!,"Blood Requested: ",?18,BLOOD(1) Line Location: PRINT+13
Function Call: WRITE	Prompt: !,?18,BLOOD(2) Line Location: PRINT+13
Function Call: WRITE	Prompt: !,?18,BLOOD(2) Line Location: PRINT+13
Function Call: WRITE	Prompt: !,"Restraints: ",?18,SREST(1) Line Location: PRINT+14
Function Call: WRITE	Prompt: ", "_SREST(2) Line Location: PRINT+14
Function Call: WRITE	Prompt: ", "_SREST(2) Line Location: PRINT+14
Function Call: WRITE	Prompt: ", "_SREST(2) Line Location: PRINT+14
Function Call: WRITE	Prompt: !,^SRF(SRTN,5,X,0) Line Location: PRINT+15
Function Call: WRITE	Prompt: !!,"Concurrent Case #"_SRSCON,!,SROPS(1) Line Location: CON+1
Function Call: WRITE	Prompt: !,SROPS(2) Line Location: CON+1
Function Call: WRITE	Prompt: !,SROPS(2) Line Location: CON+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	SROERR1+2
^SC - [#44]	PRINT+7
^SRF - [#130]	SROERR1+4, SROERR1+5, SROERR1+6, SROERR1+7, SROERR1+10, SROERR1+11, SROERR1+12, SROERR1+13, SROERR1+14, SROERR1+15 , SROERR1+16, SROERR1+17, PRINT+6, PRINT+15, CON, SCHED+1, SCHED+2, OPTM+1, OPTM+2
^SRO(132.05 - [#132.05]	SROERR1+12
^SRO(135 - [#135]	SROERR1+17
^SRO(137.45 - [#137.45]	SROERR1+4
^SRS - [#131.7]	PRINT+7
^VA(200 - [#200]	SROERR1+9

Label References

Name	Line Occurrences
LOOP	SROERR1+8, CON
OPTM	SROERR1+16
SCHED	SROERR1+15

Naked Globals

Name	Field # of Occurrence
^(	SROERR1+2, SROERR1+5
^("CON"	CON
^(0	SROERR1+13
^(30	SROERR1+17
^(33	SROERR1+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	SROERR1+11*
BLOOD	SROERR1+13!
BLOOD(	SROERR1+13*
BLOOD(0	PRINT+13
BLOOD(1	PRINT+13
BLOOD(2	PRINT+13
BLOOD(3	PRINT+13
>> CNT	SROERR1+7, SROERR1+12, SROERR1+13, PRINT+10
>> DFN	SROERR1+2*
>> I	SROERR1+12, SROERR1+13, PRINT+10, PRINT+15
IOF	PRINT+1
IOST	PRINT+1, PRINT+2
>> J	SROERR1+8, CON, LOOP+1
>> LINE	PRINT+1*
>> LOOP	LOOP+1*
>> M	SROERR1+8, CON, LOOP+1
MM	SROERR1+8!, SROERR1+13, LOOP+1
MMM	SROERR1+8!, CON, LOOP+1*
>> ORAGE	SROERR1+2
>> ORSTS	SROERR1+15, PRINT+4, PRINT+5, PRINT+11
>> ORVP	SROERR1+2
>> SR("1.0"	SROERR1+11*
>> SRAGE	SROERR1+2*, PRINT+1
>> SRANES	SROERR1+11*, PRINT+12
>> SRCAN	SROERR1+17*, PRINT+5
>> SRDIAG	SROERR1+10*, PRINT+8
>> SREAS	SROERR1+17*, PRINT+5
>> SREND	PRINT+6, OPTM+2*
SREST	SROERR1+12!
SREST(	SROERR1+12*
SREST(0	PRINT+14
SREST(1	PRINT+14
SREST(2	PRINT+14
SREST(3	PRINT+14
SREST(4	PRINT+14
>> SRET	PRINT+4, SCHED+2*
>> SRFIND	SCHED+1, SCHED+2, OPTM+1, OPTM+2
>> SRLENGTH	SROERR1+14*, PRINT+3
>> SRNAME	SROERR1+2*, PRINT+1
>> SROATT	SROERR1+5, SROERR1+9, PRINT+8
SROERR	SROERR1+3*!
SROP	SROERR1+7!
SROP(	SROERR1+7*, PRINT+10
SROP(0	PRINT+10
SROP(1	PRINT+10
>> SROPER	SROERR1+7, SROERR1+8, CON, LOOP+1
SROPS	SROERR1+8!, CON!
SROPS(	LOOP+1*
SROPS(1	SROERR1+8, PRINT+9, CON, CON+1
SROPS(2	PRINT+9, CON+1
SROPS(3	PRINT+9, CON+1
SROPS(4	PRINT+9
SROPS(5	PRINT+9
>> SROR	SROERR1+6*, PRINT+7
>> SRORDER	SROERR1+15*, PRINT+11
>> SROSUR	SROERR1+5, SROERR1+9, PRINT+8
SRSCON	CON!*, CON+1
>> SRSDATE	SROERR1+6*, PRINT+3
>> SRSNM	SROERR1+4*, PRINT+8
>> SRSS	SROERR1+4*
>> SRSSN	SROERR1+2*
>> SRST	PRINT+4, SCHED+1*
>> SRSTART	PRINT+6, OPTM+1*
>> SRSTAT	SROERR1+3*, PRINT+1, PRINT+2
>> SRSTATUS	SROERR1+3
>> SRTN	SROERR1+3, SROERR1+4, SROERR1+5, SROERR1+6, SROERR1+7, SROERR1+10, SROERR1+11, SROERR1+12, SROERR1+13, SROERR1+14 , SROERR1+15, SROERR1+16, SROERR1+17, PRINT+1, PRINT+2, PRINT+6, PRINT+15, CON, SCHED+1, SCHED+2 , OPTM+1, OPTM+2
>> SRWARD	SROERR1+2*, PRINT+1, PRINT+2
>> VA("PID"	SROERR1+2, PRINT+1
>> VADM(1	SROERR1+2
>> X	SROERR1+7, SROERR1+12, SROERR1+13, SROERR1+17, PRINT+15*
>> Y	SROERR1+6, SROERR1+12, SROERR1+13, SROERR1+17, SCHED+1, SCHED+2, OPTM+1, OPTM+2

Customize PDF page

Package: Surgery

Routine: SROERR1

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: