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

Package: Outpatient Pharmacy

Routine: PSORXI


Information

PSORXI ;IHS/DSD/JCM - logs pharmacy interventions ;29-May-2012 15:12;PLS

Source Information

Source file <PSORXI.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 3 FILE^DICN  ^DIE  ^DIR  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Outpatient Pharmacy 5 PSODGAL  PSODGDG1  PSODGDGI  PSODRG  PSOVER1  
IHS Changes To Pharmacy 3 APSQDGDG  APSQDRG  APSQFAS4  

Entry Points

Name Comments DBIA/ICR reference
EN1(PSOX) ; Entry Point if have internal rx #
END
EDIT ;
DIE ;
EN1X
DIC ;
START ;
INIT ;
EOJ ;
DICX
EDITX

External References

Name Field # of Occurrence
FILE^DICN DIC+9
^DIE DIE+3
^DIR EDIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Now creating Pharmacy Intervention",!
  • Line Location: INIT+1
Function Call: WRITE
  • Prompt: "for "_$P($G(^PSDRUG(PSODRUG("IEN"),0)),"^"),!
  • Line Location: INIT+2
Function Call: WRITE
  • Prompt: $C(7),!!,"See 'Pharmacy Intervention Menu' if you want to delete this",!,"intervention or for more options.",!
  • Line Location: DIE+4
Function Call: WRITE
  • Prompt: !,$C(7),"No prescription data"
  • Line Location: EN1+2
Routine Call
  • DIE
  • Line Location:
    • DIE+3
Routine Call
  • DIR
  • Line Location:
    • EDIT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APSPQA(32.4 - [#9009032.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APSPQA(32.3 - [#9009032.3] DIC+5
^APSPQA(32.4 - [#9009032.4] START+3, DIC+14*, DIE+3
^DD("DILOCKTM" DIE+3
^PSDRUG - [#50] INIT+2
^PSRX - [#52] EN1+2, EN1+3

Label References

Name Line Occurrences
DIC START+1
DICX DIC+15
DIE DIC+16, EDIT+2
EDIT START+2, EDIT+2
EDITX EDIT+1
EN1X EN1+2
END START+1
EOJ END
INIT START+1
START EN1+5

Naked Globals

Name Field # of Occurrence
^(1 DIC+14*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APSPCRI DIC+3~, DIC+5*, DIC+8
APSPINT DIC+3~, DIC+4*, DIC+8, DIC+13
APSPSIG DIC+3~, DIC+5*, DIC+8
DA DIC+1!, DIC+9!, DIE+1!, DIE+2*, DIE+3!
DD DIC+1!
DIC DIC+1!*, DIC+9!, DIE+1!, DIE+3!
DIC("DR" DIC+6*, DIC+8*
DIC(0 DIC+1*
DIE DIE+1!, DIE+2*, DIE+3!
DIR EDIT+1!
DIR("A" EDIT+1*
DIR("B" EDIT+1*
DIR(0 EDIT+1*
>> DIRUT EDIT+1
>> DLAYGO DIC+1*
DO DIC+1!
DR DIC+1!, DIC+9!, DIE+1!, DIE+2*, DIE+3!
>> DRG DIC+14
DT DIC+1
DUZ DIC+6
PSODFN DIC+6, EN1+1~, EN1+4*
PSODRUG EN1+1~
PSODRUG("IEN" INIT+2, DIC+6, EN1+4*
PSONEW EN1+1~
PSONEW("PROVIDER" START+3*, EN1+4*
>> PSORX("INTERVENE" DIC+4
PSORXI INIT+3!, EOJ+1!
PSORXI("DA" START+3, DIC+12*, DIE+2, DIE+3
PSORXI("EDIT" DIE+2, EDIT+2*
PSORXI("IRXN" EN1+3*
PSORXI("QFLG" START+1, INIT+3*, DIC+15*
>> PSOSITE DIC+8
PSOX EN1~, EN1+2, EN1+3
PSOY EN1+1~, EN1+3!*, EN1+4
U DIC+14
X DIC+1!*, DICX!, DIE+3!, EDITX!
Y DIC+1!, DIC+12, DIC+14, DICX!, DIE+3!, EDIT+1, EDITX!
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