STANDARD DATA DICTIONARY #183.2 -- CRHD TEMPORARY DATA FILE                                                       6/27/25    PAGE 1
STORED IN ^CRHD(183.2,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                      (VERSION 1.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------


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

CROSS
REFERENCED BY: PRIVATE(AD), FIELD NAME(B), PATIENT(C)



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

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      NOV 19, 2007 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              CROSS-REFERENCE:  183.2^B 
                                1)= S ^CRHD(183.2,"B",$E(X,1,30),DA)=""
                                2)= K ^CRHD(183.2,"B",$E(X,1,30),DA)


183.2,1       PATIENT                1;0 POINTER Multiple #183.21


183.21,.01      PATIENT                0;1 POINTER TO PATIENT FILE (#2) (Required) (Multiply asked)

                LAST EDITED:      NOV 20, 2007 
                CROSS-REFERENCE:  183.21^B 
                                  1)= S ^CRHD(183.2,DA(1),1,"B",$E(X,1,30),DA)=""
                                  2)= K ^CRHD(183.2,DA(1),1,"B",$E(X,1,30),DA)

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


183.21,1        AUTHOR                 0;2 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:      FEB 01, 2008 
                CROSS-REFERENCE:  183.21^D^MUMPS 
                                  1)= S ^CRHD(183.2,"D",X,+^CRHD(183.2,DA(1),1,DA,0),DA(1),DA)=""
                                  2)= K ^CRHD(183.2,"D",X,+^CRHD(183.2,DA(1),1,DA,0),DA(1),DA)

                CROSS-REFERENCE:  183.21^AC^MUMPS 
                                  1)= D XREF^CRHD2(DA(1),DA)
                                  2)= D KILXREF^CRHD2(DA(1),DA)


183.21,2        DATE ENTERED           0;3 DATE

                INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
                LAST EDITED:      NOV 19, 2007 

183.21,3        LAST EDITED BY         0;4 POINTER TO NEW PERSON FILE (#200)

                LAST EDITED:      NOV 19, 2007 

183.21,4        DATE/TIME OF LAST EDIT 0;5 DATE

                INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
                LAST EDITED:      NOV 19, 2007 

183.21,5        PRIVATE                0;6 SET

                                  '1' FOR YES; 
                                  '0' FOR NO; 
                LAST EDITED:      FEB 01, 2008 
                CROSS-REFERENCE:  183.2^AD^MUMPS 
                                  1)= D ONOFFPRV^CRHD2(X,DA(1),DA)
                                  2)= Q


183.21,6        READ ONLY              0;7 SET

                                  '1' FOR YES; 
                                  '0' FOR NO; 
                LAST EDITED:      NOV 19, 2007 




      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 PATIENT:AUTHOR (#1)
                                  LAST EDITED BY (#3)

PATIENT (#2)                      PATIENT:PATIENT (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):