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

Package: Surgery

Routine: SROAL2


Information

SROAL2 ;BIR/ADM - LOAD POSTOPERATIVE LAB DATA ;02/14/07

Source Information

Source file <SROAL2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 C^%DTC  ^DIC  ^DIE  
Surgery 2 ^SROAL21  ($$LOCK,UNLOCK)^SROUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROALAB  

Entry Points

Name Comments DBIA/ICR reference
LABCHK ; Get test values from patient's lab record.
END
CONV ; convert value to numeric for comparison
TMCHK
SRADN ; Get data name(s) for test, make call to check lab record.
COMP
SRAT ; Get test from file 139.2.
START
STAR ; questional result, require manual input
YEP
NS ; check for no sample
DATA ; Decide to save test result or not

External References

Name Field # of Occurrence
C^%DTC START+2
^DIC SRAT+2, SRAT+3
^DIE TMCHK+4
^SROAL21 SRAT+6
$$LOCK^SROUTL SRAT+6, TMCHK+3
UNLOCK^SROUTL SRAT+6, TMCHK+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This selection loads highest or lowest lab data for tests performed within",!,"30 days after the operation."
  • Line Location: SROAL2+6
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: YEP+0
Function Call: WRITE
  • Prompt: !!,"Enter <RET> to automatically load postoperative lab data from the patient's lab record, or 'NO' to return to the menu."
  • Line Location: YEP+1
Function Call: WRITE
  • Prompt: !!,"Lab data NOT loaded."
  • Line Location: YEP+2
Function Call: WRITE
  • Prompt: !!,"'Time the Operation Ends' must be entered before continuing."
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,"..Searching lab record for postoperative lab test data...."
  • Line Location: SRAT+1
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: TMCHK+0
Function Call: WRITE
  • Prompt: !!,"Enter 'YES' to input 'Time the Operation Ends' or ",!,"'NO' to return to the menu."
  • Line Location: TMCHK+1
Routine Call
  • DIE
  • Line Location:
    • TMCHK+4
Routine Call
  • DIC
  • Line Location:
    • SRAT+2
    • SRAT+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] START
^LR - [#63] LABCHK+1, COMP, DATA+3, DATA+10
^SRF - [#130] START, START+1, TMCHK+4
^SRO(139.2 - [#139.2] SRAT+4, SRAT+5, SRADN+1

Label References

Name Line Occurrences
COMP LABCHK+2, LABCHK+3
CONV DATA+2, DATA+6, DATA+9
DATA COMP
END YEP, YEP+2, START+1
LABCHK SRADN+1
NS SRAT+4, SRAT+5
SRADN SRAT+4, SRAT+5
STAR LABCHK+1
TMCHK START+1, TMCHK+1
YEP YEP+1

Naked Globals

Name Field # of Occurrence
^( SRADN+1, LABCHK+1
^("LR" START
^(0 LABCHK+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA TMCHK+4*
DIC SRAT+2!*, SRAT+3!*
DIC(0 SRAT+2*, SRAT+3*
>> DIE TMCHK+4*
DR TMCHK+4!*
DTIME YEP, END, TMCHK
IOF END+1
>> SR1 COMP+3*
>> SR2 COMP+3*
SRAD SROAL2+5!
SRAD( NS+1*, STAR+1*, DATA+3*, DATA+10*
>> SRADN SRADN+1*
>> SRAIDT LABCHK+1*, COMP, DATA+3, DATA+10
>> SRALR START*, LABCHK+1, COMP, DATA+3, DATA+10
>> SRAOP START+1*, START+2, TMCHK+4*
>> SRASP SRAT+4*, SRAT+5*, LABCHK+3
SRAT SROAL2+5!, SRAT+4*, SRAT+5*, SRADN+1, LABCHK+2, COMP+1, COMP+2, COMP+3, NS+1, STAR+1
, DATA+3, DATA+10
SRAT( COMP+1, COMP+2*, COMP+3*, NS+1*, STAR+1*, DATA+3*, DATA+10*
>> SRATN SRADN+1*, LABCHK+1, COMP
>> SRAVAL COMP*, DATA+2*, DATA+3, DATA+10
SRBLUD SROAL2+5~, SRAT+3*, LABCHK+2
SRELSE CONV+1~
>> SREND START+2*, LABCHK+1
>> SRFLG SRAT+4*, SRAT+5*, LABCHK+1, COMP+1, COMP+2, COMP+3, NS+1, STAR+1, DATA+3, DATA+4
, DATA+7, DATA+10
>> SRP SRAT+2*, LABCHK+2
>> SRSER SRAT+2*, LABCHK+2
>> SRSOUT SROAL2+5*, START+1, END, TMCHK*, TMCHK+2*, TMCHK+4*
>> SRSP LABCHK+1*, LABCHK+2, LABCHK+3
>> SRST START+2*, LABCHK+1
SRSWAP DATA+1~*, DATA+3, DATA+5*, DATA+6*, DATA+8*, DATA+9*
>> SRT DATA+2*, DATA+5, DATA+8
>> SRT1 DATA+3*, DATA+4, DATA+6, DATA+7, DATA+9
>> SRTN SROAL2+5, START, START+1, SRAT+6, TMCHK+3, TMCHK+4
SRVAL DATA+1~, DATA+6*, DATA+9*
>> SRX LABCHK+1*, DATA+2*, DATA+6*, DATA+9*, CONV+1*, CONV+2, CONV+3*, CONV+4, CONV+5, CONV+6*
, CONV+7*
>> SRYN YEP*, YEP+1*, YEP+2, TMCHK*, TMCHK+1*, TMCHK+2
>> SRZ DATA+2, CONV+1*
>> X START+2, SRAT+2*, SRAT+3*, END*
X1 START+2*, CONV+1~, CONV+4*, CONV+6
X2 START+2*, CONV+1~, CONV+5*, CONV+6
>> Y SRAT+2, SRAT+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All