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 |  FileMan Files Accessed Via FileMan Db Call |  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

Call Graph Total: 4

Package Total Call Graph
Surgery 3 ^SROAOTH  PAGE^SROAPAS  TECH^SROPRIN  
VA FileMan 1 ($$GET1,Y)^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROAPAS  

Entry Points

Name Comments DBIA/ICR reference
YN
LOOP ; break procedures
OPTIMES ; print operation times

External References

Name Field # of Occurrence
$$GET1^DIQ SROAPRT3+8
Y^DIQ SROAPRT3+11, SROAPRT3+13, SROAPRT3+16, SROAPRT3+17
^SROAOTH SROAPRT3+9
PAGE^SROAPAS SROAPRT3+18
TECH^SROPRIN SROAPRT3+14

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: !!,$J("Robotic Assistance (Y/N): ",39)_$$GET1^DIQ(130,SRTN_",",2006,"E")
  • Line Location: SROAPRT3+8
Function Call: WRITE
  • Prompt: !,?29,"OPERATIVE INFORMATION",!
  • Line Location: SROAPRT3+18
Function Call: WRITE
  • Prompt: !,$J("PGY of Primary Surgeon: ",39)_$P(SRAO(9),"^")
  • Line Location: SROAPRT3+19
Function Call: WRITE
  • Prompt: !,$J("Emergency Case (Y/N): ",39)_$P(SRAO(10),"^")
  • Line Location: SROAPRT3+19
Function Call: WRITE
  • Prompt: !,$J("Wound Classification: ",39)_$P(SRAO(11),"^")
  • Line Location: SROAPRT3+20
Function Call: WRITE
  • Prompt: !,$J("ASA Classification: ",39)_$P(SRAO(13),"^")
  • Line Location: SROAPRT3+21
Function Call: WRITE
  • Prompt: !,$J("Principal Anesthesia Technique: ",39)_$P(SRAO(14),"^")
  • Line Location: SROAPRT3+22
Function Call: WRITE
  • Prompt: !,$J("RBC Units Transfused: ",39)_$P(SRAO(15),"^")
  • Line Location: SROAPRT3+23
Function Call: WRITE
  • Prompt: !,$J("Intraop Disseminated Cancer: ",39)_$P(SRAO(5),"^")
  • Line Location: SROAPRT3+24
Function Call: WRITE
  • Prompt: !,$J("Intraoperative Ascites: ",39)_$P(SRAO(6),"^")
  • Line Location: SROAPRT3+25
Function Call: WRITE
  • Prompt: !!
  • Line Location: SROAPRT3+26
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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRF - [#130] GET1^DIQ

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
LOOP SROAPRT3+4
YN SROAPRT3+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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