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

Package: Lab Service

Routine: LRAPT2


Information

LRAPT2 ;AVAMC/REG/WTY - AUTOPSY PRT ;08/23/01

Source Information

Source file <LRAPT2.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Lab Service 8 (,F)^LRAPF  H1^LRAPT  ^LRAPT3  D^LRAUAW  (FT,H)^LRAURPT  EN^LRSPRPT1  D^LRU  C^LRUA  
VA FileMan 3 ^DIC  ^DIWP  ^DIWW  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Lab Service 8 LRAPPF1  LRAPQAC  LRAPQACN  LRAPQAMR  LRAPQAT1  LRAPT  LRAURPT  LRSPT  

Entry Points

Name Comments DBIA/ICR reference
F ;
EE ;
M ;
A
E ;
HD ;
EN ;from LRAPPF1
FTR ;
FF ;

External References

Name Field # of Occurrence
^DIC EN+33, EN+40
^DIWP F+3
^DIWW F+4
^LRAPF FTR+2
F^LRAPF FTR+2
H1^LRAPT FF+1
^LRAPT3 LRAPT2+32
D^LRAUAW LRAPT2+18
FT^LRAURPT FTR+1
H^LRAURPT FTR+1
EN^LRSPRPT1 LRAPT2+47, M+12, A+10, E+13
D^LRU LRAPT2+18, LRAPT2+20
C^LRUA LRAPT2+45, M+10, A+9, E+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Acc #: ",$P(O(2),"^",6),?32,"AUTOPSY DATA"
  • Line Location: LRAPT2+13
Function Call: WRITE
  • Prompt: ?52,"Age: ",$J($P(O(2),"^",9),3)
  • Line Location: LRAPT2+14
Function Call: WRITE
  • Prompt: !,"Date/time Died",?52,"Date/time of Autopsy"
  • Line Location: LRAPT2+16
Function Call: WRITE
  • Prompt: !,Y,?32,$E(LRAU(3),1,18)
  • Line Location: LRAPT2+19
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPT2+22
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPT2+30
Function Call: WRITE
  • Prompt: X
  • Line Location: LRAPT2+45
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPT2+49
Function Call: WRITE
  • Prompt: !,LRAU(1)
  • Line Location: LRAPT2+50
Function Call: WRITE
  • Prompt: !,LRAU(2)
  • Line Location: LRAPT2+55
Function Call: WRITE
  • Prompt: X
  • Line Location: M+10
Function Call: WRITE
  • Prompt: X
  • Line Location: A+9
Function Call: WRITE
  • Prompt: X
  • Line Location: E+12
Function Call: WRITE
  • Prompt: !!,"SNOMED code(s):"
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: "Heart(gm)"
  • Condition for execution: $D(B)
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: $J(B(9),5)
  • Condition for execution: $D(B(9))
  • Line Location: EN+19
Routine Call
  • DIC
  • Line Location:
    • EN+33
    • EN+40

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB( A+1
^LAB(61 - [#61] LRAPT2+36
^LAB(61.1 - [#61.1] M+2
^LAB(61.2 - [#61.2] E+2
^LR - [#63] LRAPT2+8, LRAPT2+10, LRAPT2+28, LRAPT2+34, LRAPT2+50, LRAPT2+55, F+2, F+3, M+1, M+2
, M+14, M+15, E+1, E+2, EN+2, EN+3, EN+16, EN+17, EN+37, EN+38
^UTILITY($J EE+1!
^VA(200 - [#200] LRAPT2+24

Label References

Name Line Occurrences
A M+16
E M+12
EE F+1
EN LRAPT2+30
F LRAPT2+51, LRAPT2+56
FF LRAPT2+5, LRAPT2+37, LRAPT2+52, LRAPT2+57, M+3, A+2, E+3, E+4
FTR LRAPT2+6, LRAPT2+15, LRAPT2+17, LRAPT2+21, LRAPT2+40, LRAPT2+54, LRAPT2+59, M+5, A+4, E+6
, EN+6, EN+11, EN+14, EN+20, EN+24, EN+26, EN+29, EN+35, EN+42
HD LRAPT2+35, LRAPT2+37, LRAPT2+41, M+3, M+6, A+2, A+5, E+3, E+4, E+7
M LRAPT2+47

Naked Globals

Name Field # of Occurrence
^( LRAPT2+36
^(0 LRAPT2+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A LRAPT2+34*, LRAPT2+36, F+2*, F+3, M+1, M+2, M+14, M+15, E+1, E+2
B M+1*, M+2, M+13*, M+14, M+15, A, A+8, E+1, E+2, EN+1!
, EN+7, EN+13, EN+31*, EN+32, EN+34, EN+38*, EN+39, EN+41
B(1 EN+3*, EN+31, EN+32, EN+34
B(2 EN+17*, EN+21, EN+27, EN+28
B(9 EN+3*, EN+19
>> C M+14*, M+15, E+1*, E+2
>> DA LRAPT2+18*
DIC EN+30*, EN+43!
DIC(0 EN+30*
>> DIWF EE+1*
>> DIWL EE+1*
>> DIWR EE+1*
>> E A*, A+1, E+2*, E+11, E+12
>> F LRAPT2+34*, LRAPT2+35
IOM EE+1
IOSL LRAPT2+6, LRAPT2+15, LRAPT2+17, LRAPT2+21, LRAPT2+37, LRAPT2+39, LRAPT2+52, LRAPT2+54, LRAPT2+57, LRAPT2+59
, M+3, M+4, A+2, A+3, E+3, E+4, E+5, EN+6, EN+11, EN+14
, EN+20, EN+24, EN+26, EN+29, EN+35, EN+42
>> LR("AU1" LRAPT2+28
>> LR("F" LRAPT2+7*
>> LR("Q" LRAPT2+7, LRAPT2+15, LRAPT2+17, LRAPT2+21, LRAPT2+31, LRAPT2+34, LRAPT2+38, LRAPT2+40, LRAPT2+42, LRAPT2+48
, LRAPT2+50, LRAPT2+53, LRAPT2+55, LRAPT2+58, F+2, F+4, M+1, M+3, M+4, M+5
, M+7, M+13, M+14, A+2, A+3, A+4, A+6, E+1, E+3, E+4
, E+5, E+6, E+8, HD+1, EN+6, EN+12, EN+15, EN+20, EN+21, EN+24
, EN+26, EN+29, EN+31, EN+36, EN+38
>> LR("SPSM" LRAPT2+33
>> LR("W" LRAPT2+48
>> LR(63 LRAPT2+18
>> LRAU("L" LRAPT2+11
>> LRAU("T" LRAPT2+12
>> LRAU(1 LRAPT2+50
>> LRAU(2 LRAPT2+55
>> LRAU(3 LRAPT2+12*, LRAPT2+19
>> LRAURPT LRAPT2+50, LRAPT2+55
>> LRD("V" LRAPT2+8, LRAPT2+28
>> LRDFN LRAPT2+8, LRAPT2+10, LRAPT2+18, LRAPT2+28, LRAPT2+34, LRAPT2+50, LRAPT2+55, F+2, F+3, M+1
, M+2, M+14, M+15, E+1, E+2, EN+2, EN+3, EN+16, EN+17, EN+37
, EN+38
>> LRE LRAPT2+50*, LRAPT2+55*, F+2, F+3
>> LRLLOC LRAPT2+11*
>> LRS(5 LRAPT2+45, M+10, A+9, E+12
>> LRSF515 LRAPT2+4*, LRAPT2+5, LRAPT2+6, LRAPT2+15, LRAPT2+17, LRAPT2+21, LRAPT2+37, LRAPT2+39, LRAPT2+52, LRAPT2+54
, LRAPT2+57, LRAPT2+59, M+3, M+4, A+2, A+3, E+4, E+5, EN+6, EN+11
, EN+14, EN+20, EN+24, EN+26, EN+29, EN+35, EN+42
LRSPSM LRAPT2+3~*, LRAPT2+33*, LRAPT2+35, LRAPT2+37, LRAPT2+41, LRAPT2+43, M+3, M+6, M+8, A+2
, A+5, A+7, E+3, E+4, E+7, E+10
>> LRSS FTR+1, FTR+2
>> LRZ F+2*, F+4
>> M M+2*, M+9, M+10, M+15*, A+1*, A+8, A+9
>> O(2 LRAPT2+10*, LRAPT2+11, LRAPT2+13, LRAPT2+14, LRAPT2+20, LRAPT2+23
>> T LRAPT2+36*, LRAPT2+45
>> T(3 LRAPT2+36*, M+2*, M+15*, E+2*
>> T(4 LRAPT2+46*, M+11*, A*, E+9*
>> T(8 LRAPT2+36*, LRAPT2+44
TAB LRAPT2+22*, LRAPT2+25*, LRAPT2+26, LRAPT2+27!
U LRAPT2+8, LRAPT2+28
X LRAPT2+10*, LRAPT2+11*, LRAPT2+12, LRAPT2+45*, F+3*, M+10*, A+9*, E+12*, EN+3*, EN+8
, EN+9, EN+10, EN+17*, EN+22, EN+23, EN+32*, EN+39*, EN+43!
X(1 LRAPT2+22*, LRAPT2+23, LRAPT2+25, LRAPT2+26
Y LRAPT2+18*, LRAPT2+19, LRAPT2+20*, LRAPT2+23*, LRAPT2+24*, LRAPT2+25*, LRAPT2+26, EN+33, EN+40, EN+43!
Y(0 EN+34, EN+41
Z EN+38*, EN+39, EN+41, EN+43!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All