Routine: DGPMX4

Information

DGPMX4 ; GENERATED FROM 'DGPM CHECK-IN LODGER' INPUT TEMPLATE(#450), FILE 405;11/15/12

Call Graph

Call Graph Total: 19

Package	Total	Call Graph
VA FileMan	13	^%DT ^DIC ^DICR FILE^DIE E^DIE0 (,0,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ $$GETTMP^DIKC1 ^DIR RW^DIR2
Registration	5	^DGPMDD1 ^DGPMDD2 ^DGPMDDCN ^DGPMGLC (ROOM,W,WARD)^DGPMVDD
ODS	1	^A1B2XFR

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
C2
C2S
C2F1
X2
3
4
5
X5
6
C6
C6S
C6F1
X6
7
X7
8
X8
9
C9
C9S
C9F1
X9
10
C10
C10S
C10F1
X10
11
X11
12
C12
C12S
C12F1
X12
13
X13
14
15
C15
C15S
C15F1
X15
16
X16
17
X17
18
X18
19
X19
20
C20
C20S
C20F1
X20
21
22
X22
23
X23
24
X24
25
X25
26
27
X27
28

External References

Name	Field # of Occurrence
^%DT	X2, X27
^A1B2XFR	C2+16, C2S+16, C12+2, C12S+2, C15+2, C15S+2
^DGPMDD1	C2S+4
^DGPMDD2	C2+4
^DGPMDDCN	C9+2, C9S+2, C10+2, C10S+2, C20+2, C20S+2
^DGPMGLC	C2+14, C2S+14, C9S+6
ROOM^DGPMVDD	X10, X20
W^DGPMVDD	X9
WARD^DGPMVDD	X9
^DIC	X6, X9, X10, X20
^DICR	C6+2, C9S+4
FILE^DIE	X19
E^DIE0	I+1, 2+4, 12+4, 20+4, 25+4, 27+3
^DIE17	RD
0^DIE17	28
F^DIE17	1, 3, 5, 6, 7, 8, 9, 10, 11, 12 , 13, 15, 16, 17, 18, 19, 20, 22, 24, 26
FIREREC^DIE17	1, 5, 7, 8, 11, 13, 16, 17, 18, 19 , 24
M^DIE17	T
N^DIE17	RP, 2+4, 12+4, 20+4, 25+4, 27+3
OUT^DIE17	1, 5, 7, 8, 11, 13, 16, 17, 18, 19 , 24
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

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: !?3,*7,"USE BED CONTROL MOVEMENT OPTIONS!" Line Location: X2+0
Function Call: WRITE	Prompt: !?3,*7,"USE BED CONTROL MOVEMENT OPTIONS!" Line Location: X12+0
Function Call: WRITE	Prompt: !?3,*7,"USE BED CONTROL MOVEMENT OPTIONS!" Line Location: X15+0
Routine Call	DIC Line Location: X6 X9 X10 X20
Routine Call	DIE Line Location: X19
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
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DD(405	C2S+6, C2S+10, C6S+2
^DG(405.1 - [#405.1]	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+6, C9S+4, C9S+6, X11, C12+2, C12S+2, C15+2 , C15S+2, X16, X24
^DGPM("ADFN"	C2+12!, C2S+12*
^DGPM("B"	C2+2!, C2S+2*
^DIC(42 - [#42]	C9+6
^DIE(450	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 , 11, 12+4, 13, 16, 17, 18, 19, 20+4, 24, 25+4 , 26, 27+3
B	QS
BEGIN	DGPMX4+1
C10F1	C10S
C10S	C10
C12F1	C12S
C12S	C12
C15F1	C15S
C15S	C15
C20F1	C20S
C20S	C20
C2F1	C2S
C2S	C2
C6F1	C6S
C6S	C6
C9F1	C9S
C9S	C9
D	RD, RD+1, P+1, QS
DE	DGPMX4+1, 1, 3, 5, 6, 7, 8, 9, 10, 11 , 12, 13, 15, 16, 17, 18, 19, 20, 22, 24 , 26
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, 12+5, 20+5, 25+5, 27+4
RE	6+3, 9+3, 10+3, 15+3, 22+2, 23+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
X11	11
X13	13
X16	16
X17	17
X18	18
X19	19
X24	24
X5	5
X7	7
X8	8
Z	P+1, 25+5

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^("DGPM4"	X5
^("F"	SAVEVALS*
^("LD"	DE+2
^("USR"	DE+3
^("^DG(405.1,"	X7
^(0	DE+1, R, R+1, C2+12, C2S+8, C2S+10, C2S+12, C6+2, C6S+2, C9+6 , C9S+4*
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, DE+3, T, R+2, SET+2, 27+1
%DT	X2!, X27
%Z	DE+1, DE+2, DE+3*, DE+4!
>> A1B2TAG	C2+16, C2S+16, C12+2, C12S+2, C15+2, C15S+2
>> D	N, D*
>> D0	BEGIN+3, C2S+6, C2S+10, C6+2, C6S+2, C9S+4
>> 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+6, C9S+4, C9S+6, X11 , C12+2, C12S+2, C15+2, C15S+2, X16, X18, X24
DB	DE!, C2!, C2S!, C6!, C6S!, C9!, C9S!, C10!, C10S!, C12! , C12S!, C15!, C15S!, C20!, C20S!
DB(	T, P, X, SET, SET+1, 2+4, 12+4, 20+4, 25+4, 27+3*
>> 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, 10+1, 12+1, 12+4, 15+1, 20+1, 20+4, 25+4* , 27+3
DE(10	DE+1*, C10, C10+1
DE(12	DE+1*, C12, C12+1
DE(15	DE+1*, C15, C15+1
DE(2	DE+1*, C2, C2+1, C2+3, C2+5, C2+7, C2+9, C2+11, C2+13, C2+15
DE(20	DE+1*, C20, C20+1
DE(22	DE+2*
DE(23	DE+2*
DE(25	DE+3*
DE(27	DE+3*
DE(6	DE+1*, C6, C6+1
DE(9	DE+1*, C9, C9+1, C9+3, C9+5
DG	DE!, PR, R, R+1*, R+2, 1, 3, 5, 6, 7 , 8, 9, 10, 11, 12, 13, 15, 16, 17, 18 , 19, 20, 22, 24, 26
DG(	Z*, C2S, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15 , C6S, C6S+1, C9S, C9S+1, C9S+3, C9S+5, C10S, C10S+1, C12S, C12S+1 , C15S, C15S+1, C20S, C20S+1
>> DGHNYT	C2+14, C2S+14, C9S+6*
DGIDX	C2S+14!, C9+6!, C9S+6!
DGOOS	X9!, X10!, X20!
>> DGOWD	C9+6*, C9S+6
>> DGPMDDF	C2+4, C2S+4, C9+2, C9S+2, C10+2, C10S+2, C20+2, C20S+2
>> DGPMDDT	C9+2, C9S+2, C10+2, C10S+2, C20+2, C20S+2
>> DGPMN	X1
>> DGPMP	X11, X16, X24
>> DGPMT	X2, X10, X12, X15, X20
>> DGPMY	X1, 2+2
DGWARD	X17~
DGWARD(405	X18*
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, C9+3, C9+5, C9S+1, C9S+3, C9S+5, X9!, C10+1, C10S+1 , X10!, C12+1, C12S+1, C15+1, C15S+1, C20+1, C20S+1, X20!
DIC("S"	T, Z!, X6, X9, X10, X20
DIC(0	P, 1, 5, 7, 8, 11, 13, 16, 17, 18 , 19, 24
>> 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, C9+3, C9+5, C9S+1, C9S+3, C9S+5, X9, C10+1, C10S+1 , X10, C12+1, C12S+1, C15+1, C15S+1, C20+1, C20S+1, X20
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!, 1, 5, 7, 8, 11, 13, 16, 17, 18 , 19, 24
>> 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, 6, 9, 10 , 12, 15, 20, 22, 23, 25, 27*
>> DIG	C6+2, C9S+4
>> DIH	C6+2, C9S+4
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DIU	C2S+6, C2S+10, C6+2, C6S+2, C9S+4*
DIV	C2S+6, C2S+10!, C6+2!, C6S+2!, C9S+4!
DIV(0	C2S+10, C6+2, C6S+2, C9S+4
DIXR	BEGIN+1~
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 2, 6, 9, 10, 12, 15 , 20, 22, 23, 25, 27*
>> 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+4, C2S , C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15, 3, 4* , 5, 6, C6S, C6S+1, 7, 8, 9, C9S, C9S+1, C9S+3 , C9S+5, 10, C10S, C10S+1, 11, 12, 12+4, C12S, C12S+1, 13* , 14, 15, C15S, C15S+1, 16, 17, 18, 19, 20, 20+4 , C20S, C20S+1, 21, 22, 24, 25+4, 26*, 27+3
>> DQ(	A!, P+2, D*, PR
DT	C2+14, C2S+14, C9+6, C9S+6, 27+1
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 2, 6, 6+2, 9, 9+2 , 10, 10+2, 12, 12+2, 15, 15+2, 20, 20+2, 22, 22+1 , 23, 25, 25+1, 27
DUZ	RD+2, Z, X5, X7, 25+2
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 2, 2+4, 6, 9, 10, 12, 12+4 , 15, 20, 20+4, 22, 23, 25, 25+4, 27*, 27+3
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 2+1, 5, 6, 6+1 , 7, 8, 9, 9+1, 10, 10+1, 11, 12, 12+1, 13* , 15, 15+1, 16, 17, 18, 19, 20, 20+1, 22, 23 , 24, 25, 25+4, 27*
>> DZ	QS*
>> I(0	C2S+6
U	DE+1, DE+2, DE+3, TR, P, P+2, Z, D, R, R+1 , SET, BEGIN+3*, 1, C2+12, C2+14, C2S+6, C2S+8, C2S+10, C2S+12, C2S+14 , 3, 5, C6+2, C6S+2, 7, 8, C9+6, C9S+4, C9S+6, 11 , 13, 16, 17, 18, 19, 24, 26
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, 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, X2!, 5, C6+1, C6+2, C6S, C6S+1, C6S+2, X6!, 7* , 8, C9+1, C9+3, C9+5, C9+6, C9S, C9S+1, C9S+3, C9S+4, C9S+5* , X9!, C10+1, C10S, C10S+1, X10!, 11, 12+4, C12+1, C12S, C12S+1 , X12!, 13, C15+1, C15S, C15S+1, X15!, 16, 17, 18, 19 , 20+4, C20+1, C20S, C20S+1, X20!, X23!, X23+1!, 24, 25+2, 25+3 , 25+4, 25+5, 27+1, 27+2, 27+3, X27*!
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, C9+6, C9S+4!, C9S+6 , X9, X10, 11, X11, 12+3, 12+4, 13, X13, 16, X16* , 17, 18, 19, 20+3, 20+4, X20, 24, X24, 25+3, 25+4 , 26, 27+2*, 27+3, X27
Y(0	SET+2, C2S+10*
Y(1	C2S+10, C6+2, C6S+2, C9S+4
Y(101	C2S+6
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

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

Customize PDF page

Package: Registration

Routine: DGPMX4

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