Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DGPTX51

Package: Registration

Routine: DGPTX51


Information

DGPTX51 ; ;12/08/20

Source Information

Source file <DGPTX51.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
VA FileMan 12 $$EZBLD^DIALOG  $$LABEL^DIALOGZ  ^DICR  E^DIE0  (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17  Z^DIE2  ^DIE3  (AST,NOSCR,SET)^DIED  
QQ^DIEQ  ($$CREF,$$OREF)^DILF  $$SET^DIQ  RW^DIR2  
Registration 5 GETAPI^DGICDGT  $$POA501^DGPTFUT1  501^DGPTSC01  SCAN^DGPTSCAN  ^DGPTX52  

Entry Points

Name Comments DBIA/ICR reference
DE
W
O
TR
A
B
RE
N
RD
T
P
V
UNIQ
Z
X
QS
D
Y
PR
R
RP
I
SAVEVALS
NKEY
KEYCHK()
BEGIN
1
X1
2
X2
3
X3
4
X4
5
X5
6
7
X7
8
X8
9
X9
10
X10
11
X11
12
13
X13
14
15
X15
16
17
X17
18
X18
19
20
X20
21
X21
22
C22
C22S
C22F1
X22
23
X23
24
X24
25
X25
26
27
X27
28
X28
29
30
X30
31
X31
32
C32
C32S
C32F1
X32
33
X33
34
X34
35
X35
36
37
X37
38
X38
39
40
X40
41
X41
42
C42
C42S
C42F1
X42
43
X43
44
X44
45
X45
46
47
X47
48
X48
49
50
X50
51
X51
52
C52
C52S
C52F1
X52
53
X53
54
X54
55
X55
56
57
X57
58
X58
59
60
X60
61
X61
62
C62
C62S
C62F1
X62
63
X63
64
X64
65
X65
66
67
X67
68
X68
69
70
X70
71
72
X72
73
X73
74
X74
75
X75
76
77
X77
78

External References

Name Field # of Occurrence
GETAPI^DGICDGT X22, X32, X42, X52, X62
$$POA501^DGPTFUT1 X25, X35, X45, X55, X65
501^DGPTSC01 X74
SCAN^DGPTSCAN X72
^DGPTX52 78
$$EZBLD^DIALOG O+2
$$LABEL^DIALOGZ 5, 8, 10, 22, 25, 32, 35, 42, 45, 52
, 55, 62, 65, 74
^DICR C22+4, C22S+4, C32+4, C32S+4, C42+4, C42S+4, C52+4, C52S+4, C62+4, C62S+4
E^DIE0 I+1, 10+4
^DIE17 RD
F^DIE17 1, 2, 3, 4, 7, 9, 11, 15, 17, 18
, 20, 21, 23, 24, 25, 27, 28, 30, 31, 33
, 34, 35, 37, 38, 40, 41, 43, 44, 45, 47
, 48, 50, 51, 53, 54, 55, 57, 58, 60, 61
, 63, 64, 65, 67, 68, 70, 72, 73, 75, 77
, 78
FIREREC^DIE17 1, 2, 3, 4, 7, 9, 11, 15, 17, 18
, 20, 21, 23, 24, 27, 28, 30, 31, 33, 34
, 37, 38, 40, 41, 43, 44, 47, 48, 50, 51
, 53, 54, 57, 58, 60, 61, 63, 64, 67, 68
, 70, 72, 73, 75, 77
M^DIE17 T
N^DIE17 RP, 10+4
OUT^DIE17 1, 2, 3, 4, 7, 9, 11, 15, 17, 18
, 20, 21, 23, 24, 27, 28, 30, 31, 33, 34
, 37, 38, 40, 41, 43, 44, 47, 48, 50, 51
, 53, 54, 57, 58, 60, 61, 63, 64, 67, 68
, 70, 72, 73, 75, 77
UNIQFERR^DIE17 Z
Z^DIE17 X
Z^DIE2 RD+1
^DIE3 T
AST^DIED P
NOSCR^DIED P
SET^DIED T
QQ^DIEQ QS
$$CREF^DILF C22F1, C32F1, C42F1, C52F1, C62F1
$$OREF^DILF C22F1, C32F1, C42F1, C52F1, C62F1
$$SET^DIQ R+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: " ("_$$EZBLD^DIALOG(710,.X)_")"
  • 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
Routine Call
  • DIALOG
  • Line Location:
    • O+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( R, R+1
^DD("DD" R+2
^DD("KEY" - [#.31] N
^DGPT - [#45] DE, X9, C22+2!, C22+4, C22S+2*, C22S+4, C32+2!, C32+4, C32S+2*, C32S+4
, C42+2!, C42+4, C42S+2*, C42S+4, C52+2!, C52+4, C52S+2*, C52S+4, C62+2!, C62+4
, C62S+2*, C62S+4
^DISV( RD+2, Z*
^DPT - [#2] X9

Label References

Name Line Occurrences
$$KEYCHK Z
@( B, V
A RE, N, Z, Y, RP, 1, 2, 3, 4, 7
, 9, 10+4, 11, 15, 17, 18, 20, 21, 23, 24
, 27, 28, 30, 31, 33, 34, 37, 38, 40, 41
, 43, 44, 47, 48, 50, 51, 53, 54, 57, 58
, 60, 61, 63, 64, 67, 68, 70, 72, 73, 75
, 77
B QS
BEGIN DGPTX51+1
C22F1 C22S
C22S C22
C32F1 C32S
C32S C32
C42F1 C42S
C42S C42
C52F1 C52S
C52S C52
C62F1 C62S
C62S C62
D RD, RD+1, P+1, QS
DE DGPTX51+1, 1, 2, 3, 4, 7, 9, 11, 15, 17
, 18, 20, 21, 23, 24, 25, 27, 28, 30, 31
, 33, 34, 35, 37, 38, 40, 41, 43, 44, 45
, 47, 48, 50, 51, 53, 54, 55, 57, 58, 60
, 61, 63, 64, 65, 67, 68, 70, 72, 73, 75
, 77
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, 10+5
RE 5+1, 8+1, 22+3, 25+2, 32+3, 35+2, 42+3, 45+2, 52+3, 55+2
, 62+3, 65+2, 74+2
RP PR, R, R+1
SAVEVALS Z
TR RE
V T, P+1
W O, RE
X N, T+1, P, Y
X1 1
X11 11
X15 15
X17 17
X18 18
X2 2
X20 20
X21 21
X23 23
X24 24
X27 27
X28 28
X3 3
X30 30
X31 31
X33 33
X34 34
X37 37
X38 38
X4 4
X40 40
X41 41
X43 43
X44 44
X47 47
X48 48
X50 50
X51 51
X53 53
X54 54
X57 57
X58 58
X60 60
X61 61
X63 63
X64 64
X67 67
X68 68
X7 7
X70 70
X72 72
X73 73
X75 75
X77 77
X9 9
Y 13+3
Z P+1, 10+5

Naked Globals

Name Field # of Occurrence
^( RD+2, R, R+1, X9
^("F" SAVEVALS*
^(0 DE+1, R, R+1
^(300 DE+4
^(82 DE+3, C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*
, C62S+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DE+1*, DE+2*, DE+3*, DE+4*, UNIQ!*, R+2*
%( UNIQ!
%(0 UNIQ
%Z DE+1*, DE+2, DE+3*, DE+4*, DE+5!
>> D N, D*
>> D0 DE, C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*
, C62S+4*
>> D1 C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*, C62S+4*
>> DA DE, UNIQ, C22+2, C22+4, C22S+2, C22S+4, X25, C32+2, C32+4, C32S+2
, C32S+4, X35, C42+2, C42+4, C42S+2, C42S+4, X45, C52+2, C52+4, C52S+2
, C52S+4, X55, C62+2, C62+4, C62S+2, C62S+4, X65
>> DA(1 C22+2, C22+4, C22S+2, C22S+4, X22, X25, C32+2, C32+4, C32S+2, C32S+4
, X32, X35, C42+2, C42+4, C42S+2, C42S+4, X42, X45, C52+2, C52+4
, C52S+2, C52S+4, X52, X55, C62+2, C62+4, C62S+2, C62S+4, X62, X65
DB DE!, C22!, C22S!, C32!, C32S!, C42!, C42S!, C52!, C52S!, C62!
, C62S!
DB( P, X, 10+4*
>> DC RP
DDER T, T+1!
DE DE!
DE( O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 10+4*
, 22+1*, 32+1*, 42+1*, 52+1*, 62+1*
DE(10 DE+2*
DE(13 DE+2*
DE(22 DE+1*, C22, C22+1, C22+3, C22+5
DE(25 DE+3*
DE(32 DE+1*, C32, C32+1, C32+3, C32+5
DE(35 DE+3*
DE(42 DE+1*, C42, C42+1, C42+3, C42+5
DE(45 DE+3*
DE(5 DE+1*
DE(52 DE+1*, C52, C52+1, C52+3, C52+5
DE(55 DE+3*
DE(62 DE+1*, C62, C62+1, C62+3, C62+5
DE(65 DE+3*
DE(74 DE+4*
DE(8 DE+1*
DG DE!, PR*, R*, R+1*, R+2, 1, 2, 3, 4, 7
, 9, 11, 15, 17, 18, 20, 21, 23, 24, 25
, 27, 28, 30, 31, 33, 34, 35, 37, 38, 40
, 41, 43, 44, 45, 47, 48, 50, 51, 53, 54
, 55, 57, 58, 60, 61, 63, 64, 65, 67, 68
, 70, 72, 73, 75, 77, 78
DG( Z*, C22S, C22S+1, C22S+3, C22S+5, C32S, C32S+1, C32S+3, C32S+5, C42S
, C42S+1, C42S+3, C42S+5, C52S, C52S+1, C52S+3, C52S+5, C62S, C62S+1, C62S+3
, C62S+5
DGADD X1*, X3, X20, X30, X40, X50, X60, X70!
>> DGBPC X72
>> DGBPC(2 X73
>> DGBPC(3 X77
>> DGCODSYS X24, X34, X44, X54, X64
DGDUP X70!
DGDUP(2 X73, X75*
DGDUP(3 X77
DGER X74!
DGFLAG X74*!
>> DGHOLD X20, X30, X40, X50, X60
>> DGJUMP X2, X15
DGNFLD X4*, X7*, X11*, X17*, X21*, X28*, X31*, X38*, X41*, X48*
, X51*, X58*, X61*, X68*, X70!
>> DGPTF X9
DGPTIT X28!, X38!, X48!, X58!, X68!
DGPTIT( X28*, X38*, X48*, X58*, X68*
>> DGTYPE X24, X34, X44, X54, X64
>> DGXX X23*, X24, X27, X33*, X34, X37, X43*, X44, X47, X53*
, X54, X57, X63*, X64, X67
>> DIC DE*, P*, C22+1*, C22+3*, C22+5*, C22S+1*, C22S+3*, C22S+5*, C32+1*, C32+3*
, C32+5*, C32S+1*, C32S+3*, C32S+5*, C42+1*, C42+3*, C42+5*, C42S+1*, C42S+3*, C42S+5*
, C52+1*, C52+3*, C52+5*, C52S+1*, C52S+3*, C52S+5*, C62+1*, C62+3*, C62+5*, C62S+1*
, C62S+3*, C62S+5*
>> DIC("S" Z!
>> DIC(0 P*, 1*, 2*, 3*, 4*, 7*, 9*, 11*, 15*, 17*
, 18*, 20*, 21*, 23*, 24*, 27*, 28*, 30*, 31*, 33*
, 34*, 37*, 38*, 40*, 41*, 43*, 44*, 47*, 48*, 50*
, 51*, 53*, 54*, 57*, 58*, 60*, 61*, 63*, 64*, 67*
, 68*, 70*, 72*, 73*, 75*, 77*
>> DIE DE*, P, UNIQ, C22+1, C22+3, C22+5, C22S+1, C22S+3, C22S+5, C22F1
, C32+1, C32+3, C32+5, C32S+1, C32S+3, C32S+5, C32F1, C42+1, C42+3, C42+5
, C42S+1, C42S+3, C42S+5, C42F1, C52+1, C52+3, C52+5, C52S+1, C52S+3, C52S+5
, C52F1, C62+1, C62+3, C62+5, C62S+1, C62S+3, C62S+5, C62F1
>> DIEFIRE 1, 2, 3, 4, 7, 9, 11, 15, 17, 18
, 20, 21, 23, 24, 27, 28, 30, 31, 33, 34
, 37, 38, 40, 41, 43, 44, 47, 48, 50, 51
, 53, 54, 57, 58, 60, 61, 63, 64, 67, 68
, 70, 72, 73, 75, 77
>> DIEL DE*
>> DIEZRXR( C22F1*, C22F1+1*, C32F1*, C32F1+1*, C42F1*, C42F1+1*, C52F1*, C52F1+1*, C62F1*, C62F1+1*
>> DIEZTMP SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD O+2, N, UNIQ, D, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 5*, 8*
, 10*, 13*, 22*, 25*, 32*, 35*, 42*, 45*, 52*, 55*
, 62*, 65*, 74*
>> DIG C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*, C62S+4*
>> DIH C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*, C62S+4*
>> DIIENS SAVEVALS, SAVEVALS+1, SAVEVALS+2, C22F1, C32F1, C42F1, C52F1, C62F1
>> DIU C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*, C62S+4*
DIV C22+4!*, C22S+4!*, C32+4!*, C32S+4!*, C42+4!*, C42S+4!*, C52+4!*, C52S+4!*, C62+4!*, C62S+4!*
DIV(0 C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*, C62S+4*
DIV(1 C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*, C62S+4*
>> DIXR C22F1+1*, C32F1+1*, C42F1+1*, C52F1+1*, C62F1+1*
>> DL DE*, W
DLAYGO P*, Z!
>> DLB W, RD+2, Z, D, 5*, 8*, 10*, 13*, 22*, 25*
, 32*, 35*, 42*, 45*, 52*, 55*, 62*, 65*, 74*
>> DNM BEGIN*
>> DP DE*, O+2, N, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 5, 8, 10
, 22, 25, 32, 35, 42, 45, 52, 55, 62, 65
, 74
>> DQ O+2, A*, B, RE, P, P+2, V, X, D, Y
, PR, RP, SAVEVALS, BEGIN*, 1*, 2*, 3*, 4*, 6*, 7*
, 9*, 10+4, 11*, 12*, 14*, 15*, 16*, 17*, 18*, 19*
, 20*, 21*, C22S, C22S+1, C22S+3, C22S+5, 23*, 24*, 25*, 26*
, 27*, 28*, 29*, 30*, 31*, C32S, C32S+1, C32S+3, C32S+5, 33*
, 34*, 35*, 36*, 37*, 38*, 39*, 40*, 41*, C42S, C42S+1
, C42S+3, C42S+5, 43*, 44*, 45*, 46*, 47*, 48*, 49*, 50*
, 51*, C52S, C52S+1, C52S+3, C52S+5, 53*, 54*, 55*, 56*, 57*
, 58*, 59*, 60*, 61*, C62S, C62S+1, C62S+3, C62S+5, 63*, 64*
, 65*, 66*, 67*, 68*, 69*, 70*, 71*, 72*, 73*, 75*
, 76*, 77*
>> DQ( A!, P+2, D*, PR
DTIME TR
>> DTOUT TR*
>> DU DE*, P, D, PR, 5*, 8*, 10*, 10+1*, 13*, 13+1*
, 22*, 22+2*, 25*, 25+1*, 32*, 32+2*, 35*, 35+1*, 42*, 42+2*
, 45*, 45+1*, 52*, 52+2*, 55*, 55+1*, 62*, 62+2*, 65*, 65+1*
, 74*, 74+1*
DUZ RD+2, Z
DUZ("LANG" R+2
DUZ(0 TR, RE
>> DV O+1, O+2, TR, RE, N, RD+2, T, P, P+1, UNIQ
, Z, D, Y, PR, RP, I, 5*, 8*, 10*, 10+4
, 13*, 22*, 25*, 32*, 35*, 42*, 45*, 52*, 55*, 62*
, 65*, 74*
>> DW Z, D, SAVEVALS+1, KEYCHK, 1*, 2*, 3*, 4*, 5*, 7*
, 8*, 9*, 10*, 10+4, 11*, 13*, 15*, 17*, 18*, 20*
, 21*, 22*, 22+1, 23*, 24*, 25*, 27*, 28*, 30*, 31*
, 32*, 32+1, 33*, 34*, 35*, 37*, 38*, 40*, 41*, 42*
, 42+1, 43*, 44*, 45*, 47*, 48*, 50*, 51*, 52*, 52+1
, 53*, 54*, 55*, 57*, 58*, 60*, 61*, 62*, 62+1, 63*
, 64*, 65*, 67*, 68*, 70*, 72*, 73*, 74*, 75*, 77*
>> DZ QS*
K X22~, X32~, X42~, X52~, X62~
U DE+1, DE+2, DE+3, DE+4, TR, P, P+2, Z, D, R
, R+1, 1, 2, 3, 4, 7, 9, X9, 11, 15
, 17, 18, 20, X20, 21, C22+4, C22S+4, 23, 24, 27
, 28, 30, X30, 31, C32+4, C32S+4, 33, 34, 37, 38
, 40, X40, 41, C42+4, C42S+4, 43, 44, 47, 48, 50
, X50, 51, C52+4, C52S+4, 53, 54, 57, 58, 60, X60
, 61, C62+4, C62S+4, 63, 64, 67, 68, 70, 72, 73
, 75, 77
X O+2!*, TR*, N, RD, RD+1, RD+2*, T, P*, P+1!, P+2*
, UNIQ!, Z, X+1*, QS, Y*, PR*, R*, R+1*, R+2, RP*
, I+1, NKEY*, 1*, 2*, 3*, 4*, X5!, 7*, X8!, 9*
, 10+2*, 10+3, 10+4*, 10+5, 11*, 15*, 17*, 18*, 20*, 21*
, C22+1*, C22+2, C22+3*, C22+4*, C22+5*, C22S*, C22S+1*, C22S+2, C22S+3*, C22S+4*
, C22S+5*, 23*, X23, 24*, X25!, 27*, X27*, 28*, X28, 30*
, 31*, C32+1*, C32+2, C32+3*, C32+4*, C32+5*, C32S*, C32S+1*, C32S+2, C32S+3*
, C32S+4*, C32S+5*, 33*, X33, 34*, X35!, 37*, X37*, 38*, X38
, 40*, 41*, C42+1*, C42+2, C42+3*, C42+4*, C42+5*, C42S*, C42S+1*, C42S+2
, C42S+3*, C42S+4*, C42S+5*, 43*, X43, 44*, X45!, 47*, X47*, 48*
, X48, 50*, 51*, C52+1*, C52+2, C52+3*, C52+4*, C52+5*, C52S*, C52S+1*
, C52S+2, C52S+3*, C52S+4*, C52S+5*, 53*, X53, 54*, X55!, 57*, X57*
, 58*, X58, 60*, 61*, C62+1*, C62+2, C62+3*, C62+4*, C62+5*, C62S*
, C62S+1*, C62S+2, C62S+3*, C62S+4*, C62S+5*, 63*, X63, 64*, X65!, 67*
, X67*, 68*, X68, 70*, 72*, 73*, X74!, 75*, X75, 77*
X("FIELD" O+2*
X("FILE" O+2*
Y O, O+1, O+2, P, Y, PR*, R*, R+1*, R+2*, 1*
, 2*, X2*, 3*, X3*, 4*, 7*, 9*, X9*, 10+3*, 10+4
, 11*, X11*, 13+2*, 15*, X15*, 17*, 18*, X18*, 20*, X20*
, 21*, C22+4!, C22S+4!, 23*, 24*, X24*, 27*, 28*, X28*, 30*
, X30*, 31*, C32+4!, C32S+4!, 33*, 34*, X34*, 37*, 38*, X38*
, 40*, X40*, 41*, C42+4!, C42S+4!, 43*, 44*, X44*, 47*, 48*
, X48*, 50*, X50*, 51*, C52+4!, C52S+4!, 53*, 54*, X54*, 57*
, 58*, X58*, 60*, X60*, 61*, C62+4!, C62S+4!, 63*, 64*, X64*
, 67*, 68*, X68*, 70*, X70*, 72*, X72*, 73*, X73*, 75*
, 77*, X77*
Y(1 C22+4*, C22S+4*, C32+4*, C32S+4*, C42+4*, C42S+4*, C52+4*, C52S+4*, C62+4*, C62S+4*
YS V!
>> ZTQUEUED X, NKEY

Marked Items

Name Field # of Occurrence
$T(@(3) D
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All