Routine: SROAPR1A

Information

SROAPR1A ;B'HAM ISC/MAM - EDIT PREOP INFO ; [ 03/16/04 2:44 PM ]

Source file <SROAPR1A.m>

Package	Total	Call Graph
VA Fileman	2	^DIE ^DIR

Package	Total	Caller Graph
Surgery	2	SROAPRE SROAPRE1

Name	Comments	DBIA/ICR reference
SURE
NOVAS	; no vascular problems
RET
5	; edit cardiac information
4	; edit gastrointestinal information
6	; edit vascular information
VAS	; vascular
NOGAST	; no gastointectinal problems
GAST	; gastointectinal
CARD	; cardiac
NOCARD	; no cardiac problems

Name	Field # of Occurrence
^DIE	GAST+1, CARD+1, VAS+1
^DIR	4+2, 5+2, 6+2, RET, SURE

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: CARD+1
Function Call: WRITE	Prompt: ! Line Location: VAS+1
Function Call: WRITE	Prompt: !! Line Location: RET+0
Function Call: WRITE	Prompt: ! Line Location: SURE+0
Routine Call	DIE Line Location: GAST+1 CARD+1 VAS+1
Routine Call	DIR Line Location: 4+2 5+2 6+2 RET SURE

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	4+3, 4+4, 5+3, 5+4, 6+3, 6+4, NOGAST+1, NOCARD+1, NOVAS+1*

Name	Field # of Occurrence
DA	SROAPR1A+2!, GAST+1, CARD+1, VAS+1*
DIE	GAST+1!, CARD+1!, VAS+1!*
DIR	4+1!, 4+2!, 5+1!, 5+2!, 6+1!, 6+2!, RET!, SURE!
DIR("A"	4+2, 5+2, 6+2, SURE
DIR("B"	4+1, 5+1, 6+1, SURE
DIR(0	4+2, 5+2, 6+2, RET, SURE*
DR	GAST+1!, CARD+1!, VAS+1!*
>> DTOUT	RET, SURE
>> DUOUT	4+2, 5+2, 6+2, RET, SURE
>> EMILY	SROAPR1A+2
>> I	NOCARD+1, NOVAS+1
>> SRACLR	GAST+2, CARD+2, VAS+2*
>> SRAO(4	4+1
>> SRAO(5	5+1
>> SRAO(6	6+1
>> SRAX	4+3, 4+4, 5+3, 5+4, 6+3, 6+4, NOGAST+1, NOCARD+1, NOVAS+1
>> SRCAT	4+3, 5+3, 6+3*, SURE
>> SRSOUT	4+2, 4+3, 5+2, 5+3, 6+2, 6+3, RET, SURE*
>> SRTN	4+3, 4+4, 5+3, 5+4, 6+3, 6+4, GAST+1, NOGAST+1, CARD+1, NOCARD+1 , VAS+1, NOVAS+1
>> SRYN	4+3, 5+3, 6+3, SURE*
>> X	4+1, 4+3, 5+1, 5+3, 6+1, 6+3
>> Y	4+4, 4+5, 5+4, 5+5, 6+4, 6+5, SURE