RAACIPST ;HISC/CAH - postinit for patch 8 ;10/23/96 16:26
Source file <RAACIPST.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ;For each imaging loc, get file 44 pointer, DSS ID, Div
|
|
| ERR44 | ;bad file 44 pointer
|
|
| ERRDSS | ;bad file 40.7 pointer (DSS ID/Stop Code)
|
|
| ERRDIV | ;bad or non-existent Division on active imaging loc
|
|
| ERRMSG(RAX) | ||
| REPOINT | ;current img loc points to a file 44 entry with appt patterns
|
|
| OK | ;this img loc was processed ok
|
|
| DEL148 | ; Delete 'Telephone/Diagnostic' Stop Code from the Imaging Stop Codes
; file. Data resides in ^RAMIS(71.5, |
| FileNo | Call Tags |
|---|---|
| ^DIC(40.7 - [#40.7] | GETS^DIQ |
| ^RAMIS(71.5 - [#71.5] | Classic Fileman Calls |