Routine: SROAPCA2

Package	Total	Call Graph
Surgery	2	PAGE^SROAPCA ^SROAPCA3
VA Fileman	1	Y^DIQ

Package	Total	Caller Graph
Surgery	1	SROAPCA1

Entry Points

Name	Comments	DBIA/ICR reference
YN	; store answer

External References

Name	Field # of Occurrence
Y^DIQ	SROAPCA2+29, SROAPCA2+30
PAGE^SROAPCA	SROAPCA2+57
^SROAPCA3	SROAPCA2+58

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"VI. OPERATIVE DATA" Line Location: SROAPCA2+32
Function Call: WRITE	Prompt: !,"Cardiac surgical procedures with or without cardiopulmonary bypass",!,"CABG distal anastomoses:",?40,"Bridge to transplant/Device:",?75,$P(SRAO(11),"^") Line Location: SROAPCA2+33
Function Call: WRITE	Prompt: !,?2,"Number with Vein:",?33,$P(SRAO(1),"^"),?40,"TMR:",?75,$P(SRAO(12),"^") Line Location: SROAPCA2+34
Function Call: WRITE	Prompt: !,?2,"Number with IMA:",?33,$P(SRAO(2),"^"),?40,"Maze procedure:",?61,$J($P(SRAO(13),"^"),17) Line Location: SROAPCA2+35
Function Call: WRITE	Prompt: !,?2,"Number with Radial Artery:",?33,$P(SRAO(3),"^"),?40,"ASD repair:",?75,$P(SRAO(14),"^") Line Location: SROAPCA2+36
Function Call: WRITE	Prompt: !,?2,"Number with Other Artery:",?33,$P(SRAO(4),"^"),?40,"VSD repair:",?75,$P(SRAO(15),"^") Line Location: SROAPCA2+37
Function Call: WRITE	Prompt: !,?2,"Number with Other Conduit:",?33,$P(SRAO(5),"^"),?40,"Myectomy for IHSS:",?75,$P(SRAO(16),"^") Line Location: SROAPCA2+38
Function Call: WRITE	Prompt: !,"Aortic Valve Replacement:",?33,$P(SRAO(6),"^"),?40,"Myxoma resection:",?75,$P(SRAO(17),"^") Line Location: SROAPCA2+39
Function Call: WRITE	Prompt: !,"Mitral Valve Replacement:",?33,$P(SRAO(7),"^"),?40,"Other tumor resection:",?75,$P(SRAO(18),"^") Line Location: SROAPCA2+40
Function Call: WRITE	Prompt: !,"Tricuspid Valve Replacement:",?33,$P(SRAO(8),"^"),?40,"Cardiac transplant:",?75,$P(SRAO(19),"^") Line Location: SROAPCA2+41
Function Call: WRITE	Prompt: !,"Valve Repair:",?33,$P(SRAO(9),"^"),?40,"Great Vessel Repair:",?75,$P(SRAO(21),"^") Line Location: SROAPCA2+42
Function Call: WRITE	Prompt: !,"LV Aneurysmectomy:",?33,$P(SRAO(10),"^"),?40,"Endovascular Repair:",?75,$P(SRAO("21H"),"^") Line Location: SROAPCA2+43
Function Call: WRITE	Prompt: !,?40,"Other Cardiac procedure(s):",?75,$P(SRAO(29),"^") Line Location: SROAPCA2+44
Function Call: WRITE	Prompt: X,! Condition for execution: $L(X)<49 Line Location: SROAPCA2+45
Function Call: WRITE	Prompt: ?29,X Line Location: SROAPCA2+46
Function Call: WRITE	Prompt: X,! Line Location: SROAPCA2+48
Function Call: WRITE	Prompt: $E(X,1,J-1),! Line Location: SROAPCA2+49
Function Call: WRITE	Prompt: X Line Location: SROAPCA2+49
Function Call: WRITE	Prompt: !!,"Indicate other cardiac procedures only if done with cardiopulmonary bypass" Line Location: SROAPCA2+50
Function Call: WRITE	Prompt: !,"Foreign body removal:",?33,$P(SRAO(22),"^") Line Location: SROAPCA2+51
Function Call: WRITE	Prompt: !,"Pericardiectomy:",?33,$P(SRAO(23),"^") Line Location: SROAPCA2+52
Function Call: WRITE	Prompt: !!,"Other Operative Data details" Line Location: SROAPCA2+53
Function Call: WRITE	Prompt: !,"Total CPB Time: ",?20,$P(SRAO(24),"^")_" min",?42,"Total Ischemic Time: ",$P(SRAO(25),"^")_" min" Line Location: SROAPCA2+54
Function Call: WRITE	Prompt: !,"Incision Type: ",?25,$P(SRAO(26),"^") Line Location: SROAPCA2+55
Function Call: WRITE	Prompt: !,"Conversion Off Pump to CPB: ",$P(SRAO(27),"^") Line Location: SROAPCA2+56

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(130	SROAPCA2+29, SROAPCA2+30
^SRF - [#130]	SROAPCA2+2, SROAPCA2+22

Label References

Name	Line Occurrences
YN	SROAPCA2+8, SROAPCA2+9, SROAPCA2+10, SROAPCA2+12, SROAPCA2+13, SROAPCA2+14, SROAPCA2+16, SROAPCA2+17, SROAPCA2+18, SROAPCA2+19 , SROAPCA2+20, SROAPCA2+21, SROAPCA2+23, SROAPCA2+24, SROAPCA2+25, SROAPCA2+26, SROAPCA2+31

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> C	SROAPCA2+29, SROAPCA2+30
>> I	SROAPCA2+47, SROAPCA2+49
IOSL	SROAPCA2+57
>> J	SROAPCA2+49*
>> LINE	SROAPCA2+47, SROAPCA2+49
>> NYUK	SROAPCA2+8, SROAPCA2+9, SROAPCA2+10, SROAPCA2+11, SROAPCA2+12, SROAPCA2+13, SROAPCA2+14, SROAPCA2+15, SROAPCA2+16, SROAPCA2+17 , SROAPCA2+18, SROAPCA2+19, SROAPCA2+20, SROAPCA2+21, SROAPCA2+22, SROAPCA2+23, SROAPCA2+24, SROAPCA2+25, SROAPCA2+26, SROAPCA2+31 , YN+1
>> SHEMP	SROAPCA2+8, SROAPCA2+9, SROAPCA2+10, SROAPCA2+12, SROAPCA2+13, SROAPCA2+14, SROAPCA2+15, SROAPCA2+16, SROAPCA2+17, SROAPCA2+18 , SROAPCA2+19, SROAPCA2+20, SROAPCA2+21, SROAPCA2+23, SROAPCA2+24, SROAPCA2+25, SROAPCA2+26, SROAPCA2+31, YN+1
SRA	SROAPCA2+58!
SRA(	SROAPCA2+2*, SROAPCA2+24
SRA(206	SROAPCA2+2*, SROAPCA2+27, SROAPCA2+28
SRA(207	SROAPCA2+2*, SROAPCA2+3, SROAPCA2+4, SROAPCA2+5, SROAPCA2+6, SROAPCA2+7, SROAPCA2+8, SROAPCA2+9, SROAPCA2+10, SROAPCA2+11 , SROAPCA2+12, SROAPCA2+16, SROAPCA2+17, SROAPCA2+18, SROAPCA2+19, SROAPCA2+20, SROAPCA2+21, SROAPCA2+23, SROAPCA2+25, SROAPCA2+26 , SROAPCA2+29, SROAPCA2+30
SRA(209	SROAPCA2+2*, SROAPCA2+13, SROAPCA2+14, SROAPCA2+15, SROAPCA2+31
SRAO	SROAPCA2+58!
SRAO("21H"	SROAPCA2+24*, SROAPCA2+43
SRAO(1	SROAPCA2+3*, SROAPCA2+34
SRAO(10	SROAPCA2+12*, SROAPCA2+43
SRAO(11	SROAPCA2+13*, SROAPCA2+33
SRAO(12	SROAPCA2+14*, SROAPCA2+34
SRAO(13	SROAPCA2+15*, SROAPCA2+35
SRAO(14	SROAPCA2+16*, SROAPCA2+36
SRAO(15	SROAPCA2+17*, SROAPCA2+37
SRAO(16	SROAPCA2+18*, SROAPCA2+38
SRAO(17	SROAPCA2+19*, SROAPCA2+39
SRAO(18	SROAPCA2+20*, SROAPCA2+40
SRAO(19	SROAPCA2+21*, SROAPCA2+41
SRAO(2	SROAPCA2+4*, SROAPCA2+35
SRAO(20	SROAPCA2+22*, SROAPCA2+45
SRAO(21	SROAPCA2+23*, SROAPCA2+42
SRAO(22	SROAPCA2+25*, SROAPCA2+51
SRAO(23	SROAPCA2+26*, SROAPCA2+52
SRAO(24	SROAPCA2+27*, SROAPCA2+54
SRAO(25	SROAPCA2+28*, SROAPCA2+54
SRAO(26	SROAPCA2+29*, SROAPCA2+55
SRAO(27	SROAPCA2+30*, SROAPCA2+56
SRAO(29	SROAPCA2+31*, SROAPCA2+44
SRAO(3	SROAPCA2+5*, SROAPCA2+36
SRAO(4	SROAPCA2+6*, SROAPCA2+37
SRAO(5	SROAPCA2+7*, SROAPCA2+38
SRAO(6	SROAPCA2+8*, SROAPCA2+39
SRAO(7	SROAPCA2+9*, SROAPCA2+40
SRAO(8	SROAPCA2+10*, SROAPCA2+41
SRAO(9	SROAPCA2+11*, SROAPCA2+42
>> SRL	SROAPCA2+47*, SROAPCA2+48, SROAPCA2+49
>> SRQ	SROAPCA2+45, SROAPCA2+47, SROAPCA2+48, SROAPCA2+49*
>> SRSOUT	SROAPCA2+57
>> SRTN	SROAPCA2+2, SROAPCA2+22
>> X	SROAPCA2+45, SROAPCA2+46, SROAPCA2+48, SROAPCA2+49
>> Y	SROAPCA2+29, SROAPCA2+30, SROAPCA2+49*
>> Z	SROAPCA2+45, SROAPCA2+49

Customize PDF page

Package: Surgery

Routine: SROAPCA2

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

Local Variables

Legend: