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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
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>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Auto Replenishment Ward Stock 1 ($$PSGWDT,HELP,SS)^PSGWUTL1  
Kernel 1 ^%ZISC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Auto Replenishment Ward Stock 1 PSGWATR  

Entry Points

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

External References

Name Field # of Occurrence
^%ZISC QUIT+1
$$PSGWDT^PSGWUTL1 PSGWATR1+2
HELP^PSGWUTL1 PRTCHK+1
SS^PSGWUTL1 DONE+1

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
  • Timeout: DTIME
  • Variable: ANS
  • 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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PSGWATR1+2, INV+2, OND+2, RET+2
^PSDRUG - [#50] HDR+1
^PSI(58.1 - [#58.1] PSGWATR1+2, HDR+1
^TMP("PSGWATR" QUIT!, INV+1, INV+2, OND+1, OND+2, RET+1, RET+2

Label References

Name Line Occurrences
HDR INV+1, INV+2, OND+1, OND+2, RET+1, RET+2
IHDR INV+1, INV+2
INV PSGWATR1+2
OHDR OND+1, OND+2
OND PSGWATR1+2
PRTCHK INV+2, OND+1, OND+2, RET+1, RET+2
RET PSGWATR1+2
RHDR RET+1, RET+2

Naked Globals

Name Field # of Occurrence
^( INV+2, OND+2, RET+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QUIT!
%H QUIT!
%I QUIT!
%W QUIT!
ADT QUIT!, INV+2*
ANS QUIT!, PRTCHK+1*
AOU PSGWATR1+2, QUIT!, HDR+1
ARDT QUIT!
BDT PSGWATR1+2, QUIT!
C QUIT!
DRGDA PSGWATR1+2*, QUIT!, HDR+1
DTIME PRTCHK+1
EDT PSGWATR1+2, QUIT!
G QUIT!
HBDT PSGWATR1+2*, QUIT!, HDR+1
HDT PSGWATR1+2*, QUIT!, HDR+1
HEDT PSGWATR1+2*, QUIT!, HDR+1
INVDA QUIT!
IOF DONE, HDR+1
IOSL INV+2, OND+2, RET+2
IOST DONE, DONE+1, PRTCHK+1
ITEM PSGWATR1+2, QUIT!
LN PSGWATR1+2*, QUIT!, HDR+1
LN2 PSGWATR1+2*, QUIT!, IHDR+1, OHDR+1, RHDR+1
NODE QUIT!, INV+2*
OD QUIT!, OND+2*
ODDA QUIT!
ODDT QUIT!
PG PSGWATR1+2*, QUIT!, HDR+1*
PSGWIO QUIT!
QD QUIT!, OND+2*, RET+2*
QFLG PSGWATR1+2*, DONE+1, QUIT!, INV+2*, OND+1, OND+2*, RET+1, RET+2*, PRTCHK+1*
RET QUIT!, RET+2*
RETDT QUIT!
TYPE QUIT!
X QUIT!
Y PSGWATR1+2*, QUIT!, INV+2*, OND+2*, RET+2*
>> ZTQUEUED QUIT+2
>> ZTREQ QUIT+2*
ZTSK QUIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All