VPREVSND ;SLC/MKB -- CPRS EVSEND listeners ;10/25/18 15:29
Source file <VPREVSND.m>
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 |