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

Package: Lab Service

Routine: LRBLTA


Information

LRBLTA ;AVAMC/REG - TRANSFUSION REACTION COUNTS ;7/2/93 07:05 ;

Source Information

Source file <LRBLTA.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 3 ^LRBLTA1  (B,DT,F,L,M,S,V,YN)^LRU  (BEG,END)^LRUTL  

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

Package Total Caller Graph
Lab Service 2 LRBLTA  LRBLTA1  

Entry Points

Name Comments DBIA/ICR reference
QUE
OUT
S
A
B
C
N
H
H1
H2
END

External References

Name Field # of Occurrence
^LRBLTA1 OUT
B^LRU LRBLTA+3
DT^LRU C
F^LRU H+1
L^LRU QUE+1
M^LRU H
S^LRU QUE+1
V^LRU END
YN^LRU LRBLTA+3
BEG^LRUTL LRBLTA+4
END^LRUTL OUT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"List patients "
  • Line Location: LRBLTA+3
Function Call: WRITE
  • Prompt: !
  • Line Location: LRBLTA+3
Function Call: WRITE
  • Prompt: !!,LRR(1),?31,$J(^TMP($J,LRR),4)
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt: !,A,?5,"= ",^TMP($J,"B",A)
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt: !?41,LRE,?51,$J(^TMP($J,LRR,LRC),4)
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !,SSN,?5,LRP,?36
  • Line Location: C+0
Function Call: WRITE
  • Prompt: Y,?67,$P(LRX,"^",2)
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !,"TRANSFUSION REACTION COUNTS FROM ",LRSTR," TO ",LRLST,!,"REACTION",?31,"COUNT",?41,"COMPONENT",?51,"SUBCOUNT"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"SSN",?5,"Patient",?36,"Transfusion Date",?67,"Unit ID"
  • Condition for execution: LRF
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LRR(1)
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: ?41,LRE
  • Line Location: H2+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] N
^LAB(65.4 - [#65.4] QUE+3
^LAB(66 - [#66] A
^LR - [#63] S, N
^LR("AB" QUE+2
^TMP($J QUE!, QUE+3, QUE+4, S+1, S+2, A*, B, C

Label References

Name Line Occurrences
A QUE+3
B A
C B
END LRBLTA+3, LRBLTA+4, OUT
H QUE+1, QUE+3, QUE+4, H1
H1 A, H2
H2 C
N B
OUT QUE+4
S QUE+2

Naked Globals

Name Field # of Occurrence
^( S+1*, S+2*, C
^(0 A

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LRBLTA+3*
>> A QUE+4*
>> C S*, S+2
IO QUE
IOSL QUE+3, QUE+4, A, C
IOST H
>> LR("%" H+1
>> LR("F" QUE+1*, H
>> LR("Q" QUE+3, QUE+4, OUT, A, B, C, H, H1, H2
>> LRC A*, B, C
>> LRDFN QUE+2*, S, S+2, B*, C, N
>> LRE A*, H2
>> LRF LRBLTA+3*, S+2, A, H+1
>> LRI QUE+2*, S, S+2, C*
>> LRLDT QUE*, QUE+2
>> LRLST H+1
>> LRP C, N*
>> LRR QUE+2*, QUE+3*, S+1, S+2, A, B, C
>> LRR(1 QUE+3*, H1
>> LRSDT QUE*, QUE+2
>> LRSTR H+1
>> LRX C*
>> POP LRBLTA+4
>> SSN C, N*
U QUE+3, A
>> X S*, S+2, N*
>> Y LRBLTA+3, C*, N*
>> ZTRTN LRBLTA+4*
>> ZTSK LRBLTA+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All