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: DGPMX1

Package: Registration

Routine: DGPMX1


Information

DGPMX1 ; GENERATED FROM 'DGPM ADMIT' INPUT TEMPLATE(#446), FILE 405;11/15/12

Source Information

Source file <DGPMX1.m>

Call Graph

Call Graph

Call Graph Total: 22

Package Total Call Graph
VA FileMan 14 ^%DT  NOW^%DTC  EN^DDIOL  ^DIC  ^DICR  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 7 ^DGPMDD1  ^DGPMDD2  ^DGPMDDCN  ^DGPMGLC  (ROOM,W,WARD)^DGPMVDD  $$ADCAT^DGSAUTL  DFN^DGYZODS  
ODS 1 ^A1B2XFR  

Entry Points

Name Comments DBIA/ICR reference
C16S
X29
X28
X25
X26
X21
X22
24
25
26
27
20
21
22
23
28
29
RD
RE
4
8
C22
11
C21
D
C2F1
P
T
X
C4F1
C21S
PR
BEGIN
C4S
3
7
C2S
O
W
RP
32
31
30
Y
C22F1
SET
C21F1
X8
2
X16
6
X2
C2
X1
X7
X4
C4
B
N
R
V
Z
C16F1
10
13
12
15
14
17
16
19
18
NKEY
C13F1
X5
DE
X31
C13
C16
TR
1
5
9
KEYCHK()
A
C13S
I
X10
X12
X13
X14
X15
C22S
X17
QS
SAVEVALS

External References

Name Field # of Occurrence
^%DT X2, X31
NOW^%DTC C4S+2
^A1B2XFR C2+16, C2S+16, C16+2, C16S+2
EN^DDIOL X4
^DGPMDD1 C2S+4
^DGPMDD2 C2+4
^DGPMDDCN C4+6, C4S+6, C21+2, C21S+2, C22+2, C22S+2
^DGPMGLC C2+14, C2S+14, C21S+6
ROOM^DGPMVDD X22
W^DGPMVDD X21
WARD^DGPMVDD X21
$$ADCAT^DGSAUTL 7+2
DFN^DGYZODS X25
^DIC X5, X13, X21, X22
^DICR C4+2, C4+4, C4S+4, C13+2, C21S+4
E^DIE0 I+1, 2+4, 7+4, 26+3, 29+4, 31+3
^DIE17 RD
0^DIE17 32
F^DIE17 1, 3, 4, 5, 6, 8, 9, 12, 14, 15
, 16, 17, 18, 19, 20, 22, 23, 24, 25, 26
, 28, 30
FIREREC^DIE17 1, 8, 12, 14, 15, 25, 28
M^DIE17 T
N^DIE17 RP, 2+4, 7+4, 26+3, 29+4, 31+3
OUT^DIE17 1, 8, 12, 14, 15, 25, 28
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
  • 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
Function Call: WRITE
  • Prompt: !?3,*7,"USE BED CONTROL MOVEMENT OPTIONS!"
  • Line Location: X16+0
Routine Call
  • DIC
  • Line Location:
    • X5
    • X13
    • X21
    • X22
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, C4S+2, C13S+2
^DG(405.1 - [#405.1] C13S+2
^DGPM - [#405] DE, X1, C2+12, C2+14, C2+16, C2S+8, C2S+10, C2S+12, C2S+14, C2S+16
, C4+2, C4+4, C4S+2, C4S+4, 7+2, C13+2, C13S+2, X15, C16+2, C16S+2
, C21+6, C21S+4, C21S+6, X28
^DGPM("ADFN" C2+12!, C2S+12*
^DGPM("B" C2+2!, C2S+2*
^DIC(42 - [#42] C21+6
^DIE(446 BEGIN+2
^DISV( RD+2, Z*, X12*, X14*
^DPT - [#2] X8

Label References

Name Line Occurrences
$$KEYCHK Z
@( B, V
A N, Z, Y, RP, 1, 2+4, 3, 6, 7+4, 8
, 9, 12, 14, 15, 18, 19, 20, 23, 24, 25
, 26+3, 28, 29+4, 30, 31+3
B QS
BEGIN DGPMX1+1
C13F1 C13S
C13S C13
C16F1 C16S
C16S C16
C21F1 C21S
C21S C21
C22F1 C22S
C22S C22
C2F1 C2S
C2S C2
C4F1 C4S
C4S C4
D RD, RD+1, P+1, QS
DE DGPMX1+1, 1, 3, 4, 5, 6, 8, 9, 12, 14
, 15, 16, 17, 18, 19, 20, 22, 23, 24, 25
, 26, 28, 30
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, 7+5, 26+4, 29+5, 31+4
RE 4+3, 5+2, 10+2, 13+3, 16+3, 17+1, 21+3, 22+3
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
X12 12
X14 14
X15 15
X25 25
X28 28
X8 8
Z P+1, 7+5, 26+4, 29+5

Naked Globals

Name Field # of Occurrence
^( RD+2, R, R+1, X8
^("DGPM1" X12
^("DIR" DE+3, C4+2*, C4+4*, C4S+2, C4S+4*
^("F" SAVEVALS*
^("ODS" DE+4
^("PTF" DE+5
^("USR" DE+6
^("^DG(405.1," X14
^(0 DE+1, R, R+1, C2+12, C2S+8*, C2S+10, C2S+12, C13+2*, C13S+2, C21+6
, C21S+4*
^(12.1 T

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DE+1*, DE+2*, DE+3*, DE+4*, DE+5*, DE+6*, T, R+2*, SET+2*, C4S+2~
, 31+1*
%DT X2*!, X31*
%H C4S+2~
%I C4S+2~
%Z DE+1*, DE+2, DE+3*, DE+4*, DE+5*, DE+6*, DE+7!
>> A1B2TAG C2+16*, C2S+16*, C16+2*, C16S+2*
>> D N, D*
>> D0 BEGIN+3*, C2S+6*, C2S+10*, C4+2*, C4+4*, C4S+2*, C4S+4*, C13+2*, C13S+2*, C21S+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, C4+2, C4+4, C4S+2, C4S+4, 7+2, C13+2, C13S+2
, X15, C16+2, C16S+2, C21+6, C21S+4, C21S+6, X28
DB DE!, C2!, C2S!, C4!, C4S!, C13!, C13S!, C16!, C16S!, C21!
, C21S!, C22!, C22S!
DB( T, P, X, SET, SET+1, 2+4*, 7+4*, 26+3*, 29+4*, 31+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, 4+1*, 7+4*, 13+1*, 16+1*, 21+1*, 22+1*, 26+3*, 29+4*, 31+3
DE(10 DE+1*
DE(13 DE+1*, C13, C13+1
DE(16 DE+1*, C16, C16+1
DE(17 DE+1*
DE(2 DE+1*, C2, C2+1, C2+3, C2+5, C2+7, C2+9, C2+11, C2+13, C2+15
DE(21 DE+1*, C21, C21+1, C21+3, C21+5
DE(22 DE+1*, C22, C22+1
DE(26 DE+4*
DE(29 DE+6*
DE(31 DE+6*
DE(4 DE+3*, C4, C4+1, C4+3, C4+5
DE(5 DE+2*
DE(7 DE+5*
>> DFN X8
DG DE!, PR*, R*, R+1*, R+2, 1, 3, 4, 5, 6
, 8, 9, 12, 14, 15, 16, 17, 18, 19, 20
, 22, 23, 24, 25, 26, 28, 30
DG( Z*, C2S, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15
, C4S, C4S+1, C4S+3, C4S+5, C13S, C13S+1, C16S, C16S+1, C21S, C21S+1
, C21S+3, C21S+5, C22S, C22S+1
>> DGHNYT C2+14*, C2S+14*, C21S+6*
DGIDX C2S+14!, C21+6!, C21S+6!
>> DGODS X25
DGOOS X21!, X22!
>> DGOWD C21+6*, C21S+6
>> DGPMDDF C2+4*, C2S+4*, C4+6*, C4S+6*, C21+2*, C21S+2*, C22+2*, C22S+2*
>> DGPMDDT C4+6*, C4S+6*, C21+2*, C21S+2*, C22+2*, C22S+2*
>> DGPMN X1
>> DGPMP X28
>> DGPMT X2, X4, X16, X22
>> 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*, C4+1*, C4+3*
, C4+5*, C4S+1*, C4S+3*, C4S+5*, X5!*, C13+1*, C13S+1*, X13!*, C16+1*, C16S+1*
, C21+1*, C21+3*, C21+5*, C21S+1*, C21S+3*, C21S+5*, X21!*, C22+1*, C22S+1*, X22!*
DIC("S" T, Z!, X5*, X13*, X21*, X22*
DIC(0 P*, 1*, 8*, 12*, 14*, 15*, 25*, 28*
>> 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, C4+1, C4+3
, C4+5, C4S+1, C4S+3, C4S+5, X5, C13+1, C13S+1, X13, C16+1, C16S+1
, C21+1, C21+3, C21+5, C21S+1, C21S+3, C21S+5, X21, C22+1, C22S+1, X22
DIEBADK BEGIN+1!
DIEFIRE BEGIN+1!, 1, 8, 12, 14, 15, 25, 28
>> 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*, 4*, 5*, 7*
, 10*, 13*, 16*, 17*, 21*, 22*, 26*, 29*, 31*
>> DIG C4+2*, C4+4*, C4S+4*, C13+2*, C21S+4*
>> DIH C4+2*, C4+4*, C4S+4*, C13+2*, C21S+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*, C4+2*, C4+4*, C4S+2*, C4S+4*, C13+2*, C13S+2*, C21S+4*
DIV C2S+6, C2S+10!*, C4+2!*, C4+4!*, C4S+2!*, C4S+4!*, C13+2!*, C13S+2!*, C21S+4!*
DIV(0 C2S+10*, C4+2*, C4+4*, C4S+2*, C4S+4*, C13+2*, C13S+2*, C21S+4*
DIXR BEGIN+1~
>> DL DE*, W
DLAYGO P*, Z!
>> DLB W, RD+2, Z, D, 2*, 4*, 5*, 7*, 10*, 13*
, 16*, 17*, 21*, 22*, 26*, 29*, 31*
>> 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*
, C4S, C4S+1, C4S+3, C4S+5, 5*, 6*, 7+4, 8*, 9*, 11*
, 12*, C13S, C13S+1, 14*, 15*, 16*, C16S, C16S+1, 17*, 18*
, 19*, 20*, C21S, C21S+1, C21S+3, C21S+5, 22*, C22S, C22S+1, 23*
, 24*, 25*, 26*, 26+3, 27*, 28*, 29+4, 30*, 31+3
>> DQ( A!, P+2, D*, PR
DT C2+14, C2S+14, C21+6, C21S+6, 31+1
DTIME TR, BEGIN+3*
>> DTOUT TR*
>> DU DE*, P, D, PR, SET, 2*, 4*, 4+2*, 5*, 5+1*
, 7*, 7+1*, 10*, 10+1*, 13*, 13+2*, 16*, 16+2*, 17*, 21*
, 21+2*, 22*, 22+2*, 26*, 26+1*, 29*, 29+1*, 31*
DUZ RD+2, Z, C4S+4, X12, X14, 29+2
>> DV O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y
, PR, RP, I, 2*, 2+4, 4*, 5*, 7*, 7+4, 10*
, 13*, 16*, 17*, 21*, 22*, 26*, 26+3, 29*, 29+4, 31*
, 31+3
>> DW Z, D, SAVEVALS+1, KEYCHK, 1*, 2*, 2+1, 4*, 4+1, 5*
, 7*, 7+4, 8*, 10*, 12*, 13*, 13+1, 14*, 15*, 16*
, 16+1, 17*, 21*, 21+1, 22*, 22+1, 25*, 26*, 26+3, 28*
, 29*, 29+4, 31*
>> DZ QS*
>> I(0 C2S+6
U DE+1, DE+2, DE+3, DE+4, DE+5, DE+6, 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, C4+2, C4+4, C4S+2, C4S+4, 6, 7+2
, 8, 9, 12, C13+2, C13S+2, 14, 15, 18, 19, 20
, C21+6, C21S+4, C21S+6, 23, 24, 25, 28, 30
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*!, C4+1*, C4+2*, C4+3*, C4+4*, C4+5*, C4S*, C4S+1*, C4S+2*
, C4S+3*, C4S+4*, C4S+5*, X4!, X5*!, 7+2*, 7+3, 7+4*, 7+5, 8*
, 12*, C13+1*, C13+2*, C13S*, C13S+1*, C13S+2*, X13*!, 14*, 15*, C16+1*
, C16S*, C16S+1*, X16!, X17!, X17+1!, C21+1*, C21+3*, C21+5*, C21+6, C21S*
, C21S+1*, C21S+3*, C21S+4*, C21S+5*, X21*!, C22+1*, C22S*, C22S+1*, X22!*, 25*
, 26+3*, 26+4, 28*, 29+2*, 29+3, 29+4*, 29+5, 31+1*, 31+2, 31+3*
, X31*!
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*
, C4+2!, C4+4!, C4S+2!, C4S+4!, X5, 6*, 7+3*, 7+4, 8*, X8*
, 9*, 12*, C13+2!, C13S+2!, X13, 14*, 15*, X15*, 18*, 19*
, 20*, C21+6*, C21S+4!, C21S+6*, X21, X22, 23*, 24*, 25*, X25*
, 26+2*, 26+3, 28*, X28*, 29+3*, 29+4, 30*, 31+2*, 31+3, X31
Y(0 SET+2, C2S+10*
Y(1 C2S+10*, C4+2*, C4+4*, C4S+2*, C4S+4*, C13+2*, C13S+2*, C21S+4*
Y(101 C2S+6
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