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

Package: Lab Service

Routine: LRAPAUL


Information

LRAPAUL ; IHS/DIR/AAB - PATHOLOGY LIST BY PATHOLOGIST/TECH 2/9/98 13:59 ; [ 02/03/1999 2:07 PM ]

Source Information

Source file <LRAPAUL.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Lab Service 5 ^LRAP  D^LRAUAW  (B,F,L,M,S,SSN,V,XR,YN)^LRU  (BEG,END)^LRUTL  DD^LRX  
VA Fileman 3 ^%DTC  (,IX)^DIC  FIELD^DID  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPAUL  

Entry Points

Name Comments DBIA/ICR reference
H1
END
P
H2
H
SP
M
DEV
PRT
R
QUE
WR
W
MR
ASK
DT

External References

Name Field # of Occurrence
^%DTC PRT+4
^DIC ASK+4
IX^DIC P
FIELD^DID QUE
^LRAP LRAPAUL+4
D^LRAUAW PRT+4
B^LRU R+1
F^LRU H+2
L^LRU QUE
M^LRU H
S^LRU QUE
SSN^LRU PRT+2
V^LRU END
XR^LRU QUE
YN^LRU R, R+2, R+3
BEG^LRUTL DEV
END^LRUTL QUE+2
DD^LRX DT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?17,"1. ",LRO(68)," list by ",LRP,!?17,"2. ",LRO(68)," list by Senior Pathologist",!?17,"3. ",LRO(68)," list by Surgeon/Physician",!,"Select 1,2 or 3: "
  • Line Location: ASK+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: $C(7)," Enter 1, 2 or 3"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"List only reports not released "
  • Line Location: R+0
Function Call: WRITE
  • Prompt: !
  • Line Location: R+0
Function Call: WRITE
  • Prompt: !!,"Print total count only "
  • Line Location: R+2
Function Call: WRITE
  • Prompt: !!,"Print Topography and Morphology entries "
  • Line Location: R+3
Function Call: WRITE
  • Prompt: Y,?35
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: $P(V,"^")
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: !,LRE,")",?3,$J($P(Z,"^",6),4),?18
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: Y,?35
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: Y,?35
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: ?62,$J(X,2)
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: !?16,B
  • Line Location: PRT+6
Function Call: WRITE
  • Prompt: !?21,N
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !?16,B
  • Line Location: WR+3
Function Call: WRITE
  • Prompt: !?21,N
  • Line Location: MR+0
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,LRB(1)," ",LRO(68)," list from:",LRSTR," to:",LRLST
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,"List of reports not released"
  • Condition for execution: LRD
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,LRE,")",?3,$J($P(Z,"^",6),4),?18
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: Y,?31,$P(V,"^")
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: !?16,B
  • Line Location: H2+0
Routine Call
  • DIC
  • Line Location:
    • ASK+4
Routine Call
  • DIC
  • Line Location:
    • P

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^LR - [#63] FIELD^DID

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] PRT+2
^LAB(61 - [#61] PRT+6, WR+3
^LAB(61.1 - [#61.1] M, MR
^LR - [#63] QUE+1, W, W+1, PRT+2, PRT+6, M, SP, WR!, WR+1, WR+3
, MR
^LR("AAU" W!
^VA(200 - [#200] ASK+4

Label References

Name Line Occurrences
@( QUE+1
ASK ASK+1
DEV R+2
DT PRT+2, H1
END LRAPAUL+4, ASK+1, ASK+3, ASK+4, R, R+1, R+2, R+3, DEV, QUE+2
H QUE, W, PRT, H1
H1 PRT+6, WR, WR+3, H2
H2 M, MR
M PRT+6
MR WR+3
P ASK+3
PRT WR+2
R ASK+3
WR SP

Naked Globals

Name Field # of Occurrence
^( PRT+6, M, WR+3, MR
^("AU" W+1
^(0 PRT+6, M, WR+3, MR

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % R*, R+2*, R+3*
>> B PRT+6*, WR+3*, H2
>> D P*
>> DA PRT+4*
DIC ASK+4*!, P!*
DIC("A" ASK+4*, P*
DIC(0 ASK+4*, P*
DTIME ASK+1
>> HRCN PRT+2
IO QUE
IOSL W, PRT, PRT+6, M, WR, WR+3, MR
IOST H
>> LR("%" H+3
>> LR("F" QUE*, H
>> LR("Q" QUE+1, W, PRT, PRT+6, M, WR, WR+3, MR, H, H1
, H2
>> LR(63 PRT+4
>> LRA ASK+2*, ASK+4*, W+1, WR+1, P*
>> LRABV W+1, WR+1
>> LRB ASK+4*, W+1, WR+1, P*
>> LRB(1 R*, H+2
>> LRC QUE+1*, W, SP, WR
>> LRD R*, WR+1, H+2
>> LRDPF PRT+2*
>> LRE QUE*, QUE+2, W+1*, PRT+2, WR+2*, H1
>> LRF R+2*, QUE+2, PRT
>> LRI SP*, WR, WR+1, WR+3, MR
>> LRLDT R+1*, QUE+1
>> LRLST H+2
>> LRO(68 ASK, QUE+2, H+2
>> LRP LRAPAUL+5*, ASK, ASK+4, QUE+1*, W, W+1, PRT+2, PRT+4, PRT+6, M
, SP, WR, WR+1, WR+3, MR
>> LRS QUE*, PRT+5
>> LRS("POINTER" QUE
>> LRSDT R+1*, QUE+1
>> LRSS LRAPAUL+5, ASK+2, R, QUE, QUE+1, PRT+2, WR, WR+1, WR+3, MR
, H+3
>> LRSTR H+2
>> LRV R+2*, R+3*, PRT+5, WR+2
>> LRXR QUE+1, SP, WR
>> M M*, MR*
>> N M*, MR*
>> POP DEV
>> SSN PRT+2*
>> T PRT+6*, M, WR+3*, MR
U ASK+1, ASK+2, ASK+4, W+1, WR+1, P
>> V PRT+2*, PRT+4, H1
>> X ASK+1*, ASK+2, ASK+3, ASK+4*, R, PRT+2*, PRT+4*, PRT+5*, WR+1*, WR+2
, P*
>> X1 PRT+4*
>> X2 PRT+4*
>> Y LRAPAUL+4, ASK+2*, ASK+3, ASK+4, R+1, PRT+2*, P, H1*
>> Z W+1*, PRT+2, PRT+5, WR+2*, H1
>> ZTRTN DEV*
>> ZTSK DEV
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