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

Package: Lab Service

Routine: LRBLPTR1


Information

LRBLPTR1 ;AVAMC/REG - TRANSFUSIONS/HEM RESULTS ;3/5/91 09:20 ;

Source Information

Source file <LRBLPTR1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 3 ^LRBLPC1  (D,F,M,SSN)^LRU  ^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: 1

Package Total Caller Graph
Lab Service 1 LRBLPTR  

Entry Points

Name Comments DBIA/ICR reference
A
WRT
W
P
S
T
H
G

External References

Name Field # of Occurrence
^LRBLPC1 W+2
D^LRU G
F^LRU H+1
M^LRU H
SSN^LRU G
^LRUTL LRBLPTR1+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,"BLOOD must be an entry in TOPOGRAPHY file (#61)",!
  • Line Location: LRBLPTR1+3
Function Call: WRITE
  • Prompt: $C(7),!!,"Must have tests to print entered in the",!,"'Tests for inclusion in transfusion report option' in",!,"Blood bank supervisor menu",!
  • Line Location: LRBLPTR1+5
Function Call: WRITE
  • Prompt: !!,"Please hold while I sort transfusions with hematology results..."
  • Line Location: LRBLPTR1+6
Function Call: WRITE
  • Prompt: !,T
  • Line Location: P+0
Function Call: WRITE
  • Prompt: ?12,$E($P(^LAB(66,+Q,0),"^"),1,28),$S($P(Q,"^",6):"("_$P(Q,"^",6)_")",1:"")
  • Condition for execution: Q
  • Line Location: P+0
Function Call: WRITE
  • Prompt: !?32
  • Condition for execution: $X>(IOM-9)
  • Line Location: P+2
Function Call: WRITE
  • Prompt: ?32+(8*X(1))
  • Line Location: P+2
Function Call: WRITE
  • Prompt: $J(^(B),5)
  • Line Location: P+2
Function Call: WRITE
  • Prompt: !,W(2),?31,W(10),?45,"DOB: ",W(4),!,"Location:",?12,W(5),!,"Mo/Da TIME",?12,"Blood component"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?32
  • Condition for execution: $X>(IOM-8)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: ?32+(8*X(1)),$P(LRT(X),"^",7)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] G
^LAB(60 - [#60] S
^LAB(61 - [#61] LRBLPTR1+3, S+1
^LAB(66 - [#66] P
^LR - [#63] A, A+1, G
^LRO(69.2 - [#69.2] LRBLPTR1+4
^TMP("LRBL" LRBLPTR1+7, WRT
^TMP($J LRBLPTR1+6!, A*, A+1*, W+1, P, P+1, P+2

Label References

Name Line Occurrences
A LRBLPTR1+7
G W
H W, P
P W+1
S LRBLPTR1+4
T W+1
W WRT
WRT LRBLPTR1+8

Naked Globals

Name Field # of Occurrence
^( LRBLPTR1+4, LRBLPTR1+7, A*, A+1*, W+1, P, P+2, S, G
^(0 S
^(1 S

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A LRBLPTR1+4*, A*, A+1*, WRT*, W+1*, P, P+1, P+2
>> B LRBLPTR1+4*, LRBLPTR1+5, A+1*, P+2*, S+1*
>> DFN W+2, G*
IOM P+2, H+2
IOSL P
IOST LRBLPTR1+6, H
>> LR("%" H+3
>> LR("F" H
>> LR("Q" WRT, W, W+1, W+2, P, H
>> LRA LRBLPTR1+7*
>> LRAA LRBLPTR1+4
>> LRDFN LRBLPTR1+7*, A, A+1, WRT*, W+1, P, P+1, P+2, G
>> LRDPF G*
>> LRLDT LRBLPTR1+7*, A, A+1
>> LRP LRBLPTR1+7*
>> LRPF G*
>> LRQ W*
>> LRS LRBLPTR1+3*, LRBLPTR1+4
>> LRS( A+1, S+1*
>> LRSDT LRBLPTR1+7*, A, A+1
>> LRT( S+1*, H+2
>> LRT(0 LRBLPTR1+5*, A+1, P+2, H+2
>> LRV( A+1, S+1*
>> N WRT*
>> Q P*
>> SSN G*
>> T W+1*, P, T*
>> W LRBLPTR1+4*, S, S+1
>> W(10 H+1, G*
>> W(2 H+1, G*
>> W(4 H+1, G*
>> W(5 H+1, G*
>> X LRBLPTR1+4*, LRBLPTR1+7*, A*, A+1*, S*, S+1, H+2*, G*
>> X(1 P+2*, S*, S+1, H+2*
>> Y LRBLPTR1+4*, S, S+1, G*
>> Z A+1*, S*, S+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All