OCXOZ0N ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49
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
|