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

Package: Auto Replenishment Ward Stock

Routine: PSGWATR1


Information

PSGWATR1 ;BHAM ISC/CML-Print Item Activity Inquiry (80 column) ; 23 Mar 93 / 12:44 PM

Source Information

Source file <PSGWATR1.m>

Entry Points

Name Comments DBIA/ICR reference
DONE
QUIT
INV ;PRINT INVENTORIES
OND ;PRINT ON-DEMANDS
RET ;PRINT RETURNS
HDR ;
PRTCHK ;
IHDR ;INVENTORY SUBHEADER
OHDR ;ON-DEMAND HEADERS
RHDR ;RETURNS HEADER

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: !?15,"** THERE IS NO INVENTORY DATA FOR THIS DATE RANGE **"
  • Line Location: INV+1
Function Call: WRITE
  • Prompt: !?15,"ID #",+NODE," - "
  • Line Location: INV+2
Function Call: WRITE
  • Prompt: Y,?60,$J($P(NODE,"^",2),7)
  • Line Location: INV+2
Function Call: WRITE
  • Prompt: !?15,"** THERE IS NO ON-DEMAND DATA FOR THIS DATE RANGE **"
  • Line Location: OND+1
Function Call: WRITE
  • Prompt: !?17,Y,?60,$J(QD,7)
  • Line Location: OND+2
Function Call: WRITE
  • Prompt: !?15,"** THERE IS NO RETURNS DATA FOR THIS DATE RANGE **"
  • Line Location: RET+1
Function Call: WRITE
  • Prompt: !?17,Y,?60,$J(QD,7)
  • Line Location: RET+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"ITEM ACTIVITY INQUIRY for period ",HBDT," to ",HEDT,?72,"Page: ",PG,!,"Printed ",HDT,!!,"AOU : ",$P(^PSI(58.1,AOU,0),"^"),!,"ITEM: ",$P(^PSDRUG(DRGDA,0),"^"),!,LN
  • Line Location: HDR+1
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: PRTCHK+1
Function Call: WRITE
  • Prompt: !,"INVENTORIES:",!!?15,"ID # - DATE/TIME FOR INVENTORY",?55,"QUANTITY DISPENSED",!?15,LN2
  • Line Location: IHDR+1
Function Call: WRITE
  • Prompt: !,"ON-DEMAND REQUESTS:",!!?15,"ON-DEMAND REQUEST DATE/TIME",?55,"QUANTITY DISPENSED",!?15,LN2
  • Line Location: OHDR+1
Function Call: WRITE
  • Prompt: !,"RETURNS:",!!?15,"RETURN DATE/TIME",?55,"QUANTITY RETURNED",!?15,LN2
  • Line Location: RHDR+1
Info |  Source |  Entry Points |  Interaction Calls