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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRUMI

Package: Lab Service

Routine: LRUMI


Information

LRUMI ; IHS/DIR/FJE - MICRO RREJCTED SPECIMEN REPORT 10/6/93 11:52 ;

Source Information

Source file <LRUMI.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 2 (B,DT,F,L,M,V)^LRU  (,BEG,END)^LRUTL  
VA Fileman 1 ^DIC  

Entry Points

Name Comments DBIA/ICR reference
A ;S LRZ=^TMP($J,"A",LRC),LRDFN=+LRZ,LRI=$P(LRZ,"^",2),X=^LR(LRDFN,0),Y=$P(X,"^",3),X=^DIC($P(X,"^",2),0,"GL"),LRY=@(X_Y_",0)") D W
SET
END
H2
H
H1
L
O
S
QUE
T
W ;S Z=$S('LRG:$P(LRZ,"^",4),1:$P(LRZ,"^",3)),Y=$P(LRZ,"^",5) D DT^LRU W !,LRC,?15,$E(Z,1,12),?28,Y,?43,$P(LRY,"^"),?74,$E($P(LRY,"^",9),6,10) Q

External References

Name Field # of Occurrence
^DIC LRUMI+4
B^LRU LRUMI+5
DT^LRU W+1
F^LRU H+2
L^LRU QUE
M^LRU H
V^LRU END
^LRUTL LRUMI+4
BEG^LRUTL LRUMI+6
END^LRUTL QUE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Location: ",LRA,!,"---------"
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !!,"Specimen: ",LRA,!,"---------"
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt:
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !,^TMP($J,"A",LRC,LRF)
  • Line Location: A+2
Function Call: WRITE
  • Prompt: D
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,LRC,?15,$E(Z,1,12),?28,Y,?43,$P(LRY,"^"),?74,$E($P(LRY,"^",9),6,10)
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,LRC,?15,$E(Z,1,12),?28,Y,?43,$P(LRY,"^"),?74,HRCN
  • Line Location: W+1
Function Call: WRITE
  • Prompt: !!,"Location: ",LRA,!,"---------"
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !!,"Specimen: ",LRA,!,"---------"
  • Line Location: H2+0
Routine Call
  • DIC
  • Line Location:
    • LRUMI+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] A+1
^DD("SITE" QUE
^DIC - [#1] A+1
^LAB(61 - [#61] SET
^LR - [#63] S, S+1, S+2, S+3, A+1
^LRO(68 - [#68] QUE+2, O
^TMP($J QUE+3, QUE+4, L, T, SET+1*, A+1, A+2

Label References

Name Line Occurrences
A L, T
END LRUMI+4, LRUMI+5, LRUMI+6, QUE+5
H QUE, QUE+3, QUE+4, A+2, H1, H2
H1 L
H2 T
L QUE+3
O QUE+2
S O
SET S, S+1, S+2, S+3
T QUE+4
W A+1

Naked Globals

Name Field # of Occurrence
^( S+2, S+3, SET+1*
^(0 S, S+1, SET, A+1
^(1 S
^(3 O
^(99 S+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A SET*, SET+1
>> B QUE+2*, O
DIC LRUMI+4*!
DIC(0 LRUMI+4*
DUZ(2 A+1
>> HRCN A+1*, W+1
>> I QUE+2*, O
IO QUE
IOSL QUE+3, QUE+4, L, T, A+2
IOST H
>> L SET*, SET+1
>> LR S+2*, S+3*
>> LR("%" H+2
>> LR("F" QUE*, H
>> LR("Q" QUE*, QUE+2, QUE+3, QUE+4, L, T, A+2, H, H1, H2
>> LRA QUE+3*, QUE+4*, L, T, H1, H2
>> LRAA QUE+2, O
>> LRAC S*, S+1*, S+2*, S+3*, SET, SET+1
>> LRAN O*
>> LRB QUE+1*, QUE+2*, QUE+3*, QUE+4*
>> LRC L*, T*, S*, S+1*, S+2*, S+3*, SET+1, A+1, A+2, W+1
>> LRD L*, T*
>> LRDFN O*, S, S+1, S+2, S+3, SET+1, A+1*
>> LRE QUE+1*, QUE+2
>> LRF A+2*
>> LRG QUE*, QUE+4*, W+1, H+2
>> LRI O*, S, S+1, S+2, S+3, SET+1, A+1*
>> LRLDT QUE+1*, QUE+2
>> LRLST H+2
>> LRN S*, S+1*, S+2*, S+3*, SET+1
>> LRQ QUE*
>> LRQ(1 QUE*
>> LRSA QUE+2*
>> LRSDT QUE+1, QUE+2
>> LRSTR H+2
>> LRY A+1*, W+1
>> LRZ A+1*, W+1
>> POP LRUMI+6
>> S SET*, SET+1
U LRUMI+4
>> X LRUMI+4*, S+1, A+1*
>> Y LRUMI+4, LRUMI+5, A+1*, W+1*
>> Z W+1*
>> ZTRTN LRUMI+6*
>> ZTSK LRUMI+6
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All