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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LRBLRCT

Package: Lab Service

Routine: LRBLRCT


Information

LRBLRCT ;AVAMC/REG/CYM - CROSSMATCH:TRANSFUSION REPORT ;6/19/96 09:50 ;

Source Information

Source file <LRBLRCT.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 2 (B,DT,F,L,M,S,SSN,V)^LRU  (BEG,END)^LRUTL  
VA FileMan 1 $$EXTERNAL^DILFD  

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
Lab Service 1 LRBLRCT  

Entry Points

Name Comments DBIA/ICR reference
QUE
C
SET
W
V
U
X
A
H
H1
H2
STATS
Z
END

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD STATS+5
B^LRU LRBLRCT+4
DT^LRU V
F^LRU H+1
L^LRU QUE+1
M^LRU H
S^LRU QUE+1
SSN^LRU V
V^LRU END
BEG^LRUTL LRBLRCT+5
END^LRUTL QUE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,"Crossmatch:Transfusion Report",!
  • Line Location: LRBLRCT+3
Function Call: WRITE
  • Prompt: Q:LR("Q")
  • Line Location: C+2
Function Call: WRITE
  • Prompt: !,LRD,?17,$P(X,"^"),?32,C,?37,Y,?40,$E($P(LRC,"^"),1,23)
  • Line Location: X+0
Function Call: WRITE
  • Prompt: " On x-match, not counted"
  • Line Location: X+1
Function Call: WRITE
  • Prompt: ?65,$E($P(LRC,U,3),1,14)
  • Line Location: X+1
Function Call: WRITE
  • Prompt: !,"BLOOD BANK",!,"CROSSMATCH:TRANSFUSIONS (from: ",LRSTR," to ",LRLST,")"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,?6,LRP,?38,SSN
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,LR("%"),!,"Number of specimens crossmatched:",$J(LRX(1),6)
  • Line Location: STATS+1
Function Call: WRITE
  • Prompt: !,"Total units crossmatched:",$J(LRX,6)
  • Line Location: STATS+2
Function Call: WRITE
  • Prompt: !,"Total units transfused:",$J(LRT,6)
  • Line Location: STATS+3
Function Call: WRITE
  • Prompt: !,"Crossmatch/transfusion ratio:",$J(LRX/LRT,9,2)
  • Line Location: STATS+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
65.02 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] C+1
^LAB(66 - [#66] X
^LR - [#63] C+1, W
^LRD(65 - [#65] C, SET, SET+1, X, X+1, A, A+1, A+2
^TMP($J QUE+1!, C+1*, SET+1*, W, V, U

Label References

Name Line Occurrences
A U
C QUE+1
END LRBLRCT+3, LRBLRCT+4, LRBLRCT+5, QUE+2
H QUE+1, V, H1, H2
H1 U
H2 STATS, STATS+5
SET C
STATS C+2
U V
V W
W C+2
X U
Z STATS

Naked Globals

Name Field # of Occurrence
^( SET, W, U
^(0 A+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A C*, C+1*, W*, STATS+5*
>> B C*, SET+1, STATS+5*
>> C X*
>> I C*, SET, SET+1
IO QUE
IOF QUE+2
IOSL V, U, STATS, STATS+5
IOST QUE+2, H
>> LR("%" W, H+3, STATS+1
>> LR("F" QUE+1*, H
>> LR("Q" C+2, W, V, U, H, H1, STATS, STATS+5
>> LRC U*, X, X+1
>> LRD V*, X
>> LRDFN W*, V, U, X+1
>> LRDPF W*
>> LRE U*
>> LRF( SET+1*, X+2*, STATS+5
>> LRF("?" QUE*
>> LRG("?" QUE*
>> LRH U*, X+2, A+3*
>> LRI U*, X, X+1, A, A+1
>> LRLDT LRBLRCT+4*, C
>> LRLST H+1
>> LRP W*, V, H1
>> LRQ(2 QUE*, H+2, H2*
>> LRS V*, U
>> LRSDT LRBLRCT+4*, C
>> LRSTR H+1
>> LRT W*, A*, A+3*, STATS*, STATS+3, STATS+4
>> LRX W*, U*, X+1*, A+3*, STATS+2, STATS+4
>> LRX(1 W*, U*, STATS+1
>> LRZ W*, V
>> P C*, SET+1
>> POP LRBLRCT+5
>> SSN W*, V, H1
U W, X+1
>> X C+1*, SET*, SET+1*, X*, A+2*, STATS*, Z*
>> Y LRBLRCT+4, C+1*, SET+1*, V*, X*, X+2, A*, A+1*, A+2, Z*
>> Y(2 A+1*, A+2
>> Z SET*, SET+1, A+1*, A+2*, A+3, Z*
>> ZTRTN LRBLRCT+5*
>> ZTSK LRBLRCT+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All