PSO613P ;MCF - PSO*7*613 POST-INSTALL ROUTINE TO CLEAN UP CLOZAPINE REGISTRATION DATE. ;12/04/20
Source file <PSO613P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FGRND | ; Run in foreground
|
|
| QUE | ; Task to background
|
|
| EN | ; Main entry point to clean up clozapine registration date.
|
|
| REGDATE | ; LOOP THROUGH #55 and find bad date time stamps
|
|
| ;Send message
|
||
| RESTORE | ; LOOP THROUGH ^XTMP and RESTORE bad date time stamps
|
|
| INIT | ; Initialize variables DGPREFIX, DGSRVR, DGREGION, and DGKEY
; |
|
| REIX5252 | ; Reindex new AC Mumps type cross reference in file 52.52
|
| FileNo | Call Tags |
|---|---|
| ^PS(52.52 - [#52.52] | Classic Fileman Calls |
| ^PS(55 - [#55] | GET1^DIQ |