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
|