ORMEVNT ;SLC/MKB-Trigger HL7 msg off MAS events ; 6/8/10 9:49am
Source file <ORMEVNT.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN1 | ; -- tasked entry point
 | 
|
| EN | ; -- main entry point
 | 
|
| A | ;
 | 
|
| B | ;
 | 
|
| C | ;
 | 
|
| FINISHED | ||
| CURRENT() | ; -- Returns 1 or 0, if DGPMDA is the latest movement
 | 
|
| CQ | ||
| PREVTS() | ; -- Returns previous treating specialty
 | 
|
| PRVQ | ||
| TYPE(X) | ; -- Return type of event from MAS code
 | 
|
| DIV(LOC) | ; -- Return Institution file #4 ptr for LOC
 | 
|
| PATEVT() | ; -- Find match to new data in Patient Event file
 | 
|
| PTQ | ||
| DCEVT() | ; -- Find match to event in AutoDC Rules file for [new] ORDIV,ORTS,ORL
 | 
|
| DCQ | ||
| READMIT() | ; -- Return 1 or 0, if patient is being readmitted
 | 
|
| COMP(ORDG) | ; -- Complete orders on event [Keep until GMRA*4*15]
 | 
|
| LOC(NODE) | ; -- Returns [new] patient location from NODE
 | 
|
| DISCH | ; -- Lapse/cancel outstanding events on discharge
 | 
|
| XTMP | ; -- Save ORIFN to possibly reinstate on admission
 ; Also uses ORVP, DGPMDA  | 
|
| REINST | ; -- Reinstate meds from observation
 | 
|
| EXP(ORDER,ORSTOP) | ||
| ACTIVE(ORDER,ORSTRT) | ||
| PURGE(ORDER) | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(45.7 - [#45.7] | GET1^DIQ |