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

Package: Controlled Substances

Routine: PSDACT2


Information

PSDACT2 ;BIR/JPW-Print Daily Activity Log (cont'd) ; 2 Aug 94

Source Information

Source file <PSDACT2.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT ;prints data
DONE
END ;
HDR ;header
PAGE ;page stop after each drug

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?15,"**** NO DAILY ACTIVITY ****",!!
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,?5,"=> ",PSDRG,?115,$P(NODE,"^")
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: " (RTS)"
  • Condition for execution: $P(NODE,"^",6)=1
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: ?115,$P(NODE,"^")+$P(NODE,"^",4),?128,$P(NODE,"^",5)
  • Line Location: PRINT+9
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: !,?20,"Daily Activity Log for ",PSDSN,?115,"Page: ",PG,!,?20,"Date: ",$P(PSDATE,"^")," to ",$P(PSDATE,"^",2),!!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "DATE/TIME",?22,"NUMBER",?45,"TYPE OF ACTIVITY",?95,"QUANTITY",?115,"BALANCE",?128,"BY",!,LN,!!
  • Line Location: HDR+3
Info |  Source |  Entry Points |  Interaction Calls