Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSGWHV

Package: Auto Replenishment Ward Stock

Routine: PSGWHV


Information

PSGWHV ;BHAM ISC/PTD,CML-High Volume for Selected Date Range (Single AOU or Cumulative) ; 19 Mar 93 / 8:30 AM

Source Information

Source file <PSGWHV.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Auto Replenishment Ward Stock 2 ^PSGWHV0  END^PSGWHV1  
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
VA FileMan 2 ^%DT  ^DIC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Auto Replenishment Ward Stock 1 PSGW HIGH VOLUME  

Entry Points

Name Comments DBIA/ICR reference
BDT
EDT
ASKAOU
CUTOFF
ASK
DEV

External References

Name Field # of Occurrence
^%DT BDTEDT
^%ZIS DEV
HOME^%ZIS DEV+2
^%ZTLOAD DEV+2
^DIC ASKAOU
^PSGWHV0 DEV+3
END^PSGWHV1 BDTEDTASKAOUASKDEVDEV+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"You may select a single AOU,",!?5,"or enter ""^ALL"" to get cumulative volume for all AOUs.",!?5,"ALL will show only AOUs with ""Count on AMIS"" field set to ""YES"".",!!
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !!,"The High Volume Report will show all drugs with a total quantity",!,"dispensed greater than a specified cut off amount. It will NOT list",!,"quantities less than the amount you specify below.",!!
  • Line Location: CUTOFF+0
Function Call: READ
  • Formatting: !
  • Prompt: "Select CUT OFF quantity: "
  • Variable: CUT
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: *7,!!,"Enter a whole number between 1 and 9999.",!,"The High Volume Report will NOT show any drug with a total quantity"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !,"dispensed less than the amount entered here. If you enter <return> at the",!,"""Select CUT OFF quantity"" prompt, the report will show ALL drugs.",!
  • Line Location: ASK+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: ASK+3
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+0
Routine Call
  • DIC
  • Line Location:
    • ASKAOU
Routine Call
  • %ZIS
  • Line Location:
    • DEV
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSI(58.1 - [#58.1] Classic Fileman Calls

Label References

Name Line Occurrences
ASK ASK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT BDT*!, EDT*!
%DT("A" BDT*, EDT*
%DT(0 EDT*
%ZIS DEV!*
%ZIS("B" DEV*
>> ALL ASKAOU+1*, ASKAOU+2*
>> AOU ASKAOU+1*, ASKAOU+2*
>> BDT BDT*, EDT
>> CUT ASK*, ASK+1
DIC ASKAOU*!
DIC(0 ASKAOU*
DTIME ASK
>> EDT EDT*
>> G DEV+1*
IO DEV+3
IO("Q" DEV+1!
ION DEV+1
IOP DEV!
>> POP DEV
>> PSGWIO DEV+1*
>> X ASKAOUASKAOU+1
>> Y BDTEDTASKAOUASKAOU+1
>> ZTDESC DEV+1*
ZTDTH DEV+1!
>> ZTIO DEV+1*
>> ZTRTN DEV+1*
ZTSAVE DEV+1!
ZTSAVE( DEV+1*
ZTSK DEV+1!, DEV+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables  | All