Routine: PRCPSMSI

Package	Total	Call Graph
IFCAP	7	CODESHT^PRCPSMGO DQ^PRCPSMPI P^PRCPUREP ^PRCPUSEL $$INVNAME^PRCPUX1 $$ISMSFLAG^PRCPUX2 $$YN^PRCPUYN
VA FileMan	2	DD^%DT IX^DIC
Kernel	1	^%ZIS

Entry Points

Name	Comments	DBIA/ICR reference
TRANREG
Q

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"THIS OPTION SHOULD ONLY BE USED BY THE WAREHOUSE INVENTORY POINT." Line Location: PRCPSMSI+4
Function Call: WRITE	Prompt: !,"YOU NEED TO TURN THE ISMS SWITCH 'ON' BEFORE YOU CAN USE THIS OPTION." Line Location: PRCPSMSI+5
Function Call: READ	Variable: X Timeout: DTIME Line Location: TRANREG+0
Function Call: WRITE	Prompt: !!,"Select TRANSACTION (2237) NUMBER: " Line Location: TRANREG+0
Function Call: WRITE	Prompt: @IOF,!,"Select the TRANSACTION NUMBER from the list below:",! Line Location: TRANREG+2
Function Call: WRITE	Prompt: !,$P(^(0),U,19) Line Location: TRANREG+4
Function Call: WRITE	Prompt: @IOF,"Select the TRANSACTION NUMBER from the list below:",! Line Location: TRANREG+5
Function Call: WRITE	Prompt: !!,"TRANSACTION NUMBER: ",TRANNO,?40,"DATE DISTRIBUTED: ",Y,!?40,"INVENTORY POINT : ",$E(INVPT,1,23) Line Location: TRANREG+8
Function Call: WRITE	Prompt: !?5,"...creating code sheets" Line Location: TRANREG+9
Function Call: WRITE	Prompt: " NO code sheets created!" Line Location: TRANREG+10
Function Call: WRITE	Prompt: @IOF,!,"THE FOLLOWING CODE SHEETS WILL BE TRANSMITTED FOR ISSUES:" Line Location: TRANREG+11
Function Call: WRITE	Prompt: !?6,^(COUNT) Line Location: TRANREG+12
Function Call: WRITE	Prompt: @IOF Line Location: TRANREG+12
Routine Call	DIC Line Location: TRANREG+1
Routine Call	%ZIS Line Location: PRCPSMSI+7

FileNo	Call Tags
^PRCP(445.2 - [#445.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DISV(	TRANREG
^PRCP(445.2 - [#445.2]	TRANREG, TRANREG+3, TRANREG+4, TRANREG+7
^PRCS(410 - [#410]	TRANREG+6
^TMP($J	PRCPSMSI+7!, TRANREG+10, TRANREG+12, Q!

Name	Line Occurrences
Q	TRANREG+13, TRANREG+14, TRANREG+16
TRANREG	TRANREG+2

Name	Field # of Occurrence
^(	TRANREG+12
^(0	TRANREG+4

Name	Field # of Occurrence
%	PRCPSMSI+6~, TRANREG+4, TRANREG+6
COUNT	PRCPSMSI+6~, TRANREG+12*
>> D	TRANREG+1*
DATA	PRCPSMSI+6~, TRANREG+1!, TRANREG+2!, TRANREG+7*
DATA(	TRANREG+4*
DELPT	PRCPSMSI+6~, TRANREG+6*
DIC	TRANREG+1*!
DIC("S"	TRANREG+1*
DIC("W"	TRANREG+1*
DIC(0	TRANREG+1*
DISYS	PRCPSMSI+6~
DTIME	TRANREG
DUZ	TRANREG
INVPT	PRCPSMSI+6~, TRANREG+7*, TRANREG+8
IOF	TRANREG+2, TRANREG+5, TRANREG+11, TRANREG+12
IOP	PRCPSMSI+7*!
IOSL	TRANREG+5, TRANREG+12
>> PRC("SITE"	PRCPSMSI+5, TRANREG+17
>> PRCP("DPTYPE"	PRCPSMSI+4
>> PRCP("I"	PRCPSMSI+3
PRCPFLAG	PRCPSMSI+6~, TRANREG+2!, TRANREG+3, TRANREG+5, TRANREG+9!, TRANREG+12, TRANREG+13
PRCPPRIV	TRANREG+1*!
PRCPWAIT	PRCPSMSI+6~, TRANREG+9*
SCREEN	PRCPSMSI+6~, PRCPSMSI+8*, TRANREG+1, TRANREG+3
TOTAL	PRCPSMSI+6~, TRANREG+12*, TRANREG+14
TRANID	PRCPSMSI+6~, TRANREG+7*, TRANREG+9
TRANNO	PRCPSMSI+6~, TRANREG+6*, TRANREG+8, TRANREG+9
U	TRANREG+4
VOUCHER	PRCPSMSI+6~, TRANREG+7*, TRANREG+17
WRITE	PRCPSMSI+6~, PRCPSMSI+10*, TRANREG+1, TRANREG+4
X	PRCPSMSI+6~, TRANREG, TRANREG+1, TRANREG+2, TRANREG+3*, TRANREG+6
>> XH	TRANREG+15*
>> XH(1	TRANREG+15*
>> XP	TRANREG+15*
>> XP(1	TRANREG+15*
>> Y	TRANREG+1, TRANREG+3, TRANREG+4, TRANREG+7, TRANREG+8