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

Package: Inpatient Medications

Routine: PSIVCSED


Information

PSIVCSED ;BIR/PR-EDIT DRUG COST AND BROADCAST ;04 OCT 94 / 9:42 AM

Source Information

Source file <PSIVCSED.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIE  
Inpatient Medications 1 ^PSIVHLP1  
MailMan 1 ^XMD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Data Management 1 PSSJI EDIT DRUG COST  

Entry Points

Name Comments DBIA/ICR reference
MAIL ;Send mail to holders of PSJI MGR key if drug cost was changed.
K ;
R1 ;Get the file, the drug, and edit the cost.

External References

Name Field # of Occurrence
^DIC R1+2
^DIE R1+2
^PSIVHLP1 R1+1
^XMD MAIL+3

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Indicate if drug is an ADDITIVE (enter A) or a SOLUTION (enter S): "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: FI
  • Line Location: R1+1
Routine Call
  • DIE
  • Line Location:
    • R1+2
Routine Call
  • DIC
  • Line Location:
    • R1+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS( R1+2
^VA(200 - [#200] MAIL+1
^XUSEC("PSJI MGR" MAIL+2
^XUSEC("XUPROG" MAIL+2

Label References

Name Line Occurrences
K R1+1, R1+2
R1 R1+1, R1+2, K+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C1 R1+2*, MAIL+1, K+1!
C2 R1+2*, MAIL+1, K+1!
D K+1!
D0 K+1!
D1 K+1!
DA R1+2*, K+1!
DI K+1!
DIC R1+2*, K+1!
DIC(0 R1+2*
DIE R1+2*, K+1!
DQ K+1!
DR R1+2*, K+1!
DRUG R1+2*, MAIL+1, K+1!
DTIME R1+1
DUZ MAIL+1
DZ K+1!
FI R1+1*, R1+2*, MAIL+1, K+1!
>> HELP R1+1*
I K+1!
MESS K+1!
MESS(1 MAIL+1*
PDUZ MAIL+2*, K+1!
U R1+2, MAIL+1
X K+1!
XCNP K+1!
XMDUZ MAIL+1*, K+1!
XMSUB MAIL+1*, K+1!
XMTEXT MAIL+1*, K+1!
XMY MAIL+2!, MAIL+3, K+1!
XMY( MAIL+2*
XMZ K+1!
Y R1+2, K+1!
Z K+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All