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

Package: Outpatient Pharmacy

Routine: PSOBUILD


Information

PSOBUILD ;IHS/DSD/JCM - BUILD ARRAY OF PATIENTS CURRENT MEDS;29-May-2012 14:40;PLS

Source Information

Source file <PSOBUILD.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Outpatient Pharmacy 3 ^PSODSPL  EN^PSOHLSN1  ECAN^PSOUTL  
VA Fileman 2 C^%DTC  ^DIE  
Kernel 1 $$UP^XLFSTR  
Registration 1 FULL^VALM1  

Caller Graph

Caller Graph Total: 43

Package Total Caller Graph
Outpatient Pharmacy 35 PSOATRF  PSOATRFC  PSOBBC  PSOCAN1  PSOCAN2  PSOCAN4  PSOCPDUP  PSODGDG1  
PSODGDG2  PSODISPS  PSODRDUP  PSODRG  PSOHLD  PSOHLSG2  PSOLBLN2  PSOLBLS  
PSOLLL5  PSOLLLHN  PSOLMUTL  PSONEW  PSOORCPY  PSOOREDT  PSOORFI2  PSOORNE1  
PSOORNE2  PSOORNE4  PSOREF  PSOREF1  PSORENW4  PSORESUS  PSORMRXD  PSORX1  
PSORXRP1  PSOTPRX1  PSOVER  
IHS Changes To Pharmacy 8 APSPCO  APSPDSC  APSPHLD  APSPNUM  APSPORXA  APSPRIS  APSPSUM  APSQFAS  

Entry Points

Name Comments DBIA/ICR reference
FSTA
STAT
END
GET ;data for profiles
EOJ
INPAT(PSODFN) ;entry point for inpat meds to view patient's outpat. meds
  • ICR #2257
    • Status: Active
    • Usage: Private
    BARC
    BUILDX
    GETX
    START
    INIT ;
    BUILD ;build profiles
    GT1
    INITX

    External References

    Name Field # of Occurrence
    C^%DTC INIT+5, INPAT+2
    ^DIE GET+8, FSTA+1
    ^PSODSPL INPAT+2
    EN^PSOHLSN1 GET+10
    ECAN^PSOUTL GET+9
    FULL^VALM1 INPAT+1
    $$UP^XLFSTR START+10, START+19, BARC+3

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(50.606 - [#50.606] START+9, START+10, START+17
    ^PS(50.7 - [#50.7] START+9, START+10, START+17
    ^PS(52.41 - [#52.41] START+7, START+12
    ^PS(52.5 - [#52.5] GET+13, GET+15!, GET+16, STAT, STAT+1
    ^PS(53 - [#53] INIT+2, INIT+3, GT1+7
    ^PS(55 - [#55] START+15, BUILD+1
    ^PSDRUG - [#50] START+9, START+10, START+12, START+17, START+22, START+23, GET+5, GT1+1, GT1+2, GT1+3
    , GT1+4
    ^PSRX - [#52] START+27, BUILD+1, GET+1, GET+2, GET+3, GET+4, BARC, BARC+2, BARC+3
    ^TMP("PS" START+5

    Label References

    Name Line Occurrences
    BARC GT1+11
    BUILD START+2
    END START, START+2
    EOJ START+2, END
    FSTA GET+14, GET+16, STAT+2
    GET BUILD+1
    GETX GET+3, GET+5, GT1
    GT1 GET+12
    INIT START+2
    INITX INIT+1, INIT+2, INIT+3
    START INPAT+2
    STAT GET+17

    Naked Globals

    Name Field # of Occurrence
    ^("I" GT1+1
    ^("ND" START+12, START+23, GT1+2
    ^(0 GET+13, GT1+7

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CLOZPT GT1+4*, GT1+5, GT1+6!
    COMM GET+10*!
    DA GET+8~*, GET+9!, FSTA+1~*!
    DDH INPAT+3!
    DIC GET+8~!
    DIE GET+8~*!, FSTA+1~*!
    DR GET+8~*!, FSTA+1~*!
    DRG START+4*, START+5, START+6, START+9*, START+10*, START+11*, START+12, START+13, START+14, START+17*
    , START+19*, START+20*, START+21, START+22, START+23, START+26*, START+27, START+28, START+29, START+30
    , EOJ!, INPAT+3!
    DRGZ START+1~, START+10*, START+14, START+19*, START+21
    DT START, INIT+5, GET+7, GET+11, GT1+1, INPAT+2
    >> I START+4*
    INPAT INPAT+2*, INPAT+3!
    >> NOEXP GT1
    NON START+15*, START+16, START+22, START+23, EOJ!
    NVA START+15*, START+20, START+22, EOJ!
    ORD START~, START+7*, START+13, EOJ!
    PEN START+7*, START+11, START+12, START+13, EOJ!
    PHARMST GET+10*!
    PSCNT INPAT+3!
    PSOBEXDA GET+8~*, GET+10!
    PSOBUILD EOJ!
    PSOBUILD("COUNT" INIT+1*, BUILDX, BARC+4*, BARC+9*
    PSOBUILD("RX" BUILD+1*, GET+1, GET+2, GET+3, GET+4, GET+8, GET+13, GET+15, GET+16, BARC
    , BARC+9, BARC+10, BARC+12, STAT, FSTA+1
    PSOCT INPAT+3!
    PSODD START+7*, START+9, START+10, START+12, START+13!, START+16*, START+17, START+23, INPAT+3!
    PSODFN START, START+7, START+15, BUILD+1, INPAT~, INPAT+3!
    PSODRG GET+5*, GT1+1, GT1+2, GT1+3, GT1+4, EOJ!
    PSODRUG0 GET+5*, GT1+5, GT1+6, BARC+2, BARC+3, BARC+10, BARC+13, EOJ!
    PSODRUGN BARC+2*, BARC+3*, BARC+4, BARC+8, BARC+9, BARC+10, BARC+12, BARC+13, EOJ!
    PSODTCUT INIT+1, INIT+5*, BUILD+1, INPAT+2*, INPAT+3!
    PSODYS GET+5*, BARC+9, BARC+12, EOJ!
    PSOEXPDT BUILD+1*, GET+7, GET+10, GET+11, EOJ!
    PSOJ BARC*, EOJ!
    PSOLC GT1+9*, EOJ!
    PSOMED INIT+1!
    PSONDF GT1+2*, BARC+9, BARC+12, EOJ!
    PSOOI START+7*, START+9, START+10, START+13!, START+16*, START+17, INPAT+3!
    PSOPAR GT1+1, INPAT+3!
    PSOQFLG START+2, INIT+1*, INIT+2*, INIT+3*, EOJ!
    PSORFRM BARC*, BARC+1*, BARC+9, BARC+12, EOJ!
    >> PSORX("BAR CO DE" , GT1+11
    PSORX0 GET+2*, GET+5, GET+7, GET+8*, GT1+7, GT1+9, BARC, BARC+2, BARC+3, FSTA*
    , EOJ!
    PSORX2 GET+3*, GET+4, EOJ!
    PSORX3 GET+4*, EOJ!
    PSOSD START!, START+13*, START+24*, INIT+1!, BUILDX*, INPAT+3!
    PSOSD( START+4*!, START+5*, START+6*, BARC+2, BARC+3, BARC+4, BARC+8, BARC+9*, BARC+10*, BARC+12*
    , BARC+13*
    PSOSD("ACTIVE OTHER PHARMACY" , START+28*, START+29*
    PSOSD("ACTIVE" START+26, START+27, START+28, START+29, START+30!
    PSOSD("PENDING" START+11, START+12*, START+13*, START+14*
    PSOSD("ZNONVA" START+20, START+21*, START+22*, START+23*
    PSOST0 GET+2*, GET+3, GET+7, GET+8*, GET+11*, GET+12, GET+14*, GET+16*, GET+17, GT1
    , GT1+8, GT1+10, GT1+11, GT1+12, BARC+2, BARC+3, BARC+8, BARC+9, BARC+12, STAT+1*
    , STAT+2, FSTA, FSTA+1, EOJ!
    PSOSTA INPAT+3!
    PSOSTF GET+2*, GT1+1*, GT1+5*, GT1+10*, BARC+1*, BARC+9, BARC+12, EOJ!
    PSOSTN GET+2*, GT1+1*, GT1+3*, GT1+5*, GT1+6*, GT1+7*, GT1+8*, GT1+9*, GT1+11*, GT1+12*
    , BARC+9, BARC+12, EOJ!
    PSOVACL GET+5*, BARC+9, BARC+12, EOJ!
    PSOX INIT+3*, INITX!, EOJ!
    >> STA START+3*, START+4, START+5, START+6
    STAT GET+10*!
    STP INPAT+3!
    STR INPAT+3!
    U START+27, INIT+1*, BARC+10, BARC+13
    X INIT+5, INITX!, STAT~*, STAT+1, INPAT+2
    X1 INIT+5*, INITX!, INPAT+2*
    X2 INIT+5*, INITX!, INPAT+2*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All