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

Package: Lab Service

Routine: LRWU3


Information

LRWU3 ;SLC/RWF - COLLECT STARTING AND ENDING DATES FOR REPORTS ; 7/23/87 14:17 ;

Source Information

Source file <LRWU3.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^%DT  C^%DTC  YN^DICN  
Lab Service 1 $$DTF^LRAFUNC1  

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

Package Total Caller Graph
Lab Service 29 LRACSUM  LRARC1A  LRARCR1A  LRCAPR1A  LRDCOM  LRDIST  LRDIST4  LRGEN  
LRGP1  LRGVP  LRLIST  LRLISTE  LRLSTWRK  LRLSTWRL  LRMIHDR  LRMIPC  
LRRD  LRRP2  LRRP3  LRRS12  LRRSP  LRSORC  LRSORD  LRTOCOST  
LRTT5  LRVR  LRWRKINC  LRWRKLST  LRWRKS  
Automated Lab Instruments 1 LA7SMU1  

Entry Points

Name Comments DBIA/ICR reference
A1
A2
A3
LRAN ;get first and last LRAN
W1
W2
W3
STAR ;set LRSTAR if list by date instead of accession number
S3
ADATE ;Get an accession date
ADHELP

External References

Name Field # of Occurrence
^%DT A1, A1+1, A2, A2+2, STAR+3, STAR+4, ADATE+2
C^%DTC A1+4
YN^DICN STAR+1
$$DTF^LRAFUNC1 A1+4

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !,"Date to START with: TODAY//"
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !,"Enter the most recent date you want."
  • Line Location: A1+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: !,"Date to END with: ",$S($D(LREDT):LREDT,1:"LAST"),"//"
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: !,"Enter the oldest date you want.",!
  • Line Location: A2+0
Function Call: WRITE
  • Prompt: " (LAST)"
  • Line Location: A2+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: W1+0
Function Call: WRITE
  • Prompt: !,"First Accession number: 1//"
  • Line Location: W1+0
Function Call: WRITE
  • Prompt: !,"Enter the first Accession number to use"
  • Line Location: W1+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: !,"Last Accession number: LAST//"
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: !,"Enter the Last Accession to use."
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: !,"The last Accession number MUST be greater or equal to",!," the first Accession number"
  • Line Location: W2+1
Function Call: WRITE
  • Prompt: !,"Do you wish to list by date (rather than by accession number)"
  • Line Location: STAR+1
Function Call: WRITE
  • Prompt: !,"Answer 'Y'es or 'N'o."
  • Line Location: STAR+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ADATE+1
Function Call: WRITE
  • Prompt: !,"Enter the date of the accession to be used. If the accession is done",!," on a yearly basis, enter the year, such as ",$E(DT,2,3),!
  • Line Location: ADHELP+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRO(68 - [#68] ADATE+3

Label References

Name Line Occurrences
A1 A1, A1+1
A2 A2, A2+2
A3 A1+1, A2+1
ADATE ADATE+2, ADHELP+1
ADHELP ADATE+2
LRAN W2+1
S3 STAR+3
W1 W1
W2 W2
W3 W1, W2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % STAR+1*, STAR+2, ADATE+3*
%DT A1*, A1+1*, A2*, A2+2*, A3!, STAR+3*, STAR+4*, S3!, ADATE+2*, ADATE+4!
%DT("A" STAR+3*, STAR+4*
DT STAR+5, ADHELP
DTIME LRWU3+2*, A1, A2, W1, W2, ADATE+1
>> DTOUT ADATE+1*
>> I STAR+1*
>> LAST STAR+4*, STAR+5*
>> LRAA ADATE+3
>> LRAD STAR+5*, ADATE+4*
>> LREDT A1+2, A1+4*, A2, A2+1*, A2+2*, A2+3*
>> LREND LRWU3+2*, A1*, A1+1*, A2*, A2+1*, LRAN+2*, W1*, W2*, STAR+1*, STAR+2*
, ADATE+1*
>> LRFAN LRAN+1*, W1+1*, W2+1
>> LRLAN LRAN+1*, W2+1*
>> LRSDT LRWU3+2*, A1+1*, A1+4, A2+3*, A3*
LRSTAR STAR+1!, STAR+3*, STAR+5
>> LRWDTL STAR+5*
U LRWU3+2*, A1+1, A2+1, W1, W2, ADATE+1, ADATE+3
>> X A1*, A1+1*, A1+4, A2*, A2+1, A2+2*, A2+3*, W1*, W1+1, W2*
, W2+1, ADATE+1*, ADATE+2
X1 A1+3~, A1+4*
X2 A1+3~, A1+4*
>> Y A1+1, A2+2, A2+3, STAR+3, STAR+4, ADATE+1*, ADATE+2, ADATE+3*, ADATE+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All