ENPRUTL ;WISC/SAB-PROJECT TRACKING UTILITIES ;1/20/1998
Source file <ENPRUTL.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PRDOM | ; Determine Domain for project tracking transmissions
 | 
|
| FMS(ENDA) | ; FMS # Extrinsic Function
 ; called from FMS # (# .05) computed field ; Input: DA - ien of construction project ; Returns: computed FMS #  | 
|
| MSL(ENDA) | ; Milestone List Extrinsic Function
 ; ENDA - ien of construction project ; Returns value with pieces (true/false) which indicate applicability ; of the corresponding 22 milestones  | 
|
| MSLAP | ; set pieces of ENX for milestone applicability
 ; also called from ENPRF1 ; needs ENAM,ENCM,ENCAF,ENPR returns ENX  | 
|
| MSD(ENDA,ENPRIOR) | ; Milestone Dates for Project
 ; Input Variables ; ENDA - ien of project ; ENPRIOR - (optional) flag, true if previous values also desired ; Output Variables ; ENMS("%",milestone #) = % complete ("%0" for previous values) ; ENMS("P",milestone #) = planned date ("P0" for previous values) ; ENMS("R",milestone #) = revised date ("R0" for previous values) ; ENMS("A",milestone #) = actual date ("A0" for previous values)  | 
|
| N2 | ;
 | 
|
| N3 | ;
 | 
|
| N4 | ;
 | 
|
| N50 | ;
 | 
|
| N51 | ;
 | 
|
| N56 | ;
 | 
|
| MS(ENI) | ; Milestone Name Extrinsic Function
 ; Input ENI - index number for milestone (1-22) ; Returns name of milestone  | 
|
| MSFP(ENI) | ; Milestone Planned Field Number Extrinsic Function
 ; Input ENI - index number for milestone (1-22) ; Returns field number of milestone (planned)  | 
|
| MSFR(ENI) | ; Milestone Field Number Extrinsic Function
 ; Input ENI - index number for milestone (1-22) ; Returns field number of milestone (revised)  | 
|
| MSFA(ENI) | ; Milestone Field Number Extrinsic Function
 ; Input ENI - index number for milestone (1-22) ; Returns field number of milestone (actual)  | 
|
| MSDATA | ;;
 | 
|
| 1 | ;;Design Program Start^20^34^49
 | 
|
| 2 | ;;Design Program Compl^20.1^34.1^49.1
 | 
|
| 3 | ;;Authorized^^^50
 | 
|
| 4 | ;;Advertise for A/E^20.3^34.3^51
 | 
|
| 5 | ;;Select A/E^20.4^34.4^52
 | 
|
| 6 | ;;A/E Award^20.5^34.5^53
 | 
|
| 7 | ;;Start Schematics^21^35^54
 | 
|
| 8 | ;;Complete Schematics^22^36^55
 | 
|
| 9 | ;;Start Design Dev.^22.5^36.1^55.5
 | 
|
| 10 | ;;Compl. Design Dev.^22.6^36.2^55.6
 | 
|
| 11 | ;;Start/Award CD^23^37^56
 | 
|
| 12 | ;;Complete CD^24^38^57
 | 
|
| 13 | ;;Start L/T Review^24.4^38.4^57.4
 | 
|
| 14 | ;;Start Audit Review^24.6^38.6^57.6
 | 
|
| 15 | ;;Issue IFB/SBA^25^39^58
 | 
|
| 16 | ;;Compl. L/T Review^25.4^39.4^58.4
 | 
|
| 17 | ;;Compl. Audit Review^25.6^39.6^58.6
 | 
|
| 18 | ;;Bid Open/Negotiation^26^40^59
 | 
|
| 19 | ;;Construction Award^27^41^60
 | 
|
| 20 | ;;Construction Start^28^42^61
 | 
|
| 21 | ;;Const. Complete^29^43^62
 | 
|
| 22 | ;;Activation^30^44^63
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(6910 - [#6910] | GET1^DIQ | 
| ^ENG("PROJ" - [#6925] | GET1^DIQ |