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 - MD SELECTED LAB RESULTS ;3/10/94 09:16 ; [ 04/14/2003 2:15 PM ]

Source Information

Source file <LRUMDP.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 3 (F,L,L1,M,S,SSN,V,YN)^LRU  EN^LRUMD1  (BEG,END)^LRUTL  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRUMD  LRUMDM  

Entry Points

Name Comments DBIA/ICR reference
A
H1 ;D H Q:LR("Q") W !,SSN,?19,"LOC:",LRL,?44,"Patient: ",LRP Q:W(1)=1
END
I
H
J ;
L
EN1
EN
QUE
T
W
OUT

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+4
V^LRU END
YN^LRU LRUMDP+3
EN^LRUMD1 QUE+1
BEG^LRUTL LRUMDP+4
END^LRUTL OUT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"New page for each patient "
  • Line Location: LRUMDP+3
Function Call: WRITE
  • Prompt: !,LR("%1")
  • Line Location: J+8
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: !,HRCN,?19,"LOC:",LRL,?44,"Patient: ",LRP
  • Line Location: H1+2
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+4
^DPT - [#2] EN, EN1
^DPT("CN" EN
^LAB(61 - [#61] QUE, W+2
^LR - [#63] J+1, J+4, T, W+1, W+3
^LRO(69.2 - [#69.2] QUE+3, I
^SC - [#44] EN1
^TMP($J QUE!, J+6, 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+3, LRUMDP+4, OUT
H QUE+1, J+6, H1+2
H1 W
I QUE+1, QUE+3
J L
L QUE+2
OUT QUE+1, QUE+2
T J+6
W T

Naked Globals

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