OCXOZ03 ;SLC/RJS,CLA - Order Check Scan ;JUL 23,2025 at 13:11
Source file <OCXOZ03.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHK12 | ; Look through the current environment for valid Event/Elements for this patient.
; Called from CHK1+28^OCXOZ02. |
|
| CHK23 | ; Look through the current environment for valid Event/Elements for this patient.
; Called from UPDATE+11^OCXOZ01. |
|
| FILE(DFN,OCXELE,OCXDFL) | ; This Local Extrinsic Function logs a validated event/element.
|
|
| FOODDRG(OCXOR) | ;func rtns 1^<med name> if OCXOR is food-drug med
|
|
| LIST(DATA,LIST) | ; IS THE DATA FIELD IN THE LIST
|
|
| OI(OCXOR) | ;func rtns orderable item for an order number (OCXOR)
|
|
| PATLOC(DFN) | ; Compiler Function: PATIENT LOCATION
|
|
| POINTER(OCXFILE,D0) | ; This Local Extrinsic Function gets the value of the name field
; of record D0 in file OCXFILE |
|
| TERMLKUP(OCXTERM,OCXLIST) | ;
|
|
| WARDSERV(WARD) | ; Compiler Function: GET WARD SERVICE
|
