OCXOZ11 ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49
Source file <OCXOZ11.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| R72R2B | ; Send Order Check, Notication messages and/or Execute code for Rule #72 'AUTO DCED CONTROLLED SUBSTANCE ORDERS' Relation #2 'PHARM DCED AND DEA CERT REVOKED'
; Called from R72R2A+12^OCXOZ10. |
|
| R73R1A | ; Verify all Event/Elements of Rule #73 'METFORMIN EGFR - LAB RESULTS' Relation #1 'METFORMIN ORDER AND METFORMIN EGFR < 45'
; Called from EL86+5^OCXOZ0H, and EL146+5^OCXOZ0H. |
|
| R73R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #73 'METFORMIN EGFR - LAB RESULTS' Relation #1 'METFORMIN ORDER AND METFORMIN EGFR < 45'
; Called from R73R1A+12. |
|
| R73R2A | ; Verify all Event/Elements of Rule #73 'METFORMIN EGFR - LAB RESULTS' Relation #2 'METFORMIN ORDER AND NO METFORMIN EGFR'
; Called from EL86+6^OCXOZ0H, and EL147+5^OCXOZ0H. |
|
| CKSUM(STR) | ; Compiler Function: GENERATE STRING CHECKSUM
|
|
| GETDATA(DFN,OCXL,OCXDFI) | ; This Local Extrinsic Function returns runtime data
|
|
| MCE146() | ; Verify Event/Element: METFORMIN EGFR < 45
|
|
| MCE147() | ; Verify Event/Element: NO METFORMIN EGFR
|
|
| MCE86() | ; Verify Event/Element: METFORMIN 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
|
