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

Package: Engineering

Routine: ENY2REP4


Information

ENY2REP4 ;:(WIRMFO)/DH-Y2K Cum Report ;8.20.98

Source Information

Source file <ENY2REP4.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
Engineering 1 PRT^ENY2REP6  
VA FileMan 1 ^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: 2

Package Total Caller Graph
Engineering 2 ENY2KCUM  ENY2VACO  

Entry Points

Name Comments DBIA/ICR reference
EN
DEQ ; get the net results to date
DEQ1
DATA
EXIT ;

External References

Name Field # of Occurrence
^%ZIS EN+18
HOME^%ZIS EN+22, EXIT+4
^%ZISC EXIT+4
^%ZTLOAD EN+22
^DIR EN+10, EN+16
PRT^ENY2REP6 DATA+42

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,?18,"CUMULATIVE EFFECTS OF Y2K ACTION TAKEN TO DATE"
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !!,"There are approximately "_$P(^ENG(6914,0),U,4)_" entries in your Equipment file. Inactive entries"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,"(USE STATUS of 'TURNED-IN' or 'LOST OR STOLEN') will be automatically excluded",!,"from Y2K consideration (unless they were turned in due to Y2K non-compliance)."
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"Equipment entries without a MANUFACTURER and a MODEL will also be excluded",!,"from Y2K consideration."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"There is no STATION NUMBER in your Engineering Init Paramaters file.",!,"Can't proceed.",*7
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: "."
  • Line Location: DATA+3
Routine Call
  • %ZIS
  • Line Location:
    • EN+18
Routine Call
  • %ZIS
  • Line Location:
    • EN+22
    • EXIT+4
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • EN+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(6910 - [#6910] EN+4, EN+6, DEQ1
^ENG(6914 - [#6914] EN+1, DATA, DATA+1, DATA+2, DATA+4, DATA+13, DATA+15, DATA+20, DATA+28, DATA+29
, DATA+33, DATA+35
^TMP($J DEQ+1!, DEQ1+5*, DEQ1+7*, DEQ1+8*, DEQ1+9*, DATA+8*, DATA+10*, DATA+11*, DATA+12*, DATA+22*
, DATA+23*, DATA+28*, DATA+32*, DATA+34*, DATA+35*, DATA+37*, DATA+39*, EXIT+1!

Label References

Name Line Occurrences
EXIT EN+18, EN+19

Naked Globals

Name Field # of Occurrence
^(1 DATA+15
^(11 DATA+2
^(9 DATA+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS EN+18*
CLASS DEQ+2~, DATA*, DATA+13*, DATA+14, DATA+16, DATA+17, DATA+18, DATA+21, DATA+22, DATA+23
, DATA+26, DATA+28, DATA+31, DATA+32, DATA+34, DATA+35, DATA+37, DATA+39
COST DEQ+2~
COST("E" DATA+28*, DATA+32, DATA+34
COUNT DEQ+2~
COUNT( DEQ1+2*, DEQ1+3*, DEQ1+4*, DEQ1+6*, DEQ1+7*, DEQ1+9*, DATA+4, DATA+5*, DATA+6*, DATA+7*
, DATA+9*, DATA+10*, DATA+12*, DATA+14*, DATA+16*, DATA+17*, DATA+18*, DATA+21*, DATA+22*, DATA+23*
, DATA+26*, DATA+31*, DATA+32*, DATA+34*, DATA+39*
DA DEQ+2~, DATA*, DATA+1, DATA+2, DATA+3, DATA+4, DATA+13, DATA+15, DATA+20, DATA+28
, DATA+29, DATA+33, DATA+35
DA(1 DATA+35*
DIR EN+10!, EN+16!
DIR("?" EN+8*, EN+9*, EN+13*, EN+14*, EN+15*
DIR("A" EN+7*, EN+12*
DIR("B" EN+7*, EN+12*
DIR(0 EN+7*, EN+12*
>> DIRUT EN+10, EN+16
>> EN DATA+15*, DATA+17, DATA+22, DATA+23, DATA+26, DATA+30, DATA+37, DATA+38, DATA+39
ENCLASS EN+17*, DATA+13, EXIT+2!
ENSTN EN+5*, EN+6!, EN+10*, EN+11*, EN+16!, DATA+4, EXIT+2!
>> ENY2K("ACT" DATA+26*, DATA+27
>> ENY2K("CAT" DATA+17*, DATA+18, DATA+19, DATA+25, DATA+36
>> ENY2K("VACO" DATA+41
IO("Q" EN+18!, EN+19
IOF EN
ION EN+20
J DEQ+2~, DEQ1+2*, DEQ1+3*, DEQ1+4*, DEQ1+5*, DEQ1+6*, DEQ1+7*, DEQ1+8*, DEQ1+9*, DATA+5*
, DATA+6*, DATA+7*, DATA+8*, DATA+9*, DATA+10*, DATA+11*, DATA+12*
K DEQ+2~, DEQ1+2*, DEQ1+3*, DEQ1+5*, DEQ1+7*, DEQ1+9*, DATA+5*, DATA+6*, DATA+8*, DATA+10*
, DATA+12*
L DEQ+2~, DEQ1+9*, DATA+12*
MONTH DEQ+2~, DATA+30*, DATA+31, DATA+32, DATA+38*, DATA+39
>> POP EN+18
STATION DEQ+2~, DEQ1*, DEQ1+2, DEQ1+3, DEQ1+4, DEQ1+5, DEQ1+6, DEQ1+7, DEQ1+8, DEQ1+9
, DATA*, DATA+4*, DATA+5, DATA+6, DATA+7, DATA+8, DATA+9, DATA+10, DATA+11, DATA+12
, DATA+14, DATA+16, DATA+17, DATA+18, DATA+21, DATA+22, DATA+23, DATA+26, DATA+28, DATA+31
, DATA+32, DATA+34, DATA+35, DATA+37, DATA+39
STATION("PARNT" DEQ1*, DATA, DATA+4
TOTAL DEQ+2~
U EN+1, EN+4, EN+6, DEQ1, DATA+2, DATA+4, DATA+13, DATA+15, DATA+17, DATA+20
, DATA+22, DATA+23, DATA+26, DATA+28, DATA+30, DATA+35, DATA+37, DATA+38, DATA+39
>> Y EN+11, EN+17
YEAR DEQ+2~, DATA+30*, DATA+31, DATA+32, DATA+38*, DATA+39
>> ZTDESC EN+20*
>> ZTIO EN+20*
>> ZTQUEUED DATA+3, EXIT+3
>> ZTREQN EXIT+3*
>> ZTRTN EN+19*
>> ZTSAVE("EN*" EN+21*
ZTSK EN+22!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All