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

Package: Lab Service

Routine: LRAPAULC


Information

LRAPAULC ; IHS/DIR/AAB - ACCESSION COUNTS BY PATHOLOGIST 08:12 ; [ 8/14/95 ]

Source Information

Source file <LRAPAULC.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Lab Service 2 (B,D,F,L,M,S,V)^LRU  (BEG,END)^LRUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPAULC  

Entry Points

Name Comments DBIA/ICR reference
C
H1
END
D
H
SP
L
QUE
WR
W
U
T

External References

Name Field # of Occurrence
B^LRU LRAPAULC+3
D^LRU D+4
F^LRU H+1
L^LRU QUE
M^LRU H
S^LRU QUE
V^LRU END
BEG^LRUTL LRAPAULC+4
END^LRUTL QUE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?30
  • Line Location: D+0
Function Call: WRITE
  • Prompt: !,$S($D(^VA(200,LRP,0)):$P(^(0),U),1:LRP)," :",?32,$J(LR(LRSS,LRP),5)
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !,"Unassigned accessions :",?32,$J(LR(LRSS,0),5)
  • Line Location: D+2
Function Call: WRITE
  • Prompt: !?3,LRD,?30,"Accession #: ",LRC
  • Line Location: D+4
Function Call: WRITE
  • Prompt: !,"Accession counts by Senior Pathologist",!,"From: ",LRSTR," to:",LRLST,!,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?30
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: $S(LRSS="SP":"SURGICAL PATHOLOGY",LRSS="CY":"CYTOPATHOLOGY",LRSS="EM":"ELECTRON MICROSCOPY",1:"AUTOPSY PATHOLOGY")," ACCESSION AREAS"
  • Line Location: T+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] L, W, W+1, SP, WR!, WR+1
^LR("AAU" W!
^VA(200 - [#200] D+1

Label References

Name Line Occurrences
@( L
C QUE+1
D C
END LRAPAULC+3, LRAPAULC+4, QUE+1
H QUE, D, D+2, D+4, H1
H1 D+1
L QUE
T D, H1
U W+1, WR+1
WR SP

Naked Globals

Name Field # of Occurrence
^("AU" W+1
^(0 WR+1, D+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
IO QUE
IOSL D, D+1, D+2, D+4
IOST H
>> LR( W+2*, WR+2*, D+1, D+2, D+3, D+4, U*
>> LR("%" H+1
>> LR("F" QUE*, H
>> LR("Q" QUE, L, SP, C, D, D+1, D+2, D+4, H, H1
>> LRC L*, W, SP, WR, D+4*
>> LRD D+4*
>> LRI SP*, WR, WR+1, C*, D+1*, D+3
>> LRLDT LRAPAULC+3*, L
>> LRLST H+1
>> LRO QUE*, L, SP, WR
>> LRP L*, W, W+1, SP, WR, WR+1, D+1*, D+4*
>> LRSDT LRAPAULC+3*, L
>> LRSS QUE*, L, W+2, WR, WR+1, WR+2, C*, D+1, D+2, D+3
, D+4, U, T
>> LRSTR H+1
>> POP LRAPAULC+4
U D+1
>> X W+1*, W+2, WR+1*, WR+2, U
>> Y LRAPAULC+3, D+4*
>> ZTRTN LRAPAULC+4*
>> ZTSK LRAPAULC+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All