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

Package: Lab Service

Routine: LRBLJL1


Information

LRBLJL1 ;AVAMC/REG/CYM - UNIT RELOCATION ; 12/18/00 1:49pm

Source Information

Source file <LRBLJL1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 1 (A,M)^LRU  
Registration 1 $$SITE^VASITE  
VA FileMan 1 ^%DT  

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 LRBLJL  

Entry Points

Name Comments DBIA/ICR reference
L
S
W
N
A

External References

Name Field # of Occurrence
^%DT LRBLJL1+6
A^LRU W
M^LRU S+1
$$SITE^VASITE A+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Unit assigned/xmatched:",?48,"Exp date",?67,"Location"
  • Condition for execution: F=1
  • Line Location: S+1
Function Call: WRITE
  • Prompt: !,$J(F,2),")"
  • Line Location: S+1
Function Call: WRITE
  • Prompt: W:$P(LRX,U,11)="U"
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?5,"#"
  • Condition for execution: $P(LRX,U,11)="U"
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?6,$P(LRX,U,2),?20,$P(LRX,U,3),?41,$P(LRX,U,4)
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?6,$P(LRX,U,2),?20,$P(LRX,U,3),?41,$P(LRX,U,4)
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !?6,$C(7),"*** Also assigned/xmatched to ",$P(N,"^")," ",$P(N,"^",9)
  • Line Location: W+3
Function Call: WRITE
  • Prompt: !
  • Line Location: N+1
Function Call: WRITE
  • Prompt: $C(7),!?6,"This unit needs to be modified before release !"
  • Line Location: N+3
Function Call: WRITE
  • Prompt: $C(7),!!,"There must be an entry in the HOSPITAL LOCATION file",!,"containing 'BLOOD BANK' in the name for ",LRAA(4)
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !?3,C(A)
  • Line Location: A+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] W+3
^LAB(66 - [#66] L+9
^LR - [#63] W+3
^LRD(65 - [#65] LRBLJL1+7, L!, L+1, L+6, L+7, L+10, W+2, W+3
^SC - [#44] A+1
^SC("B" A+1
^TMP($J LRBLJL1+8, LRBLJL1+9, LRBLJL1+10, LRBLJL1+11*, LRBLJL1+12!, LRBLJL1+13, LRBLJL1+14, LRBLJL1+15!, L+11*, S*
, N, N+2!

Label References

Name Line Occurrences
L LRBLJL1+7
N L+12
S LRBLJL1+14
W N+1

Naked Globals

Name Field # of Occurrence
^( LRBLJL1+14, L+2, A+1
^(0 L+7
^(3 L+2
^(4 L

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT LRBLJL1+6*
A LRBLJL1+6*, LRBLJL1+8*, LRBLJL1+9, LRBLJL1+10, LRBLJL1+11, LRBLJL1+13*, LRBLJL1+14, L+11*, N, N+2
, A*, A+1*, A+4*, A+5!
B LRBLJL1+8*, LRBLJL1+13*, LRBLJL1+14, S, A*, A+1*, A+5!
C LRBLJL1+6*, LRBLJL1+7*, LRBLJL1+9*, LRBLJL1+10, LRBLJL1+11, LRBLJL1+14*, L, L+1, L+6, L+7
, L+10, L+11, S, A*, A+1*, A+2, A+4, A+5!
C( A+1*, A+4
C(1 LRBLJL1+7*, A+3
DT A+1
DUZ(2 L+1, A+1
>> E LRBLJL1+10*, LRBLJL1+11, W+2*, W+3
>> F LRBLJL1+8*, LRBLJL1+11*, LRBLJL1+13*, S*, S+1
>> H LRBLJL1+6*, L+11
>> I W+1*, W+2, W+3
>> L L+2*, L+11, W*
>> LR( L+10*, L+11
>> LR("Q" LRBLJL1+6*, LRBLJL1+13, LRBLJL1+14
>> LR(44 A+3*
>> LRAA(4 A+2, A+4
>> LRDFN LRBLJL1+7, L, L+10, W+3
LRDT L+6~*, L+7
>> LRG L+2*, L+11
>> LRG( L+7*
>> LRG(1 W*
>> LRX LRBLJL1+14*, W, W+1, N*
>> M L+9*, L+11, L+12
>> N W+3*
>> T L+2*, L+8*, L+11
U L+1, L+2, L+7, L+9, L+12, W, A+1
>> V W*
>> X LRBLJL1+6*, L+1*, L+2, L+9, L+11, W+3*
>> Y LRBLJL1+6, L+2*, L+11, W*, W+3*, N, A+2*, A+4*
>> Z L+9*, L+11, N, N+2
>> Z(1 N*, N+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All