Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSSDSAPM

Package: Pharmacy Data Management

Routine: PSSDSAPM


Information

PSSDSAPM ;BIR/RTR-Dose Check utilities routine ;09/13/10

Source Information

Source file <PSSDSAPM.m>

Call Graph

Call Graph

Call Graph Total: 11

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 7

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  

Entry Points

Name Comments DBIA/ICR reference
DRG(PSSNBOI,PSSNBPK,PSSNBOR) ;
  • ICR #5570
    • Status: Active
    • Usage: Controlled Subscription
    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

    External References

    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

    Global Variables Directly Accessed

    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*

    Label References

    Name Line Occurrences
    $$DREX DRG+11
    $$DRG FDRUG+3
    $$EMS DRG+27
    $$EMSX DRG+27
    $$GCN DRG+14
    ADDCTB ADDCT+2
    APP DRG+15
    DSPL DSP+5, DSP+10, DSPRT+8, DSPRT+9, DSPRT+10, DSPRT+11, DSPRT+12
    DSPRT DSP+17, DSPRT+13
    MLT MLT+2
    MLTS MLT+6, MLT+8
    STDB INERR+3, NXDRUG+3, NXDRUG+4

    Local Variables

    Legend:

    >> 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*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All