101. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 4/12/2018 10:18:34 AM Central Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

101.1 Files compared

#	Location	File	Last Modified
1	MSSRe Build 4.zip\DatabaseScripts\DatabasePatches\04162014 PreProd Files.zip	Increment_1_Polytrauma.sql	Tue Mar 11 15:57:26 2014 UTC
2	MSSRe Build 4.zip\DatabaseScripts\DatabasePatches\04162014 PreProd Files.zip	Increment_1_Polytrauma.sql	Wed Apr 11 19:57:39 2018 UTC

101.2 Comparison summary

Description	Between Files 1 and 2
Description	Text Blocks	Lines
Unchanged	63	1794
Changed	62	124
Inserted	0	0
Removed	0	0

101.3 Comparison options

Whitespace
Character case	Differences in character case are significant
Line endings	Differences in line endings (`CR` and `LF` characters) are ignored
CR/LF characters	Not shown in the comparison detail

101.4 Active regular expressions

No regular expressions were active.

101.5 Comparison detail

	1	-- POLYTRA UAMA - V1
	2	/******* ****** ****** ****** ****** ****** ****** *****
	3	* POLYTRAU MA DATABAS E CHANGES - Jan. 201 4 ( PII )
	4	* Summary of updates :
	5	* - [TBI_ POLYTRAUMA ] - severa l fields a dded
	6	* - [STD_ TBIINJURYL IST] - add entry of 'Physical Assault' t o next to last entry
	7	* - [STD_ POLYTRAUMA _ENTRY_TYP E] - new t able
	8	* - [STD_ POLYTRAUMA _SEVERITY_ LEVEL_INDE X] - new t able
	9	* - [STD_ PERSON_LIV ING_WITH] - new tabl e
	10	* - [STD_ POLYTRAUMA _EMPLOYMEN T_STATUS] - new tabl e
	11	* - [STD_ TBIDSCHRGS TS] - set all old va lues as in active and add new v alues.
	12	*
	13	******** ****** ****** ****** ****** ****** ****** ****/
	14
	15	/******* * Chan ge #1 ******** /
	16	-- Add Phy sical Assa ult to the Injury Li st and upd ate 'Other ' to have the last s ort value.
	17	INSERT INT O [TBI].[S TD_TBIINJU RYLIST]([C ODE], [NAM E], [DESCR IPTION_TEX T], [SORT_ ORDER], [I NACTIVE_FL AG], [INAC TIVE_DATE] , [CREATED BY],
	18	[UPDATEDBY ], [CREATE D], [UPDAT ED])
	19	VALUES('Ph ysical Ass ault', 'Ph ysical Ass ault', 'Ph ysical Ass ault', 18, 0, NULL, ' PII ', ' PII ', GETDATE (), GETDAT E());
	20
	21	-- change sort order of 'other ' so it's last
	22	UPDATE [TB I].[STD_TB IINJURYLIS T] SET [SO RT_ORDER] = 19 WHERE ID = 18;
	23
	24	-- Add col umn to TBI _POLYTRAUM A for PHYS ICAL_ASSAU LT_INJRY_I ND
	25	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PHYSICAL_ ASSAULT_IN JRY_IND')
	26	ALTER TABL E [TBI].[T BI_POLYTRA UMA] ADD [ PHYSICAL_A SSAULT_INJ RY_IND] va rchar(1) N ULL;
	27
	28	/******* * End Ch ange #1 ******** /
	29
	30
	31	/******* * Chan ge #2 ******** /
	32	-- Alter T BI_POLYTRA UMA table to have JF K Coma Rec overy Scal e score co lumn (JFK_ COMA_RECOV ERY - int, null)
	33	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'JFK_COMA_ RECOVERY')
	34	ALTER TABL E [TBI].[T BI_POLYTRA UMA] ADD [ JFK_COMA_R ECOVERY] i nt NULL;
	35	/******* * End Ch ange #2 ******** /
	36
	37
	38	/******* * Chan ge #3 ******** /
	39	-- CREATE [TBI].[STD _POLYTRAUM A_ENTRY_TY PE] table for storin g types of Polytraum a entries (PRC and P TRP) and i nsert init ial data.
	40	IF NOT EXI STS (SELEC T * FROM s ys.objects WHERE obj ect_id = O BJECT_ID(N '[TBI].[ST D_POLYTRAU MA_ENTRY_T YPE]') AND type in ( N'U'))
	41	BEGIN
	42	CREATE TAB LE [TBI].[ STD_POLYTR AUMA_ENTRY _TYPE](
	43	[I D] [int] I DENTITY(1, 1) NOT NUL L,
	44	[C ODE] [varc har](50) N OT NULL,
	45	[N AME] [varc har](100) NOT NULL,
	46	[D ESCRIPTION _TEXT] [va rchar](500 ) NOT NULL ,
	47	[S ORT_ORDER] [int] NOT NULL,
	48	[I NACTIVE_FL AG] [bit] NOT NULL,
	49	[I NACTIVE_DA TE] [datet ime] NULL,
	50	[C REATEDBY] [varchar]( 30) NOT NU LL,
	51	[C REATED] [d atetime] N OT NULL,
	52	[U PDATEDBY] [varchar]( 30) NOT NU LL,
	53	[U PDATED] [d atetime] N OT NULL,
	54	[R OW_VERSION ] [timesta mp] NOT NU LL,
	55	CONSTRAIN T [PK_STD_ POLYTRAUMA _ENTRY_TYP E] PRIMARY KEY CLUST ERED
	56	(
	57	[I D] ASC
	58	)WITH (PAD _INDEX = OFF, STATI STICS_NORE COMPUTE = OFF, IGNO RE_DUP_KEY = OFF, AL LOW_ROW_LO CKS = ON, ALLOW_PAG E_LOCKS = ON) ON [P RIMARY]
	59	) ON [PRIM ARY]
	60
	61	-- INSERT INITIAL DA TA (PRC / PTRP)
	62	INSERT INT O [TBI].[S TD_POLYTRA UMA_ENTRY_ TYPE]([COD E], [NAME] , [DESCRIP TION_TEXT] , [SORT_OR DER], [INA CTIVE_FLAG ], [INACTI VE_DATE], [CREATEDBY ],
	63	[CREATED], [UPDATEDB Y], [UPDAT ED])
	64	VALUES('PR C', 'PRC', 'Polytrau ma Rehabil itation Ce nter', 1, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	65
	66	INSERT INT O [TBI].[S TD_POLYTRA UMA_ENTRY_ TYPE]([COD E], [NAME] , [DESCRIP TION_TEXT] , [SORT_OR DER], [INA CTIVE_FLAG ], [INACTI VE_DATE], [CREATEDBY ],
	67	[CREATED], [UPDATEDB Y], [UPDAT ED])
	68	VALUES('PT RP', 'PTRP ', 'Polytr auma Trans itional Re habilitati on Program ', 2, 0, N ULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	69
	70	END
	71	GO
	72
	73
	74	-- ADD ENT RY_TYPE_ID to TBI.TB I_POLYTRAU MA
	75	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'ENTRY_TYP E_ID')
	76	BEGIN
	77
	78	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD ENTRY _TYPE_ID i nt NULL
	79
	80	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	81	FK _TBI_POLYT RAUMA_STD_ POLYTRAUMA _ENTRY_TYP E FOREIGN KEY
	82	(
	83	EN TRY_TYPE_I D
	84	) REFERENCES TBI.STD_P OLYTRAUMA_ ENTRY_TYPE
	85	(
	86	ID
	87	) ON UPDATE NO ACTION
	88	O N DELETE NO ACTION
	89
	90	END
	91	GO
	92
	93	/******* * End Ch ange #3 ******** /
	94
	95
	96	/******* * Chan ge #4 ******** /
	97	-- Add IS_ FOLLOW_UP field (if 1 … follow up, if 0 o r null … a dmission)
	98	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'IS_FOLLOW _UP')
	99	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD IS_FO LLOW_UP bi t NULL
	100
	101	/******* * End Ch ange #4 ******** /
	102
	103
	104	/******* * Chan ge #5 ******** /
	105	-- Add GEN ITO_URINAR Y_INJURIES field (bi t) 1 = tru e ... 0 or NULL = fa lse
	106	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'GENITO_UR INARY_INJU RIES')
	107	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD GENIT O_URINARY_ INJURIES b it NULL
	108
	109	/******* * End Ch ange #5 ******** /
	110
	111
	112	/******* * Chan ge #6 ******** /
	113	-- INSERT NEW VALUES INTO TBI. STD_TBIDIS CHARGETO t able for n ew desired values. To keep le gacy data intact, st art sort o rder at 50 and in (G etRehabDis chargeToLi st -> Drop DownList.c s) filter where sort order >= 50
	114
	115	IF (SELECT MAX(ID) F ROM TBI.ST D_TBIDISCH ARGETO) < 6
	116	BEGIN
	117
	118	UPDATE TBI .STD_TBIDI SCHARGETO SET [INACT IVE_FLAG] = 1, [INAC TIVE_DATE] = GETDATE () WHERE I D < 6;
	119
	120	--Private
	121	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	122	[CREATEDBY ], [UPDATE DBY]) VALU ES('Privat e', 'Priva te', 'Priv ate', 1, 0 , NULL, GE TDATE(), G ETDATE(), ' PII ', ' PII ');
	123
	124	--Nursing Home
	125	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	126	[CREATEDBY ], [UPDATE DBY]) VALU ES('Nursin g_Home', ' Nursing Ho me', 'Nurs ing Home', 2, 0, NUL L, GETDATE (), GETDAT E(), ' PII ', ' PII ');
	127
	128	--Adult Ho me
	129	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	130	[CREATEDBY ], [UPDATE DBY]) VALU ES('Adult_ Home', 'Ad ult Home', 'Adult Ho me', 3, 0, NULL, GET DATE(), GE TDATE(), ' PII ', ' PII ');
	131
	132	--Correcti onal insti tution
	133	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	134	[CREATEDBY ], [UPDATE DBY]) VALU ES('Correc tional', ' Correction al Institu tion', 'Co rrectional Instituti on', 4, 0, NULL, GET DATE(), GE TDATE(), ' PII ', ' PII ');
	135
	136	--Hotel
	137	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	138	[CREATEDBY ], [UPDATE DBY]) VALU ES('Hotel' , 'Hotel', 'Hotel', 5, 0, NULL , GETDATE( ), GETDATE (), ' PII ', ' PII ');
	139
	140	--Homeless
	141	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	142	[CREATEDBY ], [UPDATE DBY]) VALU ES('Homele ss', 'Home less', 'Ho meless', 6 , 0, NULL, GETDATE() , GETDATE( ), ' PII ', ' PII ');
	143
	144	--Acute Ho spital
	145	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	146	[CREATEDBY ], [UPDATE DBY]) VALU ES('Acute_ Hospital', 'Acute Ho spital', ' Acute Hosp ital', 7, 0, NULL, G ETDATE(), GETDATE(), ' PII ', ' PII ');
	147
	148	--Rehabili tation Hos pital
	149	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	150	[CREATEDBY ], [UPDATE DBY]) VALU ES('Rehab_ Hospital', 'Rehabili tation Hos pital', 'R ehabilitat ion Hospit al', 8, 0, NULL, GET DATE(), GE TDATE(), ' PII ', ' PII ');
	151
	152	--Other Ho spital
	153	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	154	[CREATEDBY ], [UPDATE DBY]) VALU ES('Other_ Hospital', 'Other Ho spital', ' Other Hosp ital', 9, 0, NULL, G ETDATE(), GETDATE(), ' PII ', ' PII ');
	155
	156	--Sub-Acut e Hospital
	157	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	158	[CREATEDBY ], [UPDATE DBY]) VALU ES('SubAcu te_Hospita l', 'Sub-A cute Hospi tal', 'Sub -Acute Hos pital', 10 , 0, NULL, GETDATE() , GETDATE( ), ' PII ', ' PII ');
	159
	160	--Military Housing ( Apartment, Barracks or House)
	161	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	162	[CREATEDBY ], [UPDATE DBY]) VALU ES('MTH', 'Military Housing', 'Apartment , Barracks or House' , 11, 0, N ULL, GETDA TE(), GETD ATE(), ' PII ', ' PII ');
	163
	164	-- Militar y Hospital (MTF)
	165	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	166	[CREATEDBY ], [UPDATE DBY]) VALU ES('MTF', 'Military Hospital', 'Military Hospital' , 12, 0, N ULL, GETDA TE(), GETD ATE(), ' PII ', ' PII ');
	167
	168	--PTRP
	169	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	170	[CREATEDBY ], [UPDATE DBY]) VALU ES('PTRP', 'Polytrau ma Transit ional Reha bilitation Program', 'Polytrau ma Transit ional Reha bilitation Program', 13, 0, NU LL, GETDAT E(), GETDA TE(), ' PII ', ' PII ');
	171
	172	--Other
	173	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	174	[CREATEDBY ], [UPDATE DBY]) VALU ES('Other' , 'Other', 'Other', 14, 0, NUL L, GETDATE (), GETDAT E(), ' PII ', ' PII ');
	175
	176	--Unknown
	177	INSERT INT O TBI.STD_ TBIDISCHAR GETO([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	178	[CREATEDBY ], [UPDATE DBY]) VALU ES('Unknow n', 'Unkno wn', 'Unkn own', 15, 0, NULL, G ETDATE(), GETDATE(), ' PII ', ' PII ');
	179
	180	END
	181
	182	/******* * End Ch ange #6 ******** /
	183
	184
	185	/******* * Chan ge #7 ******** /
	186	-- Create [TBI].[STD _POLYTRAUM A_SEVERITY _LEVEL_IND EX] table / Create c olumn in P OLYTRAUMA (SEVERITY_ LEVEL_INDE X) FK
	187	IF NOT EXI STS (SELEC T * FROM s ys.objects WHERE obj ect_id = O BJECT_ID(N '[TBI].[ST D_POLYTRAU MA_SEVERIT Y_LEVEL_IN DEX]') AND type in ( N'U'))
	188	BEGIN
	189	CREATE TAB LE [TBI].[ STD_POLYTR AUMA_SEVER ITY_LEVEL_ INDEX](
	190	[I D] [int] I DENTITY(1, 1) NOT NUL L,
	191	[C ODE] [varc har](50) N OT NULL,
	192	[N AME] [varc har](100) NOT NULL,
	193	[D ESCRIPTION _TEXT] [va rchar](500 ) NOT NULL ,
	194	[S ORT_ORDER] [int] NOT NULL,
	195	[I NACTIVE_FL AG] [bit] NOT NULL,
	196	[I NACTIVE_DA TE] [datet ime] NULL,
	197	[C REATEDBY] [varchar]( 30) NOT NU LL,
	198	[C REATED] [d atetime] N OT NULL,
	199	[U PDATEDBY] [varchar]( 30) NOT NU LL,
	200	[U PDATED] [d atetime] N OT NULL,
	201	[R OW_VERSION ] [timesta mp] NOT NU LL,
	202	CONSTRAIN T [PK_STD_ POLYTRAUMA _SEVERITY_ LEVEL_INDE X] PRIMARY KEY CLUST ERED
	203	(
	204	[I D] ASC
	205	)WITH (PAD _INDEX = OFF, STATI STICS_NORE COMPUTE = OFF, IGNO RE_DUP_KEY = OFF, AL LOW_ROW_LO CKS = ON, ALLOW_PAG E_LOCKS = ON) ON [P RIMARY]
	206	) ON [PRIM ARY]
	207
	208
	209	-- INSERT INITIAL DA TA
	210
	211	INSERT INT O [TBI].[S TD_POLYTRA UMA_SEVERI TY_LEVEL_I NDEX]([COD E], [NAME] , [DESCRIP TION_TEXT] , [SORT_OR DER], [INA CTIVE_FLAG ], [INACTI VE_DATE], [CREATEDBY ],
	212	[CREATED], [UPDATEDB Y], [UPDAT ED])
	213	VALUES('Mi ld', 'Mild ', 'Mild', 1, 0, NUL L, ' PII ', GETDATE (), ' PII ', GETDATE ());
	214
	215	INSERT INT O [TBI].[S TD_POLYTRA UMA_SEVERI TY_LEVEL_I NDEX]([COD E], [NAME] , [DESCRIP TION_TEXT] , [SORT_OR DER], [INA CTIVE_FLAG ], [INACTI VE_DATE], [CREATEDBY ],
	216	[CREATED], [UPDATEDB Y], [UPDAT ED])
	217	VALUES('Mo derate', ' Moderate', 'Moderate ', 2, 0, N ULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	218
	219	INSERT INT O [TBI].[S TD_POLYTRA UMA_SEVERI TY_LEVEL_I NDEX]([COD E], [NAME] , [DESCRIP TION_TEXT] , [SORT_OR DER], [INA CTIVE_FLAG ], [INACTI VE_DATE], [CREATEDBY ],
	220	[CREATED], [UPDATEDB Y], [UPDAT ED])
	221	VALUES('Se vere', 'Se vere', 'Se vere', 3, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	222
	223	INSERT INT O [TBI].[S TD_POLYTRA UMA_SEVERI TY_LEVEL_I NDEX]([COD E], [NAME] , [DESCRIP TION_TEXT] , [SORT_OR DER], [INA CTIVE_FLAG ], [INACTI VE_DATE], [CREATEDBY ],
	224	[CREATED], [UPDATEDB Y], [UPDAT ED])
	225	VALUES('NA ', 'N/A', 'Not Appli cable', 4, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	226
	227	END
	228	GO
	229
	230	-- Add SEV ERITY_LEVE L_INDEX fi eld (int n ull) - FK to [TBI].[ STD_POLYTR AUMA_SEVER ITY_LEVEL_ INDEX]
	231	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'SEVERITY_ LEVEL_INDE X_ID')
	232	BEGIN
	233
	234	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD SEVER ITY_LEVEL_ INDEX_ID i nt NULL
	235
	236	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	237	FK _TBI_POLYT RAUMA_STD_ POLYTRAUMA _SEVERITY_ LEVEL_INDE X FOREIGN KEY
	238	(
	239	SE VERITY_LEV EL_INDEX_I D
	240	) REFERENCES TBI.STD_P OLYTRAUMA_ SEVERITY_L EVEL_INDEX
	241	(
	242	ID
	243	) ON UPDATE NO ACTION
	244	O N DELETE NO ACTION
	245
	246	END
	247	GO
	248
	249	/******* * End Ch ange #7 ******** /
	250
	251
	252	/******* * Chan ge #8 ******** /
	253	-- Add DAY S_FROM_ONS ET field t o POLYTRAU MA - store s calculat ed days fr om onset t o admissio n
	254	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'DAYS_FROM _ONSET')
	255	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD DAYS_ FROM_ONSET int NULL
	256	GO
	257
	258	/******* * End Ch ange #8 ******** /
	259
	260
	261	/******* * Chan ge #9 ******** /
	262	-- Add PTR P_PROGRAM to POLYTRA UMA table (varchar(1 0) null)
	263	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PTRP_PROG RAM')
	264	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PTRP_ PROGRAM va rchar(10) NULL
	265	GO
	266
	267	/******* * End Ch ange #9 ******** /
	268
	269
	270	/******* * Chan ge #10 * ********** */
	271	IF NOT EXI STS (SELEC T * FROM s ys.objects WHERE obj ect_id = O BJECT_ID(N '[TBI].[ST D_PERSON_L IVING_WITH ]') AND ty pe in (N'U '))
	272	BEGIN
	273	CREATE TAB LE [TBI].[ STD_PERSON _LIVING_WI TH](
	274	[I D] [int] I DENTITY(1, 1) NOT NUL L,
	275	[C ODE] [varc har](50) N OT NULL,
	276	[N AME] [varc har](100) NOT NULL,
	277	[D ESCRIPTION _TEXT] [va rchar](500 ) NOT NULL ,
	278	[S ORT_ORDER] [int] NOT NULL,
	279	[I NACTIVE_FL AG] [bit] NOT NULL,
	280	[I NACTIVE_DA TE] [datet ime] NULL,
	281	[C REATEDBY] [varchar]( 30) NOT NU LL,
	282	[C REATED] [d atetime] N OT NULL,
	283	[U PDATEDBY] [varchar]( 30) NOT NU LL,
	284	[U PDATED] [d atetime] N OT NULL,
	285	[R OW_VERSION ] [timesta mp] NOT NU LL,
	286	CONSTRAIN T [PK_STD_ PERSON_LIV ING_WITH] PRIMARY KE Y CLUSTERE D
	287	(
	288	[I D] ASC
	289	)WITH (PAD _INDEX = OFF, STATI STICS_NORE COMPUTE = OFF, IGNO RE_DUP_KEY = OFF, AL LOW_ROW_LO CKS = ON, ALLOW_PAG E_LOCKS = ON) ON [P RIMARY]
	290	) ON [PRIM ARY]
	291
	292
	293	-- INSERT INITIAL DA TA
	294
	295	-- Alone
	296	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	297	[CREATED], [UPDATEDB Y], [UPDAT ED])
	298	VALUES('Al one', 'Alo ne', 'Alon e', 1, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	299
	300	-- Spouse
	301	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	302	[CREATED], [UPDATEDB Y], [UPDAT ED])
	303	VALUES('Sp ouse', 'Sp ouse', 'Sp ouse', 2, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	304
	305	-- Parent( s)
	306	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	307	[CREATED], [UPDATEDB Y], [UPDAT ED])
	308	VALUES('Pa rent', 'Pa rent(s)', 'Parent(s) ', 3, 0, N ULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	309
	310	-- Sibling
	311	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	312	[CREATED], [UPDATEDB Y], [UPDAT ED])
	313	VALUES('Si bling', 'S ibling', ' Sibling', 4, 0, NULL , ' PII ', GETDATE (), ' PII ', GETDATE ());
	314
	315	-- Child<2 1
	316	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	317	[CREATED], [UPDATEDB Y], [UPDAT ED])
	318	VALUES('YC hild', 'Ch ild < 21', 'Child < 21', 5, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	319
	320	-- Child>= 21/Other R elative
	321	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	322	[CREATED], [UPDATEDB Y], [UPDAT ED])
	323	VALUES('AC hildOther' , 'Child > = 21 / Oth er Relativ e', 'Child >= 21 / O ther Relat ive', 6, 0 , NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	324
	325	-- Roommat e/Friend
	326	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	327	[CREATED], [UPDATEDB Y], [UPDAT ED])
	328	VALUES('Ro ommate', ' Roommate / Friend', 'Roommate / Friend', 7, 0, NUL L, ' PII ', GETDATE (), ' PII ', GETDATE ());
	329
	330	-- Signifi cant Other
	331	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	332	[CREATED], [UPDATEDB Y], [UPDAT ED])
	333	VALUES('Si gnificantO ther', 'Si gnificant Other', 'S ignificant Other', 8 , 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	334
	335	-- Other P atients
	336	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	337	[CREATED], [UPDATEDB Y], [UPDAT ED])
	338	VALUES('Ot herPatient s', 'Other Patients' , 'Other P atients', 9, 0, NULL , ' PII ', GETDATE (), ' PII ', GETDATE ());
	339
	340	-- Other R esidents
	341	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	342	[CREATED], [UPDATEDB Y], [UPDAT ED])
	343	VALUES('Ot herResiden ts', 'Othe r Resident s', 'Other Residents ', 10, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	344
	345	-- Persona l Care Att endant
	346	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	347	[CREATED], [UPDATEDB Y], [UPDAT ED])
	348	VALUES('Pe rsonalCare Attendant' , 'Persona l Care Att endant', ' Personal C are Attend ant', 11, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	349
	350	-- Other
	351	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	352	[CREATED], [UPDATEDB Y], [UPDAT ED])
	353	VALUES('Ot her', 'Oth er', 'Othe r', 12, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	354
	355	-- Other M ilitary Pe rsonnel
	356	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	357	[CREATED], [UPDATEDB Y], [UPDAT ED])
	358	VALUES('Ot herMilitar y', 'Other Military Personnel' , 'Other M ilitary Pe rsonnel', 13, 0, NUL L, ' PII ', GETDATE (), ' PII ', GETDATE ());
	359
	360	-- Unknown
	361	INSERT INT O [TBI].[S TD_PERSON_ LIVING_WIT H]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	362	[CREATED], [UPDATEDB Y], [UPDAT ED])
	363	VALUES('Un known', 'U nknown', ' Unknown', 14, 0, NUL L, ' PII ', GETDATE (), ' PII ', GETDATE ());
	364
	365
	366	END
	367	GO
	368
	369	-- Add PRE INJURY_PRI M_PERSON_L IVING_WITH _ID field (int null) - FK to [ TBI].[STD_ PERSON_LIV ING_WITH]
	370	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PREINJURY _PRIM_PERS ON_LIVING_ WITH_ID')
	371	BEGIN
	372
	373	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PREIN JURY_PRIM_ PERSON_LIV ING_WITH_I D int NULL
	374
	375	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	376	FK _TBI_POLYT RAUMA_PREI NJURY_PRIM _STD_PERSO N_LIVING_W ITH FOREIG N KEY
	377	(
	378	PR EINJURY_PR IM_PERSON_ LIVING_WIT H_ID
	379	) REFERENCES TBI.STD_P ERSON_LIVI NG_WITH
	380	(
	381	ID
	382	) ON UPDATE NO ACTION
	383	O N DELETE NO ACTION
	384
	385	END
	386	GO
	387
	388	/******* * End Ch ange #10 ******** /
	389
	390
	391	/******* * Change #11 ** ******/
	392
	393	-- Add PRE INJURY_RES IDENCE_ID field (int null) - F K to [TBI] .[STD_TBID ISCHARGETO ]
	394	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PREINJURY _RESIDENCE _ID')
	395	BEGIN
	396
	397	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PREIN JURY_RESID ENCE_ID in t NULL
	398
	399	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	400	FK _TBI_POLYT RAUMA_PREI NJURY_RESI DENCE_ID_S TD_TBIDISC HARGETO FO REIGN KEY
	401	(
	402	PR EINJURY_RE SIDENCE_ID
	403	) REFERENCES TBI.STD_T BIDISCHARG ETO
	404	(
	405	ID
	406	) ON UPDATE NO ACTION
	407	O N DELETE NO ACTION
	408
	409	END
	410	GO
	411
	412	/******* * End Ch ange #11 ******** /
	413
	414
	415	/******* * Change #12 ** ******/
	416	-- Create STD_POLYTR AUMA_EMPLO YMENT_STAT US table a nd populat e with ini tial data.
	417	IF NOT EXI STS (SELEC T * FROM s ys.objects WHERE obj ect_id = O BJECT_ID(N '[TBI].[ST D_POLYTRAU MA_EMPLOYM ENT_STATUS ]') AND ty pe in (N'U '))
	418	BEGIN
	419	CREATE TAB LE [TBI].[ STD_POLYTR AUMA_EMPLO YMENT_STAT US](
	420	[I D] [int] I DENTITY(1, 1) NOT NUL L,
	421	[C ODE] [varc har](50) N OT NULL,
	422	[N AME] [varc har](100) NOT NULL,
	423	[D ESCRIPTION _TEXT] [va rchar](500 ) NOT NULL ,
	424	[S ORT_ORDER] [int] NOT NULL,
	425	[I NACTIVE_FL AG] [bit] NOT NULL,
	426	[I NACTIVE_DA TE] [datet ime] NULL,
	427	[C REATEDBY] [varchar]( 30) NOT NU LL,
	428	[C REATED] [d atetime] N OT NULL,
	429	[U PDATEDBY] [varchar]( 30) NOT NU LL,
	430	[U PDATED] [d atetime] N OT NULL,
	431	[R OW_VERSION ] [timesta mp] NOT NU LL,
	432	CONSTRAIN T [PK_STD_ POLYTRAUMA _EMPLOYMEN T_STATUS] PRIMARY KE Y CLUSTERE D
	433	(
	434	[I D] ASC
	435	)WITH (PAD _INDEX = OFF, STATI STICS_NORE COMPUTE = OFF, IGNO RE_DUP_KEY = OFF, AL LOW_ROW_LO CKS = ON, ALLOW_PAG E_LOCKS = ON) ON [P RIMARY]
	436	) ON [PRIM ARY]
	437
	438	-- INSERT INITIAL DA TA
	439	-- Full-ti me student (regular class)
	440	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	441	[CREATED], [UPDATEDB Y], [UPDAT ED])
	442	VALUES('FT _STUDENT', 'Full-tim e student (regular c lass)', 'F ull-time s tudent (re gular clas s)', 1, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	443
	444	-- Part-ti me student (regular class)
	445	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	446	[CREATED], [UPDATEDB Y], [UPDAT ED])
	447	VALUES('PT _STUDENT', 'Part-tim e student (regular c lass)', 'P art-time s tudent (re gular clas s)', 2, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	448
	449	-- Special education /other non -regular e ducation
	450	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	451	[CREATED], [UPDATEDB Y], [UPDAT ED])
	452	VALUES('SP EC_ED', 'S pecial edu cation/oth er non-reg ular educa tion', 'Sp ecial educ ation/othe r non-regu lar educat ion', 3, 0 , NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	453
	454	-- Competi tively emp loyed
	455	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	456	[CREATED], [UPDATEDB Y], [UPDAT ED])
	457	VALUES('CO MP_EMPLOYE D', 'Compe titively e mployed', 'Competiti vely emplo yed', 4, 0 , NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	458
	459	-- Taking care of ho use or fam ily
	460	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	461	[CREATED], [UPDATEDB Y], [UPDAT ED])
	462	VALUES('HO ME', 'Taki ng care of house or family', ' Taking car e of house or family ', 5, 0, N ULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	463
	464	-- Special employed (sheltered workshop, supportiv e employme nt, job co ach)
	465	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	466	[CREATED], [UPDATEDB Y], [UPDAT ED])
	467	VALUES('SP EC_EMPLOYE D', 'Speci al employe d', 'Speci al employe d (shelter ed worksho p, support ive employ ment, job coach) ', 6, 0, NULL , ' PII ', GETDATE (), ' PII ', GETDATE ());
	468
	469	-- Retired (age)
	470	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	471	[CREATED], [UPDATEDB Y], [UPDAT ED])
	472	VALUES('RE TIRED_AGE' , 'Retired (age)', ' Retired (a ge)', 7, 0 , NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	473
	474	-- Unemplo yed (looki ng for wor k in the l ast 4 week s)
	475	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	476	[CREATED], [UPDATEDB Y], [UPDAT ED])
	477	VALUES('UN EMPLOYED_S EEK', 'Une mployed (s eeking)', 'Unemploye d (looking for work in the las t 4 weeks) ', 8, 0, N ULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	478
	479	-- Volunte er work
	480	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	481	[CREATED], [UPDATEDB Y], [UPDAT ED])
	482	VALUES('VO LUNTEER', 'Volunteer work', 'V olunteer w ork', 9, 0 , NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	483
	484	-- Retired (disabili ty)
	485	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	486	[CREATED], [UPDATEDB Y], [UPDAT ED])
	487	VALUES('RE TIRED_DISA BILITY', ' Retired (d isability) ', 'Retire d (disabil ity)', 10, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	488
	489	-- Unemplo yed (not l ooking for work in t he last 4 weeks for any reason )
	490	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	491	[CREATED], [UPDATEDB Y], [UPDAT ED])
	492	VALUES('UN EMPLOYED_N OT_SEEK', 'Unemploye d (not see king)', 'U nemployed (not looki ng for wor k in the l ast 4 week s for any reason)', 11, 0, NUL L, ' PII ', GETDATE (), ' PII ', GETDATE ());
	493
	494	-- Hospita lized with out pay fo r last 4 w eeks
	495	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	496	[CREATED], [UPDATEDB Y], [UPDAT ED])
	497	VALUES('HO SPITAL_NO_ PAY', 'Hos pitalized without pa y for last 4 weeks', 'Hospital ized witho ut pay for last 4 we eks', 12, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	498
	499	-- Retired (other)
	500	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	501	[CREATED], [UPDATEDB Y], [UPDAT ED])
	502	VALUES('RE TIRED_OTHE R', 'Retir ed (other) ', 'Retire d (other)' , 13, 0, N ULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	503
	504	-- On leav e from wor k, not rec eiving pay
	505	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	506	[CREATED], [UPDATEDB Y], [UPDAT ED])
	507	VALUES('LE AVE_NO_PAY ', 'On lea ve from wo rk, not re ceiving pa y', 'On le ave from w ork, not r eceiving p ay', 14, 0 , NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	508
	509	-- Other
	510	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	511	[CREATED], [UPDATEDB Y], [UPDAT ED])
	512	VALUES('OT HER', 'Oth er', 'Othe r', 15, 0, NULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	513
	514	-- Warrior Transitio n Unit/Bri gade
	515	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	516	[CREATED], [UPDATEDB Y], [UPDAT ED])
	517	VALUES('WT U_BRIGADE' , 'Warrior Transitio n Unit/Bri gade', 'Wa rrior Tran sition Uni t/Brigade' , 16, 0, N ULL, ' PII ', GETDATE (), ' PII ', GETDATE ());
	518
	519	-- Refused
	520	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	521	[CREATED], [UPDATEDB Y], [UPDAT ED])
	522	VALUES('RE FUSED', 'R efused', ' Refused', 17, 0, NUL L, ' PII ', GETDATE (), ' PII ', GETDATE ());
	523
	524	-- UNKNOWN
	525	INSERT INT O [TBI].[S TD_POLYTRA UMA_EMPLOY MENT_STATU S]([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATEDBY],
	526	[CREATED], [UPDATEDB Y], [UPDAT ED])
	527	VALUES('UN KNOWN', 'U nknown', ' Unknown', 18, 0, NUL L, ' PII ', GETDATE (), ' PII ', GETDATE ());
	528
	529	END
	530	GO
	531
	532	-- Add PRE INJURY_PRI M_PERSON_L IVING_WITH _ID field (int null) - FK to [ TBI].[STD_ POLYTRAUMA _EMPLOYMEN T_STATUS]
	533	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PRI_PREIN JURY_EMPLO Y_STATUS_I D')
	534	BEGIN
	535
	536	-- add fie lds
	537	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PRI_P REINJURY_E MPLOY_STAT US_ID int NULL
	538
	539	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD SEC_P REINJURY_E MPLOY_STAT US_ID int NULL
	540
	541	-- add con straints t o STD_POLY TRAUMA_EMP LOYMENT_ST ATUS
	542	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	543	FK _TBI_POLYT RAUMA_PRI_ STD_POLYTR AUMA_EMPLO YMENT_STAT US FOREIGN KEY
	544	(
	545	PR I_PREINJUR Y_EMPLOY_S TATUS_ID
	546	) REFERENCES TBI.STD_P OLYTRAUMA_ EMPLOYMENT _STATUS
	547	(
	548	ID
	549	) ON UPDATE NO ACTION
	550	O N DELETE NO ACTION
	551
	552
	553	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	554	FK _TBI_POLYT RAUMA_SEC_ STD_POLYTR AUMA_EMPLO YMENT_STAT US FOREIGN KEY
	555	(
	556	SE C_PREINJUR Y_EMPLOY_S TATUS_ID
	557	) REFERENCES TBI.STD_P OLYTRAUMA_ EMPLOYMENT _STATUS
	558	(
	559	ID
	560	) ON UPDATE NO ACTION
	561	O N DELETE NO ACTION
	562
	563	END
	564	GO
	565
	566	/******* * End Ch ange #12 ******** /
	567
	568
	569	/******* * Change #13 ** ******/
	570	-- Add MPA I score co lumns to P OLYTRAUMA table
	571
	572	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ABIL ITIES_INIT IAL')
	573	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ ABILITIES_ INITIAL in t NULL
	574
	575	/*** -- Re moved by s takeholder
	576	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ABIL ITIES_DC')
	577	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ ABILITIES_ DC int NUL L
	578	**/
	579
	580	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ABIL ITIES_FOLL OWUP')
	581	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ ABILITIES_ FOLLOWUP i nt NULL
	582
	583	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ADJU STMENT_INI TIAL')
	584	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ ADJUSTMENT _INITIAL i nt NULL
	585
	586	/*** -- Re moved by s takeholder
	587	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ADJU STMENT_DC' )
	588	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ ADJUSTMENT _DC int NU LL
	589	**/
	590
	591	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ADJU STMENT_FOL LOWUP')
	592	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ ADJUSTMENT _FOLLOWUP int NULL
	593
	594	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_PART ICIPATION_ INITIAL')
	595	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ PARTICIPAT ION_INITIA L int NULL
	596
	597	/*** -- Re moved by s takeholder
	598	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_PART ICIPATION_ DC')
	599	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ PARTICIPAT ION_DC int NULL
	600	**/
	601
	602	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_PART ICIPATION_ FOLLOWUP')
	603	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ PARTICIPAT ION_FOLLOW UP int NUL L
	604
	605	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_TOTA L_INITIAL' )
	606	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ TOTAL_INIT IAL int NU LL
	607
	608	/*** -- Re moved by s takeholder
	609	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_TOTA L_DC')
	610	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ TOTAL_DC i nt NULL
	611	**/
	612
	613	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_TOTA L_FOLLOWUP ')
	614	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ TOTAL_FOLL OWUP int N ULL
	615
	616	GO
	617
	618	/******* * End Ch ange #13 ******** /
	619
	620
	621	/******* * Change #14 ** ******/
	622	-- Create (3) column s for stor ing MPAI Q 26 values for admiss ion, disch arge, and followup
	623
	624	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_Q26_ ADMISSION' )
	625	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ Q26_ADMISS ION int NU LL
	626
	627	/*** -- Re moved by s takeholder
	628	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_Q26_ DC')
	629	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ Q26_DC int NULL
	630	**/
	631
	632	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_Q26_ FOLLOWUP')
	633	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD MPAI_ Q26_FOLLOW UP int NUL L
	634
	635	GO
	636
	637	/******* * End Ch ange #14 ******** /
	638
	639
	640	/******* * Change #15 ** ******/
	641	-- Create (3) new fi elds (int null) for storing Sa tisfaction with Life Score (sc ore range from 5 to 35) for ad mission, d ischarge, and follow up
	642	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'SATIS_W_L IFE_ADMISS ION')
	643	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD SATIS _W_LIFE_AD MISSION in t NULL
	644
	645	/*** -- Re moved by s takeholder
	646	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'SATIS_W_L IFE_DC')
	647	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD SATIS _W_LIFE_DC int NULL
	648	**/
	649
	650	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'SATIS_W_L IFE_FOLLOW UP')
	651	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD SATIS _W_LIFE_FO LLOWUP int NULL
	652
	653	GO
	654
	655	/******* * End Ch ange #15 ******** /
	656
	657
	658	/******* * Change #16 ** ******/
	659	-- Create new fields PART_FOLL OWUP (int null) for storing PA RT (0 – 12 8 range) - Participa tion Asses sment with Recombine d Tools (P ART) for f ollowup
	660	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PART_FOLL OWUP')
	661	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PART_ FOLLOWUP i nt NULL
	662
	663	/******* * End Ch ange #16 ******** /
	664
	665
	666	/******* * Change #17 ** ******/
	667	-- Create (3) new fi elds (int null) for WHO_QOL_AD MISSION, W HO_QOL_DC, and WHO_Q OL_FOLLOWU P
	668	/**
	669	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'WHO_QOL_A DMISSION')
	670	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD WHO_Q OL_ADMISSI ON int NUL L
	671	**/
	672	/*** -- Re moved by s takeholder
	673	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'WHO_QOL_D C')
	674	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD WHO_Q OL_DC int NULL
	675	**/
	676	/**
	677	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'WHO_QOL_F OLLOWUP')
	678	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD WHO_Q OL_FOLLOWU P int NULL
	679	**/
	680	/******* * End Ch ange #17 ******** /
	681
	682
	683	/******* * Change #18 ** ******/
	684
	685	IF (SELECT MAX(ID) F ROM TBI.ST D_TBIDSCHR GSTS) < 6
	686	BEGIN
	687
	688	UPDATE TBI .STD_TBIDS CHRGSTS SE T [INACTIV E_FLAG] = 1, [INACTI VE_DATE] = GETDATE() WHERE ID < 6;
	689
	690	-- Active Duty
	691	INSERT INT O TBI.STD_ TBIDSCHRGS TS([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATED], [U PDATED],
	692	[CREATEDBY ], [UPDATE DBY]) VALU ES('ACTIVE _DUTY', 'A ctive Duty ', 'Active Duty', 1, 0, NULL, GETDATE(), GETDATE() , ' PII ', ' PII ');
	693
	694	-- Tempora ry Disabil ity Retire d List (TD RL)
	695	INSERT INT O TBI.STD_ TBIDSCHRGS TS([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATED], [U PDATED],
	696	[CREATEDBY ], [UPDATE DBY]) VALU ES('TDRL', 'Temporar y Disabili ty Retired List', 'T emporary D isability Retired Li st (TDRL)' , 2, 0, NU LL, GETDAT E(), GETDA TE(), ' PII ', ' PII ');
	697
	698	-- Medical Evaluatio n Board in Process
	699	INSERT INT O TBI.STD_ TBIDSCHRGS TS([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATED], [U PDATED],
	700	[CREATEDBY ], [UPDATE DBY]) VALU ES('MEB', 'Medical E valuation Board in P rocess', ' Medical Ev aluation B oard in Pr ocess', 3, 0, NULL, GETDATE(), GETDATE() , ' PII ', ' PII ');
	701
	702	-- Convale scent Leav e
	703	INSERT INT O TBI.STD_ TBIDSCHRGS TS([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATED], [U PDATED],
	704	[CREATEDBY ], [UPDATE DBY]) VALU ES('CONVAL ESCENT_LEA VE', 'Conv alescent L eave', 'Co nvalescent Leave', 4 , 0, NULL, GETDATE() , GETDATE( ), ' PII ', ' PII ');
	705
	706	-- Veteran
	707	INSERT INT O TBI.STD_ TBIDSCHRGS TS([CODE], [NAME], [ DESCRIPTIO N_TEXT], [ SORT_ORDER ], [INACTI VE_FLAG], [INACTIVE_ DATE], [CR EATED], [U PDATED],
	708	[CREATEDBY ], [UPDATE DBY]) VALU ES('VETERA N', 'Veter an', 'Vete ran', 5, 0 , NULL, GE TDATE(), G ETDATE(), ' PII ', ' PII ');
	709
	710	END
	711	GO
	712
	713	-- create new column for milit ary duty s tatus at d ischarge, and constr aint for S TD_TBIDSCH RGSTS
	714	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'DC_MILITA RY_DUTY_ST ATUS_ID')
	715	BEGIN
	716
	717	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD DC_MI LITARY_DUT Y_STATUS_I D int NULL
	718
	719	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	720	FK _TBI_POLYT RAUMA_MILI TARY_DUTY_ STATUS_STD _TBIDSCHRG STS FOREIG N KEY
	721	(
	722	DC _MILITARY_ DUTY_STATU S_ID
	723	) REFERENCES TBI.STD_T BIDSCHRGST S
	724	(
	725	ID
	726	) ON UPDATE NO ACTION
	727	O N DELETE NO ACTION
	728
	729	END
	730	GO
	731
	732	/******* * End Ch ange #18 ******** /
	733
	734
	735	/******* * End Ch ange #19 ******** /
	736	-- Add PRI _PERSON_LI VING_DC_ID field (in t null) - FK to [TBI ].[STD_PER SON_LIVING _WITH]
	737	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PRI_PERSO N_LIVING_D C_ID')
	738	BEGIN
	739
	740	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PRI_P ERSON_LIVI NG_DC_ID i nt NULL
	741
	742	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	743	FK _TBI_POLYT RAUMA_PRI_ PERSON_DC_ STD_PERSON _LIVING_WI TH FOREIGN KEY
	744	(
	745	PR I_PERSON_L IVING_DC_I D
	746	) REFERENCES TBI.STD_P ERSON_LIVI NG_WITH
	747	(
	748	ID
	749	) ON UPDATE NO ACTION
	750	O N DELETE NO ACTION
	751
	752	END
	753	GO
	754
	755	-- Add PRI _PERSON_LI VING_FOLLO WUP_ID fie ld (int nu ll) - FK t o [TBI].[S TD_PERSON_ LIVING_WIT H]
	756	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PRI_PERSO N_LIVING_F OLLOWUP_ID ')
	757	BEGIN
	758
	759	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PRI_P ERSON_LIVI NG_FOLLOWU P_ID int N ULL
	760
	761	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	762	FK _TBI_POLYT RAUMA_PRI_ PERSON_FOL LOWUP_STD_ PERSON_LIV ING_WITH F OREIGN KEY
	763	(
	764	PR I_PERSON_L IVING_FOLL OWUP_ID
	765	) REFERENCES TBI.STD_P ERSON_LIVI NG_WITH
	766	(
	767	ID
	768	) ON UPDATE NO ACTION
	769	O N DELETE NO ACTION
	770
	771	END
	772	GO
	773
	774	/******* * End Ch ange #19 ******** /
	775
	776
	777	/******* * Change #20 ** ******/
	778	-- Add DC_ RESIDENCE_ ID field ( int null) - FK to [T BI].[STD_T BIDISCHARG ETO]
	779	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'DC_RESIDE NCE_ID')
	780	BEGIN
	781
	782	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD DC_RE SIDENCE_ID int NULL
	783
	784	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	785	FK _TBI_POLYT RAUMA_DC_R ESIDENCE_I D_STD_TBID ISCHARGETO FOREIGN K EY
	786	(
	787	DC _RESIDENCE _ID
	788	) REFERENCES TBI.STD_T BIDISCHARG ETO
	789	(
	790	ID
	791	) ON UPDATE NO ACTION
	792	O N DELETE NO ACTION
	793
	794	END
	795	GO
	796
	797	-- Add FOL LOWUP_RESI DENCE_ID f ield (int null) - FK to [TBI]. [STD_TBIDI SCHARGETO]
	798	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'FOLLOWUP_ RESIDENCE_ ID')
	799	BEGIN
	800
	801	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD FOLLO WUP_RESIDE NCE_ID int NULL
	802
	803	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	804	FK _TBI_POLYT RAUMA_FOLL OWUP_RESID ENCE_ID_ST D_TBIDISCH ARGETO FOR EIGN KEY
	805	(
	806	FO LLOWUP_RES IDENCE_ID
	807	) REFERENCES TBI.STD_T BIDISCHARG ETO
	808	(
	809	ID
	810	) ON UPDATE NO ACTION
	811	O N DELETE NO ACTION
	812
	813	END
	814	GO
	815
	816	/******* * End Ch ange #20 ******** /
	817
	818
	819	/******* * End Ch ange #21 ******** /
	820	-- Add PRI _DC_EMPLOY _STATUS_ID field (in t null) - FK to [TBI ].[STD_POL YTRAUMA_EM PLOYMENT_S TATUS]
	821	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PRI_DC_EM PLOY_STATU S_ID')
	822	BEGIN
	823
	824	-- add fie lds
	825	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PRI_D C_EMPLOY_S TATUS_ID i nt NULL
	826	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD SEC_D C_EMPLOY_S TATUS_ID i nt NULL
	827	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD PRI_F OLLOWUP_EM PLOY_STATU S_ID int N ULL
	828	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD SEC_F OLLOWUP_EM PLOY_STATU S_ID int N ULL
	829
	830	-- add con straints t o STD_POLY TRAUMA_EMP LOYMENT_ST ATUS
	831	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	832	FK _TBI_POLYT RAUMA_PRI_ DC_STD_POL YTRAUMA_EM PLOYMENT_S TATUS FORE IGN KEY
	833	(
	834	PR I_DC_EMPLO Y_STATUS_I D
	835	) REFERENCES TBI.STD_P OLYTRAUMA_ EMPLOYMENT _STATUS
	836	(
	837	ID
	838	) ON UPDATE NO ACTION
	839	O N DELETE NO ACTION
	840
	841
	842	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	843	FK _TBI_POLYT RAUMA_SEC_ DC_STD_POL YTRAUMA_EM PLOYMENT_S TATUS FORE IGN KEY
	844	(
	845	SE C_DC_EMPLO Y_STATUS_I D
	846	) REFERENCES TBI.STD_P OLYTRAUMA_ EMPLOYMENT _STATUS
	847	(
	848	ID
	849	) ON UPDATE NO ACTION
	850	O N DELETE NO ACTION
	851
	852	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	853	FK _TBI_POLYT RAUMA_PRI_ FOLLOWUP_S TD_POLYTRA UMA_EMPLOY MENT_STATU S FOREIGN KEY
	854	(
	855	PR I_FOLLOWUP _EMPLOY_ST ATUS_ID
	856	) REFERENCES TBI.STD_P OLYTRAUMA_ EMPLOYMENT _STATUS
	857	(
	858	ID
	859	) ON UPDATE NO ACTION
	860	O N DELETE NO ACTION
	861
	862
	863	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD CONST RAINT
	864	FK _TBI_POLYT RAUMA_SEC_ FOLLOWUP_S TD_POLYTRA UMA_EMPLOY MENT_STATU S FOREIGN KEY
	865	(
	866	SE C_FOLLOWUP _EMPLOY_ST ATUS_ID
	867	) REFERENCES TBI.STD_P OLYTRAUMA_ EMPLOYMENT _STATUS
	868	(
	869	ID
	870	) ON UPDATE NO ACTION
	871	O N DELETE NO ACTION
	872
	873	END
	874	GO
	875
	876	/******* * End Ch ange #21 ******** /
	877
	878
	879	/******* * End Ch ange #22 ******** /
	880	-- Set Wal ter Reed a nd Nationa l Naval to inactive and add WR NNMC
	881	IF (SELECT MAX(ID) F ROM TBI.ST D_TBIFACIL ITYSRC) < 7
	882	BEGIN
	883
	884	UPDATE TBI .STD_TBIFA CILITYSRC SET [INACT IVE_FLAG] = 1, [INAC TIVE_DATE] = GETDATE () WHERE I D < 3;
	885
	886	INSERT INT O TBI.STD_ TBIFACILIT YSRC([CODE ], [NAME], [DESCRIPT ION_TEXT], [SORT_ORD ER], [INAC TIVE_FLAG] , [INACTIV E_DATE], [ CREATED], [UPDATED],
	887	[CREATEDBY ], [UPDATE DBY]) VALU ES('WRNNMC ', 'WRNNMC ', 'WRNNMC ', 1, 0, N ULL, GETDA TE(), GETD ATE(), ' PII ', ' PII ');
	888
	889	END
	890
	891	/******* * End Ch ange #22 ******** /
	892
	893
	894
	895
	896
	897	-- POLYTRA UMA - V1.1
	898	/******* ****** ****** ****** ****** ****** ****** *****
	899	* POLYTRAU MA DATABAS E CHANGES - Feb. 201 4 ( PII )
	900	* Summary of updates :
	901
	902	* - Change #1: DEF_3 5233 - PTR P - Reside nce (Disch arge) DDL options ar e not disp laying rig ht options
	903	******** ****** ****** ****** ****** ****** ****** ****/
	904
	905	-- Change #1 for DEF _35233 - P TRP - Resi dence (Dis charge) DD L options are not di splaying r ight optio ns
	906	UPDATE [TB I].[STD_TB IDISCHARGE TO] SET [N AME] = 'Mi litary Hou sing (Apar tment, Bar racks or H ouse)', [D ESCRIPTION _TEXT] = ' Military H ousing (Ap artment, B arracks or House)' W HERE CODE = 'MTH'
	907	UPDATE [TB I].[STD_TB IDISCHARGE TO] SET [N AME] = 'Mi litary Hos pital (MTF )', [DESCR IPTION_TEX T] = 'Mili tary Hospi tal (MTF)' WHERE COD E = 'MTF'
	908
	909	-- Change #2 for - D EF_35482 - PolyTraum a - “Physi cal Assaul t” should be directl y above th is section , set up a s a drop d own list i n the same manner as Blast, Ve hicle, Bul let, Other .
	910	/******* * Dele te Physica l Assault from TBIIN JURYLIST t able. ******** /
	911	DELETE FRO M [TBI].[S TD_TBIINJU RYLIST] WH ERE [CODE] = 'Physic al Assault ';
	912
	913	-- add col umn for Ph ysical Ass ault Injur y
	914	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'PHYS_ASSA ULT_INJRY_ IND')
	915	ALTER TABL E [TBI].[T BI_POLYTRA UMA] ADD [ PHYS_ASSAU LT_INJRY_I ND] varcha r(1) NULL
	916	GO
	917
	918
	919	-- Change #3 for DEF _35481 - S et Walter Reed and N ational Na val to ina ctive.
	920	UPDATE [TB I].[STD_TB IFACILITYS RC] SET [I NACTIVE_FL AG] = 1, [ INACTIVE_D ATE] = GET DATE() WHE RE [ID] < 3;
	921	GO
	922
	923
	924	-- Change #4 for Tas k 35576 - Create Dat abase chan ge scripts for addit ional disc harge scor es and def ects.
	925	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ABIL ITIES_DC')
	926	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD [MPAI _ABILITIES _DC] int N ULL
	927
	928	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_ADJU STMENT_DC' )
	929	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD [MPAI _ADJUSTMEN T_DC] int NULL
	930
	931	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_PART ICIPATION_ DC')
	932	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD [MPAI _PARTICIPA TION_DC] i nt NULL
	933
	934	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_TOTA L_DC')
	935	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD [MPAI _TOTAL_DC] int NULL
	936
	937	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'MPAI_Q26_ DC')
	938	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD [MPAI _Q26_DC] i nt NULL
	939
	940	IF NOT EXI STS (SELEC T * FROM I NFORMATION _SCHEMA.CO LUMNS WHER E TABLE_NA ME = 'TBI_ POLYTRAUMA ' AND COLU MN_NAME = 'SATIS_W_L IFE_DC')
	941	ALTER TABL E TBI.TBI_ POLYTRAUMA ADD [SATI S_W_LIFE_D C] int NUL L
	942
	943
	944	/******* * Remo ve [TBI].[ TBI_POLYTR AUMA].[PHY SICAL_ASSA ULT_INJRY_ IND] colum n **** ****/
	945	IF EXISTS (SELECT * FROM INFOR MATION_SCH EMA.COLUMN S WHERE TA BLE_NAME = 'TBI_POLY TRAUMA' AN D COLUMN_N AME = 'PHY SICAL_ASSA ULT_INJRY_ IND')
	946	ALTER TABL E [TBI].[T BI_POLYTRA UMA] DROP COLUMN [PH YSICAL_ASS AULT_INJRY _IND];
	947
	948	GO
	949
	950	-- Change #5 - Remov e Military Duty Stat us at Disc harge (dup licate fie ld)
	951	IF EXISTS (SELECT * FROM INFOR MATION_SCH EMA.COLUMN S WHERE TA BLE_NAME = 'TBI_POLY TRAUMA' AN D COLUMN_N AME = 'DC_ MILITARY_D UTY_STATUS _ID')
	952	BEGIN
	953
	954	ALTER TABL E TBI.TBI_ POLYTRAUMA DROP CONS TRAINT FK_ TBI_POLYTR AUMA_MILIT ARY_DUTY_S TATUS_STD_ TBIDSCHRGS TS
	955
	956	ALTER TABL E TBI.TBI_ POLYTRAUMA DROP COLU MN DC_MILI TARY_DUTY_ STATUS_ID
	957
	958	END
	959	GO