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  | All
Print Page as PDF
Routine: PSOBAI

Package: Outpatient Pharmacy

Routine: PSOBAI


Information

PSOBAI ;BIR/EJW,JAM - BAD ADDRESS PROCESSING ;02/02/2006

Source Information

Source file <PSOBAI.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Registration 3 PSOPAT^DGADDUTL  $$BADADR^DGUTL3  6^VADPT  
Outpatient Pharmacy 1 ^PSOLSET  
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: 19

Package Total Caller Graph
Outpatient Pharmacy 18 PSOBAIR2  PSOBAIRP  PSODISPS  PSOHLDS1  PSOLBL4  PSOLBLN  PSOLLL1  PSOLMPAT  
PSOMPHRC  PSOPAT  PSOPKIV2  PSOPMP0  PSORLLL1  PSORX1  PSORXVW  PSOSULBL  
PSOSULOG  PSOTPCLP  
CMOP 1 PSXMISC1  

Entry Points

Name Comments DBIA/ICR reference
CHKADDR(PSODFN,WARN,UPDATE) ; CHECK ADDRESS BY PATIENT
CHKRX(PSORX) ;CHECK ADDRESS BY RX
  • ICR #4910
    • Status: Active
    • Usage: Controlled Subscription
    WARN1 ;
    CHKTEMP(PSODFN) ; see if active temporary address
    UPDATE ;
    ULK ;
    PAUSE ;
    MSG ;

    External References

    Name Field # of Occurrence
    PSOPAT^DGADDUTL UPDATE+9
    $$BADADR^DGUTL3 CHKADDR+7, CHKRX+7
    ^DIR UPDATE+5, PAUSE+1
    ^PSOLSET UPDATE+2
    6^VADPT CHKTEMP+4

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,?8,"WARNING: The patient address is indicated as a bad"
    • Line Location: WARN1+1
    Function Call: WRITE
    • Prompt: !,?17,"address (",$S(PSOBADR=1:"UNDELIVERABLE",PSOBADR=2:"HOMELESS",1:"OTHER"),")."
    • Line Location: WARN1+2
    Function Call: WRITE
    • Prompt: !,?17,"* Temporary address is active *"
    • Line Location: WARN1+3
    Function Call: WRITE
    • Prompt: !,?17,"Medication will not be mailed to"
    • Line Location: WARN1+4
    Function Call: WRITE
    • Prompt: !,?17,"the patient until the address has been"
    • Line Location: WARN1+5
    Function Call: WRITE
    • Prompt: !,?17,"corrected.",!
    • Line Location: WARN1+6
    Function Call: WRITE
    • Prompt: !
    • Line Location: UPDATE+20
    Function Call: WRITE
    • Prompt: !
    • Line Location: UPDATE+21
    Function Call: WRITE
    • Prompt: !
    • Line Location: PAUSE+1
    Routine Call
    • DIR
    • Line Location:
      • UPDATE+5
      • PAUSE+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD("DILOCKTM" UPDATE+7
    ^DPT - [#2] UPDATE+7, ULK+1
    ^PSRX - [#52] CHKRX+6
    ^XUSEC("PSO ADDRESS UPDATE" UPDATE+3

    Label References

    Name Line Occurrences
    $$CHKTEMP CHKADDR+9, CHKRX+8
    MSG UPDATE+7
    PAUSE CHKADDR+13, UPDATE+3, UPDATE+7
    ULK UPDATE+10
    UPDATE CHKADDR+12
    WARN1 CHKADDR+11

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA UPDATE+1~
    DFN CHKTEMP+2~, CHKTEMP+3*, UPDATE+9
    DIR UPDATE+4!, UPDATE+5!, PAUSE+1!
    DIR("A" UPDATE+4*, PAUSE+1*
    DIR("B" UPDATE+4*
    DIR(0 UPDATE+4*, PAUSE+1*
    DUZ UPDATE+3
    PSOBADR CHKADDR+5~, CHKADDR+7*, CHKADDR+8, CHKRX+3~, CHKRX+4*, CHKRX+7*, CHKRX+8, CHKRX+9*, CHKRX+10, WARN1+2
    PSODFN CHKADDR~, CHKADDR+6, CHKADDR+7, CHKADDR+9, CHKRX+3~, CHKRX+6*, CHKRX+7, CHKRX+8, CHKTEMP~, CHKTEMP+3
    UPDATE+7, ULK+1
    >> PSOPAR UPDATE+2, UPDATE+3
    PSORX CHKRX~, CHKRX+5, CHKRX+6
    PSOSEL UPDATE+1~
    PSOTEMP CHKADDR+5~, CHKADDR+9*, CHKRX+3~, CHKRX+8*, CHKRX+9, WARN1+3, CHKTEMP+3*, CHKTEMP+4*, CHKTEMP+5
    UPDATE CHKADDR~, CHKADDR+12
    >> VALMSG MSG+1*
    VAPA CHKTEMP+2~
    VAPA(9 CHKTEMP+4
    WARN CHKADDR~, CHKADDR+10
    >> Y UPDATE+6
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All