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

Package: Engineering

Routine: ENY2REP8


Information

ENY2REP8 ;;(WIRMFO)/DH-Print Y2K Summary Reports ;9.30.98

Source Information

Source file <ENY2REP8.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 HOME^%ZIS  ^%ZISC  
Engineering 1 CSN^ENY2REP7  
VA FileMan 1 NOW^%DTC  

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

Package Total Caller Graph
Engineering 1 ENY2REP1  

Entry Points

Name Comments DBIA/ICR reference
DEQUE ; print a summary report
CSN
CAT
MFG ; must be by manufacturer
; mfg initialization
PRTCAT
PRTMFG
TOTALS ; skip totals if printing high counts only
HEADR ; header for summary listing
HOLD
EXIT ;

External References

Name Field # of Occurrence
NOW^%DTC DEQUE+3
HOME^%ZIS EXIT+2
^%ZISC EXIT+2
CSN^ENY2REP7 CSN

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: CAT+8
Function Call: WRITE
  • Prompt: !!,?15,"<Nothing to print>"
  • Line Location: CAT+28
Function Call: WRITE
  • Prompt: !!,"** No records to print **"
  • Line Location: CAT+31
Function Call: WRITE
  • Prompt: "."
  • Line Location: MFG+8
Function Call: WRITE
  • Prompt: !!,"** No records to print **"
  • Line Location: MFG+30
Function Call: WRITE
  • Prompt: !,$E($P(^ENG(6911,CAT(0),0),U),1,30),?42,$J(^TMP($J,STATION,CAT(0),"NC"),5),?49,$J(^("CC"),5),?63,$J(^(0),5),?71,$J(^TMP($J,STATION,"COUNT",CAT(0)),5)
  • Line Location: PRTCAT+0
Function Call: WRITE
  • Prompt: !,$E($P(^ENG(6911,CAT(0),0),U),1,30),?35,$J(^TMP($J,STATION,CAT(0),"FC"),5),?42,$J(^("NC"),5),?49,$J(^("CC"),5),?56,$J(^("NA"),5),?63,$J(^(0),5),?71,$J(^TMP($J,STATION,"COUNT",CAT(0)),5)
  • Line Location: PRTCAT+1
Function Call: WRITE
  • Prompt: !,$E($P(^ENG("MFG",MFG(0),0),U),1,30),?42,$J(^TMP($J,STATION,MFG(0),"NC"),5),?49,$J(^("CC"),5),?63,$J(^(0),5),?71,$J(^TMP($J,STATION,"COUNT",MFG(0)),5)
  • Line Location: PRTMFG+0
Function Call: WRITE
  • Prompt: !,$E($P(^ENG("MFG",MFG(0),0),U),1,30),?35,$J(^TMP($J,STATION,MFG(0),"FC"),5),?42,$J(^("NC"),5),?49,$J(^("CC"),5),?56,$J(^("NA"),5),?63,$J(^(0),5),?71,$J(^TMP($J,STATION,"COUNT",MFG(0)),5)
  • Line Location: PRTMFG+1
Function Call: WRITE
  • Prompt: !,X
  • Line Location: TOTALS+2
Function Call: WRITE
  • Prompt: !,"TOTALS",?42,$J(TOTAL(STATION,"NC"),5),?49,$J(TOTAL(STATION,"CC"),5),?63,$J(TOTAL(STATION,0),5),?71,$J(TOTAL(STATION),5)
  • Line Location: TOTALS+3
Function Call: WRITE
  • Prompt: !,"TOTALS",?35,$J(TOTAL(STATION,"FC"),5),?42,$J(TOTAL(STATION,"NC"),5),?49,$J(TOTAL(STATION,"CC"),5),?56,$J(TOTAL(STATION,"NA"),5),?63,$J(TOTAL(STATION,0),5),?71,$J(TOTAL(STATION),5)
  • Line Location: TOTALS+4
Function Call: WRITE
  • Prompt: "Y2K Data by "_$S(ENTYPE="CAT":"EQUIPMENT CATEGORY",1:"MANUFACTURER "),?45,DATE("PRNT"),?70,"Page: "_PAGE
  • Line Location: HEADR+2
Function Call: WRITE
  • Prompt: "(Y2K CATEGORIES 'FC' and 'NA' are being ignored.)"
  • Line Location: HEADR+4
Function Call: WRITE
  • Prompt: !,$S(ENTYPE="CAT":"EQUIPMENT CATEGORY NAME",1:"MANUFACTURER NAME"),?38,"FC",?45,"NC",?52,"CC",?59,"NA",?64,"NULL",?71,"TOTAL"
  • Line Location: HEADR+5
Function Call: WRITE
  • Prompt: !,X
  • Line Location: HEADR+6
Function Call: WRITE
  • Prompt: !!,"Press <RETURN> to continue, '^' to escape..."
  • Line Location: HOLD+1
Routine Call
  • %ZIS
  • Line Location:
    • EXIT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DEQUE+3
^DIC(6910 - [#6910] DEQUE+4
^ENG("MFG" - [#6912] MFG+5, MFG+24, PRTMFG, PRTMFG+1
^ENG(6911 - [#6911] CAT+5, CAT+24, PRTCAT, PRTCAT+1
^ENG(6914 - [#6914] CAT+2, CAT+5!, CAT+6, CAT+7, CAT+9, CAT+12, CAT+14, MFG+2, MFG+5!, MFG+6
, MFG+7, MFG+9, MFG+12, MFG+14
^TMP($J DEQUE+1!, CAT+2*, CAT+12, CAT+14*, CAT+16*, CAT+20, CAT+23*, CAT+24*, CAT+28, CAT+29
, CAT+31, CAT+32, CAT+33, MFG+2*, MFG+12, MFG+14*, MFG+16*, MFG+20, MFG+23*, MFG+24*
, MFG+28, MFG+30, MFG+31, MFG+32, PRTCAT, PRTCAT+1, PRTCAT+2, PRTMFG, PRTMFG+1, PRTMFG+2
, EXIT+1!

Label References

Name Line Occurrences
EXIT CSN, CAT, MFG+35
HEADR CAT+28, CAT+30, MFG+29, PRTCAT+2, PRTMFG+2
HOLD CAT+28, CAT+29, MFG+28, PRTCAT+2, PRTMFG+2
PRTCAT CAT+32, CAT+33
PRTMFG MFG+31, MFG+32
TOTALS CAT+34, MFG+33

Naked Globals

Name Field # of Occurrence
^("CC" PRTCAT, PRTCAT+1, PRTMFG, PRTMFG+1
^("NA" PRTCAT+1, PRTMFG+1
^("NC" PRTCAT+1, PRTMFG+1
^(0 PRTCAT, PRTCAT+1, PRTMFG, PRTMFG+1
^(9 CAT+12, MFG+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DEQUE+3
CAT DEQUE+2~, CAT+24*
CAT(0 CAT+2*, CAT+5*, CAT+16, CAT+20*, CAT+23, CAT+24, CAT+32*, CAT+33*, PRTCAT, PRTCAT+1
, PRTCAT+2
CAT(1 CAT+14*
COUNT DEQUE+2~, CAT+5*, CAT+20*, CAT+22, CAT+23, MFG+5*, MFG+20*, MFG+22, MFG+23
CSN DEQUE+2~
DA DEQUE+2~, CAT+5*, CAT+6, CAT+7, CAT+8, CAT+9, CAT+12, MFG+5*, MFG+6, MFG+7
, MFG+8, MFG+9, MFG+12
DATE DEQUE+2~
DATE("PRNT" DEQUE+3*, HEADR+2
DTIME HOLD+1
ENSORT CSN!, CAT!, CAT+21, CAT+32, CAT+33, MFG+21, MFG+31, MFG+32, MFG+34!
ENSORT("MIN" CAT+22, MFG+22, TOTALS+1
ENSTN CSN!, CAT!, CAT+12, MFG+12, MFG+34!, HEADR+3
ENSUP CSN!, CAT!, CAT+10, MFG+10, MFG+34!, PRTCAT, PRTCAT+1, PRTMFG, PRTMFG+1, TOTALS+3
, TOTALS+4, HEADR+4
ENTYPE CSN!, CAT!, MFG+34!, HEADR+2, HEADR+5
ESCAPE DEQUE+2~, CAT+29, CAT+32, CAT+33, MFG+28, MFG+31, MFG+32, PRTCAT+2, PRTMFG+2, TOTALS+1
, HOLD, HOLD+2*
IO CAT+27, MFG+27
IOF HEADR+1
IOSL PRTCAT+2, PRTMFG+2
IOST HEADR+1, HOLD
J DEQUE+6*, CAT+2*, CAT+13*, CAT+14*, CAT+32*, CAT+33*, MFG+2*, MFG+13*, MFG+14*, MFG+31*
, MFG+32*, PRTCAT+2, PRTMFG+2, EXIT+4!
K EXIT+4!
LINE DEQUE+2~, PRTCAT+2*, PRTMFG+2*, HEADR+1*
MFG DEQUE+2~, MFG+24*
MFG(0 MFG+2*, MFG+5*, MFG+16, MFG+20*, MFG+23, MFG+24, MFG+31*, MFG+32*, PRTMFG, PRTMFG+1
, PRTMFG+2
MFG(1 MFG+14*
PAGE DEQUE+2~, DEQUE+3*, HEADR+1*, HEADR+2
STATION DEQUE+2~, CAT+5*, CAT+12*, CAT+13, CAT+14, CAT+16, CAT+17, CAT+20*, CAT+23, CAT+24
, CAT+29*, CAT+31, CAT+32, CAT+33, MFG+5*, MFG+12*, MFG+13, MFG+14, MFG+16, MFG+17
, MFG+20*, MFG+23, MFG+24, MFG+28*, MFG+30, MFG+31, MFG+32, PRTCAT, PRTCAT+1, PRTCAT+2
, PRTMFG, PRTMFG+1, PRTMFG+2, TOTALS+3, TOTALS+4, HEADR+3
STATION("PARNT" DEQUE+4*, DEQUE+6, CAT+2, CAT+5, CAT+12, MFG+2, MFG+5, MFG+12, HEADR+3
TOTAL DEQUE+2~
TOTAL( DEQUE+6*, CAT+13*, CAT+17*, MFG+13*, MFG+17*, TOTALS+3, TOTALS+4
U DEQUE+4, CAT+7, CAT+9, CAT+10, CAT+12, CAT+24, MFG+7, MFG+9, MFG+10, MFG+12
, MFG+24, PRTCAT, PRTCAT+1, PRTMFG, PRTMFG+1
X TOTALS+2!*, HEADR+6!*, HOLD+1*, HOLD+2, EXIT+4!
>> Y DEQUE+3*
Y2K DEQUE+2~, CAT+9*, CAT+10, CAT+16, CAT+17, MFG+9*, MFG+10, MFG+16, MFG+17
>> ZTQUEUED CAT+8, MFG+8, EXIT+3
>> ZTREQN EXIT+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All