Routine: PRCST4

Package	Total	Call Graph
VA FileMan	12	^%DT ^DIC E^DIE0 (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ $$GETTMP^DIKC1 ^DIR RW^DIR2 DIEN^DIWE
IFCAP	3	$$GETCCCNT^PRCSECP (CC,VENDOR)^PRCSES ^PRCST41
Engineering	1	ACCX^ENLIB2

Entry Points

Name	Comments	DBIA/ICR reference
DE
W
O
TR
A
B
RE
N
RD
T
P
V
Z
X
QS
D
Y
PR
R
RP
I
SET
SAVEVALS
NKEY
KEYCHK()
BEGIN
1
X1
2
X2
3
X3
4
C4
C4S
X4
5
6
X6
7
C7
C7S
X7
8
X8
9
X9
10
X10
11
12
X12
13
C13
C13S
X13
14
15
C15
C15S
X15
16
X16
17
C17
C17S
X17
18
X18
19
X19
20
X20
21
X21
22
X22
23
X23
24
X24
25
X25
26

External References

Name	Field # of Occurrence
^%DT	X6, X9
^DIC	X3
E^DIE0	I+1, 2+3
^DIE17	RD
F^DIE17	1, 5, 6, 8, 12, 15, 16, 17, 18, 19 , 21, 23, 26
FIREREC^DIE17	1, 12, 16, 19, 21, 23
M^DIE17	T
N^DIE17	RP, 2+3
OUT^DIE17	1, 12, 16, 19, 21, 23
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
$$GETTMP^DIKC1	BEGIN+1
^DIR	SET+2
RW^DIR2	O+1
DIEN^DIWE	11+1
ACCX^ENLIB2	C4S+4
$$GETCCCNT^PRCSECP	X12
CC^PRCSES	X13
VENDOR^PRCSES	X15, X17
^PRCST41	26

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: !?DL+DL-2,DLB_": " Line Location: W+0
Function Call: WRITE	Prompt: W Line Location: O+0
Function Call: WRITE	Prompt: Y Line Location: O+0
Function Call: WRITE	Prompt: !?9 Condition for execution: $X>45 Line Location: O+0
Function Call: WRITE	Prompt: " (No Editing)" Line Location: O+2
Function Call: READ	Variable: X Timeout: DTIME Line Location: TR+0
Function Call: WRITE	Prompt: $C(7) Line Location: TR+0
Function Call: WRITE	Prompt: " "_X Line Location: RD+2
Function Call: WRITE	Prompt: !,"COST CENTER: ",$P(X,U,2) Line Location: X12+0
Routine Call	DIC Line Location: X3
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PRCS(410 - [#410]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	T, R, R+1
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DIE(609	BEGIN+2
^DISV(	RD+2, Z*
^PRC(411 - [#411]	X7
^PRCS(410 - [#410]	DE, C4+2!, C4S+2, C7+2, C7S+2, X12, C13+2!, C13S+2, C15+2!, C15S+2 , C17+2!, C17S+2*
^VA(200 - [#200]	C7S+2

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 1, 2+3, 5, 11+1, 12, 16 , 19, 21, 23
B	QS
BEGIN	PRCST4+1
C13S	C13
C15S	C15
C17S	C17
C4S	C4
C7S	C7
D	RD, RD+1, P+1, QS
DE	PRCST4+1, 1, 5, 6, 8, 12, 15, 16, 17, 18 , 19, 21, 23
N	Y
NKEY	N
O	Y, RP
P	T
PR	RE, I+1
QS	RD, NKEY
R	R, R+1
RD	Y, I, I+1, 2+4
RE	3+2, 4+2, 7+3, 8+2, 9+1, 13+2, 15+2, 17+2, 18+1, 20+1 , 22+1, 24+1, 25+1
RP	PR, R, R+1
SAVEVALS	Z
SET	T
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
X1	1
X12	12
X16	16
X19	19
X21	21
X23	23
Y	6+2, 10+3
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^(0	DE+1, R, R+1
^(1	DE+2
^(11	DE+6
^(12.1	T
^(2	DE+3
^(20	C7S+2
^(3	DE+4
^(7	DE+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, DE+3, DE+4, DE+5, DE+6, T, R+2, SET+2
>> %DT	X6, X9
%Z	DE+1, DE+2, DE+3, DE+4, DE+5, DE+6, DE+7!
>> D	N, D, 11
>> D0	BEGIN+3*
>> DA	DE, BEGIN+3, C4+2, C4S+2, C7+2, C7S+2, X12, C13+2, C13S+2, C15+2 , C15S+2, C17+2, C17S+2
DB	DE!, C4!, C4S!, C7!, C7S!, C13!, C13S!, C15!, C15S!, C17! , C17S!
DB(	T, P, X, SET, SET+1, 2+3*
>> DC	RP, 11+1*
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 2+3 , 4+1, 7+1, 13+1, 15+1, 17+1*
DE(1	11!, 11+1!
DE(10	DE+2*
DE(13	DE+4*, C13, C13+1
DE(15	DE+3*, C15, C15+1
DE(17	DE+3*, C17, C17+1
DE(18	DE+3*
DE(2	DE+1*
DE(20	DE+3*
DE(22	DE+3*
DE(24	DE+3*
DE(25	DE+3*
DE(3	DE+2*
DE(4	DE+6*, C4, C4+1, C4+3
DE(6	DE+2*
DE(7	DE+5*, C7, C7+1
DE(8	DE+4*
DE(9	DE+2*
DG	DE!, PR, R, R+1, R+2, 1, 5, 6, 8, 11+1 , 12, 15, 16, 17, 18, 19, 21, 23, 26
DG(	Z*, C4S, C4S+1, C4S+3, C7S, C7S+1, C13S, C13S+1, C15S, C15S+1 , C17S, C17S+1
DIC	DE, P, X3!, C4+1, C4+3, C4S+1, C4S+3, C7+1, C7S+1, C13+1 , C13S+1, C15+1, C15S+1, C17+1, C17S+1*
DIC("S"	T, Z!, X3*
DIC(0	P, 1, 12, 16, 19, 21, 23*
>> DICRREC	BEGIN+2*
>> DIE	DE*, P, X3, C4+1, C4+3, C4S+1, C4S+3, C7+1, C7S+1, C13+1 , C13S+1, C15+1, C15S+1, C17+1, C17S+1
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!, 1, 12, 16, 19, 21, 23
>> DIEL	DE*
>> DIEZ	BEGIN+3*
DIEZAR	BEGIN+1~, BEGIN+2*
DIEZRXR	BEGIN+1~
DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 2, 3, 4, 6 , 7, 8, 9, 10, 13, 15, 17, 18, 20, 22 , 24, 25
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DIU(0	C4S+4
DIXR	BEGIN+1~
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 2, 3, 4, 6, 7, 8 , 9, 10, 13, 15, 17, 18, 20, 22, 24, 25
>> DNM	BEGIN*
>> DP	DE*, N, T, SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DQ	O+2, A, B, RE, T, P, P+2, V, X, D , Y, PR, RP, SET, SET+1, SAVEVALS, BEGIN, 1, 2+3, C4S , C4S+1, C4S+3, 5, 6, C7S, C7S+1, 8, 12, C13S, C13S+1 , 14, 15, C15S, C15S+1, 16, 17, C17S, C17S+1, 18, 19* , 21, 23
>> DQ(	A!, P+2, D*, PR
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 2, 2+1, 3, 3+1, 4 , 6, 7, 7+2, 8, 8+1, 9, 10, 10+1, 13, 15 , 17, 18, 20, 22, 24, 25
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 2, 2+3, 3, 4, 6, 7, 8 , 9, 10, 13, 15, 17, 18, 20, 22, 24, 25
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3, 4, 4+1, 6* , 7, 7+1, 8, 9, 10, 12, 13, 13+1, 15, 15+1 , 16, 17, 17+1, 18, 19, 20, 21, 22, 23, 24 , 25*
>> DZ	QS*
>> PRC("CP"	X12
>> PRC("SITE"	X7, X12
>> PRCSERR	X1
U	DE+1, DE+2, DE+3, DE+4, DE+5, DE+6, TR, P, P+2, Z , D, R, R+1, SET, BEGIN+3*, 1, 5, 12, X12, 16 , 19, 21, 23
X	O+2, TR, N, RD, RD+1, RD+2, T, P, P+1!, P+2* , Z, X+1, QS, Y, PR, R, R+1, R+2, RP, I+1 , SET+2, NKEY, 1, 2+3, X3!, C4+1, C4+2, C4+3, C4S, C4S+1* , C4S+2, C4S+3, C4S+4, X6!, C7+1, C7S, C7S+1, C7S+2, X7!, X9! , 12, X12, C13+1, C13+2, C13S, C13S+1, C13S+2, X13+1!, C15+1, C15+2 , C15S, C15S+1, C15S+2, X15+1!, 16, C17+1, C17+2, C17S, C17S+1, C17S+2 , X17+1!, X18!, X18+1!, 19, X19, X20!, X20+1!, 21, X21, X22! , X22+1!, 23*, X23, X24!, X24+1!, X25!, X25+1!
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1, X1, 2+2, 2+3, X3, 5, 6+1, X6, X9, 10+2 , 11+1, 12, X12, 16, X16, 19, X19, 21, X21, 23 , X23*
>> Y(0	SET+2
YS	V!
>> Z("Z"	X16
>> Z(1	X16
>> ZTQUEUED	X, NKEY

Marked Items

Name	Field # of Occurrence
$T(@(3)	D

Customize PDF page

Package: IFCAP

Routine: PRCST4

Information

Source Information

Call Graph

Call Graph Total: 16

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items