STANDARD DATA DICTIONARY #757.2 -- SUBSET DEFINITIONS FILE                                                        3/24/25    PAGE 1
STORED IN ^LEXT(757.2,  (94 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                    (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the definitions for vocabulary subsets in the Clinical Lexicon, application definitions and user defaults (by
application).  These vocabularies (defined primarily by the search filter and the index to be used while conducting searches) may
be used during look-up in lieu of the main expression file (if indicated by either the application definition or the user's
preferences).  


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

POINTED TO BY: SUBSET field (#.01) of the SUBSET MEMBERSHIP sub-field (#757.181) of the SNOMED CT HIERARCHY File (#757.018) 
               SUBSET field (#1) of the SUBSETS File (#757.21) 
               

CROSS
REFERENCED BY: SHORT TITLE(AA), APPLICATION MNEMONIC(AB), APPLICATION FILE NUMBER(ADEF), APPLICATION NAMESPACE(AN), 
               APPLICATION FILE NUMBER(APPS), USER(AUD), NAME(B), NAME(C), NAME(D)



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

              DESCRIPTIVE TITLE   
              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>35!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      JUL 24, 1996 
              HELP-PROMPT:      Descriptive title must be 3-35 characters in length. 
              DESCRIPTION:
                                Vocabulary subset name (i.e., "Nursing", "Social Work").  

              CROSS-REFERENCE:  757.2^B 
                                1)= S ^LEXT(757.2,"B",$E(X,1,30),DA)=""
                                2)= K ^LEXT(757.2,"B",$E(X,1,30),DA)
                                ^LEXT(757.2,"B",NAME,IEN) - where NAME is the subset Name (.01) and IEN is the Internal Entry
                                Number of the Subset Definition file #757.02 where the subset name is located.  


              CROSS-REFERENCE:  757.2^C^MUMPS 
                                1)= S ^LEXT(757.2,"C",$E($$UP^XLFSTR(X),1,63),DA)=""
                                2)= K ^LEXT(757.2,"C",$E($$UP^XLFSTR(X),1,63),DA)
                                ^LEXT(757.2,"C",NAME,IEN) - where NAME is an extended 63 character uppercase subset Name (.01) and
                                IEN is the Internal Entry Number of the Subset Definition file #757.2 where the subset name is
                                located.  


              CROSS-REFERENCE:  757.2^D^MUMPS 
                                1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)
                                >2,^DD("KWIC")'[I S ^LEXT(757.2,"D",I,DA)="",^LEXT(757.2,"D",$$UP^XLFSTR(I),DA)="",^LEXT(757.2,"D",
                                $$LOW^XLFSTR(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,30),%1=%+1 I $L(I)
                                >2 K ^LEXT(757.2,"D",I,DA),^LEXT(757.2,"D",$$UP^XLFSTR(I),DA),^LEXT(757.2,"D",$$LOW^XLFSTR(I),DA)
                                ^LEXT(757.2,"D",WORD,IEN) - This is a word index on the Subset name where WORD is a single
                                uppercase/lowercase word parsed from the name and IEN is the Internal Entry Number where this word
                                is located.  



757.2,1       SHORT TITLE            0;2 FREE TEXT

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<3)!'(X?3U) X
              LAST EDITED:      APR 25, 1996 
              HELP-PROMPT:      Short Title (index mnemonic) must be 3 characters in length. 
              DESCRIPTION:      Three character uppercase mnemonic representing the vocabulary subset.  This short title, when
                                appended with the letter "A" (i.e. "A"_"NUR" to "ANUR") becomes the name of the index to be used by
                                the look-up utility.  

              CROSS-REFERENCE:  757.2^AA 
                                1)= S ^LEXT(757.2,"AA",$E(X,1,30),DA)=""
                                2)= K ^LEXT(757.2,"AA",$E(X,1,30),DA)
                                ^LEXT(757.2,"AA",ST,IEN) - where ST is the Short Title (1) of a subset and IEN is the Internal
                                Entry Number in the Subset Definition file #757.2 where the Short Title is located.  The Short
                                Title when when appended with a leading "A" becomes the name of the index to use during look-up
                                (i.e., NUR becomes "ANUR" for the Nursing subset index).  



757.2,2       GLOBAL REFERENCE       1;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>40!($L(X)<4) X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Global Reference (less ^) must be 4-40 characters in length, i.e., LEX(757, 
              DESCRIPTION:
                                Global root of the file containing the vocabulary subset.  


757.2,3       HELP ROUTINE ENTRY POINT 2;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
              LAST EDITED:      APR 25, 1996 
              HELP-PROMPT:      Help Routine Entry Point must be 1-8 characters in length, i.e., XTLK 
              DESCRIPTION:      Contains the help routine's entry point (provided a separate help routine has been written to
                                support the vocabulary subset and the entry point of this routine is other than the first line).  


757.2,4       HELP ROUTINE           2;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<3) X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Help Routine must be 3-8 characters in length, i.e., LEXHLP 
              DESCRIPTION:      Contains the name of the help routine (provided a separate help routine was written).  This help
                                routine will be used by the look-up utility.  


757.2,5       DISPLAY ROUTINE ENTRY POINT 3;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
              LAST EDITED:      APR 25, 1996 
              HELP-PROMPT:      Display Routine Entry Point must be 1-8 characters in length, i.e., XTLK 
              DESCRIPTION:      Contains the display routine's entry point (provided a separate display routine has been written to
                                support the vocabulary subset and the entry point of this routine is other than the first line).  


757.2,6       DISPLAY ROUTINE        3;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<3) X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Display Routine must be 3-8 characters in length, i.e., LEXPRNT 
              DESCRIPTION:      Contains the name of the display routine (provided a separate display routine was written).  This
                                display routine will be used by the look-up utility.  


757.2,7       DISPLAY CODES          4;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>100!($L(X)<3) X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Display Code String must be 3-100 characters in length, i.e., ICD/NAN/NIC 
              DESCRIPTION:      This field contains a string of classification/coding systems (separated by slashes) to be
                                displayed during look-up (i.e., "ICD/CPT/DSM/NAN").  This string will not override the user's
                                preferred code display stored in ^LEXT(757.2,D0,200,DUZ,2) 


757.2,8       APPLICATION MNEMONIC   5;1 FREE TEXT

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) I '+($$APPS^LEXHLP(X)) K X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Application Mnemonic must be 3 characters in length, and cannot be the same as the Short Title 
                                (index identifier at field 1). 
              DESCRIPTION:      Unique 3 character mnemonic representing either the application using the Lexicon or if an
                                application has more than one set of defaults, it will represent the applications preference.  For
                                example, PL1 - Problem List Provider entry, PL2 - Problem List ICD only.  This field is populated 
                                by DB Integration Agreement only 

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  757.2^AB^MUMPS 
                                1)= D SAPP^LEXNDX2
                                2)= D KAPP^LEXNDX2
                                ^LEXT(757.2,"AB",AN,IEN) - where AN is the Application Mnemonic and IEN is the Internal Entry
                                Number of the Subset Definition file where the Application Mnemonic is located.  This is an index
                                of only those subsets which define an application.  (Note:  Subsets which define a vocabulary are
                                indexed at "AA") 



757.2,9       APPLICATION INDEX      5;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Application Index must be 3 characters in length. 
              DESCRIPTION:      This is the index which the application will use during look-up.  This index must be contained in
                                the global defined in the Global Reference (#2).  This index name will be appended with a leading
                                "A" to create the index name (i.e., "A"_NUR to "ANUR" to use the Nursing Index).  This field is
                                populated by DB Integration Agreement only.  


757.2,10      APPLICATION FILTER     6;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Application Filter is Standard MUMPS code. 
              DESCRIPTION:      This is the filter to be used by the application during look-up.  It is in the format of a valid IF
                                statement without an action to perform when the condition is true.  This field is populated by DB
                                Integration Agreement only.  

              WRITE AUTHORITY:  @

757.2,11      APPLICATION DISPLAY CODES 7;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>210!($L(X)<3) X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Application Display Codes must be 3-210 characters in length, i.e., "ICD/CPT" 
              DESCRIPTION:      This is a string of source abbreviations (separated by slashes) of the source code to display for
                                an application during look-up.  For example: 
                                 
                                   ICD/CPT/DSM 
                                 
                                   will display ICD-9, CPT-4 and DSM-3R codes with the term during look-up 
                                 
                                This field is populated by DB Integration Agreement only.  


757.2,12      APPLICATION USER DEFAULTS 5;3 SET

                                '1' FOR USER DEFAULTS ALLOWED; 
                                '0' FOR USER DEFAULTS ARE NOT ALLOWED; 
              LAST EDITED:      APR 01, 1996 
              DESCRIPTION:      This is a flag indicating whether an application allows users to specify defaults in field 200 of
                                this file.  


757.2,13      APPLICATION FILE NUMBER 5;4 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."9N.N) X
              LAST EDITED:      OCT 16, 1995 
              HELP-PROMPT:      Type a Number between 1 and 9999999999, 8 Decimal Digits 
              DESCRIPTION:      This is the file number from the application where the pointer to the Expressions file (#757.01)
                                will be stored.  

              CROSS-REFERENCE:  757.2^ADEF^MUMPS 
                                1)= S:+($P($G(^LEXT(757.2,DA,5)),U,3))>0 ^LEXT(757.2,"ADEF",X,DA)=""
                                2)= K ^LEXT(757.2,"ADEF",X,DA)
                                ^LEXT(757.2,"ADEF",FI,IEN) - where FI is the Application File ID (13) and IEN is the Internal Entry
                                Number of the Subset Definition file #757.2 where the Application File ID is located.  This index
                                node is only set if Application User Default flag (12) is set to 1, and provides an index of only
                                those applications who allow user defaults to be defined at the application level.  


              CROSS-REFERENCE:  757.2^APPS 
                                1)= S ^LEXT(757.2,"APPS",$E(X,1,30),DA)=""
                                2)= K ^LEXT(757.2,"APPS",$E(X,1,30),DA)
                                ^LEXT(757.2,"APPS",FI,IEN) - where FI is the Application File ID (13) and IEN is the Internal Entry
                                Number of the Subset Definition file #757.2 where the Application File ID is located.  This
                                provides an index of all applications defined in this file (with or without user defined defaults).  



757.2,14      APPLICATION NAMESPACE  5;5 FREE TEXT

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>4!($L(X)<2) X
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      Application Namespace must be 2-4 characters in length. 
              DESCRIPTION:      This is the unique namespace prefix assigned to the package/application which is defined in this
                                file.  It is used to extract application level defaults (filter/display/vocabulary).  

              EXECUTABLE HELP:  Q
              CROSS-REFERENCE:  757.2^AN 
                                1)= S ^LEXT(757.2,"AN",$E(X,1,30),DA)=""
                                2)= K ^LEXT(757.2,"AN",$E(X,1,30),DA)
                                ^LEXT(757.2,"AN",AN,IEN) - where AN is an Application Namespace and IEN is the Internal Entry
                                Number of the Subset Definition file #757.2 where the Application Namespace is located.  This index
                                is used in both setting user defaults and setting up the special variables for Lexicon look-up.  



757.2,15      UNRESOLVED NARRATIVES  5;6 SET

                                '1' FOR Use Unresolved Narratives; 
                                '0' FOR Do not use Unresolved Narratives; 
              LAST EDITED:      APR 01, 1996 
              DESCRIPTION:      The Lexicon has the ability to capture user narratives which result in unsuccessful searches. 
                                These "Unresolved Narratives" are returned to developers for consideration in future releases of
                                the Lexicon.  This flag indicates whether an application will use the unresolved feature of the
                                Lexicon.  


757.2,16      OVERRIDE USER DEFAULTS 5;7 SET

                                '1' FOR YES; 
                                '0' FOR NO; 
              LAST EDITED:      APR 01, 1996 
              DESCRIPTION:      Boolean flag for application definition to indicate if the application defaults are to override the
                                defaults set by the user.  


757.2,17      SHORTCUT CONTEXT       5;8 POINTER TO SHORTCUT CONTEXT FILE (#757.41)

              LAST EDITED:      FEB 11, 1995 
              DESCRIPTION:
                                This points to the context describing the set of shortcuts to use during searches of the Lexicon.  


757.2,18      USER MODIFIERS         5;9 SET

                                '1' FOR USE MODIFIERS; 
                                '0' FOR DO NOT USE MODIFIERS; 
              LAST EDITED:      JUL 05, 1997 
              DESCRIPTION:      Some vocabularies have modifiers.  This field is a flag indicating to the lookup whether these
                                modifiers should be accessed during the search.  


757.2,100     DESCRIPTION            100;0   WORD-PROCESSING #757.22

              DESCRIPTION:
                                Contains a description of the general make-up of the vocabulary/subset.  


                LAST EDITED:      JAN 24, 1995 
                DESCRIPTION:      Contains a description of the general make-up of the vocabulary/subset, and may be used for help
                                  in special look-up in this file.  




757.2,200     DEFAULTS BY USER       200;0 POINTER Multiple #757.201 (Add New Entry without Asking)

              DESCRIPTION:      This multiple contains user defaults for the search filter, display and the vocabulary for a
                                limited number of applications.  


757.201,.01     USER                   0;1 POINTER TO NEW PERSON FILE (#200)

                INPUT TRANSFORM:  S DINUM=X
                LAST EDITED:      AUG 08, 1994 
                DESCRIPTION:
                                  This is a pointer to the New Person file #200 of the user who has defined the defaults.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  757.201^B 
                                  1)= S ^LEXT(757.2,DA(1),200,"B",$E(X,1,30),DA)=""
                                  2)= K ^LEXT(757.2,DA(1),200,"B",$E(X,1,30),DA)
                                  ^LEX(757.1,SD,200,"B",USER,IEN) - where SD is the Internal Entry Number for a Subset Definition
                                  in the Subset Definition file #757.2, USER is a pointer the the New Person file #200 who has
                                  default defined, and IEN is the Internal Entry Number in the Defaults by User Sub-file #757.201
                                  where the user defaults are located.  


                CROSS-REFERENCE:  757.2^AUD^MUMPS 
                                  1)= Q:+X<1  S:$L($G(^VA(200,+X,0))) ^LEXT(757.2,"AUD",$P($G(^VA(200,+X,0)),U,1),+X,DA(1),DA)=""
                                  2)= K:+X'<1&($L($G(^VA(200,+X,0)))) ^LEXT(757.2,"AUD",$P($G(^VA(200,+X,0)),U,1),+X,DA(1),DA)
                                  ^LEXT(757.2,"AUD",NAME,USER,SD,IEN) - where NAME is the name of the user taken from the New
                                  Person file #200, USER (.01) is a pointer to the New Person file #200, SD is the Internal Entry
                                  Number of the Subset Definition file #757.2 where the Application Defaults are located, and IEN
                                  is the Internal Entry Number of the Defaults by User Sub-file #757.201 where the user defaults
                                  are located.  This is an index used to create alphabetical listings of users who have defaults
                                  set for the application defined at SD.  



757.201,1       SEARCH FILTER          1;E1,245 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>245!($L(X)<3) X D:$D(X) ^DIM
                LAST EDITED:      AUG 25, 1994 
                HELP-PROMPT:      Search Filter must be 3-245 characters in length, in the form of a valid MUMPS IF statement. 
                DESCRIPTION:      This is the search filter - DIC("S") - which was either selected or created by the user for
                                  conducting searches in the Lexicon.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


757.201,1.5     SEARCH FILTER NAME     1.5;1 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X
                LAST EDITED:      JAN 20, 1995 
                HELP-PROMPT:      Answer must be 1-200 characters in length. 
                DESCRIPTION:
                                  This is the name of the user default search filter.  


757.201,2       DISPLAY                2;1 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>210!($L(X)<3) X
                LAST EDITED:      MAR 24, 1994 
                HELP-PROMPT:      Answer must be 3-210 characters in length. 
                DESCRIPTION:      This is a string of classification codes to display while conducting searches in the Lexicon.  It
                                  is a series of 3 character mnemonics (separated by slashes).  For example:  "ICD/CPT/DSM" 


757.201,2.5     DISPLAY NAME           2.5;1 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X
                LAST EDITED:      JAN 20, 1995 
                HELP-PROMPT:      Answer must be 1-200 characters in length. 
                DESCRIPTION:
                                  This is the name of the default user display format.  


757.201,3       VOCABULARY             3;1 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
                LAST EDITED:      MAR 24, 1994 
                HELP-PROMPT:      Answer must be 3 characters in length. 
                DESCRIPTION:      This is a 3 character mnemonic that, when appended with a leading "A" becomes the name of the
                                  index to use while searching the Lexicon.  For example the subset mnemonic WRD for the Lexicon is
                                  indexed at "AWRD", SOC for the Social Work subset is indexed at "ASOC", and NUR for the Nursing
                                  subset is indexed a "ANUR".  


757.201,3.5     VOCABULARY NAME        3.5;1 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X
                LAST EDITED:      JAN 20, 1995 
                HELP-PROMPT:      Answer must be 1-200 characters in length. 
                DESCRIPTION:
                                  This the name of the user default vocabulary (or subset).  


757.201,4       SHORTCUTS              4;1 POINTER TO SHORTCUT CONTEXT FILE (#757.41)

                LAST EDITED:      FEB 11, 1995 
                DESCRIPTION:      This is a pointer to the Shortcuts Context file #757.41 which determines the group of shortcuts
                                  in the Shortcuts file #757.4 to be used during searches of the Lexicon.  


757.201,4.5     SHORTCUTS NAME         4.5;1 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X
                LAST EDITED:      FEB 11, 1995 
                HELP-PROMPT:      Shortcut Context Name must be 1-200 characters in length. 
                DESCRIPTION:      This is the name of the user default context for the set of shortcuts to use during searches of
                                  the Lexicon.  





      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 DEFAULTS BY USER:USER (#.01)

SHORTCUT CONTEXT (#757.41)        SHORTCUT CONTEXT (#17)
                                  DEFAULTS BY USER:SHORTCUTS (#4)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):