ORCSAVE2 ;SLC/MKB-Utilities to update an order ;Jun 03, 2020@15:21:13
Source file <ORCSAVE2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STATUS(IFN,ST) | ; -- Update status of order
|
|
| CKPARENT(ORIFN) | ; -- Update status of parent order, if appropriate
|
|
| RELEASE(ORDER,ACTION,WHEN,WHO,NATURE) | ; -- Mark order as released to service
|
|
| FIXRAD(DA,TYPE) | ; -- Fix Radiology Orders with start dates that are no longer valid
|
|
| STARTDT(DA) | ; -- resolve Start and Stop dates from Responses
|
|
| STRT | ||
| STOP | ||
| NEXT | ; -- Resolve next lab collection to FM date/time
|
|
| AM | ; -- Resolve AM lab collection to FM date/time
|
|
| ADMIN(START) | ; -- Resolve next/closest administration times to FM date/time
|
|
| SIGN(DA,WHO,WHEN,HOW,WHAT) | ; -- affix ES to order
|
|
| SIGSTS(IFN,ACT) | ; -- Set SigSts for backdoor orders [Called from ^ORM* rtns]
; Expects ORNATR, ORVP, ORNP to be defined |
|
| UNVEIL(IFN) | ; -- unveil new order
|
|
| DELETE(ORDER) | ; -- delete order [action]
|
|
| VERIFY(IFN,DA,TYPE,WHO,WHEN) | ; -- order verified
|
|
| COMP(IFN,WHO,WHEN) | ; -- order completed
|
|
| DATES(DA,START,STOP) | ; -- Update start/stop dates for order DA
|
|
| OC | ; -- Save order checks in ORCHECK() in ^OR(100,+ORIFN,9) ON SIGNATURE IN CPRS
|
|
| VALUE(IFN,ID,INST) | ; -- Returns value of prompt by identifier ID
|
|
| SC(ORX,ORIFN) | ; -- save responses to SC questions
|
|
| CANCEL(ORDER) | ; -- cancel order [action]
|
|
| LAPSE(ORDER) | ; -- lapse order [action]
|
|
| ALPS(DA,ORACT,TYPE) | ;set the lapse index ^OR(100,"ALPS")
|
|
| RESP(IFN,PRMT,VAL,INST) | ; -- update a single Response VALue
|
| FileNo | Call Tags |
|---|---|
| ^OR(100 - [#100] | Classic Fileman Calls |
