STANDARD DATA DICTIONARY #99 -- PT. TEXT FILE                                                                     3/24/25    PAGE 1
STORED IN ^PTX(  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                            (VERSION 5.01)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
File contains portions of a patient's general clinical data.  
   
Fields annotated with an "*" are scheduled for deletion from this file.  


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

CROSS
REFERENCED BY: NAME(B)



99,.01        NAME                   0;1 POINTER TO PATIENT FILE (#2) (Required)

              INPUT TRANSFORM:  S DINUM=X
              LAST EDITED:      AUG 09, 1985 
              DESCRIPTION:
                                This is the patient's name 

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

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


99,10         *PROGRESS NOTES        PN;0 DATE Multiple #99.01 (Add New Entry without Asking)

              DESCRIPTION:      This is the text of notes entered by clinicians.  
                                   


99.01,.01       *PN DATE               0;1 DATE

                PN DATE   
                INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                LAST EDITED:      SEP 19, 1983 
                DESCRIPTION:
                                  Date note entered.  

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


99.01,1         *STAFF                 1;0 POINTER Multiple #99.02

                DESCRIPTION:
                                  Caretaker responsible for content of progress note.  


99.02,.01         *STAFF                 0;1 POINTER TO NEW PERSON FILE (#200)

                  STAFF   
                  INPUT TRANSFORM:  S DINUM=X
                  LAST EDITED:      JAN 20, 1989 
                  NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

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


99.02,1           *DATE/TIME             1;0 DATE Multiple #99.03

                  DESCRIPTION:
                                    Date and time of contents of progress note.  


99.03,.01           *DATE/TIME             0;1 DATE

                    DATE/TIME   
                    INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                    LAST EDITED:      JAN 20, 1989 
                    NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.03,1             *TEXT                  1;0   WORD-PROCESSING #99.04


                      TEXT   
                      LAST EDITED:      JAN 19, 1989 
                      HELP-PROMPT:      ANSWER MUST BE 2-65 CHARACTERS IN LENGTH 









99,11         HISTORY PART ONE       HX;0 DATE Multiple #99.05 (Add New Entry without Asking)

              DESCRIPTION:      This is the text of the patient's chief complaint, history of present illness, and current
                                medications.  


99.05,.01       HX1 DATE               0;1 DATE

                INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.05,1         STAFF                  1;0 POINTER Multiple #99.06

                DESCRIPTION:
                                  Personnel responsible for information entered into this file.  


99.06,.01         STAFF NAME             0;1 POINTER TO NEW PERSON FILE (#200) (Required)

                  INPUT TRANSFORM:  S DINUM=X Q
                  NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.06,1           CHIEF COMPLAINT DATE   1;0 DATE Multiple #99.07

                  DESCRIPTION:
                                    Date this chief complaint was determined.  


99.07,.01           COMPLAINT DATE         0;1 DATE

                    INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X

99.07,1             CHIEF COMPLAINT        1;0   WORD-PROCESSING #99.08

                    DESCRIPTION:
                                      Primary reason for request for clinical care.  


                      LAST EDITED:      JUL 11, 1984 
                      HELP-PROMPT:      ANSWER MUST BE 2-65 CHARACTERS IN LENGTH 





99.06,2           HX OF PRES ILLNESS DATE    2;0 DATE Multiple #99.09

                      DESCRIPTION:
                                        Date history of present illness interview was obtained.  


99.09,.01           HX DATE                    0;1 DATE

                        INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X

99.09,1             HX OF PRESENT ILLNESS      1;0   WORD-PROCESSING #99.1

                        DESCRIPTION:
                                          Responses to a history of present illness interview.  


                          LAST EDITED:      JUL 11, 1984 
                          HELP-PROMPT:      ANSWER MUST BE 2-65 CHARACTERS IN LENGTH 





99.06,3           CURRENT MEDS DATE              3;0 DATE Multiple #99.11

                          DESCRIPTION:
                                            Date information regarding medications acknowledged by a patient was obtained.  


99.11,.01           MEDS DATE                      0;1 DATE

                            INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X

99.11,1             CURRENT MEDS AND SOURCE        1;0 Multiple #99.12

                            DESCRIPTION:      A list of medications and their sources currently being used by a patient as can be
                                              determined by a caretaker with the assistance of the patient.  


99.12,.01             MEDS TEXT                      0;1 FREE TEXT (Multiply asked)

                              INPUT TRANSFORM:  K:$L(X)>65!($L(X)<2) X
                              HELP-PROMPT:      ANSWER MUST BE 2-65 CHARACTERS IN LENGTH 









99,12         *TXP DESCRIPTION       TP;0 DATE Multiple #99.13

              DESCRIPTION:
                                This is the text of descriptive information about patient for treatment plans.  


99.13,.01       *TXP DATE              0;1 DATE

                TXP DATE   
                INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.13,1         *STAFF                 1;0 POINTER Multiple #99.14


99.14,.01         *STAFF NAME            0;1 POINTER TO NEW PERSON FILE (#200)

                  STAFF NAME   
                  INPUT TRANSFORM:  S DINUM=X Q
                  NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.14,1           *DATE/TIME             0;2 DATE

                  DATE/TIME   
                  INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X

99.14,2           *DESCRIPTIVE INFORMATION 1;0 Multiple #99.15


99.15,.01           *DESCRIPTIVE TEXT      0;1 FREE TEXT (Multiply asked)

                    DESCRIPTIVE TEXT   
                    INPUT TRANSFORM:  K:$L(X)>65!($L(X)<2) X
                    HELP-PROMPT:      ANSWER MUST BE 2-65 CHARACTERS IN LENGTH 







99,13         *TXP ADDITIONAL PLANS  TPA;0 DATE Multiple #99.16

              DESCRIPTION:
                                This is the text of additional treatment plans.  


99.16,.01       *ADDITIONAL PLANS DATE 0;1 DATE

                ADDITIONAL PLANS DATE   
                INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.16,1         *STAFF                 1;0 POINTER Multiple #99.17


99.17,.01         *STAFF NAME            0;1 POINTER TO NEW PERSON FILE (#200)

                  STAFF NAME   
                  INPUT TRANSFORM:  S DINUM=X Q
                  NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.17,1           *DATE/TIME             0;2 DATE

                  DATE/TIME   
                  INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X

99.17,2           *ADDITIONAL PLANS      1;0 Multiple #99.18


99.18,.01           *PLANS TEXT            0;1 FREE TEXT (Multiply asked)

                    PLANS TEXT   
                    INPUT TRANSFORM:  K:$L(X)>65!($L(X)<2) X
                    HELP-PROMPT:      ANSWER MUST BE 2-65 CHARACTERS IN LENGTH 







99,20         CRISIS NOTES           CN;0 DATE Multiple #99.29

              DESCRIPTION:
                                This is the text of crisis notes on patients.  


99.29,.01       CRISIS NOTE DATE       0;1 DATE

                INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                LAST EDITED:      JUL 11, 1984 
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.29,1         STAFF                  1;0 POINTER Multiple #99.3 (Add New Entry without Asking)

                DESCRIPTION:
                                  Personnel responsible for entering a crisis note into the system.  


99.3,.01          STAFF                  0;1 POINTER TO NEW PERSON FILE (#200)

                  INPUT TRANSFORM:  S DINUM=X Q
                  LAST EDITED:      JUL 11, 1984 
                  NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.3,1            DATE/TIME              1;0 DATE Multiple #99.31

                  DESCRIPTION:
                                    Date and time a crisis note was entered into the system.  


99.31,.01           DATE/TIME              0;1 DATE

                    INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                    LAST EDITED:      JUL 11, 1984 
                    NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.31,1             TEXT                   1;0   WORD-PROCESSING #99.32

                    DESCRIPTION:
                                      Crisis note narrative.  


                      LAST EDITED:      JUL 11, 1984 



99.31,2             PERMANENT?               2;1 SET

                                        'P' FOR PERMANENT; 
                                        'T' FOR TEMPORARY; 
                      LAST EDITED:      JUL 17, 1984 
                      DESCRIPTION:      A flag denoting whether or not this crisis note should be made a permanent part of a
                                        patient's medical record.  








99,25         MESSAGES               MS;0 DATE Multiple #99.39

              DESCRIPTION:
                                This is the text of clinically useful patient information.  


99.39,.01       MESSAGE DATE           0;1 DATE

                INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                LAST EDITED:      JUL 12, 1984 
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.39,1         STAFF                  1;0 POINTER Multiple #99.4 (Add New Entry without Asking)

                DESCRIPTION:
                                  Personnel responsible for entry of message into the system.  


99.4,.01          STAFF                  0;1 POINTER TO NEW PERSON FILE (#200)

                  INPUT TRANSFORM:  S DINUM=X Q
                  LAST EDITED:      JUL 12, 1984 
                  NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.4,1            DATE/TIME              1;0 DATE Multiple #99.41 (Add New Entry without Asking)

                  DESCRIPTION:
                                    Date and time message was entered into the system.  


99.41,.01           DATE/TIME              0;1 DATE

                    INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y,DINUM=9999999-Y K:Y<1 X
                    LAST EDITED:      JUL 12, 1984 
                    NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


99.41,1             TEXT                   1;0   WORD-PROCESSING #99.42

                    DESCRIPTION:
                                      Message context.  


                      LAST EDITED:      JUL 12, 1984 



99.41,2             PERMANENT?               2;1 SET

                                        'P' FOR PERMANENT; 
                                        'T' FOR TEMPORARY; 
                      LAST EDITED:      JUL 17, 1984 
                      DESCRIPTION:      A flag denoting whether or not this message should be made a permanent part of the
                                        patient's clinical record.  









      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 *STAFF:*STAFF (#.01)
                                  STAFF:STAFF NAME (#.01)
                                  *STAFF:*STAFF NAME (#.01)
                                  *STAFF:*STAFF NAME (#.01)
                                  STAFF:STAFF (#.01)
                                  STAFF:STAFF (#.01)

PATIENT (#2)                      NAME (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):