STANDARD DATA DICTIONARY #801.5 -- REMINDER DIALOG PATIENT ASSOCIATION FILE                                       3/24/25    PAGE 1
STORED IN ^PXRMD(801.5,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                     (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a small amount of static data. Entries are entered and removed as Reminder Geriatric Extended Care Dialogs are
processed by the CPRS GUI. Its main purpose is to keep track of and supply an Encounter Date/Time to the GUI interface so that the
date/time can be added later to fields in the V HEALTH FACTOR file.  


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

CROSS
REFERENCED BY: PATIENT(B)

INDEXED BY:    PATIENT & DATE/TIME & IDENTIFY (AC), PATIENT & IDENTIFY (AD), NOTEIEN & IDENTIFY (ANOTE)




801.5,.01     PATIENT                0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      FEB 03, 2005 
              HELP-PROMPT:      Answer must be 3-30 characters in length 
              DESCRIPTION:      This is a free text form of a patient's DFN used as a momentary identifier of a patient who has
                                been selected while using the Geriatric Extended Care Dialogs.  

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

              RECORD INDEXES:   AC (#281), AD (#282)

801.5,.02     DATE/TIME              0;2 DATE

              INPUT TRANSFORM:  S %DT="ESTR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      FEB 03, 2005 
              HELP-PROMPT:      (No range limit on date) 
              DESCRIPTION:      This field contains the date and time that the Geriatric Extended Care dialogs were first initiated
                                for a particular patient and a particular referral. It is the current date and time that the first
                                entry for this patient was entered into this file.  

              RECORD INDEXES:   AC (#281)

801.5,.03     IDENTIFY               0;3 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      FEB 03, 2005 
              HELP-PROMPT:      Answer must be 1-30 characters in length 
              DESCRIPTION:      There are 4 reminder dialogs used in the Geriatric Extended Care program.  This field holds one of
                                4 possible entries representing the dialog that is being used. The possibilities are GEC1,GEC2,GEC3
                                and GECF.  

              RECORD INDEXES:   AC (#281), AD (#282), ANOTE (#283)

801.5,.04     NOTEIEN                0;4 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
              LAST EDITED:      FEB 03, 2005 
              HELP-PROMPT:      Answer must be 1-20 characters in length 
              DESCRIPTION:      This field temporarily saves the internal entry number of the Text Integration Utilities (TIU) note
                                that is being written on when selections  are being made in the Geriatric Extended Care dialogs.  

              RECORD INDEXES:   ANOTE (#283)

801.5,.05     GEC USER               0;5 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      JUN 17, 2005 
              HELP-PROMPT:      This field is the user who is entering the GEC data into the GEC dialogs. 
              DESCRIPTION:      This field contains a pointer to the NEW PERSON file or file 200. It represents the user who enter
                                the data into the GEC dialog referenced in the IDENTIFY field.  

              TECHNICAL DESCR:
                                 


801.5,.06     ENTRY DATE             0;6 DATE

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JUN 17, 2005 
              HELP-PROMPT:      The date the entries were made into the GEC Dialogs. 
              DESCRIPTION:      This is a date stamp of the date in which data was entered into the GEC Dialog referenced in the
                                IDENTIFY field.  



      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 GEC USER (#.05)


File #801.5

  Record Indexes:

  AC (#281)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  Reminder Dialog connection to module
        Set Logic:  S ^PXRMD(801.5,"AC",$E(X(1),1,30),X(2),$E(X(3),1,30),DA)=""
       Kill Logic:  K ^PXRMD(801.5,"AC",$E(X(1),1,30),X(2),$E(X(3),1,30),DA)
       Whole Kill:  K ^PXRMD(801.5,"AC")
             X(1):  PATIENT  (801.5,.01)  (Subscr 1)  (Len 30)  (forwards)
             X(2):  DATE/TIME  (801.5,.02)  (Subscr 2)  (forwards)
             X(3):  IDENTIFY  (801.5,.03)  (Subscr 3)  (Len 30)  (forwards)

  AD (#282)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  patient U identify
      Description:  Crossreference between the patient and identify fields 
        Set Logic:  S ^PXRMD(801.5,"AD",$E(X(1),1,30),$E(X(2),1,30),DA)=""
       Kill Logic:  K ^PXRMD(801.5,"AD",$E(X(1),1,30),$E(X(2),1,30),DA)
       Whole Kill:  K ^PXRMD(801.5,"AD")
             X(1):  PATIENT  (801.5,.01)  (Subscr 1)  (Len 30)  (forwards)
             X(2):  IDENTIFY  (801.5,.03)  (Subscr 2)  (Len 30)  (forwards)

  ANOTE (#283)    RECORD    REGULAR    IR    SORTING ONLY
      Short Descr:  NOTEIEN,IDENTIFY,DA
      Description:  This cross reference will help in maintaining concurrence between TIU, PCE and Clinical Reminders. NOTEIEN ^
                    IDENTIFY 
        Set Logic:  S ^PXRMD(801.5,"ANOTE",$E(X(1),1,20),$E(X(2),1,30),DA)=""
       Kill Logic:  K ^PXRMD(801.5,"ANOTE",$E(X(1),1,20),$E(X(2),1,30),DA)
       Whole Kill:  K ^PXRMD(801.5,"ANOTE")
             X(1):  NOTEIEN  (801.5,.04)  (Subscr 1)  (Len 20)  (forwards)
             X(2):  IDENTIFY  (801.5,.03)  (Subscr 2)  (Len 30)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):