STANDARD DATA DICTIONARY #4.009 -- STANDARD TERMINOLOGY VERSION FILE FILE                                         3/24/25    PAGE 1
STORED IN ^DIC(4.009,  (1 ENTRY)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                        (VERSION 8.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
The file holds the last Version of Standard Terminology update. 
 
DO NOT EDIT THIS FILE! 
 
The file entry is set within MFS. Local modifications to this file will seriously disrupt standard file updating and have negative
consequences to existing VistA applications.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: VUID(AVUID), VERSION NAME(B)

INDEXED BY:    MASTER ENTRY FOR VUID & VUID (AMASTERVUID)




4.009,.01     VERSION NAME           0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>50!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      JUL 19, 2005 
              HELP-PROMPT:      Answer must be 3-50 characters in length. 
              DESCRIPTION:
                                NAME THAT DESCRIBES THE VERSION 

              CROSS-REFERENCE:  4.009^B 
                                1)= S ^DIC(4.009,"B",$E(X,1,30),DA)=""
                                2)= K ^DIC(4.009,"B",$E(X,1,30),DA)


4.009,1       VERSION                0;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>7!($L(X)<1) X
              LAST EDITED:      JUL 19, 2005 
              HELP-PROMPT:      Answer must be 1-7 characters in length. 
              DESCRIPTION:
                                Version of the terminology 


4.009,99.98   MASTER ENTRY FOR VUID  VUID;2 SET

                                '1' FOR YES; 
                                '0' FOR NO; 
              LAST EDITED:      JUL 19, 2005 
              DESCRIPTION:
                                This field identifies the Master entry for a VUID associated with a Term/Concept.  

              RECORD INDEXES:   AMASTERVUID (#535)

4.009,99.99   VUID                   VUID;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
              LAST EDITED:      JUL 19, 2005 
              HELP-PROMPT:      Answer must be 1-20 characters in length. 
              DESCRIPTION:
                                Unique identification from ERT.  

              CROSS-REFERENCE:  4.009^AVUID 
                                1)= S ^DIC(4.009,"AVUID",$E(X,1,30),DA)=""
                                2)= K ^DIC(4.009,"AVUID",$E(X,1,30),DA)
                                3)= Please don't delete AVUID x-ref

              RECORD INDEXES:   AMASTERVUID (#535)

4.009,99.991  EFFECTIVE DATE/TIME    TERMSTATUS;0 DATE Multiple #4.00999 (Add New Entry without Asking)


4.00999,.01     EFFECTIVE DATE/TIME    0;1 DATE

                INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
                LAST EDITED:      JUL 19, 2005 
                DESCRIPTION:
                                  Describes the pair Status and Effective Date/Time for each reference term.  

                CROSS-REFERENCE:  4.00999^B 
                                  1)= S ^DIC(4.009,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)=""
                                  2)= K ^DIC(4.009,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)


4.00999,.02     STATUS                 0;2 SET

                                  '1' FOR ACTIVE; 
                                  '2' FOR INACTIVE; 
                LAST EDITED:      JUL 19, 2005 
                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.  




File #4.009

  Record Indexes:

  AMASTERVUID (#535)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  Identifies Master entry for a VUID
        Set Logic:  S ^DIC(4.009,"AMASTERVUID",$E(X(1),1,30),X(2),DA)=""
       Kill Logic:  K ^DIC(4.009,"AMASTERVUID",$E(X(1),1,30),X(2),DA)
       Whole Kill:  K ^DIC(4.009,"AMASTERVUID")
             X(1):  MASTER ENTRY FOR VUID  (4.009,99.98)  (Subscr 1)  (Len 30)  (forwards)
             X(2):  VUID  (4.009,99.99)  (Subscr 2)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):