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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SROERR2

Package: Surgery

Routine: SROERR2


Information

SROERR2 ;B'HAM/ADM - ORDER ENTRY ROUTINE ; 25 JUNE 1992 10:00 AM

Source Information

Source file <SROERR2.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Registration 1 DEM^VADPT  
VA FileMan 1 D^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 SROERR  

Entry Points

Name Comments DBIA/ICR reference
PRINT ;
LOOP ; break procedure if greater than J characters
OPTM ; find begin and end times

External References

Name Field # of Occurrence
D^DIQ SROERR2+5, OPTM+1, OPTM+2
DEM^VADPT SROERR2+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Patient: "_SRNAME,?40,"ID#: "_VA("PID"),?65,"Age: "_SRAGE,!,"Ward: "_SRWARD,?40,"Case #"_SRTN_SRSTAT,!
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,"Ward: "_SRWARD,?40,"Case #"_SRTN_SRSTAT
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,"Date of Procedure: "_SRSDATE
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,"Time Procedure Began: "_SRSTART,?40,"Time Procedure Ended: "_SREND
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,"Non-O.R. Location: "_$P(^SC(SROR,0),"^")
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: !!,"Medical Specialty: "_SRSNM,!,"Provider: "_SROSUR,?40,"Attending: "_SROATT,!,"Preoperative Diagnosis: "_SRDIAG
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !!,"Principal Procedure:",?22,SROPS(1)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,?22,SROPS(2)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,?22,SROPS(2)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,?22,SROPS(2)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,?22,SROPS(2)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,?22,SROP(CNT)
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !,^SRF(SRTN,5,X,0)
  • Line Location: PRINT+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] SROERR2+2
^ECC(723 - [#723] SROERR2+3
^SC - [#44] PRINT+5
^SRF - [#130] SROERR2+3, SROERR2+4, SROERR2+5, SROERR2+6, SROERR2+9, SROERR2+10, SROERR2+11, PRINT+4, PRINT+9, OPTM+1
, OPTM+2
^VA(200 - [#200] SROERR2+8

Label References

Name Line Occurrences
LOOP SROERR2+7
OPTM SROERR2+11

Naked Globals

Name Field # of Occurrence
^( SROERR2+2
^("NON" SROERR2+4
^(33 SROERR2+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT SROERR2+6*, PRINT+8*
>> DFN SROERR2+2*
>> I PRINT+8*, PRINT+9*
IOF PRINT+1
IOST PRINT+1, PRINT+2
>> J SROERR2+7*, LOOP+1
>> LINE PRINT+1*
>> LOOP LOOP+1*
>> M SROERR2+7*, LOOP+1
MM SROERR2+7!, LOOP+1*
MMM SROERR2+7!, LOOP+1*
>> ORAGE SROERR2+2
>> ORVP SROERR2+2
>> SRAGE SROERR2+2*, PRINT+1
>> SRDIAG SROERR2+9*, PRINT+6
>> SREND PRINT+4, OPTM+2*
>> SRFIND OPTM+1*, OPTM+2*
>> SRNAME SROERR2+2*, PRINT+1
>> SROATT SROERR2+4*, SROERR2+8*, PRINT+6
SROP SROERR2+6!
SROP( SROERR2+6*, PRINT+8
SROP(0 PRINT+8
SROP(1 PRINT+8
>> SROPER SROERR2+6*, SROERR2+7*, LOOP+1*
SROPS SROERR2+7!
SROPS( LOOP+1*
SROPS(1 SROERR2+7*, PRINT+7
SROPS(2 PRINT+7
SROPS(3 PRINT+7
SROPS(4 PRINT+7
SROPS(5 PRINT+7
>> SROR SROERR2+5*, PRINT+5
>> SROSUR SROERR2+4*, SROERR2+8*, PRINT+6
>> SRSDATE SROERR2+5*, PRINT+3
>> SRSNM SROERR2+3*, PRINT+6
>> SRSS SROERR2+3*
>> SRSSN SROERR2+2*
>> SRSTART PRINT+4, OPTM+1*
>> SRSTAT SROERR2+10*, PRINT+1, PRINT+2
>> SRTN SROERR2+3, SROERR2+4, SROERR2+5, SROERR2+6, SROERR2+9, SROERR2+10, SROERR2+11, PRINT+1, PRINT+2, PRINT+4
, PRINT+9, OPTM+1, OPTM+2
>> SRWARD SROERR2+2*, PRINT+1, PRINT+2
>> VA("PID" SROERR2+2, PRINT+1
>> VADM(1 SROERR2+2
>> X SROERR2+6*, PRINT+9*
>> Y SROERR2+5*, OPTM+1*, OPTM+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All