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 ;JUL 1,2021 at 11:27

Source Information

Source file <OCXOZ0Y.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Order Entry Results Reporting 2 EN^ORB3  ($$GCDAYS,$$GLCREAT)^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 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.
R67R1A ; Verify all Event/Elements of Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #1 'GLUCOPHAGE ORDER AND GLUCOPHAGE CREATININE > 1.5'
; Called from EL86+5^OCXOZ0H, and EL111+5^OCXOZ0H.
R67R1B ; Send Order Check, Notication messages and/or Execute code for Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #1 'GLUCOPHAGE ORDER AND GLUCOPHAGE CREATININE > 1.5'
; Called from R67R1A+12.
R67R2A ; Verify all Event/Elements of Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #2 'GLUCOPHAGE ORDER AND NO GLUCOPHAGE CREATININE'
; Called from EL86+6^OCXOZ0H, and EL112+5^OCXOZ0H.
R67R2B ; Send Order Check, Notication messages and/or Execute code for Rule #67 'GLUCOPHAGE - LAB RESULTS' Relation #2 'GLUCOPHAGE ORDER AND NO GLUCOPHAGE CREATININE'
; Called from R67R2A+12.
CKSUM(STR) ; Compiler Function: GENERATE STRING CHECKSUM
GETDATA(DFN,OCXL,OCXDFI) ; This Local Extrinsic Function returns runtime data
MCE111() ; Verify Event/Element: GLUCOPHAGE CREATININE > 1.5
MCE112() ; Verify Event/Element: NO GLUCOPHAGE CREATININE
MCE86() ; Verify Event/Element: GLUCOPHAGE ORDER
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
$$GCDAYS^ORKPS MCE111+12, MCE112+12
$$GLCREAT^ORKPS MCE111+10, MCE111+12, MCE112+10, MCE112+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OCXD(860.7 - [#860.7] NEWRULE+13, NEWRULE+47!
^OCXS(860.2 - [#860.2] R67R1A+9, R67R2A+9, NEWRULE+38
^TMP("OCXCHK" GETDATA+3, MCE111+9, MCE111+12*, MCE112+9, MCE112+12*, MCE86+6, NEWRULE+50, NEWRULE+55
^TMP("OCXSWAP" R66R1B+21

Label References

Name Line Occurrences
$$CKSUM NEWRULE+10
$$GETDATA R66R1B+13, R67R1B+11, R67R1B+12, R67R2B+11, R67R2B+12
$$MCE111 R67R1A+12
$$MCE112 R67R2A+12
$$MCE86 R67R1A+11, R67R2A+11
$$NEWRULE R66R1B+28
R67R1B R67R1A+12
R67R2B R67R2A+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, R67R1B+11, R67R1B+12, R67R2B+11, R67R2B+12, GETDATA~, GETDATA+3, MCE111+8
, MCE112+8, MCE86+5
OCXCKSUM NEWRULE+7~, NEWRULE+10*, NEWRULE+13, NEWRULE+20
OCXCMSG R66R1B+11~, R66R1B+12*, R67R1B+10~, R67R1B+11*, R67R1B+12*, R67R1B+19, R67R2B+10~, R67R2B+11*, R67R2B+12*, R67R2B+19
OCXDATA R66R1B+11~, R66R1B+19*, R66R1B+21*, R66R1B+22*, R66R1B+29, R67R1B+10~, R67R2B+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(124 MCE112+10*
>> OCXDF(125 MCE111+12*, MCE112+12*
>> OCXDF(126 MCE111+10*
>> OCXDF(127 MCE111+12*, MCE112+12*
>> OCXDF(37 MCE111+8*, MCE111+9, MCE111+10, MCE111+12, MCE112+8*, MCE112+9, MCE112+10, MCE112+12, MCE86+5*, MCE86+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, R67R1B+10~, R67R2B+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~, R67R1B+10~, R67R2B+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~, R67R1B+10~, R67R2B+10~
OCXLOGS R66R1B+11~, R67R1B+10~, R67R2B+10~
OCXMESS NEWRULE~, NEWRULE+4, NEWRULE+10, NEWRULE+27
OCXNDX NEWRULE+7~
OCXNMSG R66R1B+11~, R66R1B+13*, R66R1B+28, R66R1B+29, R67R1B+10~, R67R1B+13*, R67R2B+10~, R67R2B+13*
OCXNOTF NEWRULE~, NEWRULE+4
OCXNUM R66R1B+11~, R66R1B+19*, R66R1B+22*, R66R1B+25*, R66R1B+26*, R66R1B+28, R66R1B+29, R67R1B+10~, R67R2B+10~
>> OCXOCMSG( R67R1B+19*, R67R2B+19*
>> OCXOCMSG(999999 R67R1B+19, R67R2B+19
>> OCXOERR R66R1B+3, R66R1B+15, R67R1A+3, R67R1B+3, R67R1B+15, R67R2A+3, R67R2B+3, R67R2B+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, R67R1B+11, R67R2B+11
OCXPORD R66R1B+11~, R67R1B+10~, R67R2B+10~
>> OCXPSD R66R1B+26, R67R1B+11, R67R2B+11
OCXQUIT R66R1B+11~, R67R1B+10~, R67R2B+10~
OCXREL NEWRULE~, NEWRULE+4, NEWRULE+33, NEWRULE+34, NEWRULE+36, NEWRULE+41, NEWRULE+47
OCXRES MCE111+7~, MCE112+7~, MCE86+4~
OCXRES(111 MCE111+8*, MCE111+10*, MCE111+12*, MCE111+13
OCXRES(112 MCE112+8*, MCE112+10*, MCE112+12*, MCE112+13
OCXRES(86 MCE86+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("R67R1B" R67R1B+8
>> OCXRULE("R67R2B" R67R2B+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