Routine: VPREVSND

Information

VPREVSND ;SLC/MKB -- CPRS EVSEND listeners ;10/25/18 15:29

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]