STANDARD DATA DICTIONARY #135.3 -- PATIENT MOOD  FILE                                                             9/29/25    PAGE 1
STORED IN ^SRO(135.3,  (6 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                        (VERSION 3)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains entries regarding the assessment of the patient's mood before and after the operative procedure.  It is
distributed with pre-supplied entries, however sites may wish to make additions to it.  


IDENTIFIED BY: CODE (#1)[R]

POINTED TO BY: PREOP MOOD field (#.19) of the SURGERY File (#130) 
               POSTOP MOOD field (#.81) of the SURGERY File (#130) 
               

CROSS
REFERENCED BY: NAME(B), CODE(C)



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

              Assessment of the Patient's Mood   
              INPUT TRANSFORM:  K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
              HELP-PROMPT:      NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION 
              DESCRIPTION:      This is the assessment of the patient's mood.  
                                 

              DELETE TEST:      1,0)= W !,"Deletion from the Patient Mood file is not allowed !! ",*7 I 1

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


135.3,1       CODE                   0;2 FREE TEXT (Required)

              Code   
              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<1) X
              LAST EDITED:      SEP 27, 1987 
              HELP-PROMPT:      ANSWER MUST BE 1-3 CHARACTERS IN LENGTH 
              DESCRIPTION:      This is the code corresponding to the assessment of the patient's mood.  
                                 

              CROSS-REFERENCE:  135.3^C 
                                1)= S ^SRO(135.3,"C",$E(X,1,30),DA)=""
                                2)= K ^SRO(135.3,"C",$E(X,1,30),DA)


135.3,10      INACTIVE?              0;3 SET

              Inactive?   
                                '1' FOR YES; 
              LAST EDITED:      JUN 02, 1992 
              HELP-PROMPT:      Enter 'YES' to inactivate this file entry. 
              DESCRIPTION:
                                Enter 'YES' to inactivate this file entry and to prevent its selection by Surgery users.  



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):