ORQ1 ;slc/dcm - Get orders for a patient. ;Apr 09, 2020@12:52:38
Source file <ORQ1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN(PAT,GROUP,FLG,EXPAND,SDATE,EDATE,DETAIL,MULT,XREF,GETKID,EVENT) | ;Get orders
 ; Returns orders in ^TMP("ORR",$J,ORLIST,i) for defined context:  | 
|
| EN0 | ; where order status=#:
 ; 1 => Discontinued (dc) 6 => Active (a) 11 => Unreleased (u) ; 2 => Complete (c) 7 => Expired (e) 12 => DC/Edit (dce) ; 3 => Hold (h) 8 => Scheduled (s) 13 => Cancelled (x) ; 4 => Flagged (?) 9 => Partial Results (pr) 14 => Lapsed (l) ; 5 => Pending (p) 10 => Delayed (d) 15 => Renewed (rn) ; 99 => No Status (') ; EXPAND=ifn of parent order, used to expand child orders ; SDATE =Start date ; EDATE =End date ; DETAIL=Data to be returned (optional, default=0): ; 0 => ^TMP("ORR",$J,ORLIST,i) = order # ; 1 => ^TMP("ORR",$J,ORLIST,i) = order #^display group^when entered^ ; start d/t^stop d/t^status^sts abbrv ; ^TMP("ORR",$J,ORLIST,i,"TX",j) = order text ; MULT =0:Don't allow multiple occurrences of order ; =1:Allow multiple occurrences ; XREF =cross reference to use instead of ACT (AW for completed orders) ; GETKID=includes children of multiple orders ; EVENT =ptr to Patient Event file #100.2, for orders tied to an event  | 
|
| EN1 | ; -- start here
 | 
|
| ENQ | ||
| LIST | ;Get entry in ^TMP("ORR",$J,ORLIST)
 | 
|
| GRP(DG) | ||
| POP | ||
| PROC | 
| FileNo | Call Tags | 
|---|---|
| ^ORD(100.98 - [#100.98] | GET1^DIQ |