Routine: DIEVK

Information

DIEVK ;SFISC/DPC-KEY VALIDATION ;11:50 AM 5 May 1998

Source Information

Source file <DIEVK.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
VA Fileman	3	($$VERFLG,$$VROOT,CALLOUT,INIZE)^DIEFU ($$BUILD,$$FINDCONV,ERR740,ERR742,ERR744)^DIEVK1 $$UNIQIX^DIKK2

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
VA Fileman	5	DDR4 DICA DIE DIEV DIEVS

Entry Points

Name	Comments	DBIA/ICR reference
IENS(DA)	;Return IENS from DA array
CHECK(DIVKFDA,DIVKFLAG,DIVKFIEN)	;Loop thru ^TMP and check key integrity
CHKREC(DIVKEY,DIVKFIL,DIVKIENS,DIVKFDA,DIVKFLAG,DIVKFIEN)	;
OUT	;Move error messages if necessary and quit
VALUE(DIVKEYFL,DIVKIENS,DA,DIVKEYFD,DIVKFDA,DIVKDEC,DIVKCONV)	;
KEYVALX	;
COMP(DIVKEY,DIVKFIL,DIVKIENS,DIVKFDA,DIVKX,SS,DEC,DIVKFLAG,DIVKFIEN)	;
ACTDA(IENS,DIVKFIEN,DA,CONV)	;Set the DA array from the IENS
DA(IENS,DA)	;
KEYVAL(DIVKFLAG,DIVKFDA,DIVKOUT,DIVKFIEN)	;

External References

Name	Field # of Occurrence
$$VERFLG^DIEFU	KEYVALX+8
$$VROOT^DIEFU	KEYVALX+9
CALLOUT^DIEFU	OUT+1
INIZE^DIEFU	KEYVALX+4
$$BUILD^DIEVK1	KEYVALX+13
$$FINDCONV^DIEVK1	CHECK+12, ACTDA+5
ERR740^DIEVK1	CHKREC+32, COMP+17, COMP+18
ERR742^DIEVK1	CHKREC+25
ERR744^DIEVK1	CHKREC+26
$$UNIQIX^DIKK2	CHKREC+32

Name	Line Occurrences (* Changed, ! Killed)
^TMP("DIKK"	KEYVALX+12!, KEYVALX+14, OUT+2!, CHECK+6, CHECK+7, CHECK+9, CHECK+11, CHECK+14*, CHECK+18, CHECK+19 , CHECK+21, CHKREC+6, CHKREC+8, CHKREC+19, COMP+6

Name	Line Occurrences
$$CHECK	KEYVALX+14
$$CHKREC	CHECK+22
$$COMP	CHKREC+33
$$IENS	CHKREC+30
$$VALUE	CHKREC+20, COMP+13
ACTDA	CHKREC+11, COMP+9
DA	ACTDA+6, ACTDA+8
OUT	KEYVALX+8, KEYVALX+9, KEYVALX+13

Name	Field # of Occurrence
^("SS"	CHKREC+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTIENS	CHKREC+2~, CHKREC+30*, CHKREC+32
CONV	CHKREC+2~, CHKREC+11, CHKREC+20, CHKREC+30, COMP+3~, COMP+9, COMP+13, ACTDA~, ACTDA+2!, ACTDA+7*
DA	CHKREC+2~, CHKREC+11, CHKREC+20, CHKREC+30, CHKREC+32, COMP+3~, COMP+9, COMP+13, VALUE~, IENS~ , IENS+2, DA~, DA+2!*, ACTDA~, ACTDA+6, ACTDA+8
DA(	IENS+2, DA+2*
DA(" "	IENS+2
DEC	CHKREC+2~, CHKREC+32, CHKREC+33, COMP~
DEC(	CHKREC+19*, CHKREC+20, COMP+13
DEL	CHKREC+2~, CHKREC+17, CHKREC+21*, CHKREC+27
>> DIERR	OUT+1
DIFM	KEYVALX+4~*
DIQUIET	KEYVALX+3~*
DIVKCIEN	CHECK+1~, CHECK+12*, CHECK+13, CHECK+14
DIVKCONV	VALUE~, VALUE+10
DIVKDEC	VALUE~, VALUE+2, VALUE+11
DIVKEY	CHECK+1~, CHECK+5, CHECK+6, CHECK+7, CHECK+9, CHECK+11, CHECK+14, CHECK+17, CHECK+18, CHECK+19 , CHECK+21, CHECK+22, CHKREC~, CHKREC+6, CHKREC+8, CHKREC+25, CHKREC+26, CHKREC+32, CHKREC+33, COMP~ , COMP+6, COMP+17, COMP+18
DIVKEYFD	VALUE~, VALUE+5
DIVKEYFL	VALUE~, VALUE+5
DIVKEYOK	KEYVALX+2~, KEYVALX+5, KEYVALX+8, KEYVALX+9, KEYVALX+13, KEYVALX+15, OUT+3, CHECK+1~, CHECK+17, CHECK+23* , CHECK+24
DIVKFDA	KEYVAL~, KEYVALX+9*, KEYVALX+13, KEYVALX+14, CHECK~, CHECK+22, CHKREC~, CHKREC+20, CHKREC+33, COMP~ , COMP+13, VALUE~, VALUE+2, VALUE+5
DIVKFIEN	KEYVAL~, KEYVALX+14, CHECK~, CHECK+4, CHECK+12, CHECK+22, CHKREC~, CHKREC+11, CHKREC+33, COMP~ , COMP+9, ACTDA~, ACTDA+3, ACTDA+5
DIVKFIL	CHECK+1~, CHECK+7, CHECK+9, CHECK+14, CHECK+19, CHECK+21, CHECK+22, CHKREC~, CHKREC+19, CHKREC+32 , CHKREC+33, COMP~, COMP+6, COMP+17, COMP+18
DIVKFLAG	KEYVAL~, KEYVALX+8*, KEYVALX+13, KEYVALX+14, CHECK~, CHECK+11, CHECK+22, CHECK+23, CHKREC~, CHKREC+6 , CHKREC+17, CHKREC+33, COMP~, COMP+19
DIVKIENS	CHECK+1~, CHECK+8, CHECK+9, CHECK+10, CHECK+11, CHECK+12, CHECK+20, CHECK+21, CHECK+22, CHKREC~ , CHKREC+6, CHKREC+11, CHKREC+20, CHKREC+25, CHKREC+26, CHKREC+30, CHKREC+32, CHKREC+33, COMP~, COMP+5 , COMP+17, VALUE~, VALUE+5, VALUE+10
DIVKOUT	KEYVAL~, OUT+1
DIVKQUIT	CHECK+1~, CHECK+18, CHECK+21, CHECK+23, COMP+3~, COMP+6, COMP+19
DIVKVALU	VALUE+1~, VALUE+5*, VALUE+6, VALUE+7
DIVKX	COMP~
DIVKX(	COMP+14
FIL	CHKREC+2~, CHKREC+18, CHKREC+19, CHKREC+20, CHKREC+25, CHKREC+26, COMP+3~, COMP+12, COMP+13
FLD	CHKREC+2~, CHKREC+18, CHKREC+19, CHKREC+20, CHKREC+21, CHKREC+25, CHKREC+26, COMP+3~, COMP+12, COMP+13
I	IENS+1~, IENS+2, DA+1~, DA+2
IENS	COMP+3~, COMP+5, COMP+6, COMP+9, COMP+13, COMP+18, IENS+1~, IENS+2*, IENS+3, DA~ , DA+2, ACTDA~, ACTDA+3, ACTDA+5, ACTDA+8
ML	CHKREC+2~, CHKREC+18*, CHKREC+23
NULL	CHKREC+2~, CHKREC+16!, CHKREC+17, CHKREC+25, CHKREC+26, CHKREC+28
OIENS	CHKREC+2~
OK	COMP+3~, COMP+5, COMP+17, COMP+19, COMP+20
RIENS	ACTDA+4~, ACTDA+5*, ACTDA+6, ACTDA+7
S	CHKREC+2~, CHKREC+17, CHKREC+18, CHKREC+19, CHKREC+20, CHKREC+22, CHKREC+23, COMP+3~, COMP+11, COMP+12 , COMP+13, COMP+14
SS	CHKREC+2~, CHKREC+8*, CHKREC+33, COMP~
SS(	CHKREC+17, CHKREC+18, COMP+11, COMP+12
U	CHECK+7, CHECK+11, CHECK+19, CHKREC+6, CHKREC+18, CHKREC+32, COMP+12, VALUE+5, VALUE+7
UIR	CHKREC+2~, CHKREC+8, CHKREC+31, CHKREC+32
UNIQ	COMP+3~, COMP+11, COMP+14, COMP+16
VAL	CHKREC+2~, CHKREC+16!, CHKREC+32
VAL(	CHKREC+23*
X	CHKREC+2~, CHKREC+16!, CHKREC+20, CHKREC+21, CHKREC+22, CHKREC+23, CHKREC+25, CHKREC+26, CHKREC+33, COMP+3~ , COMP+13, COMP+14, VALUE+1~, VALUE+2, VALUE+12
X(	CHKREC+22*

Customize PDF page

Package: VA Fileman

Routine: DIEVK

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: