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

Package: Lab Service

Routine: LRBLPD1


Information

LRBLPD1 ;SLC/DCM - BB PT INFO for OE/RR pt lists ;12/10/90 12:21

Source Information

Source file <LRBLPD1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^%DT  ^%DTC  ^DIWP  ^DIWW  
Lab Service 3 $$LRDFN^LR7OR1  (D,L,S,SSN,V)^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: 2

Package Total Caller Graph
Lab Service 1 LRAPS3  
Order Entry Results Reporting 1 ORWRP16  

Entry Points

Name Comments DBIA/ICR reference
OERR ;
N
MORE
S
H
SET ;
CLEAN ;
INI ;

External References

Name Field # of Occurrence
^%DT H
^%DTC INI+7
^DIWP OERR+8
^DIWW OERR+9
$$LRDFN^LR7OR1 OERR+2
D^LRU OERR+10, H, INI+7, INI+8
L^LRU OERR+6
S^LRU OERR+6
SSN^LRU INI+2
V^LRU SET+1
^LRUTL SET+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Lab Data for: "_$P(^(0),"^")
  • Line Location: OERR+1
Function Call: WRITE
  • Prompt: !,"No Lab Data for: "_$P(^DPT(DFN,0),"^")
  • Line Location: OERR+2
Function Call: WRITE
  • Prompt: !,"No Lab Data for: "_$P(^DPT(DFN,0),"^")
  • Line Location: OERR+3
Function Call: WRITE
  • Prompt: @IOF,!,LRP," ",SSN,?46,$J(LRPABO,2),?49,LRPRH
  • Line Location: OERR+7
Function Call: WRITE
  • Prompt: MORE
  • Condition for execution: 'B C(C) W:B ! W ?21,$P(^LAB(61.3,A,0),"^") D:$Y>A(1)!'$Y
  • Line Location: OERR+9
Function Call: WRITE
  • Prompt: !,"No transfused units on record",!
  • Line Location: OERR+11
Function Call: WRITE
  • Prompt: !,$J(B,3),")",?6,$P(X,"^",3),?18,$E($P(M,"^"),1,30)
  • Line Location: N+2
Function Call: WRITE
  • Prompt: ?45,"(",X(7),"/",X(10),")"
  • Line Location: N+2
Function Call: WRITE
  • Prompt: ?54,$P(X,"^",5)_" "_$P(X,"^",6),?60,Y
  • Line Location: N+3
Function Call: READ
  • Formatting: !
  • Prompt: "^ TO STOP: "
  • Variable: A(2)
  • Timeout: DTIME
  • Line Location: MORE+0
Function Call: WRITE
  • Prompt: $C(13),$J("",15),$C(13)
  • Line Location: MORE+1
Function Call: WRITE
  • Prompt: @IOF,!,Y,?22,LRQ(1),?(IOM-10),"Pg: ",LRQ
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !,"LABORATORY SERVICE"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LRP," ",SSN,?46,$J(LRPABO,2),?49,LRPRH
  • Line Location: H+2
Function Call: WRITE
  • Prompt: $C(7),!!,"MUST BE BLOOD BANK"
  • Line Location: SET+3
Function Call: WRITE
  • Prompt: $C(7),!!,?34,"",LRLLOC,"",!
  • Line Location: INI+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] INI+1
^DIC(45.7 - [#45.7] INI+6
^DPT - [#2] OERR+1, OERR+2, OERR+3
^LAB(61.3 - [#61.3] OERR+9
^LAB(66 - [#66] N+1
^LR - [#63] OERR+3, OERR+8, OERR+9, OERR+10, N+4, INI+2, INI+5, INI+8*
^VA(200 - [#200] INI+4

Label References

Name Line Occurrences
H OERR+6, MORE
INI OERR+4
MORE OERR+8, OERR+9, OERR+10, N+4
N OERR+10
S OERR+8, OERR+9, OERR+10

Naked Globals

Name Field # of Occurrence
^( OERR+8, N+4, INI+2, INI+6, INI+8
^(0 OERR+1, INI+4, INI+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT H*
A OERR+8*, OERR+9*, OERR+10*, N+4, MORE*, S*, CLEAN+1!
A(1 OERR+6*, OERR+7*, OERR+8, OERR+9, OERR+10, N+4, MORE+1*, H+2*
A(2 OERR+8, OERR+9, OERR+10, OERR+11, N+4, MORE*, S*
AGE CLEAN+1!, INI+7*
B OERR+8*, OERR+9*, OERR+10*, OERR+11, N, N+2, CLEAN+1!
C OERR+9*, CLEAN+1!
C( OERR+5*, OERR+9
C(1 OERR+5*
DFN OERR+1, OERR+2, OERR+3, CLEAN+1!, INI+2, INI+6, INI+8
>> DIWF OERR+5*
>> DIWL OERR+5*
>> DIWR OERR+5*
DOB CLEAN+1!, INI+1*, INI+2*, INI+7*
DT INI+7
DTIME MORE
>> E N+4*
>> F N+4*
I CLEAN+1!
IOF OERR+7, H
IOM OERR+5, H
IOSL OERR+7, H+2
IOST OERR+6, OERR+7, MORE
LR CLEAN+1!
LRAA CLEAN+1!
LRABV CLEAN+1!
LRAD CLEAN+1!
LRADM CLEAN+1!, INI+1*
LRADX CLEAN+1!, INI+1*
LRAWRD CLEAN+1!, INI+1*
LRAX CLEAN+1!
LRCAPLOC CLEAN+1!
LRDFN OERR+2*, OERR+3, OERR+8, OERR+9, OERR+10, N+4, CLEAN+1!, INI+2, INI+5, INI+8
LRDPAF CLEAN+1!
LRDPF OERR+3*, CLEAN+1!, INI+1
LREXP INI+1!, INI+8*
LRFNAM CLEAN+1!, INI+1*
LRH CLEAN+1!
>> LRLLOC INI+2*, INI+3*, INI+8*
LRMD CLEAN+1!, INI+1*, INI+4*
LRMD(1 INI+1*, INI+4*
LROLLOC CLEAN+1!
LRP OERR+7, H+2, CLEAN+1!, INI+2*
LRPABO OERR+7, H+2, CLEAN+1!, INI+5*
LRPARAM CLEAN+1!
LRPF CLEAN+1!, INI+1*, INI+2, INI+6, INI+8
LRPFN CLEAN+1!, INI+1*
LRPRH OERR+7, H+2, CLEAN+1!, INI+5*
LRQ OERR+4*, H*, CLEAN+1!
LRQ(1 H
LRS CLEAN+1!, INI+1*, INI+6*
LRS(1 INI+1*, INI+6*
LRSF CLEAN+1!
LRSS SET+3, CLEAN+1!, INI+5
LRSVC CLEAN+1!, INI+1*, INI+6*
LRU CLEAN+1!
LRWHO CLEAN+1!
>> M N+1*, N+2
N CLEAN+1!
>> OREND SET+2*, SET+3*
P CLEAN+1!
R CLEAN+1!
SEX CLEAN+1!, INI+2*
SSN OERR+7, H+2, CLEAN+1!, INI+2*
X OERR+8*, OERR+10*, N+1, N+2, N+3, H*, SET+1*, CLEAN+1!, INI+2*, INI+4
, INI+5*, INI+7
X(1 N+1*
X(10 N+1*, N+2
X(7 N+1*, N+2
>> X1 INI+7*
>> X2 INI+7*
Y OERR+10*, N+3, H, SET+2, CLEAN+1!, INI+2*, INI+7*, INI+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All