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

Package: Surgery

Routine: SROCL1


Information

SROCL1 ;BIR/SJA - LOAD CARDIAC LAB DATA ;02/14/07

Source Information

Source file <SROCL1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Surgery 2 SP^SROAL1  CARDIAC^SROAL11  
VA Fileman 2 C^%DTC  ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Surgery 1 SROCLAB  

Entry Points

Name Comments DBIA/ICR reference
LABCHK ; Get latest test values from patient's lab record.
CONCC ; update concurrent case
END
COMP
SP
SRAT ; Get test and data name(s) for test from file 139.2.
START
YEP
DEC ; convert to proper decimal place
DATA

External References

Name Field # of Occurrence
C^%DTC START+2, START+3, START+4
^DIC SRAT+2, SRAT+3
SP^SROAL1 SRAT+4
CARDIAC^SROAL11 SRAT+5, CONCC+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This selection loads the most recent cardiac lab data for tests performed",!,"preoperatively."
  • Line Location: SROCL1+6
Function Call: READ
  • Timeout: DTIME
  • Variable: SRYN
  • Line Location: YEP+0
Function Call: WRITE
  • Prompt: !!,"Enter <RET> to automatically load cardiac 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: !!,"No Date of Operation found !"
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,"..Searching lab record for latest 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
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+8
^SRF - [#130] START, START+1, SRAT+5
^SRO(139.2 - [#139.2] SP

Label References

Name Line Occurrences
COMP LABCHK+2
CONCC SRAT+5
DATA COMP
DEC DATA+8
END YEP, YEP+2, START+1
LABCHK SP
YEP YEP+1

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC SRAT+2!*, SRAT+3!*
DIC(0 SRAT+2*, SRAT+3*
DTIME YEP, END
>> II SP
IOF END+1
>> SR1 DEC+2*
>> SR2 DEC+2*
SRAD SROCL1+5!
SRAD( LABCHK+3*, DATA+8*
>> SRADN SP*
SRADT SP!, DATA, DATA+8*
>> SRAIDT LABCHK+1*, COMP, DATA, DATA+8
>> SRALR START*, LABCHK+1, COMP, DATA+8
>> SRAOP START+1*, START+2, START+3, START+4
>> SRASP SP*
SRAT SROCL1+5!, SRAT+4*, LABCHK+3, DATA+8, DEC+1, DEC+2
SRAT( LABCHK+3*, DATA+8*, DEC+1*, DEC+2*
>> SRATN SP*, LABCHK+1, COMP
SRBLUD SROCL1+5~, SRAT+3*
>> SRCON SRAT+5*, CONCC+1
>> SREND SRAT+4*, LABCHK+1
SREND0 START+2~*, SRAT+4
SREND1 START+2~, START+3*, SRAT+4
>> SREND2 START+4*, SRAT+4
>> SRP SRAT+2*, LABCHK+2
>> SRSER SRAT+2*, LABCHK+2
>> SRSOUT SROCL1+5*, START+1*, END
>> SRSP LABCHK+1*, LABCHK+2
>> SRST START+2*, LABCHK+1
>> SRTN SROCL1+5, START, START+1, SRAT+5, CONCC+1*
>> SRTN1 CONCC+1*
>> SRX COMP*, DATA+1, DATA+2*, DATA+3, DATA+4, DATA+5, DATA+6*, DATA+7*, DATA+8
>> SRYN YEP*, YEP+1*, YEP+2
>> SRZ DATA+2*, DATA+6
U START+1
>> X START+2, START+3, START+4, SRAT+2*, SRAT+3*, END*
X1 START+2*, START+3*, START+4*, DATA+2~, DATA+4*, DATA+6
X2 START+2*, START+3*, START+4*, DATA+2~, DATA+5*, DATA+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