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

Package: Lab Service

Routine: LRBLJA


Information

LRBLJA ; IHS/DIR/AAB - BB INVENTORY DATA ENTRY 10/24/96 19:20 ; [ 05/28/98 2:25 PM ]

Source Information

Source file <LRBLJA.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Lab Service 5 (,P)^LRBLJA1  (CK,FRE,L,V,YN)^LRU  EN^LRUD  ^LRUTL  X^LRUWK  
VA Fileman 3 ^%DT  ^DIC  ^DIE  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Lab Service 3 LRBLILS  LRBLIUP  LRBLJTR  

Entry Points

Name Comments DBIA/ICR reference
A
CK
SET
END
AD
F
K
ST
S
B
T ;transfer unit to another division
CLNP
CMV
Z

External References

Name Field # of Occurrence
^%DT AD+1
^DIC SET, S
^DIE S+2, B, T+1
^LRBLJA1 B
P^LRBLJA1 B
CK^LRU S+2, B, T+1
FRE^LRU S+2, B, T+1
L^LRU B
V^LRU END
YN^LRU A+1
EN^LRUD CLNP, K+4
^LRUTL Z
X^LRUWK A+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+0
Function Call: WRITE
  • Prompt: !
  • Line Location: S+0
Function Call: WRITE
  • Prompt: !," 'TYPING CHARGE' entry not in BLOOD PRODUCT File",!!,"Inform Blood Bank Supervisor",!
  • Line Location: S+0
Function Call: WRITE
  • Prompt: !
  • Line Location: B+0
Function Call: WRITE
  • Prompt: $C(7),!!,$P(^LAB(61.3,M,0),U)," entered for ",$P(^LRE(LRD,0),U),!,"in donor file as ",$P(^DD(+$P(^LRE(LRD,LRO,0),U,2),.01,0),U),!,"Recheck donor and inventory phenotyping.",!!
  • Line Location: CK+1
Function Call: WRITE
  • Prompt: $C(7),!,"I can't ADD the Antigen typings to the Donor File. Someone else is editing this record.",!!,"Use the Donor-Donor phenotyping option to enter typing results to the appropriate donor",!!
  • Line Location: CK+3
Function Call: WRITE
  • Prompt: $C(7),!,"I can't DELETE the Antigen Typing FOR the Donor. Someone else is editing the record",!!,"Use the Donor-Donor phenotyping option to update the donor's phenotype",!
  • Line Location: K+1
Function Call: WRITE
  • Prompt: $C(7),!!,"Inventory unit:",$P(^LRD(65,LR,0),"^"),?38,"CMV ANTIBODY ",$S(M:"PRESENT",1:"ABSENT"),!,"Donor ",$P(^LRE(LRD,0),"^"),?38,"CMV ANTIBODY ",$S(M(1):"PRESENT",1:"ABSENT")
  • Line Location: CMV+2
Function Call: WRITE
  • Prompt: !!,"Recheck donor and inventory unit CMV ANTIBODY testing."
  • Line Location: CMV+3
Routine Call
  • DIE
  • Line Location:
    • S+2
    • B
    • T+1
Routine Call
  • DIC
  • Line Location:
    • SET
    • S

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( CK+1
^DIC(4 - [#4] AD
^LAB(61.3 - [#61.3] CK+1
^LAB(66 - [#66] S+1
^LRD(65 - [#65] B, F+3, CLNP, CMV*, CMV+2, T+1, AD+2
^LRE - [#65.5] CK, CK+1, CK+2, CK+3, CK+4, CK+5*, K, K+1, K+2!, K+3
, CMV+1, CMV+2
^LRE("C" B
^VA(200 - [#200] AD

Label References

Name Line Occurrences
AD T+1
B B, F+4
CK F+3
CLNP F
CMV F+4
END S+2, A, A+1, B, T+1
K CLNP
S S+2
SET S+2, B, T+1
ST F, F+3
T T+1
Z SET, A

Naked Globals

Name Field # of Occurrence
^( AD+2*
^(0 S+1, B, CK+2*, CK+4*, K+3*, CMV+1*, AD+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % A+1*
%DT AD+1*!
A F+4!, AD+1*, AD+2
B F+4!
C F+4!
DA SET!*, K+4*, T+1, AD+2
DA(1 K+4*
DIC SET*!, S*, S+2!, T+1!
DIC("S" SET*
DIC(0 SET*, S*
DIE SET*, S+2!, T+1!
DR SET!, S+2*!, B*, T+1*!
DUZ AD
LR B*, F+3, F+4!, CLNP, CMV, CMV+2
LR("CK" SET!, S+2, B, T+1
LR("M" Z*
LR("SLAM" B*, F, F+1, CLNP, CK, CK+3*, K+1*
>> LRAA SET
>> LRAA(4 Z
>> LRB B*, CMV
>> LRC K+4*
>> LRC(1 K+4*
>> LRCAPA A+1
LRD B*, F+4!, CK, CK+1, CK+2, CK+3, CK+4, CK+5, K, K+1
, K+2, K+3, K+4, CMV+1, CMV+2
>> LRF A*, A+1*, B
>> LRN T+1*, AD*, AD+2
>> LRO CK+1, ST*, T+1*, AD*, AD+2
LRS F+4!, CK, CK+2, CK+3, CK+4, CK+5, K, K+1, K+2, K+3
, ST*
LRW F*, F+2*, F+3, F+4!, CLNP, ST, AD*, AD+2
LRW( F, CLNP
M F*, F+3*, F+4!, CLNP, CK, CK+1, CK+4, CK+5, K, K+2
, K+4, CMV*, CMV+1, CMV+2
M(1 CMV+1*, CMV+2
M(2 CMV*
O F+4!, CLNP*, K+4*
U CK+1, T+1, AD
>> V CK+4*, K+3*
>> V(1 K+3*
>> W S+1*, S+2
>> X S*, A+1*, CLNP*, K+4*, Z*, AD+1*, AD+2*
>> X("NOCODES" A+1*
>> Y SET, S, S+1, S+2, A, B, Z, T+1, AD+2
>> Z CLNP*, K+3*, K+4*
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