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

Package: Outpatient Pharmacy

Routine: PSODRDU2


Information

PSODRDU2 ;BHAM ISC/SAB - dup drug/class display for outpatient orders ;9/23/97 8:40am

Source Information

Source file <PSODRDU2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Outpatient Pharmacy 5 ^PSOCMOPA  HD^PSODDPR2  $$TRANCMOP^PSOUTL  FSIG^PSOUTLA  EN2^PSOUTLA1  
Kernel 2 ENDR^%ZISS  $$FMTE^XLFDT  

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

Package Total Caller Graph
Inpatient Medications 3 PSJLMUT1  PSJOCDI  PSJOCDT  

Entry Points

Name Comments DBIA/ICR reference
EN(PSODFN,ORN,LIST) ;psodfn=patient's ifn, orn=ordertype;order#;drugtype;counter
  • ICR #2189
    • Status: Active
    • Usage: Private
    RX ;Rx info
    PND ;op pending orders
    NVA ;non-va meds
    RDI ;RDI orders
    PRSTAT(DA) ;Displays the prescription's status

    External References

    Name Field # of Occurrence
    ENDR^%ZISS PRSTAT+7
    ^PSOCMOPA PRSTAT+3
    HD^PSODDPR2 PRSTAT+2, PRSTAT+10
    $$TRANCMOP^PSOUTL PRSTAT+8
    FSIG^PSOUTLA RX+7, PND+5
    EN2^PSOUTLA1 RX+8
    $$FMTE^XLFDT PRSTAT+16, PRSTAT+17

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Local Rx #"_$P(DUPRX0,"^")_" ("_ST_") for "_$P(^PSDRUG($P(DUPRX0,"^",6),0),"^")
    • Line Location: RX+6
    Function Call: WRITE
    • Prompt: !?20,$G(BSIG(PSREV))
    • Line Location: RX+9
    Function Call: WRITE
    • Prompt: !
    • Line Location: RX+10
    Function Call: WRITE
    • Prompt: FSIG(I),!?5
    • Line Location: PND+6
    Function Call: WRITE
    • Prompt: !,"Dosage: "_$P(DUPRX0,"^",3),?25,"Schedule: "_$P(DUPRX0,"^",5)
    • Line Location: NVA+4
    Function Call: WRITE
    • Prompt: !
    • Line Location: NVA+5
    Function Call: WRITE
    • Prompt: !,"LOCATION: "_$P(RXREC,"^")
    • Line Location: RDI+3
    Function Call: WRITE
    • Prompt: !,"Remote Rx #"_$P(RXREC,"^",5)_" ("_$P(RXREC,"^",4)_") for "_$P(RXREC,"^",3)
    • Line Location: RDI+4
    Function Call: WRITE
    • Prompt: !,"SIG: "
    • Line Location: RDI+5
    Function Call: WRITE
    • Prompt: ?5
    • Line Location: RDI+7
    Function Call: WRITE
    • Prompt: "Last Filled On: "_$P(RXREC,"^",6),!
    • Line Location: RDI+8
    Function Call: WRITE
    • Prompt: "Returned to stock on "_$$FMTE^XLFDT(PSORTS,2)
    • Line Location: PRSTAT+16

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(50.606 - [#50.606] PND+4, NVA+3
    ^PS(50.7 - [#50.7] PND+4, NVA+3
    ^PS(52.41 - [#52.41] PND+1, PND+3
    ^PS(55 - [#55] NVA+1, NVA+2
    ^PSDRUG - [#50] RX+6, PND+4, NVA+3
    ^PSRX - [#52] RX+1, RX+2, RX+3, RX+5, RX+7, RX+8, PRSTAT+2, PRSTAT+5, PRSTAT+8, PRSTAT+12
    , PRSTAT+13, PRSTAT+15, PRSTAT+17
    ^TMP($J RDI+1, RDI+2, RDI+5, RDI+6, RDI+7

    Label References

    Name Line Occurrences
    NVA EN+5
    PND EN+4
    PRSTAT RX+10
    RDI EN+6
    RX EN+3

    Naked Globals

    Name Field # of Occurrence
    ^(0 PND+4, NVA+3

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    BSIG EN+1~, RX+7!
    BSIG( RX+7*, RX+9
    BSIG(1 RX+9
    CMOP PRSTAT+1~, PRSTAT+3!
    CMOP("L" PRSTAT+5
    DA PRSTAT~, PRSTAT+5
    DUPRX0 RX+2*, RX+3, RX+6, PND+2~, PND+3*, PND+4, NVA+2*, NVA+3, NVA+4, NVA+7!
    DUPRXO EN+1~
    FSIG RX+7!, RX+8!, PND+2~
    FSIG( RX+7, PND+6
    I EN+1~, PND+6*, RDI+5*, RDI+6, RDI+7, RDI+9!
    >> IOINHI PRSTAT+7, PRSTAT+8
    >> IOINORM PRSTAT+7, PRSTAT+9
    IOM PND+5
    >> IORVOFF PRSTAT+9
    >> IORVON PRSTAT+8
    IOSL PRSTAT+2, PRSTAT+10
    ISSD EN+1~, RX+1~, RX+2*
    J EN+1~
    LIST EN~, RDI+1, RDI+2, RDI+5, RDI+6, RDI+7
    LSTFL EN+1~, RX+3*
    LSTFLD RX+1~
    ORN EN~, EN+3, EN+4, EN+5, EN+6, RX+1, PND+1, PND+3, PND+5, NVA+1
    , NVA+2, RDI+1, RDI+2, RDI+5, RDI+6, RDI+7
    PSOCMOP PRSTAT+1~, PRSTAT+3, PRSTAT+4, PRSTAT+9, PRSTAT+11
    PSODFN EN~, NVA+1, NVA+2
    >> PSODLQT PRSTAT+2, PRSTAT+10
    PSOLRD PRSTAT+1~, PRSTAT+2*, PRSTAT+14*, PRSTAT+15*, PRSTAT+17
    PSONULN EN+1~, EN+2*
    PSOREL PRSTAT+1~, PRSTAT+3!, PRSTAT+5*, PRSTAT+6*, PRSTAT+9
    PSORTS PRSTAT+1~, PRSTAT+14*, PRSTAT+15*, PRSTAT+16
    PSOTRANS PRSTAT+1~, PRSTAT+3!, PRSTAT+4*, PRSTAT+9
    PSOX PRSTAT+1~, PRSTAT+12*, PRSTAT+13
    PSREV RX+7*, RX+8!, RX+9*
    RFLS EN+1~, RX+2*
    RFLZRO PRSTAT+1~, PRSTAT+13*, PRSTAT+14
    >> RX0 RX+3*
    >> RX2 RX+3*
    RXPSTA PRSTAT+1~, PRSTAT+2*, PRSTAT+9, PRSTAT+16
    RXREC EN+1~, RX+1*, RX+2, RX+3, RX+5, RX+7, RX+8, RX+10, RDI+2*, RDI+3
    , RDI+4, RDI+8, RDI+9!, PRSTAT+2, PRSTAT+8, PRSTAT+12, PRSTAT+13, PRSTAT+15, PRSTAT+17
    ST EN+1~, RX+5*, RX+6
    STA RX+4*, RX+5!
    >> X PRSTAT+7*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All