OCXOZ0I ;SLC/RJS,CLA - Order Check Scan ;JUL 23,2025 at 13:11
Source file <OCXOZ0I.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| R3R1B | ; Send Order Check, Notication messages and/or Execute code for  Rule #3 'CRITICAL LAB RESULTS'  Relation #1 'CRITICAL LAB TEST'
 ; Called from R3R1A+10^OCXOZ0H.  | 
|
| R3R2A | ; Verify all Event/Elements of  Rule #3 'CRITICAL LAB RESULTS'  Relation #2 'CRITICAL LAB ORDER'
 ; Called from EL105+5^OCXOZ0F.  | 
|
| R3R2B | ; Send Order Check, Notication messages and/or Execute code for  Rule #3 'CRITICAL LAB RESULTS'  Relation #2 'CRITICAL LAB ORDER'
 ; Called from R3R2A+10.  | 
|
| R5R1A | ; Verify all Event/Elements of  Rule #5 'ORDER FLAGGED FOR CLARIFICATION'  Relation #1 'ORDER FLAGGED'
 ; Called from EL44+5^OCXOZ0F.  | 
|
| CKSUM(STR) | ;  Compiler Function: GENERATE STRING CHECKSUM
 | 
|
| GETDATA(DFN,OCXL,OCXDFI) | ;     This Local Extrinsic Function returns runtime data
 | 
|
| INT2DT(OCXDT,OCXF) | ;      This Local Extrinsic Function converts an OCX internal format
 ; date into an Externl Format (Human Readable) date. 'OCXF=SHORT FORMAT OCXF=LONG FORMAT  | 
|
| MCE105() | ; Verify Event/Element: HL7 LAB ORDER RESULTS CRITICAL
 | 
|
| MCE44() | ; Verify Event/Element: ORDER FLAGGED
 | 
|
| NEWRULE(OCXDFN,OCXORD,OCXRUL,OCXREL,OCXNOTF,OCXMESS) | ; Has this rule already been triggered for this order number
 | 
|
| SETAP(ROOT,DD,DATA,DA) | ;  Set Rule Event data
 |