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

Package: Registration

Routine: DGSATX


Information

DGSATX ; GENERATED FROM 'DGSCHADMIT' INPUT TEMPLATE(#433), FILE 41.1;12/08/20

Source Information

Source file <DGSATX.m>

Call Graph

Call Graph

Call Graph Total: 15

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 3457141516171819
20
^DIC X7X14X15X18
E^DIE0 I+1, 3+5
^DIE17 RD
0^DIE17 21
F^DIE17 124567891011
121314151617181920
FIREREC^DIE17 1268910111213
M^DIE17 T
N^DIE17 RP3+5
OUT^DIE17 1268910111213
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 C3F1C4F1C5F1C7F1C14F1C15F1C16F1C17F1C18F1C19F1
C20F1
$$OREF^DILF C3F1C4F1C5F1C7F1C14F1C15F1C16F1C17F1C18F1C19F1
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( RR+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] DEC4+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
@( BV
A RENZYRP123+5, 68
910111213
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 RDRD+1, P+1, QS
DE DGSATX+1, 1245678910
11121314151617181920
N Y
NKEY N
O YRP
P T
PR REI+1
QS RDNKEY
R RR+1
RD YII+1, 3+6
RE 4+2, 5+3, 7+3, 14+3, 16+2, 17+2, 18+3, 19+3, 20+3
RP PRRR+1
SAVEVALS Z
TR RE
V TP+1
W ORE
X NT+1, PY
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, RR+1
^("F" SAVEVALS*
^(0 DE+1, RR+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 DEUNIQBEGIN+3, C4+2, C4S+2, C7+2, C7+4, C7S+2, C7S+4, X8
X9X10
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( PX3+5*
>> DC RP
DDER TT+1!
DE DE!
DE( O+2, REZYPRRPSAVEVALSSAVEVALS+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*, C4C4+1
DE(5 DE+2*, C5C5+1, C5+3
DE(7 DE+1*, C7C7+1, C7+3
DG DE!, PR*, R*, R+1*, R+2, 12456
78910111213141516
17181920
DG( Z*, C3SC4SC4S+1, C5SC5S+1, C5S+3, C7SC7S+1, C7S+3
C14SC15SC16SC17SC18SC19SC20S
>> DGDIV X1X2X12
>> DGJJ X8*, X9X10X11
>> 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*, PUNIQC3F1C4+1, C4S+1, C4F1C5+1, C5+3, C5S+1
C5S+3, C5F1C7+1, C7+3, C7S+1, C7S+3, C7F1X7C14F1X14
C15F1X15C16F1C17F1C18F1X18C19F1C20F1
DIEBADK BEGIN+1!
DIEFIRE BEGIN+1!, 1268910111213
>> 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 SAVEVALSSAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD O+2, NUNIQDR+2, SAVEVALSSAVEVALS+1, SAVEVALS+2, 3*, 4*
, 5*, 7*, 14*, 15*, 16*, 17*, 18*, 19*, 20*
DIIENS SAVEVALSSAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*, C3F1C4F1C5F1C7F1C14F1
C15F1C16F1C17F1C18F1C19F1C20F1
>> 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 WRD+2, ZD, 3*, 4*, 5*, 7*, 14*, 15*
, 16*, 17*, 18*, 19*, 20*
>> DNM BEGIN*
>> DP DE*, O+2, NR+2, SAVEVALSSAVEVALS+1, SAVEVALS+2, 345
714151617181920
>> DQ O+2, A*, BREPP+2, VXDY
PRRPSAVEVALS, BEGIN*, 1*, 2*, 3+5, C3S, 4*, C4S
C4S+1, 5*, C5SC5S+1, C5S+3, 6*, 7*, C7SC7S+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 TRBEGIN+3*
>> DTOUT TR*
>> DU DE*, PDPR, 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, ZX13+3
>> DUZ("LANG" R+2
>> DUZ(0 TRRE
>> DV O+1, O+2, TRRENRD+2, TPP+1, UNIQ
ZDYPRRPI, 3*, 3+5, 4*, 5*
, 7*, 14*, 15*, 16*, 17*, 18*, 19*, 20*
>> DW ZDSAVEVALS+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, TRPP+2, ZDRR+1, BEGIN+3*
12C5S+2, C5S+4, 6C7+4, C7S+4, 8X89
X910X10111213
X O+2!*, TR*, NRDRD+1, RD+2*, T, P*, P+1!, P+2*
, UNIQ!, ZX+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*, X6C7+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 OO+1, O+2, PY, PR*, R*, R+1*, R+2*, 1*
, X1*, 2*, 3+4*, 3+5, X4C5S+2!, C5S+4!, 6*, X6*, C7+4!
C7S+4!, X7, 8*, 9*, X9*, 10*, X10*, 11*, 12*, 13*
, X13*, X1415+4*, X15X18
Y(1 C5S+2*, C5S+4*, C7+4*, C7S+4*
YS V!
>> ZTQUEUED XNKEY

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