Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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)

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6914 - [#6914] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call