OCXOZ0J ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49
Source file <OCXOZ0J.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
R5R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #5 'ORDER FLAGGED FOR CLARIFICATION' Relation #1 'ORDER FLAGGED'
; Called from R5R1A+10^OCXOZ0I. |
|
R5R2A | ; Verify all Event/Elements of Rule #5 'ORDER FLAGGED FOR CLARIFICATION' Relation #2 'ORDER UNFLAGGED'
; Called from EL134+5^OCXOZ0F. |
|
R5R2B | ; Send Order Check, Notication messages and/or Execute code for Rule #5 'ORDER FLAGGED FOR CLARIFICATION' Relation #2 'ORDER UNFLAGGED'
; Called from R5R2A+10. |
|
R6R1A | ; Verify all Event/Elements of Rule #6 'ORDER REQUIRES CHART SIGNATURE' Relation #1 'SIGNATURE'
; Called from EL45+5^OCXOZ0F. |
|
R6R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #6 'ORDER REQUIRES CHART SIGNATURE' Relation #1 'SIGNATURE'
; Called from R6R1A+10. |
|
R7R1A | ; Verify all Event/Elements of Rule #7 'PATIENT ADMISSION' Relation #1 'ADMISSION'
; Called from EL21+5^OCXOZ0F. |
|
CKSUM(STR) | ; Compiler Function: GENERATE STRING CHECKSUM
|
|
GETDATA(DFN,OCXL,OCXDFI) | ; This Local Extrinsic Function returns runtime data
|
|
MCE134() | ; Verify Event/Element: ORDER UNFLAGGED
|
|
MCE21() | ; Verify Event/Element: PATIENT ADMISSION
|
|
MCE45() | ; Verify Event/Element: ORDER REQUIRES CHART SIGNATURE
|
|
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
|