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

Package: Drug Accountability

Routine: PSADRUGP


Information

PSADRUGP ;BIR/LTL,JMB-Enter/Edit a Drug ;7/23/97

Source Information

Source file <PSADRUGP.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 NOW^%DTC  ^DIC  ^DIE  
Drug Accountability 2 ^PSAPSI4  ^PSAUTL3  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Drug Accountability 2 PSA PV DRUG ENTER/EDIT  PSALOCO  

Entry Points

Name Comments DBIA/ICR reference
DISP
LOC
NOINV
DRUG
GETDRUG
MON
EXIT
FIND

External References

Name Field # of Occurrence
NOW^%DTC DISP+5
^DIC GETDRUG+2, NOINV+2, MON+1, FIND+1, FIND+6
^DIE DRUG+10, DRUG+15, DISP+2, MON+2, FIND+3
^PSAPSI4 DISP+3
^PSAUTL3 LOC+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There are no active pharmacy locations."
  • Line Location: LOC+3
Function Call: WRITE
  • Prompt: !,PSALOCN
  • Line Location: LOC+4
Function Call: WRITE
  • Prompt: !
  • Line Location: GETDRUG+2
Function Call: WRITE
  • Prompt: !,$C(7)," *** INACTIVE ***"
  • Line Location: GETDRUG+5
Function Call: WRITE
  • Prompt: @IOF,!,$G(PSALOCN),!,"DRUG: "_PSADRGN
  • Line Location: DRUG+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DRUG+10
Function Call: WRITE
  • Prompt: !!,"Current balance: "_+$P($G(^PSD(58.8,PSALOC,1,PSADRG,0)),"^",4)," ",$P(PSA660,"^",8)
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !!,"Updating beginning balance and transaction history."
  • Line Location: MON+3
Routine Call
  • DIE
  • Line Location:
    • DRUG+10
    • DRUG+15
    • DISP+2
    • MON+2
    • FIND+3
Routine Call
  • DIC
  • Line Location:
    • GETDRUG+2
    • NOINV+2
    • MON+1
    • FIND+1
    • FIND+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSD(58.81 - [#58.81] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(51.5 - [#51.5] DRUG+4
^PS(52.6 - [#52.6] DISP+3
^PS(52.7 - [#52.7] DISP+3
^PSD(58.8 - [#58.8] GETDRUG+1, GETDRUG+5, GETDRUG+7, GETDRUG+8, NOINV, NOINV+1, DRUG+6, DRUG+9, DRUG+10, DRUG+12
, DRUG+14, DRUG+15, DISP, MON*, MON+1, FIND+4*
^PSD(58.81 - [#58.81] MON+4, FIND*, FIND+2
^PSDRUG - [#50] GETDRUG+4, GETDRUG+6, DRUG+5, DISP+3

Label References

Name Line Occurrences
DISP GETDRUG+5, GETDRUG+9
DRUG GETDRUG+8
EXIT LOC, LOC+2, LOC+3
FIND FIND
GETDRUG DISP+4, FIND+7
LOC GETDRUG+3, DRUG+10
NOINV GETDRUG+7

Naked Globals

Name Field # of Occurrence
^(0 GETDRUG+1*, GETDRUG+5, GETDRUG+8, NOINV+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DISP+5, EXIT!
DA NOINV+2!, DRUG*, DRUG+10!, DRUG+13*, DRUG+15!, DISP+2*, MON+1!, MON+2*!, FIND+3*!, FIND+6!
, EXIT!
DA(1 GETDRUG+2*, NOINV+2*, DRUG*, DRUG+13*, DISP+2*, MON+1*, MON+2*, FIND+6*
DA(2 MON+1*, MON+2*, FIND+6*
DD NOINV+2!
DIC GETDRUG+2*!, NOINV+2*!, MON+1*!, FIND+1*, FIND+2!, FIND+5*, FIND+6!, EXIT!
DIC("W" GETDRUG+2*
DIC(0 GETDRUG+2*, NOINV+2*, MON+1*, FIND+1*, FIND+5*
DIE DRUG*, DRUG+10!, DRUG+13*, DRUG+15!, DISP+2*!, MON+2*!, FIND+3*!, EXIT!
DINUM NOINV+2*!, MON+1*, FIND+1*, FIND+5*, EXIT!
DLAYGO GETDRUG+2*!, NOINV+2*!, MON+1*!, FIND+1*, FIND+2!, FIND+6*!
DO NOINV+2!
DR DRUG*, DRUG+13*, DISP+2*!, MON+2*, FIND+3*, EXIT!
DT GETDRUG+5, MON+1, MON+2
DTOUT GETDRUG+3, EXIT!
DUOUT GETDRUG+3, EXIT!
IOF DRUG+1
PSA660 GETDRUG+6*, DRUG, DRUG+2, DRUG+4, DRUG+8, DISP, EXIT!
PSACHK LOC+2*, LOC+3, LOC+4, EXIT!
PSACNT LOC, LOC+1*, EXIT!
PSADD LOC+1*, EXIT!
PSADRG GETDRUG+4*, GETDRUG+5, GETDRUG+6, GETDRUG+7, GETDRUG+8, NOINV, NOINV+2, DRUG, DRUG+5, DRUG+6
, DRUG+9, DRUG+10, DRUG+13, DRUG+14, DRUG+15, DISP, DISP+2, DISP+3, MON, MON+1
, MON+2, FIND+4, FIND+5, FIND+6, EXIT!
PSADRGN GETDRUG+4*, DRUG+1, DISP+3, EXIT!
PSADT DISP+5*, EXIT!
>> PSAIT DISP+3*
>> PSAIT(2 DISP+3*
>> PSAIT(4 DISP+3*
PSALOC LOC+3, GETDRUG+1, GETDRUG+2, GETDRUG+5, GETDRUG+7, GETDRUG+8, NOINV, NOINV+1, NOINV+2, DRUG
, DRUG+6, DRUG+9, DRUG+10, DRUG+12, DRUG+13, DRUG+14, DRUG+15, DISP, DISP+2, MON
, MON+1, MON+2, FIND+4, FIND+5, FIND+6, EXIT!
PSALOC( LOC+4
PSALOC("" LOC+2
PSALOCA EXIT!
PSALOCN LOC+4, DRUG+1, EXIT!
>> PSAOPT GETDRUG+3
PSAOUT LOC, LOC+1*, LOC+2, GETDRUG+3*, EXIT!
PSAQTY GETDRUG*, DRUG+11*, DISP+4, EXIT!
PSASLN LOC+1*, EXIT!
PSAT FIND*, FIND+1, FIND+3, FIND+5, EXIT!
X NOINV+2*, DRUG+11, MON+1*, FIND+1*, FIND+5*, EXIT!
Y GETDRUG+3, GETDRUG+4, DRUG+10, EXIT!
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