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

Package: Lab Service

Routine: LRAPST1


Information

LRAPST1 ;AVAMC/REG/WTY - AUTOPSY TISSUE STAIN LOOK-UP ;9/25/00

Source Information

Source file <LRAPST1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Lab Service 2 M^LRAPST  (D,YN)^LRU  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPST  

Entry Points

Name Comments DBIA/ICR reference
A
AU
T
W

External References

Name Field # of Occurrence
M^LRAPST LRAPST1+3, A, T+1
D^LRU T, W, AU+4
YN^LRU AU+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$P(LRB,U)
  • Line Location: LRAPST1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPST1+4
Function Call: WRITE
  • Prompt: !,LRSS(LRSS,E)
  • Condition for execution: F=1
  • Line Location: T+0
Function Call: WRITE
  • Prompt: !?3,$P(LRB(1),U),?21,"Stain/Procedure"
  • Line Location: T+0
Function Call: WRITE
  • Prompt: ?59,Y
  • Line Location: T+0
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !?16,$S($D(^LAB(60,C,0)):$P(^(0),U),1:C),?47
  • Line Location: W+0
Function Call: WRITE
  • Prompt: $J(X,5)
  • Condition for execution: X
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?52,"/",Z
  • Condition for execution: Z
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?59,Y
  • Line Location: W+0
Function Call: WRITE
  • Prompt: $C(7),!!,"No autopsy # for ",LRP
  • Line Location: AU+3
Function Call: WRITE
  • Prompt: !,"Autopsy performed: ",Y," Acc # ",LREP
  • Line Location: AU+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] W
^LR - [#63] LRAPST1+3, A, T+1, AU, AU+2

Label References

Name Line Occurrences
A LRAPST1+3
T A
W T+1

Naked Globals

Name Field # of Occurrence
^( LRAPST1+3, A, T+1
^(0 W

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % AU+5*
>> A LRAPST1+3*, A, T+1, AU+1*, AU+3*, AU+5*
>> B A*, T+1
>> C T+1*, W
>> E A*, T, T+1
>> F A*, T
IOSL LRAPST1+3, A, T+1
>> LRA AU+2*, AU+4
>> LRABV AU
>> LRB LRAPST1+3*
>> LRB(1 A*, T
>> LRDFN LRAPST1+3, A, T+1, AU, AU+2
>> LREP AU+2*, AU+3, AU+4
>> LRM LRAPST1+3, A, T+1
>> LRP AU+1, AU+3
>> LRSS T
>> LRSS( T
U LRAPST1+3, A, T, T+1, W, AU, AU+2
>> X T+1*, W
>> Y T*, T+1*, W*, AU+4*
>> Z T+1*, W
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All