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

Package: Lab Service

Routine: LRUMDU


Information

LRUMDU ; IHS/DIR/FJE - MD SELECTED TEST UTILITY 1/21/94 08:17 ;

Source Information

Source file <LRUMDU.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Lab Service 4 (F,K,L,M,RX,V,YN)^LRU  L^LRUMD  LR^LRUMD2  (BEG,END)^LRUTL  
VA Fileman 2 %XY^%RCR  ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRUMDE  

Entry Points

Name Comments DBIA/ICR reference
HDR
END
ASK
OUT
A
C
B
E
D
G
F
I
H
K
L
N
P
R
T
W
Z
F1
QUE

External References

Name Field # of Occurrence
%XY^%RCR I+1
^DIC H, I
F^LRU HDR+1
K^LRU E+1, C+1, K
L^LRU QUE
M^LRU HDR
RX^LRU C
V^LRU OUT
YN^LRU R, N
L^LRUMD LRUMDU+4
LR^LRUMD2 LRUMDU+4
BEG^LRUTL P
END^LRUTL QUE+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,"(E)nter/edit a test (D)elete a test list (R)emove all test lists",!,"(P)rint test lists",!
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !?6,"Test order#:",?21,1,?29,2,?37,3,?45,4,?53,5,?61,6,?69,7
  • Line Location: L+0
Function Call: WRITE
  • Prompt: !,"-----------------|-------|-------|-------|-------|-------|-------|-------|"
  • Line Location: Z+0
Function Call: READ
  • Prompt: "Select list number to delete: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: D+0
Function Call: WRITE
  • Prompt: $C(7),!,"Enter the test list number",!
  • Line Location: D+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: E+0
Function Call: WRITE
  • Prompt: " ",N(L,O),"// "
  • Line Location: E+0
Function Call: WRITE
  • Prompt: !?3,"SURE YOU WANT TO DELETE ? "
  • Line Location: C+0
Function Call: WRITE
  • Prompt: " <NOTHING DELETED>"
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: QUE+1
Function Call: WRITE
  • Prompt: !,"You have no test lists. Instead of creating your own",!,"would you prefer to copy another user's lists "
  • Line Location: N+0
Function Call: WRITE
  • Prompt: !
  • Line Location: H+0
Function Call: READ
  • Timeout: DTIME
  • Line Location: A+0
Function Call: WRITE
  • Prompt: G
  • Line Location: A+0
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!?3,"Enter test list number (1-99) then a ',' then test order number (1-7)",!,"[Entering 2,3 would put the test selected in test list 2 and test order 3]",!
  • Line Location: W+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: F+0
Function Call: WRITE
  • Prompt: ?10+(B*8),N(A,B),$E(" ",1,7-$L(N(A,B))),"|"
  • Line Location: F1+1
Function Call: WRITE
  • Prompt: $C(7),!,$P(Y,"^",2)," has no test lists."
  • Line Location: I+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,"Test list for ",$P(^VA(200,DUZ,0),U),!,LR("%")
  • Line Location: HDR+1
Routine Call
  • DIC
  • Line Location:
    • H
    • I

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("SITE" QUE
^LAB(60 - [#60] F1
^LRO(69.2 - [#69.2] R!, D+1!, G, G+1, G+2*, END, K!, F1, I
^VA(200 - [#200] HDR+1

Label References

Name Line Occurrences
A E, B, A
ASK ASK+1
B T
C E
D ASK+1, D
E ASK+1, E, E+1
END P, N, T
F LRUMDU+4, E+1, C+1, K
F1 QUE+1
G E+1, C+1
H E+1, C+1, T
HDR QUE, F1+1
I N, I
K C
L F1+1
LRUMDU D, D+1, END+1
N LRUMDU+5
OUT QUE+1
P ASK+1
R ASK+1
T T
W A
Z LRUMDU+5, L, E+1, C+1, K, F1+1

Naked Globals

Name Field # of Occurrence
^( F1
^(0 D+1*, G*, G+1*, G+2*, K*, F1
^(60 R*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % R*, C*, N*
>> %X I+1*
>> %Y I+1*
>> A F1*, F1+1*
>> B F1*, F1+1*
>> C LRUMDU+5, F1*, F1+1*
DIC H*!, I*!
DIC("S" H*
DIC(0 E+1*, C+1*, T*, I*
DTIME ASK, D, E, A
DUZ R, D+1, G, G+1, G+2, END, K, F1, HDR+1
IO QUE
IOF F, HDR
IOSL F1+1
IOST HDR
>> L E, G, G+1, G+2, A*, K
>> L( F1*
>> LR("%" QUE+1, HDR+1
>> LR("F" QUE*
>> LR("Q" Z, QUE*, F1+1*, HDR
>> LRAA R, D+1, G, G+1, G+2, END, K, F1, I
>> LRQ QUE*
>> LRQ(1 QUE*
>> N( D, E, F1*, F1+1
>> O E, G+1, G+2, A*, K
>> POP P
>> T E+1*, C+1*, T*, G+1, G+2
U ASK, D, E, B, H, A, F1, HDR+1
>> X ASK*, ASK+1, D*, D+1*, E*, E+1, C, C+1, T, B
, H*, A*, END*, K*, I*
>> X(1 D+1*, K*
>> Y LRUMDU+4, H, END*, I
>> Z G*, G+2*, END*, END+1
>> ZTRTN P*
>> ZTSK P
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All