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

Package: Auto Replenishment Ward Stock

Routine: PSGWBOA


Information

PSGWBOA ;BHAM ISC/CML-Print Backorder Report by AOU or Item (ALL Current Backorders) ; 03 Sep 93 / 12:23 PM

Source Information

Source file <PSGWBOA.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
DEV
ENQ ;ENTRY POINT WHEN QUEUED
BUILD ;
SETGL ;
PRTQUE ;AFTER DATA IS COMPILED, QUEUE THE PRINT
PRT1 ;
DONE
QUIT ;
PRT2
DATA ;
TOT ;
HDR ;
INACT
PRTCHK ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will print a list of ALL Current Backorders.",!
  • Line Location: PSGWBOA+2
Function Call: READ
  • Formatting: !
  • Prompt: "Do you want to sort by (A)rea of Use or by (I)tem? "
  • Variable: SORT
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: *7,!?5,"Enter 'A' to sort by Area of Use, 'I' to sort by Item, or '^' to Exit.",!
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Right margin for this report is 80 columns.",!,"You may queue the report to print at a later time.",!!
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+0
Function Call: WRITE
  • Prompt: !?17,"***** NO DATA AVAILABLE FOR THIS REPORT *****"
  • Line Location: PRT1+2
Function Call: WRITE
  • Prompt: !!,"=> ",S1
  • Line Location: PRT1+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: !?7,S2
  • Line Location: DATA+2
Function Call: WRITE
  • Prompt: ?53,Y,?73,$J(CB,6),!?17,LOC
  • Line Location: DATA+3
Function Call: WRITE
  • Prompt: ?40,LOC,?54,Y,?73,$J(CB,6)
  • Line Location: DATA+4
Function Call: WRITE
  • Prompt: !?72,"-------",!?66,"TOTAL:",?72,$J(TOT,7)
  • Line Location: TOT+1
Function Call: WRITE
  • Prompt: !?25,"PHARMACY BACKORDER LIST BY ITEM",?71,"PAGE: ",PG,!?28,"PRINTED: ",HDT,!!,"=> ","ITEM",?56,"DATE/TIME FOR",?72,"CURRENT",!?12,"AOU",?42,"LOCATION",?58,"BACKORDER",?71,"BACKORDER",!,LN
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?26,"PHARMACY BACKORDER LIST BY AOU",?71,"PAGE: ",PG,!?28,"PRINTED: ",HDT,!!,"=> ","AOU",!?12,"ITEM",?56,"DATE/TIME FOR",?72,"CURRENT",!?19,"LOCATION",?58,"BACKORDER",?71,"BACKORDER",!,LN
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: INACT+0
Function Call: WRITE
  • Prompt: "** Indicates an Inactive AOU"
  • Line Location: INACT+1
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: PRTCHK+1

FileMan Files Accessed Via FileMan Db Call

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