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

Package: Lab Service

Routine: LRACSUM5


Information

LRACSUM5 ;SLC/DCM - PRINT INDIVIDUAL PATIENT SUMMARY ; 3/3/88 13:32 ;

Source Information

Source file <LRACSUM5.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 3 (LOOP,LRLNS,LRSH,UDT)^LRACSUM3  HEAD^LRACSUM6  (DASH,EQUALS)^LRX  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRACSUM3  LRACSUM4  

Entry Points

Name Comments DBIA/ICR reference
GOUT
C
QRS1
LRLO ;from LRACSUM4
LRFDT
TS ;from LRACSUM3
LRHI
QRS
C2
C1 ;from LRACSUM4
TXT ;from LRACSUM4
TS2
TXT1 ;from LRACSUM3, LRACSUM4
TS1

External References

Name Field # of Occurrence
LOOP^LRACSUM3 LRFDT
LRLNS^LRACSUM3 GOUT
LRSH^LRACSUM3 GOUT
UDT^LRACSUM3 QRS+2
HEAD^LRACSUM6 GOUT
DASH^LRX TS+12
EQUALS^LRX TS+1, TXT1+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: TS+4
Function Call: WRITE
  • Prompt: "Locale "
  • Condition for execution: $D(LRCALE(LRMH,LRSH))
  • Line Location: TS+4
Function Call: WRITE
  • Prompt: LRTOPP,?LRCL
  • Line Location: TS+4
Function Call: WRITE
  • Prompt: $J($E($P(Z,U,3),1,(LRCW-1)),(A+B)),?LRCL
  • Line Location: TS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: TS+9
Function Call: WRITE
  • Prompt: ?9
  • Condition for execution: $D(LRCALE(LRMH,LRSH))
  • Line Location: TS+9
Function Call: WRITE
  • Prompt: $S($L($P(^LAB(64.5,"A",1,LRMH,LRSH,I(J)),U,11)):"Therapeutic",1:"Ref range"),?LRCL
  • Line Location: TS+9
Function Call: WRITE
  • Prompt: !?LRCL
  • Line Location: TS+11
Function Call: WRITE
  • Prompt: LRUDT
  • Line Location: QRS+2
Function Call: WRITE
  • Prompt: ?LRCL
  • Line Location: QRS1+0
Function Call: WRITE
  • Prompt: X_X1
  • Line Location: QRS1+1
Function Call: WRITE
  • Prompt: !?3
  • Condition for execution: LRVAR>1
  • Line Location: TXT+2
Function Call: WRITE
  • Prompt: ^(LRIV,0)
  • Line Location: TXT+2
Function Call: WRITE
  • Prompt: !!?LRCL
  • Line Location: TXT1+2
Function Call: WRITE
  • Prompt: "- "
  • Line Location: TXT1+2
Function Call: WRITE
  • Prompt: " ",$E("COMMENTS",I)
  • Line Location: TXT1+3
Function Call: WRITE
  • Prompt: " "
  • Line Location: TXT1+4
Function Call: WRITE
  • Prompt: " -"
  • Line Location: TXT1+4
Function Call: WRITE
  • Prompt: !?7,"KEY: ""L""=Abnormal low, ""H""=Abnormal high, ""*""=Critical value",!
  • Line Location: TXT1+5
Function Call: WRITE
  • Prompt: !," "
  • Condition for execution: L(0)>1
  • Line Location: TXT1+6
Function Call: WRITE
  • Prompt: ^TMP($J,"TM",C6,L)
  • Line Location: TXT1+6
Function Call: WRITE
  • Prompt: $J(LRLOHI,(A+B)),?LRCL
  • Line Location: TS1+0
Function Call: WRITE
  • Prompt: $J($P(^(I(I)),U,7),(A+B)),?LRCL
  • Line Location: TS2+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(64.5 - [#64.5] TS+2, TS+5, TS+7, TS+9, TS+10, QRS+3, LRLO+1, LRHI, TS1, TS2
^TMP($J LRFDT, GOUT, QRS, QRS1+1, TXT+2, TXT1+6

Label References

Name Line Occurrences
C QRS1+1
C2 C+4
LRFDT GOUT+2
LRLO TS1
QRS GOUT
QRS1 QRS+3
TS GOUT, GOUT+1
TS1 TS+9
TS2 TS+11
TXT1 GOUT

Naked Globals

Name Field # of Occurrence
^( TS+7, TS+10, LRFDT, QRS, QRS1+1, TXT+2, LRLO+1, LRHI, TS2
^(0 QRS1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A TS+5*, LRFDT!, TS1*, TS2*
B TS+5*, LRFDT!, TS1*, TS2*
C6 TXT1+6*, TXT1+7!
I TS+2!*, TS+5*, TS+6, TS+7*, TS+10*, TS+11*, QRS*, QRS+3*, QRS1+1, LRLO+1
, LRHI, TXT1+2*, TXT1+3*, TXT1+4*, TS1*, TS2
I( TS+2*, TS+5, TS+7, TS+9, TS+10, QRS, QRS+3, QRS1+1, LRLO+1, LRHI
, TS1, TS2
IOM TS+5, QRS1, TXT1+2, TS2
>> J TS+3*, TS+4, TS+5, TS+7, TS+9, TS+10, TS+11, QRS, QRS+3, TS1
L TXT1+6*, TXT1+7!
L(0 TXT1+6*
>> LRACT TS+1, TS+3*, TS+6, GOUT, GOUT+1
>> LRCALE( TS+3, TS+4, TS+8, TS+9, TS+11, QRS+2
>> LRCL TS+3*, TS+4, TS+5*, TS+8*, TS+9, TS+11*, QRS+2*, QRS1, QRS1+1*, TXT1+2*
, TS1*, TS2*
>> LRCTR TS+3*, GOUT, GOUT+1, QRS*
>> LRCW TS+5*, QRS1*, QRS1+1, C+1*, C+3, C1+1*, C1+2*, TS1*, TS2*
>> LRCW(1 C+3*, C+4
>> LRDFN LRFDT, GOUT, QRS, QRS1+1, TXT+2
>> LRDP QRS1*, C+4
>> LRFALT TS+3*, TS+7*, TS+9, TS+10*, TS+11, TS+12*, QRS*, QRS+1, QRS+2*, TS2*
>> LRFDT LRFDT*, LRFDT+1, GOUT*, GOUT+1*, QRS, QRS1+1, TXT+2
>> LRFFDT LRFDT*, GOUT+1
>> LRFULL GOUT*
>> LRG QRS+3*, QRS1, QRS1+1, C+1, C1+2
>> LRHI LRHI+1
>> LRII TS+2*
>> LRIV TXT+2*
>> LRJS TS+3, TS+6*, TS+7, TS+10, TS+11, QRS, QRS+3, TS1
>> LRLFDT LRFDT+1*, GOUT
>> LRLNS GOUT, GOUT+1
>> LRLO LRHI+1
>> LRLOHI LRHI+1*, TS1
>> LRMH TS+2, TS+3, TS+4, TS+5, TS+7, TS+8, TS+9, TS+10, TS+11, LRFDT
, GOUT, QRS, QRS+2, QRS+3, QRS1+1, TXT+2, LRLO+1, LRHI, TS1, TS2
>> LRNP LRFDT*
>> LRNXSW QRS+2
>> LRPL TS+6, GOUT, GOUT+1
>> LRSH TS+2, TS+3, TS+4, TS+5, TS+7, TS+8, TS+9, TS+10, TS+11, LRFDT
, GOUT, QRS, QRS+2, QRS+3, QRS1+1, TXT+2, LRLO+1, LRHI, TS1, TS2
>> LRSHD TS+4, TS+5
>> LRTLOC LRFDT*, QRS+2
>> LRTM QRS+2*
>> LRTM(0 TXT1+6
>> LRTOPP TS+4
>> LRUDT QRS+2
>> LRVAR TXT+1*, TXT+2*
>> P7 LRHI*
U TS+5, TS+7, TS+9, TS+10, LRFDT, QRS1, QRS1+1, LRLO+1, LRHI, TXT1+6
, C, C+1, C1+2, TS1, TS2
>> X QRS1+1*, C2*, C*, C+2*, C+4*, C1+3*
>> X1 QRS1+1, C*, C1+1*, C1+3
X2 QRS1+2!, C2, C+2*
X3 C2*, C2+1!
>> Z TS+5*, TS+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All