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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSODDPR8

Package: Outpatient Pharmacy

Routine: PSODDPR8


Information

PSODDPR8 ;BIR/SAB - display enhanced order checks ;11 May 2010 9:06 AM

Source Information

Source file <PSODDPR8.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Outpatient Pharmacy 7 (,MON,RDI)^PSODDPR3  ^PSODDPR7  PRSTAT^PSODDPRE  STAT^PSOFUNC  (BLD,NVA)^PSOORDRG  FSIG^PSOUTLA  EN2^PSOUTLA1  
Inpatient Medications 1 ENCHK^PSJORUT2  
National Drug File 1 $$PROD0^PSNAPIS  
Pharmacy Data Management 1 $$SUP^PSSDSAPI  
Toolkit 1 $$GETVUID^XTID  
VA FileMan 1 ^DIR  

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
Order Entry Results Reporting 1 ORKPS  
Outpatient Pharmacy 1 PSODDPR2  

Entry Points

Name Comments DBIA/ICR reference
DUP ;display drug interaction, clinical effects, and call to display monograph
PEND
DDRX ;
DDRX1 ;
CL
FT ;format text
HD(PSOLINES,OVRRID) ;
CPRS(PSODFN,PSODSULS,PSODSUOI,PSODSUTY,PSODSUAG) ;
  • ICR #5784
    • Status: Active
    • Usage: Private
    PNODE ;Set prospective node for duplicate supply check for CPRS

    External References

    Name Field # of Occurrence
    ^DIR HD+5
    ENCHK^PSJORUT2 CPRS+26
    $$PROD0^PSNAPIS PNODE+4
    ^PSODDPR3 DUP+8
    MON^PSODDPR3 CL+8
    RDI^PSODDPR3 DUP+12
    ^PSODDPR7 DUP+7
    PRSTAT^PSODDPRE DDRX+10
    STAT^PSOFUNC DDRX+2
    BLD^PSOORDRG CPRS+26
    NVA^PSOORDRG CPRS+26
    FSIG^PSOUTLA PEND+5, DDRX+4
    EN2^PSOUTLA1 DDRX+5
    $$SUP^PSSDSAPI CPRS+20
    $$GETVUID^XTID PNODE+3

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: @IOF,PSONULN,!,"***"_SEV_"*** Drug Interaction with Prospective Drug:",!?20,PDRG_" and",!
    • Line Location: DUP+5
    Function Call: WRITE
    • Prompt: !
    • Line Location: DUP+6
    Function Call: WRITE
    • Prompt: !?2,"*** Refer to MONOGRAPH for SIGNIFICANT INTERACTION CLINICAL EFFECTS",!
    • Line Location: CL+2
    Function Call: WRITE
    • Prompt: !
    • Line Location: CL+3
    Function Call: WRITE
    • Prompt: ?2,BSIG(I),!
    • Line Location: CL+6
    Function Call: WRITE
    • Prompt: !
    • Line Location: HD+5
    Routine Call
    • DIR
    • Line Location:
      • HD+5

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(50.606 - [#50.606] PEND+3
    ^PS(50.7 - [#50.7] PEND+3
    ^PS(52.41 - [#52.41] PEND+1, PEND+2
    ^PSDRUG - [#50] PEND+4, DDRX+2, CPRS+15, CPRS+16, CPRS+21, PNODE+2, PNODE+4
    ^PSDRUG("ASP" CPRS+14
    ^PSRX - [#52] DDRX+1, DDRX+4, DDRX+5, DDRX+10
    ^TMP($J DUP+2, DUP+3, CL+4, CL+5, CL+8, CPRS+25!, CPRS+26, CPRS+29, CPRS+30, CPRS+33
    , CPRS+34*, CPRS+35!, PNODE+5*

    Label References

    Name Line Occurrences
    CL DUP+15
    DDRX DUP+10
    DDRX1 DUP+11
    FT CL+6
    HD DUP+4, DUP+8, DUP+9, DUP+10, DUP+11, DUP+12, DUP+15, PEND+1, PEND+3, DDRX+3
    DDRX+6, DDRX+7, DDRX+9, CL+1, CL+6, CL+8, CL+9, FT+1, FT+3, FT+6
    PEND DUP+9
    PNODE CPRS+34

    Naked Globals

    Name Field # of Occurrence
    ^( DUP+3
    ^(0 PEND+3

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    BBSIG FT+1~*, FT+2, FT+3
    BLIM FT+1~, FT+2, FT+3*
    BSIG DDRX+4!, DDRX+8!, CL~, FT+1!
    BSIG( DDRX+4*, DDRX+7, CL+6, FT+2*, FT+4*
    BSIG(1 DDRX+6, DDRX+7, FT+5*
    BSIG(2 FT+5!
    BVAR FT+1~*, FT+2*, FT+3*, FT+4
    BVAR1 FT+1~*, FT+2, FT+3*
    CLECNT CL~, CL+4*, CL+5
    CLI CL~, CL+5*, CL+6
    >> COUNT DUP+15*
    >> CT DUP+2*, DUP+3, CL+8
    DIR HD+4~, HD+5!
    DIR("A" HD+5*
    DIR(0 HD+5*
    DIROUT HD+4~
    DIRUT HD+4~
    DNM PEND~, PEND+1*
    >> DRG DUP+2, DUP+3, DDRX1+1, DDRX1+2, CL+4, CL+5, CL+8
    >> DRGI DUP+3*
    >> DRGNM DDRX+2*, DDRX+3
    DT CPRS+22
    DTOUT HD+4~, HD+7
    DUOUT HD+4~, HD+7
    DUPRX0 PEND~, PEND+2*, PEND+3, PEND+4, DDRX+1*, DDRX+2, DDRX+3, DDRX+9
    FSIG DDRX+4!, DDRX+5!
    FSIG( PEND+6, DDRX+4
    I PEND+6*, CL~, CL+6*
    III FT+1~*, FT+2*, FT+4
    INDX CPRS+10~, CPRS+25*, CPRS+26
    IOF DUP+5, HD+8
    IOSL DUP+8, DUP+9, DUP+10, DUP+11, DUP+12, DUP+15, CL+1, CL+6, CL+8, CL+9
    FT+1, FT+3, FT+6, HD+3
    ISSD PEND~, PEND+2*, DDRX+1*
    ISTX DUP+2!
    >> IT DUP+3*, DUP+13, DUP+14, CL+2, CL+3
    >> J DDRX+2*
    >> LIST DUP+2, DUP+3, CL+4, CL+5, CL+8
    LSTFD DDRX+2!, DDRX+10*
    LT CL~, CL+6*, FT+2, FT+6!
    NNN FT+1~, FT+2*
    >> ON DUP+2*, DUP+3, DUP+7, DUP+8, DUP+9, DUP+10, DUP+11, DUP+12, DUP+13, DUP+14
    PEND+1, DDRX+1, CL+4, CL+5, CL+8
    OVRRID HD~, HD+2*, HD+3, HD+6!
    >> PDRG DUP+3*, DUP+5, DDRX1+1, DDRX1+2
    PSODFN CPRS~, CPRS+7, CPRS+26
    >> PSODLQT DUP+1, DUP+4, DUP+8, DUP+9, DUP+10, DUP+11, DUP+12, DUP+15, PEND+1, PEND+3
    DDRX+3, DDRX+6, DDRX+9, CLCL+1, CL+6, CL+8, FT+1, HD+2*, HD+3
    , HD+7*
    PSODSONM CPRS+10~, CPRS+13*, CPRS+23
    PSODSOP2 CPRS+10~, CPRS+32*, PNODE+5
    PSODSUA1 CPRS+10~, CPRS+13*, CPRS+14
    PSODSUA2 CPRS+10~, CPRS+14*, CPRS+15, CPRS+16, CPRS+20, CPRS+21, CPRS+23
    PSODSUAG CPRS~, CPRS+25, CPRS+28
    PSODSUAP CPRS+10~, CPRS+16*, CPRS+17, CPRS+18, CPRS+19
    PSODSUB4 CPRS+10~, CPRS+30*
    PSODSUBB CPRS+10~, CPRS+30*
    PSODSUCC CPRS+10~, CPRS+12*, CPRS+30*, PNODE+5*
    PSODSUDC CPRS+10~, CPRS+27*, CPRS+29*, CPRS+34*
    PSODSUDL CPRS+10~, CPRS+11*, CPRS+12, CPRS+18, CPRS+19
    PSODSUDM CPRS+10~, CPRS+32*, CPRS+33*, CPRS+34
    PSODSUII CPRS+10~, CPRS+27*, CPRS+31*, CPRS+32, CPRS+34, PNODE+2, PNODE+4, PNODE+5, PNODE+6
    PSODSUIN CPRS+10~, CPRS+21*, CPRS+22
    PSODSULP CPRS+10~, CPRS+29*
    PSODSULS CPRS~, CPRS+9, CPRS+25, CPRS+30, PNODE+5
    PSODSUNM CPRS+10~, CPRS+15*, CPRS+23
    PSODSUNN CPRS+10~, CPRS+32*, CPRS+33, CPRS+34, PNODE+5
    PSODSUOI CPRS~
    PSODSUOI( CPRS+13
    PSODSUOI(0 CPRS+8
    PSODSUPK CPRS+10~, CPRS+12*, CPRS+17
    PSODSURG CPRS+10~
    PSODSURG( CPRS+23*, CPRS+31, CPRS+32
    PSODSURG("" CPRS+24
    PSODSUST CPRS+10~
    PSODSUST( CPRS+34, PNODE+6*
    PSODSUTY CPRS~, CPRS+11, CPRS+30, PNODE+5
    >> PSODUPC( PEND+3*, PEND+4*, PEND+6*, DDRX+3*, DDRX+6*, DDRX+7*, DDRX+9*, DDRX+10*
    >> PSODUPF PEND+3, PEND+4, PEND+6, DDRX+3, DDRX+6, DDRX+7, DDRX+9, DDRX+10, HD+1, HD+8
    >> PSOINTV DUP+13*, DUP+14*
    PSOLINES HD~, HD+2*, HD+3, HD+6!
    >> PSONULN DUP+5
    >> PSORX("DFLG" HD+7*
    PSOSPRID PNODE+1~, PNODE+3*, PNODE+5
    PSOSPRN1 PNODE+1~, PNODE+4*
    PSOSPRN2 PNODE+1~, PNODE+4*
    PSOSPRNF PNODE+1~, PNODE+2*, PNODE+3
    PSOSPRQN PNODE+1~, PNODE+4*, PNODE+5
    PSOSPRXX PNODE+1~, PNODE+4*
    PSREV DDRX+4*, DDRX+5!, DDRX+7*, DDRX+8!
    >> PSSDIUTL DDRX1+1, DDRX1+2
    >> QTHER DDRX+9
    RFLS PEND~, PEND+2*, DDRX+1*
    RX0 DDRX+1*, DDRX+2!
    RX2 DDRX+1*, DDRX+2!
    RXREC PEND~, PEND+1*, PEND+2, PEND+5, DDRX+1*, DDRX+2, DDRX+4, DDRX+5, DDRX+10
    >> RXRECLOC DDRX+2*
    >> SEV DUP+2*, DUP+3, DUP+5
    >> ST DDRX+3
    >> STATUS DDRX+1*
    STX CL~, CL+6*, FT+1
    >> SV DUP+2, DUP+3, DUP+15, DDRX1+1, DDRX1+2, CL+4, CL+5, CL+8
    X CL+8!, HD+4~
    Y PEND~, CL+8!, HD+4~, HD+5!, HD+7
    >> ZCT PEND+3, PEND+4, PEND+6, DDRX+3, DDRX+6, DDRX+7, DDRX+9, DDRX+10
    >> ZHDR DUP+5*, CL*
    ZNT FT+1~, FT+2*, FT+3
    >> ZORS DUP+2
    >> ZST DUP+2
    >> ZVA DUP+2, DUP+15
    >> ZZDGDG( DUP+2
    >> ZZDGDG2( DUP+15
    >> ZZDGDGC DUP+2*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All