OCXOZ0K ;SLC/RJS,CLA - Order Check Scan ;JAN 28,2014 at 03:37
Source file <OCXOZ0K.m>
| Package | Total | Call Graph | 
|---|---|---|
| Order Entry Results Reporting | 3 | R7R1B^OCXOZ0L EN^ORB3 UNFLAG^ORB3FUP1 | 
| Package | Total | Caller Graph | 
|---|---|---|
| Order Entry Results Reporting | 2 | OCXOZ0G OCXOZ0J | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| NEWRULE(OCXDFN,OCXORD,OCXRUL,OCXREL,OCXNOTF,OCXMESS) | ; Has this rule already been triggered for this order number | |
| R7R1A | ; Verify all Event/Elements of  Rule #7 'PATIENT ADMISSION'  Relation #1 'ADMISSION' ; Called from EL21+5^OCXOZ0G. | |
| SETAP(ROOT,DD,DATA,DA) | ;  Set Rule Event data | |
| R5R1B | ; Send Order Check, Notication messages and/or Execute code for  Rule #5 'ORDER FLAGGED FOR CLARIFICATION'  Relation #1 'ORDER FLAGGED' ; Called from R5R1A+10^OCXOZ0J. | |
| CKSUM(STR) | ;  Compiler Function: GENERATE STRING CHECKSUM | |
| MCE21() | ; Verify Event/Element: PATIENT ADMISSION | |
| R5R2A | ; Verify all Event/Elements of  Rule #5 'ORDER FLAGGED FOR CLARIFICATION'  Relation #2 'ORDER UNFLAGGED' ; Called from EL134+5^OCXOZ0G. | |
| R5R2B | ; Send Order Check, Notication messages and/or Execute code for  Rule #5 'ORDER FLAGGED FOR CLARIFICATION'  Relation #2 'ORDER UNFLAGGED' ; Called from R5R2A+10. | |
| R6R1A | ; Verify all Event/Elements of  Rule #6 'ORDER REQUIRES CHART SIGNATURE'  Relation #1 'SIGNATURE' ; Called from EL45+5^OCXOZ0G. | |
| R6R1B | ; Send Order Check, Notication messages and/or Execute code for  Rule #6 'ORDER REQUIRES CHART SIGNATURE'  Relation #1 'SIGNATURE' ; Called from R6R1A+10. | |
| MCE45() | ; Verify Event/Element: ORDER REQUIRES CHART SIGNATURE | |
| GETDATA(DFN,OCXL,OCXDFI) | ;     This Local Extrinsic Function returns runtime data | |
| MCE134() | ; Verify Event/Element: ORDER UNFLAGGED | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^OCXD(860.7 - [#860.7] | NEWRULE+13, NEWRULE+47! | 
| ^OCXS(860.2 - [#860.2] | R5R2A+8, R6R1A+8, R7R1A+8, NEWRULE+38 | 
| ^TMP("OCXCHK" | GETDATA+3, MCE134+6, MCE21+6, MCE45+6, NEWRULE+50, NEWRULE+55 | 
| ^TMP("OCXSWAP" | R5R1B+21, R6R1B+20 | 
| Name | Line Occurrences | 
|---|---|
| $$CKSUM | NEWRULE+10 | 
| $$GETDATA | R5R1B+13, R5R2B+17 | 
| $$MCE134 | R5R2A+10 | 
| $$MCE21 | R7R1A+10 | 
| $$MCE45 | R6R1A+10 | 
| $$NEWRULE | R5R1B+28, R6R1B+27 | 
| R5R2B | R5R2A+10 | 
| R6R1B | R6R1A+10 | 
| SETAP | NEWRULE+23, NEWRULE+30, NEWRULE+36, NEWRULE+48, NEWRULE+57 | 
| >> | 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 | R5R1B+13, R5R1B+28, R5R1B+29, R5R2B+17, R6R1B+27, R6R1B+28, GETDATA~, GETDATA+3, MCE21+5 | 
| OCXCKSUM | NEWRULE+7~, NEWRULE+10*, NEWRULE+13, NEWRULE+20 | 
| OCXCMSG | R5R1B+11~, R5R1B+12*, R5R2B+10~, R5R2B+11*, R6R1B+10~, R6R1B+11* | 
| OCXDATA | R5R1B+11~, R5R1B+19*, R5R1B+21*, R5R1B+22*, R5R1B+29, R5R2B+10~, R6R1B+10~, R6R1B+18*, R6R1B+20*, R6R1B+21* , R6R1B+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 | MCE134+5*, MCE134+6, MCE21+5*, MCE21+6, MCE45+5*, MCE45+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 | R5R1B+11~, R5R1B+19*, R5R1B+29, R5R2B+10~, R6R1B+10~, R6R1B+18*, R6R1B+28 | 
| OCXDUZ( | R5R1B+24*, R6R1B+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 | R5R1B+11~, R5R2B+10~, R6R1B+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 | R5R1B+11~, R5R2B+10~, R6R1B+10~ | 
| OCXLOGS | R5R1B+11~, R5R2B+10~, R6R1B+10~ | 
| OCXMESS | NEWRULE~, NEWRULE+4, NEWRULE+10, NEWRULE+27 | 
| OCXNDX | NEWRULE+7~ | 
| OCXNMSG | R5R1B+11~, R5R1B+13*, R5R1B+28, R5R1B+29, R5R2B+10~, R5R2B+12*, R6R1B+10~, R6R1B+12*, R6R1B+27, R6R1B+28 | 
| OCXNOTF | NEWRULE~, NEWRULE+4 | 
| OCXNUM | R5R1B+11~, R5R1B+19*, R5R1B+22*, R5R1B+25*, R5R1B+26*, R5R1B+28, R5R1B+29, R5R2B+10~, R6R1B+10~, R6R1B+18* , R6R1B+21*, R6R1B+24*, R6R1B+25*, R6R1B+27, R6R1B+28 | 
| >> OCXOERR | R5R1B+3, R5R1B+15, R5R2A+3, R5R2B+3, R5R2B+18, R6R1A+3, R6R1B+3, R6R1B+14, R7R1A+3 | 
| >> OCXOLOG | NEWRULE+45 | 
| OCXORD | R5R1B+24, R5R1B+25, R6R1B+23, R6R1B+24, MCE134+5, MCE45+5, NEWRULE~, NEWRULE+5*, NEWRULE+13, NEWRULE+20 , NEWRULE+26 | 
| >> OCXOSRC | R5R1B+20, R5R1B+23, R5R1B+26, R6R1B+19, R6R1B+22, R6R1B+25 | 
| OCXPORD | R5R1B+11~, R5R2B+10~, R6R1B+10~ | 
| >> OCXPSD | R5R1B+26, R6R1B+25 | 
| OCXQUIT | R5R1B+11~, R5R2B+10~, R6R1B+10~ | 
| OCXREL | NEWRULE~, NEWRULE+4, NEWRULE+33, NEWRULE+34, NEWRULE+36, NEWRULE+41, NEWRULE+47 | 
| OCXRES | MCE134+4~, MCE21+4~, MCE45+4~ | 
| OCXRES(134 | MCE134+5* | 
| OCXRES(21 | MCE21+5* | 
| OCXRES(45 | MCE45+5* | 
| OCXRUL | NEWRULE~, NEWRULE+3, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+27, NEWRULE+28, NEWRULE+30, NEWRULE+35, NEWRULE+38 , NEWRULE+47 | 
| >> OCXRULE("R5R1B" | R5R1B+9, R5R1B+27* | 
| >> OCXRULE("R5R2B" | R5R2B+8 | 
| >> OCXRULE("R6R1B" | R6R1B+8, R6R1B+26* | 
| OCXTIME | NEWRULE+7~, NEWRULE+9*, NEWRULE+13, NEWRULE+20, NEWRULE+26, NEWRULE+44 | 
| >> OCXTRACE | R5R1B+29, R6R1B+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 | R5R1B+24, R5R1B+25, R6R1B+23, R6R1B+24, GETDATA+3, NEWRULE+26, SETAP+2, SETAP+3 | 
| VAL | GETDATA+2~*, GETDATA+3*, GETDATA+4 |