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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LRBLJC

Package: Lab Service

Routine: LRBLJC


Information

LRBLJC ;AVAMC/REG - COMPONENT DISPOSITION LIST ;2/18/93 09:10

Source Information

Source file <LRBLJC.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Lab Service 3 HLP^LRBLJB  (B,D,L,S,SSN,V)^LRU  (BEG,END)^LRUTL  
VA FileMan 3 ^%DT  ^%DTC  ^DIC  

Entry Points

Name Comments DBIA/ICR reference
ABO
ASK
QUE
OUT
D
F
W
Y
B
T
S
A
H
H1
H2
END

External References

Name Field # of Occurrence
^%DT H
^%DTC FY
^DIC LRBLJC+4
HLP^LRBLJB ASK
B^LRU ASK+1
D^LRU H
L^LRU QUE
S^LRU QUE
SSN^LRU QUE+4
V^LRU END
BEG^LRUTL ASK+1
END^LRUTL OUT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,"COMPONENT DISPOSITION BY DATE UNIT RECEIVED"
  • Line Location: LRBLJC+3
Function Call: WRITE
  • Prompt: !
  • Line Location: LRBLJC+4
Function Call: READ
  • Formatting: !
  • Prompt: "Select ABO Group: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ABO+0
Function Call: WRITE
  • Prompt: $C(7)," Enter A, B, AB or O"
  • Line Location: ABO+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Select (T)ransfusions or (A)ll other dispositions: "
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !?11,LRD
  • Line Location: D+0
Function Call: WRITE
  • Prompt: !?45,LRC
  • Line Location: F+0
Function Call: WRITE
  • Prompt: ?65,$J(X,5)
  • Line Location: F+0
Function Call: WRITE
  • Prompt: D:$Y>(IOSL-6)
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,LRP," ",SSN
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !?11,$S(LRW="T":$P(^LRD(65,LRI,6),"^",3),1:LRX),?45,LRE,?65,$J(X,5)
  • Line Location: Y+1
Function Call: WRITE
  • Prompt: @IOF,Y," ",LRQ(1),?(IOM-10),"Pg: ",LRQ,!,LRM(1),?45,"ABO Group: ",LRABO
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !,$S(LRW="T":"Transfusions",1:"")," (Units received from ",LRSTR," to ",LRLST,")",!?11,$S(LRW="T":"Treating Specialty",1:"Disposition"),?45,"Unit ID",?60,"Days in inventory",!,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LRP," ",SSN
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,LRE
  • Line Location: H2+0
Routine Call
  • DIC
  • Line Location:
    • LRBLJC+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(65 QUE
^DIC - [#1] QUE+3
^LR - [#63] QUE+3, QUE+4
^LRD(65 - [#65] QUE+1, FYY+1, B!, B+1, TS
^TMP($J QUE!, QUE+3*, QUE+4, DFW+1, S*

Label References

Name Line Occurrences
@( B+1
ABO ABO
ASK ASK
B QUE+1
D QUE+2
END LRBLJC+3, LRBLJC+4, ABOASKASK+1, OUT
F D
H QUEDWH1H2
H1 Y
H2 F
OUT D+1
S A
W QUE+4
Y W+1

Naked Globals

Name Field # of Occurrence
^( QUE+4
^(0 FY
^(4 B+1
^(6 T

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT H*
>> A QUE+3*
DIC LRBLJC+4*!
DIC("A" LRBLJC+4*
DIC(0 LRBLJC+4*
DTIME ABOASK
IO QUE
IOF H
IOM H
IOSL DFWY
>> LR("%" H+1
>> LRA QUE+1*, QUE+4*, F*, B
>> LRABO ABO+1*, B+1, H
>> LRC F*
>> LRD D*
>> LRDFN QUE+4*, W+1
>> LRDPF QUE+4*
>> LRE D*, FW+1*, Y+1, H2
>> LRF D*, W+1*
>> LRI QUE+1*, F*, W+1*, YY+1, BB+1, TS
>> LRLDT QUE*, QUE+1
>> LRLST H+1
>> LRM LRBLJC+4*, B+1
>> LRM(1 LRBLJC+4*, H
>> LRP QUE+4*, WH1
>> LRQ H*
>> LRQ(1 H
>> LRS QUE*, DY
>> LRSDT QUE*, QUE+1
>> LRSTR H+1
>> LRW ASK+1*, QUEQUE+2, YY+1, B+1, H+1
>> LRX Y*, Y+1
>> LRY B+1*, A
>> POP ASK+1
>> SSN QUE+4*, WH1
U LRBLJC+4, ABOASKQUEQUE+4
>> X ABO*, ABO+1, ASK*, ASK+1, QUE+3*, D*, F*, Y*, Y+1, B+1*
, T*, S, A*, H*
>> X1 F*, Y*
>> X2 F*, Y*
>> Y LRBLJC+4, ASK+1, QUE+3*, H
>> Z S*
>> ZTRTN ASK+1*
>> ZTSK ASK+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All