GMRCYP70 ;BP/SBR - CONSULT NOTE STORED ON WRONG PATIENT ; 11/07/2008
Source file <GMRCYP70.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENV | ;
|
|
| EN1 | ;
|
|
| TASK | ||
| START | ;
|
|
| SEARCH | ;Search for results attached to the wrong patient.
|
|
| MSG | ;Send Mailman message to installer
|
|
| NOMSG | ;Send Mailman message to installer - no records found
|
|
| TOTAL | ;Calculate adjusted result totals to determine total messages needed
|
|
| TOTAL1 | ||
| NAMELIST(GMRCP,GMRCOLD,GMRCDELR) | ;manage the list of recipients
|
|
| READ(GMRC0,GMRCA,GMRCB,GMRCH,GMRCL) | ;read logic
|
|
| NAMEHELP | ;Help for the recipient list logic
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | EXTERNAL^DILFD |
| ^MCAR(690 - [#690] | GET1^DIQ |
