ENLIB3 ;WCIOFO/DH,SAB-Package Utilities (FAP) ;9/2/1998
Source file <ENLIB3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PO | ; Populate appropriate equipment data from IFCAP purchase order.
; Normally called when PO entered into Equipment File ; Input Variables ; X => PO# ; DA => Equipment IEN |
|
| FAP | ||
| BOCI(ENBOC) | ; Returns ien of active BOC or null value
|
|
| FUNDI(ENFUND) | ; Returns ien of active FUND or null value
|
|
| TYPE | ||
| CAP | ||
| NX | ||
| DTCHK(ENFLD) | ;Input Transform Check that TURN-IN DATE, REPLACEMENT DATE, and
; DISPOSITION DATE follow ACQUISITION DATE. ; DA => Equipment Entry Number ; ENFLD => Field being checked (16, 20.5, or 22) ; X => value entered (internal format) - killed if check fails |
|
| DISPM | ; Expand DISPOSITION METHOD on DJ screens ENEQ2*
; Expects value (1U) in loc var V(V) ; Returns expanded value in V(V) ; Called by PRE-ACTION field of DJ Screen File |
|
| DISPW | ; Prohibit direct edit of DISPOSITION METHOD for capitalized assets
|
|
| AFUNDI(ENFUND) | ; Returns ien of active FUND or null value
; input - associated fund |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^PRC(442 - [#442] | FIND1^DIC, GET1^DIQ |
| 442.01 | GET1^DIQ |
| 442.041 | GET1^DIQ |
| ^ENG(6914 - [#6914] | GET1^DID, GET1^DIQ |
