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

Package: Lab Service

Routine: LRBLPT1


Information

LRBLPT1 ; IHS/DIR/FJE - TRANSFUSION RESULTS (COND'T) 12/11/92 07:38 ;

Source Information

Source file <LRBLPT1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^%DT  ^DIC  ^DIE  
Lab Service 2 (D,DT,YN)^LRU  H^LRUT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRBLPT  

Entry Points

Name Comments DBIA/ICR reference
DT
U
T
F

External References

Name Field # of Occurrence
^%DT DT
^DIC T+1
^DIE T+2
D^LRU DT+3
DT^LRU U
YN^LRU LRBLPT1+5, DT+2, DT+3, T
H^LRUT DT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: LRBLPT1+4
Function Call: WRITE
  • Prompt: $C(7)," Enter date & TIME"
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: $C(7),!!,"DATE/TIME MUST BE AFTER DATE UNIT RECEIVED IN INVENTORY",!
  • Line Location: DT+1
Function Call: READ
  • Timeout: %'=1
  • Line Location: DT+2
Function Call: WRITE
  • Prompt: !!,"TRANSFUSION REACTION "
  • Line Location: T+0
Function Call: WRITE
  • Prompt: $P(X,"^"),?17,$E(M,1,22),?40,$J($P(X,"^",7),2),?43,$P(X,"^",8),?48
  • Line Location: U+0
Function Call: WRITE
  • Prompt: Y,?64,F
  • Line Location: U+0
Routine Call
  • DIE
  • Line Location:
    • T+2
Routine Call
  • DIC
  • Line Location:
    • T+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRD(65 - [#65] Classic Fileman Calls
^LAB(65.4 - [#65.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(66 - [#66] LRBLPT1+4
^LR - [#63] T+4, T+5, F, F+1*, F+3*, F+4*, F+5*, F+6*, F+7*
^LR("AB" F+2*
^LRD(65 - [#65] LRBLPT1+4, DT+2, T+2*, T+3*, T+4, F+4*, F+6
^TMP($J LRBLPT1+4

Label References

Name Line Occurrences
DT DT, DT+1, DT+3
F F
T DT+2
U LRBLPT1+5

Naked Globals

Name Field # of Occurrence
^( DT+2, F+4, F+6
^(0 T+2, T+4!*, T+5*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LRBLPT1+5*, DT+2*, DT+3*, T*
%DT DT*!
%DT("A" DT*
%DT(0 DT*
>> %H DT+2
>> A T+4*
>> DA T+2*, T+4
DIC T+1*!
DIC("A" T+1*
DIC("S" T+1*
DIC(0 T+1*
>> DIE T+2*
>> DR T+2*
DUZ F+1
>> E F+4*, F+6*
>> E(1 F+4*, F+5, F+6*, F+7
>> E(2 F+4*, F+6*
>> E(3 F+6*
>> F LRBLPT1+4*, U
>> J DT+2*
>> J(0 DT+2*
>> LR(65 LRBLPT1+4*, T+4
>> LRC LRBLPT1+4*, F+1
>> LRDFN T+3, T+5, F, F+1, F+2, F+3, F+4, F+5, F+6, F+7
>> LRI LRBLPT1+4*, DT+2, T+2, T+3, F+4, F+6
>> LRJ LRBLPT1+4*, T+3, F+1
>> LRMD F+4
>> LRMD(1 F+4
>> LRQ(1 DT*, T+2*, F+1
>> LRR DT*, DT+3, T+5, F+1
>> LRR(1 T+5*, F*, F+1, F+2, F+3, F+4, F+5, F+6, F+7
>> LRR(3 T*, T+1, F+1, F+4
>> LRR(8 T*, T+1*, F+1, F+2, F+4
>> LRS F+4
>> LRS(1 F+4
>> LRV LRBLPT1+4
>> LRW LRBLPT1+4*, DT+1
>> M LRBLPT1+4*, U
>> M(1 LRBLPT1+4*, DT+2
>> R DT+2*
>> W(3 DT+2*
>> X LRBLPT1+4*, DT+2*, T+3*, T+4*, U
>> X(1 T+4*
>> Y DT, DT+1, DT+2*, DT+3*, T+1, U*
>> Z DT+2*
>> Z(3 DT+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