OCXOZ0K ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49
Source file <OCXOZ0K.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
R7R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #7 'PATIENT ADMISSION' Relation #1 'ADMISSION'
; Called from R7R1A+10^OCXOZ0J. |
|
R11R1A | ; Verify all Event/Elements of Rule #11 'IMAGING REQUEST CANCELLED/HELD' Relation #1 'CANCELLED AND CANCELED BY NON-ORIG ORDERER'
; Called from EL31+5^OCXOZ0F, and EL100+5^OCXOZ0F. |
|
R11R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #11 'IMAGING REQUEST CANCELLED/HELD' Relation #1 'CANCELLED AND CANCELED BY NON-ORIG ORDERER'
; Called from R11R1A+12. |
|
R11R2A | ; Verify all Event/Elements of Rule #11 'IMAGING REQUEST CANCELLED/HELD' Relation #2 'ON HOLD AND CANCELED BY NON-ORIG ORDERER'
; Called from EL100+6^OCXOZ0F, and EL30+5^OCXOZ0F. |
|
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 |
|
MCE100() | ; Verify Event/Element: CANCELED BY NON-ORIG ORDERING PROVIDER
|
|
MCE30() | ; Verify Event/Element: RADIOLOGY ORDER PUT ON-HOLD
|
|
MCE31() | ; Verify Event/Element: RADIOLOGY ORDER CANCELLED
|
|
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
|