Routine: PSGWATR1

Information

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

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

Package	Total	Caller Graph
Auto Replenishment Ward Stock	1	PSGWATR

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

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

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

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!