STANDARD DATA DICTIONARY #33.1 -- PRESUMPTIVE PSYCHOSIS CATEGORY CHANGES FILE 9/29/25 PAGE 1
STORED IN ^DGPP(33.1, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the history of changes made to the PRESUMPTIVE PSYCHOSIS CATEGORY field (#.5601) in the PATIENT file (#2).
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
CROSS
REFERENCED BY: PATIENT(B), DATE(C)
INDEXED BY: DATE & PRESUMPTIVE PSYCHOSIS CATEGORY (AC)
LAST MODIFIED: JAN 17,2023@16:47:58
33.1,.01 PATIENT 0;1 POINTER TO PATIENT FILE (#2) (Required)
LAST EDITED: OCT 01, 2019
HELP-PROMPT: Please select a patient.
DESCRIPTION:
This field contains a patient name.
CROSS-REFERENCE: 33.1^B
1)= S ^DGPP(33.1,"B",$E(X,1,30),DA)=""
2)= K ^DGPP(33.1,"B",$E(X,1,30),DA)
33.1,1 CATEGORY CHANGES CH;0 DATE Multiple #33.12 (Add New Entry without Asking)
DESCRIPTION: This multiple contains history relating to changes of the PRESUMPTIVE PSYCHOSIS CATEGORY field
(#.5601) in the PATIENT file (#2).
33.12,.01 DATE 0;1 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:X<1 X
LAST EDITED: OCT 17, 2019
HELP-PROMPT: (No range limit on date)
DESCRIPTION: This field contains the date and time that a change was made to the PRESUMPTIVE PSYCHOSIS
CATEGORY field (#.5601) in the PATIENT file (#2).
CROSS-REFERENCE: 33.12^B
1)= S ^DGPP(33.1,DA(1),"CH","B",$E(X,1,30),DA)=""
2)= K ^DGPP(33.1,DA(1),"CH","B",$E(X,1,30),DA)
CROSS-REFERENCE: 33.1^C
1)= S ^DGPP(33.1,"C",$E(X,1,30),DA(1),DA)=""
2)= K ^DGPP(33.1,"C",$E(X,1,30),DA(1),DA)
This index is used to quickly access dates when PRESUMPTIVE PSYCHOSIS CATEGORY changed for
specific patients, in order to expedite the production of reports.
RECORD INDEXES: AC (#1569) (WHOLE FILE #33.1)
33.12,.02 PRESUMPTIVE PSYCHOSIS CATEGORY 0;2 SET
'REJ' FOR REJECTED DUE TO INCOME;
'LES' FOR LESS THAN 24 MONTHS SERVICE;
'OTH' FOR FSM WITH OTH (PP ONLY);
'DEC' FOR VETERAN DECLINES ENROLLMENT;
'ACD' FOR ACDUTRA;
'DVA' FOR DVA 12D W/CH 17, SEEN FOR SC/MST;
'ENR' FOR ENROLLED;
LAST EDITED: AUG 18, 2022
HELP-PROMPT: Please select a PRESUMPTIVE PSYCHOSIS CATEGORY
DESCRIPTION:
This field contains the PRESUMPTIVE PSYCHOSIS CATEGORY that was entered in the PATIENT file (#2).
RECORD INDEXES: AC (#1569) (WHOLE FILE #33.1)
33.12,.03 USER WHO CHANGED 0;3 POINTER TO NEW PERSON FILE (#200) (Required)
LAST EDITED: OCT 01, 2019
HELP-PROMPT: Please select a user name.
DESCRIPTION: This field contains the name of the user who changed the Presumptive Psychosis Category in the
PATIENT file (#2).
FILES POINTED TO FIELDS
NEW PERSON (#200) CATEGORY CHANGES:USER WHO CHANGED (#.03)
PATIENT (#2) PATIENT (#.01)
Subfile #33.12
Record Indexes:
AC (#1569) RECORD REGULAR IR SORTING ONLY WHOLE FILE (#33.1)
Short Descr: This index enables selection of data by date and category
Description: This index allows the selection of Presumptive Psychosis Category entry/edits by date range, so that reports
can be quickly produced.
Set Logic: S ^DGPP(33.1,"AC",X(1),X(2),DA(1),DA)=""
Kill Logic: K ^DGPP(33.1,"AC",X(1),X(2),DA(1),DA)
Whole Kill: K ^DGPP(33.1,"AC")
X(1): DATE (33.12,.01) (Subscr 1) (forwards)
X(2): PRESUMPTIVE PSYCHOSIS CATEGORY (33.12,.02) (Subscr 2) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):