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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRBLTX

Package: Lab Service

Routine: LRBLTX


Information

LRBLTX ; IHS/DIR/FJE - TESTS FOR TX RELATED DISORDERS 2/17/88 20:59 ;

Source Information

Source file <LRBLTX.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 2 (K,RX,V,YN)^LRU  ^LRUTL  
VA Fileman 2 ^DIC  ^DIE  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRBLTX  

Entry Points

Name Comments DBIA/ICR reference
A
C
B
E
D
G
F
H
K
L
R
END
T
W
ASK
SET
Z
OUT

External References

Name Field # of Occurrence
^DIC H
^DIE SET
K^LRU E+1, C+1, K
RX^LRU C
V^LRU OUT
YN^LRU R
^LRUTL LRBLTX+4

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",!
  • 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: " Specimen: ",LRT(2)," Value: ",LRT(3),!,$P(L(L,O),"^",4),"// "
  • 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: !
  • 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: F+2
Routine Call
  • DIE
  • Line Location:
    • SET
Routine Call
  • DIC
  • Line Location:
    • H

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRO(69.2 - [#69.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] F+1
^LAB(61 - [#61] E
^LRO(69.2 - [#69.2] LRBLTX+5*, LRBLTX+6, R!, D+1!, G, G+1, G+2*, SET+1!, END, K!
, F+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 T
F LRBLTX+7, E+1, C+1, K
G E+1, C+1
H E+1, C+1, T
K C
L F+2
LRBLTX D, D+1, END+1
OUT LRBLTX+4, END+1
R ASK+1
SET G+1
T LRBLTX+7, T
W A
Z LRBLTX+7, L, E+1, C+1, K, F+2

Naked Globals

Name Field # of Occurrence
^( F+1
^(0 LRBLTX+5*, LRBLTX+6*, D+1*, G*, G+1*, G+2*, SET+1*, K*, F+1
^(60 R*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % R*, C*
>> A F+1*, F+2*
>> B F+1*, F+2*
>> C LRBLTX+7, F+1*, F+2*
DA SET*, SET+1, SET+2!
DA(1 SET*
DA(2 SET*
DIC SET+2!, H*!
DIC("S" H*
DIC(0 E+1*, C+1*, T*
DIE SET*, SET+2!
DR SET*, SET+2!
DTIME ASK, D, E, A
IOF F
>> L E, G, G+1, G+2, SET, SET+1, A*, K
>> L( E, F+1*
>> LRAA LRBLTX+5, LRBLTX+6, R, D+1, G, G+1, G+2, SET, SET+1, END
, K, F+1
>> LRAA(2 LRBLTX+5
>> LRT(2 E*, SET*, H*
>> LRT(3 E*, SET*, H*
>> N( D, E, F+1*, F+2
>> O E, G+1, G+2, SET, A*, K
>> T E+1*, C+1*, T*, G+1, G+2
U ASK, D, E, B, H, A, F+1
X LRBLTX+4*, LRBLTX+5*, ASK*, ASK+1, D*, D+1*, E*, E+1, C, C+1
, T, B, SET+1*, SET+2!, H*, A*, END*, K*
X(1 D+1*, SET+1*, K*
Y LRBLTX+4, SET+1, SET+2!, H, END*
>> Z G*, G+2*, END*, END+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All