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: PSJAPIDS

Package: Inpatient Medications

Routine: PSJAPIDS


Information

PSJAPIDS ;BIR/MV - API TO PROCESS DOSING ORDER CHECKS FOR IV ;6 Jun 07 / 3:37 PM

Source Information

Source file <PSJAPIDS.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Pharmacy Data Management 3 ($$DRT,DOSE)^PSSDSAPD  $$FRQ^PSSDSAPI  IN^PSSHRQ2  
Inpatient Medications 2 IN^PSIVOCDS  ($$ADDD,$$GCN,$$SOLDD)^PSJMISC  
Kernel 1 $$UP^XLFSTR  
VA FileMan 1 NOW^%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: 2

Package Total Caller Graph
Inpatient Medications 1 PSJOCDS  
Order Entry Results Reporting 1 ORDSGCHK  

Entry Points

Name Comments DBIA/ICR reference
DOSE(PSJBASE,DFN,PSJIV) ;
  • ICR #5385
    • Status: Active
    • Usage: Private
    CHKDS() ;Check if dosing check should be performed
    SETDRG ;
    SETAD(PSJOI,PSJOINM,PSJFLG) ;Check if additive is active then set the DRG array
    SETSOL(PSJOI,PSJOINM,PSJFLG) ;Check if solution is active then set then DRG array
    SETENH(PSJFLG,PSJOI) ;Reset PSJFLG to 0 only if GCN message is needed for the dosing check
    ENHFLG ;Set the enhance flag so dosing error message won't display if enhance OC already displayed.
    DURATION(PSJDUR,PSJSCH) ;Figure out date dose limit send by CPRS for intermittent IV
    DOW(PSJSCH) ;Check if Schedule is a date of week
    PING() ;Return -1 if the system is down.

    External References

    Name Field # of Occurrence
    NOW^%DTC SETDRG+2
    IN^PSIVOCDS DOSE+32
    $$ADDD^PSJMISC SETAD+8
    $$GCN^PSJMISC SETENH+9
    $$SOLDD^PSJMISC SETSOL+8
    $$DRT^PSSDSAPD DOSE+31, DURATION+13
    DOSE^PSSDSAPD DOSE+35
    $$FRQ^PSSDSAPI DURATION+15
    IN^PSSHRQ2 PING+2
    $$UP^XLFSTR DOSE+25, DURATION+8

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(51.1 - [#51.1] DOW+5, DOW+6, DOW+7
    ^PSDRUG("ASP" SETENH+8
    ^TMP($J DOSE+10*, DOSE+14!, DOSE+36!, PING+1*, PING+3

    Label References

    Name Line Occurrences
    $$CHKDS DOSE+35
    $$DOW DURATION+12
    $$PING DOSE+8
    $$SETENH CHKDS+7
    DURATION DOSE+29
    ENHFLG DOSE+33
    SETAD SETDRG+5
    SETDRG DOSE+22
    SETSOL SETDRG+6

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % SETDRG+1~, SETDRG+2
    DFN DOSE~, DOSE+12, DOSE+35
    DRG DOSE+7~
    DRG("AD" SETAD+12*
    DRG("SOL" SETSOL+12*
    P DOSE+7~
    P("DTYP" DOSE+15*, DOSE+29, DOSE+31
    P("MR" DOSE+16*
    P(11 DOSE+20*
    P(15 DOSE+21*
    P(8 DOSE+17*
    P(9 DOSE+18*, DOSE+29
    PSGDT SETDRG+1~, SETDRG+2*
    PSIVAS DOSE+7~, SETDRG+3*, SETDRG+4, SETDRG+5, SETDRG+6
    PSIVIEN SETAD+7~, SETAD+10*, SETAD+12, SETSOL+7~, SETSOL+10*, SETSOL+12
    PSIVNM DOSE+7~
    PSIVTDUR DOSE+7~, DOSE+25*, DOSE+26, DOSE+27*, DOSE+29, DOSE+31
    PSIVX SETDRG+1~, SETDRG+3*, SETDRG+4
    PSIVX0 SETDRG+1~, SETDRG+4*, SETDRG+5, SETDRG+6, SETAD+6, SETAD+12, SETSOL+6, SETSOL+8, SETSOL+12, SETSOL+14
    PSJADDD SETAD+7~, SETAD+8*, SETAD+9, SETAD+10, SETAD+13
    PSJBASE DOSE~, DOSE+35
    PSJBASE( DOSE+9, DOSE+10, DOSE+14
    PSJBASE(1 DOSE+14, DOSE+32
    PSJCNT SETDRG+1~, SETDRG+3*, SETAD+11*, SETAD+12, SETSOL+11*, SETSOL+12, DURATION+5~, DURATION+15*, DURATION+16, DURATION+17
    PSJCNTP1 DURATION+5~, DURATION+16*
    PSJCNTP2 DURATION+5~, DURATION+17*, DURATION+18, DURATION+19, DURATION+20
    PSJCNTP3 DURATION+5~, DURATION+18*, DURATION+19*, DURATION+20*, DURATION+29, DURATION+30, DURATION+31
    PSJCNTP4 DURATION+5~, DURATION+18*, DURATION+19*, DURATION+20*, DURATION+22, DURATION+23, DURATION+24
    PSJDD DOSE+7~, SETDRG+1~, SETENH+1~, SETENH+8*, SETENH+9, DURATION+15
    PSJDDFLG SETENH+1~, SETENH+7*, SETENH+8, SETENH+9*, SETENH+10
    PSJDOW DURATION+5~, DURATION+12*, DURATION+15, DOW+2~, DOW+4*, DOW+5, DOW+6*, DOW+8
    PSJDUR DURATION~, DURATION+6, DURATION+8*, DURATION+10, DURATION+13, DURATION+23, DURATION+24, DURATION+27, DURATION+31
    PSJDUR1 DURATION+5~, DURATION+11*, DURATION+13*, DURATION+15, DURATION+30, DURATION+34
    PSJFDB DOSE+7~, DOSE+35
    PSJFDB( CHKDS+5, CHKDS+6, CHKDS+7, ENHFLG+2, ENHFLG+4, ENHFLG+6*, ENHFLG+7, ENHFLG+8*
    PSJFDB("PACKAGE" DOSE+35*
    PSJFDB(1 CHKDS+3
    PSJFLG CHKDS+2~, CHKDS+4*, CHKDS+5, CHKDS+6*, CHKDS+7*, CHKDS+8, SETAD~, SETAD+13, SETSOL~, SETSOL+13
    , SETENH~, SETENH+2, SETENH+3, SETENH+4
    PSJFOUND DOW+2~, DOW+4*, DOW+7*, DOW+9
    PSJIV DOSE~
    PSJIV( SETDRG+3, SETDRG+4
    PSJIV("DOSE_CNT" DURATION+27*, DURATION+33*
    PSJIV("DRG" SETAD+13*, SETSOL+13*, ENHFLG+8
    PSJIV("DUR" DOSE+23*, DOSE+31*, DURATION+13*, DURATION+26*, DURATION+34*
    PSJIV("INF_RATE" DOSE+17
    PSJIV("IV_TYPE" DOSE+11, DOSE+15, DOSE+34
    PSJIV("MR_IEN" DOSE+16
    PSJIV("OI_ERROR" SETAD+9*, SETSOL+9*, ENHFLG+6
    PSJIV("SCHEDULE" DOSE+18
    PSJIV("TOT_VOL" DOSE+23*, DOSE+26*, DOSE+27*
    PSJIV("TVOL_DUR" DOSE+24, DOSE+25
    PSJOCDS DOSE+7~, DOSE+35
    PSJOCDS("CONTEXT" DOSE+34*
    PSJOI SETAD~, SETAD+5, SETAD+8, SETAD+9, SETSOL~, SETSOL+5, SETSOL+8, SETSOL+9, SETENH~, SETENH+4
    , SETENH+8
    PSJOINM SETAD~, SETAD+9, SETSOL~, SETSOL+9, ENHFLG+1~, ENHFLG+4*, ENHFLG+5, ENHFLG+6
    PSJSCH DURATION~, DURATION+7, DURATION+12, DURATION+15, DOW~, DOW+3, DOW+5, DOW+10
    PSJSCHNO DOW+2~, DOW+5*, DOW+6, DOW+7
    PSJSOLDD SETSOL+7~, SETSOL+8*, SETSOL+9, SETSOL+10, SETSOL+13
    PSJTOTVL DOSE+7~, DOSE+13*, SETSOL+14*
    PSJX CHKDS+2~, CHKDS+5*, CHKDS+6, CHKDS+7, ENHFLG+1~, ENHFLG+2*, ENHFLG+4, ENHFLG+6, ENHFLG+7, ENHFLG+8
    , DURATION+5~, DURATION+24*, DURATION+25*, DURATION+26, DURATION+31*, DURATION+32*, DURATION+33
    U SETDRG+5, SETDRG+6, SETAD+9, SETAD+10, SETAD+12, SETSOL+8, SETSOL+9, SETSOL+10, SETSOL+12, SETSOL+14
    ENHFLG+6, DURATION+16, DURATION+17
    X DOSE+7~, DOSE+9*, DOSE+10, DOSE+14*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All