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

Package: Outpatient Pharmacy

Routine: PSOADDR


Information

PSOADDR ;BIR/RTR-Print address changes from Audit file ;10/17/01

Source Information

Source file <PSOADDR.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 6 DD^%DT  C^%DTC  ^DIC  FIELD^DID  EN^DIQ1  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Outpatient Pharmacy 1 EN^PSOPATLK  
Registration 1 PID^VADPT6  

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

Package Total Caller Graph
Outpatient Pharmacy 1 PSO ADDRESS CHANGE REPORT  

Entry Points

Name Comments DBIA/ICR reference
ALL ;Print report for all patients
EN ;
END ;
NAME ;Set name(ssn)
MESS ;
REP ;
PROT ;Set value of protocol or option
PRALL ;Print data for all patients
ONE ;Print report for one patient
USR ;Set user value
DATE ;
CON ;
FLD ;Set field value
HD ;
PRONE ;Print data for one patient

External References

Name Field # of Occurrence
DD^%DT DATE+7, DATE+11, ALL+14, ONE+15
C^%DTC DATE+8, DATE+12
^%ZIS DATE+13
^%ZISC END+6
^%ZTLOAD DATE+15
^DIC USR+2
FIELD^DID FLD+1
EN^DIQ1 PROT+4, PROT+6, PROT+7
^DIR EN+10, DATE+5, DATE+9, END+2, HD+2
EN^PSOPATLK EN+13
PID^VADPT6 ONE+9, NAME+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option provides a report that displays changes made to permanent and"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"temporary mailing address information in the PATIENT file (#2). Also changes"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"to the MAIL field (#.03) and the MAIL STATUS EXPIRATION DATE field (#.05)"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"in the PHARMACY PATIENT file (#55) will be displayed."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"Changes can only be displayed if the edits were made using VA FileMan, and the"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"Audit function was turned on for the field(s) at the time of the edit.",!!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !!
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: !,"This report will be sorted by Date/time of edit."
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !,"This report will be sorted by Patient Name, and within Patient Name will be",!,"sorted by Date/time of edit."
  • Line Location: DATE+3
Function Call: WRITE
  • Prompt: !,"A beginning and ending date must now be entered for the search."
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+9
Function Call: WRITE
  • Prompt: !!,"Report queued to print.",!
  • Line Location: DATE+15
Function Call: WRITE
  • Prompt: !!,"No data found to print for this date range.",!
  • Line Location: ALL+10
Function Call: WRITE
  • Prompt: !!,"No data found to print for this date range.",!
  • Line Location: ONE+12
Function Call: WRITE
  • Prompt: !!,"End of Report."
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !!,"End of Report."
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !
  • Line Location: END+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: ?67,"PAGE: "_PSOPAGE
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !,"Address changes for "_$G(PSOASN)
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,"made between "_$G(PSOSDTX)_" and "_$G(PSOEDTX)
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !,PSOLINE
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: !!,"Nothing queued to print.",!
  • Line Location: MESS+1
Function Call: WRITE
  • Prompt: !!," Patient: ",$G(PSONSSN)
  • Line Location: PRALL+2
Function Call: WRITE
  • Prompt: !,"Date/time of edit: ",$G(PSOADATE)
  • Line Location: PRONE+1
Function Call: WRITE
  • Prompt: !," Field edited: ",$G(PSOADFF)
  • Line Location: PRONE+2
Function Call: WRITE
  • Prompt: !," Edited by: ",$G(PSOADUSR)
  • Line Location: PRONE+3
Function Call: WRITE
  • Prompt: !," Option/Protocol: ",$G(PSOAOPT)
  • Line Location: PRONE+4
Function Call: WRITE
  • Prompt: !," Patient (cont.): ",$G(PSONSSN)
  • Line Location: CON+1
Routine Call
  • DIC
  • Line Location:
    • USR+2
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • DATE+5
    • DATE+9
    • END+2
    • HD+2
Routine Call
  • %ZIS
  • Line Location:
    • DATE+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIA - [#1.1] ALL+2, ALL+3, ONE+2, ONE+3, PRONE+5, PRONE+6, PROT+2, PROT+3, PROT+5
^DIA(2 ALL+6
^DIA(55 ALL+8
^DPT - [#2] ALL+4, ONE+9
^TMP("PSOADD" REP+1!, ALL+6*, ALL+8*, ALL+10, ALL+11, ALL+12, ALL+15, ONE+6*, ONE+8*, ONE+12
, ONE+13, ONE+16, END+1!

Label References

Name Line Occurrences
CON PRONE+1, PRONE+2, PRONE+3, PRONE+4, PRONE+5, PRONE+6
DATE EN+12
END ALL+10, ALL+18, ONE+12
FLD ALL+16, ONE+17
HD ALL+9, ALL+13, ONE+11, ONE+14, PRALL+2, PRONE+1, PRONE+2, PRONE+3, PRONE+4, PRONE+5
, PRONE+6
MESS EN+10, EN+13, DATE+6, DATE+10, DATE+13
NAME ALL+11
ONE REP+6
PRALL ALL+17
PRONE ONE+18

Naked Globals

Name Field # of Occurrence
^(0 ALL+3
^(2 PRONE+5
^(3 PRONE+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DATE+13!*, DATE+15!
DA PROT+4*!, PROT+6*!, PROT+7*!
DFN REP+2~, ONE+9*, NAME+1*
DIC EN+13!, USR+2!*, PROT+4!*, PROT+6!*, PROT+7!*
DIC("A" EN+13*
DIC(0 EN+13*, USR+2*
DIQ PROT+4!*, PROT+6*!, PROT+7!*
DIQ(0 PROT+4*, PROT+6*, PROT+7*
DIR EN+8!, EN+10!, DATE+5!, DATE+9!, END+2!, HD+2!
DIR("?" EN+8*, EN+9*, DATE+5*, DATE+9*
DIR("A" EN+8*, DATE+5*, DATE+9*, END+2*, HD+2*
DIR("B" EN+8*
DIR(0 EN+8*, DATE+5*, DATE+9*, END+2*, HD+2*
DR PROT+4*!, PROT+6*!, PROT+7*!
>> DTOUT EN+10, EN+13, DATE+6, DATE+10
>> DUOUT EN+10, EN+13, DATE+6, DATE+10
IO REP+3
IO("Q" DATE+14
IOF END+5, HD+4
IOP DATE+13!
IOSL ALL+13, ONE+14, PRALL+2, PRONE+1, PRONE+2, PRONE+3, PRONE+4, PRONE+5, PRONE+6
IOST REP+4
POP DATE+13!
PSOAALL REP+2~, ALL+2*, ALL+6, ALL+8
PSOADATE REP+2~, ALL+14*, ONE+15*, PRONE+1
PSOADF REP+2~, FLD+1!
PSOADF("LABEL" FLD+2
PSOADFF REP+2~, PRONE+2, FLD+2*
PSOADFN REP+2~, ALL+3*, ALL+4, ALL+6, ALL+8
PSOADLP REP+2~, ALL+2*, ALL+3, ALL+6, ALL+8, ONE+2*, ONE+3, ONE+6, ONE+8
PSOADND REP+2~, ALL+15*, ONE+16*, FLD+1, USR+1
PSOADUSR REP+2~, PRONE+3, USR+1*, USR+2*, USR+3*
PSOADX REP+2~, ONE+13*, ONE+15, ONE+16
PSOADXX REP+2~, ALL+12*, ALL+15, ONE+13*, ONE+16, PRONE+5, PRONE+6, PROT+2, PROT+3, PROT+5
PSOAFLAG REP+2~, REP+4*, HD+1*, PRALL+1*, CON+1*
PSOANAME REP+2~, ALL+4*, ALL+6, ALL+8
PSOANODE REP+2~, ONE+3*, ONE+4, ONE+6, ONE+8
PSOAOPT REP+2~, PRONE+4, PROT+1*, PROT+2*, PROT+8*
PSOAOPTA REP+2~, PROT+3*, PROT+4, PROT+5*, PROT+6, PROT+7
PSOAOPTB REP+2~, PROT+1*, PROT+4*, PROT+8
PSOAOPTC REP+2~, PROT+1*, PROT+6*, PROT+7*, PROT+8
PSOAOPTZ REP+2~, PROT+4!, PROT+6!, PROT+7!
PSOAOPTZ(101 PROT+6
PSOAOPTZ(19 PROT+4, PROT+7
PSOAPAT EN+1~, EN+14*, ONE+2, ONE+9
PSOASN REP+2~, ONE+9*, HD+6
PSOC REP+2~, ALL+3*, ALL+5, ALL+7, ONE+2*, ONE+5, ONE+7
PSODEV REP+2~, REP+4*, END+2, END+3, END+4, HD+2, HD+3
PSOEDT EN+1~, DATE+11*, DATE+12*, ALL+2, ONE+4
PSOEDTX EN+1~, DATE+11*, HD+8
PSOFILE ALL+1~, ALL+2*, ALL+3, ALL+5, ALL+6, ALL+7, ALL+8, ALL+12*, ALL+15, ONE+1~
, ONE+2*, ONE+3, ONE+5, ONE+6, ONE+7, ONE+8, ONE+13*, ONE+16, PRONE+5, PRONE+6
, FLD+1, PROT+2, PROT+3, PROT+5
PSOFORM EN+1~, EN+11*, EN+12, DATE+2, DATE+3, REP+6, HD+1, HD+6, CON+1
PSOLINE REP+2~, REP+5*, HD+9
PSONB REP+2~, ALL+11*, ALL+12, ALL+14, ALL+15
PSONI REP+2~, ALL+11*, ALL+12, ALL+15, NAME+2
PSONSSN REP+2~, NAME+2*, PRALL+2, CON+1
PSONX REP+2~, ALL+11*, ALL+12, ALL+15, NAME+1
PSOPAGE REP+2~, REP+4*, HD+2, HD+3, HD+5*
PSOPTLK EN+13!
PSOSDT EN+1~, DATE+7*, DATE+8*, DATE+9, ALL+2, ONE+4
PSOSDTX EN+1~, DATE+7*, HD+8
PSOUT REP+2~, REP+4*, ALL+11, ALL+12, ALL+13, ONE+13, ONE+14, END+2, HD+2*, PRALL+2
, PRONE+1, PRONE+2, PRONE+3, PRONE+4, PRONE+5
VA REP+2~, ONE+9!, ONE+10!, NAME+1!, NAME+3!
VA("PID" ONE+9, NAME+2
X EN+1~, DATE+8, DATE+12, USR+2*
X1 EN+1~, DATE+8*, DATE+12*
X2 EN+1~, DATE+8*, DATE+12*
Y EN+1~, EN+10, EN+11, EN+13*, EN+14, DATE+6, DATE+7, DATE+10, DATE+11, ALL+14*
, ONE+15*, HD+2, USR+2
>> ZTDESC DATE+15*
>> ZTQUEUED END+6
>> ZTREQ END+6*
>> ZTRTN DATE+15*
>> ZTSAVE("PSOAPAT" DATE+15*
>> ZTSAVE("PSOEDT" DATE+15*
>> ZTSAVE("PSOEDTX" DATE+15*
>> ZTSAVE("PSOFORM" DATE+15*
>> ZTSAVE("PSOSDT" DATE+15*
>> ZTSAVE("PSOSDTX" DATE+15*
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