Routine: DIAU

Package	Total	Call Graph
VA Fileman	10	%XY^%RCR TURNON^DIAUTL ^DIC (A,AU)^DICRW L^DICRW1 IXALL^DIK ^DIO STOP^DIO4 EN1^DIP ^DIR

Package

Total

Call Graph

VA Fileman

%XY^%RCR TURNON^DIAUTL ^DIC (A,AU)^DICRW L^DICRW1 IXALL^DIK ^DIO STOP^DIO4
EN1^DIP ^DIR

Package	Total	Caller Graph
VA Fileman	8	DIAUDIT DD DIAUDIT PURGE DATA DIAUDIT PURGE DD DIAUDIT TURN ON/OFF DIAUDITED FIELDS DII1 DIO4 DIPR129

Package

Total

Caller Graph

VA Fileman

DIAUDIT DD DIAUDIT PURGE DATA DIAUDIT PURGE DD DIAUDIT TURN ON/OFF DIAUDITED FIELDS DII1 DIO4 DIPR129

Entry Points

Name	Comments	DBIA/ICR reference
OPT	;
Q
ALL
EN	;
P
DANGLE(DIA)	;CLEAN DANGLERS
M
QM	;RETURN TO ^DIO4 FROM LINE TAG M
PR	;
51
UP
52
1	;;FIELDS BEING AUDITED
0
3	;;PURGE DATA AUDITS
2	;;DATA DICTIONARIES BEING AUDITED
ENDKILL	;CHECK DANGLERS
4	;;PURGE DD AUDITS
KILLDIA	;CALLED FROM DHIT
5	;;TURN DATA AUDIT ON/OFF
Q2

Name	Field # of Occurrence
%XY^%RCR	P
TURNON^DIAUTL	52+5
^DIC	OPT+1, 52+1
A^DICRW	4+2
AU^DICRW	3+2, 5+2
L^DICRW1	1+1
IXALL^DIK	0+3
^DIO	P+1
STOP^DIO4	QM+1
EN1^DIP	1+7, 2+3, 3+8, 4+7
^DIR	52+4, ALL+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: EN+1
Function Call: WRITE	Prompt: !!,"..." Line Location: 3+4
Function Call: WRITE	Prompt: "DELETED" Line Location: 3+4
Function Call: WRITE	Prompt: ! Line Location: 3+5
Function Call: WRITE	Prompt: !!,"...",! Line Location: ENDKILL+2
Function Call: WRITE	Prompt: $$DANGLE(DIA)," POINTERS FIXED." Line Location: ENDKILL+2
Function Call: WRITE	Prompt: !!,DIACNT," RECORDS PURGED." Line Location: ENDKILL+3
Function Call: WRITE	Prompt: ! Line Location: 4+4
Function Call: WRITE	Prompt: !! Line Location: 52+6
Function Call: WRITE	Prompt: !!,DIACNT," RECORDS PURGED." Line Location: M+1
Routine Call	DIC Line Location: OPT+1 52+1
Routine Call	DIR Line Location: 52+4 ALL+3

Name	Line Occurrences (* Changed, ! Killed)
^DD(	1+2, 1+3, 3+6, 4+5, 52+5!, PR+2, UP
^DDA - [#.6]	PR+1!, M
^DIA - [#1.1]	3+4!, KILLDIA+1!, KILLDIA+2!, KILLDIA+3!, KILLDIA+4!, ENDKILL+1, DANGLE+4, DANGLE+5!
^DIC - [#1]	1+2
^DOPT("DIAU"	0+1, 0+2*
^UTILITY($J	P!

Name	Line Occurrences
$$DANGLE	ENDKILL+2
0	OPT+1
51	52+6
52	52+2
@(	EN+1
ALL	3+3, 4+3
EN	OPT+1
M	M+2
OPT	0+1
P	M+2
PR	4+3, PR+2
Q	OPT+1, 4+2, 4+3, 52+1
Q2	1+4, 1+8, 3+2, 3+3, 3+4, 3+8, 4+7
QM	M+1
UP	M+2, UP+1

Name	Field # of Occurrence
^("AUDIT"	52+3
^("B"	0+1!
^("UP"	UP
^(0	0+1, ENDKILL+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	Q!, 5+1~, M+2, UP
>> %X	P*
>> %Y	P*
A	Q2!, DANGLE+1~, DANGLE+3*, DANGLE+4, DANGLE+5
AA	DANGLE+1~, DANGLE+3*, DANGLE+5
B	Q2!, DANGLE+1~, DANGLE+3, DANGLE+4, DANGLE+5
BY	2+1*, Q2!
BY(0	1+1*
C	DANGLE+1~, DANGLE+2, DANGLE+5, DANGLE+6, 5+1~, P+1*
D	5+1~
D0	KILLDIA+1, KILLDIA+2, KILLDIA+3, KILLDIA+4, DANGLE+1~, DANGLE+5*
DA	Q!, 3+8!, 4+7!, 5+1~
DA(1	51, 52+2, 52+5
DCC	Q2!
DDA	3+3, 4+2, 4+7, 5+1~, 5+2, 52+3, 52+5, ALL+1, ALL+2, M , M+1, M+2
DFF	1+1, 1+3, Q2!
DHD	1+6, 2+3, Q2!, 3+6, 4+5
DHIT	3+7, 3+8!, 4+6, 4+7!
DI	OPT+1*, EN+1, Q!
DIA	1+7, Q2!, 3+2, 3+4, 3+6, KILLDIA+1, KILLDIA+2, KILLDIA+3, KILLDIA+4, ENDKILL+1 , ENDKILL+2, DANGLE~, DANGLE+4, DANGLE+5, 4+2, 4+3, 4+5, 4+7, 5+1~, 5+2 , 51, 52+1!, PR+1~*, PR+2, M+1, UP
DIACNT	3+7, 3+8!, KILLDIA+5, ENDKILL+1, ENDKILL+3, 4+6*, 4+7!, M+1
DIAU	5+1~
DIB	1+1, 1+2, 1+3, 1+4, Q2!
DIB(1	1+2*, 1+3, 1+4
DIC	0, 0+3, Q!, 1+1, 1+7, 2+1, 3+2, 4+2, 4+6, 5+1~ , 51, 52+2, 52+3!
DIC("S"	3+1, 3+2!, 4+1, 51+1*
DIC("W"	52*
DIC(0	OPT+1, 51
DIJ	Q2!
DIJS	Q2!, P+1
DIK	0+3*, Q!, 3+8!, 4+7!
DIMS	Q2!, P+1
DIOEND	1+7, Q2!, 3+5, 4+4*
>> DIOSL	P+1*
DIPP	Q2!, P+1
DIPQ	Q2!, P+1
DIR	5+1~, 52+3!, ALL+4!
DIR("??"	ALL+2*
DIR("A"	ALL+1, ALL+3
DIR("B"	52+3, ALL
DIR(0	52+4, ALL
DIRUT	3+3, 4+3, 5+1~, 52+4, 52+5, ALL+3
DIS	Q2!
DIS(0	1+6, 2+2
DISTOP	3+5, 3+8!, 4+4, 4+7!
>> DISUPNO	1+5, 3+6, 4+4*
>> DJ	P+1*
DNP	Q2!
DP	Q2!
>> DPP	P+1*
>> DPQ	P+1*
>> DTOUT	3+2, 4+2
DUB	1+1, 1+3, Q2!
DUOUT	5+1~
FLDS	1+5, 2+1, Q2!, 3+6, 4+5
I	Q!
IOSL	P+1
J	Q!, 5+1~
L	1+6, 2+1, Q2!, 3+5, 4+4, P+1*
L(0	1+1*
>> M	P+1*
P	Q2!
U	KILLDIA+2, KILLDIA+3, KILLDIA+4, ENDKILL+1, DANGLE+5, 52+2
X	0+2, Q!, KILLDIA+1, KILLDIA+2, KILLDIA+3, KILLDIA+4, 4+3, 5+1~, 52+4, PR+1~ , PR+2, M+2, UP
Y	OPT+1, Q!, 1+1, 3+2, 3+4, KILLDIA+2, KILLDIA+3, KILLDIA+4, 4+2, 4+3 , 5+1~, 52+1, 52+3, 52+4, 52+5, ALL+3
Y(0	52+2

Customize PDF page

Package: VA Fileman

Routine: DIAU

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items