Routine: DGSATX

Package	Total	Call Graph
VA FileMan	14	^%DT $$EZBLD^DIALOG $$LABEL^DIALOGZ ^DIC E^DIE0 (,0,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR,SET)^DIED QQ^DIEQ $$GETTMP^DIKC1 ($$CREF,$$OREF)^DILF $$SET^DIQ RW^DIR2
Registration	1	$$WACT^DGSCHAD

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
C3
C3S
C3F1
X3
4
C4
C4S
C4F1
X4
5
C5
C5S
C5F1
X5
6
X6
7
C7
C7S
C7F1
X7
8
X8
9
X9
10
X10
11
X11
12
X12
13
X13
14
C14
C14S
C14F1
X14
15
C15
C15S
C15F1
X15
16
C16
C16S
C16F1
X16
17
C17
C17S
C17F1
X17
18
C18
C18S
C18F1
X18
19
C19
C19S
C19F1
X19
20
C20
C20S
C20F1
X20
21

External References

Name	Field # of Occurrence
^%DT	X4
$$WACT^DGSCHAD	X8
$$EZBLD^DIALOG	O+2
$$LABEL^DIALOGZ	3, 4, 5, 7, 14, 15, 16, 17, 18, 19 , 20
^DIC	X7, X14, X15, X18
E^DIE0	I+1, 3+5
^DIE17	RD
0^DIE17	21
F^DIE17	1, 2, 4, 5, 6, 7, 8, 9, 10, 11 , 12, 13, 14, 15, 16, 17, 18, 19, 20
FIREREC^DIE17	1, 2, 6, 8, 9, 10, 11, 12, 13
M^DIE17	T
N^DIE17	RP, 3+5
OUT^DIE17	1, 2, 6, 8, 9, 10, 11, 12, 13
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
SET^DIED	T
QQ^DIEQ	QS
$$GETTMP^DIKC1	BEGIN+1
$$CREF^DILF	C3F1, C4F1, C5F1, C7F1, C14F1, C15F1, C16F1, C17F1, C18F1, C19F1 , C20F1
$$OREF^DILF	C3F1, C4F1, C5F1, C7F1, C14F1, C15F1, C16F1, C17F1, C18F1, C19F1 , C20F1
$$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
Function Call: WRITE	Prompt: !!,*7,"NECESSARY VARIABLES NOT DEFINED!!" Line Location: X1+0
Function Call: WRITE	Prompt: !!,*7,"Ward OUT-OF-SERVICE on selected date... Try again!",! Line Location: X9+0
Function Call: WRITE	Prompt: !!,*7,"???... Try again.",! Line Location: X10+0
Function Call: WRITE	Prompt: !,"Ward will be in-service on selected date.",! Line Location: X11+0
Routine Call	DIALOG Line Location: O+2
Routine Call	DIC Line Location: X7 X14 X15 X18

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGS(41.1 - [#41.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	R, R+1
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DD(41.1	C5S+2, C5S+4, C7+4, C7S+4
^DG(40.8 - [#40.8]	X12
^DGS(41.1 - [#41.1]	DE, C4+2!, C4S+2, C5S+2, C5S+4, C7+2!, C7+4, C7S+2, C7S+4, X8 , X9, X10
^DIC(42 - [#42]	X12
^DIE(433	BEGIN+2
^DISV(	RD+2, Z*

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	RE, N, Z, Y, RP, 1, 2, 3+5, 6, 8 , 9, 10, 11, 12, 13
B	QS
BEGIN	DGSATX+1
C14F1	C14S
C14S	C14
C15F1	C15S
C15S	C15
C16F1	C16S
C16S	C16
C17F1	C17S
C17S	C17
C18F1	C18S
C18S	C18
C19F1	C19S
C19S	C19
C20F1	C20S
C20S	C20
C3F1	C3S
C3S	C3
C4F1	C4S
C4S	C4
C5F1	C5S
C5S	C5
C7F1	C7S
C7S	C7
D	RD, RD+1, P+1, QS
DE	DGSATX+1, 1, 2, 4, 5, 6, 7, 8, 9, 10 , 11, 12, 13, 14, 15, 16, 17, 18, 19, 20
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, 3+6
RE	4+2, 5+3, 7+3, 14+3, 16+2, 17+2, 18+3, 19+3, 20+3
RP	PR, R, R+1
SAVEVALS	Z
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
X1	1
X10	10
X11	11
X12	12
X13	13
X2	2
X6	6
X8	8
X9	9
Y	15+5
Z	P+1, 3+6

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("F"	SAVEVALS*
^(0	DE+1, R, R+1, C5S+2, C5S+4, C7+4, C7S+4, X12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DE+1, DE+2, UNIQ!, R+2
%(	UNIQ!
%(0	UNIQ
>> %DT	X4*
%Z	DE+1*, DE+2, DE+3!
>> D	N, D*
>> D0	BEGIN+3, C5S+2, C5S+4, C7+4, C7S+4*
>> DA	DE, UNIQ, BEGIN+3, C4+2, C4S+2, C7+2, C7+4, C7S+2, C7S+4, X8 , X9, X10
DB	DE!, C3!, C3S!, C4!, C4S!, C5!, C5S!, C7!, C7S!, C14! , C14S!, C15!, C15S!, C16!, C16S!, C17!, C17S!, C18!, C18S!, C19! , C19S!, C20!, C20S!
DB(	P, X, 3+5*
>> DC	RP
DDER	T, T+1!
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 3+1* , 3+5, 4+1, 5+1, 7+1, 14+1, 15+1, 16+1, 17+1, 18+1, 19+1 , 20+1*
DE(14	DE+2*, C14
DE(15	DE+2*, C15
DE(16	DE+1*, C16
DE(17	DE+1*, C17
DE(18	DE+1*, C18
DE(19	DE+1*, C19
DE(20	DE+1*, C20
DE(3	DE+2*, C3
DE(4	DE+1*, C4, C4+1
DE(5	DE+2*, C5, C5+1, C5+3
DE(7	DE+1*, C7, C7+1, C7+3
DG	DE!, PR, R, R+1*, R+2, 1, 2, 4, 5, 6 , 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 , 17, 18, 19, 20
DG(	Z*, C3S, C4S, C4S+1, C5S, C5S+1, C5S+3, C7S, C7S+1, C7S+3 , C14S, C15S, C16S, C17S, C18S, C19S, C20S
>> DGDIV	X1, X2, X12
>> DGJJ	X8*, X9, X10, X11
>> DGSDIV	X2, X12, 15+3
DIC	DE, P, C4+1, C4S+1, C5+1, C5+3, C5S+1, C5S+3, C7+1, C7+3 , C7S+1, C7S+3, X7!, X14!, X15!, X18!
DIC("S"	Z!, X7, X14, X15, X18
DIC(0	P, 1, 2, 6, 8, 9, 10, 11, 12, 13
>> DICRREC	BEGIN+2*
>> DIE	DE*, P, UNIQ, C3F1, C4+1, C4S+1, C4F1, C5+1, C5+3, C5S+1 , C5S+3, C5F1, C7+1, C7+3, C7S+1, C7S+3, C7F1, X7, C14F1, X14 , C15F1, X15, C16F1, C17F1, C18F1, X18, C19F1, C20F1
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!, 1, 2, 6, 8, 9, 10, 11, 12, 13
>> DIEL	DE*
>> DIEZ	BEGIN+3*
DIEZAR	BEGIN+1~, BEGIN+2*
DIEZRXR	BEGIN+1~
DIEZRXR(	C3F1, C3F1+1, C4F1, C4F1+1, C5F1, C5F1+1, C7F1, C7F1+1, C14F1, C14F1+1 , C15F1, C15F1+1, C16F1, C16F1+1, C17F1, C17F1+1, C18F1, C18F1+1, C19F1, C19F1+1 , C20F1, C20F1+1
DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD	O+2, N, UNIQ, D, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 3, 4 , 5, 7, 14, 15, 16, 17, 18, 19, 20*
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*, C3F1, C4F1, C5F1, C7F1, C14F1 , C15F1, C16F1, C17F1, C18F1, C19F1, C20F1
>> DIU	C5S+2, C5S+4, C7+4, C7S+4
DIV	C5S+2, C5S+4, C7+4!, C7S+4!
DIV(0	C7+4, C7S+4
DIXR	BEGIN+1~, C3F1+1, C4F1+1, C5F1+1, C7F1+1, C14F1+1, C15F1+1, C16F1+1, C17F1+1, C18F1+1* , C19F1+1, C20F1+1
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 3, 4, 5, 7, 14, 15 , 16, 17, 18, 19, 20*
>> DNM	BEGIN*
>> DP	DE*, O+2, N, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 3, 4, 5 , 7, 14, 15, 16, 17, 18, 19, 20
>> DQ	O+2, A, B, RE, P, P+2, V, X, D, Y , PR, RP, SAVEVALS, BEGIN, 1, 2, 3+5, C3S, 4, C4S , C4S+1, 5, C5S, C5S+1, C5S+3, 6, 7, C7S, C7S+1, C7S+3 , 8, 9, 10, 11, 12, 13, 14, C14S, 15, C15S , 16, C16S, 17, C17S, 18, C18S, 19, C19S, 20*, C20S
>> DQ(	A!, P+2, D*, PR
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, 3, 3+2, 4, 5, 5+2, 7* , 7+2, 14, 14+2, 15, 15+2, 16, 17, 18, 18+2, 19 , 19+2, 20, 20+2*
DUZ	RD+2, Z, X1, 3+3
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, 3, 3+5, 4, 5* , 7, 14, 15, 16, 17, 18, 19, 20
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3, 3+1, 3+5, 4 , 4+1, 5, 5+1, 6, 7, 7+1, 8, 9, 10, 11* , 12, 13, 14, 14+1, 15, 15+1, 16, 16+1, 17, 17+1 , 18, 18+1, 19, 19+1, 20*, 20+1
>> DZ	QS*
U	DE+1, DE+2, TR, P, P+2, Z, D, R, R+1, BEGIN+3* , 1, 2, C5S+2, C5S+4, 6, C7+4, C7S+4, 8, X8, 9 , X9, 10, X10, 11, 12, 13
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+3, 3+4, 3+5, 3+6, C3S, C4+1* , C4+2, C4S, C4S+1, C4S+2, X4!, C5+1, C5+3, C5S, C5S+1, C5S+2 , C5S+3, C5S+4, 6, X6, C7+1, C7+2, C7+3, C7+4, C7S, C7S+1 , C7S+2, C7S+3, C7S+4, X7!, 8, X8, 9, 10, 11, 12 , X12, 13, C14S, X14!, 15+3, 15+4, C15S, X15!, C16S, X16! , C17S, X17!, X17+1!, C18S, X18!, C19S, C20S
X("FIELD"	O+2*
X("FILE"	O+2*
Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, 1* , X1, 2, 3+4, 3+5, X4, C5S+2!, C5S+4!, 6, X6, C7+4! , C7S+4!, X7, 8, 9, X9, 10, X10, 11, 12, 13* , X13, X14, 15+4, X15, X18
Y(1	C5S+2, C5S+4, C7+4, C7S+4
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

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

Customize PDF page

Package: Registration

Routine: DGSATX

Information

Source Information

Call Graph

Call Graph Total: 15

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