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

Package: Lab Service

Routine: LRSETUP


Information

LRSETUP ;SLC/CJS/DALISC/FHS - REINITIALIZE DATA FILES ;2/6/91 14:34 ;

Source Information

Source file <LRSETUP.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 YN^DICN  ^DIE  
Lab Service 1 END^LRDPA  

Entry Points

Name Comments DBIA/ICR reference
FRESH
POST

External References

Name Field # of Occurrence
YN^DICN POST+7, POST+8
^DIE LRSETUP+5
END^LRDPA POST+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,">> I WILL DO SOME FILE CHECKING AND THIS MAY TAKE A LITTLE WHILE <<",!!
  • Line Location: LRSETUP+2
Function Call: WRITE
  • Prompt: !!?7,"Someone else is editing the Automated Instrument file ",!!,$C(7)
  • Line Location: LRSETUP+4
Function Call: WRITE
  • Prompt: !,"I have added a LSI controller #1 to the auto instrument file",!,"Please check this entry after the init is finished",!,$C(7)
  • Line Location: LRSETUP+5
Function Call: WRITE
  • Prompt: !,"Not cleared for this option."
  • Line Location: FRESH+0
Function Call: WRITE
  • Prompt: !!,"This procedure will purge/kill all entries in the ^LR( global"
  • Line Location: POST+0
Function Call: WRITE
  • Prompt: !,"and the ^LRO( global. This should not be ran by any site already"
  • Line Location: POST+1
Function Call: WRITE
  • Prompt: !,"running the Laboratory Package. It should only be used by First"
  • Line Location: POST+2
Function Call: WRITE
  • Prompt: !,"Time Installation Sites. If your are not a First Time installation"
  • Line Location: POST+3
Function Call: WRITE
  • Prompt: !,"DO NOT RUN this routine. If you have questions, contact your "
  • Line Location: POST+4
Function Call: WRITE
  • Prompt: !,"Information Systems Center (ISC) before continuing"
  • Line Location: POST+5
Function Call: WRITE
  • Prompt: !!?10,"Do you Wish to continue "
  • Line Location: POST+6
Function Call: WRITE
  • Prompt: !!,"In order to continue, you must answer the next prompt by"
  • Line Location: POST+9
Function Call: WRITE
  • Prompt: !,"entering 'YES' -- A simple 'Y' will not work",!
  • Line Location: POST+10
Function Call: READ
  • Variable: ANS
  • Timeout: 100
  • Line Location: POST+11
Function Call: WRITE
  • Prompt: !!,"IF YOU ARE READY ANSWER 'YES' "
  • Line Location: POST+11
Function Call: WRITE
  • Prompt: !!?5,"This will take a while ",!
  • Line Location: POST+12
Function Call: WRITE
  • Prompt: !!?10,"Your files have been purged to day 1 status",!!
  • Line Location: POST+29
Routine Call
  • DIE
  • Line Location:
    • LRSETUP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(62.4 - [#62.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] POST+16!
^LAB(62.3 - [#62.3] POST+17!, POST+18!
^LAB(62.4 - [#62.4] LRSETUP+3, LRSETUP+4, LRSETUP+6
^LAB(64.5 - [#64.5] LRSETUP+8*
^LAC( POST+23
^LAC("LRAC" - [#64.7] POST+24!*
^LAC(0 POST+23*
^LR - [#63] POST+13!
^LR("AAU" POST+13!
^LR(0 POST+13*
^LRD(65 - [#65] POST+14*
^LRE - [#65.5] POST+15!
^LRE("AD" POST+15!
^LRE("AT" POST+15!
^LRE("B" POST+15!
^LRE(0 POST+15*
^LRO(64.1 - [#64.1] POST+28!*
^LRO(67.9 - [#67.9] POST+20!*
^LRO(68 - [#68] POST+21!, POST+24!
^LRO(68.2 - [#68.2] LRSETUP+7, POST+25
^LRO(69 - [#69] POST+24!*
^LRO(69.1 - [#69.1] POST+26!*
^LRO(69.2 - [#69.2] POST+22!, POST+27!*
^LRT( POST+19!
^XUSEC("LRLIASON" FRESH

Label References

Name Line Occurrences
POST POST+7, POST+8

Naked Globals

Name Field # of Occurrence
^( LRSETUP+7, POST+14!, POST+17, POST+23!, POST+25!
^("AAUA" POST+13!
^("AC" POST+24!
^("ACY" POST+13!
^("ACYA" POST+13!
^("AD" POST+13!
^("AEM" POST+13!
^("AEMA" POST+13!
^("ASP" POST+13!
^("ASPA" POST+13!
^("AVS" POST+24!
^("B" POST+13!
^("C" POST+15!
^("D" POST+15!
^("DEV" POST+24!
^("G" POST+15!
^("G4" POST+15!
^("LGOT" POST+24!
^("LRPHSET" POST+24!
^("MI" POST+24!
^(0 LRSETUP+5*, LRSETUP+7*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % POST+7*, POST+8*
>> A POST+14*
>> ANS POST+11*
>> DA LRSETUP+5*
>> DFN POST+18*
>> DIE LRSETUP+5*
>> DR LRSETUP+5*
DUZ FRESH
>> F POST+19*
>> I LRSETUP+7*, POST+13*, POST+14*, POST+15*, POST+16*, POST+17*, POST+18*, POST+19*, POST+21*, POST+22*
POST+23*, POST+25*
>> J LRSETUP+7*, POST+22*
>> K LRSETUP+7*
>> LRDPF POST+18*
U POST+17, POST+20, POST+26, POST+27, POST+28
>> X POST+14*, POST+17*, POST+20*, POST+24*, POST+26*, POST+27*, POST+28*
Info |  Source |  Call 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