Routine: EDPHIST

Information

EDPHIST ;SLC/MKB - Return results history as XML ; 9/1/22 9:27am

Source file <EDPHIST.m>

Name	Comments	DBIA/ICR reference
LAB(XML,PARAM)	; -- Return results history for lab orders
L1
LQ	; end
ACK(ORDER,RETDATE)	; -- Return [first] user that ack'd order ; INPUT ; ORDER - Order IEN ; RETDATE - (optional) 1 if ack date is to be returned, otherwise do not return ack date
MED(XML,PARAM)	; -- Return dose & lab history for med
MQ	;end
VAL(X)
STATUS(STS,TYPE,ORDER)	; -- Return result status for ORDER status
ACKD(ORDER)	; -- Returns 1 or 0, if ORDER has been acknowledged
RANGE(VAL,BEG,END,MAX)	; -- Return BEG,END,MAX
ERR(X)	; -- return error message
UES(X)	; -- unescape incoming XML ; bwf: 12/19/2011 commented following line due to SAC. Need to figure out why this is here.
ESC(X)
ADD(X)	; Add a line to XML(n)
ADDA(TAG,ATT)	; Add ATTribute list to XML(n) ; as <TAG att1="a" att2="b"... />
ADDE(ELMT)	; Add ELeMenT list to XML(n)