Routine: SROREQ2

Package	Total	Call Graph
Surgery	3	HDR^SROREQ $$DIV^SROUTL0 ^SRSKILL
Kernel	1	^%ZISC
Registration	1	DEM^VADPT
VA Fileman	1	(D,Y)^DIQ

Package

Total

Call Graph

Surgery

HDR^SROREQ $$DIV^SROUTL0 ^SRSKILL

Kernel

^%ZISC

Registration

DEM^VADPT

VA Fileman

(D,Y)^DIQ

Package	Total	Caller Graph
Surgery	1	SROREQ

Package

Total

Caller Graph

Surgery

SROREQ

Name	Comments	DBIA/ICR reference
SET	; set ^TMP(
END
BEG	; entry when queued
PRINT	; print requests
PAGE
LOOP	; break procedure if greater than 55 characters

Name	Field # of Occurrence
^%ZISC	END+2
D^DIQ	BEG+1, PRINT+8
Y^DIQ	PRINT+10
HDR^SROREQ	PAGE+1
$$DIV^SROUTL0	BEG+3
^SRSKILL	END+2
DEM^VADPT	PRINT+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Press RETURN to continue " Line Location: END+1
Function Call: WRITE	Prompt: @IOF Line Location: END+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAGE+0
Function Call: WRITE	Prompt: ! Line Location: PRINT+15
Function Call: WRITE	Prompt: "-" Line Location: PRINT+15
Function Call: WRITE	Prompt: !!,"Patient: "_SRNAME,?40,"ID #: "_VA("PID"),!,"Age: "_AGE,?40,"Ward: "_SRWARD,!!,"Surgeon: "_SROSUR,?40,"Attending: "_SROATT,!,"Preoperative Diagnosis: "_SRDIAG Line Location: PRINT+16
Function Call: WRITE	Prompt: !!,"Principal Procedure:",?22,SROPS(1) Line Location: PRINT+17
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+17
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+17
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+17
Function Call: WRITE	Prompt: !,?22,SROPS(2) Line Location: PRINT+17
Function Call: WRITE	Prompt: !,?22,SROP(CNT) Line Location: PRINT+18
Function Call: WRITE	Prompt: ?40,"Position: "_SRPOS Line Location: PRINT+19
Function Call: WRITE	Prompt: !,"Case Schedule Order: "_SRORDER Line Location: PRINT+20
Function Call: WRITE	Prompt: !!,"Req. Anesthesia Technique: "_SRANES Line Location: PRINT+21
Function Call: WRITE	Prompt: !,"Blood Requested: ",?22,BLOOD(1) Line Location: PRINT+22
Function Call: WRITE	Prompt: !,?22,BLOOD(2) Line Location: PRINT+22
Function Call: WRITE	Prompt: !,?22,BLOOD(2) Line Location: PRINT+22
Function Call: WRITE	Prompt: !,^SRF(SRTN,5,X,0) Line Location: PRINT+24
Function Call: WRITE	Prompt: ! Line Location: PRINT+25

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(130	PRINT+10
^DPT - [#2]	PRINT+2
^SRF - [#130]	BEG+3, SET+1, PRINT+3, PRINT+4, PRINT+7, PRINT+8, PRINT+11, PRINT+12, PRINT+13, PRINT+14 , PRINT+24
^SRF("AR"	BEG+3
^SRO(132 - [#132]	PRINT+12
^TMP("SR"	BEG+1!, BEG+4, END!, SET+1*, PRINT+2
^VA(200 - [#200]	PRINT+6, PRINT+9

Name	Line Occurrences
LOOP	PRINT+5
PAGE	BEG+2, PRINT+1
PRINT	BEG+4
SET	BEG+3

Name	Field # of Occurrence
^(	PRINT+2, PRINT+3, PRINT+12, PRINT+13
^("1.0"	PRINT+8
^(0	PRINT+11
^(33	PRINT+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AGE	PRINT+2*, PRINT+16
BLOOD	PRINT+11!
BLOOD(	PRINT+11*
BLOOD(0	PRINT+22
BLOOD(1	PRINT+22
BLOOD(2	PRINT+22
BLOOD(3	PRINT+22
>> C	PRINT+10*
>> CNT	PRINT+4, PRINT+11, PRINT+18*
>> DFN	BEG+3, SET+1, PRINT+2
DTIME	END+1, PAGE
>> I	PRINT+18*
IO	BEG+1
IOF	END, END+2
IOSL	PRINT+1
IOST	END, END+1, PAGE
>> LINE	PRINT+15*
>> LOOP	LOOP+1*
>> M	PRINT+5*, LOOP+1
MM	PRINT+5!, PRINT+11, LOOP+1
MMM	PRINT+5!, LOOP+1*
>> SR(	PRINT+3*, PRINT+4
>> SR("1.0"	PRINT+8*, PRINT+9, PRINT+10
>> SRANES	PRINT+10*, PRINT+21
>> SRDIAG	PRINT+7*, PRINT+16
>> SREQDAY	PRINT+8*, PRINT+23
>> SREQDT	BEG+4, SET+1, PRINT+2, PRINT+8
>> SRHDR	BEG+2*, PAGE
>> SRLENGTH	PRINT+13*, PRINT+19
>> SRNAME	PRINT+2*, PRINT+16
>> SROATT	PRINT+4, PRINT+6, PRINT+16
SROP	PRINT+4!
SROP(	PRINT+4*, PRINT+18
SROP(0	PRINT+18
SROP(1	PRINT+18
>> SROPER	PRINT+4, PRINT+5, LOOP+1*
SROPS	PRINT+5!
SROPS(	LOOP+1*
SROPS(1	PRINT+5*, PRINT+17
SROPS(2	PRINT+17
SROPS(3	PRINT+17
SROPS(4	PRINT+17
SROPS(5	PRINT+17
>> SRORDER	PRINT+14*, PRINT+20
>> SROSUR	PRINT+4, PRINT+6, PRINT+16
>> SRPOS	PRINT+12*, PRINT+19
>> SRSDATE	BEG+1, BEG+3
>> SRSDT	BEG+1*
>> SRSOUT	BEG+2, BEG+4, END+1, PAGE, PRINT+1
>> SRSPER	PRINT+9*, PRINT+23
>> SRSS	BEG+3
>> SRSSN	PRINT+2*
SRTN	BEG+3, BEG+4, END+2!, SET+1, PRINT+2, PRINT+3, PRINT+4, PRINT+7, PRINT+8, PRINT+11 , PRINT+12, PRINT+13, PRINT+14, PRINT+24
>> SRWARD	PRINT+2*, PRINT+16
>> VA("PID"	PRINT+2, PRINT+16
>> VADM(1	PRINT+2
>> VADM(4	PRINT+2
>> X	END+1, PAGE, PRINT+4, PRINT+11, PRINT+24*
>> Y	BEG+1, PRINT+8, PRINT+10, PRINT+11
>> ZTQUEUED	END
>> ZTREQ	END*
>> ZTSTOP	END

Customize PDF page

Package: Surgery

Routine: SROREQ2

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: