Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: OCXOZ0Q

Package: Order Entry Results Reporting

Routine: OCXOZ0Q


Information

OCXOZ0Q ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49

Source Information

Source file <OCXOZ0Q.m>

Entry Points

Name Comments DBIA/ICR reference
R42R1A ; Verify all Event/Elements of Rule #42 'ABNORMAL LAB RESULTS' Relation #1 'ABNORMAL LAB ORDER'
; Called from EL23+5^OCXOZ0G.
R42R1B ; Send Order Check, Notication messages and/or Execute code for Rule #42 'ABNORMAL LAB RESULTS' Relation #1 'ABNORMAL LAB ORDER'
; Called from R42R1A+10.
R42R2A ; Verify all Event/Elements of Rule #42 'ABNORMAL LAB RESULTS' Relation #2 'ABNORMAL LAB TEST'
; Called from EL103+5^OCXOZ0G.
R42R2B ; Send Order Check, Notication messages and/or Execute code for Rule #42 'ABNORMAL LAB RESULTS' Relation #2 'ABNORMAL LAB TEST'
; Called from R42R2A+10.
R44R1A ; Verify all Event/Elements of Rule #44 'ORDER REQUIRES ELECTRONIC SIGNATURE' Relation #1 'ELECTRONIC SIGNATURE'
; Called from EL48+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
MCE103() ; Verify Event/Element: HL7 LAB TEST RESULTS ABNORMAL
MCE23() ; Verify Event/Element: HL7 LAB ORDER RESULTS ABNORMAL
MCE48() ; Verify Event/Element: ORDER REQUIRES ELECTRONIC 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
Info |  Source |  Entry Points