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

Package: Engineering

Routine: ENXIP63


Information

ENXIP63 ;WCIOFO/SAB- PATCH INSTALL ROUTINE ;2/7/2000

Source Information

Source file <ENXIP63.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZTLOAD  $$HTE^XLFDT  ($$PATCH,BMES,MES)^XPDUTL  
VA FileMan 2 $$GET1^DID  ^DIK  

Entry Points

Name Comments DBIA/ICR reference
PR ;Pre Install Entry Point
PS ;Post Install Entry Point
QTASK ; Queue Task to expense capitalized equipment that does not meet the
; new capitalization threshold ($25,000)
;
LEGACY(ENSN) ; Legacy Station Extrinsic Function
; input ENSN - station number
; returns 1 if legacy station or 0 if not legacy station
; list updated through calendar year 1999 facility consolidations

External References

Name Field # of Occurrence
^%ZTLOAD QTASK+8
$$GET1^DID ENXIP63+5
^DIK PR+6
$$HTE^XLFDT QTASK+18
$$PATCH^XPDUTL PS+4
BMES^XPDUTL PS+4, PS+5, PS+15, QTASK+11, QTASK+16
MES^XPDUTL PS+16, QTASK+12, QTASK+17, QTASK+18, QTASK+19, QTASK+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,"WARNING: Unexpected Field #99 found in EQUIPMENT INV (#6914) file."
  • Line Location: ENXIP63+7
Function Call: WRITE
  • Prompt: !,"This patch includes a new field REMAIN CAPITALIZED SET BY (#99)"
  • Line Location: ENXIP63+8
Function Call: WRITE
  • Prompt: !,"that will be added to the EQUIPMENT INV. (#6914) file."
  • Line Location: ENXIP63+9
Function Call: WRITE
  • Prompt: !,"There appears to be a locally added field "_ENX
  • Line Location: ENXIP63+10
Function Call: WRITE
  • Prompt: !,"already assigned with field number 99. The definition of"
  • Line Location: ENXIP63+11
Function Call: WRITE
  • Prompt: !,"field #99 will be overwritten when this patch is installed."
  • Line Location: ENXIP63+12

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(6910 - [#6910] PS+12, PS+13
^ENG(6910.9 - [#6910.9] PR+6

Label References

Name Line Occurrences
$$LEGACY PS+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA PR+3~, PR+6*
DIK PR+3~, PR+4*
DT PS+5
ENI PR+3~, PR+5*, PR+6, PS+1~, PS+12*, PS+13
ENRET LEGACY+4~, LEGACY+5*, LEGACY+7*, LEGACY+8
ENSN PS+1~, PS+13*, PS+14, LEGACY~, LEGACY+6*, LEGACY+7
ENX ENXIP63+4~, ENXIP63+5*, ENXIP63+6, ENXIP63+10
U PS+13, LEGACY+7
>> XPDQUES("POS1" QTASK+7, QTASK+20
>> ZTDESC QTASK+4*
>> ZTDTH QTASK+5*
>> ZTIO QTASK+6*
>> ZTRTN QTASK+3*
>> ZTSAVE("ENIO" QTASK+7*
>> ZTSK QTASK+10, QTASK+15, QTASK+17
>> ZTSK("D" QTASK+18
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All