STANDARD DATA DICTIONARY #801.55 -- REMINDER GEC DIALOG ASSOCIATION HISTORY FILE 9/29/25 PAGE 1
STORED IN ^PXRMD(801.55, *** 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 permanent history of activity that occurred during the use of the Reminder Geriatric Extended Care Dialogs.
Information is added when a GEC Dialog is used and information is added about the patient.
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), PATIENT & DATE/TIME & IDENTIFY & USER (AE), NOTIEN &
IDENTIFY (ANOTE)
801.55,.01 PATIENT 0;1 POINTER TO PATIENT FILE (#2) (Required)
PATIENT NAME
LAST EDITED: JUL 12, 2005
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION: This field serves as a permanent identifier of the patient who has been selected while using the
Geriatric Extended Care Dialogs (GEC).
CROSS-REFERENCE: 801.55^B
1)= S ^PXRMD(801.55,"B",$E(X,1,30),DA)=""
2)= K ^PXRMD(801.55,"B",$E(X,1,30),DA)
RECORD INDEXES: AC (#286), AD (#287), AE (#288)
801.55,.02 DATE/TIME 0;2 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:X<1 X
LAST EDITED: JUL 12, 2005
HELP-PROMPT: (No range limit on date)
DESCRIPTION: This field contains the date and time that the GEC dialogs were first initiated for a particular
patient and a particular referral. It is the current date and item that the first entry for this
patient was enter into file 801.5.
RECORD INDEXES: AC (#286), AE (#288)
801.55,.03 IDENTIFY 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: JUL 12, 2005
HELP-PROMPT: Answer must be 1-30 characters in length
DESCRIPTION: There are 4 reminder dialogs use in the GEC program. This field hold on of the 4 possible entries
representing the dialog that is being used. the possibilities are GEC1,GEC2,GEC3, and GECF.
RECORD INDEXES: AC (#286), AD (#287), AE (#288), ANOTE (#377)
801.55,.04 NOTIEN 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: JUN 28, 2005
HELP-PROMPT: Answer must be 1-20 characters in length
DESCRIPTION: This field permanently saved the internal entry number of the Text Integration Utilities (TIU) note
that is being written on when selections are being made in the GEC dialogs.
RECORD INDEXES: ANOTE (#377)
801.55,.05 USER 0;5 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: JUL 12, 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 #200. It represents the user who entered the
data into the GEC dialogs.
RECORD INDEXES: AE (#288)
801.55,.06 ENTRY DATE 0;6 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:X<1 X
LAST EDITED: JUN 17, 2005
HELP-PROMPT: (No range limit on date)
DESCRIPTION:
This is the date that the data was placed into the GEC dialog represented by the IDENTIFY filed.
FILES POINTED TO FIELDS
NEW PERSON (#200) USER (#.05)
PATIENT (#2) PATIENT (#.01)
File #801.55
Record Indexes:
AC (#286) RECORD REGULAR IR SORTING ONLY
Short Descr: Reminder Dialog History connection to GUI
Set Logic: S ^PXRMD(801.55,"AC",$E(X(1),1,40),X(2),$E(X(3),1,30),DA)=""
Kill Logic: K ^PXRMD(801.55,"AC",$E(X(1),1,40),X(2),$E(X(3),1,30),DA)
Whole Kill: K ^PXRMD(801.55,"AC")
X(1): PATIENT (801.55,.01) (Subscr 1) (Len 40) (forwards)
X(2): DATE/TIME (801.55,.02) (Subscr 2) (forwards)
X(3): IDENTIFY (801.55,.03) (Subscr 3) (Len 30) (forwards)
AD (#287) RECORD REGULAR IR SORTING ONLY
Short Descr: Cross Reference between patient and identify fields
Set Logic: S ^PXRMD(801.55,"AD",$E(X(1),1,30),$E(X(2),1,30),DA)=""
Kill Logic: K ^PXRMD(801.55,"AD",$E(X(1),1,30),$E(X(2),1,30),DA)
Whole Kill: K ^PXRMD(801.55,"AD")
X(1): PATIENT (801.55,.01) (Subscr 1) (Len 30) (forwards)
X(2): IDENTIFY (801.55,.03) (Subscr 2) (Len 30) (forwards)
AE (#288) RECORD REGULAR IR SORTING ONLY
Short Descr: Patient, Date, Dialog, User
Description: Patient, Date, Dialog, User
Set Logic: S ^PXRMD(801.55,"AE",X(1),X(2),$E(X(3),1,30),X(4),DA)=""
Kill Logic: K ^PXRMD(801.55,"AE",X(1),X(2),$E(X(3),1,30),X(4),DA)
Whole Kill: K ^PXRMD(801.55,"AE")
X(1): PATIENT (801.55,.01) (Subscr 1) (forwards)
X(2): DATE/TIME (801.55,.02) (Subscr 2) (forwards)
X(3): IDENTIFY (801.55,.03) (Subscr 3) (Len 30) (forwards)
X(4): USER (801.55,.05) (Subscr 4) (forwards)
ANOTE (#377) RECORD REGULAR IR SORTING ONLY
Short Descr: Cross reference between the note and the dialog
Set Logic: S ^PXRMD(801.55,"ANOTE",$E(X(1),1,30),$E(X(2),1,30),DA)=""
Kill Logic: K ^PXRMD(801.55,"ANOTE",$E(X(1),1,30),$E(X(2),1,30),DA)
Whole Kill: K ^PXRMD(801.55,"ANOTE")
X(1): NOTIEN (801.55,.04) (Subscr 1) (Len 30) (forwards)
X(2): IDENTIFY (801.55,.03) (Subscr 2) (Len 30) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):