Routine: OCXOZ0S

Package	Total	Call Graph
Order Entry Results Reporting	2	R48R1B^OCXOZ0T EN^ORB3

Package	Total	Caller Graph
Order Entry Results Reporting	3	OCXOZ0G OCXOZ0H OCXOZ0R

Entry Points

Name	Comments	DBIA/ICR reference
NEWRULE(OCXDFN,OCXORD,OCXRUL,OCXREL,OCXNOTF,OCXMESS)	; Has this rule already been triggered for this order number
CKSUM(STR)	; Compiler Function: GENERATE STRING CHECKSUM
MCE48()	; Verify Event/Element: ORDER REQUIRES ELECTRONIC SIGNATURE
MCE143()	; Verify Event/Element: SS REFILL REQUEST
MCE127()	; Verify Event/Element: INPATIENT
R44R1B	; Send Order Check, Notication messages and/or Execute code for Rule #44 'ORDER REQUIRES ELECTRONIC SIGNATURE' Relation #1 'ELECTRONIC SIGNATURE AND NO REFILL REQUEST' ; Called from R44R1A+12^OCXOZ0R.
MCE58()	; Verify Event/Element: NEW SITE FLAGGED ORDER
SETAP(ROOT,DD,DATA,DA)	; Set Rule Event data
R48R1A	; Verify all Event/Elements of Rule #48 'SITE FLAGGED ORDER' Relation #1 'NEW SITE FLAGGED ORDER AND INPATIENT' ; Called from EL58+5^OCXOZ0H, and EL127+5^OCXOZ0H.
R44R2A	; Verify all Event/Elements of Rule #44 'ORDER REQUIRES ELECTRONIC SIGNATURE' Relation #2 'ELECTRONIC SIGNATURE AND REFILL REQUEST' ; Called from EL48+6^OCXOZ0G, and EL143+5^OCXOZ0H.
R44R2B	; Send Order Check, Notication messages and/or Execute code for Rule #44 'ORDER REQUIRES ELECTRONIC SIGNATURE' Relation #2 'ELECTRONIC SIGNATURE AND REFILL REQUEST' ; Called from R44R2A+12.

Name	Field # of Occurrence
R48R1B^OCXOZ0T	R48R1A+12
EN^ORB3	R44R1B+28, R44R2B+28

Name	Line Occurrences (* Changed, ! Killed)
^OCXD(860.7 - [#860.7]	NEWRULE+13, NEWRULE+47!
^OCXS(860.2 - [#860.2]	R44R2A+9, R48R1A+9, NEWRULE+38
^TMP("OCXCHK"	MCE127+5, MCE143+6, MCE48+6, MCE58+5, NEWRULE+50, NEWRULE+55
^TMP("OCXSWAP"	R44R1B+20, R44R2B+20

Name	Line Occurrences
$$CKSUM	NEWRULE+10
$$MCE127	R48R1A+12
$$MCE143	R44R2A+12
$$MCE48	R44R2A+11
$$MCE58	R48R1A+11
$$NEWRULE	R44R1B+27, R44R2B+27
R44R2B	R44R2A+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	R44R1B+27, R44R1B+28, R44R2B+27, R44R2B+28
OCXCKSUM	NEWRULE+7~, NEWRULE+10*, NEWRULE+13, NEWRULE+20
OCXCMSG	R44R1B+10~, R44R1B+11, R44R2B+10~, R44R2B+11
OCXDATA	R44R1B+10~, R44R1B+18, R44R1B+20, R44R1B+21, R44R1B+28, R44R2B+10~, R44R2B+18, R44R2B+20, R44R2B+21, R44R2B+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*
>> OCXDF(37	MCE127+4, MCE127+5, MCE143+5, MCE143+6, MCE48+5, MCE48+6, MCE58+4, MCE58+5
OCXDFI	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	R44R1B+10~, R44R1B+18, R44R1B+28, R44R2B+10~, R44R2B+18, R44R2B+28
OCXDUZ(	R44R1B+23, R44R2B+23
OCXELE	NEWRULE+7~, NEWRULE+38*, NEWRULE+43, NEWRULE+44, NEWRULE+45, NEWRULE+46, NEWRULE+47, NEWRULE+48, NEWRULE+50, NEWRULE+52 , NEWRULE+55
OCXFORD	R44R1B+10~, R44R2B+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
OCXLOGD	R44R1B+10~, R44R2B+10~
OCXLOGS	R44R1B+10~, R44R2B+10~
OCXMESS	NEWRULE~, NEWRULE+4, NEWRULE+10, NEWRULE+27
OCXNDX	NEWRULE+7~
OCXNMSG	R44R1B+10~, R44R1B+12, R44R1B+27, R44R1B+28, R44R2B+10~, R44R2B+12, R44R2B+27, R44R2B+28
OCXNOTF	NEWRULE~, NEWRULE+4
OCXNUM	R44R1B+10~, R44R1B+18, R44R1B+21, R44R1B+24, R44R1B+25, R44R1B+27, R44R1B+28, R44R2B+10~, R44R2B+18, R44R2B+21 , R44R2B+24, R44R2B+25, R44R2B+27, R44R2B+28
>> OCXOERR	R44R1B+3, R44R1B+14, R44R2A+3, R44R2B+3, R44R2B+14, R48R1A+3
>> OCXOLOG	NEWRULE+45
OCXORD	R44R1B+23, R44R1B+24, R44R2B+23, R44R2B+24, MCE143+5, MCE48+5, NEWRULE~, NEWRULE+5*, NEWRULE+13, NEWRULE+20 , NEWRULE+26
>> OCXOSRC	R44R1B+19, R44R1B+22, R44R1B+25, R44R2B+19, R44R2B+22, R44R2B+25
OCXPORD	R44R1B+10~, R44R2B+10~
>> OCXPSD	R44R1B+25, R44R2B+25
OCXQUIT	R44R1B+10~, R44R2B+10~
OCXREL	NEWRULE~, NEWRULE+4, NEWRULE+33, NEWRULE+34, NEWRULE+36, NEWRULE+41, NEWRULE+47
OCXRES	MCE127+3~, MCE143+4~, MCE48+4~, MCE58+3~
OCXRES(127	MCE127+4*
OCXRES(143	MCE143+5*
OCXRES(48	MCE48+5*
OCXRES(58	MCE58+4*
OCXRUL	NEWRULE~, NEWRULE+3, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+27, NEWRULE+28, NEWRULE+30, NEWRULE+35, NEWRULE+38 , NEWRULE+47
>> OCXRULE("R44R1B"	R44R1B+8, R44R1B+26*
>> OCXRULE("R44R2B"	R44R2B+8, R44R2B+26*
OCXTIME	NEWRULE+7~, NEWRULE+9*, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+44
>> OCXTRACE	R44R1B+28, R44R2B+28
OCXTSP	NEWRULE+7~, NEWRULE+12*, NEWRULE+15, NEWRULE+20
>> OCXTSPI	NEWRULE+13
OCXTSPL	NEWRULE+7~, NEWRULE+13*, NEWRULE+15
PTR	CKSUM+2~, CKSUM+4*
ROOT	SETAP~, SETAP+1, SETAP+2, SETAP+3*
STR	CKSUM~, CKSUM+3*, CKSUM+4
U	R44R1B+23, R44R1B+24, R44R2B+23, R44R2B+24, NEWRULE+26, SETAP+2, SETAP+3

Customize PDF page

Package: Order Entry Results Reporting

Routine: OCXOZ0S

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: