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

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
A
EN ;from LRAPPF1
E ;
F ;
EE ;
M ;
FTR ;
FF ;
HD ;

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+33
D^LRAUAW LRAPT2+19
FT^LRAURPT FTR+1
H^LRAURPT FTR+1
EN^LRSPRPT1 LRAPT2+48, M+12, A+10, E+13
D^LRU LRAPT2+19, LRAPT2+21
C^LRUA LRAPT2+46, 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+14
Function Call: WRITE
  • Prompt: ?52,"Age: ",$J($P(O(2),"^",9),3)
  • Line Location: LRAPT2+15
Function Call: WRITE
  • Prompt: !,"Date/time Died",?52,"Date/time of Autopsy"
  • Line Location: LRAPT2+17
Function Call: WRITE
  • Prompt: !,Y,?32,$E(LRAU(3),1,18)
  • Line Location: LRAPT2+20
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPT2+23
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPT2+31
Function Call: WRITE
  • Prompt: X
  • Line Location: LRAPT2+46
Function Call: WRITE
  • Prompt: !
  • Line Location: LRAPT2+50
Function Call: WRITE
  • Prompt: !,LRAU(1)
  • Line Location: LRAPT2+51
Function Call: WRITE
  • Prompt: !,LRAU(2)
  • Line Location: LRAPT2+56
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+37
^LAB(61.1 - [#61.1] M+2
^LAB(61.2 - [#61.2] E+2
^LR - [#63] LRAPT2+9, LRAPT2+11, LRAPT2+29, LRAPT2+35, LRAPT2+51, LRAPT2+56, 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+25

Label References

Name Line Occurrences
A M+16
E M+12
EE F+1
EN LRAPT2+31
F LRAPT2+52, LRAPT2+57
FF LRAPT2+6, LRAPT2+38, LRAPT2+53, LRAPT2+58, M+3, A+2, E+3, E+4
FTR LRAPT2+7, LRAPT2+16, LRAPT2+18, LRAPT2+22, LRAPT2+41, LRAPT2+55, LRAPT2+60, 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+36, LRAPT2+38, LRAPT2+42, M+3, M+6, A+2, A+5, E+3, E+4, E+7
M LRAPT2+48

Naked Globals

Name Field # of Occurrence
^( LRAPT2+37
^(0 LRAPT2+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A LRAPT2+35*, LRAPT2+37, 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+19*
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+35*, LRAPT2+36
IOM EE+1
IOSL LRAPT2+7, LRAPT2+16, LRAPT2+18, LRAPT2+22, LRAPT2+38, LRAPT2+40, LRAPT2+53, LRAPT2+55, LRAPT2+58, LRAPT2+60
, 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+29
>> LR("F" LRAPT2+8*
>> LR("Q" LRAPT2+8, LRAPT2+16, LRAPT2+18, LRAPT2+22, LRAPT2+32, LRAPT2+35, LRAPT2+39, LRAPT2+41, LRAPT2+43, LRAPT2+49
, LRAPT2+51, LRAPT2+54, LRAPT2+56, LRAPT2+59, 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+34
>> LR("W" LRAPT2+49
>> LR(63 LRAPT2+19
>> LRAU("L" LRAPT2+12
>> LRAU("T" LRAPT2+13
>> LRAU(1 LRAPT2+51
>> LRAU(2 LRAPT2+56
>> LRAU(3 LRAPT2+13*, LRAPT2+20
>> LRAURPT LRAPT2+51, LRAPT2+56
>> LRD("V" LRAPT2+9, LRAPT2+29
>> LRDFN LRAPT2+9, LRAPT2+11, LRAPT2+19, LRAPT2+29, LRAPT2+35, LRAPT2+51, LRAPT2+56, 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+51*, LRAPT2+56*, F+2, F+3
>> LRLLOC LRAPT2+12*
>> LRS(5 LRAPT2+46, M+10, A+9, E+12
>> LRSF515 LRAPT2+5*, LRAPT2+6, LRAPT2+7, LRAPT2+16, LRAPT2+18, LRAPT2+22, LRAPT2+38, LRAPT2+40, LRAPT2+53, LRAPT2+55
, LRAPT2+58, LRAPT2+60, 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+4~*, LRAPT2+34*, LRAPT2+36, LRAPT2+38, LRAPT2+42, LRAPT2+44, 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+11*, LRAPT2+12, LRAPT2+14, LRAPT2+15, LRAPT2+21, LRAPT2+24
>> T LRAPT2+37*, LRAPT2+46
>> T(3 LRAPT2+37*, M+2*, M+15*, E+2*
>> T(4 LRAPT2+47*, M+11*, A*, E+9*
>> T(8 LRAPT2+37*, LRAPT2+45
TAB LRAPT2+23*, LRAPT2+26*, LRAPT2+27, LRAPT2+28!
U LRAPT2+9, LRAPT2+29
X LRAPT2+11*, LRAPT2+12*, LRAPT2+13, LRAPT2+46*, 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+23*, LRAPT2+24, LRAPT2+26, LRAPT2+27
Y LRAPT2+19*, LRAPT2+20, LRAPT2+21*, LRAPT2+24*, LRAPT2+25*, LRAPT2+26*, LRAPT2+27, 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