STANDARD DATA DICTIONARY #51.26 -- PHARMACOGENOMIC GENES FILE                                                      3/2/26    PAGE 1
STORED IN ^PS(51.26,  (48 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.  
 
This file contains a list of standard genes, associated synonyms, and a corresponding vendor gene for every standard gene. The
associated vendor gene will be used for the pharmacogenomic order checks provided by the vendor. Updates cannot be made at a local
facility.  


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

POINTED TO BY: REPLACED BY VHA STANDARD TERM field (#99.97) of the PHARMACOGENOMIC GENES File (#51.26) 
               

CROSS
REFERENCED BY: REPLACED BY VHA STANDARD TERM(AREPLACETERM)

INDEXED BY:    VUID & MASTER ENTRY FOR VUID (AMASTERVUID), NAME (B), FIRST DATABANK GENE (C), SYNONYM (D)


    LAST MODIFIED: MAR 2,2026@02:07:47

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

              INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1)!'(X'?1P.E) X
              MAXIMUM LENGTH:   25
              LAST EDITED:      APR 23, 2025 
              HELP-PROMPT:      Enter the name of the Gene. The answer must be 1-25 characters in length. 
              DESCRIPTION:      This is the name of the Gene. This field, in addition to the synonyms also in this file, will
                                enable the software to derive a vendor gene to be used in the pharmacogenomic order check for
                                medication orders.  

              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")
              DELETE TEST:      1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be inactivated via the Master File Server(MFS).","","!?5")
                                 I '$D(XUMF)

              LAYGO TEST:       1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be added via the Master File Server(MFS).","","!?5") I $D(
                                XUMF)

              WRITE AUTHORITY:  ^
              FIELD INDEX:      B (#1699)    REGULAR    IR    LOOKUP & SORTING
                  Short Descr:  This cross reference sets the global PS(51.26,"B",X,DA)="".
                  Description:  This is the "B" cross reference on the NAME (#01) Field. This cross reference, along with the
                                Synonym and Name cross references, will be used when converting a Gene from a lab test to a First
                                DataBank Gene, enabling successful pharmacogenomic order checking.  
                    Set Logic:  S ^PS(51.26,"B",$E(X,1,25),DA)=""
                   Kill Logic:  K ^PS(51.26,"B",$E(X,1,25),DA)
                   Whole Kill:  K ^PS(51.26,"B")
                         X(1):  NAME  (51.26,.01)  (Subscr 1)  (Len 25)  (forwards)


51.26,1       FIRST DATABANK GENE    0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
              MAXIMUM LENGTH:   25
              LAST EDITED:      APR 23, 2025 
              HELP-PROMPT:      Enter the name of the First Databank Gene. The answer must be 1-25 characters in length. 
              DESCRIPTION:      This field provides the mapping from the lab test Gene to the First DataBank Gene. The First
                                DataBank Gene will be used when processing the pharmacogenomic order checks provided by First
                                DataBank.  

              FIELD INDEX:      C (#1700)    REGULAR    IR    LOOKUP & SORTING
                  Short Descr:  This cross reference sets the global PS(51.26,"C",X,DA)="".
                  Description:  This is the "C" cross reference on the FIRST DATABANK GENE (#1) Field.  This cross reference, along
                                with the Synonym and Name cross references, will be used when converting a Gene from a lab test to
                                a corresponding First DataBank Gene, enabling successful pharmacogenomic order checking.  
                    Set Logic:  S ^PS(51.26,"C",$E(X,1,25),DA)=""
                   Kill Logic:  K ^PS(51.26,"C",$E(X,1,25),DA)
                   Whole Kill:  K ^PS(51.26,"C")
                         X(1):  FIRST DATABANK GENE  (51.26,1)  (Subscr 1)  (Len 25)  (forwards)


51.26,2       SYNONYM                1;0 Multiple #51.262

              DESCRIPTION:
                                This multiple contains a list of synonyms for the NAME field, which is the name of the Gene.  


51.262,.01      SYNONYM                0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
                MAXIMUM LENGTH:   25
                LAST EDITED:      APR 23, 2025 
                HELP-PROMPT:      Enter a synonym for the name of the Gene. The answer must be 1-25 characters in length. 
                DESCRIPTION:      This is a synonym for the NAME field, which is the name of the Gene. The synonym will be used for
                                  mapping Genes from lab test results to a First DataBank Gene that can be used in pharmacogenomic
                                  order checking.  

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

                FIELD INDEX:      D (#1701)    REGULAR    IR    LOOKUP & SORTING    WHOLE FILE (#51.26)
                    Short Descr:  This cross reference will be used to map genes.
                    Description:  This is a whole file cross reference on the SYNONYM (#.01) Field of the SYNONYM (#51.262)
                                  Subfile. It sets the global ^PS(51.26,"D",SYNONYM,DA(1),DA)="".  
                      Set Logic:  S ^PS(51.26,"D",$E(X,1,25),DA(1),DA)=""
                     Kill Logic:  K ^PS(51.26,"D",$E(X,1,25),DA(1),DA)
                     Whole Kill:  K ^PS(51.26,"D")
                           X(1):  SYNONYM  (51.262,.01)  (Subscr 1)  (Len 25)  (forwards)




51.26,3       STANDARD PHENOTYPE     2;0 POINTER Multiple #51.263

              DESCRIPTION:
                                This multiple contains a list of Phenotypes that are appropriate for the Gene.  


51.263,.01      STANDARD PHENOTYPE     0;1 POINTER TO PHARMACOGENOMIC PHENOTYPES FILE (#51.28) (Multiply asked)

                LAST EDITED:      APR 10, 2024 
                HELP-PROMPT:      Enter a Standard Phenotype that should be selectable for this Gene. 
                DESCRIPTION:      This Phenotype is appropriate for the Gene. It will be used in the Check Pharmacogenomic
                                  Interaction [PSS PGX TEST OPTION] Option to limit the selection to only appropriate Phenotypes
                                  for each selected Gene.  

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




51.26,99.97   REPLACED BY VHA STANDARD TERM VUID;3 POINTER TO PHARMACOGENOMIC GENES FILE (#51.26)

              LAST EDITED:      APR 22, 2025 
              HELP-PROMPT:      Enter the VHA standard term that replaces this term. 
              DESCRIPTION:      This field is populated when one Term/Concept replaces another Term/Concept.  This field is
                                controlled by standardization and should only be changed by standardization processes.  This field
                                contains a pointer to a VHA standard term that replaces this entry.  

              CROSS-REFERENCE:  51.26^AREPLACETERM 
                                1)= S ^PS(51.26,"AREPLACETERM",$E(X,1,30),DA)=""
                                2)= K ^PS(51.26,"AREPLACETERM",$E(X,1,30),DA)
                                This cross-reference can be used to identify the replacement entries associated with a
                                Term/Concept.  



51.26,99.98   MASTER ENTRY FOR VUID  VUID;2 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      APR 22, 2025 
              HELP-PROMPT:      Enter '1' for 'Yes' if this entry is the Master entry for this VUID. 
              DESCRIPTION:
                                This field identifies the Master entry for a VUID associated with a Term/Concept.  

              RECORD INDEXES:   AMASTERVUID (#1698)

51.26,99.99   VUID                   VUID;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
              MAXIMUM LENGTH:   20
              LAST EDITED:      APR 22, 2025 
              HELP-PROMPT:      Enter the VHA Unique ID (VUID) that represents this VHA wide term. 
              DESCRIPTION:      This number represents the VHA Unique ID (VUID). It is a unique meaningless integer assigned to
                                reference terms VHA wide.  

              RECORD INDEXES:   AMASTERVUID (#1698)

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

              DESCRIPTION:      This multiple field contains the history of changes to the status of this reference term, along
                                with the date/time of each change.  


51.2699,.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 22, 2025 
                HELP-PROMPT:      Enter the Date/Time when the Status of the reference term was established or changed. 
                DESCRIPTION:
                                  This is the date/time when the Status of the reference term was established.  

                CROSS-REFERENCE:  51.2699^B 
                                  1)= S ^PS(51.26,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)=""
                                  2)= K ^PS(51.26,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)
                                  This cross-reference is by Effective Date/Time.  



51.2699,.02     STATUS                 0;2 SET

                                  '1' FOR ACTIVE; 
                                  '0' FOR INACTIVE; 
                LAST EDITED:      APR 23, 2025 
                HELP-PROMPT:      Enter the current status of the term, either ACTIVE or INACTIVE. 
                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.  





      FILES POINTED TO                      FIELDS

PHARMACOGENOMIC GENES (#51.26)    REPLACED BY VHA STANDARD TERM (#99.97)

PHARMACOGENOMIC PHENOTYPES 
                   (#51.28)       STANDARD PHENOTYPE:STANDARD PHENOTYPE (#.01)


File #51.26

  Record Indexes:

  AMASTERVUID (#1698)    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-reference can be used to identify the Master
                    entry for a VUID associated with a Term/Concept.  
        Set Logic:  S ^PS(51.26,"AMASTERVUID",$E(X(1),1,30),X(2),DA)=""
       Kill Logic:  K ^PS(51.26,"AMASTERVUID",$E(X(1),1,30),X(2),DA)
       Whole Kill:  K ^PS(51.26,"AMASTERVUID")
             X(1):  VUID  (51.26,99.99)  (Subscr 1)  (Len 30)  (forwards)
             X(2):  MASTER ENTRY FOR VUID  (51.26,99.98)  (Subscr 2)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):