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

Package: Lab Service

Routine: LRBLPX1


Information

LRBLPX1 ;AVAMC/REG - XMATCH RESULTS (COND'T) ; 08/17/01 3:30 PM ;

Source Information

Source file <LRBLPX1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Lab Service 1 (DT,L)^LRU  
VA FileMan 1 EN^DDIOL  

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 LRBLPX  

Entry Points

Name Comments DBIA/ICR reference
EN ;from LRBLPX
C
STF
A
CK

External References

Name Field # of Occurrence
EN^DDIOL EN+43
DT^LRU EN+4, EN+51
L^LRU EN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$J(LRV,2),")",?6,$P(X,"^"),?20,$E($P(LRE,"^"),1,23),?45,$J(A,2),?48,H,?52
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: Y,?68,$E(L,1,12)
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: $C(7),!,"ABO not rechecked"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: $C(7),!,"ABO recheck (group ",X,") does not match ABO group of unit. Resolve discrepancy."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: $C(7),!,"Rh NEG unit not rechecked"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: $C(7),!,"Rh recheck (type ",X,") does not match Rh type of unit. Resolve discrepancy."
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: $C(7),!?4,"No patient ABO &/or Rh results"
  • Line Location: EN+49
Function Call: WRITE
  • Prompt: !?4,"No antibody screen results"
  • Line Location: EN+50
Function Call: WRITE
  • Prompt: ?31,"(spec date:",Y," acc#:",$P($P(LRJ,"^",5)," ",3),")"
  • Line Location: EN+51
Function Call: WRITE
  • Prompt: !,$P(^LAB(61.3,Z,0),"^"),$E("..............",$X,14),?15,"RBC ANTIGEN"
  • Line Location: C+0
Function Call: WRITE
  • Prompt: $C(7),!,"Above antigen(s) not entered in RBC ANTIGEN ABSENT field"
  • Line Location: C+1
Function Call: WRITE
  • Prompt: $C(7),!,"Must have test in LAB TEST file (#60) called 'WKLD CROSSMATCH' with WKLD CODES."
  • Line Location: CK+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] CK
^LAB(61.3 - [#61.3] C
^LAB(66 - [#66] EN+3
^LR - [#63] LRBLPX1+3!, EN+17, EN+19, EN+23, EN+25, EN+27, EN+31, EN+37, EN+44, EN+48
^LRD(65 - [#65] LRBLPX1+3, EN+3, EN+5, EN+7, C
^LRO(68 - [#68] STFSTF+1, STF+2, STF+3*, A*
^TMP($J LRBLPX1+3!, EN+48*

Label References

Name Line Occurrences
A STF+2

Naked Globals

Name Field # of Occurrence
^(0 LRBLPX1+3*, STF+1*, STF+2*, A*
^(1 STF+1*
^(10 EN+5, EN+19
^(11 EN+7, EN+27
^(3 EN+3
^(6 EN+44

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A EN+3*, EN+4, EN+6, STF+2*, A
>> B LRBLPX1+3, CK*
DUZ STF+1, STF+2, A
DUZ(2 A
>> E LRBLPX1+3
>> F(1 EN+1!, EN+49*
>> F(2 EN+1!, EN+6*, EN+8*, EN+23*, EN+31*, EN+35
>> F(6 EN+50*
>> H EN+3*, EN+4, EN+7, EN+8
>> L EN+3*, EN+4*
>> LR("%" EN+2
>> LRAA STFSTF+1, STF+2, STF+3, A
LRACN EN+36~, EN+37*, EN+38
>> LRAD STFSTF+1, STF+2, STF+3, A
>> LRAN STFSTF+1, STF+2, STF+3, A
>> LRB C
>> LRDFN LRBLPX1+3, EN+17, EN+19, EN+23, EN+25, EN+27, EN+31, EN+37, EN+44, EN+48
>> LRE EN+3*, EN+4, C
LRERRMSG EN+36~, EN+43
LRERRMSG(1 EN+38*, EN+39*
LRERRMSG(2 EN+40*, EN+41*
LRERRMSG(3 EN+42*
>> LRI LRBLPX1+3*, EN+3, EN+5, EN+7, C
>> LRJ LRBLPX1+3, EN+12, EN+48*, EN+49, EN+50, EN+51
>> LRK STF+1, STF+2, STF+3, A
>> LRPABO EN+23
>> LRPRH EN+31
>> LRSS EN+17, EN+19, EN+23, EN+25, EN+27, EN+31, EN+37, EN+44, EN+48
LRT STF+1, STF+2, STF+3, A, CK*, CK+1, CK+2!
LRT( STF+2, CK*
>> LRV LRBLPX1+3*, LRBLPX1+4, EN+4, EN+48
>> R C
>> R( C
U STF+2
X LRBLPX1+3*, EN+3*, EN+4, EN+5*, EN+6, EN+7*, EN+8, EN+12*, EN+17, EN+19
EN+23, EN+25, EN+27, EN+31, EN+37, EN+44, EN+48*!, EN+49*, EN+50*, EN+51
STF+1*, STF+2*, A*
X(1 LRBLPX1+3*
X(10 EN+14*, EN+19*, EN+22, EN+48
X(11 EN+14*, EN+27*, EN+30, EN+48
X(6 EN+44*, EN+48
>> Y EN+4*, EN+51*, STF+2*
>> Z C*, STF+2*
>> Z(1 C*, C+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All