Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: SROAPCA3

Package: Surgery

Routine: SROAPCA3


Information

SROAPCA3 ;BIR/MAM - CARDIAC OCCURRENCE DATA ;09/28/2011

Source Information

Source file <SROAPCA3.m>

Entry Points

Name Comments DBIA/ICR reference
DUR ; get stroke/cva duration
YN ; store answer
F671 ;
F677(X) ;
RES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"VII. OUTCOMES"
  • Line Location: SROAPCA3+19
Function Call: WRITE
  • Prompt: !!,"Perioperative (30 day) Occurrences:"
  • Line Location: SROAPCA3+20
Function Call: WRITE
  • Prompt: !,?2,"Myocardial Infarction:",?35,$P(SRAO(3),"^"),?41,"Tracheostomy:",?75,$P(SRAO(14),"^")
  • Line Location: SROAPCA3+21
Function Call: WRITE
  • Prompt: !,?2,"Endocarditis:",?35,$P(SRAO(4),"^"),?41,"Out Of OR Unplanned Intubation:",?75,$P(SRAO(6),"^")
  • Line Location: SROAPCA3+22
Function Call: WRITE
  • Prompt: !,?2,"Superficial Incisional SSI:",?35,$P(SRAO(18),"^"),?41,"Stroke/CVA:",?68,$J($P(SRAO(12),"^"),11)
  • Line Location: SROAPCA3+23
Function Call: WRITE
  • Prompt: !,?2,"Mediastinitis:",?35,$P(SRAO(7),"^"),?41,"Coma > or = 24 Hours:",?75,$P(SRAO(11),"^")
  • Line Location: SROAPCA3+24
Function Call: WRITE
  • Prompt: !,?2,"Cardiac Arrest Requiring CPR:",?35,$P(SRAO(13),"^"),?41,"New Mech Circulatory Support:",?75,$P(SRAO(15),"^")
  • Line Location: SROAPCA3+25
Function Call: WRITE
  • Prompt: !,?2,"Reoperation for Bleeding:",?35,$P(SRAO(8),"^"),?41,"Postop Atrial Fibrillation:",?75,$P(SRAO(16),"^")
  • Line Location: SROAPCA3+26
Function Call: WRITE
  • Prompt: !,?2,"On ventilator > or = 48 hr:",?35,$P(SRAO(9),"^"),?41,"Wound Disruption:",?75,$P(SRAO(17),"^")
  • Line Location: SROAPCA3+27
Function Call: WRITE
  • Prompt: !,?2,"Repeat cardiac Surg procedure:",?35,$P(SRAO(10),"^"),?41,"Renal Failure Requiring Dialysis:",?75,$P(SRAO(5),"^")
  • Line Location: SROAPCA3+28
Function Call: WRITE
  • Prompt: !!,"VIII. RESOURCE DATA"
  • Line Location: RES+3
Function Call: WRITE
  • Prompt: !,"Transfer Status: ",?25,X
  • Line Location: RES+4
Function Call: WRITE
  • Prompt: !,"Hospital Admission Date:",?25,X
  • Line Location: RES+5
Function Call: WRITE
  • Prompt: !,"Hospital Discharge Date:",?25,X
  • Line Location: RES+6
Function Call: WRITE
  • Prompt: !,"DC/REL Destination:",?25,X
  • Line Location: RES+7
Function Call: WRITE
  • Prompt: !,"Time Patient In OR: ",?25,X
  • Line Location: RES+8
Function Call: WRITE
  • Prompt: ?45,"Operation Began: ",?66,X
  • Line Location: RES+9
Function Call: WRITE
  • Prompt: !,"Operation Ended: ",?25,X
  • Line Location: RES+10
Function Call: WRITE
  • Prompt: ?45,"Time Patient Out OR: ",X
  • Line Location: RES+11
Function Call: WRITE
  • Prompt: !,"Date and Time Patient Extubated: ",?33,Y
  • Line Location: RES+13
Function Call: WRITE
  • Prompt: !,?5,"Postop Intubation Hrs: ",?33,$FN((X/3600),"+",1)
  • Line Location: RES+15
Function Call: WRITE
  • Prompt: !,"Date and Time Patient Discharged from ICU: ",?43,Y
  • Line Location: RES+17
Function Call: WRITE
  • Prompt: !,"Patient is Homeless: ",?25,$S(Y="Y":"YES",Y="N":"NO",Y="NS":"NS",1:"")
  • Line Location: RES+18
Function Call: WRITE
  • Prompt: !,"Date of Death: ",?25,SRDEAD,?45,"30-Day Death: ",?65,$S($P(SRA(205),"^",41)="Y":"YES",1:"NO")
  • Line Location: RES+19
Function Call: WRITE
  • Prompt: !,"Current Residence: ",?25,$E($P(SRAO(20),"^"),1,20),?45,"Ambulation Device: ",?65,$E($P(SRAO(21),"^"),1,15)
  • Line Location: RES+20
Function Call: WRITE
  • Prompt: !,"History of Cancer: ",?25,$E($P(SRAO(22),"^"),1,20),?45,"History of Radiation Therapy: ",?65,$E($P(SRAO(23),"^"),1,15)
  • Line Location: RES+21
Function Call: WRITE
  • Prompt: !,"Prior Surg in Same Operative: ",$E($P(SRAO(24),"^"),1,20),!
  • Line Location: RES+22
Function Call: WRITE
  • Prompt: !,"IX. SOCIOECONOMIC, ETHNICITY, AND RACE"
  • Line Location: RES+24
Function Call: WRITE
  • Prompt: !,?1,"Employment Status Preoperatively: ",?40,SREMP
  • Line Location: RES+26
Function Call: WRITE
  • Prompt: !!," *** End of report for "_SRANM_" assessment #"_SRTN_" ***"
  • Line Location: RES+32
Function Call: WRITE
  • Prompt: !
  • Line Location: RES+33
Info |  Source |  Entry Points |  Interaction Calls