Routine: XBRSRCH5

Package

Total

Call Graph

$$MSMZR^ZIBNSSV

^DIC

Package	Total	Caller Graph
IHS VA Utilities	1	XBRSRCH

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
FILE2	;
EN	;EP - ENTRY POINT FOR CALLING ROUTINES
FIELD	; CHECK ONE FIELD
FIELD2	;
EOJ	;
LIST	; LIST ROUTINE NAMES
WRITE	;
START	;
FILE	; CHECK ONE FILE

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This routine searches a file for MISCELLANEOUS ^DD ENTRIES that call routines.",! Line Location: START+1
Function Call: WRITE	Prompt: "." Line Location: WRITE+1
Function Call: WRITE	Prompt: ! Line Location: WRITE+2
Function Call: WRITE	Prompt: !,XBSM("GR"),?30,$E(X,1,49) Line Location: WRITE+3
Function Call: WRITE	Prompt: !?30,$E(X,1,49) Line Location: WRITE+4
Function Call: WRITE	Prompt: !!,"Sorted list of routines found:",! Line Location: LIST+2
Function Call: WRITE	Prompt: !,"^",X Line Location: LIST+4
Function Call: WRITE	Prompt: ! Line Location: LIST+6
Routine Call	DIC Line Location: START+3

FileNo	Call Tags
^DIC - [#1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(	FILE+1, FILE+2, FILE+3, FILE+4, FILE+5, FILE+6, FIELD+2, FIELD2+2
^UTILITY("XBRSRCH"	START+6!, LIST+1, LIST+4, LIST+5!

Name	Field # of Occurrence
DIC	START+2*, EOJ+1!
DIC(0	START+2*
U	START+2*, FILE2+1, FILE2+2, FILE2+3
X	FILE+1, FILE+2, FILE+3, FILE+4, FIELD2+2, FILE2+1, FILE2+2, FILE2+3, WRITE+3, WRITE+4 , LIST+3, LIST+4, EOJ+2!
X0	EOJ+2!
X1	EOJ+2!
X2	EOJ+2!
XBRSRCH	EOJ+3!
XBRSRCH("FOUND"	FILE2+2*, FILE2+4
XBRSRCH("NO D	ETAIL" , WRITE+1
XBSM	EOJ+4!
XBSM("COUNT"	FILE2+2*, FILE2+3
XBSM("FIELD"	FILE+3, FIELD+1, FIELD+2*, FIELD2+2
XBSM("FILE"	START+5*, FILE+1, FILE+2, FILE+3, FILE+4, FILE+5, FILE+6, FIELD+2, FIELD2+2, WRITE+2
XBSM("GR"	FILE+1, FILE+2, FILE+3, FILE+4, FIELD2+2*, WRITE+3
XBSM("I"	FILE2+3*
XBSM("L"	FILE+3, FIELD+2, FIELD2+2, WRITE+4, LIST+4*
XBSM("LAST FI	LE" , EN+1, WRITE+2
XBSM("MASTER"	START+7*, EN+3, EOJ+3
XBSM("NODE"	FIELD2+1, FIELD2+2
XBSM("SUB"	FILE+5, FILE+6, FIELD+2, FIELD2+2
XBSMFL	EOJ+4!
Y	START+4, START+5, FILE2+3*, EOJ+2!
YY	EOJ+2!

Information