STANDARD DATA DICTIONARY #625 -- INDICATOR FILE                                                                   9/29/25    PAGE 1
STORED IN ^DIC(625,  (245 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                     (VERSION 5.01)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
The Problem Indicators file is pointed to by the Problem Indicator subfield Problem multiple of the MH Clinical file.  Problem 
Indicator data is distributed with the Mental Health package.  


COMPILED CROSS-REFERENCE ROUTINE: 
                         YSXRAV
              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

POINTED TO BY: PROBLEM INDICATOR field (#.01) of the PROBLEM INDICATOR sub-field (#615.02) of the PROBLEM sub-field (#615.01) of 
                   the MH CLINICAL FILE File (#615) 
               

CROSS
REFERENCED BY: SCREEN(A), INDICATOR(B), INDICATOR(C), UPPER(D), SCREEN(E)



625,.01       INDICATOR              0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>70!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
              LAST EDITED:      DEC 12, 1991 
              HELP-PROMPT:      ANSWER MUST BE 3-70 CHARACTERS IN LENGTH 
              DESCRIPTION:      Name of an indicator of a problem. A problem such as Depression may have "low self esteem" as an
                                indicator.  

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

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

              CROSS-REFERENCE:  625^C^KWIC 
                                1)= F %=1:1 Q:$P(X," ",%,99)=""  S I=$P(X," ",%) I $L(I)>2,$L(I)<31,^DD("KWIC")'[I S ^DIC(625,"C",I
                                ,DA)=""

                                2)= F %=1:1 Q:$P(X," ",%,99)=""  S I=$P(X," ",%) I $L(I)>2,$L(I)<31 K ^DIC(625,"C",I,DA)


625,1         SCREEN                 0;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      AUG 07, 1984 
              HELP-PROMPT:      ANSWER MUST BE 1-30 CHARACTERS IN LENGTH 
              DESCRIPTION:      The screen field contains a string of the screen codes of the problems with which the indicator is
                                associated.  

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

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


625,2         UPPER                  1;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>70!($L(X)<3) X
              LAST EDITED:      DEC 12, 1984 
              HELP-PROMPT:      ANSWER MUST BE 3-70 CHARACTERS IN LENGTH 
              DESCRIPTION:      This field contains the name of the indicator and synonyms for the indicator in UPPER CASE to allow
                                lookup when the user types one of these in in all caps. Indicator file is cross-indexed on 'Upper'.  

              CROSS-REFERENCE:  625^D^KWIC 
                                1)= F %=1:1 Q:$P(X," ",%,99)=""  S I=$P(X," ",%) I $L(I)>2,$L(I)<31,^DD("KWIC")'[I S ^DIC(625,"D",I
                                ,DA)=""

                                2)= F %=1:1 Q:$P(X," ",%,99)=""  S I=$P(X," ",%) I $L(I)>2,$L(I)<31 K ^DIC(625,"D",I,DA)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):