ORCACT0 ;SLC/MKB - Validate order action ;Sep 15, 2023@09:23
Source file <ORCACT0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VALID(IFN,ACTION,ERROR,NATR) | ; -- Determines if action is valid for order IFN
|
|
| CM | ;I ACTION="CM" S ERROR="This action is no longer available!" G VQ ; ward comments - no restrictions
|
|
| FL | ||
| UF | ||
| DC1 | ||
| ES | ||
| VR | ||
| DIS | ||
| MN | ||
| GMRA | ||
| MEDS | ||
| RW | ||
| XFR | ||
| RN | ||
| TRM | ||
| EV | ||
| DC2 | ||
| RL | ||
| AIFN | ||
| RF | ||
| CP | ||
| AL | ||
| XX | ||
| HD | ||
| VQ | ||
| ACTION(X) | ; -- Return text of action X
|
|
| NPO(ORIFN) | ; -- Returns 1 or 0, if order ORIFN is for NPO
|
|
| COLLECTD() | ; -- Lab order collected/active (incl all children)?
|
|
| DONE() | ; -- sets ERROR if terminal status
|
|
| DISABLED() | ; -- Order dialog [or protocol] disabled?
|
| FileNo | Call Tags |
|---|---|
| ^DIC(19.1 - [#19.1] | GET1^DIQ |
| ^DIC(9.4 - [#9.4] | GET1^DIQ |
