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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRAPED

Package: Lab Service

Routine: LRAPED


Information

LRAPED ;AVAMC/REG/WTY - ANATOMIC PATH EDIT LOG-IN ;11/20/01

Source Information

Source file <LRAPED.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Lab Service 6 ^LRAP  (C,C1)^LRAPSWK  D^LRAUAW  (CK,D,V,XR,YN)^LRU  K^LRUDEL  ^LRUP  
VA Fileman 4 ^%DT  EN^DDIOL  ^DIE  $$GET1^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPED  

Entry Points

Name Comments DBIA/ICR reference
A ;Autopsy
CK ;
SET ;
END ;
HELP ;
G ;
EDIT ;
DIE ;
K ;
I ;Non-autopsy sections (SP,CY,EM)
AU ;
SET1 ;
CK1 ;

External References

Name Field # of Occurrence
^%DT LRAPED+13
EN^DDIOL A+6
^DIE DIE+3, AU+1
$$GET1^DIQ A+1, A+2
^LRAP LRAPED+6
C^LRAPSWK I+10
C1^LRAPSWK DIE+6
D^LRAUAW SET1+4
CK^LRU DIE+1
D^LRU LRAPED+15, I+7, A+9
V^LRU END+1
XR^LRU LRAPED+7
YN^LRU LRAPED+10, EDIT+6, A+7
K^LRUDEL K+1
^LRUP EDIT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"EDIT ",LRO(68)," (",LRABV,") Log-In/Clinical Hx for ",LRH(0)," "
  • Line Location: LRAPED+9
Function Call: WRITE
  • Prompt: !!,"Enter ",LRO(68)," Accession #: "
  • Line Location: G+1
Function Call: WRITE
  • Prompt: $C(7)," Not in file"
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !,LRP," ID: ",SSN," OK "
  • Line Location: EDIT+4
Function Call: WRITE
  • Prompt: !,LRP," ID: ",HRCN," OK "
  • Line Location: EDIT+5
Function Call: WRITE
  • Prompt: !,"Specimen date: ",Y
  • Line Location: I+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DIE+1
Function Call: WRITE
  • Prompt: !!,"Edit Weights & Measurements "
  • Line Location: A+7
Function Call: WRITE
  • Prompt: !!,"Date Died: ",Y
  • Line Location: A+10
Function Call: WRITE
  • Prompt: !
  • Line Location: AU+1
Function Call: WRITE
  • Prompt: $C(7),!!,"Please do not exit EDIT with an ""^""."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"Press RETURN key repeatedly to complete the edit.",!!
  • Line Location: HELP+2
Routine Call
  • DIE
  • Line Location:
    • DIE+3
    • AU+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LR - [#63] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] EDIT+1, EDIT+3!, EDIT+5, I+1, I+2, I+4!, I+5, I+8, DIE+6, A+8
, CK+1
^LRO(68 - [#68] CK1+1, CK1+2, CK1+5*, CK1+7!, CK1+8*, CK1+9, K+1, K+2, K+3!, K+4!
, K+5, K+7*, K+8
^LRO(69.2 - [#69.2] K+10, K+11, K+12, K+13, K+14, K+16*, K+17

Label References

Name Line Occurrences
@( LRAPED+8, EDIT+7
AU AU+2
CK DIE+5
CK1 AU+3
DIE DIE+4
EDIT G+5
END LRAPED+8, LRAPED+10, LRAPED+11, G+2
G G+3, G+6
HELP DIE+4, AU+2
K CK+1
SET DIE+3
SET1 A+9

Naked Globals

Name Field # of Occurrence
^( K+10!
^(0 I+8, CK1+1
^(3 CK1+2*, CK1+9*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LRAPED+10*, LRAPED+11, EDIT+6*, SET1+3, A+7*
%DT LRAPED+12*, LRAPED+13!
%DT("A" LRAPED+12*
%DT(0 LRAPED+12*
>> A K+9*, K+10, K+11, K+12, K+13, K+14, K+16, K+17
>> DA I+6*, SET1+1*, A+8*
>> DA(1 I+6*
>> DIE I+6*, SET1+1*, A+8*
>> DR SET+2*, SET+3*, SET+4*, SET1+1*, SET1+2*, SET1+3*
>> DR(2 SET+5*, SET+6*, SET+7*
DTIME G+1
DUZ(2 K+4
>> HRCN EDIT+5
>> LR("CK" DIE+2!
>> LR(63 SET1+5, A+12
>> LRAA CK1+1, CK1+2, CK1+5, CK1+7, CK1+8, CK1+9, K+1, K+2, K+3, K+4
, K+5, K+7, K+8, K+10, K+11, K+12, K+13, K+14, K+16, K+17
>> LRABV LRAPED+9, EDIT+1, EDIT+3, I+1, I+4
>> LRAD LRAPED+15*, LRAPED+16, CK1+1, CK1+2, CK1+5, CK1+7, CK1+8, CK1+9, K+1, K+3
, K+4, K+5, K+7
>> LRAN G+1*, G+2, G+3, EDIT+1, EDIT+3, I+1, I+4, CK1+1, CK1+2, CK1+5
, CK1+7, CK1+8, CK1+9, K+1, K+3, K+4, K+6, K+10
>> LRB I+6*, SET1+5*, A+11, CK1+2, CK1+9
>> LRC LRAPED+16*, EDIT+1, EDIT+3, I+1, I+4
>> LRCAPA LRAPED+8, I+10, DIE+6
LRCOMP LRAPED+5~, A+2*, A+3
>> LRD CK1+6*, CK1+7
>> LRDFN EDIT+1*, EDIT+2, EDIT+3, EDIT+5, I+1, I+2, I+4, I+5, I+6, I+8
, DIE+6, SET1+1, A+1, A+2, A+8, CK+1
>> LRE SET+1*
>> LRF SET+1*
>> LRH(0 LRAPED+9, LRAPED+15*
>> LRI I+1*, I+2, I+4, I+5, I+6, I+8, DIE+6, SET1+5*, CK+1, CK1+2
>> LRJ SET+1*, SET1+1*
>> LRLLOC CK1+3
>> LRMD CK1+3
LRMSG LRAPED+5~, A+4!, A+5*, A+6
>> LRO(68 LRAPED+9, G+1
>> LRP EDIT+5
>> LRRC I+5*, A+8*, CK1+3, CK1+8, K+3
LRREL LRAPED+5~, A+1*, A+3
>> LRSS LRAPED+8, EDIT+7, I+2, I+5, I+6, I+8, DIE+6, SET+5, SET+6, SET+7
, CK+1
>> LRSVC CK1+3
LRTMP LRAPED+5~, CK1+3*, CK1+4*, CK1+5, K+6*, K+7, K+15*, K+16
>> LRXREF EDIT+1, EDIT+3, I+1, I+4
U G+2, A+8, CK1+3, CK1+4, CK1+6, CK1+9
>> X LRAPED+8, EDIT+5*, I+5*, I+6, CK1+1*, CK1+3, CK1+4, CK1+6, CK1+9*, K+5*
, K+6, K+14*, K+15
>> X(1 K+11*, K+15
>> Y LRAPED+6, LRAPED+11, LRAPED+14, LRAPED+15*, I+6*, I+7, DIE+4, SET1+5*, A+10, AU+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All