GMVER1 ;HOIFO/RM,YH,FT-ENTERED IN ERROR FOR A PATIENT & DATE RANGE ;12/12/01 12:36
Source file <GMVER1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1(RESULT,GMVDFN,GMVBEG,GMVEND) | ; [RPC entry point]
; Returns Entered in Error records for a date range ; Input: ; RESULT = Where data is returned (closed array reference) (Required) ; GMVDFN = A pointer to the Patient file (#2) (Required) ; GMVBEG = Beginning date for all vitals ; GMVEND = Ending date for all vitals |
|
| Q | ; KILL VARIABLES
|
|
| SORT | ; loop through the AA x-ref and find patient entries marked as
; entered in error (i.e., node 2 exists). |
|
| WRT | ;
|
|
| ERREASON | ;ERROR REASON
|
|
| WRTDAT(TYPE,DATA) | ;
|
|
| T | ||
| WT | ||
| HT | ||
| CG | ||
| CVP | ||
| PO2 | ||
| PN |
