OCXOZ0U ;SLC/RJS,CLA - Order Check Scan ;OCT 30,2024 at 12:49
Source file <OCXOZ0U.m>
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| R51R1A | ; Verify all Event/Elements of Rule #51 'RECENT CHOLECYSTOGRAM ORDER' Relation #1 'RECENT CHOLECGRM'
; Called from EL63+5^OCXOZ0G. |
|
| R51R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #51 'RECENT CHOLECYSTOGRAM ORDER' Relation #1 'RECENT CHOLECGRM'
; Called from R51R1A+10. |
|
| R53R1A | ; Verify all Event/Elements of Rule #53 'RENAL FUNCTIONS OVER AGE 65 CHECK' Relation #1 'PHARM PAT OVER 65'
; Called from EL64+5^OCXOZ0G. |
|
| R53R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #53 'RENAL FUNCTIONS OVER AGE 65 CHECK' Relation #1 'PHARM PAT OVER 65'
; Called from R53R1A+10. |
|
| R54R1A | ; Verify all Event/Elements of Rule #54 'CONCURRENT LAB ORDERS FOR ANGIOGRAM, CAT...' Relation #1 'ANGIOGRAM'
; Called from EL65+5^OCXOZ0G. |
|
| R54R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #54 'CONCURRENT LAB ORDERS FOR ANGIOGRAM, CAT...' Relation #1 'ANGIOGRAM'
; Called from R54R1A+10. |
|
| R55R1A | ; Verify all Event/Elements of Rule #55 'ALLERGY - CONTRAST MEDIA REACTION' Relation #1 'ALLERGY'
; Called from EL66+5^OCXOZ0G. |
|
| R55R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #55 'ALLERGY - CONTRAST MEDIA REACTION' Relation #1 'ALLERGY'
; Called from R55R1A+10. |
|
| R56R1A | ; Verify all Event/Elements of Rule #56 'RECENT BARIUM STUDY' Relation #1 'BARIUM'
; Called from EL67+5^OCXOZ0G. |
|
| R56R1B | ; Send Order Check, Notication messages and/or Execute code for Rule #56 'RECENT BARIUM STUDY' Relation #1 'BARIUM'
; Called from R56R1A+10. |
|
| R57R1A | ; Verify all Event/Elements of Rule #57 'CLOZAPINE' Relation #1 'CLOZAPINE AND (NO WBC W/IN 7 DAYS OR NO ANC W/IN 7...'
; Called from EL116+5^OCXOZ0G, and EL117+5^OCXOZ0G, and EL118+5^OCXOZ0H. |
|
| GETDATA(DFN,OCXL,OCXDFI) | ; This Local Extrinsic Function returns runtime data
|
|
| MCE116() | ; Verify Event/Element: CLOZAPINE DRUG SELECTED
|
|
| MCE117() | ; Verify Event/Element: CLOZAPINE NO ANC W/IN 7 DAYS
|
|
| MCE118() | ; Verify Event/Element: CLOZAPINE NO WBC W/IN 7 DAYS
|
|
| MCE63() | ; Verify Event/Element: PATIENT HAS RECENT CHOLECYSTOGRAM
|
|
| MCE64() | ; Verify Event/Element: PHARMACY PATIENT OVER 65
|
|
| MCE65() | ; Verify Event/Element: SESSION ORDER FOR ANGIOGRAM
|
|
| MCE66() | ; Verify Event/Element: CONTRAST MEDIA ALLERGY
|
|
| MCE67() | ; Verify Event/Element: RECENT BARIUM STUDY ORDERED
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OCXS(860.2 - [#860.2] | R51R1A+8, R53R1A+8, R54R1A+8, R55R1A+8, R56R1A+8, R57R1A+10 |
| ^TMP("OCXCHK" | GETDATA+3, MCE116+6, MCE117+6, MCE118+6, MCE63+6, MCE64+6, MCE65+6, MCE66+6, MCE67+6 |
| Name | Line Occurrences |
|---|---|
| $$GETDATA | R51R1B+11, R51R1B+12, R53R1B+11, R53R1B+12, R54R1B+11, R54R1B+12, R55R1B+11, R55R1B+12, R56R1B+11, R56R1B+12 |
| $$MCE116 | R57R1A+12 |
| $$MCE117 | R57R1A+14 |
| $$MCE118 | R57R1A+13 |
| $$MCE63 | R51R1A+10 |
| $$MCE64 | R53R1A+10 |
| $$MCE65 | R54R1A+10 |
| $$MCE66 | R55R1A+10 |
| $$MCE67 | R56R1A+10 |
| R51R1B | R51R1A+10 |
| R53R1B | R53R1A+10 |
| R54R1B | R54R1A+10 |
| R55R1B | R55R1A+10 |
| R56R1B | R56R1A+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | R51R1B+11, R51R1B+12, R53R1B+11, R53R1B+12, R54R1B+11, R54R1B+12, R55R1B+11, R55R1B+12, R56R1B+11, R56R1B+12 , GETDATA~, GETDATA+3, MCE116+5, MCE117+5, MCE118+5, MCE63+5, MCE64+5, MCE65+5, MCE66+5, MCE67+5 |
| OCXCMSG | R51R1B+10~, R51R1B+11*, R51R1B+12*, R51R1B+19, R53R1B+10~, R53R1B+11*, R53R1B+12*, R53R1B+19, R54R1B+10~, R54R1B+11* , R54R1B+12*, R54R1B+19, R55R1B+10~, R55R1B+11*, R55R1B+12*, R55R1B+19, R56R1B+10~, R56R1B+11*, R56R1B+12*, R56R1B+19 |
| OCXDATA | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| >> OCXDF(37 | MCE116+5*, MCE116+6, MCE117+5*, MCE117+6, MCE118+5*, MCE118+6, MCE63+5*, MCE63+6, MCE64+5*, MCE64+6 , MCE65+5*, MCE65+6, MCE66+5*, MCE66+6, MCE67+5*, MCE67+6 |
| OCXDFI | GETDATA~, GETDATA+3 |
| OCXDUZ | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| OCXE | GETDATA+2~, GETDATA+3* |
| OCXFORD | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| OCXL | GETDATA~, GETDATA+3 |
| OCXLOGD | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| OCXLOGS | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| OCXNMSG | R51R1B+10~, R51R1B+13*, R53R1B+10~, R53R1B+13*, R54R1B+10~, R54R1B+13*, R55R1B+10~, R55R1B+13*, R56R1B+10~, R56R1B+13* |
| OCXNUM | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| >> OCXOCMSG( | R51R1B+19*, R53R1B+19*, R54R1B+19*, R55R1B+19*, R56R1B+19* |
| >> OCXOCMSG(999999 | R51R1B+19, R53R1B+19, R54R1B+19, R55R1B+19, R56R1B+19 |
| >> OCXOERR | R51R1A+3, R51R1B+3, R51R1B+15, R53R1A+3, R53R1B+3, R53R1B+15, R54R1A+3, R54R1B+3, R54R1B+15, R55R1A+3 , R55R1B+3, R55R1B+15, R56R1A+3, R56R1B+3, R56R1B+15, R57R1A+3 |
| >> OCXOSRC | R51R1B+11, R53R1B+11, R54R1B+11, R55R1B+11, R56R1B+11 |
| OCXPORD | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| >> OCXPSD | R51R1B+11, R53R1B+11, R54R1B+11, R55R1B+11, R56R1B+11 |
| OCXQUIT | R51R1B+10~, R53R1B+10~, R54R1B+10~, R55R1B+10~, R56R1B+10~ |
| OCXRES | MCE116+4~, MCE117+4~, MCE118+4~, MCE63+4~, MCE64+4~, MCE65+4~, MCE66+4~, MCE67+4~ |
| OCXRES(116 | MCE116+5* |
| OCXRES(117 | MCE117+5* |
| OCXRES(118 | MCE118+5* |
| OCXRES(63 | MCE63+5* |
| OCXRES(64 | MCE64+5* |
| OCXRES(65 | MCE65+5* |
| OCXRES(66 | MCE66+5* |
| OCXRES(67 | MCE67+5* |
| >> OCXRULE("R51R1B" | R51R1B+8 |
| >> OCXRULE("R53R1B" | R53R1B+8 |
| >> OCXRULE("R54R1B" | R54R1B+8 |
| >> OCXRULE("R55R1B" | R55R1B+8 |
| >> OCXRULE("R56R1B" | R56R1B+8 |
| PC | GETDATA+2~, GETDATA+3* |
| U | GETDATA+3 |
| VAL | GETDATA+2~*, GETDATA+3*, GETDATA+4 |
