ORRCACK ;SLC/MKB - Result Acknowledgement file utilities ; 25 Jul 2003 9:31 AM
Source file <ORRCACK.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PARAM(PROV) | ; -- Return ORRC ACTIVATION DATE parameter for PROV
|
|
ADD(ORDER,PROV,ACK) | ; -- Create new entry in file #102.4 when results are posted
; [called from HL7 messages: ORMLR, ORMRA, ORMGMRC] |
|
ACK(ORY,ORUSR,ORDER) | ; -- Acknowledge results of ORDERs by ORUSR
; where ORDER(#) = ID ^ 1 or 0, if acknowledged ; Returns ORY(#) = ID ^ 1 or 0, if successful ; RPC = ORRC RESULTS ACKNOWLEDGE |
|
DEL(DA) | ; -- Delete old acknowledgment stub
|
|
PATS(ORY,ORUSR) | ; -- Return list of patients for whom ORUSR has unack'd results
; in @ORY@(PAT) = #orders ^ 1 if any are abnormal ; @ORY@(PAT,ID) = * if abnormal, else null ; [from ORRCDPT] |
|
ORSLT | ; -- Add ORIFN to ^TMP($J,"ORSLT",PAT,pkgid) for use by Events
|
|
IDS(ORY,ORPAT,ORUSR,SDATE,EDATE) | ; -- Return new results for ORPAT
; between ORBEG & OREND that ORUSR has not acknowledged ; in @ORY@(ORPAT) = #orders ^ 1 if any are abnormal ; @ORY@(ORPAT,ID) = * if abnormal, else null ; [from ORRCDPT1] |
|
LIST(ORY,ORUSR,ORPAT,ORSLT) | ; -- Return orders by ORUSR for ORPAT with new results
; in @ORY@(#) = Item=ID^Text^ResultDate in HL7 format, and also if ORSLT ; = Data=Test^Value^Units^ReferenceRange^CriticalFlag ; = Cmnt=result comment ; or Text=line of report text ; RPC = ORRC RESULTS BY PATIENT |
|
LISTD(ORY,ORPAT,ORUSR,ORBEG,OREND,ORSLT) | ; -- Return new results for ORPAT
; between ORBEG & OREND that ORUSR has not acknowledged ; in @ORY@(#) = Item=ID^Text^ResultDate in HL7 format, and also if ORSLT ; = Data=Test^Value^Units^ReferenceRange^CriticalFlag ; = Cmnt=result comment ; or Text=line of report text ; RPC = ORRC RESULTS BY DATE |
|
DATES | ; -- Return SDATE and EDATE from ORBEG and OREND
; [Inverted for rev-chron search] |
|
DT1 | ||
ACKD(ORDER,USER) | ; -- Returns 1 or 0, if USER has acknowledged ORDER
|
|
RESULT(ORY,ORDER) | ; -- Return results of ORDERs
; where ORDER(#) = ID ; in @ORY@(#) = Item=ID^Text^ResultDate in HL7 format, and ; = Data=Test^Value^Units^ReferenceRange^CriticalFlag ; = Cmnt=result comment ; or Text=line of report text ; RPC = ORRC RESULTS BY ID |
|
ORD | ; -- Add results for ORIFN to @ORY@(ORN)
|
|
LR | ; -- Lab results
|
|
RA | ; -- Radiology results
|
|
XRPT | ; -- body of report for CASE, PROC
|
|
GMRC | ; -- Consult results
|
FileNo | Call Tags |
---|---|
^ORA(102.4 - [#102.4] | Classic Fileman Calls |