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

Package: Outpatient Pharmacy

Routine: PSOPRI


Information

PSOPRI ;BIR/JLC - INTERNET PRESCRIPTION REFILL PROCESSOR ;3/27/06 2:23pm

Source Information

Source file <PSOPRI.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Outpatient Pharmacy 3 (ASK,PROCESSX,PT,PTC,REFILL)^PSOBBC  (,FINAL)^PSOLSET  PROFILE^PSORX1  
VA Fileman 2 ^DIE  ^DIR  
Kernel 1 (BMES,MES)^XPDUTL  
Pharmacy Data Management 1 (PSOL,PSOUL)^PSSLOCK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSO INTERNET REFILLS  

Entry Points

Name Comments DBIA/ICR reference
END
ULK ;
IPR5
IPR4
IPR6
IPR10
IPR3
IPR
START

External References

Name Field # of Occurrence
^DIE IPR5+1
^DIR START+14, IPR, IPR+2
ASK^PSOBBC START+19
PROCESSX^PSOBBC IPR6+7, END
PT^PSOBBC IPR6+8
PTC^PSOBBC IPR6+9
REFILL^PSOBBC IPR6+11
^PSOLSET START+15
FINAL^PSOLSET END+1
PROFILE^PSORX1 IPR6+10
PSOL^PSSLOCK IPR10+1
PSOUL^PSSLOCK ULK+2
BMES^XPDUTL START+1
MES^XPDUTL START+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Looking for refill requests for inactive Outpatient divisions..."
  • Line Location: START+6
Function Call: WRITE
  • Prompt: ".none found.",!
  • Line Location: START+11
Function Call: WRITE
  • Prompt: !?5,$P($G(^PS(59,+$G(PSOVX),0)),"^")
  • Line Location: START+13
Function Call: WRITE
  • Prompt: !!!?20,"Division: "_$P(^PS(59,PSOSITE,0),"^"),!!
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !!?7,$C(7),"There are no internet refills to process."
  • Line Location: START+18
Function Call: WRITE
  • Prompt: !
  • Line Location: IPR+0
Function Call: WRITE
  • Prompt: !?7,$C(7),$C(7),$C(7),"Not from this institution.",!
  • Line Location: IPR6+2
Function Call: WRITE
  • Prompt: !,$C(7),"Rx data is not on file!",!
  • Line Location: IPR6+4
Function Call: WRITE
  • Prompt: !,$C(7),"Rx has already been deleted."
  • Line Location: IPR6+5
Function Call: WRITE
  • Prompt: !,$C(7),"Rx has already been entered."
  • Line Location: IPR6+6
Function Call: WRITE
  • Prompt: !!,"Your Outpatient Site parameters have been deleted because you selected an",!,"inactive Outpatient Site!",!
  • Line Location: END+1
Routine Call
  • DIE
  • Line Location:
    • IPR5+1
Routine Call
  • DIR
  • Line Location:
    • START+14
    • IPR
    • IPR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(52.43 - [#52.43] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.43 - [#52.43] START+7, START+8, START+10, START+18, IPR3, IPR3+2, IPR3+3, IPR4, IPR5, IPR5+2!
^PS(59 - [#59] START+5, START+13, START+16, END+1
^PSRX - [#52] START+9, IPR6+4, IPR6+5, IPR6+8, IPR3+3, IPR10
^XTMP("PSOATRF" START, START+3

Label References

Name Line Occurrences
END START+12, START+15, START+18, START+19, IPR, IPR+1, IPR+2, IPR6+1
IPR3 IPR6+1
IPR5 IPR6, IPR3+3
IPR6 IPR6+4, IPR6+5, IPR6+6, IPR6+8, IPR6+9, IPR6+11
ULK IPR6+1, IPR6+4, IPR6+5, IPR6+6, IPR6+8, IPR6+9, IPR6+11

Naked Globals

Name Field # of Occurrence
^("I" START+5, END+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA IPR5!*, IPR5+2
DIE IPR5!, IPR5+1*
DIR START+14!, IPR!, IPR+2!, END+2!
DIR("A" START+14*, IPR*, IPR+2*
DIR("B" IPR*, IPR+2*
DIR(0 START+14*, IPR*, IPR+2*
>> DIRUT IPR, IPR+2
DR IPR5!, IPR5+1*
DT START+5, IPR5+1, END+1
PSOANS START+18*, IPR*, IPR+1*, IPR+2*, IPR6, IPR6+1, IPR3, IPR3+1*, IPR4, END+2!
PSOANS2 IPR+2*, IPR10, END+2!
PSOBBC END+2!
PSOBBC("DFLG" START+17*, IPR6+8, IPR6+9, IPR5+1
PSOBBC("DONE" IPR6+6, IPR6+11*
PSOBBC("IRXN" IPR6+3*, IPR6+4, IPR6+5, IPR6+6, IPR6+8, IPR6+11, IPR3!
PSOBBC("OIRXN" IPR6+3*
PSOBBC("QFLG" START+17*, START+19, IPR6+7
PSOBBC1 END+2!
PSOBBC1("FROM" START+17*
PSODFN IPR6+8, END+2!
>> PSOIEN START+8*, START+10, IPR3+2*, IPR3+3, IPR4
>> PSOINST START+18, IPR3, IPR3+2, IPR4, IPR5, IPR5+2
PSOISITE START+4!, START+9*, START+10, END+2!
PSOMHV IPR6, IPR6+11*, END+2!
PSOMSG IPR10+1!, IPR10+2!
PSONOF START+4!, IPR3+3*!, IPR5+1
>> PSOPAR START+15
PSOPSORX IPR10+1*!, END+2!, ULK+1, ULK+2, ULK+3!
PSOPTRX IPR*, IPR+1*, IPR6, IPR3*, IPR3+1, IPR3+2, IPR3+3, IPR4, IPR10, IPR10+1
, IPR5, IPR5+2, END+2!
PSOSELSE IPR6+8*!, IPR6+9!, IPR6+10!
>> PSOSITE START+16, IPR10, END+1
PSOVEX START+3*, END+2!
PSOVEXFL START+4!, START+10*, START+11, START+12, END+2!
PSOVEXI START+4!, END+2!
PSOVEXI( START+5*, START+9, START+10*, START+13
PSOVEXI(0 START+6
PSOVIN START+7*, START+8, END+2!
PSOVX START+5*, START+13*, END+2!
PSOVXLP START+7*, START+8, START+9, END+2!
PSOXFLAG IPR3!, IPR10+2*, END+2!
X IPR6+3, IPR6+7!, IPR4*, END+2!
Y START+12, START+14, IPR+1, IPR+2, IPR6+7!, END+2!
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