OCXOZ0L ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49
Source file <OCXOZ0L.m>
Package | Total | Call Graph |
---|---|---|
Order Entry Results Reporting | 2 | R18R1B^OCXOZ0M EN^ORB3 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Order Entry Results Reporting | 2 | OCXOZ0F OCXOZ0K |
Name | Comments | DBIA/ICR reference |
---|---|---|
R11R2B | ; Send Order Check, Notication messages and/or Execute code for Rule #11 'IMAGING REQUEST CANCELLED/HELD' Relation #2 'ON HOLD AND CANCELED BY NON-ORIG ORDERER'
; Called from R11R2A+12^OCXOZ0K. |
|
R11R3A | ; Verify all Event/Elements of Rule #11 'IMAGING REQUEST CANCELLED/HELD' Relation #3 'DISCONTINUED AND CANCELED BY NON-ORIG ORDERER'
; Called from EL100+7^OCXOZ0F, and EL32+5^OCXOZ0F. |
|
R11R3B | ; Send Order Check, Notication messages and/or Execute code for Rule #11 'IMAGING REQUEST CANCELLED/HELD' Relation #3 'DISCONTINUED AND CANCELED BY NON-ORIG ORDERER'
; Called from R11R3A+12. |
|
R16R1A | ; Verify all Event/Elements of Rule #16 'SERVICE ORDER REQUIRES CHART SIGNATURE' Relation #1 'SERVICE'
; Called from EL46+5^OCXOZ0F. |
|
R16R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #16 'SERVICE ORDER REQUIRES CHART SIGNATURE' Relation #1 'SERVICE'
; Called from R16R1A+10. |
|
R18R1A | ; Verify all Event/Elements of Rule #18 'STAT RESULTS AVAILABLE' Relation #1 'STAT LAB RESULT'
; Called from EL76+5^OCXOZ0F. |
|
CKSUM(STR) | ; Compiler Function: GENERATE STRING CHECKSUM
|
|
GETDATA(DFN,OCXL,OCXDFI) | ; This Local Extrinsic Function returns runtime data
|
|
MCE100() | ; Verify Event/Element: CANCELED BY NON-ORIG ORDERING PROVIDER
|
|
MCE32() | ; Verify Event/Element: RADIOLOGY ORDER DISCONTINUED
|
|
MCE46() | ; Verify Event/Element: SERVICE ORDER REQUIRES CHART SIGNATURE
|
|
MCE76() | ; Verify Event/Element: STAT LAB RESULT
|
|
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
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^OCXD(860.7 - [#860.7] | NEWRULE+13, NEWRULE+47! |
^OCXS(860.2 - [#860.2] | R11R3A+9, R16R1A+8, R18R1A+8, NEWRULE+38 |
^TMP("OCXCHK" | GETDATA+3, MCE100+5, MCE32+5, MCE46+6, MCE76+5, NEWRULE+50, NEWRULE+55 |
^TMP("OCXSWAP" | R11R2B+21, R11R3B+21, R16R1B+20 |
>> | 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 | R11R2B+13, R11R2B+28, R11R2B+29, R11R3B+13, R11R3B+28, R11R3B+29, R16R1B+27, R16R1B+28, GETDATA~, GETDATA+3 |
OCXCKSUM | NEWRULE+7~, NEWRULE+10*, NEWRULE+13, NEWRULE+20 |
OCXCMSG | R11R2B+11~, R11R2B+12*, R11R3B+11~, R11R3B+12*, R16R1B+10~, R16R1B+11* |
OCXDATA | R11R2B+11~, R11R2B+19*, R11R2B+21*, R11R2B+22*, R11R2B+29, R11R3B+11~, R11R3B+19*, R11R3B+21*, R11R3B+22*, R11R3B+29 , R16R1B+10~, R16R1B+18*, R16R1B+20*, R16R1B+21*, R16R1B+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 | MCE100+4, MCE100+5, MCE32+4, MCE32+5, MCE46+5*, MCE46+6, MCE76+4, MCE76+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 |
OCXDUZ | R11R2B+11~, R11R2B+19*, R11R2B+29, R11R3B+11~, R11R3B+19*, R11R3B+29, R16R1B+10~, R16R1B+18*, R16R1B+28 |
OCXDUZ( | R11R2B+24*, R11R3B+24*, R16R1B+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 |
OCXFORD | R11R2B+11~, R11R3B+11~, R16R1B+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 | R11R2B+11~, R11R3B+11~, R16R1B+10~ |
OCXLOGS | R11R2B+11~, R11R3B+11~, R16R1B+10~ |
OCXMESS | NEWRULE~, NEWRULE+4, NEWRULE+10, NEWRULE+27 |
OCXNDX | NEWRULE+7~ |
OCXNMSG | R11R2B+11~, R11R2B+13*, R11R2B+28, R11R2B+29, R11R3B+11~, R11R3B+13*, R11R3B+28, R11R3B+29, R16R1B+10~, R16R1B+12* , R16R1B+27, R16R1B+28 |
OCXNOTF | NEWRULE~, NEWRULE+4 |
OCXNUM | R11R2B+11~, R11R2B+19*, R11R2B+22*, R11R2B+25*, R11R2B+26*, R11R2B+28, R11R2B+29, R11R3B+11~, R11R3B+19*, R11R3B+22* , R11R3B+25*, R11R3B+26*, R11R3B+28, R11R3B+29, R16R1B+10~, R16R1B+18*, R16R1B+21*, R16R1B+24*, R16R1B+25*, R16R1B+27 , R16R1B+28 |
>> OCXOERR | R11R2B+3, R11R2B+15, R11R3A+3, R11R3B+3, R11R3B+15, R16R1A+3, R16R1B+3, R16R1B+14, R18R1A+3 |
>> OCXOLOG | NEWRULE+45 |
OCXORD | R11R2B+24, R11R2B+25, R11R3B+24, R11R3B+25, R16R1B+23, R16R1B+24, MCE46+5, NEWRULE~, NEWRULE+5*, NEWRULE+13 , NEWRULE+20, NEWRULE+26 |
>> OCXOSRC | R11R2B+20, R11R2B+23, R11R2B+26, R11R3B+20, R11R3B+23, R11R3B+26, R16R1B+19, R16R1B+22, R16R1B+25 |
OCXPORD | R11R2B+11~, R11R3B+11~, R16R1B+10~ |
>> OCXPSD | R11R2B+26, R11R3B+26, R16R1B+25 |
OCXQUIT | R11R2B+11~, R11R3B+11~, R16R1B+10~ |
OCXREL | NEWRULE~, NEWRULE+4, NEWRULE+33, NEWRULE+34, NEWRULE+36, NEWRULE+41, NEWRULE+47 |
OCXRES | MCE100+3~, MCE32+3~, MCE46+4~, MCE76+3~ |
OCXRES(100 | MCE100+4* |
OCXRES(32 | MCE32+4* |
OCXRES(46 | MCE46+5* |
OCXRES(76 | MCE76+4* |
OCXRUL | NEWRULE~, NEWRULE+3, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+27, NEWRULE+28, NEWRULE+30, NEWRULE+35, NEWRULE+38 , NEWRULE+47 |
>> OCXRULE("R11R2B" | R11R2B+9, R11R2B+27* |
>> OCXRULE("R11R3B" | R11R3B+9, R11R3B+27* |
>> OCXRULE("R16R1B" | R16R1B+8, R16R1B+26* |
OCXTIME | NEWRULE+7~, NEWRULE+9*, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+44 |
>> OCXTRACE | R11R2B+29, R11R3B+29, R16R1B+28 |
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 | R11R2B+24, R11R2B+25, R11R3B+24, R11R3B+25, R16R1B+23, R16R1B+24, GETDATA+3, NEWRULE+26, SETAP+2, SETAP+3 |
VAL | GETDATA+2~*, GETDATA+3*, GETDATA+4 |