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

Package: Lab Service

Routine: LRBLDCR


Information

LRBLDCR ;AVAMC/REG - COMPONENT PREPARATION REPORT ;2/18/93 08:44 ;

Source Information

Source file <LRBLDCR.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 3 (B,D,F,L,M,S,V)^LRU  H^LRUT  (BEG,END)^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: 1

Package Total Caller Graph
Lab Service 1 LRBLDCR  

Entry Points

Name Comments DBIA/ICR reference
QUE
A
W
SET
C
H
H1
H2
H3
H4
END

External References

Name Field # of Occurrence
B^LRU LRBLDCR+4
D^LRU QUE+2
F^LRU H2+1
L^LRU QUE
M^LRU H2
S^LRU QUE
V^LRU END
H^LRUT SET+1, SET+2, C
BEG^LRUTL LRBLDCR+5
END^LRUTL QUE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?20,"Blood donor component preparation report"
  • Line Location: LRBLDCR+3
Function Call: WRITE
  • Prompt: !!,"DONATION DATE: ",Y
  • Line Location: QUE+2
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !,$S(X]"":X,1:"?")," DONATION TYPE",?40,"COUNT:",$J(LRT(A),5)
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !,$S($D(^LAB(66,A,0)):$P(^(0),"^"),1:"??"),?40,"COUNT:",$J(LRC(A),5)
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt: LRT(M)=0
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !?22,"Anti",?29,"Coll",?34,"Proc",?39,"Coll",?66,"Vol",?71,"Storage"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"Unit ID",?13,"Type",?18,"Bag",?22,"Coag",?30,"Min",?35,"Min",?39,"Disp",?44,"Tech",?49,"Blood component",?66,"(ml)",?71,"Minutes",!,LR("%")
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !!,"DONATION DATE: ",LRD
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,"LABORATORY SERVICE",!?9,"BLOOD COMPONENT PREPARATION FROM ",LRSTR," TO ",LRLST
  • Line Location: H2+1
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H3+0
Function Call: WRITE
  • Prompt: !,B,?15,M,?19,$P(E,"^",2),?22,$P(E,"^",3),?29,$J($P(E,"^",4),4),?34,$J($P(E,"^",5),4),?39,$P(E,"^",6),?44,$P(E,"^",7)
  • Line Location: H4+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(65.54 QUE
^LAB(66 - [#66] QUE+4, C
^LRE - [#65.5] QUE+1, SET+4
^LRE("AD" QUE+1
^TMP($J QUE!, QUE+2, AW+1, SET+3*, SET+4*
^VA(200 - [#200] SET

Label References

Name Line Occurrences
A QUE+2
C SET+4
END LRBLDCR+3, LRBLDCR+4, LRBLDCR+5, QUE+5
H QUEQUE+2, H1
H1 AH4
H2 HH3
H3 QUE+3, QUE+4
H4 W+1
SET QUE+1
W A

Naked Globals

Name Field # of Occurrence
^( AW+1, SET+4
^(0 QUE+1, QUE+4, SETC
^(2 QUE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %H SET+1, SET+2, C
>> A QUE+1*, QUE+2*, QUE+3*, QUE+4*, AW+1, SET+3, SET+4
>> B QUE+1*, QUE+2*, QUE+3*, A*, WW+1, SET+4, H4
>> C QUE+1*, A*, SET+4
>> E QUE+1*, A*, WSETSET+3, SET+4, H4
>> F QUE+1*, W+1*, SETSET+1, SET+2, SET+3
>> G W+1*, SET*, SET+3
>> H W+1*, SET*, SET+3
>> I SET*, SET+3
IO QUE
IOSL QUE+2, QUE+3, QUE+4, AW+1
IOST H2
>> J SET+1*, SET+3
>> J(0 SET+1*, SET+2, C
>> J(3 SET+1*, SET+2, C
>> K SET+2*, SET+3
>> L SET+4*, C
>> L(1 SET+4, C*
>> L(2 SET+4, C*
>> L(3 SET+4, C*
>> LR("%" QUE+3, QUE+4, H+2, H3
>> LR("F" QUE*, H2
>> LR("Q" QUE+2, QUE+3, QUE+4, AW+1, HH1H2
>> LRA QUE*, SET
>> LRB QUE*, QUE+3
>> LRC( QUE+4, W+1*
>> LRD QUE*, QUE+2*, SETH1
>> LRLDT LRBLDCR+4*, QUE+1
>> LRLST H2+1
>> LRSDT LRBLDCR+4*, QUE+1
>> LRSTR H2+1
>> LRT( QUE+3, W*
>> M A*, WH4
>> POP LRBLDCR+5
U QUE
>> X QUE+3*, SET+1*, SET+2*, SET+4*, C*
>> Y LRBLDCR+4, QUE+2*, SET+1*, SET+2*, C*
>> Z SET+1*, SET+2*, C*
>> Z(3 SET+1, SET+2, C
>> ZTRTN LRBLDCR+5*
>> ZTSK LRBLDCR+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All