Routine: DICE

Package	Total	Call Graph
VA Fileman	10	^DIC (XA,XS)^DICATTA (D,DD,KOLD,R)^DICD (,6)^DICE0 ^DICE7 YN^DICN ^DIE $$FNO^DILIBF ^DIR DIEZ^DIU0

Package	Total	Caller Graph
VA Fileman	3	DICD DICE0 DICE7

Entry Points

External References

Name	Field # of Occurrence
^DIC	N+3
XA^DICATTA	F+5, EDT+6
XS^DICATTA	EDT+2
D^DICD	EDT+5
DD^DICD	F+5
KOLD^DICD	EDT+5
R^DICD	EDT+1
^DICE0	CKF+1
6^DICE0	N+3
^DICE7	N+3
YN^DICN	DICE+3, N+4, N+5, A, F+2
^DIE	DIE
$$FNO^DILIBF	N+2
^DIR	M+2
DIEZ^DIU0	CKF+1, EDT+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"WANT TO CREATE A NEW ",DCOND," FOR THIS FIELD" Line Location: DICE+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: N+1
Function Call: WRITE	Prompt: !,"CROSS-REFERENCE NUMBER: "_DQ_"// " Line Location: N+1
Function Call: WRITE	Prompt: !,"WANT TO ",DCOND," WHOLE FILE BY THIS FIELD" Line Location: N+4
Function Call: WRITE	Prompt: !,"WANT TO "_DCOND_" "_$P(^DD(J(N-DH),0),U,1)_" BY THIS FIELD" Line Location: N+5
Function Call: WRITE	Prompt: !,"WANT ",DCOND," TO BE USED FOR LOOKUP AS WELL AS FOR SORTING" Line Location: A+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: A+1
Function Call: WRITE	Prompt: !,"PARSE ON THE FOLLOWING CHARACTERS: ",DIKWIC,"//" Line Location: A+1
Function Call: WRITE	Prompt: !?5,"Please enter the punctuation marks (except quotes) which will be used to ",!?5,"separate the words in this field." Line Location: A+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: IX+0
Function Call: WRITE	Prompt: !,"..." Line Location: CKF+0
Function Call: WRITE	Prompt: ! Line Location: CKF+1
Function Call: WRITE	Prompt: !!,"DO YOU WANT TO CROSS-REFERENCE EXISTING DATA NOW" Line Location: F+1
Function Call: WRITE	Prompt: !!,"Enter 'YES' to execute the new set logic now." Line Location: F+3
Function Call: WRITE	Prompt: !,"Otherwise, enter 'NO'." Line Location: F+4
Function Call: WRITE	Prompt: ! Line Location: EDT+3
Function Call: WRITE	Prompt: $C(7),"??" Line Location: X+0
Function Call: WRITE	Prompt: ! Line Location: HLP+2
Function Call: WRITE	Prompt: !,?5,"You may use the number shown if you are the custodian of the file this" Line Location: HLP+3
Function Call: WRITE	Prompt: !,?5,"cross-reference is in. If you are not the custodian of the file, you" Line Location: HLP+4
Function Call: WRITE	Prompt: !,?5,"should select a number that corresponds with a numberspace for which you" Line Location: HLP+5
Function Call: WRITE	Prompt: !,?5,"have custody. Questions regarding numberspace custody may be referred" Line Location: HLP+6
Function Call: WRITE	Prompt: !,?5,"to: DBA@FORUM.DOMAIN.EXT",! Line Location: HLP+7
Routine Call	DIE Line Location: DIE
Routine Call	DIC Line Location: N+3
Routine Call	DIR Line Location: M+2

Name	Line Occurrences (* Changed, ! Killed)
^DD(	N, N+2, N+5, A+3, IX+1, F, EDT+3, EDT+5
^DD("IX" - [#.11]	IX+1
^UTILITY("DICE"	QQ!
^XMB(3.6 - [#3.6]	N+2

Name	Line Occurrences
A	N+4, N+5, A+2
CKF	A+3, IX
DIE	ED
DSC	CKF+1
ED	EDT+4, DSC
F	CKF+1, F, EDT+5
HLP	NQ
IX	IX
M	A+4
N	NQ
NQ	N+1
Q	DICE+3, N+1, A+1, A+4, IX, CKF+1, X
QQ	N+3, Q
X	N+1, N+3, N+4, N+5, A, A+3

Name	Field # of Occurrence
^(	N+1, A+3
^("CONDITION"	F
^("DT"	EDT+5*
^(0	A+3

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DICE+3, N+4, N+5, A, F, F+2*, F+5, F+6!
%X	QQ!
A	Q!
A0	EDT+3, EDT+4, EDT+5, EDT+6!, ED, DSC!
A1	EDT+6!, DIE~
A1(	EDT+3*, EDT+5
A1(3	ED*, ED+1
DA	N, A+6, F, Q!, EDT+3, EDT+5, ED, ED+1
DA(1	ED, ED+1
DA(2	ED*
DB	Q!
DBOOL	QQ!
DCNEW	QQ!
DCOND	DICE+3*, N+4, N+5, A, Q!
>> DDA	F+5, EDT+2, EDT+6
DE	A+3, IX, IX+1!, IX+2!, IX+3!, IX+4!, Q!
DENEW	QQ!
DFLD	QQ!
DH	N+2, N+4, N+5*, A+3, IX+1, Q!
DH(	EDT+1, EDT+4
DHI	QQ!
DI	N, EDT+4, DIE~
DIC	N+2*, N+3!, Q!
DIC("B"	N+2*
DIC("S"	N+2*
DIC(0	N+2*
DICD	EDT+1, ED*, ED+1!
DICOMPX	Q!, QQ!
DIE	ED*!
DIK	A*, IX, IX+3, Q!
>> DIKWIC	A+1*
DIN	QQ!
DIR	M+3!
DIR(0	M+1*
>> DIRUT	A+4
DISTART	A+6~*, IX
>> DIU	F
DL	A+3, Q!, ED, ED+1*
DLAY	QQ!
DLOC	QQ!
DNEW	QQ!
DOLD	QQ!
DQ	N, N+1, F, M~, Q!, EDT+1, EDT+3, EDT+4, EDT+5, ED , ED+1
DQI	QQ!
DR	EDT+4, ED!, DSC
DREF	CKF, F, Q!, EDT+5, QQ!
DSUB	QQ!
DT	EDT+5, DSC
DTIME	N+1, A+1, IX
>> DTOUT	N+1, A+1, IX*, M+1, M+2
>> DUOUT	M+1, M+2
DUZ(0	N+2, IX, EDT+4
I	A+3, M+1, M+2, Q!
J	Q!, DIE~
J(	N+2, N+5, A+3, IX+1, F, EDT+3, EDT+5, DSC
N	N+2, N+4, N+5, A+3, IX+1, F, Q!, EDT+3, EDT+5, DIE~ , DSC
U	N+2, N+5, A+1, A+3, IX, EDT+4, NQ
V	QQ!
X	N+1, A+1, A+2, IX, F, M+2, Q!, NQ
X(1	A+4*
X(2	A+4*
XX	A+4!, Q!
XX(	M+2*
XX(1	A+4
XX(2	A+4
Y	N+3*, A, A+1, A+2, A+3, A+4, A+6, CKF, M~, Q!

Customize PDF page

Package: VA Fileman

Routine: DICE

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
A
IX
CKF
QQ
F
ED
M
N
Q
EDT	;
DIE
X
NQ
HLP	; Traditional Cross Reference Help - Called From NQ ; SF-CIOFO/SO 1/12/00
DSC