ENFACTU ;(WCIOFO)/SAB-FAP CAPITALIZATION THRESHOLD UTILITIES ;5/22/2002
Source file <ENFACTU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
TOPSYS(ENDA) | ; Topmost System
; input ENDA - equipment entry # ; returns ; entry # of topmost equipment in system of which ENDA is a part ; OR 0 if ENDA is not part of a system (parent or component) ; OR ?^message if error detected |
|
SYSVAL(ENDAT,ENSW) | ; System Value
; input ENDAT - entry # parent for system ; ENSW - optional switch ; contains "C" if only capitalized values should be ; included in return value ; returns sum of asset values for parent and all it's components |
|
CHKEXP(ENDA) | ; Check if capitalized equipment item should be expensed
; input ENDA - equipment Entry # if check ; returns ; 1 (true) if it should be expensed ; 0^reason if it should not be expensed due to system criteria ; U^username if it should not be expensed due to user edit |
FileNo | Call Tags |
---|---|
^ENG(6914 - [#6914] | GET1^DIQ |