IVMYZ3 ;ALB/SEK - PURGE INCORRECT IVM PATIENT & TRANSMISSION RECORDS ; 13-JUNE-95
Source file <IVMYZ3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; this routine will delete ivm patient (#301.5) and ivm
; transmission log (#301.6) records for incorrect income years of ; -10000 & -910000. ; this routine will also send notification to the IVM Center once ; the facility has installed IVM*2*3 patch. |
|
| Q | ||
| ENV | ; make sure required patches are installed
|
|
| TYPE | ; Ask user if this installation is for a test account or live account.
|
|
| NOTE | ; Send notification to the IVM Center once the facility has installed
; IVM*2*3 patch in production account. |
|
| PURGE | ; do the purge
|
|
| TEXT | ; Text for help for production/test question
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IVM(301.5 - [#301.5] | Classic Fileman Calls |
| ^IVM(301.6 - [#301.6] | Classic Fileman Calls |