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

Package: Outpatient Pharmacy

Routine: PSOLSET


Information

PSOLSET ;BHAM ISC/SAB - site parameter set up ;14-Nov-2012 13:55;PB

Source Information

Source file <PSOLSET.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS Changes To Pharmacy 3 ^APSPLBLT  EP^APSPSITE  ^APSPXUT  
Kernel 3 ^%ZIS  ^%ZISC  $$VERSION^XPDUTL  
Outpatient Pharmacy 3 DEVBAR^PSOBMST  CUTDATE^PSOFUNC  ^PSOSITED  
VA Fileman 3 ^DIC  EN^DIQ1  ^DIR  

Caller Graph

Caller Graph Total: 95

Package Total Caller Graph
Outpatient Pharmacy 78 PSO AUTOCANCEL MENU  PSO MAINTENANCE  PSO MANAGER  PSO P  PSO PAT  PSO PND  PSO PNDLBL  PSO RELEASE REPORT  
PSO RX  PSO SITE PARAMETERS  PSO TPB RX ENTRY  PSO USER1  PSO USER2  PSOB  PSOBAI  PSOBAIR2  
PSOBBC  PSOBGMG2  PSOBGMGR  PSOBING1  PSOBINGO  PSOBPSSP  PSOCMOPR  PSOCP  
PSOCP EXEMPTION  PSOCP MENU  PSOCP RESET COPAY STATUS  PSOCPB  PSOCPBA2  PSOCPBK2  PSOCPBK4  PSOCPD  
PSOCPE  PSOCPIBC  PSOCPTRI  PSOCSRL  PSOD EDIT ANSWER SHEET  PSOD SUPERVISOR  PSODGDG2  PSODISP  
PSODISP1  PSODISP3  PSODISPS  PSOEXRST  PSOHLD  PSOLLL7  PSOLLLH  PSOLLLHN  
PSOLMPAT  PSOLMUTL  PSONDCV  PSOORFI2  PSOORFIN  PSOPAT  PSOPCORE  PSOPMP0  
PSOPMPPF  PSOPRI  PSOREJP3  PSORESK  PSORX1  PSORXDL  PSORXEDT  PSORXPA1  
PSORXRP2  PSOSITED  PSOSUCHG  PSOSUCLE  PSOSUDCN  PSOSUDPR  PSOSULB1  PSOSULOG  
PSOSUPRX  PSOSURST  PSOTALK  PSOTALK3  PSOTPRX1  PSOVER  
IHS Changes To Pharmacy 10 APSPCO  APSPCP1  APSPDRX  APSPESLP  APSPORXA  APSPRIS  APSPSLBL  APSPSOB  
APSQFUTI  APSQSIGN  
IHS Pharmacy Auto Refill System 3 BEXRX  BEXRX7  BEXSITE  
CMOP 2 PSXRPPL  PSXSRST  
Controlled Substances 1 PSDOPT  
Pharmacy Barcode Scan 1 BPBSUPD  

Entry Points

Name Comments DBIA/ICR reference
P2
Q
VERS ;;7.0;OUTPATIENT PHARMACY;**10,22,32,40,120,1009,247,1015**;DEC 1997;Build 62
GROUP ;display group
PLBL
FINAL ;exit action from main menu - kill and quit
  • ICR #982
    • Status: Active
    • Usage: Private
    DIV2
    LEAVE
    EXIT
    GROUP1
    LASK
    DIV3
    LBL
    DIV1

    External References

    Name Field # of Occurrence
    ^%ZIS PLBL+2, LBL+1, P2
    ^%ZISC PLBL+2, LBL+3, P2+4, EXIT
    ^APSPLBLT P2+4
    EP^APSPSITE DIV3+14
    ^APSPXUT FINAL+4
    ^DIC DIV2+2, GROUP1+2
    EN^DIQ1 DIV3+2
    ^DIR VERS+14, DIV2+3, LASK+1, P2+4, P2+5, GROUP1+3
    DEVBAR^PSOBMST LBL+2
    CUTDATE^PSOFUNC DIV3
    ^PSOSITED VERS+16
    $$VERSION^XPDUTL DIV3+9

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,$C(7),"DUZ Number must be defined !!",!
    • Line Location: VERS+8
    Function Call: WRITE
    • Prompt: !,"Outpatient Pharmacy software - Version "_$P($T(VERS),";",3)
    • Line Location: VERS+9
    Function Call: WRITE
    • Prompt: !!,"Outpatient Pharmacy software is being installed. PLEASE TRY LATER!",!
    • Line Location: VERS+10
    Function Call: WRITE
    • Prompt: !,$C(7)
    • Line Location: VERS+13
    Function Call: WRITE
    • Prompt: !
    • Line Location: VERS+16
    Function Call: WRITE
    • Prompt: !
    • Line Location: DIV2+0
    Function Call: WRITE
    • Prompt: $C(7),!?5,"Printer is busy.",!
    • Line Location: P2+0
    Function Call: WRITE
    • Prompt: !,"Align labels so that a perforation is at the top of the",!,"print head and the left side is at column zero."
    • Line Location: P2+1
    Function Call: WRITE
    • Prompt: !
    • Line Location: P2+4
    Function Call: WRITE
    • Prompt: !?10,$C(7),"Default printer for labels must be entered."
    • Line Location: Q+0
    Function Call: WRITE
    • Prompt: !
    • Line Location: GROUP1+0
    Routine Call
    • DIC
    • Line Location:
      • DIV2+2
      • GROUP1+2
    Routine Call
    • DIR
    • Line Location:
      • VERS+14
      • DIV2+3
      • LASK+1
      • P2+4
      • P2+5
      • GROUP1+3
    Routine Call
    • %ZIS
    • Line Location:
      • PLBL+2
      • LBL+1
      • P2

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZIS(2 - [#3.2] LASK
    ^%ZOSF("TEST" DIV3+14, FINAL+4
    ^PS(59 - [#59] VERS+12, DIV3, DIV3+1, DIV3+4, GROUP1+1
    ^PS(59.3 - [#59.3] GROUP+1, GROUP+4
    ^PS(59.7 - [#59.7] DIV3
    ^PSX(550 - [#550] DIV3+5, DIV3+8
    ^VA(200 - [#200] DIV3+12
    ^XMB(1 - [#4.3] DIV3+2
    ^XTMP("PSO_V7 INSTALL" VERS+10

    Label References

    Name Line Occurrences
    DIV1 VERS+13
    DIV2 DIV2+3
    DIV3 DIV1
    EXIT LBL+1, LASK, LASK+1, P2+5
    FINAL LEAVE
    GROUP EXIT+1, GROUP1+3
    GROUP1 GROUP+3
    LASK P2
    LBL Q
    LEAVE VERS+8, VERS+10, VERS+15, DIV2+2, DIV2+3
    P2 P2+6
    PSOLSET VERS+16
    VERS VERS+9

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %ZIS PLBL+1*, PLBL+2!, LBL*, LBL+1!, EXIT+1!, FINAL+3!
    %ZIS("A" PLBL+1*, LBL*
    %ZIS("B" PLBL+1*, LBL*
    AGROUP GROUP+1*, GROUP+2, GROUP+5!, GROUP1+5!
    AGROUP1 GROUP+2*, GROUP+3, GROUP+5!, GROUP1+5!
    >> APSPLAP LBL
    DA DIV3+2*!
    DIC DIV2*, DIV2+2!, DIV3+2*!, EXIT+1!, FINAL+3!, GROUP1*, GROUP1+2!, GROUP1+5!
    DIC("A" DIV2*, GROUP1*
    DIC("B" GROUP1+1*
    DIC("S" DIV2+1*
    DIC(0 DIV2*, GROUP1*
    >> DIQ DIV3+2*
    >> DIQ(0 DIV3+2*!
    DIR DIV3!, LASK+1!, P2+4!, P2+5!, EXIT+1!, FINAL+3!, GROUP1+5!
    DIR("?" VERS+14*, DIV1*, LASK+1*, P2+5*, GROUP1*, GROUP1+3*
    DIR("A" VERS+13*, VERS+14*, DIV2+3*, LASK+1*, P2+5*, GROUP1+3*
    DIR("B" VERS+14*, DIV2+3*, LASK+1*, P2+5*, GROUP1+3*
    DIR(0 VERS+14*, DIV1*, LASK+1*, P2+4*, P2+5*, GROUP1*
    DIROUT EXIT+1!, FINAL+3!
    DIRUT LASK+1, P2+4!, P2+5!, EXIT+1!, FINAL+3!
    DISGROUP FINAL+2!, GROUP+4*, GROUP1+4*
    DR DIV3+2*!
    DTOUT DIV2+2, P2+4!, EXIT+1!, FINAL+3!, GROUP1+2
    DUOUT DIV2+2, P2+4!, EXIT+1!, FINAL+3!, GROUP1+2
    DUZ VERS+8, DIV3+12
    GROUPCNT FINAL+2!, GROUP+1*, GROUP+2*, GROUP+3
    GRPNME GROUP+3*, GROUP+4, GROUP+5!, GROUP1+5!
    I VERS+12*, EXIT+1!, FINAL+3!
    II GROUP+3*, GROUP+4*, GROUP+5!, GROUP1+5!
    IO("Q" PLBL+2!, LBL+1!
    IO(0 P2+1
    ION PLBL+2, LBL+1
    IOP PLBL+2!, LBL+1!, P2*!, EXIT+1!
    >> IOS LBL+2, LBL+3
    IOST(0 LBL+1
    J EXIT+1!, FINAL+3!
    PFIO FINAL+2!
    >> POP PLBL+2, LBL+1, P2
    PRCA FINAL+1!
    PSL FINAL+1!
    PSLION LBL, FINAL+1!
    PSNP FINAL+1!
    PSOBAR0 LBL+3, FINAL+3!
    PSOBAR1 VERS+11*, LBL+3, FINAL+3!
    PSOBARS VERS+11*, LBL+3*, FINAL+3!
    >> PSOBFLAG EXIT+1
    PSOCAP FINAL+2!
    >> PSOCLBL PLBL+1, LBL, EXIT
    PSOCLC DIV3+12*, FINAL+2!
    PSOCNT VERS+12*, VERS+13, DIV1, DIV2, DIV3, FINAL+2!
    PSOCP FINAL+1!
    PSODIV DIV3+11*, FINAL+2!
    PSODTCUT FINAL+3!
    PSOINST DIV3+5*, FINAL+2!
    PSOION FINAL+2!
    PSOIOS LBL+2~*, LBL+3*, FINAL+2!
    PSOLAP LBL, P2, FINAL+2!
    PSONULBL FINAL+2!
    PSOPAR DIV3*, PLBL, LBL+3, FINAL+2!
    PSOPAR7 DIV3*, FINAL+2!
    PSOPINST DIV3+1*, FINAL+1!
    >> PSOPIOST LBL+1*, LASK
    PSOPROP PLBL+1, PLBL+2*, FINAL+2!
    PSOPRPAS FINAL+3!
    >> PSOQUIT LBL+1*, LASK+1*, P2+5*
    PSOREL FINAL+3!
    PSOSITE DIV3*, DIV3+1, DIV3+4, FINAL+3!, GROUP1+1
    PSOSITE7 FINAL+2!
    PSOSYS DIV3*, DIV3+11, FINAL+2!
    >> PSOVEX DIV2+1
    PSXSYS DIV3+5*, DIV3+7, DIV3+8!, DIV3+10!
    PSXUTIL DIV3+6!
    PSXUTIL(4 DIV3+2
    >> PSXVER DIV3+9*
    S1 DIV3+6!
    S2 DIV3+2*, DIV3+5, DIV3+6!
    S3 DIV3+2*, DIV3+4*, DIV3+5, DIV3+6!
    SIG FINAL+3!
    SITE DIV3+2*, FINAL+1!
    >> SUSPT LBL, LBL+1
    X VERS+15, DIV3+14*, EXIT+1!, FINAL+2!, FINAL+4*, GROUP1+3
    >> XQUIT LEAVE*
    Y VERS+12*, DIV2+3, DIV3, DIV3+9*, LASK+1, P2+5, EXIT+1!, FINAL+2!, GROUP1+3, GROUP1+4

    Marked Items

    Name Field # of Occurrence
    $T(VERS VERS+9
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All