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 |  Local Variables |  All
Print Page as PDF
Routine: PSOTPCUL

Package: Outpatient Pharmacy

Routine: PSOTPCUL


Information

PSOTPCUL ;BIR/RTR-Utility Routine for TBP Project ;08/09/03

Source Information

Source file <PSOTPCUL.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Outpatient Pharmacy 4 PSO160P1  PSO160P2  PSOTPINA  PSOTPRP1  
Order Entry Results Reporting 1 ORPRPM  

Entry Points

Name Comments DBIA/ICR reference
ACTRX(DFN,TPB) ; Checks if Patient has at least one Active Rx on File
; Input: DFN: Patient IEN (#2)
; TPB: 0 - Looks for active VA prescriptions only (Default)
; 1 - Looks for active TPB prescriptions only
; 2 - Looks for active VA or TPB prescriptions
ACTIVE(RX) ; Checks if Rx is Active or not
TPBSC(LOC) ; Checks if Location Stop Code is from TPB Clinic
SXMY(GRP) ; Set XMY array with users from Mail Group GRP
EN(PSOTRXN) ;CPRS call to determine if an RX is a TPB Rx
  • ICR #4195
    • Status: Active
    • Usage: Private

    External References

    Name Field # of Occurrence
    $$GET1^DIQ SXMY+5

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^XMB(3.8 - [#3.8] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(40.7 - [#40.7] TPBSC+5, TPBSC+6
    ^PS(55 - [#55] ACTRX+10, ACTRX+11
    ^PSRX - [#52] EN+4, ACTRX+11, ACTIVE+2, ACTIVE+3
    ^SC - [#44] TPBSC+4
    ^XMB(3.8 - [#3.8] SXMY+4, SXMY+7

    Label References

    Name Line Occurrences
    $$ACTIVE ACTRX+12

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ACTRX ACTRX+7~, ACTRX+9*, ACTRX+10, ACTRX+13*, ACTRX+14*, ACTRX+15*, ACTRX+17
    C1 TPBSC+2~, TPBSC+5*, TPBSC+7*, TPBSC+8
    C2 TPBSC+2~, TPBSC+6*, TPBSC+7*, TPBSC+8
    CDRIEN SXMY+1~, SXMY+5*, SXMY+6
    CODE TPBSC+2~
    CODE( TPBSC+3*, TPBSC+8
    DFN ACTRX~, ACTRX+8, ACTRX+10, ACTRX+11
    DT ACTIVE+3
    EXPDT ACTRX+7~, ACTIVE+1~, ACTIVE+3*
    GRP SXMY~, SXMY+3, SXMY+4
    GRPIEN SXMY+1~, SXMY+4*, SXMY+5, SXMY+7
    I TPBSC+2~, TPBSC+3*
    J TPBSC+2~, TPBSC+3*
    LOC TPBSC~, TPBSC+4
    MBRIEN SXMY+1~, SXMY+6*, SXMY+7*, SXMY+8
    PSOTRXN EN~, EN+3, EN+4
    RX ACTRX+11*, ACTRX+12, ACTIVE~, ACTIVE+2, ACTIVE+3
    RXSTS ACTIVE+1~, ACTIVE+2*
    SEQ ACTRX+7~, ACTRX+9*, ACTRX+10*, ACTRX+11
    TPB ACTRX~, ACTRX+9*, ACTRX+13, ACTRX+14, ACTRX+15
    TPBRX ACTRX+11*, ACTRX+14, ACTRX+15, ACTIVE+1~
    U TPBSC+5, TPBSC+6
    XMY SXMY+6!
    XMY( SXMY+6*, SXMY+8*
    Z0 TPBSC+2~, TPBSC+4*, TPBSC+5, TPBSC+6
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All