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

Package: Lab Service

Routine: LRCAPR1


Information

LRCAPR1 ;DALOI/PAC/FHS/JBM - WKLD REP GENERATOR-MAIN ;10/15/92 11:15

Source Information

Source file <LRCAPR1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 4 ^DIC  WAIT^DICD  YN^DICN  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Lab Service 3 (ACCN,CAP,COLL,CONTROL,DATE,INSTR,IOPAT,LOC,REPTYP,SPEC,STAT,TEST)^LRCAPR1A  ^LRCAPR2  CLEAN^LRCAPR4  

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

Package Total Caller Graph
Lab Service 2 LRCAPR1  LRCAPS  

Entry Points

Name Comments DBIA/ICR reference
GO ;
EN ;
LRINST ;
TRIAL ; entry point for work load lookup
B
C
S
A
I
L ;
LOC ;
LEDIDIV ;Select LEDI Institution sites
INST
ASK ;
QUE ;
EXIT ;

External References

Name Field # of Occurrence
^%ZIS INST+15
^%ZISC QUE+7
^%ZTLOAD QUE+7
^DIC LRINST+10, INST+6
WAIT^DICD INST+16
YN^DICN TRIAL+5, A+1
^DIR LRINST+7, TRIAL+8, LOC+3, INST+4, INST+14, ASK+7
ACCN^LRCAPR1A TRIAL+2
CAP^LRCAPR1A A+4
COLL^LRCAPR1A C
CONTROL^LRCAPR1A INST+11
DATE^LRCAPR1A TRIAL+3
INSTR^LRCAPR1A I
IOPAT^LRCAPR1A INST+10
LOC^LRCAPR1A LOC+4
REPTYP^LRCAPR1A INST+12
SPEC^LRCAPR1A B, S
STAT^LRCAPR1A L+1
TEST^LRCAPR1A A+5
^LRCAPR2 INST+17
CLEAN^LRCAPR4 EXIT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Do you want to look up by Specimen Type and/or Collection Sample"
  • Line Location: TRIAL+4
Function Call: WRITE
  • Prompt: !,"Do you want to select by TESTS or WKLD CODES (YES or NO )"
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !!?5,"<You HAVEN'T selected any locations> "
  • Line Location: INST+8
Routine Call
  • %ZIS
  • Line Location:
    • INST+15
Routine Call
  • DIC
  • Line Location:
    • LRINST+10
    • INST+6
Routine Call
  • DIR
  • Line Location:
    • LRINST+7
    • TRIAL+8
    • LOC+3
    • INST+4
    • INST+14
    • ASK+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] LRINST+2, LRINST+10
^TMP("LR" EN+1!
^XMB(1 - [#4.3] LRINST+1

Label References

Name Line Occurrences
@( TRIAL+8
A TRIAL+5, C
ASK A+2
EN TRIAL+1
EXIT TRIAL+1, TRIAL+2, TRIAL+3, TRIAL+5, TRIAL+8, B, C, S, A+1, A+2
, A+4, A+5, I, L+1, LOC+1, INST, INST+10, INST+11, INST+12, INST+14
, INST+15
I A+2
L A+3, A+4
LOC INST+7
LRINST TRIAL+1
QUE INST+15
TRIAL GO+1

Naked Globals

Name Field # of Occurrence
^(0 LRINST+10, INST+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TRIAL+3*, TRIAL+5, A+1*, A+2, L+1
%DT EN+1!
>> %ZIS INST+15*
DIC EN+1!, LRINST+9*, A+2!, INST+1~, INST+5*
DIC("A" LRINST+9*, INST+5*, INST+6*
DIC(0 LRINST+9*, INST+5*
DIR EN+2!, LRINST+3!, TRIAL+1!, A+2!, LOC+2~, INST+1~, INST+13!, INST+14!
DIR("?" LRINST+5*, TRIAL+7*, ASK+2*, ASK+3*, ASK+4*, ASK+5*, ASK+6*
DIR("A" LRINST+4*, LOC+2*, INST+3*, INST+13*, ASK+1*
DIR("B" LRINST+6*, LOC+2*, INST+2*
DIR(0 LRINST+3*, TRIAL+6*, LOC+2*, INST+3*, INST+13*, ASK+1*
>> DTOUT LRINST+7, TRIAL+1, TRIAL+8, B, C, S, A+2, A+4, A+5, I
, L+1, LOC+1, INST, INST+10, INST+14
>> DUOUT LRINST+7, TRIAL+1, TRIAL+8, B, C, S, A+2, A+4, A+5, I
, L+1, LOC+1, INST, INST+10, INST+14
>> I INST+6*
IO INST+17
IO("Q" INST+15!
ION QUE+1
>> LRANS INST+14*
LRCAPS EN+1!, EN+3*, QUE+4
LRCOL EN+1!, EN+3*, QUE+3
LRCPSX EN+1!, EN+3*, QUE+5
LREDT EXIT+2!
>> LREND EN+3*, INST+11, INST+12, QUE+8*, EXIT+1*
>> LRIOPAT EN+4*
LRLDIV EN+1!, EN+3*, INST+4*, INST+6*, INST+7, INST+9*, QUE+6, EXIT+2!
LRLDIV( INST+6*
LRLOC EN+1!, EN+3*, LOC+3*, INST+2, INST+7, INST+9*, QUE+5
LRSDT EXIT+2!
>> LRSITE LRINST+2*, QUE+2
>> LRSITNUM LRINST+1*, LRINST+2
LRSITSEL EN+2!, LRINST+3*, LRINST+10*
LRSITSEL( LRINST+10*
LRSP EN+1!, EN+3*, QUE+3
>> LRTST QUE+4
LRTSTS EN+1!, EN+3*
>> POP INST+15
U LRINST+1, LRINST+2, LRINST+10, INST+6
>> Y LRINST+8, LRINST+10, TRIAL+2, TRIAL+3, TRIAL+8, A+3, A+4, LOC+3, INST+4, INST+6
, INST+14
>> ZTDESC QUE+1*
>> ZTIO QUE+1*
>> ZTRTN QUE+1*
>> ZTSAVE("LR*" QUE+1*
>> ZTSAVE("LRCAPS*" QUE+4*
>> ZTSAVE("LRCOL*" QUE+3*
>> ZTSAVE("LRCPSX*" QUE+5*
>> ZTSAVE("LRLDIV" QUE+6*
>> ZTSAVE("LRLOC*" QUE+5*
>> ZTSAVE("LRSITE*" QUE+2*
>> ZTSAVE("LRSP*" QUE+3*
>> ZTSAVE("LRTST*" QUE+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All