XUMF4L0 ;OIFO-OAK/RAM - Load IMF ;02/21/02
Source file <XUMF4L0.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MAIN | ; -- main
|
|
BG | ; -- background job
|
|
EN | ; -- entry point
|
|
UPDATE | ; -- get FACILITY TYPE, update, get INSTITUTION, update
|
|
MFS0 | ; -- get national facility type file from Master File Server
|
|
MFS1 | ; -- get national facility type file from Master File Server
|
|
CNT() | ; -- count station numbers in Institution file
|
|
EXIT | ; -- cleanup and quit
|
|
V23 | ; -- stuff VISN 23
|
|
NEVER | ; -- cleanup never performed - notify site and NVS
|
|
SITE() | ; -- facility name and sta # string
|