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

Package: Lab Service

Routine: LRBLTXA


Information

LRBLTXA ; IHS/DIR/FJE - TRANSFUSION FOLLOW-UP 2/18/93 09:55 ;

Source Information

Source file <LRBLTXA.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 3 ^LRBLPC1  (B,D,F,L,M,S,SSN,V)^LRU  (,BEG,END)^LRUTL  
VA Fileman 1 C^%DTC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRBLPC1  LRBLTXA  

Entry Points

Name Comments DBIA/ICR reference
A
C
B
END
H2 ;D H Q:LR("Q") W !,LRP," SSN:",SSN," Loc: ",$P(LRP(1),"^",2) Q
H
H1 ;D H Q:LR("Q") W:W(1)>1 !,LRP," SSN:",SSN," Loc: ",$P(LRP(1),"^",2) D:W(1)>1 C Q
M
L
P
QUE
T
W

External References

Name Field # of Occurrence
C^%DTC LRBLTXA+5
^LRBLPC1 T+1
B^LRU LRBLTXA+5
D^LRU P
F^LRU H+1
L^LRU QUE
M^LRU H
S^LRU QUE
SSN^LRU QUE+4
V^LRU END
^LRUTL LRBLTXA+4
BEG^LRUTL LRBLTXA+6
END^LRUTL QUE+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Search for possible transfusion related disorders"
  • Line Location: LRBLTXA+4
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: QUE+5
Function Call: WRITE
  • Prompt: !,A,?5,"= ",LR("D",A)
  • Line Location: QUE+5
Function Call: WRITE
  • Prompt: ?(16+(X*8)),$J($P(^(+L(LR,X)),"^"),7)
  • Line Location: M+3
Function Call: WRITE
  • Prompt: " ",Y,":",E(F,G)
  • Line Location: A+1
Function Call: WRITE
  • Prompt: ?(16+(X*8)),$J(N(LR,X),7)
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !,"BLOOD BANK SEARCH FOR TRANSFUSION RELATED DISORDERS",!?24,"FROM ",LRSTR," TO ",LRLST,!,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LRP," SSN:",SSN," Loc: ",$P(LRP(1),"^",2)
  • Line Location: H2+0
Function Call: WRITE
  • Prompt: !,LRP," HRCN:",HRCN," Loc: ",$P(LRP(1),"^",2)
  • Line Location: H2+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] P
^LAB(60 - [#60] QUE+1
^LAB(61 - [#61] QUE, M+2
^LAB(66 - [#66] A+1
^LR - [#63] QUE+2, QUE+4, T, B, M+3, A, P
^LRO(69 - [#69] QUE+2
^LRO(69.2 - [#69.2] QUE+1
^TMP($J QUE!, QUE+4, P+1*

Label References

Name Line Occurrences
A M+2
B W
C M+2, H1+1
END LRBLTXA+4, LRBLTXA+5, LRBLTXA+6, QUE+6
H QUE, QUE+5, H1+1, H2+1
H1 M
H2 A+1
L B
M L, L+1, L+2
P QUE+2
T QUE+4
W T

Naked Globals

Name Field # of Occurrence
^( QUE+1, QUE+4, T, B, M+3, A, P
^(0 QUE+1, QUE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A QUE+1*, QUE+2*, QUE+4*, QUE+5*
>> B QUE+1*, QUE+2*, QUE+5*, W*, B, M+4*, P, P+1
>> C QUE+1*
>> DFN QUE+4*, T+1, M*, P*, P+1
E A*, A+2!
E( A*, A+1
>> F A*, A+1*
>> G A*, A+1*
>> HRCN M+2, H1+1, H2+1
IO QUE
IOSL QUE+5, M, A+1
IOST H
>> J LRBLTXA+5*, QUE+2, B*, L, L+1, L+2
>> J(2 W*, B, M*
>> L P*, P+1
>> L( QUE+1*, W, B, M+3
>> LR W*, B, M+3, C
>> LR("%" QUE+5, T+2, H+1
>> LR("D" QUE*, QUE+5, A+1*
>> LR("F" QUE*, H
>> LR("Q" QUE+4, QUE+5, T, W, M, A, A+1, H, H1+1, H2+1
>> LRAA QUE+1
>> LRDFN QUE+4*, T, B, M+3, A
>> LRDPF QUE+4*
>> LRI T*, B, M+3
>> LRJ LRBLTXA+5*, T
>> LRLDT LRBLTXA+5, QUE+2
>> LRLST H+1
>> LRP QUE+4*, T+1, M+2, H1+1, H2+1
>> LRP(1 QUE+4*, T+1, M, M+2, H1+1, H2+1
>> LRSDT LRBLTXA+5*, T
>> LRSTR H+1
>> LRT LRBLTXA+5*, QUE+2, A
>> N( QUE+1*, C
>> POP LRBLTXA+6
>> SSN QUE+4*
>> T QUE+2*, T*, B, M+2
>> T(1 T*, M+2
U QUE+4
>> W(1 T*, T+1, T+2, M*, M+2, H1+1
>> W(10 T+1*
>> W(2 T+1*
>> W(4 T+1*, M*, P*, P+1
>> W(5 T+1*
>> X LRBLTXA+4*, LRBLTXA+5, T*, B*, L, L+1, L+2, M+3*, A*, A+1*
, C*, P*, P+1
>> X1 LRBLTXA+5*
>> X2 LRBLTXA+5*
>> Y LRBLTXA+4, LRBLTXA+5, T*, A+1*, P*
>> Z(2 QUE*, M+2
>> Z(3 QUE*, M+2
>> Z(5 QUE*, M+2
>> ZTRTN LRBLTXA+6*
>> ZTSK LRBLTXA+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All