Routine: SROALSSP

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

Package

Total

Call Graph

Surgery

CPTS^SROAUTL0 TECH^SROPRIN ^SROSTOP $$MANDIV^SROUTL0

Registration

DEM^VADPT

VA Fileman

(D,Y)^DIQ

Package	Total	Caller Graph
Surgery	1	SROALSS

Package

Total

Caller Graph

Surgery

SROALSS

Name	Comments	DBIA/ICR reference
CASE	; print a case
SET	; set variables
HDR	; print heading
SSCT	; write specialty count
SS	; print surgical specialty
UTL	; write to ^TMP("SRA,$J)
START
OTHER	; other operations
PRINT	;
LOOP	; break procedures

Name	Field # of Occurrence
D^DIQ	SET+12
Y^DIQ	SET+3, SET+13
CPTS^SROAUTL0	CASE+5
TECH^SROPRIN	SET+11
^SROSTOP	HDR+1
$$MANDIV^SROUTL0	START+1
DEM^VADPT	SET+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"TOTAL MAJOR CASES FOR ALL SPECIALTIES: ",SRTC Line Location: PRINT+4
Function Call: WRITE	Prompt: !!,"SURGICAL SPECIALTY: ",SRSS,! Line Location: CASE+2
Function Call: WRITE	Prompt: !,SRTN,?20,SRANM_" "_VA("PID"),?67,STATUS,?107,SRTECH,!,SRDT,?20,SROPS(1),?67,SREXCL Line Location: CASE+3
Function Call: WRITE	Prompt: ?107,SRDOC Line Location: CASE+3
Function Call: WRITE	Prompt: !,?20,SROPS(2) Line Location: CASE+4
Function Call: WRITE	Prompt: !,?20,SROPS(3) Line Location: CASE+4
Function Call: WRITE	Prompt: !,?20,SROPS(3) Line Location: CASE+4
Function Call: WRITE	Prompt: !,?20,"CPT Codes: " Line Location: CASE+5
Function Call: WRITE	Prompt: ! Line Location: CASE+7
Function Call: WRITE	Prompt: "-" Line Location: CASE+7
Function Call: WRITE	Prompt: !!,"SURGICAL SPECIALTY: ",SRSS,! Line Location: SS+2
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+3
Function Call: WRITE	Prompt: !,?(132-$L(SRHD)\2),SRHD,?120,"PAGE "_SRPAGE,!,?(132-$L(SRINST)\2),SRINST,!,?58,"SURGERY SERVICE",?100,"DATE REVIEWED:" Line Location: HDR+3
Function Call: WRITE	Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,"REVIEWED BY:" Line Location: HDR+4
Function Call: WRITE	Prompt: !!,"CASE #",?20,"PATIENT",?67,"ASSESSMENT STATUS",?107,"ANESTHESIA TECHNIQUE",!,"OPERATION DATE",?20,"PRINCIPAL OPERATIVE PROCEDURE",?67,"EXCLUSION CRITERIA",?107,"SURGEON",! Line Location: HDR+5
Function Call: WRITE	Prompt: "=" Line Location: HDR+5
Function Call: WRITE	Prompt: !!,"TOTAL ",SRSS,": ",SRC,! Line Location: SSCT+2
Function Call: WRITE	Prompt: "-" Line Location: SSCT+2

Global Variables Directly Accessed

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

Name	Line Occurrences
CASE	PRINT+2
HDR	PRINT+1, PRINT+3, CASE+2, SS+1, SSCT+1
LOOP	SET+9
OTHER	SET+7
PRINT	START+2
SET	PRINT+2
SS	PRINT+2
SSCT	PRINT+2
UTL	START+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> C	SET+3, SET+13
>> CAN	UTL+2, UTL+3
>> DFN	SET+5*
I	SET+5~, SET+7, CASE+5~, CASE+6
IO	PRINT+1
IOF	HDR+3
IOSL	PRINT+3, CASE+2, SS+1, SSCT+1
>> L	HDR+5, SSCT+2
>> LINE	CASE+7*
>> LOOP	LOOP+1*
>> M	SET+9*, LOOP+1
MM	SET+9!, LOOP+1*
MMM	SET+9!, LOOP+1*
>> OPER	OTHER+1*
>> SRA("RA"	SET+2*, SET+3
>> SRA(0	UTL+1, SET+5, SET+10, SET+12
>> SRANM	SET+5*, CASE+3
>> SRASP	UTL+5
>> SRASSN	SET+5*
>> SRC	PRINT+2, CASE+1, SSCT+2
SRCPTT	SET+1!*
>> SRDOC	SET+13, SET+14, CASE+3
>> SRDT	SET+12*, CASE+3
>> SRED	START+1
>> SREXCL	SET+3*, SET+4, CASE+3
>> SRFLG	UTL+5, PRINT+3
>> SRFRTO	HDR+4
>> SRHALT	HDR+1
>> SRHD	HDR+2*, HDR+3
>> SRINST	HDR+3
>> SRINSTP	START+1
SRL	CASE+5~*
>> SRLONG	OTHER+1*, OTHER+2
>> SROPER	SET+6, SET+8, SET+9, OTHER+1, OTHER+3, LOOP+1*
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	SET+9!
SROPS(	LOOP+1*
SROPS(1	SET+9*, CASE+3
SROPS(2	CASE+4
SROPS(3	CASE+4
SROPS(4	CASE+4
>> SROTHER	SET+7*, OTHER+1, OTHER+2
>> SRPAGE	PRINT+1, HDR+2, HDR+3
SRPROC	CASE+5~
SRPROC(	CASE+6
>> SRSD	START+1*
>> SRSOUT	START, PRINT+1, PRINT+2, PRINT+3, CASE+2, SS+1, HDR+1, SSCT+1
>> SRSS	UTL+6, UTL+7, UTL+8, SET+10, PRINT+1, PRINT+2*, CASE+2, SS+2, SSCT+2
>> SRTC	PRINT+1, PRINT+4, CASE+1
>> SRTECH	CASE+3
>> SRTN	START+1, UTL+1, UTL+2, UTL+3, UTL+4, UTL+5, UTL+6, UTL+7, UTL+8, SET+2 , SET+5, SET+6, SET+7, SET+8, SET+13, PRINT+2, CASE+3, OTHER+1, OTHER+2
>> STATUS	SET+2, SET+4, CASE+3
>> TYPE	UTL+7*
>> VA("PID"	SET+5, CASE+3
VADM	SET+5!
VADM(1	SET+5
>> X	UTL+4, SET+2, SET+6, SET+8
>> Y	SET+3, SET+12, SET+13*, SET+14
>> Z	SET+13*
>> ZTQUEUED	HDR+1

Customize PDF page

Package: Surgery

Routine: SROALSSP

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

Local Variables

Legend: