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

Package: Lab Service

Routine: LRAPC


Information

LRAPC ; IHS/DIR/AAB - ANAT TOPOGRAPHY COUNTS 8/14/95 08:36 ;

Source Information

Source file <LRAPC.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Lab Service 4 ^LRAP  CK^LRAUSM  (B,F,L,M,S,V,XR)^LRU  (BEG,END)^LRUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPC  

Entry Points

Name Comments DBIA/ICR reference
END
I
H
L
TOT
QUE
T
ASK
TG

External References

Name Field # of Occurrence
^LRAP LRAPC+3
CK^LRAUSM ASK+1
B^LRU LRAPC+6
F^LRU H+1
L^LRU QUE
M^LRU H
S^LRU QUE
V^LRU END
XR^LRU LRAPC+4
BEG^LRUTL LRAPC+7
END^LRUTL QUE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,LRO(68)," (",LRABV,") TOPOGRAPHY COUNTS",!!
  • Line Location: LRAPC+3
Function Call: WRITE
  • Prompt: !!,"TOPOGRAPHY (Organ/Tissue)"
  • Line Location: LRAPC+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPC+6
Function Call: WRITE
  • Prompt: !?2,"T-",T,$E(".....",1,5-$L(T)),?14,$J(O(T),5),?22
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: $J(O(T)/C(2)*100,5,2),"%"
  • Condition for execution: C(2)
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: !!,"# Patients: ",A,!,"# accessions: ",C(1),!,"# organ/tissues: ",C(2),!,"% = % of organ/tissues"
  • Line Location: TOT+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,"Choice #",$J(B,2),": Select 1 or more characters of the code: "
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,LRO(68)," (",LRABV,") TOPOGRAPHY COUNTS"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"Topography",?14,"Count",?22,"From:",LRSTR," To:",LRLST,!,LR("%")
  • Line Location: H+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61 - [#61] TG
^LR - [#63] QUE+1, L, I, T, T+1
^TMP($J QUE!, QUE+2!, TOT+1, T*

Label References

Name Line Occurrences
ASK LRAPC+5, ASK+1
END LRAPC+3, LRAPC+6, LRAPC+7, QUE+2
H QUE+2, TOT
I L
L QUE+1
T I
TG T+1
TOT QUE+2

Naked Globals

Name Field # of Occurrence
^( T+1
^(0 TG

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A QUE+1*, TOT+1*, TOT+2
>> A("B" ASK!, ASK+1
>> B LRAPC+5*, LRAPC+6, T+1*, T+2, ASK
>> C QUE*, TG*
>> C(1 QUE*, TOT+2, T*
>> C(2 QUE*, TOT, TOT+2, T+2*
DTIME ASK
>> I I*, T, T+1
IO QUE
IOSL TOT
IOST H
>> L( TG, ASK+1*
>> LR("%" H+2
>> LR("F" TOT*, H
>> LR("Q" TOT, TOT+1, TOT+2, H
>> LRABV LRAPC+3, T, H+1
>> LRDFN L*, I, T, T+1
>> LRDICS LRAPC+3*
>> LRLDT LRAPC+6*, QUE+1
>> LRLST H+2
>> LRO(68 LRAPC+3, LRAPC+4, H+1
>> LRSDT LRAPC+6*, QUE+1*, L, I
>> LRSS T, T+1
>> LRSTR H+2
>> LRXR QUE+1, L, I
>> O QUE*
>> O( TOT, TG*
>> POP LRAPC+7
>> S(1 LRAPC+4*
T LRAPC+5!*, LRAPC+6*, TOT*, T+1*
T( LRAPC+6, TG, ASK+1*
U LRAPC+5, T, ASK
>> W T+1*, TG
>> W(1 TG*
>> X LRAPC+5, TOT*, TOT+1*, T*, TG*, ASK*, ASK+1
>> Y LRAPC+3, LRAPC+6, TG*
>> ZTRTN LRAPC+7*
>> ZTSK LRAPC+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All