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

Package: Engineering

Routine: ENY2K


Information

ENY2K ;;(WIRMFO)/DH-Equipment Y2K Management ;5.18.98

Source Information

Source file <ENY2K.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Engineering 5 IX^ENLIB1  GETEQ^ENUTL  (DATA,UPDATE)^ENY2K1  OVERWRT^ENY2K8  LOC1^ENY2K9  
VA FileMan 2 ^DIC  ^DIR  

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

Package Total Caller Graph
Engineering 8 ENY2KCAT  ENY2KCSN  ENY2KIND  ENY2KLOC  ENY2KMFG  ENY2KMOD  ENY2KR1  ENY2REP3  

Entry Points

Name Comments DBIA/ICR reference
IND ; data entry for manually selected equipment list
CAT ; data entry by EQUIPMENT CATEGORY
CAT1
CSN ; data entry by CATEGORY STOCK NUMBER
CSN1
MFG ; data entry by MANUFACTURER (all models)
MFG1
LOC ; data entry by LOCAL ID
MOD ; data entry by MANUFACTURER and MODEL
MOD1
MOD2
EXIT

External References

Name Field # of Occurrence
^DIC CAT1+1, CSN1+1, MFG1+1, MOD1+1
^DIR IND+18, CAT1+10, CSN1+10, MFG1+10, MOD2+13
IX^ENLIB1 MOD2+4
GETEQ^ENUTL IND+9
DATA^ENY2K1 IND+5, CAT+5, CSN+5, MFG+5, LOC+5, MOD+5
UPDATE^ENY2K1 IND+20, CAT+7, CSN+7, MFG+7, LOC+7, MOD+7
OVERWRT^ENY2K8 IND+19, CAT1+12, CSN1+12, MFG1+12, MOD2+15
LOC1^ENY2K9 LOC+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"First we'll get answers for the Y2K questions, then we'll ask for an",!,"equipment list.",!
  • Line Location: IND+4
Function Call: WRITE
  • Prompt: !,?5,"Sorry, but "_+Y_" is not an active equipment record."
  • Line Location: IND+11
Function Call: WRITE
  • Prompt: !!,"You have selected "_COUNT_" equipment records for updating."
  • Line Location: IND+15
Function Call: WRITE
  • Prompt: !,"Do you wish to proceed?"
  • Line Location: IND+16
Function Call: WRITE
  • Prompt: !
  • Line Location: CAT1+0
Function Call: WRITE
  • Prompt: !,"Another user is editing this equipment category. Can't proceed."
  • Line Location: CAT1+3
Function Call: WRITE
  • Prompt: !!,"There are no active equipment records in the EQUIPMENT CATEGORY of",!,CAT_"."
  • Line Location: CAT1+7
Function Call: WRITE
  • Prompt: !!,"There are "_COUNT_" active equipment records in the "_CAT,!,"EQUIPMENT CATEGORY. Do you wish to proceed?"
  • Line Location: CAT1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: CSN1+0
Function Call: WRITE
  • Prompt: !,"Another user is editing this CATEGORY STOCK NUMBER. Can't proceed."
  • Line Location: CSN1+3
Function Call: WRITE
  • Prompt: !!,"There are no active equipment records whose CATEGORY STOCK NUMBER is",!,CSN_"."
  • Line Location: CSN1+7
Function Call: WRITE
  • Prompt: !!,"There are "_COUNT_" active equipment records whose CATEGORY STOCK ",!,"NUMBER is "_CSN_". Do you wish to proceed?"
  • Line Location: CSN1+8
Function Call: WRITE
  • Prompt: !,"Another user is editing this MANUFACTURER. Can't proceed."
  • Line Location: MFG1+3
Function Call: WRITE
  • Prompt: !!,"There are no active equipment entries manufactured by "_MFG_"."
  • Line Location: MFG1+7
Function Call: WRITE
  • Prompt: !!,"There are "_COUNT_" equipment entries that were manufactured by",!,MFG_". Do you wish to proceed?"
  • Line Location: MFG1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: MOD1+0
Function Call: WRITE
  • Prompt: !!,"There are no active equipment records for devices made by",!,MFG_"."
  • Line Location: MOD1+3
Function Call: READ
  • Formatting: !
  • Prompt: "Please enter the MODEL (as recorded in Equipment File): "
  • Variable: X
  • Timeout: DTIME
  • Line Location: MOD2+0
Function Call: WRITE
  • Prompt: !,"Enter a valid MODEL number (ex: "_$O(^ENG(6914,"E","M"))_")."
  • Line Location: MOD2+1
Function Call: WRITE
  • Prompt: "??",*7
  • Line Location: MOD2+2
Function Call: WRITE
  • Prompt: !,"Another user is editing this MANUFACTURER~MODEL. Can't proceed."
  • Line Location: MOD2+6
Function Call: WRITE
  • Prompt: !!,"There are no active equipment records for which MANUFACTURER and MODEL are",!,MFG_" and "_MOD_", respectively."
  • Line Location: MOD2+10
Function Call: WRITE
  • Prompt: !!,"There are "_COUNT_" active equipment records that meet your search criteria.",!,"Do you wish to proceed?"
  • Line Location: MOD2+11
Routine Call
  • DIC
  • Line Location:
    • CAT1+1
    • CSN1+1
    • MFG1+1
    • MOD1+1
Routine Call
  • DIR
  • Line Location:
    • IND+18
    • CAT1+10
    • CSN1+10
    • MFG1+10
    • MOD2+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6911 - [#6911] Classic Fileman Calls
^ENG(6914 - [#6914] Classic Fileman Calls
^ENCSN(6917 - [#6917] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG("CAT" CAT+3, CAT+6, CAT+8, CAT1+3, CAT1+7, CAT1+11
^ENG("CSN" CSN+3, CSN+6, CSN+8, CSN1+3, CSN1+11
^ENG("LOC" LOC+3, LOC+6, LOC+8
^ENG("MFG" - [#6912] MFG+3, MFG+6, MFG+8, MFG1+3, MFG1+7, MFG1+11, MOD+3, MOD+6, MOD+8, MOD2+6
, MOD2+10, MOD2+14
^ENG(6914 - [#6914] IND+9, IND+11, IND+12, CAT1+5, CAT1+6, CSN1+5, CSN1+6, MFG1+5, MFG1+6, MOD1+3
, MOD2+1, MOD2+2, MOD2+8, MOD2+9
^TMP($J IND+1!, IND+10, IND+12*, IND+13*, IND+14, CAT1!, CAT1+6*, CSN1!, CSN1+6*, MFG1!
, MFG1+6*, MOD1!, MOD2+9*, EXIT!

Label References

Name Line Occurrences
CAT1 CAT+2, CAT1+3, CAT1+7, CAT1+11
CSN1 CSN+2, CSN1+3, CSN1+7, CSN1+11
EXIT IND+6, IND+21, CAT+9, CSN+9, MFG+9, LOC+9, MOD+9
MFG1 MFG+2, MFG1+3, MFG1+7, MFG1+11
MOD1 MOD+2, MOD1+3, MOD2+6, MOD2+10, MOD2+14
MOD2 MOD2+1, MOD2+2

Naked Globals

Name Field # of Occurrence
^(1 MOD2+9
^(3 CAT1+6, CSN1+6, MFG1+6, MOD2+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CAT CAT+1~, CAT+3, CAT+6, CAT+8*, CAT1+2*, CAT1+3*, CAT1+7*, CAT1+8, CAT1+11*
CAT(0 CAT+8*, CAT1+2*, CAT1+3*, CAT1+5, CAT1+7*, CAT1+11*
COUNT IND+2~, IND+3*, IND+13*, IND+15, CAT+1~, CAT1+5*, CAT1+6*, CAT1+7, CAT1+8, CSN+1~
, CSN1+5*, CSN1+6*, CSN1+7, CSN1+8, MFG+1~, MFG1+5*, MFG1+6*, MFG1+7, MFG1+8, LOC+1~
, MOD+1~, MOD2+8*, MOD2+9*, MOD2+10, MOD2+11
COUNT( IND+7*, IND+12*, CAT1+4*, CAT1+6*, CSN1+4*, CSN1+6*, MFG1+4*, MFG1+6*, MOD2+7*, MOD2+9*
COUNT("PRE" IND+12*, IND+19, CAT1+6*, CAT1+12, CSN1+6*, CSN1+12, MFG1+6*, MFG1+12, MOD2+9*, MOD2+15
>> CRITER CAT1+12, CSN1+12, MFG1+12, MOD2+15
CSN CSN+1~, CSN+3, CSN+6, CSN+8*, CSN1+2*, CSN1+3*, CSN1+7*, CSN1+8, CSN1+11*
CSN(0 CSN+8*, CSN1+2*, CSN1+3*, CSN1+5, CSN1+7*, CSN1+11*
DA CAT+1~, CAT1+5*, CAT1+6, CSN+1~, CSN1+5*, CSN1+6, MFG+1~, MFG1+5*, MFG1+6, LOC+1~
, MOD+1~, MOD2+8*, MOD2+9
DATE LOC+1~
DIC IND+2~, IND+8*, CAT+1~, CAT1+1*, CSN+1~, CSN1+1*, MFG+1~, MFG1+1*, LOC+1~, MOD+1~
, MOD1+1*, MOD2+3*
DIC(0 IND+8*, CAT1+1*, CSN1+1*, MFG1+1*, MOD1+1*
DIE CAT+1~, CSN+1~, MFG+1~, LOC+1~, MOD+1~
DIR IND+18!, CAT1+10!, CSN1+10!, MFG1+10!, MOD2+13!
DIR("B" IND+17*, CAT1+9*, CSN1+9*, MFG1+9*, MOD2+12*
DIR(0 IND+17*, CAT1+9*, CSN1+9*, MFG1+9*, MOD2+12*
>> DIRUT IND+18, CAT1+10, CSN1+10, MFG1+10, MOD2+13
DR CAT+1~, CSN+1~, MFG+1~, LOC+1~, MOD+1~
DTIME MOD2
>> END LOC+8*
ENDX MOD+1~, MOD2+3*
ENY2K IND+2~, CAT+1~, CSN+1~, MFG+1~, LOC+1~, MOD+1~
ENY2K("CONT" CAT+5, CAT1+11*, CSN+5, CSN1+11*, MFG+5, MFG1+11*, LOC+5, MOD+5, MOD2+14*
ESCAPE IND+2~, IND+6, IND+20, CAT+1~, CAT+2, CAT+3, CAT+4, CAT+6, CAT1+1*, CAT1+10*
, CSN+1~, CSN+2, CSN+3, CSN+4, CSN+6, CSN1+1*, CSN1+10*, MFG+1~, MFG+2, MFG+3
, MFG+4, MFG+6, MFG1+1*, MFG1+10*, LOC+1~, LOC+2, LOC+3, LOC+4, LOC+6, MOD+1~
, MOD+2, MOD+3, MOD+4, MOD+6, MOD1+1*, MOD2*, MOD2+13*
>> J IND+7*, CAT1+4*, CSN1+4*, MFG1+4*, MOD2+7*
LOC LOC+1~, LOC+3, LOC+6, LOC+8*
LOC(0 LOC+8*
MFG MFG+1~, MFG+3, MFG+6, MFG+8*, MFG1+2*, MFG1+3*, MFG1+7*, MFG1+8, MFG1+11*, MOD+1~
, MOD+3, MOD+6, MOD+8*, MOD1+2*, MOD1+3*, MOD2*, MOD2+6*, MOD2+10*, MOD2+14*
MFG(0 MFG+8*, MFG1+2*, MFG1+3*, MFG1+5, MFG1+7*, MFG1+11*, MOD+8*, MOD1+2*, MOD1+3*, MOD2*
, MOD2+6*, MOD2+9, MOD2+10*, MOD2+14*
MOD MOD+1~, MOD+3, MOD+6, MOD+8*, MOD2+5*, MOD2+6*, MOD2+8, MOD2+10*, MOD2+14*
PAGE LOC+1~
U IND+11, IND+12, CAT1+2, CAT1+6, CSN1+2, CSN1+6, MFG1+2, MFG1+6, MOD1+2, MOD2+9
>> X IND+12*, CAT1+6*, CSN1+6*, MFG1+6*, MOD2*, MOD2+1, MOD2+2, MOD2+5, MOD2+9*
>> Y IND+9, IND+10, IND+11, IND+12, IND+13, IND+18, CAT1+1, CAT1+2, CAT1+11, CSN1+1
, CSN1+2, CSN1+11, MFG1+1, MFG1+2, MFG1+11, MOD1+1, MOD1+2, MOD2+14
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