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

Package: Lab Service

Routine: LRAPPA


Information

LRAPPA ;AVAMC/REG - CY/EM/SP PATIENT RPT ;8/12/95 08:15 ;

Source Information

Source file <LRAPPA.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Lab Service 5 ^LRAP  (E,W)^LRAPCUM  (L,S,V,XR)^LRU  (EN2,SET)^LRUA  END^LRUTL  
Kernel 1 ^%ZIS  
VA FileMan 1 ^%DT  

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

Package Total Caller Graph
Lab Service 1 LRAPPA  

Entry Points

Name Comments DBIA/ICR reference
A1
A2
D
END

External References

Name Field # of Occurrence
^%DT LRAPPA+3, LRAPPA+5
^%ZIS LRAPPA+3
^LRAP LRAPPA+2
E^LRAPCUM D
W^LRAPCUM D
L^LRU A2+3
S^LRU A2+3
V^LRU END
XR^LRU A2+3
EN2^LRUA LRAPPA+4
SET^LRUA A2+3
END^LRUTL A2+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,LRAA(1)," FINAL PATIENT REPORTS DISPLAY"
  • Line Location: LRAPPA+4
Function Call: READ
  • Formatting: !
  • Prompt: "Start with accession #: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: $C(7),!,"Enter a number from 1 to 99999"
  • Line Location: A1+0
Function Call: READ
  • Formatting: !
  • Prompt: "Go to accession #: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: $C(7),!,"Enter a number from 1 to 99999"
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: A2+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: D+0
Function Call: WRITE
  • Prompt: !,$P(X,"^"),?38,"SSN: ",$P(X,"^",9)
  • Line Location: D+0
Routine Call
  • %ZIS
  • Line Location:
    • LRAPPA+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] D
^LR - [#63] A2+4, D

Label References

Name Line Occurrences
@( A2+4
A1 A1
A2 A2
END LRAPPA+2, LRAPPA+5, A1A2A2+5

Naked Globals

Name Field # of Occurrence
^( A2+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT LRAPPA+3*, LRAPPA+5*
>> %DT("A" LRAPPA+5*
>> %DT("B" LRAPPA+5*
>> A D*
>> B D*
>> DIWF A2+3*
>> DIWL A2+3*
>> DIWR A2+3*
DTIME A1A2
IO A2+3, A2+4
IO(0 A2+3, A2+4
IOF A2+5, D
IOM A2+3
>> IOP LRAPPA+3*
>> LR("B" A1+1*, A2+1*, A2+2*, A2+4
>> LR("E" A2+1*, A2+4
>> LR("Y" LRAPPA+3*, LRAPPA+5*, A2+4
>> LRA A2+3*
>> LRA(1 D*
>> LRA(2 A2+3*, A2+4, D*
>> LRAA(1 LRAPPA+4
>> LRABV A2+4
>> LRAN A2+4*
LRAP LRAPPA+4!
>> LRDFN A2+4*, D
>> LRDICS LRAPPA+2*
>> LRI A2+4*, D
>> LRS(99 LRAPPA+4!
LRSAV LRAPPA+4!
>> LRSS D
>> LRXREF A2+4
U A1A2
>> X LRAPPA+3*, A1*, A1+1, A2*, A2+1*, D*
>> Y LRAPPA+2, LRAPPA+3, LRAPPA+5, D*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All