OCXOZ0N ;SLC/RJS,CLA - Order Check Scan ;JUL 23,2025 at 13:11
Source file <OCXOZ0N.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| R19R1B | ; Send Order Check, Notication messages and/or Execute code for  Rule #19 'PATIENT DISCHARGE'  Relation #1 'DISCHARGE'
 ; Called from R19R1A+10^OCXOZ0M.  | 
|
| R22R1A | ; Verify all Event/Elements of  Rule #22 'ORDER REQUIRES CO-SIGNATURE'  Relation #1 'COSIG'
 ; Called from EL47+5^OCXOZ0G.  | 
|
| R22R1B | ; Send Order Check, Notication messages and/or Execute code for  Rule #22 'ORDER REQUIRES CO-SIGNATURE'  Relation #1 'COSIG'
 ; Called from R22R1A+10.  | 
|
| R24R1A | ; Verify all Event/Elements of  Rule #24 'ORDERER FLAGGED RESULTS AVAILABLE'  Relation #1 'ORDER FLAGGED FOR RESULTS AND (LAB RESULT OR IMAGI...'
 ; Called from EL5+5^OCXOZ0G, and EL49+5^OCXOZ0G, and EL55+5^OCXOZ0G, and EL101+5^OCXOZ0G.  | 
|
| 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  | 
|
| MCE101() | ; Verify Event/Element: HL7 FINAL IMAGING RESULT
 | 
|
| MCE47() | ; Verify Event/Element: ORDER REQUIRES CO-SIGNATURE
 | 
|
| MCE49() | ; Verify Event/Element: ORDER FLAGGED FOR RESULTS
 | 
|
| MCE5() | ; Verify Event/Element: HL7 FINAL LAB RESULT
 | 
|
| MCE55() | ; Verify Event/Element: CONSULT FINAL RESULTS
 | 
|
| 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
 |