Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSDTRV1

Package: Controlled Substances

Routine: PSDTRV1


Information

PSDTRV1 ;BIR/JPW-Transfer CS Drugs between Vaults (cont'd) ; 17 Nov 93

Source Information

Source file <PSDTRV1.m>

Entry Points

Name Comments DBIA/ICR reference
UPDATE ;update vault balances
END
CALC ;sub/add qty from dsp sites
ADD ;find entry number
FIND
DIE ;update transaction data
CHK ;check for valid bal
MSG ;send mailman message with transfer info

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Updating vault on-hand balances now..."
  • Line Location: UPDATE+2
Function Call: WRITE
  • Prompt: "done!",!!
  • Line Location: UPDATE+3
Function Call: WRITE
  • Prompt: $S(CNT=2:VAULTN,1:PSDSN)_"..."
  • Line Location: CALC+1
Function Call: WRITE
  • Prompt: !,"Still updating..."
  • Line Location: DIE+3
Info |  Source |  Entry Points |  Interaction Calls