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

Package: Outpatient Pharmacy

Routine: PSOSD


Information

PSOSD ;BHAM ISC/SAB - action or informational profile ;11/18/92 18:30

Source Information

Source file <PSOSD.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Outpatient Pharmacy 8 DEVBAR^PSOBMST  STAT^PSOFUNC  EN^PSOHLUP  ^PSOSD0  (,DAYS)^PSOSD1  HD^PSOSD2  (,CLSG)^PSOSDP  (CLINALL,CLINIC,DEV)^PSOSDRAP  
VA FileMan 4 ^%DT  C^%DTC  ^DIC  ^DIR  
Kernel 2 ^%ZISC  ^%ZTLOAD  
Registration 1 $$SITE^VASITE  

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 5 PSO ACTION PROFILE  PSO ACTION PROFILE #2  PSOSD1  PSOSDP  PSOSDRAP  

Entry Points

Name Comments DBIA/ICR reference
PAT1
INFO ;
PAT
  • ICR #707
    • Status: Active
    • Usage: Private
    RX1
    ACT ;
    RX
    START
    CLINIC
    EXIT
    CLSG
    ASK
    QUE ;prints clinics when queued
    STORE

    External References

    Name Field # of Occurrence
    ^%DT CLINIC+2
    C^%DTC CLSG
    ^%ZISC EXIT+6
    ^%ZTLOAD CLSG+6
    ^DIC CLINIC+1
    ^DIR START+2, START+5, START+6, ASK+2, ASK+4
    DEVBAR^PSOBMST CLSG+3
    STAT^PSOFUNC RX1+2
    EN^PSOHLUP PAT
    ^PSOSD0 PAT+7
    ^PSOSD1 ASK+5
    DAYS^PSOSD1 CLSG
    HD^PSOSD2 PAT+1, PAT+4, PAT+6
    ^PSOSDP PAT+5
    CLSG^PSOSDP ASK+5
    CLINALL^PSOSDRAP CLSG+9, QUE+2
    CLINIC^PSOSDRAP CLSG+8, QUE+1
    DEV^PSOSDRAP CLSG+2
    $$SITE^VASITE START

    Interaction Calls

    Name Line Occurrences
    Function Call: READ
    • Prompt: "FOR CLINIC (TYPE 'ALL' FOR ALL CLINICS): "
    • Formatting: !!
    • Timeout: DTIME
    • Variable: X
    • Line Location: CLINIC+0
    Function Call: WRITE
    • Prompt: !!?13,">>>> NO PRESCRIPTIONS ON FILE <<<<"
    • Line Location: PAT+1
    Function Call: WRITE
    • Prompt: !!?13,">>>>> NO CURRENT PRESCRIPTIONS DATA FOUND <<<<<"
    • Line Location: PAT+4
    Routine Call
    • DIC
    • Line Location:
      • CLINIC+1
    Routine Call
    • DIR
    • Line Location:
      • START+2
      • START+5
      • START+6
      • ASK+2
      • ASK+4

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^SC - [#44] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(55 - [#55] PAT, PAT+1, PAT+3, RX
    ^PSDRUG - [#50] RX1+2, RX1+3
    ^PSRX - [#52] RX1, RX1+1, STORE, STORE+2, STORE+3
    ^TMP($J PAT+2!, PAT+4, RX1+3*, STORE+4*, EXIT!

    Label References

    Name Line Occurrences
    ASK START+3, START+5
    CLINIC CLINIC+1, CLINIC+2
    EXIT CLINIC, CLSG, CLSG+4, CLSG+10, QUE+3
    PAT1 START+2, START+5, START+6, ASK+2, ASK+4, PAT+1, PAT+4, PAT+7
    RX PAT+3
    RX1 RX
    START CLSG+4, CLSG+10, ACT+1, INFO+1
    STORE RX1+2

    Naked Globals

    Name Field # of Occurrence
    ^("ACT" EXIT!
    ^("STA" RX1+1
    ^(0 RX1+2, STORE+3
    ^(2 RX1+1
    ^(3 RX1+1, STORE

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %DT CLINIC+2*, EXIT!
    %DT("A" CLINIC+2*
    ADDR PAT1!, EXIT!
    ADDRFL EXIT!
    AL PAT1!
    APRT CLSG+3*, EXIT+3!
    BY EXIT!
    CLAPP PAT1!, EXIT+1!
    CLASS RX1+2*, PAT1!, STORE+4, EXIT!
    CLDT EXIT!
    CLINICX PAT+5, PAT+6, EXIT+1!
    >> CLSP CLSG+10
    CNDT STORE+3*, STORE+4, STORE+5!, EXIT+1!
    CS EXIT+5!
    DFN PAT, PAT+1, PAT+2, PAT+3, RX, RX1+3, EXIT+1!
    DHD EXIT+1!
    DIC CLINIC+1*, PAT1!, EXIT+3!
    DIC(0 CLINIC+1*
    DIE EXIT+3!
    DIR START+1!, START+4!, START+6!, ASK!, ASK+3!, ASK+4!, CLINIC!, PAT1!, EXIT+4!
    DIR("?" START+1*, START+4*, ASK*, ASK+1*
    DIR("A" START+1*, START+4*, START+6*, ASK*, ASK+3*
    DIR("B" START+1*, START+4*, START+6*, ASK+1*, ASK+3*
    DIR(0 START+1*, START+4*, START+6*, ASK+1*, ASK+3*
    DIRUT START+2, START+5, START+6, ASK+2, ASK+3!, ASK+4, CLSG, PAT+1, PAT+7, EXIT+4!
    DOD EXIT+5!
    DR EXIT+3!
    DRG PAT1!
    DRUG RX1+2*, RX1+3, PAT1!, STORE+4, EXIT+1!
    DT CLSG
    DTIME CLINIC
    DTOUT ASK+3!, CLSG+2, EXIT+4!
    DUOUT ASK+3!, CLSG+2, EXIT+4!
    DUPD PAT1!
    ELN PAT1!
    FA PAT1!
    FDATE PAT1!
    FDT PAT1!
    FILLDATE PAT1!, STORE+2*, STORE+4
    FLDS EXIT+1!
    FN PAT1!
    FR CLINIC+1*, CLINIC+2*, CLSG+8, CLSG+9, EXIT+1!, QUE+1, QUE+2
    G CLSG+5*, EXIT+3!
    GMRVSTR EXIT+5!
    HDFL PAT1!, EXIT+1!
    I EXIT+1!
    II PAT1!, EXIT+1!
    IO("Q" CLSG+4, CLSG+6!
    ION CLSG+3
    IOP START+1!, CLSG+3*
    >> IOS CLSG+3
    J RX*, RX1, RX1+1, RX1+3, STORE, STORE+2, STORE+3, STORE+4, EXIT+1!
    K PAT~
    L EXIT+1!
    LINE CLSG*, EXIT+1!
    LM CLSG+6, EXIT+3!
    LN PAT1!
    P PAT1!, EXIT+1!
    PAGE EXIT+5!
    PCLASS EXIT!
    PI PAT1!
    POP EXIT+1!
    PRI PAT1!
    PSDATE CLSG*, PAT+1, EXIT+1!
    PSDAYS CLSG, STORE+1, EXIT+2!
    PSDOB PAT1!, EXIT+2!
    PSDT PAT+1*, PAT+3*, RX, EXIT+3!
    PSIIX STORE+3*, EXIT+2!
    PSLC PAT1!
    PSNAME EXIT+2!
    PSOBAR0 CLSG+1~
    PSOBAR1 CLSG+1~
    PSOBAR2 EXIT+5!
    PSOBAR3 EXIT+5!
    PSOBAR4 EXIT+5!
    PSOBARS CLSG+1~
    PSOIFSUP PAT1!
    >> PSOINST START*
    PSOION CLSG+4!
    PSOIOS CLSG+3*, EXIT+4!
    PSONUM START+3*, START+6*, EXIT+4!
    PSOPOL START+3*, START+5*, PAT+5, RX1+3, EXIT+4!
    PSOPOLP PAT1!, EXIT+3!
    PSOPRPAS PAT1!
    PSORM ASK+4*, EXIT+3!
    >> PSOSYS START+3
    PSOT CLINIC+2*, EXIT!
    PSOUT ASK+2*, ASK+5, PAT1!, EXIT+3!
    PSRENW PAT1!
    PSSN EXIT+2!
    >> PSTY CLSG+10*
    PSTYPE START+2*, START+3, CLSG*, CLSG+10*, EXIT+2!, ACT+1*, INFO+1*
    RFL PAT1!
    RSLT CLINIC~, EXIT+4!
    RX PAT1!, EXIT+2!
    RX0 RX1+1*, RX1+2, RX1+3, STORE+4, EXIT+2!
    RX2 RX1+1*, EXIT+2!
    RX3 RX1+1*, PAT1!, EXIT+2!
    RXCNT PAT1!
    RXN PAT1!, EXIT+2!
    RXNO RX1*, EXIT+4!
    SG PAT1!
    SGC PAT1!
    ST PAT1!, STORE+1, STORE+2, STORE+3, STORE+4, EXIT+2!
    ST0 PAT1!, EXIT+2!
    TO CLINIC+1*, CLINIC+2*, EXIT+2!
    VA EXIT+5!
    VADM EXIT+5!
    VAIN EXIT+5!
    VAPA EXIT+5!
    VAR EXIT+2!
    X START*!, ASK+4!, CLINIC!*, CLINIC+1, CLSG, CLSG+10*, PAT1!, EXIT+3!
    X1 CLSG*, EXIT+4!
    X2 CLSG*, EXIT+4!
    Y START+2, START+5, START+6, ASK+2, ASK+4!, CLINIC!, CLINIC+1, CLINIC+2, PAT1!, EXIT+3!
    Z PAT1!
    Z0 PAT1!
    Z1 PAT+3*, PAT1!, EXIT+2!
    Z2 PAT1!
    Z3 PAT1!
    Z4 PAT1!
    Z5 PAT1!
    ZCLASS PAT1!
    ZTDESC CLSG+4*, EXIT+3!
    ZTRTN CLSG+4*, EXIT+3!
    ZTSAVE EXIT+3!
    ZTSAVE( CLSG+5*
    ZTSAVE("DOD*" CLSG+6*
    ZTSAVE("ZTREQ" CLSG+4*
    ZTSK CLSG+6!, EXIT+3!
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All