ORWDX2 ;SLC/JM,AGP - Order dialog utilities ;Feb 22, 2024@11:19
Source file <ORWDX2.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Order Entry Results Reporting | 6 | ORCDPS1 ORQOREP ORWDX ORWDX2 DCREASON ORWDXM1 ORWLRAP1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
NXT() | ; -- Gets index in array
|
|
EXTVAL(IVAL,DLG) | ; External value given a dlg ptr
|
|
XROOT | ; Part of LOADRSP^ORWDX - moved here because of routine size
|
|
DRAFT(ID) | ; -- Return 1 or 0 if editing an unsigned/unreleased or pending order
|
|
TITR(LST,ILST) | ; Add titration response (when changing old titration order)
|
|
CHKDOSES() | ; Returns true if doses may need to be modified
|
|
DOSEINFO | ; Collect pointers to dose information
|
|
FIXDOSES | ; Update doses for those saved before PSS*1*78 was installed
|
|
DCREASON(LST) | ||
SM(ERROR) | ; Send message to Radiology users
|
|
CHKLABDIV(ORDITEM,ORXREF) | ; Compare user's signed in division to lab test
; division(s) |
Name | Field # of Occurrence |
---|---|
$$ONEHR^ORACCESS | DCREASON+8 |
$$EXT^ORCD | EXTVAL+5 |
GETOC3^OROCAPI1 | XROOT+23, XROOT+24 |
FORMID^ORWDX | XROOT+15 |
$$PTR^ORWDXM1 | TITR+1 |
$$DOSE^PSSORUTE | FIXDOSES+6, FIXDOSES+12 |
DOSE^PSSORUTE | CHKDOSES+1 |
^XMD | SM+11 |
$$GET^XPAR | SM+2 |
GETLST^XPAR | DCREASON+10 |
$$PATCH^XPDUTL | CHKDOSES+1 |
$$NNT^XUAF4 | CHKLABDIV+12, CHKLABDIV+15 |
$$PRNT^XUAF4 | CHKLABDIV+14 |
RPC Name | Call Tags |
---|---|
ORWDX2 DCREASON | DCREASON |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(9.4 - [#9.4] | DCREASON+5 |
^DPT - [#2] | SM+6 |
^LAB(60 - [#60] | CHKLABDIV+7, CHKLABDIV+18, CHKLABDIV+21 |
^OR(100 - [#100] | XROOT+23, XROOT+24, DRAFT+4, SM+5 |
^ORD(100.02 - [#100.02] | DCREASON+6 |
^ORD(100.03 - [#100.03] | DCREASON+3, DCREASON+13 |
^ORD(100.05 - [#100.05] | XROOT+28, XROOT+29, XROOT+30 |
^ORD(101.41 - [#101.41] | EXTVAL+2, XROOT+5, XROOT+8 |
^ORD(101.43 - [#101.43] | SM+8, CHKLABDIV+5 |
^TMP("ORWDXMQ" | XROOT+39! |
^TMP("ORWTITR" | XROOT+38! |
Name | Field # of Occurrence |
---|---|
^( | DCREASON+3 |
^(0 | XROOT+4 |
^(8 | DRAFT+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | DCREASON+1~, DCREASON+16 |
ARRAY( | DCREASON+9*, DCREASON+15!, DCREASON+17, DCREASON+18 |
CHKDOSE | XROOT+1~, XROOT+2*, XROOT+13, XROOT+19 |
CNT | DCREASON+1~, DCREASON+12*, DCREASON+13 |
CODE | FIXDOSES+1~, FIXDOSES+9*, FIXDOSES+10 |
DFN | SM+1~, SM+5*, SM+6 |
DLG | EXTVAL~, EXTVAL+2, EXTVAL+3, EXTVAL+4, EXTVAL+5, XROOT+4*, XROOT+5, XROOT+6, XROOT+8, XROOT+10 , XROOT+12 |
DOSE | XROOT+1~ |
DOSE( | DOSEINFO+2*, FIXDOSES+4, FIXDOSES+11, FIXDOSES+15 |
DUZ(2 | CHKLABDIV+3, CHKLABDIV+12 |
ERROR | DCREASON+1~, DCREASON+10, SM~, SM+4, SM+10 |
ES | DRAFT+1~, DRAFT+4*, DRAFT+7 |
>> I | XROOT+2*, XROOT+3*, XROOT+4, XROOT+7, XROOT+14, XROOT+16, XROOT+17 |
ID | XROOT+5*, XROOT+6*, XROOT+8*, XROOT+10, XROOT+15, DRAFT~, DRAFT+2, DRAFT+3, DOSEINFO+1, DOSEINFO+2 |
IDX | FIXDOSES+1~, FIXDOSES+8*, FIXDOSES+9, FIXDOSES+10, FIXDOSES+14*, FIXDOSES+15 |
IEN | XROOT+27~*, XROOT+28, XROOT+29, XROOT+30, DRAFT+1~, DRAFT+3*, DRAFT+4, DCREASON+1~, DCREASON+3*, DCREASON+9 , DCREASON+13*, DCREASON+14 |
IIDX | FIXDOSES+1~, FIXDOSES+2*, FIXDOSES+3*, FIXDOSES+4, FIXDOSES+5, FIXDOSES+9, FIXDOSES+10, FIXDOSES+11, FIXDOSES+15 |
ILST | NXT+1*, NXT+2, XROOT+2*, XROOT+18, TITR~, DOSEINFO+1, DOSEINFO+2, DCREASON+1~, DCREASON+2*, DCREASON+14* , DCREASON+18* |
>> INST | XROOT+4*, XROOT+10, DOSEINFO+1, DOSEINFO+2 |
INSTR | XROOT+1~ |
INSTR( | DOSEINFO+1*, FIXDOSES+3, FIXDOSES+4, FIXDOSES+5, FIXDOSES+9, FIXDOSES+10 |
IVAL | EXTVAL~, EXTVAL+3, EXTVAL+4 |
>> J | XROOT+16*, XROOT+17 |
LST | XROOT+18, TITR~, DCREASON~ |
LST( | XROOT+10*, XROOT+12*, XROOT+17*, XROOT+32*, XROOT+33*, XROOT+35*, XROOT+36*, TITR+1*, TITR+2*, TITR+3* , FIXDOSES+5, FIXDOSES+9, FIXDOSES+10*, FIXDOSES+11, FIXDOSES+15*, DCREASON+2*, DCREASON+14*, DCREASON+18* |
MG | SM+1~, SM+2*, SM+3 |
NAME | DCREASON+1~, DCREASON+13*, DCREASON+14, DCREASON+15, DCREASON+17*, DCREASON+18 |
NEWDOSE | FIXDOSES+1~, FIXDOSES+6*, FIXDOSES+7, FIXDOSES+10, FIXDOSES+12*, FIXDOSES+13, FIXDOSES+15 |
OI | SM+1~, SM+5*, SM+8 |
OIP | SM+1~, SM+5* |
OLDDOSE | FIXDOSES+1~, FIXDOSES+5*, FIXDOSES+6, FIXDOSES+7, FIXDOSES+11*, FIXDOSES+12, FIXDOSES+13 |
OR0 | SM+1~, SM+5* |
>> ORADDTITRRESP | XROOT+18 |
ORDIALOG | EXTVAL+1~ |
ORDIALOG( | EXTVAL+2*, EXTVAL+3*, EXTVAL+4 |
ORDITEM | CHKLABDIV~, CHKLABDIV+5 |
ORDIV | CHKLABDIV+8~, CHKLABDIV+14*, CHKLABDIV+15, CHKLABDIV+17*, CHKLABDIV+18, CHKLABDIV+21 |
ORDIVS | CHKLABDIV+8~, CHKLABDIV+12*, CHKLABDIV+14, CHKLABDIV+15*, CHKLABDIV+17 |
ORDIVS( | CHKLABDIV+14, CHKLABDIV+18, CHKLABDIV+21 |
ORDIVS(1 | CHKLABDIV+12*, CHKLABDIV+13 |
ORDIVS(2 | CHKLABDIV+15* |
ORERR | SM+1~ |
ORERR(1 | SM+6* |
ORERR(2 | SM+7* |
ORERR(3 | SM+8* |
ORERR(4 | SM+9* |
ORERR(5 | SM+10* |
OREXIST | CHKLABDIV+8~, CHKLABDIV+17, CHKLABDIV+18*, CHKLABDIV+19 |
ORIFN | XROOT+21~, XROOT+22*, XROOT+23, XROOT+24, XROOT+27, SM+1~, SM+4*, SM+5, SM+7 |
ORINSTTYPES | CHKLABDIV+8~ |
ORINSTTYPES( | CHKLABDIV+13 |
ORINSTTYPES("CBOC" | CHKLABDIV+10* |
ORINSTTYPES("OCMC" | CHKLABDIV+10* |
ORINSTTYPES("OCS" | CHKLABDIV+10* |
ORINSTTYPES("OPC" | CHKLABDIV+11* |
ORINSTTYPES("RO-OC" | CHKLABDIV+11* |
ORLABOK | CHKLABDIV+8~, CHKLABDIV+16*, CHKLABDIV+19*, CHKLABDIV+20, CHKLABDIV+21*, CHKLABDIV+22 |
ORTESTIEN | CHKLABDIV+4~, CHKLABDIV+5*, CHKLABDIV+6, CHKLABDIV+7, CHKLABDIV+18, CHKLABDIV+21 |
ORXREF | CHKLABDIV~, CHKLABDIV+2 |
OVRIDE | XROOT+21~, XROOT+26*, XROOT+27, XROOT+28*, XROOT+31, XROOT+33 |
REMCOM | XROOT+21~, XROOT+26*, XROOT+27, XROOT+29, XROOT+30*, XROOT+34, XROOT+36 |
RET | XROOT+21~, XROOT+23, XROOT+24, XROOT+25 |
RET( | XROOT+27 |
>> ROOT | XROOT+3, XROOT+4, XROOT+7, XROOT+14, XROOT+16, XROOT+17, XROOT+20, XROOT+22, XROOT+37, XROOT+39 |
>> RSPID | XROOT+15 |
SEQARR | DCREASON+1~, DCREASON+10, DCREASON+12 |
SEQARR( | DCREASON+13 |
STS | DRAFT+1~, DRAFT+4*, DRAFT+5, DRAFT+6, DRAFT+7 |
>> TRANS | XROOT+15 |
U | EXTVAL+2, XROOT+4, XROOT+5, XROOT+8, XROOT+10, XROOT+23, XROOT+24, DRAFT+4, DCREASON+4, DCREASON+5 , DCREASON+6, DCREASON+7, DCREASON+8, DCREASON+9, DCREASON+13, DCREASON+14, CHKLABDIV+2, CHKLABDIV+5, CHKLABDIV+12, CHKLABDIV+13 , CHKLABDIV+14, CHKLABDIV+15, CHKLABDIV+21 |
>> VAL | XROOT+7*, XROOT+11, XROOT+12, DOSEINFO+2 |
X | XROOT+1~, XROOT+15, XROOT+29~*, XROOT+30, DCREASON+1~, DCREASON+3*, DCREASON+4, DCREASON+5, DCREASON+6, DCREASON+7 , DCREASON+8, DCREASON+9 |
XMDUZ | SM+1~, SM+2* |
XMSUB | SM+1~, SM+3* |
XMTEXT | SM+1~, SM+4* |
XMY | SM+1! |
XMY("G." | SM+3* |
Name | Field # of Occurrence |
---|---|
$T(DOSE^PSSORUTE | CHKDOSES+1 |