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

Package: Engineering

Routine: ENEQRP1


Information

ENEQRP1 ;(WCIOFO)/DH-Equipment Reports ;10/21/1998

Source Information

Source file <ENEQRP1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 4 ^%DT  EN1^DIP  $$GET1^DIQ  ^DIR  
Kernel 3 HOME^%ZIS  ^%ZISC  ^%ZTLOAD  
Engineering 2 DEV^ENLIB  GETEQ^ENUTL  

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

Package Total Caller Graph
Engineering 3 ENEQ-REPLACE  ENEQ-WARRANTY  ENIN-HIST-SPECIFIC  

Entry Points

Name Comments DBIA/ICR reference
W ;WARRANTY EXPIRATIONS
R ;REPLACEMENT DATE
DIP
HS ;EQUIP HIST - SPECIFIC DEVICE
HS0 ; queued entry point
HS1
HS2
HS3
HS4
HS5 ;Re-init
HSD0 ;Descendent(s)
HSD1
KILL
T
HOLD

External References

Name Field # of Occurrence
^%DT T
HOME^%ZIS HS+21
^%ZISC KILL+2
^%ZTLOAD HS+21
EN1^DIP DIP
$$GET1^DIQ HS+8, HS+9, HS1+17
^DIR HS+13
DEV^ENLIB HS+18
GETEQ^ENUTL HS+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: ""Press <RETURN> to continue...""
  • Variable: X
  • Timeout: DTIME"
  • Line Location: DIP+0
Function Call: WRITE
  • Prompt: !!,"Equipment Entry #",ENDA," ",$$GET1^DIQ(6914,ENDA,6)
  • Line Location: HS+8
Function Call: WRITE
  • Prompt: !," is a component of Entry #",ENDAP," ",$$GET1^DIQ(6914,ENDAP,6)
  • Line Location: HS+9
Function Call: WRITE
  • Prompt: !!,"There is no history recorded for this equipment.",!!
  • Line Location: HS+17
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HS1+0
Function Call: WRITE
  • Prompt: X
  • Line Location: HS1+7
Function Call: WRITE
  • Prompt: ?62,X
  • Line Location: HS1+9
Function Call: WRITE
  • Prompt: !,X
  • Line Location: HS1+14
Function Call: WRITE
  • Prompt: !,X,!
  • Line Location: HS1+18
Function Call: WRITE
  • Prompt: !,X,!
  • Line Location: HS1+20
Function Call: WRITE
  • Prompt: X
  • Line Location: HS1+21
Function Call: WRITE
  • Prompt: !,E(1)_" ",?11,E(2),?28,$J(E(3),2),?30,$J(E(4),6,1),?36,$J(E(5),8,0),?44,$J(E(6),8,0),?52,$J(E(7),8,0),?60,$J(E(10),8,0),?69,$E(E(8),1,10)
  • Line Location: HS2+4
Function Call: WRITE
  • Prompt: !,?3,$E(E(9),1,70),!,?3,$E(E(9),71,140)
  • Line Location: HS2+7
Function Call: WRITE
  • Prompt: !,?3,$E(E(9),1,X1),!,?3,$E(E(9),X1+1,140)
  • Line Location: HS2+8
Function Call: WRITE
  • Prompt: !,?3,E(9)
  • Line Location: HS2+9
Function Call: WRITE
  • Prompt: !
  • Line Location: HS3+0
Function Call: WRITE
  • Prompt: X
  • Line Location: HS3+0
Function Call: WRITE
  • Prompt: !,"TOTAL",?30,$J(ENT(4),6,1),?36,$J(ENT(5),8,0),?44,$J(ENT(6),8,0),?52,$J(ENT(7),8,0),?60,$J(ENT(9),8,0)
  • Line Location: HS3+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: HSD0+5
Function Call: WRITE
  • Prompt: X
  • Line Location: HSD0+5
Function Call: WRITE
  • Prompt: !,"GRAND TOTAL",?30,$J(ENGT(4),6,1),?36,$J(ENGT(5),8,0),?44,$J(ENGT(6),8,0),?52,$J(ENGT(7),8,0),?60,$J(ENGT(9),8,0)
  • Line Location: HSD0+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: KILL+1
Function Call: READ
  • Formatting: !!
  • Prompt: "Press <RETURN> to continue or ""^"" to exit "
  • Variable: X
  • Timeout: DTIME
  • Line Location: HOLD+0
Routine Call
  • DIR
  • Line Location:
    • HS+13
Routine Call
  • %ZIS
  • Line Location:
    • HS+21

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6914 - [#6914] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HS1+11, T
^DIPT("B" W+1, R+1
^ENG(6910.2 - [#6910.2] W+1, R+1
^ENG(6911 - [#6911] HS1+3
^ENG(6914 - [#6914] HS+5, HS+16, HS0+3, HS0+4, HS1+2, HS1+11, HS1+15, HS1+16, HS2, HS2+1
, HSD0+1, HSD1+1
^TMP($J HS0+4!, HSD1, HSD1+1*, KILL+1!

Label References

Name Line Occurrences
DIP W+3, R+3
HOLD HS0+3, HS4, HSD0+7, HSD1
HS HS+16, HS+19, HS0+5
HS1 HS0+3, HS4+1, HSD1+1
HS2 HS0+3, HS2+11, HSD1+1
HS3 HS0+3, HSD1+1
HS4 HS2+10
HS5 HSD1+1
HSD0 HS0+4, HSD0+2, HSD1+1
HSD1 HSD0+1
KILL W+3, R+3, HS+1, HS+7, HS+18, HS0+5
T HS+18

Naked Globals

Name Field # of Occurrence
^("EQUIPMENT REPLACEMENT TEMPLATE" R+1
^("WARRANTY EXPIRATION TEMPLATE" W+1
^(0 HS1+3
^(1 HS1+2
^(2 HS1+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT KILL!, T*
>> BY W+3*, R+3*
DA KILL!
DIC DIP*, KILL!
>> DIOEND DIP*
DIR HS+13!
DIR("?" HS+12*
DIR("A" HS+11*
DIR("B" HS+10*
DIR(0 HS+10*
>> DIRUT HS+13
DTIME HOLD
E KILL!
E( HS2+1*, HS2+3
E(1 HS2+2*, HS2+4
E(10 HS2+3*, HS2+4
E(2 HS2+4
E(3 HS2+4
E(4 HS2+4
E(5 HS2+3, HS2+4
E(6 HS2+3, HS2+4
E(7 HS2+3, HS2+4
E(8 HS2+4
E(9 HS2+5, HS2+6, HS2+7, HS2+8, HS2+9
ENA KILL!
ENA( HS0+4*, HSD0+1, HSD1, HSD1+1*
ENAC KILL!
ENAC( HS1+10*
ENAC(1 HS1+11*, HS1+12
ENAC(2 HS1+11*, HS1+12
ENAC(3 HS1+11*, HS1+12
ENB KILL!
ENB( HS0+4*, HSD0+1, HSD1+1*, HSD1+2*
ENCAT HS1+1*, HS1+2*, HS1+3*, HS1+5, KILL!
ENCRIT HS1+1*, HS1+15*, HS1+16*, HS1+17, KILL!
ENDA HS+1*, HS+4, HS+7, HS+8, HS+13*, HS+14*, HS+16, HS0+3, HS0+4, HS1+2
, HS1+5, HS1+11, HS1+15, HS1+16, HS1+17, HS2, HS2+1, HSD0+1*, HSD1, HSD1+1
, HSD1+2, KILL!
ENDAP HS+4*, HS+5*, HS+7, HS+9, HS+11, HS+14, KILL!
ENDATE HS1+8, KILL!, T*
ENDONE HS0+1*, HS0+4, HS1, HS2, HS2+10, HS3, HS4, HSD0+1, HSD0+3, HSD0+8*
, HSD1, KILL!, HOLD*
ENEQ KILL!
ENGT KILL!
ENGT( HS0+1*, HS5+1*, HSD0+4*
ENGT(4 HSD0+6
ENGT(5 HSD0+6
ENGT(6 HSD0+6
ENGT(7 HSD0+6
ENGT(9 HSD0+6
ENHS HS2+1*, KILL!
ENNDATE KILL!, T*
ENPG HS0+1*, HS1, HS1+4*, HS1+8, KILL!
ENR HS0+1*, HS2*, HS2+1, HSD1+1*, KILL!
ENSN HS1+1*, HS1+2*, HS1+12, KILL!
ENT KILL!
ENT( HS0+1*, HS2+3*, HS5+1*, HSD0+4
ENT(4 HS3+1
ENT(5 HS3+1
ENT(6 HS3+1
ENT(7 HS3+1
ENT(9 HS2+3*, HS3+1
>> FLDS W+1*, W+2*, R+1*, R+2*
I W+1*, R+1*, HS+4*, HS+5*, HS+6, HS0+1*, HS1+15*, HS1+16, HS1+20*, HS2+1*
, HS2+5*, HS2+9*, HS2+10, HS5+1*, HSD0+4*, KILL!
IO HS0+2, HS1
IO("Q" HS+19
IO(0 HS0+2
IOF HS1, KILL+1
IOSL HS2+10
IOST HS0+3, HS1, HS4, HSD0+7, HSD1, KILL+2
J HS1+10*, HS1+16*, HS2+1*, HS2+3*, KILL!
K KILL!
K1 HS0+4!*, HS1+5, HSD0+1, HSD0+2*, HSD1, HSD1+1*, HSD1+2, KILL!
>> L DIP*
O KILL!
>> POP HS+18
U W+1, R+1, HS+5, HS+16, HS1+2, HS1+3, HS1+11, HS1+16, HS2+1
X HS+5*, HS1+5*, HS1+6*, HS1+7, HS1+8*, HS1+9, HS1+12*, HS1+13*, HS1+14, HS1+17*
, HS1+18, HS1+19*, HS1+20, HS1+21!*, HS2+5*, HS2+9, HS3!*, HSD0+5!*, KILL!, T*!
, HOLD*
>> X1 HS2+6*, HS2+7, HS2+8
Y HS+1, HS+14, HS1+11*, KILL!, T!
>> ZTDESC HS+20*
>> ZTQUEUED HS0+5, KILL+2, KILL+3
>> ZTREQ KILL+3*
>> ZTRTN HS+20*
>> ZTSAVE("EN*" HS+21*
ZTSK DIP!, HS+21!
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