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

Package: Drug Accountability

Routine: PSADRUG


Information

PSADRUG ;BIR/LTL-Add/edit Pharmacy Location drugs ;7/23/97

Source Information

Source file <PSADRUG.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 NOW^%DTC  ^DIC  ^DIE  ^DIR  
Drug Accountability 3 ^PSADA  ^PSAPSI4  START^PSATI  
IFCAP 1 ($$DESCR,$$INVNAME,$$UNITCODE)^PRCPUX1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

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

Entry Points

Name Comments DBIA/ICR reference
NOINV
NOT
DRUG
DISP
MON
FIND
AGAIN
QUIT

External References

Name Field # of Occurrence
NOW^%DTC DISP+3
^DIC NOINV+1, MON+1, FIND+1, FIND+6
^DIE DRUG+8, MON+2, FIND+3
^DIR NOT+1, AGAIN
$$DESCR^PRCPUX1 NOT+7, NOT+10
$$INVNAME^PRCPUX1 NOT+11
$$UNITCODE^PRCPUX1 NOT+13
^PSADA PSADRUG+6
^PSAPSI4 AGAIN
START^PSATI NOT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: NOINV+1
Function Call: WRITE
  • Prompt: !?10,"**This drug is not linked to the ITEM MASTER file**",!?12,"To automate receiving, a link is needed.",!
  • Line Location: NOT+0
Function Call: WRITE
  • Prompt: !!,"**",PSAIT(2),", from the DRUG file is linked to",!!,$$DESCR^PRCPUX1($G(PSAINV),PSA(1))," from the ITEM MASTER file",!!," but has NOT been added to a linked Inventory Point.**"
  • Line Location: NOT+7
Function Call: WRITE
  • Prompt: "from the DRUG file is only offered as an initial balance",!,"and is NOT updated."
  • Line Location: DRUG+6
Function Call: WRITE
  • Prompt: !!,"Current balance: "_$P(^PSD(58.8,PSALOC,1,PSAIT,0),U,4)," ",$P(PSAIT(4),U,8),!
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !,"Updating beginning balance and transaction history.",!
  • Line Location: MON+3
Function Call: WRITE
  • Prompt: !
  • Line Location: AGAIN+0
Routine Call
  • DIC
  • Line Location:
    • NOINV+1
    • MON+1
    • FIND+1
    • FIND+6
Routine Call
  • DIE
  • Line Location:
    • DRUG+8
    • MON+2
    • FIND+3
Routine Call
  • DIR
  • Line Location:
    • NOT+1
    • AGAIN

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(51.5 - [#51.5] DRUG+3
^PRCP(445 - [#445] NOT+6, NOT+12
^PS(52.6 - [#52.6] AGAIN
^PS(52.7 - [#52.7] AGAIN
^PSD(58.8 - [#58.8] NOINVNOT+2, NOT+6, NOT+18, DRUG+5, DRUG+7, DRUG+8, DISPMONMON+1
FIND+4
^PSD(58.81 - [#58.81] MON+4, FIND*, FIND+2
^PSDRUG - [#50] NOINV+2, NOTNOT+2, NOT+4, NOT+5, NOT+17, DRUG+4

Label References

Name Line Occurrences
AGAIN DISP+1
DISP NOT+18
FIND FIND
NOINV AGAIN
QUIT PSADRUG+6, NOINV+1, DRUG+8

Naked Globals

Name Field # of Occurrence
^(0 NOINV*, MON*, FIND+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DISP+3!
DA PSADRUG+5~, DRUG*, MON+2*, FIND+3*, FIND+6!
DA(1 NOINV+1*, DRUG*, MON+1*, MON+2*, FIND+6*
DA(2 MON+1*, MON+2*, FIND+6*
DIC PSADRUG+5~, NOINV+1*!, MON+1*!, FIND+1*, FIND+2!, FIND+5*, FIND+6!
DIC("W" NOINV+1*
DIC(0 NOINV+1*, MON+1*, FIND+1*, FIND+5*
DIE PSADRUG+5~, DRUG*, MON+2*!, FIND+3*!
>> DILOCKTM DRUG+7, MON+4
DINUM PSADRUG+5~, MON+1*, FIND+1*, FIND+5*
DIR PSADRUG+5~, NOT+1!, AGAIN!
DIR("A" NOT+1*, AGAIN*
DIR("B" NOT+1*, AGAIN*
DIR(0 NOT+1*, AGAIN*
DIRUT PSADRUG+5~, NOT+1
DLAYGO PSADRUG+5~, NOINV+1*!, MON+1*!, FIND+1*, FIND+2!, FIND+6*!
DR PSADRUG+5~, DRUG*, MON+2*, FIND+3*
DT MON+1, MON+2
PSA PSADRUG+5~, NOT+18!
PSA(1 NOT+2*, NOT+4*, NOT+5*, NOT+6, NOT+7, NOT+10, NOT+12
PSA(2 DISP+1
PSADT DISP+2~, DISP+3*
PSAINV PSADRUG+5~, NOT+3~, NOT+5*, NOT+6*, NOT+7, NOT+10, NOT+11, NOT+12
PSAIT PSADRUG+5~, NOINV+1*, NOINV+2, NOTNOT+2, NOT+4, NOT+5, NOT+17, NOT+18, DRUG
DRUG+4, DRUG+5, DRUG+7, DRUG+8, DISPMONMON+1, MON+2, FIND+4, FIND+6
AGAIN
PSAIT(1 NOT+8*, NOT+9
PSAIT(2 NOINV+2*, NOT+7, NOT+9
PSAIT(3 NOT+12*, NOT+13, NOT+15, NOT+16
PSAIT(4 NOT+17*, DRUGDRUG+1, DRUG+3, DISP
>> PSALOC PSADRUG+6, NOINVNOINV+1, NOT+2, NOT+6, NOT+18, DRUGDRUG+5, DRUG+7, DRUG+8
DISPMONMON+1, MON+2, FIND+4, FIND+6
>> PSALOCN DRUG+5
PSAT DISP+2~, FIND*, FIND+1, FIND+3, FIND+5
U NOINV+2, NOT+13, NOT+15, NOT+16, NOT+18, DRUGDRUG+1, DRUG+3, DRUG+4, DRUG+5
DISPFIND
X PSADRUG+5~, MON+1*, FIND+1*, FIND+5*
Y PSADRUG+5~, NOINV+1, NOT+1, DRUG+8, AGAIN
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