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 ;AVAMC/REG/WTY - ANAT PATH FILE PRINT BY PT ;10/16/01

Source Information

Source file <LRAPPF1.m>

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

Caller Graph Total: 3

Package Total Caller Graph
Lab Service 3 LRAPPF  LRAPQACN  LRAPT1  

Entry Points

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

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,LRP,?31,SSN
  • Line Location: NM+4
Function Call: WRITE
  • Prompt: ?51,"BORN: ",DOB
  • Condition for execution: $L(DOB)
  • Line Location: NM+4
Function Call: WRITE
  • Prompt: !!,LRP,?31,HRCN
  • Line Location: NM+5
Function Call: WRITE
  • Prompt: ?51,"BORN: ",DOB
  • Condition for execution: $L(DOB)
  • Line Location: NM+5
Function Call: WRITE
  • Prompt: !,"AUTOPSY #: ",N," AUTOPSY DATE: ",LRH(3),?51,"DIED: ",E
  • Line Location: AUT+4
Function Call: WRITE
  • Prompt: !?2,"Organ/tissue:",?17,"Date rec'd: ",LRH(3),?43,"Acc #:",N
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: ?64,$E(LR("PATH"),1,12)
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !?5,"Report not verified."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !?5,E(4)," ",E(3)," Date: ",E(2)
  • Line Location: A+3
Function Call: WRITE
  • Prompt: !,LRO(68)," "
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,"Entries listed by PATIENT (From: ",LRSTR," to: ",LRLST,")"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !,"Name",?31,"Identifier"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+7
Function Call: WRITE
  • Prompt: !?5,"Organ/tissue:",?25,"Date received: ",LRH(3),?51,"Acc #:",N
  • Line Location: H2+1
Function Call: WRITE
  • Prompt: !?5,O(6)
  • Line Location: H3+1
Function Call: WRITE
  • Prompt: " ",W(3)," gm"
  • Condition for execution: W(3)
  • Line Location: H3+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] LRAPPF1+8
^LAB(61 - [#61] AUT+7, EN+20
^LAB(61.1 - [#61.1] AM+2, L+16
^LAB(61.2 - [#61.2] E+1
^LAB(61.3 - [#61.3] L+3
^LAB(61.4 - [#61.4] L+12
^LAB(61.5 - [#61.5] L+7
^LR - [#63] NM, AUT+2, AUT+6, AUT+7, AM, AM+1, EN+2, EN+16, EN+19, EN+24
, EN+25, L, L+1, L+4, L+5, L+9, L+10, L+13, L+14, L+17
, L+18, E, E+1
^TMP($J LRAPPF1+7, W, LR, NM+6

Label References

Name Line Occurrences
@( NM+7
A L+18
AM AUT+8
E L+16
H LRAPPF1+9, NM+3, H1+2
H1 AUT+1, EN+9, H2
H2 EN+17, H3
H3 L+2, L+6, L+11, L+15, A+2
L EN+21
LR W
NM LR
W LRAPPF1+9

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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