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: SROAPRT3

Package: Surgery

Routine: SROAPRT3


Information

SROAPRT3 ;BIR/MAM - PRINT OPERATION INFO ;01/23/07

Source Information

Source file <SROAPRT3.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Surgery 3 ^SROAOTH  PAGE^SROAPAS  TECH^SROPRIN  
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
OPTIMES ; print operation times
LOOP ; break procedures
YN

External References

Name Field # of Occurrence
Y^DIQ SROAPRT3+10, SROAPRT3+12, SROAPRT3+15, SROAPRT3+16
^SROAOTH SROAPRT3+8
PAGE^SROAPAS SROAPRT3+17
TECH^SROPRIN SROAPRT3+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?29,"OPERATIVE INFORMATION",!!,$J("Surgical Specialty: ",39)_$P(SRAO(2),"^")
  • Line Location: SROAPRT3+6
Function Call: WRITE
  • Prompt: !!,$J("Principal Operation: ",39)_SROPS(1)
  • Line Location: SROAPRT3+7
Function Call: WRITE
  • Prompt: !,?40,SROPS(2)
  • Line Location: SROAPRT3+7
Function Call: WRITE
  • Prompt: !,?40,SROPS(2)
  • Line Location: SROAPRT3+7
Function Call: WRITE
  • Prompt: !,?29,"OPERATIVE INFORMATION",!
  • Line Location: SROAPRT3+17
Function Call: WRITE
  • Prompt: !,$J("PGY of Primary Surgeon: ",39)_$P(SRAO(9),"^")
  • Line Location: SROAPRT3+18
Function Call: WRITE
  • Prompt: !,$J("Emergency Case (Y/N): ",39)_$P(SRAO(10),"^")
  • Line Location: SROAPRT3+18
Function Call: WRITE
  • Prompt: !,$J("Wound Classification: ",39)_$P(SRAO(11),"^")
  • Line Location: SROAPRT3+19
Function Call: WRITE
  • Prompt: !,$J("ASA Classification: ",39)_$P(SRAO(13),"^")
  • Line Location: SROAPRT3+20
Function Call: WRITE
  • Prompt: !,$J("Principal Anesthesia Technique: ",39)_$P(SRAO(14),"^")
  • Line Location: SROAPRT3+21
Function Call: WRITE
  • Prompt: !,$J("RBC Units Transfused: ",39)_$P(SRAO(15),"^")
  • Line Location: SROAPRT3+22
Function Call: WRITE
  • Prompt: !,$J("Intraop Disseminated Cancer: ",39)_$P(SRAO(5),"^")
  • Line Location: SROAPRT3+23
Function Call: WRITE
  • Prompt: !,$J("Intraoperative Ascites: ",39)_$P(SRAO(6),"^")
  • Line Location: SROAPRT3+24
Function Call: WRITE
  • Prompt: !!
  • Line Location: SROAPRT3+25
Function Call: WRITE
  • Prompt: !,?24,"OPERATION DATE/TIMES INFORMATION"
  • Line Location: OPTIMES+2
Function Call: WRITE
  • Prompt: !!,$J("Patient in Room (PIR): ",39)_SRAO(1),!,$J("Procedure/Surgery Start Time (PST): ",39)_SRAO(2),!,$J("Procedure/Surgery Finish (PF): ",39)_SRAO(3)
  • Line Location: OPTIMES+5
Function Call: WRITE
  • Prompt: !,$J("Patient Out of Room (POR): ",39)_SRAO(4),!,$J("Anesthesia Start (AS): ",39)_SRAO(5),!,$J("Anesthesia Finish (AF): ",39)_SRAO(6),!,$J("Discharge from PACU (DPACU): ",39)_SRAO(7)
  • Line Location: OPTIMES+6
Function Call: WRITE
  • Prompt: !
  • Line Location: OPTIMES+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" OPTIMES+4
^DD(130 SROAPRT3+10, SROAPRT3+12, SROAPRT3+15, SROAPRT3+16
^SRF - [#130] SROAPRT3+2, SROAPRT3+5, SROAPRT3+10, SROAPRT3+12, SROAPRT3+15, SROAPRT3+16, OPTIMES+3
^SRO(137.45 - [#137.45] SROAPRT3+5

Label References

Name Line Occurrences
LOOP SROAPRT3+4
YN SROAPRT3+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C SROAPRT3+10*, SROAPRT3+12*, SROAPRT3+15*, SROAPRT3+16*
>> I OPTIMES+1*
IOST SROAPRT3+17, SROAPRT3+25, OPTIMES+7
>> LOOP LOOP+1*
M SROAPRT3+4!*, LOOP+1
MM SROAPRT3+4!, LOOP+1*
MMM SROAPRT3+4!, LOOP+1*
>> NYUK SROAPRT3+9*, SROAPRT3+11*, YN
>> SHEMP SROAPRT3+11, YN*
>> SRA("OP" SROAPRT3+2*, SROAPRT3+3
>> SRA(0 SROAPRT3+5*, SROAPRT3+9
>> SRA(200 SROAPRT3+9, SROAPRT3+11, SROAPRT3+14
SRAO SROAPRT3+2!, OPTIMES+1!
SRAO( OPTIMES+1*, OPTIMES+4*
SRAO(1 OPTIMES+3*, OPTIMES+5
SRAO(10 SROAPRT3+9*, SROAPRT3+18
SRAO(11 SROAPRT3+10*, SROAPRT3+19
SRAO(12 SROAPRT3+11*
SRAO(13 SROAPRT3+12*, SROAPRT3+20
SRAO(14 SROAPRT3+13*, SROAPRT3+21
SRAO(15 SROAPRT3+14*, SROAPRT3+22
SRAO(2 SROAPRT3+3*, SROAPRT3+5*, SROAPRT3+6, OPTIMES+3*, OPTIMES+5
SRAO(3 OPTIMES+3*, OPTIMES+5
SRAO(4 OPTIMES+3*, OPTIMES+6
SRAO(5 SROAPRT3+15*, SROAPRT3+23, OPTIMES+3*, OPTIMES+6
SRAO(6 SROAPRT3+16*, SROAPRT3+24, OPTIMES+3*, OPTIMES+6
SRAO(7 SROAPRT3+2*, OPTIMES+3*, OPTIMES+6
SRAO(8 SROAPRT3+2*
SRAO(9 SROAPRT3+9*, SROAPRT3+18
>> SRI OPTIMES+4*
>> SROPER SROAPRT3+3*, SROAPRT3+4*, LOOP+1*
SROPS SROAPRT3+3!
SROPS( LOOP+1*
SROPS(1 SROAPRT3+4*, SROAPRT3+7
SROPS(2 SROAPRT3+7
SROPS(3 SROAPRT3+7
>> SRSOUT SROAPRT3+17
>> SRTECH SROAPRT3+13
>> SRTN SROAPRT3+2, SROAPRT3+5, SROAPRT3+10, SROAPRT3+12, SROAPRT3+15, SROAPRT3+16, OPTIMES+3
>> X SROAPRT3+5*, SROAPRT3+9*, SROAPRT3+14*, OPTIMES+3*, OPTIMES+4*
>> Y SROAPRT3+10*, SROAPRT3+12*, SROAPRT3+15*, SROAPRT3+16*, OPTIMES+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All