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

Package: Pharmacy Data Management

Routine: PSSUTIL1


Information

PSSUTIL1 ;BIR/RTR-Utility routine ;08/21/00

Source Information

Source file <PSSUTIL1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
National Drug File 1 $$DFSU^PSNAPIS  
VA FileMan 1 $$GET1^DIQ  

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

Package Total Caller Graph
Order Entry Results Reporting 9 ORBCMA1  ORCACT03  ORCDLG  ORCDPS1  ORCDPS2  ORCDPSIV  ORDV06D  ORKCHK5  
ORWDPS1  
Outpatient Pharmacy 7 PSODIR1  PSOHELP1  PSOHLSN1  PSOHLSNC  PSOORNW1  PSOSIGDS  PSOUTIL  
Inpatient Medications 1 PSJHL3  
Pharmacy Data Management 1 PSSDDUT2  

Entry Points

Name Comments DBIA/ICR reference
EN(PSSDRIEN) ;
  • ICR #3179
    • Status: Active
    • Usage: Private
    DRG(PSSDD,PSSOI,PSSPK) ;
    ; PSSDD - Array of Drugs
    ; PSSOI - Orderable Item (Pharmacy)
    ; PSSPK - Application Package ("O"-Outpatient;"I"-IV;"X"-Non-VA Med)
  • ICR #3239
    • Status: Active
    • Usage: Private
    ITEM(PSSIT,PSSDR) ;Return Orderable Item to CPRS
  • ICR #3239
    • Status: Active
    • Usage: Private
    EN1(PSSOA,PSSOAP) ;
  • ICR #3239
    • Status: Active
    • Usage: Private
    SCH(SCH) ;Expand schedule for Outpatient order in CPRS
  • ICR #3239
    • Status: Active
    • Usage: Private
    SCHQT ;
    IVDEA(PSSIVOI,PSSIVOIP) ;CS Federal Schedule/DEA Special Handling to CPRS for IV Fluids dialogue
  • ICR #3784
    • Status: Active
    • Usage: Private
    IVQ ;
    CSS
    OIQ
    IVQ1 ;
    IVX ;
    MAXDS(INPUT) ; Returns the Maximum Day Supply to CPRS for a specific Drug or Orderable Item
    ; Input: INPUT("PSOI") - PHARMACY ORDERABLE ITEM (#50.7) IEN
    ; INPUT("DRUG") - DRUG file (#50) IEN
  • ICR #3239
    • Status: Active
    • Usage: Private
    MXDAYSUP(DRUG) ; Returns the Maximum Day Supply for the Dispense Drug
    ; Input: DRUG - Pointer to the DRUG file (#50)
  • ICR #6229
    • Status: Active
    • Usage: Private

    External References

    Name Field # of Occurrence
    $$GET1^DIQ MXDAYSUP+10, MXDAYSUP+12, MXDAYSUP+14, MXDAYSUP+18
    $$DFSU^PSNAPIS EN+4

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^PSDRUG - [#50] GET1^DIQ
    ^PSNDF(50.68 - [#50.68] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(50.607 - [#50.607] EN+5
    ^PS(50.7 - [#50.7] ITEM+3, EN1+12, EN1+13
    ^PS(51 - [#51] SCH+7, SCH+15
    ^PS(51.1 - [#51.1] SCH+5, SCH+13
    ^PS(52.6 - [#52.6] IVDEA+25
    ^PS(52.7 - [#52.7] IVDEA+27
    ^PSDRUG - [#50] EN+3, EN+4, DRG+9, DRG+11, DRG+13, DRG+15, ITEM+3, ITEM+4, EN1+8, EN1+9
    , EN1+15, EN1+16, EN1+17, EN1+18, IVDEA+20, IVDEA+21, IVX+2, IVX+3, MXDAYSUP+8, MXDAYSUP+22
    ^PSDRUG("A526" IVDEA+24
    ^PSDRUG("A527" IVDEA+26
    ^PSDRUG("ASP" DRG+8, EN1+7, EN1+14, IVDEA+19, MAXDS+10
    ^PSNDF(50.68 - [#50.68] IVX+4

    Label References

    Name Line Occurrences
    $$MXDAYSUP MAXDS+6, MAXDS+11
    CSS IVQ+1
    IVQ1 IVDEA+18
    IVX IVDEA+25, IVDEA+27
    SCHQT SCH+3, SCH+6, SCH+7, SCH+9

    Naked Globals

    Name Field # of Occurrence
    ^( SCH+7, SCH+15
    ^("DOS" EN+3
    ^("I" EN1+15, IVDEA+20, IVDEA+25, IVDEA+27
    ^("ND" EN+4, IVX+3
    ^(0 EN1+13, SCH+5, SCH+13
    ^(2 DRG+9, EN1+18, IVDEA+21
    ^(7 IVX+4

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DEASPHLG MXDAYSUP+4~, MXDAYSUP+18*, MXDAYSUP+19, MXDAYSUP+20
    DRG MAXDS+5~, MAXDS+9*, MAXDS+10*, MAXDS+11
    DRGMAXDS MAXDS+5~, MAXDS+11*, MXDAYSUP+4~, MXDAYSUP+10*, MXDAYSUP+15, MXDAYSUP+16
    DRUG MXDAYSUP~, MXDAYSUP+8, MXDAYSUP+10, MXDAYSUP+12, MXDAYSUP+18, MXDAYSUP+22
    DT DRG+10, EN1+13, EN1+15, IVDEA+20, IVDEA+25, IVDEA+27
    INPUT MAXDS~
    INPUT("DRUG" MAXDS+6
    INPUT("PSOI" MAXDS+8, MAXDS+10
    MAXDS MAXDS+5~, MAXDS+7*, MAXDS+11*, MAXDS+12
    MXDAYSUP MXDAYSUP+4~, MXDAYSUP+6*, MXDAYSUP+8, MXDAYSUP+10*, MXDAYSUP+15*, MXDAYSUP+16*, MXDAYSUP+19*, MXDAYSUP+20*, MXDAYSUP+22*, MXDAYSUP+24
    NDFMAXDS MXDAYSUP+4~, MXDAYSUP+14*, MXDAYSUP+15, MXDAYSUP+16
    PSSAP DRG+5~, DRG+9*, DRG+13, DRG+14
    PSSDD DRG~
    PSSDD( DRG+13*, DRG+15*
    PSSDR ITEM~, ITEM+2, ITEM+3, ITEM+4
    PSSDRIEN EN~, EN+2, EN+3, EN+4
    PSSGD IVDEA+15~
    PSSGD( IVQ+2, IVX+2*
    PSSI IVDEA+15~
    PSSI( IVQ+5*, IVQ+7*, CSSIVX+4*
    PSSI("" IVQ+1
    PSSI(1 IVQ+3*
    PSSI(2 IVQ+4*
    PSSI(3 IVQ+6*
    PSSI(4 IVQ+8*
    PSSI(5 IVQ+9*
    PSSIN DRG+5~, DRG+9*, DRG+10
    PSSIT ITEM~, ITEM+2, ITEM+3, ITEM+5, ITEM+6
    PSSIVDD IVDEA+15~, IVDEA+16*, IVDEA+22*, OIQIVQ1+1, IVX+1*
    PSSIVDEA IVDEA+15~, IVX+2*
    PSSIVDO IVDEA+15~, IVDEA+16*, CSS*, OIQ*, OIQ+1*, OIQ+2*, OIQ+3, IVQ1+1*, IVQ1+2
    PSSIVL IVDEA+15~, IVDEA+19*, IVDEA+20, IVDEA+21, IVDEA+24, IVDEA+26, IVX+2, IVX+3
    PSSIVLP IVDEA+15~, IVDEA+24*, IVDEA+25, IVDEA+26*, IVDEA+27
    PSSIVLPX IVDEA+15~, IVDEA+24*, IVDEA+26*, IVQ+2*, IVQ+3, IVQ+4, IVQ+5, IVQ+6, IVQ+7, IVQ+8
    IVQ+9, IVX+1*
    PSSIVOI IVDEA~, IVDEA+18, IVDEA+19
    PSSIVOIP IVDEA~, IVDEA+17*, IVDEA+23
    PSSK IVDEA+15~, CSS*, IVX+3*, IVX+4*
    PSSL DRG+5~, DRG+8*, DRG+9, DRG+11, DRG+13, DRG+15
    PSSMA EN+1~, EN+10*, EN+12
    PSSMA1 EN+1~, EN+10*
    PSSMASH EN+1~, EN+7*, EN+8*, EN+9
    PSSMASH2 EN+1~, EN+11*
    PSSMASH3 EN+1~, EN+11*, EN+12
    PSSMB EN+1~, EN+10*, EN+12
    PSSMB1 EN+1~, EN+10*, EN+11, EN+12
    PSSMNDFS EN+1~, EN+4*, EN+6, EN+8, EN+11, EN+13
    PSSMSSTR EN+1~, EN+3*, EN+6, EN+8, EN+9, EN+11, EN+13
    PSSMUNIT EN+1~, EN+3*, EN+4*, EN+5, EN+6, EN+9
    PSSNAT1 EN+1~, EN+4*
    PSSNAT3 EN+1~, EN+4*
    PSSND DRG+5~, DRG+11*, DRG+13, DRG+15
    PSSNEW ITEM+1~, ITEM+4*, ITEM+5, ITEM+6
    PSSNODEU EN+1~, EN+4*
    PSSOA EN1~, EN1+4, EN1+7, EN1+10
    PSSOA( EN1+11, EN1+14, EN1+17*, EN1+18*
    PSSOADT EN1+6~
    PSSOAIT EN1+6~, EN1+9*, EN1+10, EN1+11, EN1+12, EN1+13, EN1+14, EN1+17, EN1+18
    PSSOAL EN1+6~, EN1+7*, EN1+8, EN1+9
    PSSOALD EN1+6~, EN1+8*, EN1+9
    PSSOAN EN1+6~, EN1+9*
    PSSOAP EN1~, EN1+5, EN1+17
    PSSOAZ EN1+6~, EN1+14*, EN1+15, EN1+16, EN1+17, EN1+18
    PSSOI DRG~, DRG+6, DRG+8
    PSSPK DRG~, DRG+7, DRG+12, DRG+13
    PSSUNX EN+1~, EN+12*, EN+13
    PSSUNZ EN+1~, EN+5*, EN+6, EN+9, EN+10
    SCH SCH~, SCH+2, SCH+3, SCH+5, SCH+7, SCH+8, SCH+9, SCH+11, SCHQT+1*
    SCHEX SCH+1~, SCH+2*, SCH+5*, SCH+7*, SCH+9*, SCH+16*, SCHQT+1
    SCIN SCH+1~, SCH+11*, SCH+13, SCH+15
    SCLHOLD SCH+1~, SCH+11!
    SCLHOLD( SCH+11*, SCH+13*, SCH+15*, SCH+16
    SCLOOP SCH+1~, SCH+5*, SCH+8*, SCH+9, SCH+10*, SCH+11, SCH+16
    SCLP SCH+1~, SCH+8*
    SCLPS SCH+1~, SCH+8*
    SODL SCH+1~, SCH+11*, SCH+12, SCH+13, SCH+15
    SQFLAG SCH+1~, SCH+2*, SCH+5*, SCH+6, SCH+13*, SCH+14, SCH+16*
    SST SCH+1~, SCH+13*, SCH+16*
    VAPRDIEN MXDAYSUP+4~, MXDAYSUP+12*, MXDAYSUP+13, MXDAYSUP+14
    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