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

Package: Lab Service

Routine: LRUG


Information

LRUG ;AVAMC/REG/CYM - GET LRDFN ;9/3/97 09:18 ;

Source Information

Source file <LRUG.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Lab Service 1 EN1^LRDPA  

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

Package Total Caller Graph
Lab Service 3 ^LRD(65  DONATION OR DEFERRAL DATE  PATIENT XMATCHED/ASSIGNED  

Entry Points

Name Comments DBIA/ICR reference
CK
AUTO ;Check for autologous donor in patient file

External References

Name Field # of Occurrence
EN1^LRDPA LRUG+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"PATIENT: "
  • Line Location: LRUG+4
Function Call: WRITE
  • Prompt: !,LRP(1)
  • Line Location: LRUG+4
Function Call: WRITE
  • Prompt: $C(7),!!,LRP(0)," does not equal ",LRP(1)," "
  • Line Location: CK+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Dates of birth are different"
  • Line Location: CK+1
Function Call: WRITE
  • Prompt: !!,"Donor:",LRP," DOB:",LRB
  • Line Location: AUTO+1
Function Call: WRITE
  • Prompt: " SSN:",LRS(2)
  • Condition for execution: LRS(2)]""
  • Line Location: AUTO+1
Function Call: WRITE
  • Prompt: $C(7),!,LRP(0)," not entered in PATIENT FILE"
  • Line Location: AUTO+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] LRUG+4
^DPT("B" AUTO+2
^LR - [#63] LRUG+4

Label References

Name Line Occurrences
AUTO LRUG+2
CK LRUG+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A LRUG+4*
>> B LRUG+4*
DIC LRUG+3, LRUG+4!, LRUG+5*
DIC("W" LRUG+3, LRUG+5*
DIC(0 LRUG+3, LRUG+4*, LRUG+5*
LRA LRUG+2*, LRUG+4!, LRUG+6*
>> LRB AUTO+1
>> LRD CK+1
>> LRD(1 LRUG+4*, CK+1
>> LRDFN LRUG+4, LRUG+6, LRUG+8
>> LRP AUTO+1
>> LRP(0 CKAUTO+2
>> LRP(1 LRUG+4*, CK
>> LRS(2 AUTO+1
LRSAVE LRUG+3~*, LRUG+5
LRSAVE("W" LRUG+3*, LRUG+5
LRSAVE(0 LRUG+3*, LRUG+5
>> LRT LRUG+2, LRUG+7
X LRUG+2, LRUG+4*, LRUG+6!, LRUG+7, LRUG+8*, CK!, CK+1!, AUTO+1, AUTO+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All