PSSDSAPM ;BIR/RTR-Dose Check utilities routine ;09/13/10
Source file <PSSDSAPM.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Data Management | 5 | $$TLS^PSSDSAPA ($$DLTM,$$EMSY,$$EXMT,$$SUP,$$UNIT)^PSSDSAPI ($$DRG,$$MTCH,$$PRE,DPL,DPOP,FRDR,INFERR,ITEM)^PSSDSAPK NUM^PSSDSAPL ($$MLTOK,PTH,RANGE)^PSSDSUTL |
General Medical Record - Vitals | 1 | EN6^GMRVUTL |
Kernel | 1 | $$UP^XLFSTR |
National Drug File | 1 | $$PROD0^PSNAPIS |
Registration | 1 | DEM^VADPT |
Toolkit | 1 | $$SCREEN^XTID |
VA FileMan | 1 | ^%DTC |
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 |
---|---|---|
Outpatient Pharmacy | 3 | PSODDPR4 PSODDPRE PSOUTL |
Inpatient Medications | 2 | PSJBLDOC PSJDGCK |
Order Entry Results Reporting | 1 | ORKPS |
Pharmacy Data Management | 1 | PSSDSAPD |
Name | Comments | DBIA/ICR reference |
---|---|---|
DRG(PSSNBOI,PSSNBPK,PSSNBOR) | ;
|
|
DREX() | ;Quit if drug is exempt from order check
|
|
EMS() | ;Sets piece 5 of output to 1 if CPRS needs to show error message and not do Dose check
|
|
EMSX() | ;Sets piece 5 of output to 1 if no active drugs are tied to the orderable Item
|
|
APP | ;
|
|
GCN() | ;Returns drug matching information
|
|
MLT | ;Multi Ingredient check called from PSSDSAPD
|
|
MLTS | ;
|
|
MLTNO | ;
|
|
MLTNP | ;
|
|
FDRUG | ; Find drug, called from PSSDSAPD
|
|
INERR | ;Set OI error
|
|
FRQE | ;Set Frequency error called from PSSDSAPD
|
|
INFUE | ;Set Infusion rate error from PSSDSAPD
|
|
ERST | ;Set Dosing Sequences into error summary list
|
|
PAT | ;
|
|
ADDCT | ;Add counter to output globals so data appears in correct order for more than 9 Dosing Sequences
|
|
ADDCTA | ;Add counter to CPRS global
|
|
ADDCTB | ;Add counter to Pharmacy global
|
|
DSP(PSSDBDS,PSSDBFDB) | ;Return Dose and Dose Unit to Inpatient for complex order display
|
|
DSPRT | ;Line Tag added for retry if Free Text Dosage contains parenthesis
|
|
DSPL | ;Add leading zero
|
|
NXDRUG | ;No Drug found
|
|
STDB | ;Set PSSDBCAR array for Input Exceptions
|
Name | Field # of Occurrence |
---|---|
^%DTC | PAT+4 |
EN6^GMRVUTL | PAT+8, PAT+12 |
$$PROD0^PSNAPIS | GCN+4 |
$$TLS^PSSDSAPA | MLT+8 |
$$DLTM^PSSDSAPI | NXDRUG+1 |
$$EMSY^PSSDSAPI | DRG+27 |
$$EXMT^PSSDSAPI | DREX+1 |
$$SUP^PSSDSAPI | DRG+21, DREX+2, EMSX+5, EMSX+7 |
$$UNIT^PSSDSAPI | DSP+9 |
$$DRG^PSSDSAPK | FDRUG+2 |
$$MTCH^PSSDSAPK | DSPRT+4 |
$$PRE^PSSDSAPK | EMS+2 |
DPL^PSSDSAPK | NXDRUG+2, STDB+4 |
DPOP^PSSDSAPK | DSPRT+9 |
FRDR^PSSDSAPK | FRQE+1 |
INFERR^PSSDSAPK | FRQE+1 |
ITEM^PSSDSAPK | MLT+1, DSPRT+10 |
NUM^PSSDSAPL | MLT+1, DSPRT+11 |
$$MLTOK^PSSDSUTL | MLT+7 |
PTH^PSSDSUTL | DSP+16 |
RANGE^PSSDSUTL | MLT+1, DSPRT+12 |
DEM^VADPT | PAT+3 |
$$UP^XLFSTR | DSP+8 |
$$SCREEN^XTID | DSPRT+5 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(51.24 - [#51.24] | DSPRT+6 |
^PSDRUG - [#50] | DRG+12, DRG+13, DRG+22, DRG+25, EMSX+4, GCN+2, MLT+5, DSPRT+2, DSPRT+3 |
^PSDRUG("ASP" | DRG+11, DRG+20, EMSX+3 |
^TMP($J | INERR+3*, PAT+5*, PAT+10*, PAT+17*, ADDCTB+1, ADDCTB+3!*, ADDCTB+5, ADDCTB+7, ADDCTB+8*, ADDCTB+9* , ADDCTB+10*, ADDCTB+12, ADDCTB+13, ADDCTB+14*, ADDCTB+16, ADDCTB+17, ADDCTB+19, ADDCTB+20, ADDCTB+21*, ADDCTB+22 , ADDCTB+23*, ADDCTB+25!, NXDRUG+1!, NXDRUG+2, NXDRUG+3*, NXDRUG+4* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%Y | PAT+1~ |
DA | MLT+4~ |
DFN | PAT+1~, PAT+2*, PAT+6*, PAT+11* |
DT | DRG+12, DRG+25, EMSX+4, PAT+4 |
GMRVSTR | PAT+1~, PAT+8*, PAT+12* |
PSSDBAR | DSP+2~, DSP+4! |
PSSDBAR("AMN" | MLT+7, MLTS+1!, DSPRT+9, DSPRT+10, DSPRT+11, DSPRT+12 |
PSSDBAR("UNIT" | MLT+7, MLTS+1!, DSPRT+9, DSPRT+10, DSPRT+11, DSPRT+12 |
>> PSSDBASB | ADDCT+2 |
>> PSSDBASE | INERR+3, ERST+2, PAT+5, PAT+10, PAT+17, NXDRUG+1, NXDRUG+2, NXDRUG+3, NXDRUG+4 |
>> PSSDBASG | ADDCTB+1, ADDCTB+3, ADDCTB+8, ADDCTB+9, ADDCTB+10, ADDCTB+14, ADDCTB+21, ADDCTB+23 |
PSSDBATX | PAT+1~, PAT+2*, PAT+4*, PAT+5 |
PSSDBBSA | PAT+1~, PAT+7*, PAT+15*, PAT+17 |
>> PSSDBCAR( | MLTNO+1*, MLTNP+1*, STDB+1*, STDB+2* |
>> PSSDBCAX( | ERST+2*, ERST+3, ERST+4*, ERST+5*, ERST+6*, ERST+7* |
>> PSSDBCAZ( | MLTS+2*, MLTNO+1, MLTNP+1, FDRUG+3*, FRQE+1*, INFUE+1*, NXDRUG+1! |
>> PSSDBDFN | PAT+2, PAT+6, PAT+11 |
PSSDBDS | DSP~ |
PSSDBDS( | FDRUG+2, DSP+3, DSP+6, DSP+7, DSP+10, DSP+12*, DSP+14, DSP+15*, DSPRT+14*, DSPL+2* |
>> PSSDBEQ2( | ERST+2 |
>> PSSDBEQ3 | ERST+2*, ERST+3, ERST+4, ERST+5, ERST+6, ERST+7 |
PSSDBFAL | MLT+1, MLT+2, DSP+2~, DSP+4*, DSP+10*, DSP+11, DSPRT+7*, DSPRT+8, DSPRT+9, DSPRT+10 , DSPRT+11, DSPRT+12, DSPRT+13 |
PSSDBFDB | DSP~ |
PSSDBFDB( | MLTS+2, FDRUG+3, INERR+2, INERR+3, FRQE+1, INFUE+1, DSP+5, DSP+12, DSPRT+2, DSPRT+3 , NXDRUG+1, NXDRUG+2, NXDRUG+3, NXDRUG+4, STDB+1, STDB+2 |
PSSDBFDB("OI" | FDRUG+2, FDRUG+3, NXDRUG+1 |
PSSDBFDB("OI_USAGE" | FDRUG+2 |
PSSDBFDB("PACKAGE" | FDRUG+2, FDRUG+3, NXDRUG+1 |
PSSDBHT | PAT+1~, PAT+13* |
PSSDBHTX | PAT+1~, PAT+7*, PAT+13*, PAT+15 |
>> PSSDBIFG | MLT+3, MLT+5, FDRUG+2*, FDRUG+3* |
PSSDBIFL | FDRUG+2*, DSP+2~, DSP+4* |
>> PSSDBKLP | MLTNO+1 |
PSSDBLP | MLTS+2, FDRUG+2, FDRUG+3, INERR+2, INERR+3, FRQE+1, INFUE+1, DSP+2~, DSP+3*, DSP+5 , DSP+6, DSP+7, DSP+10, DSP+12, DSP+14, DSP+15, DSPRT+2, DSPRT+3, DSPRT+14, DSPL+2 , NXDRUG+1, NXDRUG+2, NXDRUG+3, NXDRUG+4, STDB+1, STDB+2 |
PSSDBLPD | DSP+2~, DSP+4*, DSPRT+4*, DSPRT+9, DSPRT+13* |
PSSDBNOD | DSP+2~, DSPRT+3*, DSPRT+4, DSPRT+5, DSPRT+6, DSPRT+7 |
PSSDBNT | DSP+2~, DSPRT+6*, DSPRT+7 |
>> PSSDBRLS | MLTNP+1, ERST+2, ERST+3, ERST+4, ERST+5, ERST+6, ERST+7 |
PSSDBWT | PAT+1~, PAT+9* |
PSSDBWTX | PAT+1~, PAT+7*, PAT+9*, PAT+10, PAT+15 |
>> PSSDBXAX( | ERST+2, ERST+3 |
PSSDBXP | DSP+2~, DSPRT+2*, DSPRT+3 |
>> PSSDSIVF | NXDRUG+3 |
PSSDSLC1 | DSP+2~ |
PSSDSLC1( | MLT+2, DSPRT+13 |
PSSDSLCL | MLT+2*, DSP+2~, DSP+14*, DSP+15, DSP+16, DSPRT+13* |
PSSDSLCT | MLT+2*, DSP+2~, DSP+4*, DSPRT+13* |
PSSDSXTD | DSP+2~, DSPRT+5* |
>> PSSENO | INERR+3* |
PSSINCFO | DREX+1, FDRUG+1~* |
PSSIND1 | DSP+2~, DSP+7*, DSP+8*, DSP+9 |
PSSIND2 | DSP+2~, DSP+9*, DSP+10 |
PSSIND3 | DSP+2~, DSPRT+1*, DSPRT+2, DSPRT+7* |
PSSINDSP | DSP+2~, DSP+4*, DSP+5*, DSP+10*, DSPRT+7*, DSPRT+9*, DSPRT+10*, DSPRT+11*, DSPRT+12*, DSPL+1* , DSPL+2 |
PSSJW56 | ADDCTB+2~, ADDCTB+19*, ADDCTB+20, ADDCTB+21 |
PSSJW57 | ADDCTB+2~, ADDCTB+20*, ADDCTB+21 |
PSSJW7 | ADDCTB+2~, ADDCTB+5*, ADDCTB+6, ADDCTB+7, ADDCTB+8, ADDCTB+9, ADDCTB+10, ADDCTB+12, ADDCTB+13, ADDCTB+14 , ADDCTB+16, ADDCTB+17, ADDCTB+19, ADDCTB+20, ADDCTB+21, ADDCTB+22, ADDCTB+23 |
PSSJW8 | ADDCTB+2~, ADDCTB+7*, ADDCTB+8, ADDCTB+9, ADDCTB+10, ADDCTB+12*, ADDCTB+13, ADDCTB+14, ADDCTB+16*, ADDCTB+17 , ADDCTB+18, ADDCTB+19, ADDCTB+20, ADDCTB+21, ADDCTB+22, ADDCTB+23 |
PSSJW9 | ADDCTB+2~, ADDCTB+13*, ADDCTB+14, ADDCTB+17*, ADDCTB+19, ADDCTB+20, ADDCTB+21, ADDCTB+22, ADDCTB+23 |
PSSJWNUM | ADDCTB+2~, ADDCTB+6*, ADDCTB+8, ADDCTB+9, ADDCTB+10, ADDCTB+14, ADDCTB+21, ADDCTB+23 |
PSSJWVAL | ADDCTB+2~, ADDCTB+22*, ADDCTB+23 |
PSSKRC1 | EMSX+1~, EMSX+3*, EMSX+4, EMSX+5, EMSX+7 |
PSSKRC2 | EMSX+1~, EMSX+4* |
PSSKRC3 | EMSX+1~, EMSX+2*, EMSX+6*, EMSX+8 |
PSSKRC4 | EMSX+1~, EMSX+2*, EMSX+4, EMSX+5*, EMSX+8 |
PSSKRC9 | EMSX+1~, EMSX+2*, EMSX+3, EMSX+7*, EMSX+8*, EMSX+9 |
PSSMLT1 | MLT+4~, MLT+5*, MLT+6, MLT+7, MLT+8 |
PSSMLT2 | MLT+4~, MLT+8* |
PSSMLT3 | MLT+4~, MLT+5*, MLT+6, MLT+7, MLT+8 |
PSSNB1 | DRG+3~, DRG+11*, DRG+12, DRG+13, DREX+1, DREX+2, APP+23, APP+25, APP+26, APP+28 , APP+30, APP+34, GCN+2, GCN+5, GCN+6 |
PSSNBAP1 | DRG+3~, DRG+14*, APP+1, APP+3, APP+4, APP+6, APP+8, APP+10, APP+12, APP+14 , APP+15, APP+17, APP+19, APP+21, APP+32 |
PSSNBAPP | DRG+3~, DRG+13*, APP+1, APP+3, APP+4, APP+6, APP+8, APP+12, APP+14, APP+15 , APP+17, APP+19, APP+23, APP+25, APP+26, APP+28, APP+30 |
PSSNBARR | DRG+3~ |
PSSNBARR( | DRG+17 |
PSSNBARR(0 | DRG+16 |
PSSNBARR(1 | APP+1*, APP+4* |
PSSNBARR(10 | APP+21* |
PSSNBARR(11 | APP+23*, APP+26* |
PSSNBARR(12 | APP+25* |
PSSNBARR(13 | APP+28* |
PSSNBARR(14 | APP+30* |
PSSNBARR(15 | APP+32* |
PSSNBARR(16 | APP+34* |
PSSNBARR(2 | APP+3* |
PSSNBARR(3 | APP+6* |
PSSNBARR(4 | APP+8* |
PSSNBARR(5 | APP+10* |
PSSNBARR(6 | APP+12*, APP+15* |
PSSNBARR(7 | APP+14* |
PSSNBARR(8 | APP+17* |
PSSNBARR(9 | APP+19* |
PSSNBARX | DRG+3~, DRG+16*, DRG+17 |
PSSNBGC1 | GCN+1~, GCN+2*, GCN+3, GCN+4, GCN+5, GCN+6 |
PSSNBGC3 | GCN+1~, GCN+2*, GCN+3, GCN+4 |
PSSNBGRS | GCN+1~, GCN+4*, GCN+5 |
PSSNBIN | DRG+3~, DRG+12* |
PSSNBLOW | DRG+3~, DRG+4*, APP+2, APP+3*, APP+5, APP+6*, APP+7, APP+8*, APP+9, APP+10* , APP+11, APP+12*, APP+13, APP+14*, APP+15*, APP+16, APP+17*, APP+18, APP+19*, APP+20 , APP+21*, APP+22, APP+23*, APP+24, APP+25*, APP+26*, APP+27, APP+28*, APP+29, APP+30* , APP+31, APP+32*, APP+33, APP+34* |
PSSNBO3 | DRG+3~, DRG+22*, DRG+23, DRG+24 |
PSSNBOA | DRG+3~, DRG+22*, DRG+23, DRG+24 |
PSSNBOD | DRG+3~, DRG+25* |
PSSNBOF | DRG+3~, DRG+20*, DRG+26* |
PSSNBOI | DRG~, DRG+1, DRG+11, DRG+20, EMS+2, EMSX+3 |
PSSNBOL | DRG+3~, DRG+20*, DRG+21, DRG+22, DRG+25 |
PSSNBOR | DRG~, DRG+1, DRG+2, DRG+18, DRG+27, DREX+1 |
PSSNBPK | DRG~, DRG+1, DRG+2, DRG+7, DRG+8, DRG+9, DRG+10, DRG+22, EMS+1 |
PSSNBRS | DRG+3~, DRG+5*, DRG+17*, DRG+19*, DRG+26*, DRG+27*, DRG+28 |
PSSNBSTP | DRG+3~, DRG+4*, DRG+11, APP+1*, APP+4*, APP+15*, APP+26* |
PSSNONE | DRG+3~ |
PSSNOOIX | INERR+1~, INERR+2*, INERR+3 |
PSSNS1 | DRG+3~, DRG+7*, DRG+8*, DRG+9*, DRG+10*, APP+1, APP+4, APP+12, APP+15, APP+23 , APP+26 |
PSSNS2 | DRG+3~, DRG+7*, DRG+8*, DRG+9*, DRG+10*, APP+3, APP+4, APP+14, APP+15, APP+25 , APP+26 |
PSSNS3 | DRG+3~, DRG+7*, DRG+8*, DRG+9*, DRG+10*, APP+6, APP+17, APP+28 |
PSSNS4 | DRG+3~, DRG+7*, DRG+8*, DRG+9*, DRG+10*, APP+8, APP+19, APP+30 |
PSSWSB1 | ERST+1~, ERST+3*, ERST+5, ERST+6 |
PSSWSB2 | ERST+1~, ERST+3*, ERST+5 |
VA | PAT+1~ |
VADM | PAT+1~ |
VADM(3 | PAT+4 |
VAERR | PAT+1~ |
VAHOW | PAT+1~ |
VAPTYP | PAT+1~ |
VAROOT | PAT+1~ |
X | PAT+1~, PAT+4!, PAT+8!, PAT+9, PAT+12!, PAT+13 |
X1 | PAT+1~, PAT+4* |
X2 | PAT+1~, PAT+4* |