Routine: XBCFXREF

Package	Total	Call Graph
IHS VA Utilities	4	$$DIR^XBDIR ^XBDSET ^XBGXREFS ^XBKVAR
IHS VA %Utilities	1	$$MSMZR^ZIBNSSV

Package

Total

Call Graph

IHS VA Utilities

$$DIR^XBDIR ^XBDSET ^XBGXREFS ^XBKVAR

IHS VA %Utilities

$$MSMZR^ZIBNSSV

Entry Points

Name	Comments	DBIA/ICR reference
FILES	; CHECK FILES
XREF	; CHECK XREFS ON FIELD
XREFIELD	; CHECK EACH FIELD CREATING XREFS
EOJ	;
XREFILE	; CHECK EACH FILE/FIELD CREATING XREFS
START	;
INIT	;
FILE	; CHECK ONE FILE
CHKXREF	; CHECK ONE XREF
SAVE	; SAVE XREF TO CHECK
BACKUP	; BACKUP TREE (CALLED RECURSIVELY)
CHECK	; CHECK DATA GLOBAL FOR XREFS

Name	Field # of Occurrence
$$DIR^XBDIR	INIT+5
^XBDSET	INIT+7
^XBGXREFS	XREF+3
^XBKVAR	INIT+2
$$MSMZR^ZIBNSSV	CHKXREF+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This routine will check the xrefs for the files you select and display",!," all errors found. You may also delete the bad xrefs." Line Location: INIT+3
Function Call: WRITE	Prompt: !!,"You should probably capture the output to an aux printer." Line Location: INIT+4
Function Call: WRITE	Prompt: !!,"Checking the ",$P(^DIC(XBCFXREF("FILE"),0),U,1)," (",XBCFXREF("FILE"),") file" Line Location: FILE+1
Function Call: WRITE	Prompt: !?2,$P(X,U,2)," doesn't use DA or D0. Skipping." Line Location: XREF+11
Function Call: WRITE	Prompt: !!," Checking the following xrefs:" Line Location: CHECK+1
Function Call: WRITE	Prompt: ! Condition for execution: $X>73 Line Location: CHECK+3
Function Call: WRITE	Prompt: " ",XBCFXREF("TBL2",I) Line Location: CHECK+3
Function Call: WRITE	Prompt: !!," Checking the """,XBCFXREF("XREF"),""" xref." Line Location: CHKXREF+1
Function Call: WRITE	Prompt: !?4,$$MSMZR^ZIBNSSV," does not exist.",!?6,"XREF node=",X Line Location: CHKXREF+9
Function Call: WRITE	Prompt: " deleted." Line Location: CHKXREF+10
Function Call: WRITE	Prompt: !!,"All done",! Line Location: EOJ+4

Name	Line Occurrences (* Changed, ! Killed)
^DD(	FILE+4, XREFILE+3, BACKUP+1, BACKUP+2, BACKUP+3
^DIC - [#1]	FILE+1, CHKXREF+4
^UTILITY("XBDSET"	INIT+8, FILES+2, EOJ+1!

Name	Line Occurrences
BACKUP	XREFILE+6, BACKUP+3
CHECK	FILE+8
CHKXREF	CHECK+4
EOJ	START+2, START+4
FILE	FILES+2
FILES	START+3
INIT	START+1
SAVE	XREF+13, XREF+14, XREF+15
XREF	XREFIELD+1
XREFIELD	XREFILE+1
XREFILE	FILE+7

Name	Field # of Occurrence
^(	FILE+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIRUT	INIT+6, EOJ+3!
DTOUT	EOJ+3!
DUOUT	EOJ+3!
FIELD	XREFILE+4~, BACKUP+2*
G	XREF+1~, CHKXREF+2~, CHKXREF+4*, CHKXREF+8
I	CHECK+2~, CHECK+3*
L	XREF+1~, CHKXREF+2~, CHKXREF+4*, CHKXREF+5
LVL	XREFILE+4~, XREFILE+5, XREFILE+7, BACKUP+3
PARENT	XREFILE+4~, XREFILE+5, XREFILE+7, BACKUP+1, BACKUP+2, BACKUP+3
R	CHKXREF+2~, CHKXREF+4*, CHKXREF+5
S	XREF+1~, XREF+15*
SUBFILE	XREFILE+4~, XREFILE+5, BACKUP+1, BACKUP+2, BACKUP+3
U	FILE+1, XREF+5, XREF+6, XREF+7, XREF+11, SAVE+2
V	CHKXREF+2~
X	XREF+1~, XREF+4, XREF+5, XREF+6, XREF+7, XREF+11, SAVE+2, CHKXREF+2~, CHKXREF+3, CHKXREF+4* , CHKXREF+5*, CHKXREF+6, CHKXREF+7, CHKXREF+9, CHKXREF+10
XBCFXREF	EOJ+2!
XBCFXREF("C"	FILES+1, SAVE+1, SAVE+2, CHECK+4*
XBCFXREF("DF"	INIT+5*, CHKXREF+10
XBCFXREF("FILE"	FILES+2*, FILE+1, FILE+4, CHKXREF+4
XBCFXREF("PARENT"	XREFILE+2, XREFILE+7, XREF+14, XREF+15
XBCFXREF("QFLG"	START+2, INIT+1, INIT+6, INIT+8*
XBCFXREF("TBL"	FILE+2!, FILE+5*, FILE+7!, XREFILE+1, XREFIELD+1, XREF+7
XBCFXREF("TBL2"	FILE+8!, SAVE+2*, CHECK+3, CHECK+4
XBCFXREF("TOP	DA" , XREFILE+2, XREFILE+7, XREF+15
XBCFXREF("XN"	XREF+4*, XREF+8, XREF+9
XBCFXREF("XRE	F FIELD" , FILE+4, FILE+5, XREFIELD+1, XREF+3, XREF+4, XREF+7, XREF+8, XREF+9, F FILE" , FILE+4, FILE+5, XREFILE+1, XREFILE+3, XREFILE+5, XREFIELD+1, XREF+3, XREF+7
XBCFXREF("XREF"	FILE+3, FILE+4, FILE+5, CHECK+4*, CHKXREF+1, CHKXREF+3
XBCFXREF("XREFS"	XREF+2!
XBCFXRT	XREF+2!, XREF+3, XREF+17!, EOJ+2!
XBCFXRT(	XREF+4, XREF+8, XREF+9
Y	XREF+1~, XREF+9, XREF+10, XREF+13, XREF+14, XREF+15, CHKXREF+2~, CHKXREF+7, CHKXREF+8

Customize PDF page

Package: IHS VA Utilities

Routine: XBCFXREF

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: