OCXOZ0Y ;SLC/RJS,CLA - Order Check Scan ;JUL 23,2025 at 13:11
Source file <OCXOZ0Y.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| R66R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #66 'LAB RESULTS' Relation #1 'HL7 LAB RESULTS'
; Called from R66R1A+10^OCXOZ0X. |
|
| R67R1A | ; Verify all Event/Elements of Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #1 'GLUCOPHAGE ORDER AND GLUCOPHAGE CREATININE > 1.5'
; Called from EL86+5^OCXOZ0H, and EL111+5^OCXOZ0H. |
|
| R67R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #1 'GLUCOPHAGE ORDER AND GLUCOPHAGE CREATININE > 1.5'
; Called from R67R1A+12. |
|
| R67R2A | ; Verify all Event/Elements of Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #2 'GLUCOPHAGE ORDER AND NO GLUCOPHAGE CREATININE'
; Called from EL86+6^OCXOZ0H, and EL112+5^OCXOZ0H. |
|
| R67R2B | ; Send Order Check, Notication messages and/or Execute code for Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #2 'GLUCOPHAGE ORDER AND NO GLUCOPHAGE CREATININE'
; Called from R67R2A+12. |
|
| CKSUM(STR) | ; Compiler Function: GENERATE STRING CHECKSUM
|
|
| GETDATA(DFN,OCXL,OCXDFI) | ; This Local Extrinsic Function returns runtime data
|
|
| MCE111() | ; Verify Event/Element: GLUCOPHAGE CREATININE > 1.5
|
|
| MCE112() | ; Verify Event/Element: NO GLUCOPHAGE CREATININE
|
|
| MCE86() | ; Verify Event/Element: GLUCOPHAGE ORDER
|
|
| 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
|
