Routine: DGPTX53

Package	Total	Call Graph
VA Fileman	8	E^DIE0 (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ ^DIR RW^DIR2
Registration	3	501^DGPTSC01 (501,CHQUES)^DGPTSPQ ^DGPTX54

Package	Total	Caller Graph
Registration	1	DGPTX52

Entry Points

Name	Comments	DBIA/ICR reference
X29
X28
X
X24
X27
X20
X23
X22
24
25
26
27
20
21
22
23
28
29
RD
RE
4
8
X33
X31
D
X34
X35
X39
P
T
2
PR
BEGIN
3
7
O
W
RP
39
38
33
32
31
30
37
36
35
34
Y
SET
X8
X9
6
X2
X3
X1
X6
X5
B
N
R
V
Z
11
10
13
12
15
14
17
16
19
18
NKEY
DE
X37
TR
40
1
5
9
KEYCHK()
A
I
X18
X10
X12
X13
X14
X16
X17
QS
SAVEVALS

External References

Name	Field # of Occurrence
501^DGPTSC01	X1, X5, X9, X13, X17
501^DGPTSPQ	X28, X31, X34, X37
CHQUES^DGPTSPQ	X22
^DGPTX54	40
E^DIE0	I+1, 31+3, 37+3
^DIE17	RD
F^DIE17	2, 3, 6, 8, 10, 12, 14, 16, 18, 20 , 22, 23, 24, 27, 29, 33, 35, 39, 40
FIREREC^DIE17	2, 3, 6, 8, 10, 12, 14, 16, 18, 20 , 22, 23, 24, 27, 29, 33, 35, 39
M^DIE17	T
N^DIE17	RP, 31+3, 37+3
OUT^DIE17	2, 3, 6, 8, 10, 12, 14, 16, 18, 20 , 22, 23, 24, 27, 29, 33, 35, 39
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
^DIR	SET+2
RW^DIR2	O+1

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	Timeout: DTIME Variable: X Line Location: TR+0
Function Call: WRITE	Prompt: $C(7) Line Location: TR+0
Function Call: WRITE	Prompt: " "_X Line Location: RD+2
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGPT - [#45]	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
^DGPT - [#45]	DE
^DISV(	RD+2, Z*

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 2, 3, 6, 8, 10, 12 , 14, 16, 18, 20, 22, 23, 24, 27, 29, 31+3 , 33, 35, 37+3, 39
B	QS
BEGIN	DGPTX53+1
D	RD, RD+1, P+1, QS
DE	DGPTX53+1, 2, 3, 6, 8, 10, 12, 14, 16, 18 , 20, 22, 23, 24, 27, 29, 33, 35, 39
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, 31+4, 37+4
RE	1+2, 9+2, 13+1, 17+1, 28+2, 34+2
RP	PR, R, R+1
SAVEVALS	Z
SET	T
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
X10	10
X12	12
X14	14
X16	16
X18	18
X2	2
X20	20
X22	22
X23	23
X24	24
X27	27
X29	29
X3	3
X33	33
X35	35
X39	39
X6	6
X8	8
Y	5+4
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^(0	DE+1, R, R+1
^(12.1	T
^(300	DE+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, T, R+2, SET+2
%Z	DE+1, DE+2, DE+3!
>> D	N, D*
>> D0	DE
>> DA	DE
DB	DE!
DB(	T, P, X, SET, SET+1, 31+3, 37+3
>> DC	RP
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 31+3 , 37+3
DE(1	DE+2*
DE(13	DE+2*
DE(17	DE+2*
DE(28	DE+1*
DE(31	DE+1*
DE(34	DE+1*
DE(37	DE+1*
DE(5	DE+2*
DE(9	DE+2*
DG	DE!, PR, R, R+1*, R+2, 2, 3, 6, 8, 10 , 12, 14, 16, 18, 20, 22, 23, 24, 27, 29 , 33, 35, 39, 40
DG(	Z*
>> DGBPC(5	X8
>> DGBPC(6	X12
>> DGBPC(7	X16
>> DGDUP(4	X2, X6
>> DGDUP(5	X8, X10*
>> DGDUP(6	X12, X14*
>> DGDUP(7	X16, X18*
DGER	X1!, X5!, X9!, X13!, X17!, X28!, X31!, X34!, X37!
DGEXQ	X22!
DGEXQ(1	X27
DGEXQ(2	X33
DGEXQ(3	X39
DGEXQ(6	X23
DGFLAG	X1!, X5!, X9!, X13!, X17!, X28!, X31!, X34!, X37*!
>> DGNFLD	X20
DGPTIT	X20!
DGTX	5+2, X20!
>> DIC	DE, P
>> DIC("S"	T, Z!
>> DIC(0	P, 2, 3, 6, 8, 10, 12, 14, 16, 18 , 20, 22, 23, 24, 27, 29, 33, 35, 39*
>> DIE	DE*, P
>> DIEFIRE	2, 3, 6, 8, 10, 12, 14, 16, 18, 20 , 22, 23, 24, 27, 29, 33, 35, 39
>> DIEL	DE*
>> DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1, 5, 9, 13 , 17, 28, 31, 34, 37*
>> DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 1, 5, 9, 13, 17, 28 , 31, 34, 37*
>> 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, 2, 3, 4* , 6, 7, 8, 10, 11, 12, 14, 15, 16, 18 , 19, 20, 21, 22, 23, 24, 25, 26, 27, 29 , 30, 31+3, 32, 33, 35, 36, 37+3, 38, 39*
>> DQ(	A!, P+2, D*, PR
DTIME	TR
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1, 1+1, 5, 5+1, 9 , 9+1, 13, 17, 28, 28+1, 31, 31+1, 34, 34+1, 37 , 37+1*
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1, 5, 9, 13, 17, 28, 31* , 31+3, 34, 37, 37+3
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3, 5, 6, 8 , 9, 10, 12, 13, 14, 16, 17, 18, 20, 22 , 23, 24, 27, 28, 29, 31, 33, 34, 35, 37 , 39*
>> DZ	QS*
U	DE+1, DE+2, TR, P, P+2, Z, D, R, R+1, SET , 2, 3, 6, 8, 10, 12, 14, 16, 18, 20 , 22, 23, 24, 27, 29, 33, 35, 39
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, X1!, 2, X2, 3, 5+2, 5+3, X5!, 6 , X6, 8, X9!, 10, X10, 12, X13!, 14, X14, 16 , X17!, 18, X18, 20, 22, 23, 24, 27, X28!, 29 , 31+3, X31!, 33, X34!, 35, 37+3, X37!, 39*
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 2, 3, X3, 5+3, 6, 8, X8, 10, 12, X12 , 14, 16, X16, 18, 20, X20, 22, X22, 23, X23 , 24, X24, 27, X27, 29, X29, 31+2, 31+3, 33, X33* , 35, X35, 37+2, 37+3, 39, X39*
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

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

Customize PDF page

Package: Registration

Routine: DGPTX53

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

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