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

Package: Lab Service

Routine: LRUMDP


Information

LRUMDP ;AVAMC/REG/CYM - MD SELECTED LAB RESULTS ;2/19/98 09:16 ;

Source Information

Source file <LRUMDP.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 4 (F,L,L1,M,S,SSN,V,YN)^LRU  EN^LRUMD1  (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: 2

Package Total Caller Graph
Lab Service 2 LRUMD  LRUMDM  

Entry Points

Name Comments DBIA/ICR reference
QUE
OUT
I
J ;
T
W
H
H1
A
L
EN
EN1
END

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"New page for each patient "
  • Line Location: LRUMDP+2
Function Call: WRITE
  • Prompt: !,LR("%1")
  • Line Location: J+4
Function Call: WRITE
  • Prompt: Q
  • Line Location: T+0
Function Call: WRITE
  • Prompt: ?(16+(X*8)),$J($P(Y,"^"),6),$P(Y,"^",2)
  • Line Location: W+3
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,SSN,?19,"LOC:",LRL,?44,"Patient: ",LRP
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: ?(16+(X*8)),$J(^TMP($J,"N",LR,X),7)
  • Line Location: A+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] J+2
^DPT - [#2] EN, EN1
^DPT("CN" EN
^LAB(61 - [#61] QUE, W+2
^LR - [#63] J+1, J+2, T, W+1, W+3
^LRO(69.2 - [#69.2] QUE+3, I
^SC - [#44] EN1
^TMP($J QUE!, J+3, T, W+3, A, L, EN*, EN1*
^VA(200 - [#200] H+1

Label References

Name Line Occurrences
A W+2
EN QUE+2
EN1 QUE+2
END LRUMDP+2, LRUMDP+3, OUT
H QUE+1, J+3, H1
H1 W
I QUE+1, QUE+3
J L
L QUE+2
OUT QUE+1, QUE+2
T J+3
W T

Naked Globals

Name Field # of Occurrence
^( J+2, T, W+3, EN1
^("LR" EN, EN1
^(0 J+1
^(1 I

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LRUMDP+2*
>> A EN1*
>> B T*
DUZ QUE+3, I, H+1
E END!
>> F J+3*
IO QUE
IOF OUT, END
IOSL J+3, W
IOST OUT, H, H+1, END
>> LR J+3*, T, W+3, A
>> LR("%" T+1, H+1
>> LR("%1" J+4
>> LR("F" QUE+1*, H
>> LR("Q" QUE+3, J+3, J+4, T, T+1, W, H, H1, L
>> LRA I, H+1
>> LRAA QUE+3, I
>> LRDATE W+1*, W+2
>> LRDFN QUE+3*, I, J+1, J+2, T, W+1, W+3, L*
>> LRDFN(1 QUE+1
>> LRDPF J+2*
LRE QUE+2, H+1, EN1, END!
LRE(1 H+1
LRE(2 EN1
>> LRG QUE+2, EN
>> LRI T*, W+1, W+3
>> LRK LRUMDP+2*, QUE+1, J+3
>> LRL J+2*, J+3, H1
>> LRLDT T
>> LRP J+2*, J+3, H1
>> LRSDT T
>> LRT T*, W+3*
>> P QUE+1*, QUE+3*, L*
>> POP LRUMDP+3
>> R QUE+3*, L*
>> SSN J+2*, J+3, H1
>> T W+1*, W+2
>> V J+2*
>> W(1 T*, T+1, W*, W+1*, W+2, H1
>> X J+1*, J+2*, W+1*, W+3*, A*, EN*, EN1*
>> Y J+2*, W+1*, W+3*, EN*, EN1*
>> Z EN1*
>> Z(2 QUE*, W+2
>> Z(3 QUE*, W+2
>> Z(5 QUE*, W+2
>> ZTRTN LRUMDP+3*
>> ZTSK LRUMDP+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All