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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSDNARC

Package: Controlled Substances

Routine: PSDNARC


Information

PSDNARC ;BIR/JPW-Enter/Edit Narcotic Breakdown Info ; 8 Aug 94

Source Information

Source file <PSDNARC.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIE  
Controlled Substances 1 ^PSDSET  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Controlled Substances 1 PSD NARC EDIT  

Entry Points

Name Comments DBIA/ICR reference
DIE ;edit narcotic breakdown unit and package size
SEL ;select disp. vault in file 58.8
END
NARC ;

External References

Name Field # of Occurrence
^DIC SEL+2, DIE+3
^DIE DIE+6
^PSDSET PSDNARC+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Enter Narcotic Breakdown Unit and Package Size for Stock Drugs"
  • Line Location: PSDNARC+3
Function Call: WRITE
  • Prompt: !!,"Dispensing Site: ",PSDSN,!
  • Line Location: PSDNARC+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !!,"There are no stocked drugs for this Dispensing Site!!",!!
  • Line Location: DIE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DIE+2
Function Call: WRITE
  • Prompt: ?45," *** INACTIVE ***"
  • Line Location: DIE+5
Routine Call
  • DIE
  • Line Location:
    • DIE+6
Routine Call
  • DIC
  • Line Location:
    • SEL+2
    • DIE+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSD(58.8 - [#58.8] DIE+1, DIE+5

Label References

Name Line Occurrences
DIE PSDNARC+5, SEL+4, DIE+7
END PSDNARC+5, SEL+2, SEL+4
SEL SEL+5

Naked Globals

Name Field # of Occurrence
^(0 DIE+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA NARC+1!, END!, DIE+2!, DIE+6!*
DA(1 DIE+3*, DIE+6*
DIC NARC+1!, SEL+1*, SEL+2!, END!, DIE+2!, DIE+3*!
DIC("A" SEL+1*
DIC("B" NARC+1*
DIC("S" SEL+1*
DIC("W" DIE+2*
DIC(0 SEL+1*, DIE+3*
DIE END!, DIE+6!*
DR END!, DIE+6!*
DT DIE+5
DTOUT END!, DIE+3
DUOUT END!, DIE+3
PSDOUT PSDNARC+5*, NARC+1*, SEL+4, END!, DIE+3*
PSDR END!, DIE+5*, DIE+6
PSDS PSDNARC+4*, SEL+3*, END!, DIE+1, DIE+3, DIE+5, DIE+6
>> PSDSITE PSDNARC+2, PSDNARC+4, PSDNARC+5, NARC+1, SEL+3*
PSDSN PSDNARC+4*, PSDNARC+5, END!
SITE END!
U PSDNARC+4, PSDNARC+5, NARC+1, SEL+3
X END!
Y SEL+2, SEL+3, END!, DIE+4, DIE+5
Y(0 DIE+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All