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: OCXOZ0X

Package: Order Entry Results Reporting

Routine: OCXOZ0X


Information

OCXOZ0X ;SLC/RJS,CLA - Order Check Scan ;JUL 1,2021 at 11:27

Source Information

Source file <OCXOZ0X.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Order Entry Results Reporting 3 R66R1B^OCXOZ0Y  EN^ORB3  $$TAKEMED^ORKPS  

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 OCXOZ0G  OCXOZ0H  

Entry Points

Name Comments DBIA/ICR reference
R62R1A ; Verify all Event/Elements of Rule #62 'FOOD/DRUG INTERACTION' Relation #1 'INPATIENT FOOD DRUG REACTION'
; Called from EL84+5^OCXOZ0H.
R62R1B ; Send Order Check, Notication messages and/or Execute code for Rule #62 'FOOD/DRUG INTERACTION' Relation #1 'INPATIENT FOOD DRUG REACTION'
; Called from R62R1A+10.
R63R1A ; Verify all Event/Elements of Rule #63 'GLUCOPHAGE - CONTRAST MEDIA' Relation #1 'IF PROC USES NON-BARIUM MEDIA AND PATIENT TAKING G...'
; Called from EL91+5^OCXOZ0H, and EL106+5^OCXOZ0H.
R63R1B ; Send Order Check, Notication messages and/or Execute code for Rule #63 'GLUCOPHAGE - CONTRAST MEDIA' Relation #1 'IF PROC USES NON-BARIUM MEDIA AND PATIENT TAKING G...'
; Called from R63R1A+12.
R65R1A ; Verify all Event/Elements of Rule #65 'POLYPHARMACY' Relation #1 'POLYPHARMACY'
; Called from EL95+5^OCXOZ0H.
R65R1B ; Send Order Check, Notication messages and/or Execute code for Rule #65 'POLYPHARMACY' Relation #1 'POLYPHARMACY'
; Called from R65R1A+10.
R66R1A ; Verify all Event/Elements of Rule #66 'LAB RESULTS' Relation #1 'HL7 LAB RESULTS'
; Called from EL5+6^OCXOZ0G.
CKSUM(STR) ; Compiler Function: GENERATE STRING CHECKSUM
GETDATA(DFN,OCXL,OCXDFI) ; This Local Extrinsic Function returns runtime data
MCE106() ; Verify Event/Element: RADIOLOGY PROCEDURE CONTAINS NON-BARIUM CONTRAST MEDIA
MCE5() ; Verify Event/Element: HL7 FINAL LAB RESULT
MCE84() ; Verify Event/Element: INPATIENT FOOD-DRUG REACTION
MCE91() ; Verify Event/Element: PATIENT WITH GLUCOPHAGE MED
MCE95() ; Verify Event/Element: POLYPHARMACY
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
R66R1B^OCXOZ0Y R66R1A+10
EN^ORB3 R62R1B+29
$$TAKEMED^ORKPS MCE91+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OCXD(860.7 - [#860.7] NEWRULE+13, NEWRULE+47!
^OCXS(860.2 - [#860.2] R62R1A+8, R63R1A+9, R65R1A+8, R66R1A+8, NEWRULE+38
^TMP("OCXCHK" GETDATA+3, MCE106+6, MCE5+5, MCE84+5, MCE91+7, MCE91+10*, MCE95+6, NEWRULE+50, NEWRULE+55
^TMP("OCXSWAP" R62R1B+21

Label References

Name Line Occurrences
$$CKSUM NEWRULE+10
$$GETDATA R62R1B+13, R65R1B+11, R65R1B+12
$$MCE106 R63R1A+11
$$MCE5 R66R1A+10
$$MCE84 R62R1A+10
$$MCE91 R63R1A+12
$$MCE95 R65R1A+10
$$NEWRULE R62R1B+28
R62R1B R62R1A+10
R63R1B R63R1A+12
R65R1B R65R1A+10
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 R62R1B+13, R62R1B+28, R62R1B+29, R65R1B+11, R65R1B+12, GETDATA~, GETDATA+3, MCE106+5, MCE91+6, MCE95+5
OCXCKSUM NEWRULE+7~, NEWRULE+10*, NEWRULE+13, NEWRULE+20
OCXCMSG R62R1B+11~, R62R1B+12*, R63R1B+7~, R63R1B+8*, R63R1B+9*, R63R1B+16, R65R1B+10~, R65R1B+11*, R65R1B+12*, R65R1B+19
OCXDATA R62R1B+11~, R62R1B+19*, R62R1B+21*, R62R1B+22*, R62R1B+29, R63R1B+7~, R65R1B+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(103 MCE91+8*
>> OCXDF(37 MCE106+5*, MCE106+6, MCE5+4, MCE5+5, MCE84+4, MCE84+5, MCE91+6*, MCE91+7, MCE91+8, MCE91+10
, MCE95+5*, MCE95+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 R62R1B+11~, R62R1B+19*, R62R1B+29, R63R1B+7~, R65R1B+10~
OCXDUZ( R62R1B+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 R62R1B+11~, R63R1B+7~, R65R1B+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 R62R1B+11~, R63R1B+7~, R65R1B+10~
OCXLOGS R62R1B+11~, R63R1B+7~, R65R1B+10~
OCXMESS NEWRULE~, NEWRULE+4, NEWRULE+10, NEWRULE+27
OCXNDX NEWRULE+7~
OCXNMSG R62R1B+11~, R62R1B+13*, R62R1B+28, R62R1B+29, R63R1B+7~, R63R1B+10*, R65R1B+10~, R65R1B+13*
OCXNOTF NEWRULE~, NEWRULE+4
OCXNUM R62R1B+11~, R62R1B+19*, R62R1B+22*, R62R1B+25*, R62R1B+26*, R62R1B+28, R62R1B+29, R63R1B+7~, R65R1B+10~
>> OCXOCMSG( R63R1B+16*, R65R1B+19*
>> OCXOCMSG(999999 R63R1B+16, R65R1B+19
>> OCXOERR R62R1A+3, R62R1B+3, R62R1B+15, R63R1A+3, R63R1B+3, R63R1B+12, R65R1A+3, R65R1B+3, R65R1B+15, R66R1A+3
>> OCXOLOG NEWRULE+45
OCXORD R62R1B+24, R62R1B+25, NEWRULE~, NEWRULE+5*, NEWRULE+13, NEWRULE+20, NEWRULE+26
>> OCXOSRC R62R1B+20, R62R1B+23, R62R1B+26, R63R1B+8, R65R1B+11
OCXPORD R62R1B+11~, R63R1B+7~, R65R1B+10~
>> OCXPSD R62R1B+26, R63R1B+8, R65R1B+11
OCXQUIT R62R1B+11~, R63R1B+7~, R65R1B+10~
OCXREL NEWRULE~, NEWRULE+4, NEWRULE+33, NEWRULE+34, NEWRULE+36, NEWRULE+41, NEWRULE+47
OCXRES MCE106+4~, MCE5+3~, MCE84+3~, MCE91+5~, MCE95+4~
OCXRES(106 MCE106+5*
OCXRES(5 MCE5+4*
OCXRES(84 MCE84+4*
OCXRES(91 MCE91+6*, MCE91+8*, MCE91+10*, MCE91+11
OCXRES(95 MCE95+5*
OCXRUL NEWRULE~, NEWRULE+3, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+27, NEWRULE+28, NEWRULE+30, NEWRULE+35, NEWRULE+38
, NEWRULE+47
>> OCXRULE("R62R1B" R62R1B+9, R62R1B+27*
>> OCXRULE("R63R1B" R63R1B+5
>> OCXRULE("R65R1B" R65R1B+8
OCXTIME NEWRULE+7~, NEWRULE+9*, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+44
>> OCXTRACE R62R1B+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 R62R1B+24, R62R1B+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