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

Package: Lab Service

Routine: LRBLU


Information

LRBLU ;AVAMC/REG/CYM - BB UTIL ;1/22/97 15:32 ;

Source Information

Source file <LRBLU.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 ^%DT  C^%DTC  ^DIC  ^DIE  
Lab Service 2 (D,DT,V,YN)^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: 26

Package Total Caller Graph
Lab Service 26 LRBLDED  LRBLDEL  LRBLDLG  LRBLDPH  LRBLDRR  LRBLDT  LRBLDX  LRBLJA1  
LRBLJCK  LRBLJDP  LRBLJED  LRBLJL  LRBLJLG1  LRBLJR  LRBLPED1  LRBLPEW  
LRBLPTR  LRBLPUS  LRBLPX  LRBLW  LRBLWD  TRANSFUSION RECORD  ^LRD(65  DONATION OR DEFERRAL DATE  
LRBLPAG  LRBLSDPL  

Entry Points

Name Comments DBIA/ICR reference
I
F
S ;sets C-xref in FILE 65
K ;Kill C-xref in FILE 65
KK
S1
K1 ;Kill AG x-ref DD(65,4.1,1,
A ;Makes change to ^LRD(65,"AP" & date unit assigned if necessary
EN ;
EN1 ;
EN2 ;called by TRANSFUSION entry in EXECUTE CODE file
EN3 ;delete user print list for transfusion & hematology data
D
OUT
O ;enter old donor unit (CAUTION: This unit is in inventory)
P ;from DD(63.01, input transforms for fields 6.1 to 6.4
B ;
DT
END

External References

Name Field # of Occurrence
^%DT A+2, EN2+1, B+1, B+2, B+4, DT, DT+1
C^%DTC EN2+1
^DIC EN1+4, EN3+5
^DIE EN1+3, EN1+5, EN3+6
D^LRU B+1, B+6
DT^LRU EN2+2
V^LRU OUT
YN^LRU O+2
^LRUTL EN3+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!?15,"INVENTORY FILE HAS AN ENTRY WITH SAME ID ! "
  • Line Location: LRBLU+6
Function Call: WRITE
  • Prompt: !,$C(7),X," assigned to ",$P(^LRE(Y,0),U)
  • Line Location: I+0
Function Call: WRITE
  • Prompt: $C(7),!,"UNIT IN INVENTORY - EDIT TRANSFUSION DATA THERE !"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: $C(7),!,"Specimen(s) received within past 72 hrs:"
  • Condition for execution: B=1
  • Line Location: EN2+2
Function Call: WRITE
  • Prompt: !,Y,?18,$P(Z,U,6)
  • Line Location: EN2+2
Function Call: WRITE
  • Prompt: $C(7),!!,"There are no user lists."
  • Line Location: EN3+4
Function Call: WRITE
  • Prompt: $C(7),"Must define blood bank site parameters using option:",!?3,"Edit blood bank site parameters [LRBLSSP] under the Supervisor menu"
  • Line Location: D+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Must enter second and third defaults for DONOR using:",!?3,"Edit blood bank site parameters [LRBLSSP] under the Supervisor menu"
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !!,"Do you still want to enter this unit in the donor file "
  • Line Location: O+2
Function Call: WRITE
  • Prompt: !,"Ok, done."
  • Line Location: O+2
Function Call: WRITE
  • Prompt: LRH
  • Line Location: B+2
Function Call: WRITE
  • Prompt: LRH
  • Line Location: B+4
Function Call: WRITE
  • Prompt: $C(7),!?35,"Not allowed, enter date and time.",!?35,"Future times not allowed."
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DT+2
Routine Call
  • DIC
  • Line Location:
    • EN1+4
    • EN3+5
Routine Call
  • DIE
  • Line Location:
    • EN1+3
    • EN1+5
    • EN3+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(61.3 - [#61.3] Classic Fileman Calls
^LRO(69.2 - [#69.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61.3 - [#61.3] EN1+2, EN1+5, P+2
^LAB(66 - [#66] S+1, KK+2, KK+3
^LAB(69.9 - [#69.9] D, D+1
^LR - [#63] K1+3, K1+5!, K1+6, EN2+2, P+1, P+2!
^LR("AB" K1+5!
^LRD(65 - [#65] LRBLU+6, S+1*, K+2!, KK, KK+4!, K1+1, K1+4!, K1+5!, A+1!*, A+2*
, EN+1
^LRE - [#65.5] LRBLU+5, I
^LRE("C" LRBLU+5!, I
^LRO(69.2 - [#69.2] EN3+4

Label References

Name Line Occurrences
DT DT
EN3 EN3+6
END EN1+3
I LRBLU+5
O LRBLU+6
OUT EN3+1, EN3+3, EN3+4, EN3+5

Naked Globals

Name Field # of Occurrence
^( EN1+2, EN2+2
^(0 K1+6*, EN+1, P+2*
^(5 K1+5!
^(6 K1+5!
^(7 K1+5!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % O+2*
%DT A+2*, EN2+1*, B+1*, B+2*!, B+4*!, DT*!, DT+1*!
%DT("A" B+2*, B+4*, DT*
%DT(0 B+2*, DT*
>> A S+1*, K+2*, KK*, KK+4, K1+1*, K1+2, K1+3, K1+5, K1+6*, EN+1*
, EN2+2*, P+1
>> B F, K1+3*, K1+5, EN2+2*, P+1
>> C S+1*, KK*, KK+1, KK+2, KK+3, P+2
DA S+1, K+2, KK, KK+4, K1+1, K1+4, K1+5, EN1+3*, EN1+5*, EN3+6*
, END!
DA(1 A+1, A+2, EN3+6*
DA(2 A+1, A+2
DIC EN1+1*, EN1+4!, EN3+5*!, END!
DIC(0 EN1+4*, EN3+5*
DIE EN1+1*, EN3+5*, END!
DLAYGO EN1+4*, EN1+6!
DR EN1+3*, EN1+5*, EN3+6*, END!
DT B+2, B+4
>> LR A+2*, EN+1
>> LR("DEAD" K+1*, K+2*, K+3!
>> LR(65 KK
>> LRAA EN3+3, EN3+4, EN3+6
>> LRB EN1+3*, EN1+5*
>> LRD("U" O+1
>> LRDFN EN2+2, P+1, P+2
LRH B+1*, B+2, B+4, B+6!
LRH(17 D+2*
LRH(2 D+1*
LRH(20 D+2*
LRH(3 D+1*
>> LRI P+1, P+2
>> LRK DT+2*
>> LRLDT B+5*, B+6
>> LRLST B+6*
>> LRSDT B+3*, B+5*, B+6
>> LRSTR B+6*
>> S S+1*, KK*, KK+1, KK+2
U I, S+1, KK, KK+3, K1+1, K1+3, K1+6, A+1, A+2, EN+1
, EN2+2, D+1, D+2, P+2, DT
>> W LRBLU+5*, I
X LRBLU+4!, LRBLU+5, LRBLU+6, I!, F*, K1+4, A+1, A+2*, EN+1!, EN1+2*
, EN1+3, EN1+4*, EN2+1*, EN2+2, EN3+2*, D*!, D+1*!, D+2, O+1!, O+3!
, P+1, P+2*!, B+1*, B+2, B+4, B+5*, DT, DT+1*
X(1 LRBLU+5, A+2*, EN1+2*, P+2*
>> X1 EN2+1*
>> X2 EN2+1*
>> Y LRBLU+5*, I, S+1*, KK*, KK+2*, KK+3*, KK+4, A+2, EN1+5, EN2+1
, EN2+2*, EN3+5, EN3+6, B+1, B+2*, B+3, B+4*, B+5, B+6*, DT
, DT+1, DT+2
>> Z I*, K1+1*, K1+2, K1+3, K1+5, K1+6*, EN2+2*
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