Routine: DGPTF099

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Registration	7	EN1^DGPTF09X (CHK,OPEN)^DGPTFDEL ROUTER^DGPTFTR RTY^DGPTUTL LO^DGUTL $$SITE^VASITE ^VATRAN
VA Fileman	6	NOW^%DTC ^DIC (FILE,YN)^DICN ^DIE ^DIK ^DIR
Kernel	1	HOME^%ZIS
MailMan	1	^XMD

Package

Total

Call Graph

Registration

EN1^DGPTF09X (CHK,OPEN)^DGPTFDEL ROUTER^DGPTFTR RTY^DGPTUTL LO^DGUTL $$SITE^VASITE ^VATRAN

VA Fileman

NOW^%DTC ^DIC (FILE,YN)^DICN ^DIE ^DIK ^DIR

Kernel

HOME^%ZIS

MailMan

^XMD

Package	Total	Caller Graph
Registration	4	DG PTF 099 TRANSMISSION DGPTC DGPTF09X DGPTOOL

Package

Total

Caller Graph

Registration

DG PTF 099 TRANSMISSION DGPTC DGPTF09X DGPTOOL

External References

Name	Field # of Occurrence
NOW^%DTC	LOG+1
HOME^%ZIS	INIT+1
EN1^DGPTF09X	EN+3
CHK^DGPTFDEL	ASK+1
OPEN^DGPTFDEL	OK+7
ROUTER^DGPTFTR	TRAN
RTY^DGPTUTL	INIT+3
LO^DGUTL	INIT+1
^DIC	ASK, ASK+2
FILE^DICN	LOG+1
YN^DICN	OK
^DIE	LOG+4
^DIK	OK+4, OK+5
^DIR	EN+2
$$SITE^VASITE	LOG+3
^VATRAN	ASK+3
^XMD	TRAN

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: EN+0
Function Call: WRITE	Prompt: ! Line Location: EN+3
Function Call: WRITE	Prompt: ! Line Location: ASK+2
Function Call: WRITE	Prompt: !,"REOPEN & TRANSMIT 099" Line Location: OK+0
Function Call: WRITE	Prompt: !!?15,"Enter <RET> to exit routine",!?10,"Enter 'Y' for YES to REOPEN & TRANSMIT",! Line Location: OK+1
Function Call: WRITE	Prompt: !,"**** 099 TRANSACTION SENT ****" Line Location: OK+6
Function Call: WRITE	Prompt: !,"RECORD HAS NOT BEEN CLOSED YET!",! Line Location: NOT+0
Function Call: WRITE	Prompt: !,"RECORD HAS NOT BEEN TRANSMITTED YET",! Line Location: NOTRAN+0
Function Call: WRITE	Prompt: !,"Cannot transmit 099 while transmitting other records",! Line Location: INIT+2
Routine Call	%ZIS Line Location: INIT+1
Routine Call	DIE Line Location: LOG+4
Routine Call	DIC Line Location: ASK ASK+2
Routine Call	DIR Line Location: EN+2

FileNo	Call Tags
^DGPT - [#45]	Classic Fileman Calls
^DGP(45.83 - [#45.83]	Classic Fileman Calls
^DGP(45.84 - [#45.84]	Classic Fileman Calls
^DGP(45.87 - [#45.87]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DGP(45.83 - [#45.83]	OK+2, OK+3, OK+5, INIT+2
^DGPT - [#45]	BUL+1
^DPT - [#2]	BUL+1
^UTILITY($J	BUL+4*, QUIT!

Name	Line Occurrences
ASK	OK+2, NOT, NOTRAN
BUL	OK+6
EN	ENQ
ENQ	EN+3
INIT	EN
INITQ	INIT+2
LOG	OK+6
LOGQ	LOG+2
NOT	ASK
NOTRAN	OK+3
OK	OK+1
QUIT	EN, EN+2, ASK, ASK+1, ASK+3, OK+2

Name	Field # of Occurrence
^(0	OK+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	OK*, OK+1, OK+2, LOG+1, QUIT!
DA	OK+2, OK+4, OK+5, LOG+2, QUIT!
DA(1	OK+4*
DD	LOG+1!
DFN	QUIT!
DGA	ASK*, ASK+1, ASK+2, OK+2, OK+3, OK+4, OK+7, BUL+1, QUIT!
DGA1	QUIT!
DGADM	BUL+1*, BUL+3, QUIT!
DGD	OK+2*, OK+3, OK+4, OK+5, QUIT!
DGHEAD	BUL+2, BUL+3, BUL+4*, QUIT!
DGINFO	BUL+1*, BUL+3, BUL+4, LOG+3, QUIT!
DGJ	QUIT!
DGOUT	EN, QUIT!, INIT+1, INIT+2
DGPTFMT	QUIT!
DGPTIFN	ASK+1, OK+7, QUIT!
DGRTY	ASK, ASK+1, QUIT!, INIT+3
DGRTY0	ASK, QUIT!
DGSDI	QUIT!
DGT	QUIT!
DGX	QUIT!
DGXX	BUL+1*, BUL+4, QUIT!
DIC	ASK!, ASK+2, LOG+1*!, QUIT!, NOT!, NOTRAN!
DIC("A"	ASK*
DIC("S"	ASK*
DIC(0	ASK, ASK+2, LOG+1*
DIE	LOG+3*, LOG+5!, QUIT!
DIK	OK+4, OK+5, QUIT!
DIR	EN+2!
DIR("A"	EN+1*
DIR("B"	EN+1*
DIR(0	EN+1*
DO	LOG+1!
DR	LOG+3*, LOG+5!, QUIT!
DTOUT	EN+2, QUIT!
DUOUT	EN+2, QUIT!
DUZ	LOG+3
SSN	BUL+1*, BUL+2, LOG+3, QUIT!
U	ASK, OK+3, BUL+1, BUL+3, BUL+4, LOG+3, QUIT!
VAT	QUIT!
VATERR	ASK+3, QUIT!
VATNAME	ASK+3*, QUIT!
X	ASK, ASK+2, LOG+1, QUIT!
XMDUZ	QUIT!
XMSUB	TRAN*, QUIT!
XMTEXT	TRAN*, QUIT!
XMY	TRAN!, QUIT!
>> XMZ	LOG+3
Y	EN+3, ASK, LOG+2, QUIT!, INIT+3*

Customize PDF page

Package: Registration

Routine: DGPTF099

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
QUIT
EN
OK
LOG	;-- ptf transaction request log
LOGQ
TRAN
INITQ
NOTRAN
ENQ
INIT	;
BUL	;
ASK
NOT