ORY138 ;SLC/DAN ;3/14/02 15:31
Source file <ORY138.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DQ | ;Enter here for queued task
|
|
| FIXES | ;This section will add missing AE Xrefs from active orders
|
|
| FIXPPDG | ;This section will fix incorrect package pointer and display group problems.
|
|
| GETIEN(STDT) | ;Find first IEN associated with given start date
|
|
| ;Send results of cleanup in a mail message to initiator
|
||
| INSTDT(PATCH) | ;Returns installation date patch first installed at site
|
|
| ADM(IEN,ENTERED) | ;Determine if patient was inpatient when order was entered
|
|
| PTNM(IEN) | ;Return pt name or -1 if unable to determine
|
|
| XREF(IEN,DG,NDG) | ;Update xrefs for TO field
|
|
| CHKACT | ;Compares current action field with actual current action and updates if necessary
|