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 |