ORQRY ; SLC/MKB/JDL - Order Query utilities ;3/17/03 14:45
Source file <ORQRY.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PP(DFN,PROV) | ; -- Returns 1 or 0, if PROV is prim prov for DFN
|
|
| ACT(DFN,BEG,END,LOC) | ; -- Returns 1 or 0, if recent activity for DFN
; BEG = beginning date [default = DT-1yr] ; END = ending date [default = DT] ; LOC(IEN) = list of clinic IENs from #44 [default = all] |
|
| ACTQ | ||
| BYPT(ORY,DFN,QRY) | ; -- Returns report data in @ORY based on QRY parameters
|
|
| DOCMTS | ; -- Find documents
|
|
| CSLTS | ; -- Find consults (treats consults as special case of orders)
|
|
| ORDERS | ; -- Find orders
|
|
| ORDERS1 | ||
| GRP(DG) | ; -- Setup display group DG in ORGRP()
|
|
| POP | ||
| PROC | ||
| DATES | ; -- Return SDATE and EDATE from TimeFrame
; [Inverted for rev-chron search] |
|
| AVWX | ; -- use ORQ1 for order view
|
|
| ARSX | ; -- loop on ARS xref
|
|
| ACTX | ; -- loop on "ACT" xref
|
|
| CONT | ; -- Proceed with checking order ORDER() & IFN [from ARS,ACT]
|
|
| LAST(IFN) | ; -- Returns DA of current/latest action for order IFN
; (Only NW or XX actions?) |
|
| OI(IFN) | ; -- Return 1 or 0, if IFN contains any requested OI's
|
|
| TEXT(IFN,TXT) | ; -- Return 1 or 0, if IFN;TXT text contains requested string
|
|
| SAVEORD | ; -- Save order number in @ORY@("ORD:IFN;ACTN")
; Called from CONT: also uses X0,X3,X8,TXT,ORYPAT |
|
| BLDTXT(IFN,TXT) | ; -- Return concatenated order text up to 245 chars
|
|
| SETCBO(IFN) | ; -- Set flags when looking for combinations of orderable items
|
|
| VISITS | ; -- Find clinic visits
; Save in @ORY@("VST:TYPE;DT;LOC") |
|
| ISVALID(VST) | ; -- True: valid visit data
|
|
| NEGATE(SRCHITM) | ; -- set report to return nodes only when nothing found
|
|
| RMOV(PRE) | ; -- Remove nodes based on ID prefix
|
