STANDARD DATA DICTIONARY #704.116 -- OBS_SET FILE                                                                 3/24/25    PAGE 1
STORED IN ^MDC(704.116,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                     (VERSION 1.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file maintains sets of observations used by the Clinical Flowsheets application.  


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

PRIMARY KEY:        A (#108)
  Uniqueness Index: PK (#949)
       File, Field: 1) SET_ID (704.116,.01)

POINTED TO BY: SET_ID field (#.1) of the OBS_FLOWSHEET_SUPP_PAGE File (#704.1122) 
               SET_ID field (#.01) of the OBS_SET_OBS_PAIR File (#704.1161) 
               


INDEXED BY:    SET_ID & PUBLIC (APT), SET_ID (PK)




704.116,.01   SET_ID                 0;1 FREE TEXT (Required) (Key field)

              INPUT TRANSFORM:  K:$L(X)>38!($L(X)<38)!'(X?1"{"8UN1"-"4UN1"-"4UN1"-"4UN1"-"12UN1"}") X
              LAST EDITED:      MAY 22, 2009 
              HELP-PROMPT:      Answer with the system generated GUID for this set. 
              DESCRIPTION:      This value is the Global Unique IDentifier (GUID) for this entry. This value is maintained
                                nationally and is the same throughout the enterprise.  A sample SET ID could be
                                "{2E0C516D-3858-4A1F-A2F3-BF0AB9E3A7FC}".  

              FIELD INDEX:      PK (#949)    REGULAR    IR    LOOKUP & SORTING
                   Unique for:  Key A (#108), File #704.116
                  Short Descr:  Uniqueness Index for Key 'A' of File #704.116
                  Description:  This will provide a quick lookup of unique file entries.  
                    Set Logic:  S ^MDC(704.116,"PK",$E(X,1,38),DA)=""
                   Kill Logic:  K ^MDC(704.116,"PK",$E(X,1,38),DA)
                   Whole Kill:  K ^MDC(704.116,"PK")
                         X(1):  SET_ID  (704.116,.01)  (Subscr 1)  (Len 38)

              RECORD INDEXES:   APT (#948)

704.116,.02   ENTERED_DATE_TIME      0;2 DATE (Required)

              INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      APR 23, 2009 
              HELP-PROMPT:      Enter the date/time this set was created. 
              DESCRIPTION:
                                This field is the date/time this set (#.01) was created.  


704.116,.03   ENTERED_BY_ID          0;3 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      APR 23, 2009 
              HELP-PROMPT:      Answer with an identifier of the person that created this set 
              DESCRIPTION:
                                This field identifies the person (file #200) that created this set (#.01).  


704.116,.04   PUBLIC                 0;4 SET

                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      MAY 22, 2009 
              HELP-PROMPT:      (This field is reserved for future use.) 
              DESCRIPTION:
                                (Future use - indicate whether or not this set is used by other applications/public.) 

              RECORD INDEXES:   APT (#948)

704.116,.1    COMMENT                .1;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>250!($L(X)<1) X
              LAST EDITED:      APR 23, 2009 
              HELP-PROMPT:      Answer must be 1-250 characters in length. 
              DESCRIPTION:      This is the user supplied COMMENT about the purpose of this set (.01).  A sample COMMENT could be
                                "Auto-Generated Set".  


704.116,.911  COUNT                   ;  COMPUTED

              MUMPS CODE:       S X=0 X "F Y=0:0 S Y=$O(^MDC(704.1161,""PK"",D0,Y)) S X=X+1" S X=$J(X,0,0)
              ALGORITHM:        S X=0 X "F Y=0:0 S Y=$O(^MDC(704.1161,""PK"",D0,Y)) S X=X+1"  (ALWAYS 0 DECIMAL DIGITS)
              LAST EDITED:      APR 23, 2009 
              DESCRIPTION:
                                This is the number of observations assigned to this set (#.01).  



      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 ENTERED_BY_ID (#.03)


File #704.116

  Record Indexes:

  APT (#948)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  (Future use - Public OBS Sets)
      Description:  - Future Use - This will provide quick indication of which observation sets may be used by other applications.  
        Set Logic:  S ^MDC(704.116,"APT",$E(X(1),1,38),$E(X(2),1,1),DA)=""
       Kill Logic:  K ^MDC(704.116,"APT",$E(X(1),1,38),$E(X(2),1,1),DA)
       Whole Kill:  K ^MDC(704.116,"APT")
             X(1):  SET_ID  (704.116,.01)  (Subscr 1)  (Len 38)  (forwards)
             X(2):  PUBLIC  (704.116,.04)  (Subscr 2)  (Len 1)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):