ICD15PT ;ABR/ALB - POST-INIT FOR DRG 15 ; 5 JAN 1998
Source file <ICD15PT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; POST-INSTALL ENTRY POINT
|
|
| DRGREF | ; add routine reference to new DRGs
|
|
| DRGFIELD | ; delete starred field from DRG file
|
|
| FYUPD | ; change FY for weights & trims, break-evens to FM format
|
|
| WTUP(DRG) | ; change wts/trims FY to FM FY references
|
|
| BEUP(DRG) | ;change break-even FY to FM FY references
|
|
| SERVICE | ; update services for break-evens
|
|
| BEGWT | ; entry point for wts & trims update for 95
|
|
| UPD95 | ; load fy 95 wwu into ICD DRG file (80.2)
|
|
| UPD96 | ; load fy 96 wwu into ICD DRG file (80.2)
|
|
| FY | ;set fy multiple with FYR stats
|
|
| SETVAR | ; SET VARIABLES
|
|
| MORE | ;set 0 node with FY 96 stats
|
