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 |