ORWPS ;SLC/KCM,JLI,REV,CLA - MEDS TAB ; May 15, 2023@16:02
Source file <ORWPS.m>
Package | Total | Call Graph |
---|---|---|
Order Entry Results Reporting | 4 | MEDS^ORCXPND1 $$ISTITR^ORUTL3 WPVAL^ORWDXR $$OI^ORX8 |
Barcode Medication Administration | 2 | HISTORY^PSBMLHS RPC^PSBO |
Kernel | 2 | $$FMTE^XLFDT $$PATCH^XPDUTL |
Outpatient Pharmacy | 1 | OCL^PSOORRL |
Registration | 1 | INP^VADPT |
Toolkit | 1 | ($$GET,DEL,GETLST,PUT)^XPAR |
VA FileMan | 1 | ^%DT |
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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
COVER(LST,DFN,FILTER) | ; retrieve meds for cover sheet
|
|
DT(X) | ; -- Returns FM date for X
|
|
ACTIVE(LST,DFN,USER,VIEW,UPDATE,ADDINFO) | ; retrieve active inpatient & outpatient meds
; ADDINFO adds additional pieces of data to the first line of each medication. ; ADDINFO Value Piece Data ; 1 or higher 20 Display Group IEN |
|
NXT() | ; increment ILST
|
|
UDINST(Y,INDEX) | ; assembles instructions for a unit dose order
|
|
OPINST(Y,INDEX) | ; assembles instructions for an outpatient prescription
|
|
IVINST(Y,INDEX) | ; assembles instructions for an IV order
|
|
NVINST(Y,INDEX) | ; assembles instructions for a non-VA med
|
|
NVREASON(ORR,NVSDT,INDEX) | ; assembles start date and reasons for a non-VA med
|
|
SETMULT(Y,INDEX,SUB) | ; appends the multiple at the subscript to Y
|
|
COMPRESS(Y) | ; concatenate Y subscripts into smallest possible number
|
|
DETAIL(ROOT,DFN,ID) | ; -- show details for a med order
|
|
MEDHIST(ORROOT,DFN,ORIFN) | ; -- show admin history for a med (RV)
|
|
REASON(ORY) | ; -- Return Non-VA Med Statement/Reasons
|
|
TITR(INSTRUCT,ORIFN) | ; p405 - Add titration info
|
Name | Field # of Occurrence |
---|---|
^%DT | DT+1 |
MEDS^ORCXPND1 | DETAIL+4 |
$$ISTITR^ORUTL3 | TITR+2 |
WPVAL^ORWDXR | NVREASON+7 |
$$OI^ORX8 | MEDHIST+3 |
HISTORY^PSBMLHS | MEDHIST+14, MEDHIST+16, MEDHIST+23, MEDHIST+25 |
RPC^PSBO | MEDHIST+21 |
OCL^PSOORRL | COVER+3, ACTIVE+51 |
INP^VADPT | COVER+5 |
$$FMTE^XLFDT | ACTIVE+39, ACTIVE+43, ACTIVE+44, ACTIVE+48, ACTIVE+49 |
$$GET^XPAR | ACTIVE+11, ACTIVE+14, ACTIVE+15, ACTIVE+18, ACTIVE+19, ACTIVE+22, ACTIVE+33 |
DEL^XPAR | ACTIVE+13, ACTIVE+17, ACTIVE+21 |
GETLST^XPAR | REASON+2 |
PUT^XPAR | ACTIVE+34, ACTIVE+35 |
$$PATCH^XPDUTL | MEDHIST+9 |
RPC Name | Call Tags |
---|---|
ORWPS ACTIVE | ACTIVE |
ORWPS DETAIL | DETAIL |
ORWPS COVER | COVER |
ORWPS MEDHIST | MEDHIST |
ORWPS REASON | REASON |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^OR(100 - [#100] | ACTIVE+59, ACTIVE+82, NVREASON+5, NVREASON+6, MEDHIST+5, MEDHIST+18 |
^ORD(100.98 - [#100.98] | MEDHIST+6, MEDHIST+7, MEDHIST+8 |
^SC - [#44] | ACTIVE+65 |
^TMP("ORACT" | ACTIVE+5!, ACTIVE+56!, ACTIVE+89! |
^TMP("ORHIST" | MEDHIST+4 |
^TMP("ORXPND" | DETAIL+1!, DETAIL+5 |
^TMP("PS" | COVER+2!, COVER+6, COVER+7, COVER+8, COVER+10, COVER+12!, ACTIVE+4!, ACTIVE+54, ACTIVE+58, ACTIVE+60* , ACTIVE+62, ACTIVE+64, ACTIVE+67, ACTIVE+68, ACTIVE+87, ACTIVE+88!, UDINST+2, OPINST+2, IVINST+10, IVINST+13 , IVINST+14, NVINST+2, NVREASON+3, SETMULT+3 |
Name | Line Occurrences |
---|---|
$$DT | ACTIVE+25, ACTIVE+26, ACTIVE+27, ACTIVE+28, ACTIVE+29, ACTIVE+30, ACTIVE+42, ACTIVE+47 |
$$NXT | COVER+10, COVER+11, COVER+16, ACTIVE+79, ACTIVE+80, ACTIVE+84, ACTIVE+85, ACTIVE+86, ACTIVE+87 |
IVINST | ACTIVE+73 |
NVINST | ACTIVE+74 |
NVREASON | ACTIVE+74 |
OPINST | ACTIVE+71 |
SETMULT | ACTIVE+75, UDINST+7, UDINST+9, OPINST+7, OPINST+9, OPINST+10, OPINST+11, IVINST+4, IVINST+5, IVINST+9 , NVINST+5, NVINST+7, NVINST+8, NVINST+9 |
TITR | ACTIVE+72 |
UDINST | ACTIVE+69 |
Name | Field # of Occurrence |
---|---|
^( | SETMULT+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DT+1~* |
ADDINFO | ACTIVE~, ACTIVE+81, ACTIVE+82 |
BEG | ACTIVE+6~, ACTIVE+7*, ACTIVE+25*, ACTIVE+39 |
BEGIN | ACTIVE+6~, ACTIVE+7*, ACTIVE+27*, ACTIVE+42, ACTIVE+51 |
BEGOUT | ACTIVE+6~, ACTIVE+7*, ACTIVE+29*, ACTIVE+47, ACTIVE+51 |
CKPKG | MEDHIST+1~, MEDHIST+9*, MEDHIST+19, MEDHIST+20 |
CLIVDISP | MEDHIST+2~, MEDHIST+8*, MEDHIST+18 |
CNT | IVINST+1~, IVINST+8* |
COMMENTS | ACTIVE+52~, ACTIVE+55!, ACTIVE+57*, ACTIVE+58*, ACTIVE+75, ACTIVE+76* |
COMMENTS( | ACTIVE+85 |
COMMENTS(1 | ACTIVE+77* |
CTX | ACTIVE+6~, ACTIVE+7*, ACTIVE+11*, ACTIVE+12, ACTIVE+14*, ACTIVE+23, ACTIVE+24, ACTIVE+25, ACTIVE+26 |
CTXIN | ACTIVE+6~, ACTIVE+7*, ACTIVE+15*, ACTIVE+16, ACTIVE+18*, ACTIVE+23*, ACTIVE+27, ACTIVE+28 |
CTXOUT | ACTIVE+6~, ACTIVE+7*, ACTIVE+19*, ACTIVE+20, ACTIVE+22*, ACTIVE+24*, ACTIVE+29, ACTIVE+30 |
DATE | ACTIVE+6~, ACTIVE+38*, ACTIVE+39*, ACTIVE+50 |
DATEIN | ACTIVE+6~, ACTIVE+38*, ACTIVE+43*, ACTIVE+44*, ACTIVE+50 |
DATEOUT | ACTIVE+6~, ACTIVE+38*, ACTIVE+48*, ACTIVE+49*, ACTIVE+50 |
DFN | COVER~, COVER+3, ACTIVE~, ACTIVE+51, DETAIL~, DETAIL+3, MEDHIST~, MEDHIST+16, MEDHIST+21, MEDHIST+25 |
DRG | COVER+3~ |
DURU | IVINST+16~*, IVINST+21*, IVINST+22, IVINST+23, IVINST+24, IVINST+25 |
DURV | IVINST+16~*, IVINST+18*, IVINST+19, IVINST+21*, IVINST+22, IVINST+23, IVINST+24, IVINST+25 |
DUZ | ACTIVE+13, ACTIVE+17, ACTIVE+21, ACTIVE+31, ACTIVE+34, ACTIVE+35 |
END | ACTIVE+6~, ACTIVE+7*, ACTIVE+26*, ACTIVE+39 |
ENDIN | ACTIVE+6~, ACTIVE+7*, ACTIVE+28*, ACTIVE+43, ACTIVE+44, ACTIVE+51 |
ENDOUT | ACTIVE+6~, ACTIVE+7*, ACTIVE+30*, ACTIVE+48, ACTIVE+49, ACTIVE+51 |
ERROR | ACTIVE+6~, ACTIVE+34, ACTIVE+35 |
FIELDS | ACTIVE+52~, ACTIVE+58*, ACTIVE+61, ACTIVE+66, ACTIVE+78*, ACTIVE+79, ACTIVE+80, IVINST+6 |
FILTER | COVER~, COVER+1*, COVER+5, COVER+7 |
HPIV | MEDHIST+1~, MEDHIST+3*, MEDHIST+7*, MEDHIST+18 |
I | UDINST+1~, UDINST+10*, OPINST+1~, OPINST+13*, IVINST+1~, IVINST+11*, NVINST+1~, NVINST+11*, SETMULT+1~, SETMULT+3* , COMPRESS+1~, COMPRESS+2*, COMPRESS+3, COMPRESS+4 |
ID | DETAIL~ |
ILST | COVER+4~*, COVER+16*, ACTIVE+52~, ACTIVE+53*, ACTIVE+82, NXT+1*, NXT+2 |
INDEX | UDINST~, UDINST+2, UDINST+7, UDINST+9, OPINST~, OPINST+2, OPINST+7, OPINST+9, OPINST+10, OPINST+11 , IVINST~, IVINST+4, IVINST+5, IVINST+9, IVINST+10, IVINST+13, IVINST+14, NVINST~, NVINST+2, NVINST+5 , NVINST+7, NVINST+8, NVINST+9, NVREASON~, NVREASON+3, SETMULT~, SETMULT+3 |
INSTRUCT | ACTIVE+52~, ACTIVE+55!, ACTIVE+58*, ACTIVE+69, ACTIVE+71, ACTIVE+72, ACTIVE+73, ACTIVE+74, TITR~ |
INSTRUCT( | ACTIVE+84, TITR+5* |
INSTRUCT("" | TITR+3 |
ISIV | MEDHIST+1~, MEDHIST+3*, MEDHIST+6*, MEDHIST+18 |
ITMP | COVER+4~, COVER+6*, COVER+7, COVER+8, COVER+10, ACTIVE+52~, ACTIVE+53*, ACTIVE+54*, ACTIVE+58, ACTIVE+60 , ACTIVE+62, ACTIVE+64, ACTIVE+67, ACTIVE+68, ACTIVE+69, ACTIVE+71, ACTIVE+73, ACTIVE+74, ACTIVE+75, ACTIVE+87 |
IVDUR | IVINST+1~, IVINST+2*, IVINST+14*, IVINST+15, IVINST+17, IVINST+18, IVINST+19*, IVINST+20, IVINST+21, IVINST+22* , IVINST+23*, IVINST+24*, IVINST+25*, IVINST+26 |
J | ACTIVE+52~, ACTIVE+84*, ACTIVE+85*, ACTIVE+86*, NVREASON+1~, NVREASON+8*, SETMULT+1~, SETMULT+2*, SETMULT+5*, SETMULT+6 , COMPRESS+1~*, COMPRESS+3*, COMPRESS+4 |
LCNT | DETAIL+2~, DETAIL+3* |
LOC | ACTIVE+63~*, ACTIVE+64*, ACTIVE+65, ACTIVE+79 |
LOCEX | ACTIVE+63~*, ACTIVE+65*, ACTIVE+79 |
LST | COVER~, ACTIVE~ |
LST( | COVER+10*, COVER+11*, COVER+15!, COVER+16*, ACTIVE+79*, ACTIVE+80*, ACTIVE+82*, ACTIVE+84*, ACTIVE+85*, ACTIVE+86* , ACTIVE+87* |
LST(0 | ACTIVE+37*, ACTIVE+50* |
ND2P5 | COVER+3~ |
NVSDT | ACTIVE+52~, ACTIVE+74, ACTIVE+78, NVREASON~, NVREASON+6* |
ORA | NVREASON+1~, NVREASON+7 |
ORA( | NVREASON+8 |
ORE | REASON+1~ |
ORI | NVREASON+1~, NVREASON+2*, NVREASON+8*, TITR+1~, TITR+3*, TITR+4*, TITR+5 |
ORIFN | ACTIVE+52~, ACTIVE+58*, ACTIVE+59, ACTIVE+72, ACTIVE+82, MEDHIST~, MEDHIST+3, MEDHIST+5, MEDHIST+18, TITR~ , TITR+2 |
ORN | NVREASON+1~, NVREASON+4*, NVREASON+5, NVREASON+6, NVREASON+7 |
ORPHMID | MEDHIST+1~, MEDHIST+5*, MEDHIST+13, MEDHIST+21 |
ORPSID | MEDHIST+1~, MEDHIST+3*, MEDHIST+16, MEDHIST+25 |
ORR | NVREASON~, NVREASON+2! |
ORR( | NVREASON+8* |
ORROOT | MEDHIST~, MEDHIST+4*, MEDHIST+15, MEDHIST+16, MEDHIST+19, MEDHIST+21, MEDHIST+22, MEDHIST+24, MEDHIST+25 |
ORVP | DETAIL+2~, DETAIL+3* |
ORX | ACTIVE+6~, ACTIVE+42*, ACTIVE+43, ACTIVE+44, ACTIVE+47*, ACTIVE+48, ACTIVE+49 |
ORY | REASON~, REASON+2 |
REASON | ACTIVE+52~, ACTIVE+55!, ACTIVE+74 |
REASON( | ACTIVE+86 |
RNWDT | COVER+3~ |
ROOT | DETAIL~, DETAIL+5* |
RST | UDINST+1~, UDINST+3*, UDINST+4, UDINST+6, UDINST+7, UDINST+8, UDINST+9, UDINST+10, UDINST+11, OPINST+1~ , OPINST+3*, OPINST+4, OPINST+5, OPINST+6, OPINST+7, OPINST+8, OPINST+9, OPINST+10, OPINST+11, OPINST+12 , OPINST+13, OPINST+14, IVINST+1~, IVINST+3*, IVINST+4, IVINST+5, IVINST+6, IVINST+7, IVINST+8, IVINST+9 , IVINST+10, IVINST+11, IVINST+12, IVINST+13, IVINST+20, IVINST+26, IVINST+27, NVINST+1~, NVINST+3*, NVINST+4 , NVINST+5, NVINST+6, NVINST+7, NVINST+8, NVINST+9, NVINST+10, NVINST+11, NVINST+12 |
SG | COVER+3~ |
SOLN1 | IVINST+1~, IVINST+4*, IVINST+6, IVINST+7* |
STVIEW | ACTIVE+6~, ACTIVE+33*, ACTIVE+34*, ACTIVE+35*, ACTIVE+36, ACTIVE+37 |
SUB | SETMULT~, SETMULT+3, SETMULT+4 |
TMP | COVER+15~ |
TMP( | COVER+15*, COVER+16 |
TYPE | ACTIVE+52~, ACTIVE+61*, ACTIVE+62*, ACTIVE+64, ACTIVE+66*, ACTIVE+67*, ACTIVE+68*, ACTIVE+69, ACTIVE+70, ACTIVE+73 , ACTIVE+74, ACTIVE+75, ACTIVE+78, ACTIVE+80 |
U | COVER+7, COVER+9, COVER+10, COVER+11, COVER+15, ACTIVE+37, ACTIVE+50, ACTIVE+58, ACTIVE+61, ACTIVE+65 , ACTIVE+78, ACTIVE+79, ACTIVE+80, ACTIVE+82, UDINST+4, UDINST+5, OPINST+4, OPINST+5, OPINST+6, IVINST+6 , IVINST+11, IVINST+13, NVINST+4, NVREASON+4, NVREASON+6, SETMULT+4, MEDHIST+3, MEDHIST+18 |
UPDATE | ACTIVE~, ACTIVE+9*, ACTIVE+10, ACTIVE+32 |
USER | ACTIVE~, ACTIVE+31*, ACTIVE+33 |
VAERR | COVER+4~ |
VAIN | COVER+4~ |
VAIN(1 | COVER+7 |
VIEW | ACTIVE~, ACTIVE+8*, ACTIVE+10*, ACTIVE+34, ACTIVE+35*, ACTIVE+36*, ACTIVE+51 |
X | COVER+4~, COVER+8*, COVER+9*, COVER+10, COVER+11, COVER+15*, COVER+16*, DT~, DT+1, UDINST+1~ , UDINST+2*, UDINST+4, UDINST+5*, UDINST+6, OPINST+1~, OPINST+2*, OPINST+4, OPINST+5, OPINST+6, NVINST+1~ , NVINST+2*, NVINST+4, NVREASON+1~, NVREASON+3*, NVREASON+4, SETMULT+1~, SETMULT+3*, SETMULT+4*, SETMULT+5, COMPRESS+1~ , COMPRESS+5 |
X( | COMPRESS+1*, COMPRESS+3*, COMPRESS+4* |
Y | DT+1~*, DT+2, UDINST~, UDINST+11*, OPINST~, OPINST+14*, IVINST~, IVINST+27*, NVINST~, NVINST+12* , SETMULT~, SETMULT+2, SETMULT+5, SETMULT+6, COMPRESS~, COMPRESS+5!* |
Y( | COMPRESS+2, COMPRESS+3, COMPRESS+4 |
Name | Field # of Occurrence |
---|---|
$T(HISTORY^PSBMLHS | MEDHIST+14, MEDHIST+23 |