Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SROAPRT2

Package: Surgery

Routine: SROAPRT2


Information

SROAPRT2 ;BIR/MAM - PRINT PREOP INFO (PAGE 2) ;11/28/07

Source Information

Source file <SROAPRT2.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 Y^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROAPAS  

Entry Points

Name Comments DBIA/ICR reference
OUT(SRFLD,SRY) ; get data in output form

External References

Name Field # of Occurrence
Y^DIQ OUT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?28,"PREOPERATIVE INFORMATION"
  • Line Location: SROAPRT2+2
Function Call: WRITE
  • Prompt: !!,"RENAL:",?31,$P(SRAO(1),"^"),?40,"NUTRITIONAL/IMMUNE/OTHER:",?72,$P(SRAO(3),"^")
  • Line Location: SROAPRT2+26
Function Call: WRITE
  • Prompt: !,"Acute Renal Failure:",?31,$P(SRAO("1A"),"^"),?40,"Disseminated Cancer:",?72,$P(SRAO("3A"),"^")
  • Line Location: SROAPRT2+27
Function Call: WRITE
  • Prompt: !,"Currently on Dialysis:",?31,$P(SRAO("1B"),"^"),?40,"Open Wound:",?72,$P(SRAO("3B"),"^")
  • Line Location: SROAPRT2+28
Function Call: WRITE
  • Prompt: !,?40,"Steroid Use for Chronic Cond.:",?72,$P(SRAO("3C"),"^")
  • Line Location: SROAPRT2+29
Function Call: WRITE
  • Prompt: !,"CENTRAL NERVOUS SYSTEM:",?31,$P(SRAO(2),"^"),?40,"Weight Loss > 10%:",?72,$P(SRAO("3D"),"^")
  • Line Location: SROAPRT2+30
Function Call: WRITE
  • Prompt: !,"Impaired Sensorium: ",?31,$P(SRAO("2A"),"^"),?40,"Bleeding Disorders:",?72,$P(SRAO("3E"),"^")
  • Line Location: SROAPRT2+31
Function Call: WRITE
  • Prompt: !,"Coma:",?31,$P(SRAO("2B"),"^"),?40,"Transfusion > 4 RBC Units:",?72,$P(SRAO("3F"),"^")
  • Line Location: SROAPRT2+32
Function Call: WRITE
  • Prompt: !,"Hemiplegia:",?31,$P(SRAO("2C"),"^"),?40,"Chemotherapy W/I 30 Days:",?72,$P(SRAO("3G"),"^")
  • Line Location: SROAPRT2+33
Function Call: WRITE
  • Prompt: !,"History of TIAs:",?31,$P(SRAO("2D"),"^"),?40,"Radiotherapy W/I 90 Days:",?72,$P(SRAO("3H"),"^")
  • Line Location: SROAPRT2+34
Function Call: WRITE
  • Prompt: !,"CVA/Stroke w. Neuro Deficit:",?31,$P(SRAO("2E"),"^"),?40,"Preoperative Sepsis:",?(74-$L($P(SRAO("3I"),"^"))),$P(SRAO("3I"),"^")
  • Line Location: SROAPRT2+35
Function Call: WRITE
  • Prompt: !,"CVA/Stroke w/o Neuro Deficit:",?31,$P(SRAO("2F"),"^"),?40,"Pregnancy:",?(74-$L($P(SRAO("3J"),"^"))),$P(SRAO("3J"),"^")
  • Line Location: SROAPRT2+36
Function Call: WRITE
  • Prompt: !,"Tumor Involving CNS:",?31,$P(SRAO("2G"),"^")
  • Line Location: SROAPRT2+37
Function Call: WRITE
  • Prompt: !
  • Line Location: SROAPRT2+38

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(130 OUT+2
^SRF - [#130] SROAPRT2+3, SROAPRT2+25

Label References

Name Line Occurrences
$$OUT SROAPRT2+4, SROAPRT2+5, SROAPRT2+6, SROAPRT2+7, SROAPRT2+8, SROAPRT2+9, SROAPRT2+10, SROAPRT2+11, SROAPRT2+12, SROAPRT2+13
, SROAPRT2+14, SROAPRT2+15, SROAPRT2+16, SROAPRT2+17, SROAPRT2+18, SROAPRT2+19, SROAPRT2+20, SROAPRT2+21, SROAPRT2+22, SROAPRT2+23
, SROAPRT2+24, SROAPRT2+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C OUT+1~, OUT+2*
IOST SROAPRT2+2, SROAPRT2+38
>> SRA(200 SROAPRT2+3*, SROAPRT2+4, SROAPRT2+5, SROAPRT2+6, SROAPRT2+7, SROAPRT2+8, SROAPRT2+9, SROAPRT2+10, SROAPRT2+11, SROAPRT2+12
, SROAPRT2+13, SROAPRT2+14, SROAPRT2+15, SROAPRT2+16, SROAPRT2+17, SROAPRT2+18, SROAPRT2+19, SROAPRT2+20, SROAPRT2+21
>> SRA(206 SROAPRT2+3*, SROAPRT2+22, SROAPRT2+23, SROAPRT2+24
>> SRAO("1A" SROAPRT2+5*, SROAPRT2+27
>> SRAO("1B" SROAPRT2+6*, SROAPRT2+28
>> SRAO("2A" SROAPRT2+9*, SROAPRT2+31
>> SRAO("2B" SROAPRT2+10*, SROAPRT2+32
>> SRAO("2C" SROAPRT2+11*, SROAPRT2+33
>> SRAO("2D" SROAPRT2+12*, SROAPRT2+34
>> SRAO("2E" SROAPRT2+13*, SROAPRT2+35
>> SRAO("2F" SROAPRT2+14*, SROAPRT2+36
>> SRAO("2G" SROAPRT2+15*, SROAPRT2+37
>> SRAO("3A" SROAPRT2+16*, SROAPRT2+27
>> SRAO("3B" SROAPRT2+17*, SROAPRT2+28
>> SRAO("3C" SROAPRT2+18*, SROAPRT2+29
>> SRAO("3D" SROAPRT2+19*, SROAPRT2+30
>> SRAO("3E" SROAPRT2+20*, SROAPRT2+31
>> SRAO("3F" SROAPRT2+21*, SROAPRT2+32
>> SRAO("3G" SROAPRT2+22*, SROAPRT2+33
>> SRAO("3H" SROAPRT2+23*, SROAPRT2+34
>> SRAO("3I" SROAPRT2+24*, SROAPRT2+35
>> SRAO("3J" SROAPRT2+25*, SROAPRT2+36
>> SRAO(1 SROAPRT2+4*, SROAPRT2+26
>> SRAO(2 SROAPRT2+7*, SROAPRT2+30
>> SRAO(3 SROAPRT2+8*, SROAPRT2+26
SRFLD OUT~, OUT+2
>> SRTN SROAPRT2+3, SROAPRT2+25
SRX SROAPRT2+3~, SROAPRT2+4*, SROAPRT2+5*, SROAPRT2+6*, SROAPRT2+7*, SROAPRT2+8*, SROAPRT2+9*, SROAPRT2+10*, SROAPRT2+11*, SROAPRT2+12*
, SROAPRT2+13*, SROAPRT2+14*, SROAPRT2+15*, SROAPRT2+16*, SROAPRT2+17*, SROAPRT2+18*, SROAPRT2+19*, SROAPRT2+20*, SROAPRT2+21*, SROAPRT2+22*
, SROAPRT2+23*, SROAPRT2+24*, SROAPRT2+25*
SRY OUT~, OUT+2
Y SROAPRT2+3~, SROAPRT2+4*, SROAPRT2+5*, SROAPRT2+6*, SROAPRT2+7*, SROAPRT2+8*, SROAPRT2+9*, SROAPRT2+10*, SROAPRT2+11*, SROAPRT2+12*
, SROAPRT2+13*, SROAPRT2+14*, SROAPRT2+15*, SROAPRT2+16*, SROAPRT2+17*, SROAPRT2+18*, SROAPRT2+19*, SROAPRT2+20*, SROAPRT2+21*, SROAPRT2+22*
, SROAPRT2+23*, SROAPRT2+24*, SROAPRT2+25*, OUT+1~, OUT+2*, OUT+3*, OUT+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All