STANDARD DATA DICTIONARY #414.04 -- RECORD CHECKSUM FILE 3/24/25 PAGE 1
STORED IN ^PRCV(414.04, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.1)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is use to store checksums associated with objects such as file records. The reason for this level of generality is that
it is at times convenient to associated a checksum with a subset of fields in a file (or possibly other objects). This means it may
be necessary to support more than one checksum on the same file or other type of object class.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
PRIMARY KEY: A (#61)
Uniqueness Index: C (#600)
File, Field: 1) CHECKSUM NAME (414.04,.01) 2) FILE NUMBER (414.04,.02) 3) DESCRIPTION (414.04,.03)
CROSS
REFERENCED BY: CHECKSUM NAME(D)
INDEXED BY: CHECKSUM NAME & FILE NUMBER & DESCRIPTION (C)
414.04,.01 CHECKSUM NAME 0;1 FREE TEXT (Required) (Key field)
Checksum Name for your application
INPUT TRANSFORM: K:(($L(X)<1)!($L(X)>10)) X
LAST EDITED: APR 01, 2005
HELP-PROMPT: Enter checksum name for your application
DESCRIPTION: Checksum name for your specific application. We could define different checksum name for same file
number used in different application. For example, file 440 could have two checksum name, "VND1"
and "VND2", to store checksum for different applications.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 414.04^D
1)= S ^PRCV(414.04,"D",$E(X,1,30),DA)=""
2)= K ^PRCV(414.04,"D",$E(X,1,30),DA)
RECORD INDEXES: C (#600)
414.04,.02 FILE NUMBER 0;2 NUMBER (Required) (Key field)
File Number
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."4N.N) X
LAST EDITED: MAR 29, 2005
HELP-PROMPT: Type a Number between 0 and 9999, 3 Decimal Digits
DESCRIPTION:
This is the number of the file we will perform checksum with.
RECORD INDEXES: C (#600)
414.04,.03 DESCRIPTION 0;3 FREE TEXT (Required) (Key field)
CHECKSUM DESCRIPTION
INPUT TRANSFORM: K:$L(X)>50!($L(X)<1) X
LAST EDITED: MAR 29, 2005
HELP-PROMPT: Enter description/purpose of this checksum.
DESCRIPTION:
Enter the description or purpose of this checksum.
RECORD INDEXES: C (#600)
414.04,1 RECORD NUMBER 1;0 Multiple #414.41
414.41,.01 RECORD NUMBER 0;1 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
LAST EDITED: MAR 31, 2005
HELP-PROMPT: Type a Number between 1 and 999999, 0 Decimal Digits
DESCRIPTION:
Enter record number (or the IEN) of the file being performed checksum.
414.41,1 CHECKSUM 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999999999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAR 29, 2005
HELP-PROMPT: Checksum will be generated
414.41,2 TIME OF CHECKSUM 0;3 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: MAR 29, 2005
414.41,3 UPDATE SENT 0;4 SET
'1' FOR SENT;
'0' FOR NOT SENT;
LAST EDITED: MAR 29, 2005
414.41,4 TIME SENT 0;5 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: MAR 29, 2005
File #414.04
Record Indexes:
C (#600) RECORD REGULAR IR LOOKUP & SORTING
Unique for: Key A (#61), File #414.04
Short Descr: Uniqueness Index for Key 'A' of File #414.04
Set Logic: S ^PRCV(414.04,"C",X(1),X(2),X(3),DA)=""
Kill Logic: K ^PRCV(414.04,"C",X(1),X(2),X(3),DA)
Whole Kill: K ^PRCV(414.04,"C")
X(1): CHECKSUM NAME (414.04,.01) (Subscr 1)
X(2): FILE NUMBER (414.04,.02) (Subscr 2)
X(3): DESCRIPTION (414.04,.03) (Subscr 3)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):