Routine: PRCPRIT0

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

PRCPRIT0 ;WISC/RFJ-display item ; 10/19/06 9:02am

Source Information

Source file <PRCPRIT0.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
IFCAP	4	DQ^PRCPRIT1 $$TO^PRCPUDPT $$ITEM^PRCPUITM ^PRCPUSEL
Kernel	2	^%ZIS ^%ZTLOAD

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
IFCAP	1	PRCP DISPLAY ITEM

Entry Points

Name	Comments	DBIA/ICR reference
ITEM

External References

Name	Field # of Occurrence
^%ZIS	ITEM+4
^%ZTLOAD	ITEM+4
DQ^PRCPRIT1	ITEM+8
$$TO^PRCPUDPT	PRCPRIT0+7
$$ITEM^PRCPUITM	ITEM+3
^PRCPUSEL	PRCPRIT0+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Enter the DISTRIBUTION POINT to select an item from the distribution point, or",!,"Enter <RETURN> to select an item from the ",PRCP("IN")," inventory point." Line Location: PRCPRIT0+6
Function Call: WRITE	Prompt: !!,"<> please wait <>" Line Location: ITEM+7
Routine Call	%ZIS Line Location: ITEM+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRCP(445 - [#445]	PRCPRIT0+5

Label References

Name	Line Occurrences
ITEM	PRCPRIT0+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PRCPRIT0+4~, PRCPRIT0+7*, ITEM+2
>> %ZIS	ITEM+4*
INVPT	PRCPRIT0+4~, PRCPRIT0+5, PRCPRIT0+7, ITEM+3
IO("Q"	ITEM+4!
ITEMDA	PRCPRIT0+4~, ITEM+3*
ODIFLAG	PRCPRIT0+4~, ITEM, ITEM+2
>> POP	ITEM+4
>> PRCP("DPTYPE"	ITEM+1
>> PRCP("I"	PRCPRIT0+3, PRCPRIT0+5, PRCPRIT0+7
>> PRCP("IN"	PRCPRIT0+6
>> ZTDESC	ITEM+5*
>> ZTRTN	ITEM+5*
>> ZTSAVE("INVPT"	ITEM+6*
>> ZTSAVE("ITEMDA"	ITEM+6*
>> ZTSAVE("O*"	ITEM+6*
>> ZTSAVE("PRCP*"	ITEM+6*
>> ZTSAVE("ZTREQ"	ITEM+6*
ZTSK	ITEM+4!