STANDARD DATA DICTIONARY #8926.1 -- TIU VHA ENTERPRISE STANDARD TITLE FILE 3/24/25 PAGE 1
STORED IN ^TIU(8926.1, (3452 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Per VHA Directive 2005-044, this file has been "locked down" by Data Standardization (DS). The file definition (i.e. data
dictionary) shall not be modified. All additions, changes and deletions to entries in the file shall be done by Enterprise
Reference Terminology (ERT) using the Master File Server (MFS), provided by Common Services (CS). Creating and/or editing locally
defined fields in the file are not permitted. Use of locally defined fields that were created prior to the VHA Directive's
2005-044 effective date shall not be supported.
DD ACCESS: @
RD ACCESS:
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
POINTED TO BY: VHA ENTERPRISE STANDARD TITLE field (#1501) of the TIU DOCUMENT DEFINITION File (#8925.1)
CROSS
REFERENCED BY: STATUS(AREG), VUID(AVUID), STANDARD TITLE(B), DOCUMENT TYPE(DTYP), STANDARD TITLE(KWIC), ROLE(ROLE),
SETTING(SET), SUBJECT MATTER DOMAIN(SMD), SERVICE(SVC)
INDEXED BY: VUID & MASTER ENTRY FOR VUID (AMASTERVUID)
LAST MODIFIED: MAY 4,2017@17:27:52
8926.1,.01 STANDARD TITLE 0;1 FREE TEXT (Required)
VHA ENTERPRISE NAME
INPUT TRANSFORM: K:$L(X)>90!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: MAY 25, 2006
HELP-PROMPT: Answer must be 3-90 characters in length
DESCRIPTION: This is the VHA Enterprise Standard Title, which is created by concatenating the Subject Matter
Domain (SMD), Role, Setting, Service, & Document Type axes, in that order (e.g., Cardiology
Attending Inpatient Initial Evaluation Note).
PRE-LOOKUP: I $G(DIC(0))["L",'$D(XUMF) K X D EN^DDIOL("Entries must be edited via the Master File Server (MFS).
","","!?5,$C(7)")
DELETE TEST: 1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be inactivated via the Master File Server (MFS).","","!?5,
$C(7)") I $D(XUMF)
LAYGO TEST: 1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be added via the Master File Server (MFS).","","!?5,$C(7)"
) I $D(XUMF)
DELETE AUTHORITY: @
WRITE AUTHORITY: ^
READ AUTHORITY: @
SOURCE OF DATA: Created by concatenating the SMD, Role, Setting, Service, & Document Type axes, in that order.
CROSS-REFERENCE: 8926.1^B
1)= S ^TIU(8926.1,"B",$E(X,1,90),DA)=""
2)= K ^TIU(8926.1,"B",$E(X,1,90),DA)
3)= ** DO NOT DELETE **
This Regular FileMan cross-reference will facilitate look-up and sorting by VHA Enterprise Standard
Title.
CROSS-REFERENCE: 8926.1^KWIC^KWIC
1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,90),%1=%+1 I $L(I)
>2,^DD("KWIC")'[I S ^TIU(8926.1,"KWIC",I,DA)=""
2)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,90),%1=%+1 I $L(I)
>2 K ^TIU(8926.1,"KWIC",I,DA)
3)= ** DO NOT DELETE **
This Key Word In Context (KWIC) cross-reference will facilitate look-up by partial names.
8926.1,.04 SUBJECT MATTER DOMAIN 0;4 POINTER TO TIU LOINC SUBJECT MATTER DOMAIN FILE (#8926.2)
INPUT TRANSFORM: S DIC("S")="I '$$SCREEN^XTID(8926.2,"""",+Y_"","")" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUN 19, 2006
DESCRIPTION:
Reference to the Subject Matter Domain. This is useful in both validation and mapping.
SCREEN: S DIC("S")="I '$$SCREEN^XTID(8926.2,"""",+Y_"","")"
EXPLANATION: Must be an active Subject Matter Domain.
WRITE AUTHORITY: ^
CROSS-REFERENCE: 8926.1^SMD
1)= S ^TIU(8926.1,"SMD",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,"SMD",$E(X,1,30),DA)
3)= ** DO NOT DELETE **
This REGULAR FileMan cross-reference by Subject Matter Domain is for look-up and sorting.
8926.1,.05 ROLE 0;5 POINTER TO TIU LOINC ROLE FILE (#8926.3)
INPUT TRANSFORM: S DIC("S")="I '$$SCREEN^XTID(8926.3,"""",+Y_"","")" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUN 19, 2006
DESCRIPTION:
Reference to the Role. This is useful in both validation and mapping.
SCREEN: S DIC("S")="I '$$SCREEN^XTID(8926.3,"""",+Y_"","")"
EXPLANATION: Only ACTIVE Roles may be selected.
WRITE AUTHORITY: ^
CROSS-REFERENCE: 8926.1^ROLE
1)= S ^TIU(8926.1,"ROLE",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,"ROLE",$E(X,1,30),DA)
3)= ** DO NOT DELETE **
This REGULAR FileMan cross-reference by Role is for look-up and sorting.
8926.1,.06 SETTING 0;6 POINTER TO TIU LOINC SETTING FILE (#8926.4)
INPUT TRANSFORM: S DIC("S")="I '$$SCREEN^XTID(8926.4,"""",+Y_"","")" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUN 19, 2006
DESCRIPTION:
Reference to the Setting. This is useful in both validation and mapping.
SCREEN: S DIC("S")="I '$$SCREEN^XTID(8926.4,"""",+Y_"","")"
EXPLANATION: Only ACTIVE Settings may be selected.
WRITE AUTHORITY: ^
CROSS-REFERENCE: 8926.1^SET
1)= S ^TIU(8926.1,"SET",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,"SET",$E(X,1,30),DA)
3)= ** DO NOT DELETE **
This REGULAR FileMan cross-reference by Setting is for look-up and sorting.
8926.1,.07 SERVICE 0;7 POINTER TO TIU LOINC SERVICE FILE (#8926.5)
INPUT TRANSFORM: S DIC("S")="I '$$SCREEN^XTID(8926.5,"""",+Y_"","")" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUN 19, 2006
DESCRIPTION:
Reference to the Service. This is useful in both validation and mapping.
SCREEN: S DIC("S")="I '$$SCREEN^XTID(8926.5,"""",+Y_"","")"
EXPLANATION: Only ACTIVE Services may be selected.
WRITE AUTHORITY: ^
CROSS-REFERENCE: 8926.1^SVC
1)= S ^TIU(8926.1,"SVC",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,"SVC",$E(X,1,30),DA)
3)= ** DO NOT DELETE **
This REGULAR FileMan cross-reference by Service is for look-up and sorting.
8926.1,.08 DOCUMENT TYPE 0;8 POINTER TO TIU LOINC DOCUMENT TYPE FILE (#8926.6)
INPUT TRANSFORM: S DIC("S")="I '$$SCREEN^XTID(8926.6,"""",+Y_"","")" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUN 19, 2006
DESCRIPTION:
Reference to the Setting. This is useful in both validation and mapping.
SCREEN: S DIC("S")="I '$$SCREEN^XTID(8926.6,"""",+Y_"","")"
EXPLANATION: Only ACTIVE Document Types may be selected.
WRITE AUTHORITY: ^
CROSS-REFERENCE: 8926.1^DTYP
1)= S ^TIU(8926.1,"DTYP",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,"DTYP",$E(X,1,30),DA)
3)= ** DO NOT DELETE **
This REGULAR FileMan cross-reference by Document Type is for look-up and sorting.
8926.1,2 CODING SYSTEM 2;0 Multiple #8926.12
DESCRIPTION: This multiple stores the coding system(s) associated with the codes identifying this TIU VHA
ENTERPRISE STANDARD TITLE.
8926.12,.01 CODING SYSTEM 0;1 FREE TEXT (audited)
INPUT TRANSFORM: K:$L(X)>7!($L(X)<3) X
LAST EDITED: SEP 08, 2016
HELP-PROMPT: Answer must be 3-7 characters in length.
DESCRIPTION: This field indicates the coding system associated with the codes identifying this TIU VHA
ENTERPRISE STANDARD TITLE.
AUDIT: YES, ALWAYS
CROSS-REFERENCE: 8926.12^B
1)= S ^TIU(8926.1,DA(1),2,"B",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,DA(1),2,"B",$E(X,1,30),DA)
8926.12,.02 CODE 1;0 Multiple #8926.121
DESCRIPTION: This multiple stores the code(s) representing this TIU VHA ENTERPRISE STANDARD TITLE within this
coding system.
8926.121,.01 CODE 0;1 FREE TEXT (Multiply asked) (audited)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: SEP 08, 2016
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
This code represents this TIU VHA ENTERPRISE STANDARD TITLE within this coding system.
AUDIT: YES, ALWAYS
CROSS-REFERENCE: 8926.121^B
1)= S ^TIU(8926.1,DA(2),2,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,DA(2),2,DA(1),1,"B",$E(X,1,30),DA)
8926.1,99.98 MASTER ENTRY FOR VUID VUID;2 SET (Required)
'0' FOR NO;
'1' FOR YES;
LAST EDITED: APR 21, 2006
DESCRIPTION:
This field identifies the Master entry for a VUID associated with a Term/Concept.
WRITE AUTHORITY: ^
UNEDITABLE
RECORD INDEXES: AMASTERVUID (#697)
8926.1,99.99 VUID VUID;1 FREE TEXT (Required)
INPUT TRANSFORM: S X=+X K:$L(X)>20!($L(X)<1)!'(X?1.20N) X
LAST EDITED: APR 21, 2006
HELP-PROMPT: Answer must be 1-20 digits in length.
DESCRIPTION:
VHA Unique ID (VUID). A unique meaningless integer assigned to reference terms VHA wide.
WRITE AUTHORITY: ^
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 8926.1^AVUID
1)= S ^TIU(8926.1,"AVUID",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,"AVUID",$E(X,1,30),DA)
3)= This cross-reference is by VUID.
This cross-reference is by VUID.
RECORD INDEXES: AMASTERVUID (#697)
8926.1,99.991 EFFECTIVE DATE/TIME TERMSTATUS;0 DATE Multiple #8926.199 (Add New Entry without Asking)
LAST EDITED: APR 21, 2006
DESCRIPTION:
Describes the pair Status and Effective Date/Time for each reference term.
WRITE AUTHORITY: ^
8926.199,.01 EFFECTIVE DATE/TIME 0;1 DATE (Required)
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: APR 21, 2006
DESCRIPTION:
This is the date/time when the Status of the reference term was established.
WRITE AUTHORITY: ^
UNEDITABLE
CROSS-REFERENCE: 8926.199^B
1)= S ^TIU(8926.1,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)=""
2)= K ^TIU(8926.1,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)
This cross-reference is by Effective Date/Time.
8926.199,.02 STATUS 0;2 SET (Required)
'1' FOR ACTIVE;
'0' FOR INACTIVE;
LAST EDITED: MAR 12, 2007
DESCRIPTION: The Status of a reference term is either 'ACTIVE' or 'INACTIVE'. If 'ACTIVE', then the term will
be accessible by end-users to document a particular patient event. If 'INACTIVE', then the term
will only be accessible by the application to display legacy data.
WRITE AUTHORITY: ^
UNEDITABLE
CROSS-REFERENCE: 8926.1^AREG^MUMPS
1)= D SET^TIUDD61
2)= Q
3)= ** DO NOT DELETE **
This MUMPS-type cross-reference registers entries for which the activation status has changed
during deployment of Enterprise Standard Titles from ETS. When the deployment process finishes, a
bulletin will be sent to the TIU CACS mail group indicating which titles were either activated or
inactivated by the deployment.
FILES POINTED TO FIELDS
TIU LOINC DOCUMENT TYPE (#8926.6) DOCUMENT TYPE (#.08)
TIU LOINC ROLE (#8926.3) ROLE (#.05)
TIU LOINC SERVICE (#8926.5) SERVICE (#.07)
TIU LOINC SETTING (#8926.4) SETTING (#.06)
TIU LOINC SUBJECT MATTER DOMAI
(#8926.2) SUBJECT MATTER DOMAIN (#.04)
File #8926.1
Record Indexes:
AMASTERVUID (#697) RECORD REGULAR IR SORTING ONLY
Short Descr: This cross-reference identifies the Master entry for a VUID.
Description: If multiple entries have the same VUID in the file, this cross-refernce can be used to identify the Master
entry for a VUID associated with a Term/Concept.
Set Logic: S ^TIU(8926.1,"AMASTERVUID",$E(X(1),1,30),X(2),DA)=""
Kill Logic: K ^TIU(8926.1,"AMASTERVUID",$E(X(1),1,30),X(2),DA)
Whole Kill: K ^TIU(8926.1,"AMASTERVUID")
X(1): VUID (8926.1,99.99) (Subscr 1) (Len 30) (forwards)
X(2): MASTER ENTRY FOR VUID (8926.1,99.98) (Subscr 2) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):