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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSGWEXR

Package: Auto Replenishment Ward Stock

Routine: PSGWEXR


Information

PSGWEXR ;BHAM ISC/CML-Drug Expiration Date Report by Selected Date Range/AOU ; 26 Oct 95 8:12AM

Source Information

Source file <PSGWEXR.m>

Entry Points

Name Comments DBIA/ICR reference
BDT
EDT
EN
ASKAOU ;
AOUCNT
DEV
START ;ENTRY POINT WHEN QUEUED
PRTQUE ;AFTER DATA IS COMPILED, QUEUE THE PRINT
QUIT
SET ;
ASKSORT ;
HELP ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!,"NO DATA FOUND FOR THIS DATE RANGE!",!
  • Line Location: EDT+2
Function Call: WRITE
  • Prompt: !!?5,"Since you have chosen multiple AOUs,",!?5,"please select a sort order for the report:",!!?5,"(1) Date/Drug/AOU or (2) Date/AOU/Drug"
  • Line Location: AOUCNT+2
Function Call: WRITE
  • Prompt: !!,"The right margin for this report is 80.",!,"You may queue the report to print at a later time.",!!
  • Line Location: AOUCNT+4
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+0
Function Call: READ
  • Formatting: !!
  • Prompt: "Enter '1' or '2' or ""^"" to Exit ==> "
  • Variable: SORT
  • Timeout: DTIME
  • Line Location: ASKSORT+1
Function Call: WRITE
  • Prompt: !!,?5,"Enter '1' to sort by Expiration Date, then Drug, then AOU.",!?5,"Enter '2' to sort by Expiration Date, then AOU, then Drug.",!?5,"Enter ""^"" to Exit."
  • Line Location: HELP+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSI(58.1 - [#58.1] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call