OCXOZ10 ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49
Source file <OCXOZ10.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
R71R1A | ; Verify all Event/Elements of Rule #71 'OPIOID MEDICATIONS' Relation #1 'OPIOID MED ORDER AND DUP OPIOID MEDS'
; Called from EL138+5^OCXOZ0H, and EL139+5^OCXOZ0H. |
|
R71R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #71 'OPIOID MEDICATIONS' Relation #1 'OPIOID MED ORDER AND DUP OPIOID MEDS'
; Called from R71R1A+12. |
|
R72R1A | ; Verify all Event/Elements of Rule #72 'AUTO DCED CONTROLLED SUBSTANCE ORDERS' Relation #1 'PHARM DCED AND PHARM HASH MISMATCH'
; Called from EL142+5^OCXOZ0H, and EL143+5^OCXOZ0H. |
|
R72R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #72 'AUTO DCED CONTROLLED SUBSTANCE ORDERS' Relation #1 'PHARM DCED AND PHARM HASH MISMATCH'
; Called from R72R1A+12. |
|
R72R2A | ; Verify all Event/Elements of Rule #72 'AUTO DCED CONTROLLED SUBSTANCE ORDERS' Relation #2 'PHARM DCED AND DEA CERT REVOKED'
; Called from EL142+6^OCXOZ0H, and EL141+5^OCXOZ0H. |
|
CKSUM(STR) | ; Compiler Function: GENERATE STRING CHECKSUM
|
|
GETDATA(DFN,OCXL,OCXDFI) | ; This Local Extrinsic Function returns runtime data
|
|
MCE138() | ; Verify Event/Element: DUP OPIOID MEDS
|
|
MCE139() | ; Verify Event/Element: OPIOID MED ORDER
|
|
MCE141() | ; Verify Event/Element: HL7 DEA CERT REVOKED
|
|
MCE142() | ; Verify Event/Element: HL7 PHARMACY DCED ORDER
|
|
MCE143() | ; Verify Event/Element: HL7 PHARMACY HASH MISMATCH
|
|
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
|
|
OPIOID(ORPT) | ;determine if pat is receiving opioid med
; rtn 1^opioid drug 1, opioid drug 2, opioid drug3, ... |