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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ENUTL

Package: Engineering

Routine: ENUTL


Information

ENUTL ;(WIRMFO)/DH-Engineering Utilities ;1.12.98

Source Information

Source file <ENUTL.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 ENDR^%ZISS  $$UP^XLFSTR  
VA FileMan 1 (,IX)^DIC  

Caller Graph

Caller Graph Total: 43

Package Total Caller Graph
Engineering 43 ENEQ1  ENEQ2  ENEQ4  ENEQLT  ENEQNX5  ENEQPMP3  ENEQPMR4  ENEQRP1  
ENEQRP6  ENEQTD  ENETRAN  ENEWOD1  ENFABAL1  ENFABETR  ENFACHG  ENFACTE  
ENFADEL  ENFAR5  ENFAR7  ENFAR9  ENFARC  ENFAXFR  ENFAXMTM  ENFSA2  
ENLBL3  ENSP3  ENTIEQE  ENTIRT  ENTIRX  ENTIUTL2  ENWARD2  ENWO1  
ENWOD2  ENWOME2  ENWONEW  ENWOP  ENXHIPS  ENY2K  ENY2KR1  ENY2REP  
ENY2VAC1  ENY2VACO  ^ENG("PROJ"  

Entry Points

Name Comments DBIA/ICR reference
GETEQ ; Lookup equipment file entries allowing searches by user
; specified x-refs
; Called from ENEQ2, ENEQ4, ENEQLT,ENEQNX5, ENEQPMR4, ENEQRP1, ENEQRP6,
; ENEQTD, ENLBL3, ENWO1
; DIC("S") may be passed, but is not required or returned
; Output => Y as per ^DIC
EQA ; Ask for input
EQR ; Result of ^DIC call
EQX ; Design EXIT
EQCOMP ; Compress local var X
ZIS ; Get BOLD and UNBOLD sequences
; Set to NULL if printer (bolding in hard copy would be nice,
; but the Device Files are too messy for it to work well)
EOM(ENDT) ;End of Month Extrinsic Function
; ENDT - Date (internal format)
; Returns - Date for end of month (internal format)

External References

Name Field # of Occurrence
ENDR^%ZISS ZIS+4
^DIC EQA+14
IX^DIC EQA+2
$$UP^XLFSTR EQCOMP+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "Select EQUIPMENT ENTRY #: "
  • Variable: ENX
  • Timeout: DTIME
  • Line Location: EQA+1
Function Call: WRITE
  • Prompt: !," 'EC.value' => equipment whose EQUIP. CATEGORY starts with 'value'"
  • Line Location: EQA+7
Function Call: WRITE
  • Prompt: !," 'LI.value' => equipment whose LOCAL ID starts with 'value'"
  • Line Location: EQA+8
Function Call: WRITE
  • Prompt: !," 'LO.value' => equipment whose LOCATION starts with 'value'"
  • Line Location: EQA+9
Function Call: WRITE
  • Prompt: !," 'MA.value' => equipment whose MANUFACTURER starts with 'value'"
  • Line Location: EQA+10
Function Call: WRITE
  • Prompt: !," 'MF.value' => equipment whose MFGR. EQUIP. NAME starts with 'value'"
  • Line Location: EQA+11
Function Call: WRITE
  • Prompt: !," 'MO.value' => equipment whose MODEL starts with 'value'"
  • Line Location: EQA+12
Function Call: WRITE
  • Prompt: !," 'SN.value' => equipment whose SERIAL NUMBER starts with 'value'"
  • Line Location: EQA+13
Routine Call
  • DIC
  • Line Location:
    • EQA+14
Routine Call
  • DIC
  • Line Location:
    • EQA+2

FileMan Files Accessed Via FileMan Db Call

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

Label References

Name Line Occurrences
EQA EQR+1
EQCOMP EQA+5
EQR EQA+2
EQX EQA+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D GETEQ+7~, EQA+2, EQA+4*, EQA+5
DIC GETEQ+8*, EQX+1!
DIC(0 EQA+2*, EQA+14*
DTIME EQA+1
ENDT EOM~, EOM+3*, EOM+4*, EOM+5, EOM+6, EOM+7*, EOM+8
ENI GETEQ+7~, EQA+3*, EQA+4
ENX GETEQ+7~, EQA+1*, EQA+2, EQA+3, EQA+6
>> IOINHI ZIS+3*
>> IOINLOW ZIS+3*, ZIS+5*
>> IOINORM ZIS+5
IOST ZIS+3
LEAP EOM+5~, EOM+6*, EOM+7
U EQA+3, EOM+3, EOM+4
X GETEQ+7~, EQA+2*, EQA+6*, EQCOMP+1, EQCOMP+2*, EQCOMP+3*, ZIS+4~*
>> Y EQA+1*, EQR+1
YEAR EOM+5~, EOM+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables  | All