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

Package: Order Entry Results Reporting

Routine: OCXOZ0O


Information

OCXOZ0O ;SLC/RJS,CLA - Order Check Scan ;JAN 28,2014 at 03:37

Source Information

Source file <OCXOZ0O.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Order Entry Results Reporting 2 R24R1B^OCXOZ0P  EN^ORB3  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Order Entry Results Reporting 2 OCXOZ0G  OCXOZ0N  

Entry Points

Name Comments DBIA/ICR reference
NEWRULE(OCXDFN,OCXORD,OCXRUL,OCXREL,OCXNOTF,OCXMESS) ; Has this rule already been triggered for this order number
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
CKSUM(STR) ; Compiler Function: GENERATE STRING CHECKSUM
MCE101() ; Verify Event/Element: HL7 FINAL IMAGING RESULT
MCE47() ; Verify Event/Element: ORDER REQUIRES CO-SIGNATURE
MCE55() ; Verify Event/Element: CONSULT FINAL RESULTS
MCE49() ; Verify Event/Element: ORDER FLAGGED FOR RESULTS
SETAP(ROOT,DD,DATA,DA) ; Set Rule Event data
MCE5() ; Verify Event/Element: HL7 FINAL LAB RESULT
R24R1A ; Verify all Event/Elements of Rule #24 'ORDERER FLAGGED RESULTS AVAILABLE' Relation #1 'ORDER FLAGGED FOR RESULTS AND (LAB RESULT OR IMAGI...'
; Called from EL5+5^OCXOZ0G, and EL49+5^OCXOZ0G, and EL55+5^OCXOZ0G, and EL101+5^OCXOZ0G.
R22R1A ; Verify all Event/Elements of Rule #22 'ORDER REQUIRES CO-SIGNATURE' Relation #1 'COSIG'
; Called from EL47+5^OCXOZ0G.
R19R1B ; Send Order Check, Notication messages and/or Execute code for Rule #19 'PATIENT DISCHARGE' Relation #1 'DISCHARGE'
; Called from R19R1A+10^OCXOZ0N.
GETDATA(DFN,OCXL,OCXDFI) ; This Local Extrinsic Function returns runtime data
R22R1B ; Send Order Check, Notication messages and/or Execute code for Rule #22 'ORDER REQUIRES CO-SIGNATURE' Relation #1 'COSIG'
; Called from R22R1A+10.

External References

Name Field # of Occurrence
R24R1B^OCXOZ0P R24R1A+14, R24R1A+15, R24R1A+16
EN^ORB3 R19R1B+30, R22R1B+28

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OCXD(860.7 - [#860.7] NEWRULE+13, NEWRULE+47!
^OCXS(860.2 - [#860.2] R22R1A+8, R24R1A+11, NEWRULE+38
^TMP("OCXCHK" GETDATA+3, MCE101+5, MCE47+6, MCE49+5, MCE5+5, MCE55+5, NEWRULE+50, NEWRULE+55
^TMP("OCXSWAP" R19R1B+22, R22R1B+20

Label References

Name Line Occurrences
$$CKSUM NEWRULE+10
$$GETDATA R19R1B+14
$$INT2DT R19R1B+14
$$MCE101 R24R1A+15
$$MCE47 R22R1A+10
$$MCE49 R24R1A+13
$$MCE5 R24R1A+14
$$MCE55 R24R1A+16
$$NEWRULE R19R1B+29, R22R1B+27
R22R1B R22R1A+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 R19R1B+14, R19R1B+29, R19R1B+30, R22R1B+27, R22R1B+28, GETDATA~, GETDATA+3
>> OCXAP INT2DT+5*, INT2DT+18*, INT2DT+21
OCXCKSUM NEWRULE+7~, NEWRULE+10*, NEWRULE+13, NEWRULE+20
OCXCMSG R19R1B+12~, R19R1B+13*, R22R1B+10~, R22R1B+11*
>> OCXCNT INT2DT+12*, INT2DT+13*, INT2DT+14, INT2DT+15
OCXCYR INT2DT+4~, INT2DT+9*, INT2DT+20
OCXDATA R19R1B+12~, R19R1B+20*, R19R1B+22*, R19R1B+23*, R19R1B+30, R22R1B+10~, R22R1B+18*, R22R1B+20*, R22R1B+21*, R22R1B+28
, 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*
OCXDAY INT2DT+4~, INT2DT+5*, INT2DT+15*, INT2DT+20, INT2DT+21, INT2DT+22
>> OCXDF(37 MCE101+4, MCE101+5, MCE47+5*, MCE47+6, MCE49+4, MCE49+5, MCE5+4, MCE5+5, MCE55+4, MCE55+5
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
OCXDT INT2DT~, INT2DT+3, INT2DT+6*, INT2DT+7*, INT2DT+8*, INT2DT+10*, INT2DT+11*, INT2DT+14, INT2DT+15
OCXDUZ R19R1B+12~, R19R1B+20*, R19R1B+30, R22R1B+10~, R22R1B+18*, R22R1B+28
OCXDUZ( R19R1B+25*, R22R1B+23*
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
OCXF INT2DT~, INT2DT+3*, INT2DT+16, INT2DT+19, INT2DT+20
OCXFORD R19R1B+12~, R22R1B+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
OCXHR INT2DT+4~, INT2DT+5*, INT2DT+8*, INT2DT+18, INT2DT+19*, INT2DT+20, INT2DT+21
OCXL GETDATA~, GETDATA+3
OCXLOGD R19R1B+12~, R22R1B+10~
OCXLOGS R19R1B+12~, R22R1B+10~
OCXLPYR INT2DT+4~, INT2DT+5*, INT2DT+11*, INT2DT+13
OCXMESS NEWRULE~, NEWRULE+4, NEWRULE+10, NEWRULE+27
OCXMIN INT2DT+4~, INT2DT+5*, INT2DT+7*, INT2DT+20, INT2DT+21
OCXMON INT2DT+4~, INT2DT+5*, INT2DT+14*, INT2DT+15, INT2DT+16*, INT2DT+17*, INT2DT+20, INT2DT+21, INT2DT+22
OCXNDX NEWRULE+7~
OCXNMSG R19R1B+12~, R19R1B+14*, R19R1B+29, R19R1B+30, R22R1B+10~, R22R1B+12*, R22R1B+27, R22R1B+28
OCXNOTF NEWRULE~, NEWRULE+4
OCXNUM R19R1B+12~, R19R1B+20*, R19R1B+23*, R19R1B+26*, R19R1B+27*, R19R1B+29, R19R1B+30, R22R1B+10~, R22R1B+18*, R22R1B+21*
, R22R1B+24*, R22R1B+25*, R22R1B+27, R22R1B+28
>> OCXOERR R19R1B+3, R19R1B+16, R22R1A+3, R22R1B+3, R22R1B+14, R24R1A+3
>> OCXOLOG NEWRULE+45
OCXORD R19R1B+25, R19R1B+26, R22R1B+23, R22R1B+24, MCE47+5, NEWRULE~, NEWRULE+5*, NEWRULE+13, NEWRULE+20, NEWRULE+26
>> OCXOSRC R19R1B+21, R19R1B+24, R19R1B+27, R22R1B+19, R22R1B+22, R22R1B+25
OCXPORD R19R1B+12~, R22R1B+10~
>> OCXPSD R19R1B+27, R22R1B+25
OCXQUIT R19R1B+12~, R22R1B+10~
OCXREL NEWRULE~, NEWRULE+4, NEWRULE+33, NEWRULE+34, NEWRULE+36, NEWRULE+41, NEWRULE+47
OCXRES MCE101+3~, MCE47+4~, MCE49+3~, MCE5+3~, MCE55+3~
OCXRES(101 MCE101+4*
OCXRES(47 MCE47+5*
OCXRES(49 MCE49+4*
OCXRES(5 MCE5+4*
OCXRES(55 MCE55+4*
OCXRUL NEWRULE~, NEWRULE+3, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+27, NEWRULE+28, NEWRULE+30, NEWRULE+35, NEWRULE+38
, NEWRULE+47
>> OCXRULE("R19R1B" R19R1B+10, R19R1B+28*
>> OCXRULE("R22R1B" R22R1B+8, R22R1B+26*
OCXSEC INT2DT+4~, INT2DT+5*, INT2DT+6*, INT2DT+21
OCXTIME NEWRULE+7~, NEWRULE+9*, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+44
>> OCXTRACE R19R1B+30, R22R1B+28
OCXTSP NEWRULE+7~, NEWRULE+12*, NEWRULE+15, NEWRULE+20
>> OCXTSPI NEWRULE+13
OCXTSPL NEWRULE+7~, NEWRULE+13*, NEWRULE+15
OCXYR INT2DT+4~, INT2DT+5*, INT2DT+10*, INT2DT+11*, INT2DT+20, INT2DT+21, INT2DT+22
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 R19R1B+25, R19R1B+26, R22R1B+23, R22R1B+24, GETDATA+3, INT2DT+14, INT2DT+15, INT2DT+16, 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