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

Package: Lab Service

Routine: LRUC


Information

LRUC ; IHS/DIR/AAB - GET PATIENT LOCATION 5/30/96 22:22 ; [ 07/22/2002 1:54 PM ]

Source Information

Source file <LRUC.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Lab Service 1 (RX,YN)^LRU  
Registration 1 $$SITE^VASITE  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 DATE/TIME UNIT RELOCATION  

Entry Points

Name Comments DBIA/ICR reference
C
EN ;
END
F
REST
XR
MORE

External References

Name Field # of Occurrence
RX^LRU EN+2
YN^LRU REST+4, F
$$SITE^VASITE LRUC+3, REST+2, XR, EN+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+2
Function Call: WRITE
  • Prompt: $J(Z,2),?5,A,!
  • Line Location: REST+2
Function Call: WRITE
  • Prompt: !
  • Line Location: REST+3
Function Call: READ
  • Prompt: ": "
  • Timeout: DTIME
  • Variable: A(2)
  • Line Location: C+1
Function Call: WRITE
  • Prompt: !
  • Line Location: C+2
Function Call: WRITE
  • Prompt: $J(Z,2),?5,A(1),?40,"Abbrev: ",X,!
  • Line Location: XR+0
Function Call: WRITE
  • Prompt: $C(7),"No STANDARD LOCATIONS to choose from.",!,"You may enter a NON-STANDARD LOCATION",!
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !?3
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: A,!?3
  • Line Location: EN+3
Function Call: READ
  • Prompt: "'^' TO STOP: "
  • Timeout: DTIME
  • Variable: A(2)
  • Line Location: MORE+0
Function Call: WRITE
  • Prompt: $C(13),$J("",15),$C(13),?3
  • Line Location: MORE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] LRUC+3, REST+2, XR, EN+3
^SC("B" LRUC+3, REST+2, EN+1, EN+3
^SC("C" REST, XR
^SC(0 EN+2
^TMP("LRLOC" REST+2*, F, XR*, END!

Label References

Name Line Occurrences
C REST+2, REST+3, XR, XR+1
END LRUC+4, REST
F C
MORE EN+3
REST LRUC+4
XR REST

Naked Globals

Name Field # of Occurrence
^(0 EN+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % REST+4*, F*, EN+2*
A REST!, REST+1*, REST+2*, C+1*, F+1*, XR*, EN+3*, MORE*
A(1 XR*, EN+3*, MORE+1*
A(2 REST+1*, REST+2, REST+3, C*, C+1*, C+2, F, F+1*, XR, XR+1
, EN+3*, MORE*
B LRUC+3*, LRUC+4, REST!, REST+2*, REST+3, EN+3*
C LRUC+3*, REST!, REST+2*, EN+3*
DT LRUC+3, REST+2, XR, EN+3
DTIME C+1, MORE
DUZ(2 LRUC+3, REST+2, XR, EN+3
>> LR("%" EN+2*
LRDIV EN+3~*
U LRUC+3, REST+2, XR, EN+3
X LRUC+3, REST, REST+1, REST+2, REST+3!, REST+4!, C+1!, F*!, XR, XR+1!
, EN+2
>> Z REST+1*, REST+2*, C, C+1, F, F+1, XR*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All