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

Package: Lab Service

Routine: LRAPS


Information

LRAPS ; IHS/DIR/AAB - AP PATIENT SCREEN DISPLAY 8/6/97 14:06 ; [ 05/04/98 4:23 PM ]

Source Information

Source file <LRAPS.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Lab Service 5 S^LRAPS1  ^LRAPS2  ^LRDPA  (L,V,YN)^LRU  EN^LRUA  
Kernel 1 ^%ZIS  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPT  

Entry Points

Name Comments DBIA/ICR reference
GETP
M
AU
HDR ;W @IOF,$E(LRP,1,30),?31,SSN,?50,"DOB: ",DOB,?68,"LOC: ",$E(LRLLOC,1,5) Q

External References

Name Field # of Occurrence
^%ZIS LRAPS+4
S^LRAPS1 GETP+5
^LRAPS2 AU
^LRDPA GETP
L^LRU LRAPS+4
V^LRU GETP
YN^LRU GETP+1
EN^LRUA LRAPS+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?15,"DISPLAY cum path data summary for a patient"
  • Line Location: LRAPS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: GETP+0
Function Call: WRITE
  • Prompt: !!,"Is this the patient "
  • Line Location: GETP+1
Function Call: WRITE
  • Prompt: $C(7),!!,"No tissue pathology results for this patient.",!!
  • Line Location: GETP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: M+0
Function Call: READ
  • Prompt: "'^' TO STOP: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: LRA("A")
  • Line Location: M+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: M+1
Function Call: WRITE
  • Prompt: @IOF,$E(LRP,1,30),?31,HRCN,?50,"DOB: ",DOB,?68,"LOC: ",$E(LRLLOC,1,5)
  • Line Location: HDR+1
Routine Call
  • %ZIS
  • Line Location:
    • LRAPS+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] GETP+2, GETP+4, AU

Label References

Name Line Occurrences
AU GETP+4
GETP GETP+1, GETP+2, GETP+5, AU+1
HDR GETP+5
M M+1

Naked Globals

Name Field # of Occurrence
^("AU" GETP+2, AU
^("CY" GETP+4
^("EM" GETP+2, GETP+4
^("SP" GETP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % GETP+1*
DIC GETP!
>> DOB GETP+3*, HDR+1
DTIME M+1
DUZ LRAPS+3
>> HRCN HDR+1
IOF LRAPS+5, HDR+1
>> IOP LRAPS+4*
IOSL M
>> LR("Q" LRAPS+4*
>> LRA("A" GETP*, GETP+5, M+1*
LRAU AU!
>> LRDFN GETP, GETP+2, GETP+4, AU
>> LRDPAF LRAPS+4*
>> LRLLOC HDR+1
>> LRP HDR+1
>> LRS(5 LRAPS+4*
>> X M*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All