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

Package: Surgery

Routine: SROES


Information

SROES ;BIR/ADM - SURGERY E-SIG UTILITY ;06/07/06

Source Information

Source file <SROES.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Surgery 8 ^SROERR0  ^SROESAD  ^SROESAD1  (EX,IN)^SROESAR  REVRS^SROESAR0  (EX,IN)^SROESNR  REVRS^SROESNR0  ($$LOCK,UNLOCK)^SROUTL  
VA Fileman 2 WAIT^DICD  ^DIR  
Registration 1 DEM^VADPT  
Text Integration Utility 1 EXTRACT^TIULQ  

Caller Graph

Caller Graph Total: 27

Package Total Caller Graph
Surgery 27 SRO1L1  SROA CARDIAC OPERATIVE RISK  SROA CARDIAC PROCEDURES  SROA CARDIAC RESOURCE  SROA CATHETERIZATION  SROA CLINICAL INFORMATION  SROA COMPLETE ASSESSMENT  SROA DEMOGRAPHICS  
SROA LAB  SROA OPERATION DATA  SROA PREOP DATA  SROANES MED  SROAOUT  SROARPT  SROCMPS  SROMEN-ANES  
SROMEN-ANES TECH  SROMEN-OP  SROMEN-OUT  SROMEN-PACU  SROMEN-POST  SROMEN-REST  SROMEN-STAFF  SROMEN-START  
SRONASS  SRONIN  SROVER  

Entry Points

Name Comments DBIA/ICR reference
PRE ; save pr-edit copy of case data
KTMP ; kill TMP globals
SRA
HDR
DOCS ; determine if signed
REVRS ; restore modified fields on signed reports
ALLREV ; restore modified fields for both concurrent cases
SIGNED
WARN ; warning message that addendum may be required
UNLOCK
EXIT ; post-edit check to see if addenda to nurse/anes. reports are required
ENTER
PRESS
DOC
CHECK ; pre-edit capture of nurse and anesthesia reports for addenda

External References

Name Field # of Occurrence
WAIT^DICD EXIT+1
^DIR WARN+3, DOC+10, PRESS
^SROERR0 REVRS+2
^SROESAD DOC+11, DOC+12
^SROESAD1 EXIT+4, EXIT+8
EX^SROESAR EXIT+3, EXIT+7
IN^SROESAR PRE+2
REVRS^SROESAR0 REVRS+1
EX^SROESNR EXIT+2, EXIT+6
IN^SROESNR PRE+2
REVRS^SROESNR0 REVRS+1
$$LOCK^SROUTL CHECK+8
UNLOCK^SROUTL UNLOCK
EXTRACT^TIULQ SIGNED
DEM^VADPT HDR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,?30,">>> WARNING <<<"
  • Line Location: WARN+1
Function Call: WRITE
  • Prompt: !!," Electronically signed reports are associated with this case. Editing",!," of data that appear on electronically signed reports will require the",!," creation of addenda to the signed reports.",!!!
  • Line Location: WARN+2
Function Call: WRITE
  • Prompt: @IOF,!," "_VADM(1)_" ("_VA("PID")_") Case #"_SRTN_" - "_SRSDATE
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,"An addendum to each of the following electronically signed document(s) is",!,"required:",!
  • Line Location: DOC+6
Function Call: WRITE
  • Prompt: !,?10,SRNDOC(X)
  • Line Location: DOC+7
Function Call: WRITE
  • Prompt: !,?10,SRADOC(X)
  • Line Location: DOC+8
Function Call: WRITE
  • Prompt: !!,"If you choose not to create an addendum, the original data will be restored",!,"to the modified fields appearing on the signed reports.",!!
  • Line Location: DOC+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PRESS+0
Function Call: WRITE
  • Prompt: !!,"No addendum created. Original data will be restored.",!!
  • Line Location: ALLREV+1
Routine Call
  • DIR
  • Line Location:
    • WARN+3
    • DOC+10
    • PRESS

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDR
^SRF - [#130] CHECK+2, CHECK+3, HDR, EXIT+5, ALLREV+2
^TMP( KTMP+1!, KTMP+2!
^TMP("SRAR" DOC+3, DOC+4
^TMP("SRARAD1" EXIT+3, EXIT+4, EXIT+7, EXIT+8
^TMP("SRARAD2" EXIT+4
^TMP("SRNR" DOC+1, DOC+2
^TMP("SRNRAD1" EXIT+2, EXIT+4, EXIT+6, EXIT+8
^TMP("SRNRAD2" EXIT+4

Label References

Name Line Occurrences
ALLREV DOC+10
CHECK ENTER+1
DOCS CHECK+2, CHECK+3
HDR WARN+1, DOC+6
KTMP CHECK+7, UNLOCK
PRE CHECK+9
PRESS DOC+11, DOC+12, ALLREV+3
REVRS DOC+11, DOC+12, ALLREV+2
SIGNED DOCS+1, DOCS+2
UNLOCK ALLREV+3
WARN CHECK+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN HDR*
DIR WARN+3!, DOC+10!, PRESS!
DIR("A" DOC+10*, PRESS*
DIR("B" DOC+10*
DIR(0 WARN+3*, DOC+10*, PRESS*
>> DTOUT WARN+3, DOC+10
>> DUOUT WARN+3, DOC+10
I CHECK+1~, KTMP+1*, KTMP+2*
IOF HDR+1
>> J KTMP+2*
SRA CHECK+1~
SRA( CHECK+2*, CHECK+3*, DOCS+2*, PRE+2
SRADOC DOC~*, DOC+3*, DOC+4*
SRADOC( DOC+3*, DOC+4*, DOC+8
SRAUDIT CHECK+1~*, CHECK+4*, CHECK+5
SRAUDIT( CHECK+2*, CHECK+3*, CHECK+4, CHECK+9, SIGNED*
SRCCASE CHECK+1~, CHECK+3*, EXIT+5~*, DOC+2, DOC+4, DOC+12, ALLREV+2*
SRDOC DOC~*, DOC+1*, DOC+2*, DOC+3*, DOC+4*, DOC+5
SRERR SIGNED~
SRESAR CHECK+1~, CHECK+2*, CHECK+3*, DOCS+2
SRESNOT DOC+10~*, DOC+11, DOC+12*
SRESNR CHECK+1~, CHECK+2*, CHECK+3*, DOCS+1
SRLCK CHECK+8~*
SRN CHECK+1~
SRN( CHECK+2*, CHECK+3*, DOCS+1*, PRE+2
SRNDOC DOC~*, DOC+1*, DOC+2*
SRNDOC( DOC+1*, DOC+2*, DOC+7
>> SROERR REVRS+2*
SROP CHECK+1~, CHECK+2*, CHECK+3*, CHECK+9*, DOCS+1, DOCS+2, SIGNED, PRE+1
SRRISK SRA~*, CHECK+6
>> SRSDATE HDR*, HDR+1
SRSIGN CHECK+1~, DOCS+1*, DOCS+2*, SIGNED*
SRSOUT ENTER+1~!, CHECK+1*, CHECK+6, CHECK+8*, WARN+3*
SRTIU CHECK+1~, CHECK+2*, CHECK+3*
SRTN ENTER, CHECK+2, CHECK+3, CHECK+8, PRE+1~*, PRE+2, HDR, HDR+1, EXIT+1, EXIT+2
, EXIT+3, EXIT+4, EXIT+5*, EXIT+6, EXIT+7, EXIT+8, EXIT+9*, DOC+1, DOC+3, DOC+12*
, UNLOCK, ALLREV+2*, REVRS+2
SRTN1 EXIT+5~*, EXIT+9, DOC+12*, ALLREV+2*
SRX CHECK+1~, DOCS+1*, DOCS+2*, SIGNED
SRY CHECK+1~, SIGNED+1!
SRY( SIGNED
>> VA("PID" HDR+1
>> VADM(1 HDR+1
X CHECK+1~, CHECK+4*, DOC+7*, DOC+8*
>> XQUIT ENTER+1*, CHECK+8*
>> Y HDR*, DOC+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All