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

Package: Controlled Substances

Routine: PSDEVOR


Information

PSDEVOR ;BIR/BJW-Print Edit/Canc Ver Orders Report ; 9 Feb 98

Source Information

Source file <PSDEVOR.m>

Entry Points

Name Comments DBIA/ICR reference
ASKD ;ask disp location
CHKD
DATE
DEV ;sel device
START ;entry for compile
PRINT ;prints data
DONE
END ;
SAVE
HDR ;header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Contact your Pharmacy Coordinator for access to print the Edit Verified",!,"Orders data. PSJ RPHARM security key required.",!!
  • Line Location: PSDEVOR+4
Function Call: WRITE
  • Prompt: !!,"There are no CS stocked drugs for your dispensing vault.",!!
  • Line Location: CHKD+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+0
Function Call: WRITE
  • Prompt: !!,"The ending date of the range must be later than the starting date."
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !!,"This report is designed for a 132 column format.",!,"You may queue this report to print at a later time.",!!
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: !!,"NO DEVICE SELECTED OR REPORT PRINTED!!",!
  • Line Location: DEV+2
Function Call: WRITE
  • Prompt: !!,?15,"**** NO VERIFIED ORDERS EDITED OR CANCELLED ****",!!
  • Line Location: PRINT+2
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,"Edited or Verified Orders for ",PSDSN,?115,"Page: ",PG,!,?20,"Date: ",$P(PSDATE,"^")," to ",$P(PSDATE,"^",2),!!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?70,"ORIG",?78,"NEW",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "DISP #",?10,"DRUG",?52,"ACTION",?62,"DATE",?70,"QTY",?78,"QTY",?86,"MFG/LOT #/EXP.DATE",?110,"PHARMACIST",!,LN,!!
  • Line Location: HDR+4
Info |  Source |  Entry Points |  Interaction Calls