Routine: SROAPRE1

Package	Total	Call Graph
VA Fileman	2	^DIE ^DIR
Surgery	1	(NOCARD,NOGAST,NOVAS)^SROAPR1A

Package	Total	Caller Graph
Surgery	1	SROAPRE

Name	Comments	DBIA/ICR reference
PULM	; pulmonary
NO2ALL	; set all fields to NO
SURE
HEP	; hepatobiliary
NOHEP	; no hepatobiliary problems
RET
1	; edit general information
3	; edit hepatobiliary information
2	; edit pulmonary information
NOPULM	; no pulmonary problems
NOGEN	; no general problems
GEN	; general

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GEN+2
Function Call: WRITE	Prompt: ! Line Location: PULM+1
Function Call: WRITE	Prompt: !! Line Location: RET+0
Function Call: WRITE	Prompt: ! Line Location: SURE+0
Routine Call	DIE Line Location: GEN+2 GEN+5 GEN+6 PULM+1 HEP+1
Routine Call	DIR Line Location: 1+2 2+2 3+2 GEN+3 RET SURE

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	1+3, 1+4, 2+3, 2+4, 3+3, 3+4, NOGEN+1, NOGEN+2, NOPULM+1, NOHEP+1 , NO2ALL+1, NO2ALL+2, NO2ALL+3, NO2ALL+4, NO2ALL+5, NO2ALL+6

Name	Field # of Occurrence
DA	SROAPRE1+2!, GEN+2, GEN+3, GEN+5!, GEN+6!, PULM+1, HEP+1
DIE	GEN+2!, GEN+5!, GEN+6!, PULM+1!, HEP+1!*
DIR	1+1!, 1+2!, 2+1!, 2+2!, 3+1!, 3+2!, GEN+3!, RET!, SURE!
DIR("A"	1+2, 2+2, 3+2, GEN+3, SURE*
DIR("B"	1+1, 2+1, 3+1, SURE
DIR(0	1+2, 2+2, 3+2, GEN+3, RET, SURE
DR	GEN+2!, GEN+5!, GEN+6!, PULM+1!, HEP+1!*
>> DTOUT	GEN+4, RET, SURE
>> DUOUT	1+2, 2+2, 3+2, GEN+4, RET, SURE
>> EMILY	SROAPRE1+2
>> I	NOGEN+1, NOPULM+1
>> SRACLR	GEN+7, PULM+2, HEP+2*
>> SRAO(1	1+1
>> SRAO(2	2+1
>> SRAO(3	3+1
>> SRAX	1+3, 1+4, 2+3, 2+4, 3+3, 3+4, NOGEN+1, NOPULM+1, NOHEP+1, NO2ALL+1* , NO2ALL+2, NO2ALL+3, NO2ALL+4, NO2ALL+5, NO2ALL+6
>> SRCAT	1+3, 2+3, 3+3*, SURE
>> SRSOUT	1+2, 1+3, 2+2, 2+3, 3+2, 3+3, RET, SURE*
>> SRTN	1+3, 1+4, 2+3, 2+4, 3+3, 3+4, GEN+2, GEN+3, NOGEN+1, NOGEN+2 , PULM+1, NOPULM+1, HEP+1, NOHEP+1, NO2ALL+1, NO2ALL+2, NO2ALL+3, NO2ALL+4, NO2ALL+5, NO2ALL+6
SRUP	GEN+1~*
>> SRYN	1+3, 2+3, 3+3, SURE*
>> X	1+1, 1+3, 2+1, 2+3, 3+1, 3+3, GEN+5, NOGEN+1, NOGEN+2
>> Y	1+4, 1+5, 2+4, 2+5, 3+4, 3+5, GEN+2, GEN+6, SURE

Information