Routine: SROALCSP

Package	Total	Call Graph
Surgery	4	CPTS^SROAUTL0 TECH^SROPRIN ^SROSTOP ($$MANDIV,$$NODATA)^SROUTL0
Registration	1	DEM^VADPT
VA FileMan	1	D^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Surgery	1	SROALCS

Entry Points

Name	Comments	DBIA/ICR reference
UTL	; write to ^TMP("SRA",$J)
SET	; print assessments
OTHER	; other operations
LOOP	; break procedures
HDR	; print heading
SS	; print surgical specialty
LINE

External References

Name	Field # of Occurrence
D^DIQ	SET+4, SET+9
CPTS^SROAUTL0	SET+11
TECH^SROPRIN	SET+8
^SROSTOP	HDR+1
$$MANDIV^SROUTL0	SROALCSP+3
$$NODATA^SROUTL0	SROALCSP+5
DEM^VADPT	SET+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$NODATA^SROUTL0() Line Location: SROALCSP+5
Function Call: WRITE	Prompt: !,?20,SROPS(SRAO) Line Location: SET+10
Function Call: WRITE	Prompt: !,?20,"CPT Codes: " Line Location: SET+11
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?53,"COMPLETED RISK ASSESSMENTS",?120,"PAGE "_SRPAGE,!,?(132-$L(SRINST)\2),SRINST,!,?58,"SURGERY SERVICE",?100,"DATE REVIEWED:" Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,"REVIEWED BY:" Line Location: HDR+3
Function Call: WRITE	Prompt: !!,"ASSESSMENT #",?20,"PATIENT",?67,"DATE COMPLETED",?107,"ANESTHESIA TECHNIQUE",!,"OPERATION DATE",?20,"OPERATIVE PROCEDURE(S)",! Line Location: HDR+4
Function Call: WRITE	Prompt: "=" Line Location: HDR+4
Function Call: WRITE	Prompt: !!," SURGICAL SPECIALTY: ",SRSS," ",! Line Location: SS+2
Function Call: WRITE	Prompt: ! Line Location: LINE+0
Function Call: WRITE	Prompt: "-" Line Location: LINE+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	SROALCSP+3, UTL+2, UTL+3, SET+3, SET+5, SET+6, OTHER+1, OTHER+2
^SRF("AC"	SROALCSP+3
^SRO(137.45 - [#137.45]	UTL+3
^TMP("SRA"	SROALCSP+2!, SROALCSP+4, SROALCSP+5, UTL+5*

Label References

Name	Line Occurrences
HDR	SROALCSP+2, SET+2, SS+1
LINE	SET+13
LOOP	SET+7
OTHER	SET+5
SET	SROALCSP+4
SS	SROALCSP+4
UTL	SROALCSP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DFN	SET+3*
I	SET+3~, SET+5, SET+10, SET+11~, SET+12*
IOF	HDR+2
IOSL	SET+2, SS+1
>> L	LINE*
>> LINE	HDR+4*
>> LOOP	LOOP+1*
>> M	SET+7*, LOOP+1
MM	SET+7!, LOOP+1*
MMM	SET+7!, LOOP+1*
>> SR("RA"	SROALCSP+3, UTL+1, UTL+4, SET+3, SET+4
>> SRA(0	SET+3*, SET+9
>> SRANM	SET+3*, SET+10
>> SRAO	SET+10*
>> SRASP	UTL+2
>> SRASSN	SET+3*
>> SRC	SET+4*, SET+10
SRCPTT	SET+1!*
>> SRDFN	SROALCSP+2*
>> SRDT	SET+9*, SET+10
>> SRED	SROALCSP+3
>> SRFLG	UTL+2
>> SRFRTO	HDR+3
>> SRHALT	HDR+1
>> SRINST	HDR+2
>> SRINSTP	SROALCSP+3
SRL	SET+11~*
>> SRLONG	OTHER+1*, OTHER+2
>> SROPER	SET+5, SET+6, SET+7, OTHER+1, OTHER+3, LOOP+1*
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	SET+7!
SROPS(	SET+10, LOOP+1*
SROPS(1	SET+7*, SET+10
>> SROTHER	SET+5, OTHER+1, OTHER+2
>> SRPAGE	SROALCSP+2, HDR+2
SRPROC	SET+11~
SRPROC(	SET+12
>> SRSD	SROALCSP+3*
>> SRSOUT	SROALCSP+2, SROALCSP+3, SROALCSP+4, SET+2, HDR+1
>> SRSS	SROALCSP+4, UTL+3, UTL+4*, UTL+5, SS+2
>> SRTECH	SET+10
>> SRTN	SROALCSP+3, SROALCSP+4, UTL+2, UTL+3, UTL+5, SET+3, SET+5, SET+6, SET+10, OTHER+1 , OTHER+2
>> TYPE	UTL+4*
>> VA("PID"	SET+3, SET+10
VADM	SET+3!
VADM(1	SET+3
>> X	SET+6*
>> Y	SET+4, SET+9
>> ZTQUEUED	HDR+1

Customize PDF page

Package: Surgery

Routine: SROALCSP

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: