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

Package: Lab Service

Routine: LRUMD


Information

LRUMD ;AVAMC/REG/CYM - MD SELECTED LAB RESULTS ;2/19/98 09:13 ;

Source Information

Source file <LRUMD.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Lab Service 8 (B,F,L,L1,M,S,SSN,V,YN)^LRU  (,EN)^LRUMD1  (D,LR)^LRUMD2  ^LRUMDM  (,EN,EN1)^LRUMDP  (,EN)^LRUMDS  (,BEG,END)^LRUTL  $$Y2K^LRX  
VA FileMan 2 ^%DT  ^DIE  

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

Package Total Caller Graph
Lab Service 4 LRUMD  LRUMDD  LRUMDF  LRUMDU  

Entry Points

Name Comments DBIA/ICR reference
MI
A
DT
QUE
P
I
W
H
H1
L ;from LRUMDU
EN
END
EN2
GRP() ; function to determine if patient is in selected patient group list when printing by test list
; returns 1 if patient is ok to print, 0 if patient is not in selected patient group list

External References

Name Field # of Occurrence
^%DT EN2+1
^DIE EN
B^LRU DT
F^LRU H+1
L^LRU QUE+1
L1^LRU QUE+1
M^LRU H
S^LRU QUE+1
SSN^LRU W+2
V^LRU END, EN2+5
YN^LRU LRUMD+3, MI, EN2+2
^LRUMD1 LRUMD+4
EN^LRUMD1 QUE+1
D^LRUMD2 LRUMD+4
LR^LRUMD2 LRUMD+2
^LRUMDM DT
^LRUMDP DT+1
EN^LRUMDP P+1
EN1^LRUMDP P+1
^LRUMDS LRUMD+3
EN^LRUMDS A+1
^LRUTL L+1
BEG^LRUTL DT+1
END^LRUTL QUE+2
$$Y2K^LRX W+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?11,"Print/display microbiology results (excluding antibiotics)",!?26,"instead of defined lab tests"
  • Line Location: MI+0
Function Call: READ
  • Prompt: "Enter T or P: "
  • Variable: Z
  • Timeout: DTIME
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !!,"Print by (T)est list (P)atient list",!
  • Line Location: A+0
Function Call: WRITE
  • Prompt: $C(7)," Enter 'T' for Test List or 'P' for Patient list"
  • Line Location: A+0
Function Call: WRITE
  • Prompt: Q
  • Line Location: I+0
Function Call: WRITE
  • Prompt: ?(16+(X*8)),$J($P(Y,"^"),6),$P(Y,"^",2)
  • Line Location: W+4
Function Call: WRITE
  • Prompt: ?(16+(X*8)),$J(^TMP($J,"N",LR,X),7)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LR("%1")
  • Line Location: H+3
Function Call: WRITE
  • Prompt: W
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !,SSN,?18,$E(LRL,1,5),?39,LRP
  • Line Location: H1+0
Function Call: READ
  • Formatting: !?10
  • Prompt: "if they haven't used the lists since: T-6 MONTHS// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN2+0
Function Call: WRITE
  • Prompt: !?10,"Enter a date in the past",!
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: EN2+3
Function Call: WRITE
  • Prompt: !!,"DONE"
  • Line Location: EN2+4
Function Call: WRITE
  • Prompt: !!?10,$C(7),"DONE"
  • Line Location: EN2+5
Routine Call
  • DIE
  • Line Location:
    • EN

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] W+2
^LAB(61 - [#61] QUE, W+3
^LR - [#63] I, W+1, W+2, W+4
^LRO(69.2 - [#69.2] LRUMD+4, P+2, EN2+3!, EN2+4, GRP+5
^TMP($J QUE!, QUE+1, P+1, I, W+4, H+2
^VA(200 - [#200] H+1

Label References

Name Line Occurrences
$$GRP P+2
A A
DT MI
EN2 EN2+1
END LRUMD+2, LRUMD+3, LRUMD+4, MI, A+1, DT, DT+1, QUE+2, L+1, EN
H W, H1
H1 W+3
I P, P+1, P+2
L LRUMD+2, EN, EN2
MI LRUMD+3
P QUE+1
W I

Naked Globals

Name Field # of Occurrence
^( I, W+2, W+4, EN2+3
^(0 EN2+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LRUMD+3*, MI*, A+1, EN2+2*
%DT EN2+1*!
%DT(0 EN2+1*
>> A EN2+3*
>> A(1 EN2+3*
>> B I*
>> DA EN*
>> DIE EN*
>> DR EN*
DTIME A, EN2
DUZ LRUMD+4, P+2, H+1, GRP+5
>> E I*
>> F QUE+1*
IO QUE
IOF QUE+2
IOSL W+3
IOST QUE+2, H, H+1
>> LR QUE+1*, I, W+4, H+2
>> LR("%" I+1
>> LR("%1" H+3
>> LR("F" W*, H
>> LR("Q" QUE+1, P+1, P+2, I, I+1, W, W+3, H, H1
>> LRA LRUMD+2*, GRP+4, GRP+6
>> LRAA LRUMD+4, P+2, EN, EN2+3, EN2+4, GRP+5
>> LRDATE W+1*, W+3
>> LRDFN P+1*, P+2*, I, W+1, W+2, W+4, GRP+5
>> LRDFN(1 LRUMD+2*, P
LRDPAF LRUMD+2!
>> LRDPF W+2*
>> LRE LRUMD+2*, P+1, P+2, H+1
>> LRE(1 H+1
>> LRG LRUMD+2*, P+1, P+2
>> LRI I*, W+1, W+4
>> LRL W+2*, W+3, H1
>> LRLDT DT*, I
>> LRM MI*, DT
>> LRP W+2*, W+3, H1
>> LRR P*, W*
>> LRSDT DT*, I
>> LRT I*, W+4*
>> LRV LRUMD+2*, LRUMD+4
>> P P+1*, P+2*
>> POP DT+1
>> R P+1*, P+2*
>> SSN W+2*, W+3, H1
>> T W+1*, W+3
U A, EN2
>> V W+2*
>> W(1 I*, I+1, W+1*, W+2, W+3, H1
X LRUMD+3, A*, W+1*, W+2*, W+4*, H+2*, L+1*, EN2*, EN2+3*, EN2+4*
, GRP+2~, GRP+3*, GRP+6*, GRP+7
X(1 EN2+4*
Y LRUMD+2, DT, W+2*, W+4*, EN, EN2, EN2+1, EN2+3*, GRP+2~, GRP+5*
, GRP+6
>> Z A*, DT+1
>> Z(2 QUE*, W+3
>> Z(3 QUE*, W+3
>> Z(5 QUE*, W+3
>> ZTRTN DT+1*
>> ZTSK DT+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All