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

Package: Controlled Substances

Routine: PSDTRVR1


Information

PSDTRVR1 ;BIR/JPW-CS Transfer Vaults Report (cont'd) ; 4 Aug 94

Source Information

Source file <PSDTRVR1.m>

Entry Points

Name Comments DBIA/ICR reference
START ;compile data
PRINT ;print transfer between vaults by date
DONE
END ;
HDR ;header for log

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?10,"**** NO TRANSFER BETWEEN VAULTS DATA FOR THIS REPORT ****"
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DONE+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?15,"TRANSFER CS DRUGS BETWEEN DISP SITES REPORT",?70,"Page: ",PG
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?15,"TRANSACTIONS FOR PERIOD ",$P(PSDATE,"^")," TO ",$P(PSDATE,"^",2)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?15,"PRINTED ",RPDT,!!,?2,"=> DRUG",!!,"DATE/TIME TRANSFERRED",?28,"QUANTITY",?40,"TRANSFERRED BY",!,LN,!
  • Line Location: HDR+5
Info |  Source |  Entry Points |  Interaction Calls