VPREVSND ;SLC/MKB -- CPRS EVSEND listeners ;10/25/18 15:29
Source file <VPREVSND.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | FIND^DIC $$GET1^DIQ |
| Virtual Patient Record | 2 | POST^VPRHS $$MI1^VPRSDAB |
| Lab Service | 1 | RR^LR7OR1 |
| 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 |
|---|---|---|
| Virtual Patient Record | 3 | VPR LRAP EVENTS VPR NA EVENTS VPR XQOR EVENTS |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OR(MSG,FD) | ; -- CPRS EVSEND protocol event listener
; FD = frontdoor msg from CPRS (get ORIFN for new backdoor orders) ; else = backdoor msg/ack from Pharmacy, Lab, Radiology, etc. |
|
| PID() | ; -- Returns patient from PID segment in current msg
|
|
| NMSP(IFN) | ; -- Returns package namespace from pointer
|
|
| ORDCONT(NMSP) | ; -- Returns SDA Order container name
|
|
| GMRCOK(IFN) | ; -- returns 1 or 0, if consult/order should be updated
; Error if completed CP Transaction but consult or note incomplete |
|
| RAD | ; -- Radiology documents
|
|
| LRD | ; -- AP/MI documents [from XQOR, LRAP: expects PKGIFN]
|
|
| LRAP(MSG) | ; -- LR7O AP EVSEND OR protocol listener
|
|
| FLAG() | ; -- return 1 if FL/UF message (processed, so done) [VPREVSND]
|
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^MDD(702 - [#702] | FIND^DIC |
| ^RARPT - [#74] | GET1^DIQ |
| ^TIU(8925 - [#8925] | GET1^DIQ |
| ^DIC(9.4 - [#9.4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | LRD+5 |
| ^LR - [#63] | LRD+9 |
| ^OR(100 - [#100] | OR+16, OR+17, NMSP+1 |
| ^RADPT - [#70] | RAD+5 |
| ^RADPT("AO" | RAD+2, RAD+4 |
| ^TMP("LRRR" | LRD+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACT | OR+3~, OR+20*, OR+22*, OR+25, RAD+1~, RAD+6*, RAD+7*, RAD+10 |
| CPSTS | GMRCOK+3~, GMRCOK+7*, GMRCOK+9 |
| CSTS | GMRCOK+3~, GMRCOK+4*, GMRCOK+9 |
| DFN | OR+3~, OR+5*, OR+25, OR+27, RAD+2, RAD+4, RAD+5, RAD+10, LRD+4, LRD+5 , LRD+6, LRD+12, LRAP+1~, LRAP+3*, FLAG+5 |
| FD | OR~, OR+12 |
| I | PID+1~*, PID+2*, PID+3, RAD+1~, RAD+2*, RAD+4*, RAD+5, RAD+8, FLAG+1~, FLAG+2* , FLAG+3 |
| IDT | RAD+1~, RAD+2*, RAD+4, RAD+5, RAD+8, LRD+1~, LRD+2*, LRD+3, LRD+6*, LRD+8 , LRD+9, LRD+11 |
| IFN | NMSP~, NMSP+1, GMRCOK~, GMRCOK+2*, GMRCOK+4, GMRCOK+5 |
| LRDFN | LRD+1~, LRD+5*, LRD+8, LRD+9, LRD+11 |
| MSG | OR~, OR+4, LRAP~, LRAP+2 |
| NMSP | ORDCONT~, ORDCONT+1*, ORDCONT+2, ORDCONT+3, ORDCONT+4 |
| OK | GMRCOK+3~, GMRCOK+6*, GMRCOK+9*, GMRCOK+10 |
| ORC | OR+3~, OR+7*, OR+9*, OR+14, OR+15, LRAP+1~, LRAP+4*, LRAP+6*, LRAP+7 |
| ORDCNTRL | OR+8~, OR+9*, OR+11, OR+12, OR+19, OR+20, OR+22, OR+28, LRAP+5~, LRAP+6* , LRAP+7 |
| ORIFN | OR+8~, OR+14*, OR+16, OR+17, OR+23, OR+24, OR+25, FLAG+1~, FLAG+4*, FLAG+5 |
| ORIG | OR+8~ |
| PKGIFN | OR+8~, OR+14*, OR+19, OR+22, OR+27, RAD+2, RAD+4, LRD+2, LRD+4, LRAP+5~ , LRAP+7* |
| RPT | RAD+1~ |
| RPT( | RAD+8*, RAD+10 |
| SEG | PID+1~, PID+2*, FLAG+1~, FLAG+2* |
| STS | OR+8~, OR+17*, OR+20, OR+22, RAD+1~, RAD+6*, RAD+7 |
| SUB | LRD+1~, LRD+2*, LRD+3, LRD+6, LRD+8, LRD+9, LRD+11 |
| TIU | GMRCOK+3~, GMRCOK+8*, GMRCOK+9 |
| U | OR+9, OR+14, OR+15, OR+17, NMSP+1, RAD+5, LRD+9, LRAP+6, LRAP+7, FLAG+4 |
| VPRC | GMRCOK+3~ |
| VPRC("DILIST" | GMRCOK+6, GMRCOK+7, GMRCOK+8 |
| VPRI | GMRCOK+3~, GMRCOK+6*, GMRCOK+7, GMRCOK+8 |
| VPRMSG | OR+3~, OR+4*, OR+7, OR+9, PID+2, PID+3, LRAP+1~, LRAP+2*, LRAP+4, LRAP+6 , FLAG+2, FLAG+3 |
| VPRPKG | OR+3~, OR+15*, OR+19, OR+22, OR+24*, OR+27, OR+29, OR+30 |
| VPRSDA | OR+3~, OR+24*, OR+25 |
| X | NMSP+1~*, NMSP+2, RAD+1~, RAD+5*, RAD+6, RAD+8, RAD+10*, LRD+1~, LRD+11*, LRD+12 , FLAG+1~, FLAG+3*, FLAG+4 |
| Y | PID+1~, PID+3*, PID+5, NMSP+1~, NMSP+2*, NMSP+3, FLAG+1~*, FLAG+2, FLAG+5*, FLAG+6 |