STANDARD DATA DICTIONARY #50.0732 -- DUE QUESTION FILE                                                            3/24/25    PAGE 1
STORED IN ^PS(50.0732,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 7.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the individual questions to be used in a DUE Questionnaire.  



   APPLICATION GROUP(S): PSO

POINTED TO BY: QUESTION TEXT field (#1) of the QUESTION sub-field (#50.07302) of the DUE QUESTIONNAIRE File (#50.073) 
               QUESTION TEXT field (#1) of the QUESTION sub-field (#50.07311) of the DUE ANSWER SHEET File (#50.0731) 
               

CROSS
REFERENCED BY: TEXT(B)



50.0732,.01   TEXT                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>145!($L(X)<3)!'(X'?1P.E) X S PSRC=DA S:$G(PSODUEL) PSRC=+Y I $D(X),Y'=-1,$P(^PS(50.0732,DA,
                                0),"^",7),X'=$P(^PS(50.0732,PSRC,0),"^") D EN^DDIOL("NO EDITING AFTER QUESTION HAS BEEN ANSWERED IN
                                 A QUESTIONNAIRE!","","$C(7),!?5") K X,PSRC
              LAST EDITED:      MAY 19, 1994 
              HELP-PROMPT:      Answer must be 3-145 characters in length. ENTER A FREE TEXT QUESTION TO BE USED ON A DUE 
                                QUESTIONNAIRE.  THIS DATA MAY BE CREATED AND EDITED FROM THE DUE QUESTIONNAIRE FILE. 
              DESCRIPTION:
                                Question to be used in the DUE QUESTIONNAIRE file.  

              EXECUTABLE HELP:  D DUE1^PSOHELP4
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

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


50.0732,1     TYPE OF ANSWER REQUIRED 0;2 SET

                                '1' FOR YES/NO/UNKNOWN; 
                                '2' FOR FREE TEXT; 
                                '3' FOR NUMERIC; 
              INPUT TRANSFORM:  I $P(^PS(50.0732,DA,0),"^",7) K X D EN^DDIOL("NO EDITING AFTER QUESTION HAS BEEN ANSWERED IN A QUES
                                TIONNAIRE!","","$C(7),!?5")
              LAST EDITED:      AUG 22, 1990 
              HELP-PROMPT:      This field is used to limit the type of response allowed when entering data into a DUE 
                                QUESTIONNAIRE. 
              DESCRIPTION:      Limits the type of Answer allowed.  
                                   1. YES/NO/UNKNOWN 
                                   2. FREE TEXT 
                                   3. NUMERIC 
                                 
                                This field logically defines the Answer field, however, VA FileMan will treat the Answer field as
                                it is defined in the Data Dictionary, i.e.  Free Text with a max length of 245 characters.  

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


50.0732,2     LOWER LIMIT FOR NUMERICS 0;3 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<-99999999)!(X?.E1"."1N.N) X
              LAST EDITED:      SEP 04, 1990 
              HELP-PROMPT:      Type a Number between -99999999 and 99999999, 0 Decimal Digits. THIS WILL BE THE LOWEST NUMBER 
                                ALLOWED WHEN ANSWERING THIS QUESTION ON A DUE ANSWER SHEET. 
              DESCRIPTION:
                                The smallest number allowed for an Answer to this Question.  


50.0732,3     UPPER LIMIT FOR NUMERICS 0;4 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<-99999999)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 01, 1990 
              HELP-PROMPT:      Type a Number between -99999999 and 99999999, 0 Decimal Digits. THIS IS THE HIGHEST NUMBER ALLOWED 
                                WHEN ANSWERING THIS QUESTION ON A DUE ANSWER SHEET. 
              DESCRIPTION:
                                The largest number allowed for an Answer to this Question.  

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


50.0732,4     FRACTIONAL DIGITS      0;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>5)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 01, 1990 
              HELP-PROMPT:      Type a Number between 0 and 5, 0 Decimal Digits. THIS IS THE MAX NUMBER OF FRACTIONAL DIGITS 
                                ALLOWED WHEN ANSWERING THIS QUESTION ON A DUE ANSWER SHEET. 
              DESCRIPTION:
                                The number of fractional digits allowed for an Answer to this Question.  


50.0732,5     FREE TEXT LENGTH       0;6 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>245)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 01, 1990 
              HELP-PROMPT:      Type a Number between 1 and 245, 0 Decimal Digits. THIS IS THE MAX LENGTH ANSWER ALLOWED FOR THIS 
                                QUESTION WHEN ANSWERING A DUE ANSWER SHEET 
              DESCRIPTION:
                                The number of characters allowed for an Answer to this Question.  


50.0732,6     LOCKED                 0;7 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      AUG 28, 1990 
              HELP-PROMPT:      If yes this field prohibits editing the text of this question. 
              DESCRIPTION:
                                Used to prevent changes to the  Question text once an DUE ANSWER SHEET has been printed.  

                                UNEDITABLE


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):