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

Package: Engineering

Routine: ENTIUTL


Information

ENTIUTL ;WOIFO/SAB - Engineering Utilities ;2/14/2008

Source Information

Source file <ENTIUTL.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 5 FIND^DIC  $$GET1^DIQ  ^DIR  ^DIWP  ^DIWW  
Kernel 1 $$ADD^XUSERNEW  
MailMan 1 ^XMD  

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

Package Total Caller Graph
Engineering 7 ENIT ADD NEW PERSON  ENIT USER ACCOUNT TERMINATED  ENTIRRE  ENTIRRI  ENTIRRNA  ENTIRRU  ENTIUTL2  

Entry Points

Name Comments DBIA/ICR reference
DISEQ(ENDA) ; Display Equipment
CAPEQ(ENDA,ENTAG,SITC,END) ; Captioned Equipment Display
; input
; ENDA = equipment ien (file 6914)
; ENTAG = (optional) line tag to call at page break
; this utility expects there to be at least 5 lines to display
; the normal data and will only issue page breaks during the
; IT REMOTE LOCATION or IT COMMENTS output.
; SITC = (optional) flag, true to suppress IT comments from printing
; output
; END = true if user enter "^" or timed-out, passed by reference
CAPEQHD ; Captioned Equipment Display Default Header
CAPEQHD1 ; Captioned Equipment Display Second Header
DISASGN(ENDA) ; Display Active Assignments for Equipment to Screen
DISASGNH ; Display Assignments Header
BLDHL2(ENSM,ENSMV,ENSRT) ; Build Header Line 2 String for Reports
; input
; ENSM = equipment selection method code
; ENSMV = selection method ien value (for applicable methods)
; ENSRT = sort by code
; returns string for page header second line
ADDNP ; Add New Person
; called by option ENIT ADD NEW PERSON
USRTRM ;Send MailMan message when user with active assignments is terminated

External References

Name Field # of Occurrence
FIND^DIC USRTRM+4
$$GET1^DIQ DISEQ+3, DISEQ+4, DISEQ+5, DISEQ+6, DISEQ+7, DISEQ+8, DISEQ+9, CAPEQ+14, CAPEQ+15, CAPEQ+16
, CAPEQ+17, CAPEQ+18, CAPEQ+19, CAPEQ+20, CAPEQ+21, CAPEQ+27, DISASGN+11, DISASGN+12, DISASGN+13, DISASGN+15
, BLDHL2+11, BLDHL2+12, BLDHL2+13, BLDHL2+14, USRTRM+6, USRTRM+14
^DIR CAPEQHD+1, DISASGN+9, ADDNP+11
^DIWP CAPEQ+33, CAPEQ+34, CAPEQ+40, CAPEQ+43
^DIWW CAPEQ+35, CAPEQ+46
^XMD USRTRM+20
$$ADD^XUSERNEW ADDNP+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Entry #",?12,"CMR",?19,"Location",?41,"Using Service"
  • Line Location: DISEQ+10
Function Call: WRITE
  • Prompt: !,"---------",?12,"-----",?19,"--------------------"
  • Line Location: DISEQ+11
Function Call: WRITE
  • Prompt: ?41,"------------------------------"
  • Line Location: DISEQ+12
Function Call: WRITE
  • Prompt: !,ENDA,?12,ENCMR,?19,ENLOC,?41,ENSVC
  • Line Location: DISEQ+13
Function Call: WRITE
  • Prompt: !,ENNAM
  • Line Location: DISEQ+14
Function Call: WRITE
  • Prompt: !!,"Mfgr: ",ENMFGR
  • Line Location: DISEQ+15
Function Call: WRITE
  • Prompt: !,"Model: ",ENMOD,?39,"Serial #: ",ENSER
  • Line Location: DISEQ+16
Function Call: WRITE
  • Prompt: !,"Entry #: ",ENDA,?21,"CMR: ",ENCMR,?33,"Using Service: ",ENSVC
  • Line Location: CAPEQ+22
Function Call: WRITE
  • Prompt: !,?2,"Location: ",ENLOC,?34,"Svc of Location: ",ENLOCS
  • Line Location: CAPEQ+23
Function Call: WRITE
  • Prompt: !,?2,"Mfgr Name: ",$E(ENNAM,1,65)
  • Line Location: CAPEQ+24
Function Call: WRITE
  • Prompt: "*"
  • Condition for execution: $E(ENNAM,66,80)]""
  • Line Location: CAPEQ+24
Function Call: WRITE
  • Prompt: !,?2,"Mfgr: ",ENMFGR
  • Line Location: CAPEQ+25
Function Call: WRITE
  • Prompt: !,?2,"Model: ",ENMOD,?41,"Ser. #: ",ENSER
  • Line Location: CAPEQ+26
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CAPEQHD+2
Function Call: WRITE
  • Prompt: "Equipment Entry #: ",ENDA," (continued)"
  • Line Location: CAPEQHD1+1
Function Call: WRITE
  • Prompt: !," no active assignments"
  • Line Location: DISASGN+5
Function Call: WRITE
  • Prompt: @(IOF)
  • Line Location: DISASGN+10
Function Call: WRITE
  • Prompt: !," Entry #: ",ENDA," (continued)"
  • Line Location: DISASGN+10
Function Call: WRITE
  • Prompt: !,$$GET1^DIQ(6916.3,ENADA,1)
  • Line Location: DISASGN+11
Function Call: WRITE
  • Prompt: ?32,$P($$GET1^DIQ(6916.3,ENADA,2),"@")
  • Line Location: DISASGN+12
Function Call: WRITE
  • Prompt: ?46,ENSTAT
  • Line Location: DISASGN+14
Function Call: WRITE
  • Prompt: ?57,$$GET1^DIQ(6916.3,ENADA,21)
  • Line Location: DISASGN+15
Function Call: WRITE
  • Prompt: !!,"Responsible Person",?32,"Assigned DT",?46,"Status",?57,"Status DT"
  • Line Location: DISASGNH+1
Function Call: WRITE
  • Prompt: !,"------------------------------",?32,"------------"
  • Line Location: DISASGNH+2
Function Call: WRITE
  • Prompt: ?46,"---------",?57,"------------"
  • Line Location: DISASGNH+3
Function Call: WRITE
  • Prompt: !!,"This option should only be used to add a person to the NEW PERSON"
  • Line Location: ADDNP+3
Function Call: WRITE
  • Prompt: !,"(#200) file when that person will be assigned responsibility for"
  • Line Location: ADDNP+4
Function Call: WRITE
  • Prompt: !,"IT equipment but is not already in the file and will NOT be given"
  • Line Location: ADDNP+5
Function Call: WRITE
  • Prompt: !,"a user account to sign on the computer.",!
  • Line Location: ADDNP+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDNP+13
Function Call: WRITE
  • Prompt: !!,$P(ENX,U,2)," already exists with internal number ",$P(ENX,U),"."
  • Line Location: ADDNP+15
Function Call: WRITE
  • Prompt: !,"If you want to enter a new record with that name, enter the"
  • Line Location: ADDNP+16
Function Call: WRITE
  • Prompt: !,"name within quotes (e.g. ""Last,First"")",!
  • Line Location: ADDNP+17
Routine Call
  • DIC
  • Line Location:
    • USRTRM+4
Routine Call
  • DIR
  • Line Location:
    • CAPEQHD+1
    • DISASGN+9
    • ADDNP+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(49 - [#49] GET1^DIQ
^ENG(6914 - [#6914] GET1^DIQ
^ENG(6914.1 - [#6914.1] GET1^DIQ
^ENG(6916.3 - [#6916.3] FIND^DIC,  GET1^DIQ
^ENG("SP" - [#6928] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG(6914 - [#6914] CAPEQ+36, CAPEQ+41, CAPEQ+43
^ENG(6916.3 - [#6916.3] DISASGN+5, DISASGN+7, USRTRM+1
^TMP($J USRTRM+3!, USRTRM+5!, USRTRM+11, USRTRM+12, USRTRM+16, USRTRM+21!
^UTILITY($J CAPEQ+31!, CAPEQ+38!, CAPEQ+44!, CAPEQ+45!

Label References

Name Line Occurrences
@( CAPEQ+29, CAPEQ+42, CAPEQ+45
CAPEQHD1 CAPEQ+29, CAPEQ+42
DISASGNH DISASGN+4, DISASGN+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR CAPEQHD+1!, DISASGN+1~, DISASGN+9!, ADDNP+2~, ADDNP+11!
DIR("A" ADDNP+9*
DIR("B" ADDNP+10*
DIR(0 CAPEQHD+1*, DISASGN+9*, ADDNP+8*
DIROUT DISASGN+1~, ADDNP+2~
DIRUT DISASGN+1~, ADDNP+2~, ADDNP+11
DIWF CAPEQ+30~, CAPEQ+32*, CAPEQ+37~, CAPEQ+39*
DIWL CAPEQ+30~, CAPEQ+32*, CAPEQ+37~, CAPEQ+39*
DIWR CAPEQ+30~, CAPEQ+32*, CAPEQ+37~, CAPEQ+39*
DTOUT DISASGN+1~, ADDNP+2~
DUOUT DISASGN+1~, ADDNP+2~
ENADA DISASGN+1~, DISASGN+6*, DISASGN+7*, DISASGN+11, DISASGN+12, DISASGN+13, DISASGN+15
ENCMR DISEQ+1~, DISEQ+3*, DISEQ+13, CAPEQ+10~, CAPEQ+14*, CAPEQ+22
END CAPEQ~, CAPEQ+12*, CAPEQ+28, CAPEQ+29, CAPEQ+41, CAPEQ+42, CAPEQ+44, CAPEQ+45, CAPEQHD+1*, DISASGN+1~
, DISASGN+3*, DISASGN+7, DISASGN+8, DISASGN+9*
ENDA DISEQ~, DISEQ+3, DISEQ+4, DISEQ+5, DISEQ+6, DISEQ+7, DISEQ+8, DISEQ+9, DISEQ+13, CAPEQ~
, CAPEQ+14, CAPEQ+15, CAPEQ+16, CAPEQ+17, CAPEQ+18, CAPEQ+19, CAPEQ+20, CAPEQ+21, CAPEQ+22, CAPEQ+27
, CAPEQ+36, CAPEQ+41, CAPEQ+43, CAPEQHD1+1, DISASGN~, DISASGN+5, DISASGN+7, DISASGN+10, USRTRM+2~, USRTRM+3*
USRTRM+4, USRTRM+6, USRTRM+7
ENDATE USRTRM+2~, USRTRM+13*, USRTRM+15
ENERR USRTRM+2~
ENHL2 BLDHL2+6~, BLDHL2+8*, BLDHL2+9*, BLDHL2+10*, BLDHL2+11*, BLDHL2+12*, BLDHL2+13*, BLDHL2+14*, BLDHL2+15*, BLDHL2+16*
, BLDHL2+17*, BLDHL2+18*, BLDHL2+19*, BLDHL2+20*, BLDHL2+22
ENI CAPEQ+10~, CAPEQ+41*, CAPEQ+43, USRTRM+2~, USRTRM+10*, USRTRM+11*, USRTRM+12
ENITRL CAPEQ+10~, CAPEQ+27*, CAPEQ+28, CAPEQ+34
ENL USRTRM+2~, USRTRM+9*, USRTRM+15*, USRTRM+16*, USRTRM+17*
ENLOC DISEQ+1~, DISEQ+4*, DISEQ+13, CAPEQ+10~, CAPEQ+15*, CAPEQ+23
ENLOCS CAPEQ+10~, CAPEQ+16*, CAPEQ+23
ENMFGNM USRTRM+2~, USRTRM+14*, USRTRM+15
ENMFGR DISEQ+1~, DISEQ+7*, DISEQ+15, CAPEQ+10~, CAPEQ+19*, CAPEQ+25
ENMOD DISEQ+1~, DISEQ+8*, DISEQ+16, CAPEQ+10~, CAPEQ+20*, CAPEQ+26
ENNAM DISEQ+1~, DISEQ+6*, DISEQ+14, CAPEQ+10~, CAPEQ+18*, CAPEQ+24
ENNAME USRTRM+2~, USRTRM+6*, USRTRM+7, USRTRM+17, USRTRM+18
ENNBR USRTRM+2~, USRTRM+13*, USRTRM+14, USRTRM+15
ENSER DISEQ+1~, DISEQ+9*, DISEQ+16, CAPEQ+10~, CAPEQ+21*, CAPEQ+26
ENSM BLDHL2~, BLDHL2+9, BLDHL2+10, BLDHL2+11, BLDHL2+12, BLDHL2+13, BLDHL2+14
ENSMV BLDHL2~, BLDHL2+11, BLDHL2+12, BLDHL2+13, BLDHL2+14
ENSPACE USRTRM+2~, USRTRM+3*, USRTRM+9, USRTRM+15
ENSRT BLDHL2~, BLDHL2+16, BLDHL2+17, BLDHL2+18, BLDHL2+19, BLDHL2+20
ENSTAT DISASGN+1~, DISASGN+13*, DISASGN+14, DISASGN+15
ENSTATUS USRTRM+2~, USRTRM+13*, USRTRM+15
ENSVC DISEQ+1~, DISEQ+5*, DISEQ+13, CAPEQ+10~, CAPEQ+17*, CAPEQ+22
ENTAG CAPEQ~, CAPEQ+11*, CAPEQ+29, CAPEQ+42, CAPEQ+45
ENTX USRTRM+2~
ENTX( USRTRM+15*, USRTRM+16*, USRTRM+17*
ENTX(1 USRTRM+7*
ENTX(2 USRTRM+8*
ENTX(3 USRTRM+9*
ENTX(4 USRTRM+9*
ENX ADDNP+2~, ADDNP+13*, ADDNP+14, ADDNP+15, USRTRM+2~, USRTRM+12*, USRTRM+13
IOF CAPEQHD+2, DISASGN+10
IOSL CAPEQ+29, CAPEQ+42, CAPEQ+45, DISASGN+8
IOST CAPEQHD+1
SITC CAPEQ~, CAPEQ+36
U ADDNP+14, ADDNP+15, USRTRM+5, USRTRM+13, USRTRM+16
X CAPEQ+10~, CAPEQ+30~, CAPEQ+33*, CAPEQ+34*, CAPEQ+37~, CAPEQ+40*, CAPEQ+43*, DISASGN+1~, ADDNP+2~
XMDUZ USRTRM+2~, USRTRM+18*
XMMG USRTRM+2~
XMROU USRTRM+2~
XMSTRIP USRTRM+2~
XMSUB USRTRM+2~, USRTRM+18*
XMTEXT USRTRM+2~, USRTRM+19*
XMY USRTRM+2~
XMY("G.EN IT EQUIPMENT" , USRTRM+19*
XMYBLOB USRTRM+2~
XMZ USRTRM+2~
>> XUIFN USRTRM+1, USRTRM+3
Y CAPEQHD+1, DISASGN+1~, DISASGN+9, ADDNP+2~, ADDNP+13
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 |  Local Variables  | All