ORY134 ;SLC/DAN ;3/28/02 12:35
Source file <ORY134.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
UPDT() | ;Function to determine if order has been updated yet.
|
|
PTID(IEN) | ;Return pt name and 1A4U identifiers or -1 if unable to determine
|
|
FIX | ;This section will identify active orders with fractional dose problems
|
|
DRUG() | ;Get dispense drug or orderable item
|
|
PSNMGR(XMY) | ;Add PSNMGR key holders to XMY array
|
|
;Send results of review in a mail message to initiator
|
||
DQ | ;Enter here for queued task
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^OR(100 - [#100] | FIX+3, FIX+4, FIX+5, FIX+6, UPDT+3 |
^TMP("ORFIX" | DQ+1!, DQ+3!, FIX+8*, MAIL+27, MAIL+29, MAIL+31, MAIL+32, MAIL+33 |
^TMP("ORTXT" | DQ+3!, MAIL+6!, MAIL+8*, MAIL+9*, MAIL+10*, MAIL+11*, MAIL+12*, MAIL+13*, MAIL+14*, MAIL+15* , MAIL+16*, MAIL+17*, MAIL+18*, MAIL+19*, MAIL+20*, MAIL+21*, MAIL+22*, MAIL+23*, MAIL+24*, MAIL+25* , MAIL+26*, MAIL+27*, MAIL+28*, MAIL+30*, MAIL+33*, MAIL+34* |
^XUSEC("PSNMGR" | PSNMGR+3 |
Name | Line Occurrences |
---|---|
$$DRUG | FIX+8 |
$$PTID | FIX+7 |
$$UPDT | FIX+8 |
FIX | DQ+2 |
DQ+2 | |
PSNMGR | MAIL+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATE | FIX+1~, FIX+4*, FIX+5 |
DFN | PTID+1~, PTID+3* |
DUZ | MAIL+4 |
I | MAIL+1~, MAIL+7*, MAIL+8*, MAIL+9*, MAIL+10*, MAIL+11*, MAIL+12*, MAIL+13*, MAIL+14*, MAIL+15* , MAIL+16*, MAIL+17*, MAIL+18*, MAIL+19*, MAIL+20*, MAIL+21*, MAIL+22*, MAIL+23*, MAIL+24*, MAIL+25* , MAIL+26*, MAIL+27*, MAIL+28*, MAIL+30*, MAIL+33*, MAIL+34*, UPDT+1~, UPDT+4* |
IEN | FIX+1~, FIX+5*, FIX+6, FIX+8, MAIL+1~, MAIL+32*, MAIL+33, PTID~, PTID+2, PTID+3 , UPDT+3, DRUG+2, DRUG+3 |
ORMSG | ORY134+5~, ORY134+12 |
ORMSG(1 | ORY134+6* |
ORMSG(2 | ORY134+7* |
ORMSG(3 | ORY134+8* |
ORMSG(4 | ORY134+9* |
ORMSG(5 | ORY134+10* |
ORMSG(6 | ORY134+11* |
PAT | FIX+1~, FIX+2*, FIX+3*, FIX+4, FIX+5, FIX+7, MAIL+1~, MAIL+31*, MAIL+32, MAIL+33 |
PTID | FIX+1~, FIX+7*, FIX+8 |
STA | MAIL+1~, MAIL+29*, MAIL+30, MAIL+31, MAIL+32, MAIL+33 |
TXT | UPDT+1~, UPDT+3, UPDT+4 |
TXT( | UPDT+4 |
U | FIX+6, FIX+8, UPDT+3 |
UPDT | UPDT+1~, UPDT+2*, UPDT+4*, UPDT+5 |
USER | PSNMGR+2~, PSNMGR+3* |
VADM | PTID+1~ |
VADM(1 | PTID+5, PTID+6 |
VADM(2 | PTID+6 |
VALUE | DRUG+1~, DRUG+2*, DRUG+3*, DRUG+4 |
XMDUZ | MAIL+1~, MAIL+3* |
XMSUB | MAIL+1~, MAIL+2* |
XMTEXT | MAIL+1~, MAIL+5* |
XMY | MAIL+1~, MAIL+4, PSNMGR~ |
XMY( | MAIL+4*, PSNMGR+3* |
>> ZTDESC | ORY134+13* |
>> ZTDTH | ORY134+13* |
>> ZTIO | ORY134+13* |
>> ZTRTN | ORY134+13* |
>> ZTSAVE("DUZ" | ORY134+13* |
ZTSK | ORY134+5~, ORY134+15 |