Routine: TIUPS163

Package	Total	Call Graph
VA FileMan	4	DD^%DT (C,NOW)^%DTC CREIXN^DDMOD ENALL^DIK
Kernel	2	^%ZTLOAD BMES^XPDUTL

Entry Points

Name	Comments	DBIA/ICR reference
MAIN	;controls branching
NEWXREF	;creates new xref "VS" on field 1207
QUE	;queue the indexing of the VS xref
REINDEX	;reindex the ACL xref on 8925.1
INDEXVS	;index the VS xref on 8925
STATUS	;check on status of VS xref indexing

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"A task has been queued in the background." Line Location: QUE+15
Function Call: WRITE	Prompt: !," The task number is "_$G(ZTSK)_"." Line Location: QUE+16
Function Call: WRITE	Prompt: !," To check on the status of the task, in programmer mode " Line Location: QUE+17
Function Call: WRITE	Prompt: !," type D STATUS^TIUPS163" Line Location: QUE+18
Function Call: WRITE	Prompt: !,"Indexing completed!" Line Location: STATUS+3
Function Call: WRITE	Prompt: !,"Task started: "_Y Line Location: STATUS+5
Function Call: WRITE	Prompt: !,"Task ended: "_Y Line Location: STATUS+7
Function Call: WRITE	Prompt: "Still working on the index." Line Location: STATUS+9
Function Call: WRITE	Prompt: !,$G(^XTMP("TIUPS163","COUNT"))_" of "_$P($G(^TIU(8925,0)),U,4) Line Location: STATUS+10
Function Call: WRITE	Prompt: " completed" Line Location: STATUS+11
Function Call: WRITE	Prompt: !,"You must have tasked it!" Line Location: STATUS+12

FileNo	Call Tags
^TIU(8925.1 - [#8925.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^TIU(8925 - [#8925]	NEWXREF+3, QUE+3, INDEXVS+5*, STATUS+10
^TIU(8925.1 - [#8925.1]	REINDEX+4!
^XTMP("TIUPS163"	QUE+10!, QUE+13, QUE+14, INDEXVS+3, INDEXVS+5, INDEXVS+7*, STATUS+1, STATUS+4, STATUS+6, STATUS+8 , STATUS+10, STATUS+12

Name	Field # of Occurrence
%	INDEXVS+1~, INDEXVS+3, INDEXVS+7
%H	INDEXVS+1~
%I	INDEXVS+1~
DIK	REINDEX+1~, REINDEX+2*
DIK(1	REINDEX+2*
DIR	QUE+5~
DT	QUE+11, QUE+13
END	STATUS+2~
START	STATUS+2~
TIUARR	NEWXREF+1~, NEWXREF+14
TIUARR("DESCR"	NEWXREF+10, NEWXREF+11
TIUARR("FILE"	NEWXREF+5*
TIUARR("NAME"	NEWXREF+6*
TIUARR("SHORT	DESCR" , NEWXREF+9*
TIUARR("TYPE"	NEWXREF+8*
TIUARR("USE"	NEWXREF+7*
TIUARR("VAL"	NEWXREF+12, NEWXREF+13
TIUCNT	INDEXVS+1~, INDEXVS+4, INDEXVS+5
TIUD0	NEWXREF+1~, NEWXREF+2, NEWXREF+3, NEWXREF+4, QUE+1~, QUE+2, QUE+3, QUE+4
TIUDA	INDEXVS+1~, INDEXVS+4, INDEXVS+5
TIUQUIT	QUE+5~
TIURES	NEWXREF+1~, NEWXREF+14
U	INDEXVS+5, STATUS+10
X	QUE+11~, QUE+13, INDEXVS+1~, STATUS+2~
X1	QUE+11~*
X2	QUE+11~*
Y	STATUS+2~, STATUS+4, STATUS+5, STATUS+6, STATUS+7
ZTDESC	QUE+5~, QUE+7*
ZTIO	QUE+5~, QUE+6*
ZTRTN	QUE+5~, QUE+6*
ZTSAVE	QUE+5~
ZTSAVE("DUZ"	QUE+6*
ZTSK	QUE+5~, QUE+9, QUE+16