Routine: DGPMX3

Information

DGPMX3 ; GENERATED FROM 'DGPM DISCHARGE' INPUT TEMPLATE(#1835), FILE 405;10/15/12

Call Graph

Call Graph Total: 19

Package	Total	Call Graph
VA Fileman	13	^%DT ^DIC ^DICR E^DIE0 (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ AUDIT^DIET $$GETTMP^DIKC1 ^DIR RW^DIR2
Registration	5	^DGPMDD1 ^DGPMDD2 ^DGPMGLC ^DGPMX31 ON^DGYZODS
Uncategorized	1	^A1B2XFR

Entry Points

Name	Comments	DBIA/ICR reference
C9S
C12
C12F1
DE
C12S
X10
X11
X9
PR
1
BEGIN
SET
RP
C9
TR
C6S
RD
RE
3
2
5
4
7
6
X2
C2
X1
X6
C6
KEYCHK()
X5
A
B
C6F1
D
C2S
I
C9F1
13
O
N
C2F1
P
R
T
W
V
Y
X
X12
Z
X14
X15
X16
X17
11
10
QS
12
15
14
17
16
18
9
X7
NKEY
8
X8
X13
SAVEVALS

External References

Name	Field # of Occurrence
^%DT	X2
^A1B2XFR	C2+16, C2S+16, C9+2, C9S+2, C12+2, C12S+2
^DGPMDD1	C2S+4
^DGPMDD2	C2+4
^DGPMGLC	C2+14, C2S+14
^DGPMX31	18
ON^DGYZODS	X10
^DIC	X6, X9
^DICR	C6+2
E^DIE0	I+1, 2+4
^DIE17	RD
F^DIE17	1, 3, 5, 6, 7, 8, 9, 10, 11, 12 , 13, 14, 15, 17, 18
FIREREC^DIE17	1, 5, 7, 8, 10, 11, 13, 15, 17
M^DIE17	T
N^DIE17	RP, 2+4
OUT^DIE17	1, 5, 7, 8, 10, 11, 13, 15, 17
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
AUDIT^DIET	C2+17, C2S+17
$$GETTMP^DIKC1	BEGIN+1
^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
Function Call: WRITE	Prompt: !?3,*7,"USE BED CONTROL MOVEMENT OPTIONS!" Line Location: X2+0
Routine Call	DIC Line Location: X6 X9
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGPM - [#405]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	T, R, R+1, C2S+17, C6+2
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DD(405	C2S+6, C2S+10, C6S+2
^DGPM - [#405]	DE, X1, C2+12, C2+14, C2+16, C2S+8, C2S+10, C2S+12, C2S+14, C2S+16 , C6+2, C6S+2, X8, C9+2, C9S+2
^DGPM("ADFN"	C2+12!, C2S+12*
^DGPM("B"	C2+2!, C2S+2*
^DIE(1835	BEGIN+2
^DISV(	RD+2, Z, X5, X7*

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 1, 2+4, 3, 5, 7, 8 , 10, 11, 13, 15, 17
B	QS
BEGIN	DGPMX3+1
C12F1	C12S
C12S	C12
C2F1	C2S
C2S	C2
C6F1	C6S
C6S	C6
C9F1	C9S
C9S	C9
D	RD, RD+1, P+1, QS
DE	DGPMX3+1, 1, 3, 5, 6, 7, 8, 9, 10, 11 , 12, 13, 14, 15, 17
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+5
RE	6+3, 9+3, 12+3, 14+2, 16+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
X1	1
X10	10
X11	11
X13	13
X15	15
X17	17
X5	5
X7	7
X8	8
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("DGPM3"	X5
^("F"	SAVEVALS*
^("ODS"	DE+2
^("^DG(405.1,"	X7
^(0	DE+1, R, R+1, C2+12, C2S+8, C2S+10, C2S+12, C6+2, C6S+2
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, T, R+2, SET+2
%DT	X2*!
%Z	DE+1, DE+2, DE+3!
>> A1B2TAG	C2+16, C2S+16, C9+2, C9S+2, C12+2, C12S+2
>> D	N, D*
>> D0	BEGIN+3, C2S+6, C2S+10, C6+2, C6S+2*
>> DA	DE, BEGIN+3, X1, C2+2, C2+12, C2+14, C2+16, C2S+2, C2S+8, C2S+10 , C2S+12, C2S+14, C2S+16, C6+2, C6S+2, X8, C9+2, C9S+2
DB	DE!, C2!, C2S!, C6!, C6S!, C9!, C9S!, C12!, C12S!
DB(	T, P, X, SET, SET+1, 2+4*
>> DC	RP
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 2+1* , 2+4, 6+1, 9+1, 12+1*
DE(12	DE+2*, C12, C12+1
DE(14	DE+2*
DE(16	DE+2*
DE(2	DE+1*, C2, C2+1, C2+3, C2+5, C2+7, C2+9, C2+11, C2+13, C2+15 , C2+17, C2S+17
DE(6	DE+1*, C6, C6+1
DE(9	DE+1*, C9, C9+1
DG	DE!, PR, R, R+1*, R+2, 1, 3, 5, 6, 7 , 8, 9, 10, 11, 12, 13, 14, 15, 17, 18
DG(	Z*, C2S, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15 , C2S+17, C6S, C6S+1, C9S, C9S+1, C12S, C12S+1
>> DGHNYT	C2+14, C2S+14
DGIDX	C2S+14!
>> DGODS	X11
>> DGODSPT	X13
>> DGPMDDF	C2+4, C2S+4
>> DGPMN	X1
>> DGPMT	X2
>> DGPMY	X1, 2+2
DIC	DE, P, C2+1, C2+3, C2+5, C2+7, C2+9, C2+11, C2+13, C2+15 , C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15, C6+1, C6S+1 , X6!, C9+1, C9S+1, X9!, C12+1, C12S+1
DIC("S"	T, Z!, X6, X9
DIC(0	P, 1, 5, 7, 8, 10, 11, 13, 15, 17
>> DICRREC	BEGIN+2*
>> DIE	DE*, P, C2+1, C2+3, C2+5, C2+7, C2+9, C2+11, C2+13, C2+15 , C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15, C6+1, C6S+1 , X6, C9+1, C9S+1, X9, C12+1, C12S+1
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!, 1, 5, 7, 8, 10, 11, 13, 15, 17
>> 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, C2+17, C2S+17, 6 , 9, 12, 14, 16
>> DIG	C6+2*
>> DIH	C6+2*
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
>> DIIX	C2+17, C2S+17
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DIU	C2S+6, C2S+10, C6+2, C6S+2
DIV	C2S+6, C2S+10!, C6+2!, C6S+2!*
DIV(0	C2S+10, C6+2, C6S+2*
DIXR	BEGIN+1~
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 2, 6, 9, 12, 14, 16
>> DNM	BEGIN*
>> DP	DE*, N, T, SAVEVALS, SAVEVALS+1, SAVEVALS+2, C2S+17
>> DQ	O+2, A, B, RE, T, P, P+2, V, X, D , Y, PR, RP, SET, SET+1, SAVEVALS, BEGIN, 1, 2+4, C2S , C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15, C2S+17, 3 , 4, 5, 6, C6S, C6S+1, 7, 8, 9, C9S, C9S+1 , 10, 11, 12, C12S, C12S+1, 13, 14, 15, 17*
>> DQ(	A!, P+2, D*, PR
DT	C2+14, C2S+14
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 2, 6, 6+2, 9, 9+2 , 12, 12+2, 14, 14+1, 16, 16+1
DUZ	RD+2, Z, X5, X7
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 2, 2+4, 6, 9, 12, 14, 16
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 2+1, 5, 6, 6+1 , 7, 8, 9, 9+1, 10, 11, 12, 12+1, 13, 14 , 15, 16, 17*
>> DZ	QS*
>> I(0	C2S+6
U	DE+1, DE+2, TR, P, P+2, Z, D, R, R+1, SET , BEGIN+3*, 1, C2+12, C2+14, C2+17, C2S+6, C2S+8, C2S+10, C2S+12, C2S+14 , C2S+17, 3, 5, C6+2, C6S+2, 7, 8, 10, 11, 13 , 15, 17
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+2, 2+3, 2+4, C2+1, C2+2, C2+3, C2+5 , C2+7, C2+9, C2+11, C2+12, C2+13, C2+14, C2+15, C2+17, C2S, C2S+1 , C2S+2, C2S+3, C2S+5, C2S+6, C2S+7, C2S+9, C2S+10, C2S+11, C2S+12, C2S+13 , C2S+14, C2S+15, C2S+17, X2!, 5, C6+1, C6+2, C6S, C6S+1, C6S+2* , X6!, 7, 8, C9+1, C9S, C9S+1, X9!, 10, 11, C12+1 , C12S, C12S+1, 13, X13, 15, 17*, X17
Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1, X1, 2+3, 2+4, C2+14, C2S+6!, C2S+10!, C2S+14, X2, 3 , 5, C6+2!, C6S+2!, X6, 7, 8, X8, X9, 10, 11 , X11, 13, X13, 15, X15, 17, X17*
Y(0	SET+2, C2S+10*
Y(1	C2S+10, C6+2, C6S+2*
Y(101	C2S+6
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

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

Customize PDF page

Package: Registration

Routine: DGPMX3

Information

Source Information

Call Graph

Call Graph Total: 19

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