VPRSDAOR ;SLC/MKB -- SDA Order utilities ;7/29/22 14:11
Source file <VPRSDAOR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ORDERS(DG) | ; -- get orders by Display Group
; Query called from GET^DDE, returns DLIST(#)=ien ; Expects context variables DFN, DSTRT, DSTOP, DMAX |
|
| RX(ORIFN) | ; -- is order really a med? (non-PS order in display group)
|
|
| BB(ORIFN) | ; -- return 1 or 0, if order is for Blood Bank
|
|
| NONORD | ; -- get other orders: not Lab, Rad, or Med
; Query called from GET^DDE, returns DLIST(#)=ien ; Expects context variables DFN, DSTRT, DSTOP, DMAX |
|
| ORPKG | ; -- get list of pkgs to exclude
|
|
| OR1(ORIFN) | ; -- define basic variables for any order [ID Action]
; Returns OR0, OR3, OR6, OR8, ORDAD, and ORSIG to Order entities |
|
| WP(ORIFN,ID) | ; -- return a WP value from an order response as a string
|
|
| ORDG(DG) | ; -- return ien^name^VA100.98 for a DG abbreviation
|
|
| LASTACT(ORIFN) | ; -- return DA of current or last order action
|
|
| ORSIG(ORIFN) | ; -- return string of signature data from Order Action as
; Signature Status (#4) ^ Signed By (#5) ^ D/T Signed (#6), or ; Signature Status (#4) ^ ^ Release D/T (#16) if not e-signed |
|
| FLAGS(IFN,LIST) | ; -- returns 1 or 0, if any flags are active [VPRSDAOR]
; Can also return .LIST(DA) of actions w/flag nodes |
| FileNo | Call Tags |
|---|---|
| 100.008 | EXTERNAL^DILFD |
| ^DIC(9.4 - [#9.4] | FIND1^DIC, GET1^DIQ |
