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

Package: Lab Service

Routine: LRRS


Information

LRRS ;SLC/DCM/BA/DALOI/FHS - INTERIM REPORT BY LOCATION (MANUAL QUEUE) ;2/19/91 11:39

Source Information

Source file <LRRS.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Lab Service 6 $$DTF^LRAFUNC1  ^LRLTR  ^LRPARAM  ^LRRK  DS^LRRP2  (DATE,IO)^LRWU  
VA Fileman 2 ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Lab Service 3 LRAC LOC  LRAC LOC-LOC  LRRS BY LOC  

Entry Points

Name Comments DBIA/ICR reference
LOC
PAT
SINGLE ;from option LRRS BY LOC
DIS ;
AL0
DQ ;dequeued
BEGIN
SHOW ;Display possible choices of locations
SELLOC
SELECT
SEL ;
END
CUMSGLE ;ENTRY POINT FOR OPTION LRAC LOC
AL ;
LNAME
RANGE
CUM ;ENTRY POINT FOR CUMULATIVE OPTION LRAC LOC-LOC
WAIT
ASKPG
RNG ;
RANGE2
QUE

External References

Name Field # of Occurrence
^DIC SELLOC
^DIR ASKPG+2
$$DTF^LRAFUNC1 LOC+3, AL+3
^LRLTR SEL+2, RNG+6
^LRPARAM BEGIN
^LRRK BEGIN, END
DS^LRRP2 PAT
DATE^LRWU LOC+2
IO^LRWU QUE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?10,"No Reports for [ ",$$DTF^LRAFUNC1(LRODT),"] ",!!
  • Line Location: LOC+3
Function Call: READ
  • Timeout: DTIME
  • Line Location: LOC+4
Function Call: WRITE
  • Prompt: !,"Enter 'A', 'R', 'S' or '^' to exit"
  • Line Location: LOC+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: SELECT+1
Function Call: WRITE
  • Prompt: !!?7,"NOTHING SELECTED ",!
  • Line Location: SELECT+3
Function Call: WRITE
  • Prompt: !,"No Reports for ",$$DTF^LRAFUNC1(LRODT),!
  • Line Location: AL+3
Function Call: READ
  • Prompt: "Select Report Location: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: AL0+0
Function Call: WRITE
  • Prompt: !,I,?4,LRLOCX(I)
  • Line Location: DIS+2
Function Call: WRITE
  • Prompt: ?39," ",I,?44,LRLOCX(I)
  • Condition for execution: $D(LRLOCX(I))
  • Line Location: DIS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DIS+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: RANGE+0
Function Call: WRITE
  • Prompt: !,"Select STARTING PATIENT LOCATION: "
  • Line Location: RANGE+0
Function Call: WRITE
  • Prompt: !,"Enter the first patient location (abbreviation) that you want."
  • Line Location: RANGE+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: RANGE2+0
Function Call: WRITE
  • Prompt: !,"Select ENDING LOCATION: "
  • Line Location: RANGE2+0
Function Call: WRITE
  • Prompt: !,"Enter the last patient location (abbreviation) that you want."
  • Line Location: RANGE2+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SEL+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RNG+9
Function Call: WRITE
  • Prompt: !?10,"Select from: "
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: ?25,I,!
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOW+2
Function Call: READ
  • Prompt: "Press RETURN to continue or '^' to exit: "
  • Formatting: !!?10
  • Timeout: DTIME
  • Variable: X
  • Line Location: WAIT+0
Function Call: WRITE
  • Prompt: @IOF,!!?10,"Select from: "
  • Line Location: WAIT+1
Routine Call
  • DIC
  • Line Location:
    • SELLOC
Routine Call
  • DIR
  • Line Location:
    • ASKPG+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRO(69 - [#69] LOC+3, AL+2, RNG+2, LNAME, PAT, SHOW+1

Label References

Name Line Occurrences
@( ASKPG+4, DQ+1
AL SELECT+1
AL0 AL0+2, SELLOC, SELLOC+5
BEGIN CUM+2, SINGLE+1
LNAME SEL+2, RNG+7
LOC BEGIN
PAT LNAME
QUE SELECT+4
RANGE RANGE+1
RANGE2 RANGE2+1
WAIT SHOW+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT LOC+2!*
%DT("A" LOC+2*
>> %ZIS QUE*
A SHOW+1*, SHOW+2!
DIC LOC+1!, SELECT~, AL+4*, SELLOC+4!
DIC("S" AL+4*
DIC(0 AL+4*
DIR ASKPG+2!
DIR("A" ASKPG+1*
DIR("B" ASKPG+1*
DIR(0 ASKPG+1*
DTIME LOC+4, AL0, RANGE, RANGE2, WAIT
>> DUOUT SELLOC+3
I DIS+1~, DIS+2*, SHOW+1*
IO DQ+1
IOF SEL+2, SEL+3, RNG+4, RNG+9, WAIT+1
IOSL SHOW+1
IOST SEL+2, RNG+6
LRCNT SELECT~, AL+1*, AL+2*, AL+3, DIS+2
>> LRDFN PAT*
>> LREDT LOC+2*
>> LRELOC LOC+1*, RANGE2+2*, RNG+2
>> LREND BEGIN, LOC+1*, SELECT+2, AL+1*, AL0*, AL0+1, SEL+2, RNG+2, RNG+8, LNAME
, PAT*, SHOW+1*, SHOW+2*, WAIT*
>> LRFLOC LOC+1*, RANGE+2*, RNG+2, RNG+3*
>> LRIDT PAT*
>> LRJ0 SEL+1*, SEL+2*, RNG+1*, RNG+4, PAT+1*
>> LRLAB LOC+1*
>> LRLABKY LOC+1
LRLLOC LOC!, LOC+1*, RANGE+2*, RANGE2+2*, SEL+1*, SEL+2*, RNG+2*, RNG+3, RNG+5, LNAME
, PAT
LRLLOC( AL0+2*, SELLOC+2*, SEL+2
LRLLOC(0 SELECT+3
>> LRLOC LOC+5*, ASKPG+4, DQ+1, SINGLE+1*
LRLOCX SELECT~, AL+1*, AL+2*
LRLOCX( AL+2*, AL0+2, SELLOC+2, DIS+2
>> LRLTR SEL+2*, RNG+5*
>> LRNAME LNAME*, PAT
>> LRODT LOC+2*, LOC+3, AL+2, AL+3, RNG+2, LNAME, PAT, SHOW+1
>> LROK SHOW+2*
>> LRONESPC LOC+1*
>> LRONETST LOC+1*
>> LRPARAM BEGIN
>> LRPRTPG BEGIN*, CUM+1*, ASKPG, ASKPG+3*, CUMSGLE+1*
>> LRSDT LOC+2*, PAT
>> LRSINGLE BEGIN*, LOC+4, LOC+5, SINGLE+1*
>> LRSTOP LOC+1*, PAT
U LOC+5, SELLOC+1
>> X LOC+4*, LOC+5, AL0*, AL0+2, RANGE*, RANGE+1, RANGE+2*, RANGE2*, RANGE2+1, RANGE2+2*
, WAIT*
>> Y LOC+2, ASKPG+3, SELLOC
>> Y(0 SELLOC+1
>> Y1 SELLOC+1*, SELLOC+2
>> ZTQUEUED DQ+1
>> ZTREQ DQ+1*
>> ZTRTN QUE*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All