Routine: SROALNC

Package	Total	Call Graph
Registration	1	DEM^VADPT
Surgery	1	$$MANDIV^SROUTL0
VA Fileman	1	D^DIQ

Package	Total	Caller Graph
Surgery	1	SROALOG

Entry Points

Name	Comments	DBIA/ICR reference
CASE
HDR	; print heading
UTL	; set up TMP global
OTHER	; other operations
TOT
SRSD
GRAND
PRINT	; print case info
PAGE
LOOP	; break procedures

External References

Name	Field # of Occurrence
D^DIQ	PRINT+8
$$MANDIV^SROUTL0	SROALNC+4
DEM^VADPT	PRINT+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,SRTN,?18,SRANM_" "_VA("PID"),?53,SRATYPE,?67,SRSTATUS,!,SRDT,?18,SROPS(1),! Line Location: PRINT+10
Function Call: WRITE	Prompt: ! Line Location: PRINT+11
Function Call: WRITE	Prompt: ?18,SROPS(I),! Line Location: PRINT+12
Function Call: WRITE	Prompt: "-" Line Location: PRINT+13
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAGE+1
Function Call: WRITE	Prompt: !!,"If you want to continue the listing, press the 'Enter' key.",!,"Type '^' to return to the menu." Line Location: PAGE+2
Function Call: WRITE	Prompt: @IOF,!,?(80-$L(SRTITLE)\2),SRTITLE,?70,$J("PAGE "_SRPAGE,9) Line Location: HDR+1
Function Call: WRITE	Prompt: !,?(80-$L(SRINST)\2),SRINST Condition for execution: $E(IOST)="P" Line Location: HDR+1
Function Call: WRITE	Prompt: !,?(80-$L(SRFRTO)\2),SRFRTO Line Location: HDR+1
Function Call: WRITE	Prompt: !,">>> "_SRSS Line Location: HDR+3
Function Call: WRITE	Prompt: "=" Line Location: HDR+4
Function Call: WRITE	Prompt: !!,"TOTAL FOR "_SRSS_": ",TOT Line Location: TOT+0
Function Call: WRITE	Prompt: !!,"TOTAL: ",GRAND Line Location: GRAND+0
Function Call: WRITE	Prompt: !!,"TOTAL FOR ALL SPECIALTIES: ",GRAND Line Location: GRAND+1

Global Variables Directly Accessed

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

Label References

Name	Line Occurrences
CASE	SROALNC+6, SRSD
GRAND	SROALNC+7, SROALNC+8, SROALNC+9, SROALNC+10, SROALNC+11
HDR	SROALNC+8, SROALNC+9, SROALNC+10, PAGE
LOOP	PRINT+7
OTHER	PRINT+6
PAGE	PRINT+2, PRINT+9, PAGE+2
PRINT	CASE+6
SRSD	SROALNC+5
TOT	SROALNC+5, GRAND+2
UTL	SROALNC+4

Naked Globals

Name	Field # of Occurrence
^(	SROALNC+6, SRSD

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DFN	PRINT+3*
DTIME	PAGE+1
>> GRAND	SROALNC+2, SROALNC+7, SROALNC+8, SROALNC+9, SROALNC+10, SROALNC+11, CASE+6, GRAND, GRAND+1
I	PRINT+3~, PRINT+6, PRINT+11, PRINT+12*
IOF	HDR+1
IOSL	PRINT+2, PRINT+9
IOST	PAGE, HDR+1, HDR+2
>> LINE	PRINT+13, HDR+4
>> LOOP	LOOP+1*
>> M	PRINT+7*, LOOP+1
MM	PRINT+7!, LOOP+1*
MMM	PRINT+7!, LOOP+1*
>> SRA	SROALNC+6, UTL+5, UTL+6, UTL+7, SRSD*, CASE, CASE+3, PRINT+8
>> SRA(0	PRINT+3*, PRINT+5
SRA2	CASE~*, CASE+1, CASE+2, CASE+5
>> SRANM	PRINT+3, PRINT+4, PRINT+10
>> SRASP	SROALNC+3, UTL+3
>> SRASSN	PRINT+3*
>> SRATYPE	CASE+1, CASE+3, CASE+4, CASE+5, PRINT+10
SRDA	PRINT+1~
>> SRDT	PRINT+8*, PRINT+10
>> SRED	SROALNC+4
>> SRFLG	SROALNC+3, SROALNC+7, SROALNC+8, SROALNC+9, UTL+3, GRAND+1, GRAND+2
>> SRFRTO	HDR+1
>> SRHDR	SROALNC+2, PAGE, HDR+5
>> SRINST	HDR+1
>> SRINSTP	SROALNC+4
>> SRLONG	OTHER+1*, OTHER+2
>> SRNEW	SROALNC+2, SROALNC+6, SRSD, PRINT+2, HDR+5
>> SROPER	PRINT+6, PRINT+7, OTHER+1, OTHER+3, LOOP+1
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	PRINT+7!
SROPS(	PRINT+11, PRINT+12, LOOP+1*
SROPS(1	PRINT+7*, PRINT+10
>> SROTHER	PRINT+6, OTHER+1, OTHER+2
>> SRPAGE	SROALNC+2, HDR+1, HDR+5
>> SRPRINT	HDR+2
SRPROCS	PRINT+1~*
>> SRSD	SROALNC+4, SROALNC+6, UTL+6, UTL+7, SRSD*, PRINT+8
>> SRSOUT	SROALNC+2, SROALNC+4, SROALNC+5, SROALNC+6, SROALNC+7, SRSD, PRINT+2, PRINT+9, PRINT+13, PAGE+1
>> SRSP	SROALNC+5, SROALNC+6, SROALNC+7, SROALNC+9, SROALNC+10, SROALNC+11, UTL+6, PRINT+11, PRINT+12, HDR+3 , HDR+4, GRAND, GRAND+1, GRAND+2
SRSP1	PRINT+1~, PRINT+5*, PRINT+11
>> SRSPEC	SROALNC+3*, SROALNC+8, GRAND+2
>> SRSS	SROALNC+5, SROALNC+8, SROALNC+9, SROALNC+10, SROALNC+11, UTL+6, SRSD, HDR+3, TOT, GRAND+2*
>> SRSTATUS	PRINT+8*, PRINT+10
>> SRTITLE	SROALNC+2*, HDR+1
>> SRTN	SROALNC+4, SROALNC+6, UTL+1, UTL+2, UTL+3, UTL+4, UTL+5, UTL+6, UTL+7, SRSD* , PRINT+3, PRINT+6, PRINT+10, OTHER+1, OTHER+2
SRY	PRINT+1~
>> TOT	SROALNC+2, SROALNC+5, SROALNC+6, SRSD, CASE+6, TOT
>> VA("PID"	PRINT+3, PRINT+10
VADM	PRINT+3!
VADM(1	PRINT+3
>> X	PRINT+5, PRINT+8, PAGE+1*, PAGE+2
>> Y	PRINT+8*

Customize PDF page

Package: Surgery

Routine: SROALNC

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: