Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: OCXOZ0Y

Package: Order Entry Results Reporting

Routine: OCXOZ0Y


Information

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

Source Information

Source file <OCXOZ0Y.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Order Entry Results Reporting 1 EN^ORB3  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Order Entry Results Reporting 2 OCXOZ0H  OCXOZ0X  

Entry Points

Name Comments DBIA/ICR reference
R66R1B ; Send Order Check, Notication messages and/or Execute code for Rule #66 'LAB RESULTS' Relation #1 'HL7 LAB RESULTS'
; Called from R66R1A+10^OCXOZ0X.
R68R1A ; Verify all Event/Elements of Rule #68 'DANGEROUS MEDS OVER AGE 64' Relation #1 'MED ORDER FOR PT > 64 AND AMITRIPTYLINE'
; Called from EL122+5^OCXOZ0H, and EL125+5^OCXOZ0H.
R68R1B ; Send Order Check, Notication messages and/or Execute code for Rule #68 'DANGEROUS MEDS OVER AGE 64' Relation #1 'MED ORDER FOR PT > 64 AND AMITRIPTYLINE'
; Called from R68R1A+12.
R68R2A ; Verify all Event/Elements of Rule #68 'DANGEROUS MEDS OVER AGE 64' Relation #2 'MED ORDER FOR PT > 64 AND CHLORPROPAMIDE'
; Called from EL125+6^OCXOZ0H, and EL123+5^OCXOZ0H.
R68R2B ; Send Order Check, Notication messages and/or Execute code for Rule #68 'DANGEROUS MEDS OVER AGE 64' Relation #2 'MED ORDER FOR PT > 64 AND CHLORPROPAMIDE'
; Called from R68R2A+12.
R68R3A ; Verify all Event/Elements of Rule #68 'DANGEROUS MEDS OVER AGE 64' Relation #3 'MED ORDER FOR PT > 64 AND DIPYRIDAMOLE'
; Called from EL125+7^OCXOZ0H, and EL124+5^OCXOZ0H.
R68R3B ; Send Order Check, Notication messages and/or Execute code for Rule #68 'DANGEROUS MEDS OVER AGE 64' Relation #3 'MED ORDER FOR PT > 64 AND DIPYRIDAMOLE'
; Called from R68R3A+12.
CKSUM(STR) ; Compiler Function: GENERATE STRING CHECKSUM
GETDATA(DFN,OCXL,OCXDFI) ; This Local Extrinsic Function returns runtime data
MCE122() ; Verify Event/Element: AMITRIPTYLINE ORDER
MCE123() ; Verify Event/Element: CHLORPROPAMIDE ORDER
MCE124() ; Verify Event/Element: DIPYRIDAMOLE ORDER
MCE125() ; Verify Event/Element: MED ORDER FOR PT > 64
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

External References

Name Field # of Occurrence
EN^ORB3 R66R1B+29

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OCXD(860.7 - [#860.7] NEWRULE+13, NEWRULE+47!
^OCXS(860.2 - [#860.2] R68R1A+9, R68R2A+9, R68R3A+9, NEWRULE+38
^TMP("OCXCHK" GETDATA+3, MCE122+6, MCE123+6, MCE124+6, MCE125+6, NEWRULE+50, NEWRULE+55
^TMP("OCXSWAP" R66R1B+21

Label References

Name Line Occurrences
$$CKSUM NEWRULE+10
$$GETDATA R66R1B+13, R68R1B+11, R68R1B+12, R68R2B+11, R68R2B+12, R68R3B+11, R68R3B+12
$$MCE122 R68R1A+12
$$MCE123 R68R2A+12
$$MCE124 R68R3A+12
$$MCE125 R68R1A+11, R68R2A+11, R68R3A+11
$$NEWRULE R66R1B+28
R68R1B R68R1A+12
R68R2B R68R2A+12
R68R3B R68R3A+12
SETAP NEWRULE+23, NEWRULE+30, NEWRULE+36, NEWRULE+48, NEWRULE+57

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ASC CKSUM+2~, CKSUM+4*
CKSUM CKSUM+2~*, CKSUM+4*, CKSUM+5
DA SETAP~, SETAP+2, SETAP+3
DATA SETAP~, SETAP+1
DD SETAP~, SETAP+2, SETAP+3
DFN R66R1B+13, R66R1B+28, R66R1B+29, R68R1B+11, R68R1B+12, R68R2B+11, R68R2B+12, R68R3B+11, R68R3B+12, GETDATA~
, GETDATA+3, MCE122+5, MCE123+5, MCE124+5, MCE125+5
OCXCKSUM NEWRULE+7~, NEWRULE+10*, NEWRULE+13, NEWRULE+20
OCXCMSG R66R1B+11~, R66R1B+12*, R68R1B+10~, R68R1B+11*, R68R1B+12*, R68R1B+19, R68R2B+10~, R68R2B+11*, R68R2B+12*, R68R2B+19
, R68R3B+10~, R68R3B+11*, R68R3B+12*, R68R3B+19
OCXDATA R66R1B+11~, R66R1B+19*, R66R1B+21*, R66R1B+22*, R66R1B+29, R68R1B+10~, R68R2B+10~, R68R3B+10~, NEWRULE+7~, NEWRULE+17!
, NEWRULE+23, NEWRULE+25!, NEWRULE+30, NEWRULE+32!, NEWRULE+36, NEWRULE+42!, NEWRULE+48, NEWRULE+53!, NEWRULE+57
OCXDATA( NEWRULE+18*, NEWRULE+26*, NEWRULE+27*, NEWRULE+33*, NEWRULE+43*, NEWRULE+44*, NEWRULE+45*, NEWRULE+54*, NEWRULE+55*
OCXDATA("AT" NEWRULE+20*
OCXDATA("B" NEWRULE+19*, NEWRULE+28*, NEWRULE+34*, NEWRULE+46*, NEWRULE+56*
>> OCXDF(37 MCE122+5*, MCE122+6, MCE123+5*, MCE123+6, MCE124+5*, MCE124+6, MCE125+5*, MCE125+6
OCXDFI GETDATA~, GETDATA+3, NEWRULE+7~, NEWRULE+50*, NEWRULE+54, NEWRULE+55, NEWRULE+56, NEWRULE+57
OCXDFN NEWRULE~, NEWRULE+3, NEWRULE+5*, NEWRULE+13, NEWRULE+18, NEWRULE+19, NEWRULE+20, NEWRULE+23, NEWRULE+29, NEWRULE+47
, NEWRULE+50, NEWRULE+55
OCXDUZ R66R1B+11~, R66R1B+19*, R66R1B+29, R68R1B+10~, R68R2B+10~, R68R3B+10~
OCXDUZ( R66R1B+24*
OCXE GETDATA+2~, GETDATA+3*
OCXELE NEWRULE+7~, NEWRULE+38*, NEWRULE+43, NEWRULE+44, NEWRULE+45, NEWRULE+46, NEWRULE+47, NEWRULE+48, NEWRULE+50, NEWRULE+52
, NEWRULE+55
OCXFORD R66R1B+11~, R68R1B+10~, R68R2B+10~, R68R3B+10~
OCXGR NEWRULE+7~, NEWRULE+22*, NEWRULE+23, NEWRULE+29*, NEWRULE+30, NEWRULE+35*, NEWRULE+36, NEWRULE+41
OCXGR1 NEWRULE+40~, NEWRULE+41*, NEWRULE+48, NEWRULE+52
OCXGR2 NEWRULE+51~, NEWRULE+52*, NEWRULE+57
OCXL GETDATA~, GETDATA+3
OCXLOGD R66R1B+11~, R68R1B+10~, R68R2B+10~, R68R3B+10~
OCXLOGS R66R1B+11~, R68R1B+10~, R68R2B+10~, R68R3B+10~
OCXMESS NEWRULE~, NEWRULE+4, NEWRULE+10, NEWRULE+27
OCXNDX NEWRULE+7~
OCXNMSG R66R1B+11~, R66R1B+13*, R66R1B+28, R66R1B+29, R68R1B+10~, R68R1B+13*, R68R2B+10~, R68R2B+13*, R68R3B+10~, R68R3B+13*
OCXNOTF NEWRULE~, NEWRULE+4
OCXNUM R66R1B+11~, R66R1B+19*, R66R1B+22*, R66R1B+25*, R66R1B+26*, R66R1B+28, R66R1B+29, R68R1B+10~, R68R2B+10~, R68R3B+10~
>> OCXOCMSG( R68R1B+19*, R68R2B+19*, R68R3B+19*
>> OCXOCMSG(999999 R68R1B+19, R68R2B+19, R68R3B+19
>> OCXOERR R66R1B+3, R66R1B+15, R68R1A+3, R68R1B+3, R68R1B+15, R68R2A+3, R68R2B+3, R68R2B+15, R68R3A+3, R68R3B+3
, R68R3B+15
>> OCXOLOG NEWRULE+45
OCXORD R66R1B+24, R66R1B+25, NEWRULE~, NEWRULE+5*, NEWRULE+13, NEWRULE+20, NEWRULE+26
>> OCXOSRC R66R1B+20, R66R1B+23, R66R1B+26, R68R1B+11, R68R2B+11, R68R3B+11
OCXPORD R66R1B+11~, R68R1B+10~, R68R2B+10~, R68R3B+10~
>> OCXPSD R66R1B+26, R68R1B+11, R68R2B+11, R68R3B+11
OCXQUIT R66R1B+11~, R68R1B+10~, R68R2B+10~, R68R3B+10~
OCXREL NEWRULE~, NEWRULE+4, NEWRULE+33, NEWRULE+34, NEWRULE+36, NEWRULE+41, NEWRULE+47
OCXRES MCE122+4~, MCE123+4~, MCE124+4~, MCE125+4~
OCXRES(122 MCE122+5*
OCXRES(123 MCE123+5*
OCXRES(124 MCE124+5*
OCXRES(125 MCE125+5*
OCXRUL NEWRULE~, NEWRULE+3, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+27, NEWRULE+28, NEWRULE+30, NEWRULE+35, NEWRULE+38
, NEWRULE+47
>> OCXRULE("R66R1B" R66R1B+9, R66R1B+27*
>> OCXRULE("R68R1B" R68R1B+8
>> OCXRULE("R68R2B" R68R2B+8
>> OCXRULE("R68R3B" R68R3B+8
OCXTIME NEWRULE+7~, NEWRULE+9*, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+44
>> OCXTRACE R66R1B+29
OCXTSP NEWRULE+7~, NEWRULE+12*, NEWRULE+15, NEWRULE+20
>> OCXTSPI NEWRULE+13
OCXTSPL NEWRULE+7~, NEWRULE+13*, NEWRULE+15
PC GETDATA+2~, GETDATA+3*
PTR CKSUM+2~, CKSUM+4*
ROOT SETAP~, SETAP+1, SETAP+2, SETAP+3*
STR CKSUM~, CKSUM+3*, CKSUM+4
U R66R1B+24, R66R1B+25, GETDATA+3, NEWRULE+26, SETAP+2, SETAP+3
VAL GETDATA+2~*, GETDATA+3*, GETDATA+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All