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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRLL1A

Package: Lab Service

Routine: LRLL1A


Information

LRLL1A ; IHS/DIR/FJE - LOAD LIST CONTROL 2/23/89 17:29 ;

Source Information

Source file <LRLL1A.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Lab Service 3 (,END)^LRLL1  CLEAR^LRLL3  DD^LRX  
VA Fileman 3 ^%DT  ^DIC  YN^DICN  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRLL  

Entry Points

Name Comments DBIA/ICR reference
END
LRSTAR
NODEF
DAT
L2
BUILD
B2
L1
C1
B1

External References

Name Field # of Occurrence
^%DT DAT, LRSTAR+1, LRSTAR+2
^DIC L1+1, NODEF+2
YN^DICN L1, C1+3, BUILD+4, B2, LRSTAR
^LRLL1 B2+1
END^LRLL1 END
CLEAR^LRLL3 L2+2, L2+3, NODEF+1
DD^LRX L2+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"All urgencys"
  • Line Location: L1+0
Function Call: WRITE
  • Prompt: !,"Build the list with all urgencys or with a range."
  • Line Location: L1+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: !,"1 Allow splitting tests from each accession between load/worklists.",!,"2 Require all tests to build or build none at all (for each accession).",!,"Choose: 1//"
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: !,"Enter 1 or 2."
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: !!,"LOAD/WORK LIST SET FOR "
  • Line Location: L2+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: L2+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: !,"HOW MANY",$S(LRTYPE:" TRAYS",1:" ENTRIES")," TO BUILD: ALL//"
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: !," ACCESSION LIST: ",$P(^LRO(68,LRAA,0),U,1)
  • Condition for execution: LRAA
  • Line Location: C1+2
Function Call: WRITE
  • Prompt: !,"Need an accession area."
  • Line Location: C1+2
Function Call: WRITE
  • Prompt: !,"USE DEFAULT SETUP"
  • Line Location: C1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: NODEF+1
Function Call: READ
  • Prompt: "Accession DATE: T//"
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: DAT+0
Function Call: READ
  • Prompt: "ACCESSION NUMBER: FIRST//"
  • Formatting: !
  • Timeout: DTIME
  • Variable: LRST
  • Line Location: DAT+1
Function Call: READ
  • Prompt: " GOTO: LAST//"
  • Formatting: !
  • Timeout: DTIME
  • Variable: LRLLT
  • Line Location: DAT+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: BUILD+1
Function Call: WRITE
  • Prompt: !,$S(LRTYPE:"TRAY",1:"SEQUENCE #")," TO START WITH: ",$S(LRTYPE:LRTRAY,1:LRCUP),"//"
  • Line Location: BUILD+1
Function Call: WRITE
  • Prompt: !?5,"Enter number to start with.",!
  • Line Location: BUILD+1
Function Call: WRITE
  • Prompt: !,"Queue build and print:"
  • Line Location: B2+0
Function Call: WRITE
  • Prompt: !?5,"Answer YES or NO.",!
  • Line Location: B2+0
Routine Call
  • DIC
  • Line Location:
    • L1+1
    • NODEF+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(62.05 - [#62.05] Classic Fileman Calls
^LRO(68 - [#68] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRO(68 - [#68] C1+2, NODEF+2, NODEF+3, BUILD+5, BUILD+7
^LRO(68.2 - [#68.2] L2+2, BUILD+3, BUILD+4, B1*

Label References

Name Line Occurrences
B1 BUILD+6
B2 B2
BUILD C1+3, NODEF+3, BUILD+1, BUILD+4
C1 C1+1
DAT DAT
END L1, L1+1, L2, L2+2, L2+3, C1
L1 L1
L2 L2
LRSTAR NODEF+3, BUILD+5, LRSTAR
NODEF C1+2

Naked Globals

Name Field # of Occurrence
^(2 L2+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% L1*, L1+1, L2+3*, C1+3*, BUILD+4*, BUILD+5, B1!, B2*, LRSTAR*, LRSTAR+1*
, LRSTAR+2*
%DT DAT*, LRSTAR+1*!, LRSTAR+2*!
%DT("A" LRSTAR+1*, LRSTAR+2*
DIC L1+1*, NODEF!, NODEF+2*!
DIC("A" L1+1*
DIC("B" NODEF+2*
DIC("S" L1+1*
DIC(0 L1+1*, NODEF+2*
DT L2+3, C1, LRSTAR+3
DTIME L2, C1, DAT, DAT+1, DAT+2, BUILD+1
DUOUT L2+1*, L2+2, L2+3, LRSTAR+2!
IO("Q" B2!*
>> L1 L1+1*
>> LAST L2+2*, L2+3, BUILD, BUILD+2
>> LRAA C1+2, NODEF+2*, NODEF+3, BUILD+5, BUILD+7
>> LRAD C1*, DAT*, BUILD+7*, LRSTAR+3*
>> LRCUP BUILD*, BUILD+1, BUILD+2*, BUILD+3*, BUILD+4, B1*
>> LRDEF C1+2*, C1+3*, BUILD+5
>> LRINST L2+2, BUILD+3, BUILD+4, B1
>> LRLLINIT B1
>> LRLLT DAT+2*
>> LRLST LRSTAR+2*, LRSTAR+3*
>> LRSPLIT L2+1*
>> LRST DAT+1*
LRSTAR C1+3!, NODEF+3, BUILD+6, LRSTAR+1*, LRSTAR+3
>> LRTRACNT C1+1*
>> LRTRAY BUILD*, BUILD+1, BUILD+2, BUILD+3*, BUILD+4, B1
>> LRTYPE C1, C1+1, BUILD+1, BUILD+2, BUILD+3
>> LRURX L1*, L1+1*
>> LRWDTL LRSTAR+3*
U C1+2, NODEF+2, NODEF+3, BUILD, BUILD+1, BUILD+2, BUILD+5, BUILD+7, B1
>> X L2*, L2+1, C1*, C1+1*, DAT*, BUILD+1*, BUILD+2*, BUILD+3, BUILD+7*
>> Y L1+1, L2+3*, NODEF+2, DAT, LRSTAR+1, LRSTAR+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All