Routine: SROACCR

Package	Total	Call Graph
Surgery	2	^SROACRC ^SRSKILL
Registration	1	DEM^VADPT
VA Fileman	1	^DIE

Package

Total

Call Graph

Surgery

^SROACRC ^SRSKILL

Registration

DEM^VADPT

VA Fileman

^DIE

Name	Field # of Occurrence
^DIE	ASK+2, ONE+2
^SROACRC	START
^SRSKILL	END
DEM^VADPT	SROACCR+3

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: SROACCR+2
Function Call: WRITE	Prompt: !!,"A Surgery Risk Assessment must be selected prior to using this option.",!!,"Press <RET> to continue " Line Location: SROACCR+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASK+0
Function Call: WRITE	Prompt: @IOF,!,SRANAME,! Line Location: ASK+5
Function Call: WRITE	Prompt: "-" Line Location: ASK+5
Function Call: WRITE	Prompt: !! Line Location: ASK+7
Function Call: WRITE	Prompt: @IOF Line Location: END+0
Function Call: WRITE	Prompt: @IOF,!!!!,"Enter the number or range of numbers you want to edit. Examples of proper",!,"responses are listed below." Line Location: HELP+0
Function Call: WRITE	Prompt: !!,"1. Enter 'A' to update all information.",!!,"2. Enter a number (1-14) to update the information in that field. (For",!," example, enter '7' to update Mediastinitis)" Line Location: HELP+1
Function Call: WRITE	Prompt: !!,"3. Enter a range of numbers (1-14) separated by a ':' to enter a range of",!," information. (For example, enter '3:5' to update Preoperative MI,",!," Endocarditis, and Renal Failure Requiring Dialysis)" Line Location: HELP+2
Function Call: WRITE	Prompt: !!,"4. Enter 'NONE' to answer all complications as 'NO'" Line Location: HELP+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: HELP+4
Function Call: WRITE	Prompt: !! Line Location: RANGE+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: RET+0
Function Call: WRITE	Prompt: @IOF,!,"You cannot update any fields within this option except 'Operative Death (Y/N)'.",!!,"The complication information must be entered using the options within the",!,"Complications Menu found on your main Surgery Risk Assessment menu." Line Location: NOGO+1
Function Call: WRITE	Prompt: !!,"Press RETURN to continue " Line Location: NOGO+2
Routine Call	DIE Line Location: ASK+2 ONE+2

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	SROACCR+3

Name	Line Occurrences
END	SROACCR+2, START, ASK, ASK+1, ASK+4
HELP	ASK+1, ASK+4
NOGO	ONE+1
ONE	ASK+7, RANGE+1
RANGE	ASK+6
RET	START
START	ASK+1, ASK+2, ASK+4, ASK+6, ASK+7

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CURLEY	RANGE+1*
DA	ASK+2!, ONE+2
>> DFN	SROACCR+3*
DIE	ASK+2!, ONE+2!
DR	ASK+2!, ONE+2!
DTIME	SROACCR+2, ASK, HELP+4, RET, NOGO+2
>> EMILY	ASK+7, RANGE+1, ONE+1, ONE+2
IOF	ASK+5, END, HELP, NOGO+1
>> MOE	ASK+5*
NOGO	RANGE+1!, NOGO+3*
>> SHEMP	RANGE+1*
SRA	START!
>> SRACLR	SROACCR+3, START
>> SRANAME	SROACCR+3*, ASK+5
SRAO	START!
SRAO(	ASK+1, ASK+7, ONE+2
>> SRSOUT	SROACCR+3, START, ASK+1, ASK+4, HELP+4, RANGE+1, ONE+2, RET
>> SRTN	SROACCR+2, SROACCR+3, ASK+2, ONE+2
>> VA("PID"	SROACCR+3
>> VADM(1	SROACCR+3
>> X	SROACCR+2, ASK, ASK+1, ASK+2, ASK+3, ASK+4, ASK+6, ASK+7, HELP+4, RANGE+1 , RET, NOGO+2*
>> Y	ASK+4*, ONE+2
>> Z	ASK+4*

Customize PDF page

Package: Surgery

Routine: SROACCR

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
END
HELP
RET
ONE	; edit one item
START
RANGE	; range of numbers
NOGO	; no updates to complications
ASK