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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: LRAPP

Package: Lab Service

Routine: LRAPP


Information

LRAPP ;DALOI/STAFF - AP PRINT ;05/29/09 12:47

Source Information

Source file <LRAPP.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Lab Service 4 ^LRAP  V^LRU  ^LRUPA  ^LRUPAD  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Lab Service 6 LRAP ADD  LRAP DELETE  LRAP PRINT ALL ON QUEUE  LRAP PRINT SINGLE  LRAPPAD  LRAPPAN  

Entry Points

Name Comments DBIA/ICR reference
P ; Print All On Queue
D ; Delete Print Queue
S ; Print Single Report
N ; Add Pt To Print Queue
T ; AP Accessions By Date
B ; AP Accessions By Number
A ;
C ; Path Reports (SP,CY,EM)
PS ; Autopsy Reports
FOC ; Final Office Copy
END ;

External References

Name Field # of Occurrence
^DIR FOC+8
^LRAP T+1, B+1, A+1
V^LRU END+1
^LRUPA B+2
^LRUPAD T+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !!?16,"1. Preliminary reports",!?16,"2. Final",?31,"reports"
  • Line Location: C+1
Function Call: WRITE
  • Prompt: $C(7),!!,"Enter '1' for preliminary reports or '2' for final "
  • Line Location: C+5
Function Call: WRITE
  • Prompt: "reports"
  • Line Location: C+6
Function Call: WRITE
  • Prompt: !!?15,"1. Autopsy protocols"
  • Line Location: PS+1
Function Call: WRITE
  • Prompt: !?15,"2. Autopsy supplementary reports",!,"Select 1 or 2: "
  • Line Location: PS+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PS+3
Function Call: WRITE
  • Prompt: $C(7),!!,"Enter '1' for autopsy protocols or '2' for autopsy "
  • Line Location: PS+5
Function Call: WRITE
  • Prompt: "supplementary reports"
  • Line Location: PS+6
Function Call: WRITE
  • Prompt: !
  • Line Location: FOC+4
Routine Call
  • DIR
  • Line Location:
    • FOC+8

Label References

Name Line Occurrences
@( LRAPP+5
A P+2, D+1, S+2, N+1
C C+4
END LRAPP+5, P+2, D+1, S+2, N+1, T+1, T+2, B+1, B+2, A+2
, C+3, PS+3
FOC P+4, P+5, S+4, S+5
LRAPP P+6, D+3, S+7, N+3
PS A+3, PS+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR FOC+2~
DIR("?" FOC+6*, FOC+7*
DIR("A" FOC+5*
DIR("B" FOC+5*
DIR(0 FOC+5*
DIRUT FOC+2~
DTIME C+2, PS+3
DTOUT FOC+2~
DUOUT FOC+2~
>> LRABV S+6*
>> LRAPX P+3*, D+2*, S+3*, N+2*
>> LRAPX(0 LRAPP+5, C+7*, PS+7*
LRFOC P+1~*, S+1~*, FOC+9*
LRSF515 LRAPP+3~, LRAPP+4*
>> LRSS P+4, P+5, S+4, S+5, A+3
U C+3, PS+3
X P+4, P+5, S+4, S+5, C+2*, C+3, C+4, C+7, PS+3*, PS+4
, PS+7, FOC+2~
Y P+2, D+1, S+2, N+1, T+1, B+1, A+2, FOC+2~, FOC+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All