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

Package: Lab Service

Routine: LRBLPAB


Information

LRBLPAB ;AVAMC/REG - ANTIBODIES IDENTIFIED ;2/18/93 09:37 ;

Source Information

Source file <LRBLPAB.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 3 $$LRDFN^LR7OR1  (D,L,S,V)^LRU  (BEG,END)^LRUTL  
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 LRBLPAB  

Entry Points

Name Comments DBIA/ICR reference
QUE
W
H
H1
END

External References

Name Field # of Occurrence
^%DT H+1
$$LRDFN^LR7OR1 QUE+5
D^LRU H+1
L^LRU QUE+1
S^LRU QUE+1
V^LRU END
BEG^LRUTL LRBLPAB+5
END^LRUTL QUE+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,"PATIENT ANTIBODIES IDENTIFIED"
  • Line Location: LRBLPAB+3
Function Call: WRITE
  • Prompt: $C(7),!,"You do not have the proper access to proceed."
  • Line Location: LRBLPAB+4
Function Call: WRITE
  • Prompt: !,"Patients in lab data file: ",$J(LRC,6),!,"Patients with antibodies: ",$J(LRW,6)
  • Line Location: QUE+7
Function Call: WRITE
  • Prompt: !,$P(^LAB(61.3,LRA,0),"^")," = ",LRA(1)
  • Line Location: QUE+11
Function Call: WRITE
  • Prompt: !!,LRP,?35,"ID:",SSN
  • Line Location: W+2
Function Call: WRITE
  • Prompt: !?3,$P(^LAB(61.3,LRA,0),"^")
  • Line Location: W+7
Function Call: WRITE
  • Prompt: @IOF,Y," BLOOD BANK ",LRQ(1),?(IOM-10),"Pg: ",LRQ,!,LR("%")
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LRP,?35,"ID:",SSN,?50,"(continued from pg:",LRQ-1,")"
  • Line Location: H1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] W
^DPT("B" QUE+3, QUE+4
^LAB(61.3 - [#61.3] QUE+11, W+7
^LR - [#63] QUE+6, W, W+3
^TMP($J QUE!, QUE+8, QUE+9, W+4, W+5*

Label References

Name Line Occurrences
END LRBLPAB+4, LRBLPAB+5, QUE+12
H QUE+2, QUE+7, QUE+10, W+1, H1
H1 W+6
W QUE+6

Naked Globals

Name Field # of Occurrence
^( W+4*, W+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT H*
DUZ(0 LRBLPAB+4
IO QUE
IOF H+2
IOM H+2
IOSL QUE+7, QUE+10, W+1, W+6
>> LR("%" H+2
>> LRA QUE+8*, QUE+9, QUE+11, W+3*, W+4, W+5, W+7
>> LRA(1 QUE+9*, QUE+11
>> LRC QUE+2*, QUE+6*, QUE+7
>> LRD QUE+3*
>> LRDFN QUE+5*, QUE+6, W, W+3
>> LRDPF W*
>> LRP W*, W+2, H1+1
>> LRQ H*, H+2, H1+1
>> LRQ(1 H+2
>> LRW QUE+2*, QUE+7, W*
>> LRX QUE+3*, QUE+4
>> LRY QUE+4*, QUE+5
>> POP LRBLPAB+5
>> SSN W*, W+2, H1+1
>> X W*, H*
>> Y W*, H+2
>> ZTRTN LRBLPAB+5*
>> ZTSK LRBLPAB+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All