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

Package: Outpatient Pharmacy

Routine: PSODIV


Information

PSODIV ;BHAM ISC/SAB - DIVISION LOOKUP AND CHECKS ; 08/20/92 9:11

Source Information

Source file <PSODIV.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Outpatient Pharmacy 2 PSO INTERDIV  PSOSITED  

Entry Points

Name Comments DBIA/ICR reference
END
ANS2
SYN
START
DIV
NS

External References

Name Field # of Occurrence
^DIC DIV
^DIR START+4, ANS2+3, ANS2+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7)," NO SITES HAVE BEEN DEFINED!"
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,$C(7)," Only one site is defined. 'INTERDIVISIONAL' processing is not applicable."
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !,"'INTERDIVISIONAL PROCESSING' is initialized.",!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ANS2+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: ANS2+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DIV+0
Function Call: WRITE
  • Prompt: !!,$C(7),"You must choose a division"
  • Line Location: DIV+0
Function Call: WRITE
  • Prompt: !!,$C(7),"Initialization of 'INTERDIVISIONAL PROCESSING' is complete."
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !,$C(7)," ...Please answer 'Yes' or 'No'!!",!
  • Line Location: SYN+0
Routine Call
  • DIC
  • Line Location:
    • DIV
Routine Call
  • DIR
  • Line Location:
    • START+4
    • ANS2+3
    • ANS2+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(59 - [#59] START, DIV
^PS(59.7 - [#59.7] START+3, START+7*, ANS2+4*, ANS2+7*, DIV, DIV+1*

Label References

Name Line Occurrences
ANS2 START+5
DIV DIV
END START+4, START+7, ANS2+3, ANS2+7, DIV+1
NS DIV

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC DIV*!, END!
DIC("A" DIV*
DIC("B" DIV*
DIC(0 DIV*
DIR ANS2!, ANS2+5!, END!
DIR("?" START+4*, ANS2+3*, ANS2+7*
DIR("A" START+3*, ANS2*, ANS2+1*, ANS2+2*, ANS2+5*
DIR("B" START+3*, ANS2+2*, ANS2+6*
DIR(0 START+3*, ANS2+2*, ANS2+6*
DIROUT START+4, ANS2+3, ANS2+7, END!
DIRUT START+4, ANS2+3, ANS2+7, END!
DTOUT START+4, ANS2+3, ANS2+7, END!
DUOUT START+4, ANS2+3, ANS2+7, END!
I START*, END!
PSOCNT START*, START+1, START+2, END!
>> PSOSYS START+3*, START+5, START+6*, START+7*, ANS2+2, ANS2+4*, ANS2+6, DIV+1*, NS
X DIV, END!
Y START+5, START+6, ANS2+4, ANS2+7, DIV, DIV+1, END!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All