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

Package: Lab Service

Routine: LRUMDM


Information

LRUMDM ;AVAMC/REG/CYM - MD SELECTED LAB RESULTS ;2/19/98 15:01 ;

Source Information

Source file <LRUMDM.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 4 (D,F,L,L1,M,S,SSN,V,YN)^LRU  (EN,EN1)^LRUMDP  (BEG,END)^LRUTL  $$Y2K^LRX  

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 LRUMD  

Entry Points

Name Comments DBIA/ICR reference
QUE
END
I
T
O
L
W
M
C
C1
H
H1
A

External References

Name Field # of Occurrence
D^LRU L
F^LRU H+1
L^LRU QUE+1
L1^LRU QUE+1
M^LRU H
S^LRU QUE+1
SSN^LRU I+1
V^LRU END
YN^LRU LRUMDM+2
EN^LRUMDP QUE+2
EN1^LRUMDP QUE+2
BEG^LRUTL LRUMDM+3
END^LRUTL END
$$Y2K^LRX W+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"New page for each patient "
  • Line Location: LRUMDM+2
Function Call: WRITE
  • Prompt: !,"SSN:",SSN,?19,"LOC:",LRL,?44,"Patient: ",LRP
  • Line Location: I+2
Function Call: WRITE
  • Prompt: !,LR("%1")
  • Line Location: I+3
Function Call: WRITE
  • Prompt: !?13,O," ",$P(B(1),"^",2)
  • Line Location: O+1
Function Call: WRITE
  • Prompt: !?9,X
  • Line Location: O+2
Function Call: WRITE
  • Prompt: !,$S(LRF=1:"BACT",LRF=5:"PARASITE",LRF=8:"MYCOLOGY",LRF=11:"TB",LRF=16:"VIROLOGY",1:""),?9,"RPT DATE:",Y,?44,$P($P(LRS,Z,2),";")
  • Line Location: L+0
Function Call: WRITE
  • Prompt: !,LRDATE,?17,$E($P($G(^LAB(61,T,0)),"^"),1,28),?44,LRC,?62,LRN
  • Line Location: W+5
Function Call: WRITE
  • Prompt: !?3,X
  • Condition for execution: X]""
  • Line Location: W+5
Function Call: WRITE
  • Prompt: !
  • Line Location: W+6
Function Call: WRITE
  • Prompt: ?3,"Tests:"
  • Condition for execution: LRB(3)=1
  • Line Location: W+6
Function Call: WRITE
  • Prompt: ?10,$S($D(^LAB(60,LRB(2),0)):$P(^(0),"^"),1:"")
  • Line Location: W+6
Function Call: WRITE
  • Prompt: !?15,$P($P(LRM,Z,2),";")," ",$P(X,U,4)
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !?15,$P(B(1),"^",11)
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !?15,LRZ
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: W
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,"SSN:",SSN,?19,"LOC:",LRL,?44,"Patient: ",LRP
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,"Date",?13,"Site/specimen",?44,"Collection sample",?62,"Accession number"
  • Line Location: A+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(63.05 QUE
^DIC - [#1] I+1
^LAB(60 - [#60] W+6
^LAB(61 - [#61] W+5
^LAB(61.2 - [#61.2] O+1
^LAB(62 - [#62] W+3
^LR - [#63] I+1, T, O+1, O+2, L, W+1, W+5, C+1, C1
^LRO(68 - [#68] QUE, W+2, W+6
^LRO(69.2 - [#69.2] QUE+3, I
^TMP($J QUE!, QUE+2
^VA(200 - [#200] H+1

Label References

Name Line Occurrences
A W+4
C O+1
C1 C+1
END LRUMDM+2, LRUMDM+3, QUE+1, QUE+3
H QUE+1, I+2, H1
H1 O, O+1, O+2, W+5, W+6, C+1, C1
I QUE+1, QUE+2, QUE+3
L O
M L
O T
T I+2
W T

Naked Globals

Name Field # of Occurrence
^( I+1, O+1, O+2, L, C+1, C1
^(0 W+3, W+6
^(1 I
^(99 W+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LRUMDM+2*
>> B O+1*, O+2*, C+1, C1
>> B(1 O+1*, C
DUZ QUE+3, I, H+1
>> E T*
IO QUE
IOF END
IOSL I+2, O, O+1, O+2, W+5, W+6, C+1, C1
IOST END, H, H+1
>> LR("%" O+3, H+1
>> LR("%1" I+3
>> LR("F" QUE+1*, H
>> LR("Q" QUE+2, QUE+3, I+2, I+3, T, O, O+1, O+2, W, W+4
, W+5, W+6, C+1, C1, H, H1
>> LRA I, H+1
>> LRAA QUE+3, I
>> LRB W+4*, W+6
>> LRB(1 W+4*, W+6
>> LRB(2 W+6*
>> LRB(3 W+6*
>> LRC W+1*, W+3*, W+5
>> LRDATE W+3*, W+5
>> LRDFN QUE+2*, QUE+3*, I, I+1, T, O+1, O+2, L, W+1, W+5
, C+1, C1
>> LRDFN(1 QUE+1
>> LRDPF I+1*
>> LRE QUE+2, QUE+3, H+1
>> LRE(1 H+1
>> LRF O*, O+1*, O+2*, L, C, C+1, C1
>> LRG QUE+2, QUE+3
>> LRI T*, O+1, O+2, L, W+1, W+5, C+1, C1
>> LRJ QUE*, W+1*, W+2*, W+6
>> LRK LRUMDM+2*, QUE+1, I+2
>> LRL I+1*, I+2, H1
>> LRLDT T
>> LRM QUE*, M
>> LRN W+1*, W+4, W+5
>> LRP I+1*, I+2, H1
>> LRS QUE*, L
>> LRSDT T
>> LRZ C+1*, C1*
>> O O+1*
>> P QUE+1*, QUE+2*, QUE+3*
>> POP LRUMDM+3
>> R QUE+2*, QUE+3*
>> SSN I+1*, I+2, H1
>> T W+1*, W+5
U QUE, M
>> V I+1*, C1*
>> W(1 T*, O+3, W+1*, W+4, H1
>> X I+1*, O+2*, L*, W+1*, W+4, W+5*, M
>> Y I+1*, L*, W+1*, W+3
>> Z L*, M*, C+1*, C1
>> ZTRTN LRUMDM+3*
>> ZTSK LRUMDM+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All