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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSOSIGDS

Package: Outpatient Pharmacy

Routine: PSOSIGDS


Information

PSOSIGDS ;BIR/RTR - Utility to calculate Days Supply ;May 04, 2021@09:52:11

Source Information

Source file <PSOSIGDS.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Outpatient Pharmacy 2 (QTS,SCH)^PSOSIG  EN^PSOSIGMX  
VA FileMan 2 FIND^DIC  $$GET1^DIQ  
Kernel 1 $$FMADD^XLFDT  
Pharmacy Data Management 1 $$MXDAYSUP^PSSUTIL1  

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

Package Total Caller Graph
Order Entry Results Reporting 5 ORBCMA1  ORCDPS1  ORWDPS1  ORWDPS2  ORWDPS33  
Outpatient Pharmacy 5 PSODIR1  PSOOTMRX  PSOSIG  PSOSIGCX  PSOSIGTX  
Controlled Substances 2 PSDDSOR  PSDDSOR2  
VistA Integration Adapter 1 VIABRPC  

Entry Points

Name Comments DBIA/ICR reference
EN(PSOSIGX) ;
SCH ;*282 Centralized Call
QTY(PSOQX) ;
QTYOPS ;
QTYCP ;CPRS days supply call comes through here
COMP ;COMPLEX DOSE HERE
QTS ;*282 Centralized Call
QEND ;
ROUND ;
RXP ;Compare against Rx Patient Status
CLOZ ;check for clozapine
DAY(DATE) ;First 5 digits of FileMan date
QTYX(PSOQX) ;
DSUP(PSOQX) ;Default Days Supply for CPRS, without QTY (just patient and drug)
  • ICR #3278
    • Status: Active
    • Usage: Private
    DSUPDG ;
    MAX(PSOQX) ;
  • ICR #3278
    • Status: Active
    • Usage: Private
    CSDS(DR) ;

    External References

    Name Field # of Occurrence
    FIND^DIC DSUPDG+8
    $$GET1^DIQ DSUPDG+7
    QTS^PSOSIG QTS+1
    SCH^PSOSIG SCH+1
    EN^PSOSIGMX MAX+1
    $$MXDAYSUP^PSSUTIL1 DSUP+4, DSUP+9
    $$FMADD^XLFDT DAY+5

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^PS(55 - [#55] GET1^DIQ
    ^YSCL(603.01 - [#603.01] FIND^DIC

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(53 - [#53] RXP+4, DSUP+20
    ^PS(55 - [#55] RXP+3, DSUP+19
    ^PSDRUG - [#50] CLOZ+3, DSUP+8, DSUP+11, DSUPDG+3, CSDS+2, CSDS+3
    ^PSDRUG("ASP" DSUP+7
    ^PSNDF(50.68 - [#50.68] CSDS+2
    ^YSCL(603.01 - [#603.01] CLOZ+4, CLOZ+5, CLOZ+7, DSUPDG+11

    Label References

    Name Line Occurrences
    $$CSDS DSUP+4, DSUP+14
    CLOZ RXP+3, RXP+4
    COMP QTYCP+7
    DSUPDG DSUP+19, DSUP+20
    QEND QTYCP+23, COMP+13, COMP+17, COMP+28, COMP+29, COMP+30, COMP+31, COMP+32, COMP+35
    QTS QTYCP+14, COMP+20
    QTYCP QTYX+5
    ROUND QTYCP+23, COMP+31, COMP+34
    RXP ROUND+2

    Naked Globals

    Name Field # of Occurrence
    ^("ND" CSDS+2
    ^(2 DSUP+11

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CS DSUP+3~*, DSUP+4*, DSUP+10, DSUP+14*, DSUP+15, CSDS+2*, CSDS+3*, CSDS+4
    DATE DAY~, DAY+2, DAY+3, DAY+4
    DR DSUP+3~*, DSUP+4, DSUP+6, DSUP+7*, DSUP+8, DSUP+9, DSUP+11, DSUP+14, DSUPDG+2, DSUPDG+3
    , CSDS~, CSDS+1, CSDS+2, CSDS+3
    DRMXDS DSUP+3~, DSUP+9*
    DT DSUP+12
    IDT DSUP+7~, DSUP+11*, DSUP+12
    MXDS DSUP+3~*, DSUP+4*, DSUP+9*, DSUP+16
    OI DSUP+3~, DSUP+6*, DSUP+7
    OIISCLOZ DSUP+3~*, DSUP+7, DSUP+8*, DSUPDG+3
    PAC DSUP+7~, DSUP+11*, DSUP+13
    PSO55 RXP+2~, RXP+3*, RXP+4, DSUP+18~, DSUP+19*, DSUP+20
    PSO553 RXP+2~, RXP+4*, RXP+5, DSUP+18~, DSUP+20*, DSUP+21
    PSOCLMAX CLOZ+1~, CLOZ+8*, CLOZ+10, DSUPDG+1~, DSUPDG+14*, DSUPDG+16
    PSOCLPAT CLOZ+1~, CLOZ+4*, CLOZ+5*, CLOZ+7*, CLOZ+8, DSUPDG+1~, DSUPDG+9*, DSUPDG+11*, DSUPDG+13*, DSUPDG+14
    PSOCPRQT QTYCP+3, QTYCP+5, QTYX+1~*, QTYX+8!
    PSOCZPTS DSUPDG+5~
    PSOCZPTS("DILIST" DSUPDG+9
    PSODFN DSUPDG+5~, DSUPDG+6*, DSUPDG+7, DSUPDG+8
    PSODSMIN COMP+1~, COMP+10*
    PSODUDIF COMP+1~, COMP+10*
    PSODUMIS COMP+1~, COMP+10*, COMP+15, COMP+16*, COMP+17, COMP+30, COMP+31
    PSODUPTT COMP+1~, COMP+27*, COMP+30, COMP+32, COMP+33*
    PSODUREP COMP+1~, COMP+10*, COMP+16*, COMP+33
    PSODUTOT COMP+1~, COMP+10*, COMP+24*, COMP+31, COMP+34*
    PSODUX COMP+1~
    PSODUXX COMP+1~
    PSOERR DSUPDG+5~
    PSOFRQ QTYCP+2!, QTYCP+14, QTYCP+20, COMP+20, COMP+25, COMP+26, QEND+1!
    PSOFRQZ COMP+1~, COMP+25*, COMP+32, COMP+33
    PSOLEFT COMP+1~, COMP+33*, COMP+34
    PSOLOWER QTYCP+1~, QTYCP+9*, QTYCP+13*, QTYCP+15, QTYCP+21
    PSOLOWST QTYCP+1~
    PSOLOWX QTYCP+1~, QTYCP+11*, QTYCP+12
    PSOLOWXL QTYCP+1~, QTYCP+12*, QTYCP+13
    PSOQAR QTYX+1~
    PSOQAR("DURATION" QTYX+2*, QTYX+6, QTYX+7
    PSOQLD COMP+2~, COMP+12*
    PSOQLDA COMP+2~, COMP+10*, COMP+12*, COMP+13
    PSOQLDT COMP+2~, COMP+10*, COMP+12*
    PSOQLDX COMP+2~, COMP+10*, COMP+12*, COMP+13
    PSOQLN QTYX+1~, QTYX+3*
    PSOQLP QTYX+1~*, QTYX+2, QTYX+3, QTYX+6*, QTYX+7
    PSOQRND QTYCP+1~
    PSOQUTOT COMP+1~, COMP+14*, COMP+29, COMP+30, COMP+32, COMP+33
    PSOQX QTY~, QTYX~, DSUP~, MAX~
    PSOQX("CONJUNCTION" COMP+12
    PSOQX("DAYS S UPPLY" , ROUND+2*, ROUND+3*, RXP+5*, CLOZ+10*, DSUP+15*, DSUP+16*, DSUP+21*, DSUPDG+16*
    PSOQX("DOSE O RDERED" , QTYCP+3, QTYCP+8, QTYCP+19, COMP+19, COMP+27, COMP+33, QTYX+4
    PSOQX("DOSE" QTYCP+3
    PSOQX("DRUG" CLOZ+2, CLOZ+3, DSUP+3
    PSOQX("DURATION" QTYCP+10, QTYCP+11, QTYCP+12, QTYCP+13, COMP+16, COMP+21, COMP+22, COMP+23, COMP+24, COMP+25
    , QTYX+1, QTYX+2, QTYX+3*, QTYX+7*
    PSOQX("OI" DSUP+6
    PSOQX("PATIENT" RXP+1, RXP+3, CLOZ+4, DSUP+17, DSUP+19, DSUPDG+6
    PSOQX("QTY" QTYCP+19, COMP+14
    PSOQX("SCHEDULE" QTYCP+14, COMP+19, COMP+20
    PSOSIGX EN~
    PSOZMIN QTYCP+1~, QTYCP+18*, QTYCP+19*, QTYCP+20*, QTYCP+21*, QTYCP+22*, COMP+1~, COMP+31*, COMP+34*, ROUND+1
    , ROUND+2, ROUND+3
    PSQ QTYCP+1~, QTYCP+3*, COMP+18*, COMP+19, COMP+20, COMP+21, COMP+22, COMP+23, COMP+24, COMP+25
    , COMP+27
    PSQ1 COMP+1~, COMP+15*, COMP+16
    PSQMIN QTYCP+1~, QTYCP+15*, COMP+23*, COMP+26
    PSQMINZ QTYCP+1~, COMP+26*, COMP+27
    PSQMNL COMP+1~, COMP+21*, COMP+22
    PSQMNLX COMP+1~, COMP+22*, COMP+23, COMP+24
    PSQQUIT QTYCP+1~, QTYCP+2*, QTYCP+3*, QTYCP+5, QTYCP+14, COMP+18, COMP+19*, COMP+20*, COMP+28
    QDOSE QTYOPS+1~, QTYCP+3*, QTYCP+6, QTYCP+7, COMP+12, COMP+15, COMP+18, QTYX+1~, QTYX+4*
    QDOSEX QTYX+1~, QTYX+4*
    QTSH QTYCP+1~, QTYCP+14*, COMP+20*
    VARIABLE EN+1~
    X DAY+1~, DAY+3*, DAY+4*, DAY+5
    YSCLPSN DSUPDG+1~, DSUPDG+7*, DSUPDG+13
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All