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

Package: Lab Service

Routine: LRAPPF1


Information

LRAPPF1 ;DALOI/STAFF - ANAT PATH FILE PRINT BY PT ;11/17/11 10:59

Source Information

Source file <LRAPPF1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Lab Service 8 (,F)^LRAPF  ^LRAPPF2  H^LRAPT1  EN^LRAPT2  D^LRAUAW  H^LRSPT  (D,F,M,SSN)^LRU  $$Y2K^LRX  
VA FileMan 1 $$EXTERNAL^DILFD  

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

Package Total Caller Graph
Lab Service 3 LRAPPF  LRAPQACN  LRAPT1  

Entry Points

Name Comments DBIA/ICR reference
W ;
LR ;
NM ;
AUT
AM
EN ; from LRAPT1,LRAPQACN
DES ; Print Microscopic Description
L ;
A ;
E ;
H ;
H1 ;
H2 ;
H3 ;

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD EN+5
^LRAPF H+2
F^LRAPF H+2
^LRAPPF2 LRAPPF1+12
H^LRAPT1 H+5
EN^LRAPT2 AUT+5
D^LRAUAW AUT+3
H^LRSPT H+4
D^LRU NM+3, AUT+2, AUT+3, A+2
F^LRU H+6
M^LRU H+3
SSN^LRU NM+3
$$Y2K^LRX EN+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"AUTOPSY #: ",N," AUTOPSY DATE: ",LRH(3),?51,"DIED: ",E
  • Line Location: AUT+4
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: AUT+8
Function Call: WRITE
  • Prompt: !?5,Y
  • Line Location: AM+3
Function Call: WRITE
  • Prompt: !?2,"Organ/tissue:",?17,"Date rec'd: ",LRH(3),?43,"Acc #:",N
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: ?64,$E(LR("PATH"),1,12)
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !?5,"Report not verified."
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !?5,O(6)
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: " ",W(3)," gm"
  • Condition for execution: W(3)
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !?5,$E(^LR(LRDFN,S,LRI,99,B,0),1,74)
  • Line Location: EN+26
Function Call: WRITE
  • Prompt: !!,"Microscopic Description/Diagnosis:"
  • Line Location: DES+6
Function Call: WRITE
  • Prompt: !!,"Microscopic Description/Diagnosis:"
  • Line Location: DES+10
Function Call: WRITE
  • Prompt: !?5,LRVAL
  • Line Location: DES+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DES+12
Function Call: WRITE
  • Prompt: !?10,$P(^LAB(61.3,B(1),0),"^")
  • Line Location: L+6
Function Call: WRITE
  • Prompt: !?10,$P(^LAB(61.5,B(1),0),"^")
  • Line Location: L+12
Function Call: WRITE
  • Prompt: !?10,$P(^LAB(61.4,B(1),0),"^")
  • Line Location: L+19
Function Call: WRITE
  • Prompt: !?10,$P(^LAB(61.1,M(1),0),"^")
  • Line Location: L+25
Function Call: WRITE
  • Prompt: !?5,E(4)," ",E(3)," Date: ",E(2)
  • Line Location: A+5
Function Call: WRITE
  • Prompt: !?12,$P(^LAB(61.2,+^LR(LRDFN,S,LRI,2,O,2,M,1,E,0),0),"^")
  • Line Location: E+2
Function Call: WRITE
  • Prompt: !,LRO(68)," "
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !,"Entries listed by PATIENT (From: ",LRSTR," to: ",LRLST,")"
  • Line Location: H+8
Function Call: WRITE
  • Prompt: !,"Name",?31,"Identifier"
  • Line Location: H+9
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+10
Function Call: WRITE
  • Prompt: !,LRP,?30,SSN,?42,DOB
  • Line Location: H1+2
Function Call: WRITE
  • Prompt: !?5,"Organ/tissue:",?25,"Date received: ",LRH(3),?51,"Acc #:",N
  • Line Location: H2+2
Function Call: WRITE
  • Prompt: !?5,O(6)
  • Line Location: H3+2
Function Call: WRITE
  • Prompt: " ",W(3)," gm"
  • Condition for execution: W(3)
  • Line Location: H3+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] LRAPPF1+9
^LAB(61 - [#61] AUT+7, EN+20
^LAB(61.1 - [#61.1] AM+2, L+25
^LAB(61.2 - [#61.2] E+2
^LAB(61.3 - [#61.3] L+6
^LAB(61.4 - [#61.4] L+19
^LAB(61.5 - [#61.5] L+12
^LR - [#63] NM+1, AUT+2, AUT+6, AUT+7, AMAM+1, EN+2, EN+16, EN+19, EN+25
EN+26, DES+5, DES+9, L+2, L+3, L+8, L+9, L+15, L+16, L+21
L+22, L+27, L+28, E+2
^LRO(69.2 - [#69.2] DES+4
^TMP($J LRAPPF1+8, W+2, LR+2, NM+9

Label References

Name Line Occurrences
@( NM+10
A L+28
AM AUT+8
E L+25
H LRAPPF1+10, NM+5, H1+1
H1 AUT+1, EN+7, EN+8, H2+1
H2 EN+17, EN+18, EN+27, EN+28, DES+10, H3+1
H3 L+4, L+5, L+10, L+11, L+17, L+18, L+23, L+24, A+3, A+4
L EN+22
LR W+2
NM LR+2
W LRAPPF1+10

Naked Globals

Name Field # of Occurrence
^( DES+9
^(0 AUT+7, AM+2, DES+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> B EN+25*, EN+26, L+1*, L+2*, L+3, L+7*, L+8*, L+9, L+14*, L+15*
L+16
>> B(1 L+3*, L+6, L+9*, L+12, L+16*, L+19
>> B(2 L+9*, L+13
>> DA AUT+2*
>> DOB NM+3*, NM+7, H1+2
>> E AUT+3*, AUT+4, L+26*, L+27*, L+28, E+1*, E+2*
>> E(1 L+28*, A+1
>> E(2 A+2*, A+5
>> E(3 A+1*, A+5
>> E(4 A+1*, A+2*, A+5
>> F LRAPPF1+7*, LRAPPF1+8*, LRAPPF1+9, W+2, LR+2, NM+9
>> F(1 LRAPPF1+9*, H+7
>> F(2 LRAPPF1+9*, NM+1, H+7
>> H(1 AUT+3
>> H(2 AUT+3*, EN+4*, EN+6*
IOSL NM+5, AUT+1, EN+7, EN+8, EN+17, EN+18, EN+27, EN+28, DES+10, L+4
L+5, L+10, L+11, L+17, L+18, L+23, L+24, A+3, A+4
IOST H+3
>> LR( A+2
>> LR("%" H+10
>> LR("F" LRAPPF1+10!*, H+3
>> LR("PATH" EN+2*, EN+5*, EN+11
>> LR("Q" LRAPPF1+8, LRAPPF1+11, W+2, LR+2, NM+5, NM+9, AUT+1, AUT+6, AMEN+7
EN+8, EN+14, EN+16, EN+17, EN+18, EN+25, EN+27, EN+28, DES+1, DES+9
DES+10, L+2, L+4, L+5, L+8, L+10, L+11, L+15, L+17, L+18
L+21, L+23, L+24, L+27, A+3, A+4, E+2, H+3
>> LR("SPSM" EN+14
>> LR(63 AUT+3
>> LRAA DES+4
>> LRAN DES+4
>> LRAP DES+3
>> LRAPX DES+3, DES+4
>> LRB W+2*
>> LRDFN LR+1*, LR+2*, NM+1, NM+9, AUT+2, AUT+6, AUT+7, AMAM+1, EN+2
EN+16, EN+19, EN+25, EN+26, DES+5, DES+9, L+2, L+3, L+8, L+9
L+15, L+16, L+21, L+22, L+27, L+28, E+2
>> LRDPF NM+1*
>> LRH(3 AUT+2*, AUT+4, EN+3*, EN+10, H2+2
>> LRI NM+8*, NM+9*, EN+2, EN+16, EN+19, EN+25, EN+26, DES+3, DES+4, DES+5
DES+9, L+2, L+3, L+8, L+9, L+15, L+16, L+21, L+22, L+27
L+28, E+2
LRL DES+7~, DES+8*, DES+9*
>> LRLST H+8
>> LRO(68 H+6
>> LRP NM+2*, NM+7, H1+2
>> LRPRE DES+4
>> LRQ(2 H+4
>> LRQ(3 EN+24
>> LRQ(9 H+5, H1+2
>> LRSF EN+5
LRSF515 LRAPPF1+5~*, AUT*, EN+1*, EN+7, EN+8, EN+17, EN+18, EN+27, EN+28, DES+3
DES+4, L+4, L+5, L+10, L+11, L+17, L+18, L+23, L+24, A+3
A+4, H+2
>> LRSS NM+10, DES+3, DES+4
>> LRSTR H+8
LRVAL DES+7~, DES+9*, DES+11
>> M AM*, AM+1, L+20*, L+21*, L+22, E+2
>> M(1 L+22*, L+25
>> N NM+1*, NM+2, AUT+2*, AUT+4, EN+2*, EN+6*, EN+10, H2+2
>> N(11 EN+3*, EN+12
>> O EN+15*, EN+16*, EN+19, L+2, L+3, L+8, L+9, L+15, L+16, L+21
L+22, L+27, L+28, E+2
>> O(6 EN+20*, EN+21, H3+2
>> S EN+2, EN+16, EN+19, EN+25, EN+26, DES+3, DES+4, DES+5, DES+9, L+2
L+3, L+8, L+9, L+15, L+16, L+21, L+22, L+27, L+28, A+2
E+2
>> SSN NM+2*, NM+7, H1+2
U NM+1, EN+2, EN+3
>> W W+1*, W+2*, LR+2, NM+9
>> W(3 EN+19*, EN+21, H3+2
X NM+1*, AUT+2*, AUT+6*, AUT+7, AMAM+1, EN+2*, EN+3*, EN+4, EN+19*
EN+20, DES+7~, L+9*
>> Y NM+2*, NM+3, AUT+2*, AUT+3*, AUT+7*, AUT+8, AM+1*, AM+2*, AM+3, A+1*
A+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All