STANDARD DATA DICTIONARY #6009 -- VBECS FILE & FIELD LEVEL SECURITY FILE 9/29/25 PAGE 1
STORED IN ^VBEC(6009, (6 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file exports the file and field numbers of VistA Blood Bank (LRBL name spaced) data dictionaries that will 'write protect'
these files and fields once the data conversion has successfully completed.
DD ACCESS:
RD ACCESS:
WR ACCESS:
DEL ACCESS:
LAYGO ACCESS:
AUDIT ACCESS:
CROSS
REFERENCED BY: FILE NUMBER(B)
6009,.01 FILE NUMBER 0;1 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>69.99)!(X<60)!(X?.E1"."3N.N) X S:$D(X) DINUM=X
LAST EDITED: AUG 07, 2002
HELP-PROMPT: Type a VistA Blood Bank File Number between 60 and 69.99, 2 Decimal Digits
DESCRIPTION:
The VistA file number of the file being tracked.
DELETE TEST: 1,0)= I 1 D EN^DDIOL("Blood Bank file/field records are not to be deleted.",,"!,$C(7)")
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 6009^B
1)= S ^VBEC(6009,"B",$E(X,1,30),DA)=""
2)= K ^VBEC(6009,"B",$E(X,1,30),DA)
6009,.02 PRE-CONV. RESTRICTED ACCESS 0;2 SET
'Y' FOR Yes;
LAST EDITED: OCT 24, 2002
HELP-PROMPT: Enter 'Y' for yes if restricted access applies to this file prior to executing the data conversion
application.
DESCRIPTION: This field tracks if restricted access applies to this file prior to executing the data conversion
application.
6009,.03 PST-CONV. RESTRICTED ACCESS 0;3 SET
'Y' FOR Yes;
LAST EDITED: OCT 24, 2002
HELP-PROMPT: Enter 'Y' for yes if restricted access applies to this file after executing the data conversion
application.
DESCRIPTION: This field tracks if restricted access applies to this file after executing the data conversion
application.
6009,100 DATA DICTIONARY DD;0 Multiple #6009.01 (Add New Entry without Asking)
6009.01,.01 DATA DICTIONARY 0;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>69.999999999)!(X<60)!(X?.E1"."10N.N) X
LAST EDITED: AUG 08, 2002
HELP-PROMPT: Enter the appropriate Blood Bank data dictionary number. Type a Number between 60 and
69.999999999, 9 Decimal Digits
DESCRIPTION: Tracks the data dictionary file/sub-file number and field for the purpose of recording
field-level security (read, write, delete, and audit access).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 6009.01^B
1)= S ^VBEC(6009,DA(1),"DD","B",$E(X,1,30),DA)=""
2)= K ^VBEC(6009,DA(1),"DD","B",$E(X,1,30),DA)
6009.01,.02 FIELD 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999.9999999)!(X<.001)!(X?.E1"."8N.N) X
LAST EDITED: AUG 08, 2002
HELP-PROMPT: Enter the appropriate field number. Type a Number between .001 and 9999999.9999999, 7 Decimal
Digits
DESCRIPTION: Tracks the data dictionary and field number for the purpose of identifying 'before & after' field
security information.
6009.01,1 PRE-CONVERSION WRITE ACCESS PREW;E1,245 FREE TEXT
INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X
LAST EDITED: OCT 25, 2002
HELP-PROMPT: Automated field add, edit, and delete. Answer must be 1-245 characters in length.
DESCRIPTION:
Indicates the write level access of the field prior to the data conversion.
6009.01,2 POST-CONVERSION WRITE ACCESS PSTW;E1,245 FREE TEXT
INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X
LAST EDITED: OCT 25, 2002
HELP-PROMPT: Automated field add, edit, and delete. Answer must be 1-245 characters in length.
DESCRIPTION:
Indicates the write level access of the field after the data conversion.
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):