STANDARD DATA DICTIONARY #757.12 -- SEMANTIC TYPE FILE                                                            3/24/25    PAGE 1
STORED IN ^LEX(757.12,  (138 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                   (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the definitions of the semantical types.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: DESCRIPTIVE TITLE (#1)[R]

POINTED TO BY: SEMANTIC TYPE field (#2) of the SEMANTIC MAP File (#757.1) 
               

CROSS
REFERENCED BY: UNIQUE IDENTIFIER(B), CLASS(C), DESCRIPTIVE TITLE(D), DESCRIPTIVE TITLE(E), CLASS(F)



757.12,.01    UNIQUE IDENTIFIER      0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4)!'(X?1"T"3N) X
              LAST EDITED:      MAR 16, 1995 
              HELP-PROMPT:      Unique identifier must be 4 characters in length, T followed by 3 numerics. 
              DESCRIPTION:
                                The unique identifier is used for file maintenance.  

                                UNEDITABLE
              CROSS-REFERENCE:  757.12^B 
                                1)= S ^LEX(757.12,"B",$E(X,1,30),DA)=""
                                2)= K ^LEX(757.12,"B",$E(X,1,30),DA)
                                ^LEX(757.12,"B",TUI,IEN) - where TUI is the Semantic Type Unique Identifier and IEN is the Internal
                                Entry Number of the Semantic Type file #757.12 where the Type Unique Identifier is located.  



757.12,1      DESCRIPTIVE TITLE      0;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>200!($L(X)<2) X
              LAST EDITED:      MAY 09, 1997 
              HELP-PROMPT:      Descriptive Title must be 2-200 characters in length. 
              DESCRIPTION:
                                Full title (textual description, mixed case) representing a semantical type.  

                                UNEDITABLE
              CROSS-REFERENCE:  757.12^D 
                                1)= S ^LEX(757.12,"D",$E(X,1,30),DA)=""
                                2)= K ^LEX(757.12,"D",$E(X,1,30),DA)
                                ^LEX(757.12,"D",DT,IEN) - where DT is the Descriptive Title (1) of a semantic type and IEN is the
                                Internal Entry Number in the Semantic Types file #757.12 where the descriptive title of the
                                semantic type is located.  


              CROSS-REFERENCE:  757.12^E^MUMPS 
                                1)= S ^LEX(757.12,"E",$$UP^XLFSTR($E(X,1,30)),DA)=""
                                2)= K ^LEX(757.12,"E",$$UP^XLFSTR($E(X,1,30)),DA)
                                ^LEX(757.12,"E",UDT,IEN) - where UDT is the Uppercase form of the Descriptive Title (1) of the
                                semantic type and IEN is the Internal Entry Number in the Semantic Types file #757.12 where the
                                descriptive title is located.  



757.12,2      CLASS                  0;3 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<3)!'(X?3U)!('$D(^LEX(757.11,"B",X))) X
              LAST EDITED:      NOV 24, 1993 
              HELP-PROMPT:      Class must be 3 UPPERCASE characters. 
              DESCRIPTION:
                                Three character mnemonic representing the semantical class for which this semantical type belongs.  

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

              CROSS-REFERENCE:  757.12^C 
                                1)= S ^LEX(757.12,"C",$E(X,1,30),DA)=""
                                2)= K ^LEX(757.12,"C",$E(X,1,30),DA)
                                ^LEX(757.12,"C",SC,IEN) - where SC is a 3 character mnemonic representing a semantic class to which
                                the semantic type belongs and IEN is the Internal Entry Number of the Semantic Type file #757.12
                                where the semantic class is located.  


              CROSS-REFERENCE:  757.12^F^KWIC 
                                1)= S %A=$P($G(^LEX(757.12,DA,0)),"^",2)_" ",%1=1,%B=$O(^LEX(757.11,"B",X,0)) F %=1:1:$L(%A)+1 S I=
                                $E(%A,%) I "(,.?! '-/&:;)"[I S I=$E($E(%A,%1,%-1),1,30),%1=%+1 I $L(I)>2,^DD("KWIC")'[I S ^LEX(757.
                                11,"F",$$UP^XLFSTR(I),+(%B))=""

                                2)= S %A=$P($G(^LEX(757.12,DA,0)),"^",2)_" ",%1=1,%B=$O(^LEX(757.11,"B",X,0)) F %=1:1:$L(%A)+1 S I=
                                $E(%A,%) I "(,.?! '-/&:;)"[I S I=$E($E(%A,%1,%-1),1,30),%1=%+1 I $L(I)>2 K ^LEX(757.11,"F",$$UP^XLF
                                STR(I),+(%B))


757.12,3      ASSOCIATED CODING SYSTEMS 1;0 Multiple #757.123

              DESCRIPTION:      This multiple field contains all of the classification systems (i.e., ICD, CPT, DSM) which have
                                terms included in this semantical type.  


757.123,.01     ASSOCIATED CODING SYSTEMS 0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:$L(X)>20!($L(X)<2) X
                LAST EDITED:      JAN 26, 1995 
                HELP-PROMPT:      Coding System must be 2-20 characters in length. 
                CROSS-REFERENCE:  757.123^B 
                                  1)= S ^LEX(757.12,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^LEX(757.12,DA(1),1,"B",$E(X,1,30),DA)
                                  ^LEX(757.12,ST,1,"B",SYS,IEN) - where ST is the Internal Entry Number in the Semantic Types file
                                  #757.12 where the Semantic Type is located, SYS is the Associated Coding System belonging to the
                                  Semantic Type, and IEN is the Internal Entry Number of the Associated Coding System Sub-file
                                  #757.123 where the Associated Coding System (.01) is located.  






INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):