STANDARD DATA DICTIONARY #409.48 -- SDSC SERVICE CONNECTED CHANGES FILE 9/29/25 PAGE 1
STORED IN ^SDSC(409.48, *** 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 a list of encounters which were selected for review based on a comparison of the ICD diagnosis codes from the
encounter and the VBA rated disabilities (VA) codes from the patient. Entries will be edited as necessary per the review criteria
established for determining if an encounter is service-connected (SC) or non-service connected (NSC).
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
CROSS
REFERENCED BY: DATE LAST EDITED(AC), DATE CREATED(AD), DATE OF ENCOUNTER(AE), OUTPATIENT ENCOUNTER(B), PATIENT(D)
INDEXED BY: PRIMARY PROVIDER & DATE OF ENCOUNTER (AF), LAST EDITED BY & DATE OF ENCOUNTER (AG), STATUS & DATE OF ENCOUNTER (C)
409.48,.01 OUTPATIENT ENCOUNTER 0;1 POINTER TO OUTPATIENT ENCOUNTER FILE (#409.68) (Required)
INPUT TRANSFORM: S DINUM=X
LAST EDITED: MAR 05, 2007
DESCRIPTION: This is the Encounter Number from file #409.68 (Outpatient Encounter) which was determined needs to
be reviewed.
TECHNICAL DESCR:
A pointer to the OUTPATIENT ENCOUNTER File #409.68.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 409.48^B
1)= S ^SDSC(409.48,"B",$E(X,1,30),DA)=""
2)= K ^SDSC(409.48,"B",$E(X,1,30),DA)
409.48,.02 DATE LAST EDITED 0;2 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: SEP 16, 2004
DESCRIPTION:
This field contains the date that this encounter was last edited through the ASCD options.
NOTES: TRIGGERED by the DATE EDITED field of the TRACK EDITS sub-field of the SDSC SERVICE CONNECTED
CHANGES File
CROSS-REFERENCE: 409.48^AC
1)= S ^SDSC(409.48,"AC",$E(X,1,30),DA)=""
2)= K ^SDSC(409.48,"AC",$E(X,1,30),DA)
This cross reference is by DATE LAST EDITED and is used for several reports that track changes the
user made to the encounter.
409.48,.03 LAST EDITED BY 0;3 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: SEP 22, 2004
DESCRIPTION:
This field contains the user who last edited this encounter through the ASCD options.
TECHNICAL DESCR:
A pointer to the NEW PERSON File #200.
NOTES: TRIGGERED by the EDITED BY field of the TRACK EDITS sub-field of the SDSC SERVICE CONNECTED CHANGES
File
RECORD INDEXES: AG (#719)
409.48,.04 DATE CREATED 0;4 DATE (Required)
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: SEP 23, 2004
DESCRIPTION:
This field contains the date that this encounter was added to this file.
CROSS-REFERENCE: 409.48^AD
1)= S ^SDSC(409.48,"AD",$E(X,1,30),DA)=""
2)= K ^SDSC(409.48,"AD",$E(X,1,30),DA)
This cross reference is by DATE CREATED and is used for several reports that track what happened
when an encounter was added to this file.
409.48,.05 STATUS 0;5 SET (Required)
'N' FOR NEW;
'R' FOR REVIEW;
'C' FOR COMPLETED;
LAST EDITED: SEP 23, 2004
DESCRIPTION: This field contains the status of this encounter.
"NEW" - this encounter was recently added to this file.
"REVIEW" - this encounter was forwarded for clinical review.
"COMPLETED" - edits to this encounter are complete and only a
supervisor may make further modifications.
NOTES: TRIGGERED by the SERV. CONNECT (OK BY USER?) field of the SDSC SERVICE CONNECTED CHANGES File
TRIGGERED by the REVIEW REQUIRED? field of the TRACK EDITS sub-field of the SDSC SERVICE CONNECTED
CHANGES File
RECORD INDEXES: C (#720)
409.48,.06 SERV. CONNECT (OK BY USER?) 0;6 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: SEP 22, 2004
DESCRIPTION: This field will contain 1 ('YES') or 0 ('NO') based on the user determination of the encounter's
service connected value.
NOTES: TRIGGERED by the SERV. CONNECT (OK BY USER?) field of the TRACK EDITS sub-field of the SDSC SERVICE
CONNECTED CHANGES File
CROSS-REFERENCE: ^^TRIGGER^409.48^.05
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^SDSC(409.48,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X
S DIU=X K Y S X=DIV S X="C" S DIH=$G(^SDSC(409.48,DIV(0),0)),DIV=X S $P(^(0),U,5)=DIV,DIH=409.48,DI
G=.05 D ^DICR
2)= Q
CREATE VALUE)= "C"
DELETE VALUE)= NO EFFECT
FIELD)= #.05
409.48,.07 DATE OF ENCOUNTER 0;7 DATE
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: SEP 23, 2004
DESCRIPTION: This is the actual date of the encounter copied from the OUTPATIENT ENCOUNTER file #409.68 at the
time of the compile.
CROSS-REFERENCE: 409.48^AE
1)= S ^SDSC(409.48,"AE",$E(X,1,30),DA)=""
2)= K ^SDSC(409.48,"AE",$E(X,1,30),DA)
This cross reference is by DATE OF ENCOUNTER and is used by several reports.
RECORD INDEXES: AF (#718), AG (#719), C (#720)
409.48,.08 PRIMARY PROVIDER 0;8 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: SEP 22, 2004
DESCRIPTION:
This field contains the primary provider for the encounter determined at the time of the compile.
TECHNICAL DESCR:
A pointer to the NEW PERSON FILE #200.
RECORD INDEXES: AF (#718)
409.48,.09 SERV. CONNECT (OK BY VBA/ICD?) 0;9 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: MAR 05, 2007
DESCRIPTION: This field will contain 1 ('YES') or 0 ('NO') depending on whether the automation or compile
determined that the VBA/ICD codes found for this patient and encounter provided a match.
409.48,.1 CLAIMS TRACKING ENTRY 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99999999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAR 05, 2007
HELP-PROMPT: Type a Number between 1 and 99999999999, 0 Decimal Digits
DESCRIPTION:
This field will contain the Claims Tracking Entry for a record which may have been modified.
TECHNICAL DESCR:
Contains the pointer value to the CLAIMS TRACKING file #356.
409.48,.11 PATIENT 0;11 POINTER TO PATIENT FILE (#2) (Required)
LAST EDITED: MAR 02, 2007
DESCRIPTION:
This field contains the patient's DFN for the encounter.
TECHNICAL DESCR:
A pointer to the PATIENT file #2.
CROSS-REFERENCE: 409.48^D
1)= S ^SDSC(409.48,"D",$E(X,1,30),DA)=""
2)= K ^SDSC(409.48,"D",$E(X,1,30),DA)
Patient IEN cross-reference
409.48,.12 DIVISION 0;12 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)
LAST EDITED: AUG 11, 2005
DESCRIPTION:
This field is the medical center division assigned to the encounter.
TECHNICAL DESCR:
A pointer to the MEDICAL CENTER DIVISION File #40.8.
409.48,.13 SERV. CONNECT (ORIGINAL VALUE) 0;13 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: MAR 08, 2007
DESCRIPTION: This field will contain 1 ('YES') or 0 ('NO') based on the original encounter's service connected
value.
409.48,1 TRACK EDITS 1;0 Multiple #409.481 (Add New Entry without Asking)
DESCRIPTION:
This multiple field tracks each edit made to this encounter through the ASCD options.
409.481,.01 EDIT NUMBER 0;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: NOV 07, 2006
HELP-PROMPT: Type a Number between 1 and 99, 0 Decimal Digits
DESCRIPTION: This field contains a unique entry for each edit. The edits are stored in order beginning at 1.
Under ordinary circumstances there will usually only be between 1 and 3 edits for any record
although there is no specific maximum.
CROSS-REFERENCE: 409.481^B
1)= S ^SDSC(409.48,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^SDSC(409.48,DA(1),1,"B",$E(X,1,30),DA)
409.481,.02 DATE EDITED 0;2 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: NOV 07, 2006
DESCRIPTION: This is the date that the user edited this encounter. A trigger on this field will also update
the DATE LAST EDITED field in the main file.
CROSS-REFERENCE: ^^TRIGGER^409.48^.02
1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^SDSC(409.48,D0,0)):^(0),1:"") S X=$P(Y(1),
U,2),X=X S DIU=X K Y S X=DIV S X=X S DIH=$G(^SDSC(409.48,DIV(0),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=40
9.48,DIG=.02 D ^DICR
2)= Q
CREATE VALUE)= S X=X
DELETE VALUE)= NO EFFECT
FIELD)= #.02
409.481,.03 EDITED BY 0;3 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: NOV 07, 2006
DESCRIPTION: This is the user who edited this encounter. A trigger on this field will also update the LAST
EDITED BY field in the main file.
TECHNICAL DESCR:
A pointer to the NEW PERSON file #200.
CROSS-REFERENCE:^^TRIGGER^409.48^.03
1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^SDSC(409.48,D0,0)):^(0),1:"") S X=$P(Y(1),
U,3),X=X S DIU=X K Y S X=DIV S X=X S DIH=$G(^SDSC(409.48,DIV(0),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=40
9.48,DIG=.03 D ^DICR
2)= Q
CREATE VALUE)= S X=X
DELETE VALUE)= NO EFFECT
FIELD)= #.03
409.481,.04 TYPE OF ENTRY 0;4 SET
'U' FOR USER;
'C' FOR CLINICAL;
'S' FOR SUPERVISOR;
LAST EDITED: NOV 07, 2006
DESCRIPTION: This is the type of user who edited this encounter.
"USER" any standard user of this package.
"CLINICAL" a clinical reviewer with the appropriate security key.
"SUPERVISOR" a supervisor with the appropriate security key.
409.481,.05 SERV. CONNECT (OK BY USER?) 0;5 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: DEC 08, 2006
DESCRIPTION: This field will contain 1 ('YES') or 0 ('NO') based on the user determination of the encounter's
service connected value. A trigger on this field will also update the SERV. CONNECT (OK BY USER?)
field in the main file.
CROSS-REFERENCE:^^TRIGGER^409.48^.06
1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^SDSC(409.48,D0,0)):^(0),1:"") S X=$P(Y(1),
U,6),X=X S DIU=X K Y S X=DIV S X=X S DIH=$G(^SDSC(409.48,DIV(0),0)),DIV=X S $P(^(0),U,6)=DIV,DIH=40
9.48,DIG=.06 D ^DICR
2)= Q
CREATE VALUE)= S X=X
DELETE VALUE)= NO EFFECT
FIELD)= #.06
409.481,.06 REVIEW REQUIRED? 0;6 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: DEC 08, 2006
DESCRIPTION: This field will be set to 1 ('YES') if a regular user determines that this record requires further
review by a clinical reviewer. A trigger will also set the STATUS field in the main file to
'REVIEW'.
CROSS-REFERENCE:^^TRIGGER^409.48^.05
1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA S Y(1)=$S($D(^SDSC(409.48,D0,0)):^(0),1:"") S X=$P(Y(1),
U,5),X=X S DIU=X K Y S X=DIV S X="R" S DIH=$G(^SDSC(409.48,DIV(0),0)),DIV=X S $P(^(0),U,5)=DIV,DIH=
409.48,DIG=.05 D ^DICR
2)= Q
CREATE VALUE)= "R"
DELETE VALUE)= NO EFFECT
FIELD)= #.05
FILES POINTED TO FIELDS
MEDICAL CENTER DIVISION (#40.8) DIVISION (#.12)
NEW PERSON (#200) LAST EDITED BY (#.03)
PRIMARY PROVIDER (#.08)
TRACK EDITS:EDITED BY (#.03)
OUTPATIENT ENCOUNTER (#409.68) OUTPATIENT ENCOUNTER (#.01)
PATIENT (#2) PATIENT (#.11)
SDSC SERVICE CONNECTED CHANGES
(#409.48) TRACK EDITS:DATE EDITED (#.02)
EDITED BY (#.03)
SERV. CONNECT (OK BY USER?) (#.05)
REVIEW REQUIRED? (#.06)
File #409.48
Record Indexes:
AF (#718) RECORD REGULAR IR SORTING ONLY
Short Descr: Cross reference by PROVIDER and DATE OF ENCOUNTER
Description: This cross reference (by PROVIDER and DATE OF ENCOUNTER) is used by a report of the providers who have had
encounters reviewed through the ASCD options.
Set Logic: S ^SDSC(409.48,"AF",X(1),X(2),DA)=""
Kill Logic: K ^SDSC(409.48,"AF",X(1),X(2),DA)
Whole Kill: K ^SDSC(409.48,"AF")
X(1): PRIMARY PROVIDER (409.48,.08) (Subscr 1) (forwards)
X(2): DATE OF ENCOUNTER (409.48,.07) (Subscr 2) (forwards)
AG (#719) RECORD REGULAR IR SORTING ONLY
Short Descr: Cross reference by LAST EDITED BY and DATE OF ENCOUNTER
Description: This cross reference (by LAST EDITED BY and DATE OF ENCOUNTER) is used by a report of the users who reviewed
encounters and what they did to each through the ASCD options.
Set Logic: S ^SDSC(409.48,"AG",X(1),X(2),DA)=""
Kill Logic: K ^SDSC(409.48,"AG",X(1),X(2),DA)
Whole Kill: K ^SDSC(409.48,"AG")
X(1): LAST EDITED BY (409.48,.03) (Subscr 1) (forwards)
X(2): DATE OF ENCOUNTER (409.48,.07) (Subscr 2) (forwards)
C (#720) RECORD REGULAR IR LOOKUP & SORTING
Short Descr: Cross Reference by STATUS and DATE OF ENCOUNTER
Description: This cross reference (by STATUS and DATE OF ENCOUNTER) is used by a summary report of the status of encounters
found on a particular day and also by a loop that runs through the NEW or REVIEW statuses for a date range.
Set Logic: S ^SDSC(409.48,"C",X(1),X(2),DA)=""
Kill Logic: K ^SDSC(409.48,"C",X(1),X(2),DA)
Whole Kill: K ^SDSC(409.48,"C")
X(1): STATUS (409.48,.05) (Subscr 1) (forwards)
X(2): DATE OF ENCOUNTER (409.48,.07) (Subscr 2) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):