Produced by Araxis Merge on 8/29/2017 11:27:38 AM Eastern 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.
| # | Location | File | Last Modified |
|---|---|---|---|
| 1 | REFDOC-devel-20170714.zip\NVCC\OriginalSQLScripts | NVASupplement.sql | Fri Jul 14 21:27:00 2017 UTC |
| 2 | REFDOC-devel-20170714.zip\NVCC\OriginalSQLScripts | NVASupplement.sql | Mon Aug 28 17:44:21 2017 UTC |
| Description | Between Files 1 and 2 |
|
|---|---|---|
| Text Blocks | Lines | |
| Unchanged | 10 | 2072 |
| Changed | 9 | 18 |
| Inserted | 0 | 0 |
| Removed | 0 | 0 |
| 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 |
No regular expressions were active.
| 1 | use S508_A TL_Project s; --you r database here | |
| 2 | --mak e sure the nva schem a exists | |
| 3 | ||
| 4 | if object_ id('nva.St ations') i s not null drop tabl e nva.Stat ions; | |
| 5 | ||
| 6 | create tab le nva.Sta tions ( | |
| 7 | Sta3n i nt not nul l | |
| 8 | ,MedCtr varchar(60 ) not null | |
| 9 | ,Address varchar(1 30) null | |
| 10 | ,Server varchar(25 0) null | |
| 11 | ,DBase v archar(90) null | |
| 12 | ,DSchema varchar(2 0) null | |
| 13 | ,TPAOK v archar(3) not null | |
| 14 | ,TPAName varchar(3 0) null | |
| 15 | ,NVAPhon e varchar( 20) null | |
| 16 | ,FAXPhon e varchar( 20) null ) ; | |
| 17 | ||
| 18 | insert int o nva.Stat ions ( | |
| 19 | Sta3n | |
| 20 | ,MedCtr | |
| 21 | ,Address | |
| 22 | ,Server | |
| 23 | ,DBase | |
| 24 | ,DSchema | |
| 25 | ,TPAOK | |
| 26 | ,TPAName | |
| 27 | ,NVAPhon e | |
| 28 | ,FAXPhon e | |
| 29 | ) values | |
| 30 | (508,'Atl anta VA Me dical Cent er','1670 Clairmont Rd, Decatu r, GA 3003 3 (404) 32 1-6111' | |
| 31 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 32 | ,'S508 _ATL_Proje cts','nva' ,'Yes','He althnet',' 555-555-12 34','555-5 55-4321') | |
| 33 | ,(509,'Aug usta VA Me dical Cent er','' | |
| 34 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 35 | ,'S509 _AUG_Proje cts','nva' ,'Yes','He althnet',' ','') | |
| 36 | ,(521,'Bir mingham VA Medical C enter','' | |
| 37 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 38 | ,'S521 _BIR_Proje cts','nva' ,'Yes','He althnet',' ','') | |
| 39 | ,(534,'Cha rleston VA Medical C enter','' | |
| 40 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 41 | ,'S534 _CHA_Proje cts','nva' ,'Yes','He althnet',' ','') | |
| 42 | ,(544,'Col umbia VA M edical Cen ter','' | |
| 43 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 44 | ,'S544 _CMS_Proje cts','nva' ,'Yes','He althnet',' ','') | |
| 45 | ,(557,'Dub lin VA Med ical Cente r','' | |
| 46 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 47 | ,'S557 _DUB_Proje cts','nva' ,'Yes','He althnet',' ','') | |
| 48 | ,(619,'CAV HCS VA Med ical Cente r','' | |
| 49 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 50 | ,'S619 _CAV_Proje cts','nva' ,'Yes','He althnet',' ','') | |
| 51 | ,(679,'Tus calossa VA Medical C enter','' | |
| 52 | ,'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 53 | ,'S679 _TUA_Proje cts','nva' ,'Yes','He althnet',' ',''); | |
| 54 | ||
| 55 | --select * from nva. stations | |
| 56 | ||
| 57 | IF OBJECT_ ID('nva.Pu tStation', 'P') IS N OT NULL | |
| 58 | DROP P ROCEDURE n va.PutStat ion ; | |
| 59 | GO | |
| 60 | CREATE PRO CEDURE nva .PutStatio n | |
| 61 | @statio n int | |
| 62 | ,@MedCtr varchar(6 0) | |
| 63 | ,@Addres s varchar( 130) | |
| 64 | ,@Server varchar(2 50) | |
| 65 | ,@DBase varchar(90 ) | |
| 66 | ,@DSchem a varchar( 20) | |
| 67 | ,@TPAOK varchar(3) | |
| 68 | ,@TPANam e varchar( 30) | |
| 69 | ,@NVAPho ne varchar (20) | |
| 70 | ,@faxpho ne varchar (20) | |
| 71 | AS | |
| 72 | begin | |
| 73 | declare @c heckstatio n int; | |
| 74 | set @check station = (select to p 1 sta3n from nva.s tations wh ere sta3n= @station) | |
| 75 | if @check station is null -- t hen it doe sn't exist , let's ad d it | |
| 76 | begin | |
| 77 | insert i nto nva.st ations ( | |
| 78 | sta 3n | |
| 79 | ,MedCtr | |
| 80 | ,Address | |
| 81 | ,Server | |
| 82 | ,DBase | |
| 83 | ,DSchema | |
| 84 | ,TPAOK | |
| 85 | ,TPAName | |
| 86 | ,NVAPhone | |
| 87 | ,faxphone) | |
| 88 | va lues ( | |
| 89 | @st ation | |
| 90 | ,@MedCtr | |
| 91 | ,@Address | |
| 92 | ,@Server | |
| 93 | ,@DBase | |
| 94 | ,@DSchema | |
| 95 | ,@TPAOK | |
| 96 | ,@TPAName | |
| 97 | ,@NVAPhone | |
| 98 | ,@faxphone ); | |
| 99 | --also n eed to ins ert the st ructure fo r the lab linkages | |
| 100 | insert i nto nva.la bselection s (sta3n,c trlname) v alues | |
| 101 | (@ station,'H gb'), | |
| 102 | (@ station,'H ct'), | |
| 103 | (@ station,'W BC'), | |
| 104 | (@ station,'P lts'), | |
| 105 | (@ station,'I NR'), | |
| 106 | (@ station,'T chol'), | |
| 107 | (@ station,'H DL'), | |
| 108 | (@ station,'L DL'), | |
| 109 | (@ station,'T GA'), | |
| 110 | (@ station,'R A'), | |
| 111 | (@ station,'A NA'), | |
| 112 | (@ station,'N a'), | |
| 113 | (@ station,'K '), | |
| 114 | (@ station,'C l'), | |
| 115 | (@ station,'C O2'), | |
| 116 | (@ station,'B UN'), | |
| 117 | (@ station,'C r'), | |
| 118 | (@ station,'G lu'), | |
| 119 | (@ station,'A 1C'), | |
| 120 | (@ station,'A ST'), | |
| 121 | (@ station,'A LT'), | |
| 122 | (@ station,'T bili'); | |
| 123 | re turn 1; | |
| 124 | end | |
| 125 | else | |
| 126 | begin | |
| 127 | --stat ion alread y exists, need to up date | |
| 128 | up date nva.s tations se t | |
| 129 | MedCtr=@M edCtr | |
| 130 | ,Address=@ Address | |
| 131 | ,Server=@S erver | |
| 132 | ,DBase=@DB ase | |
| 133 | ,DSchema=@ DSchema | |
| 134 | ,TPAOK=@TP AOK | |
| 135 | ,TPAName=@ TPAName | |
| 136 | ,NVAPhone= @NVAPhone | |
| 137 | ,faxphone= @FaxPhone where sta3 n=@station ; | |
| 138 | end | |
| 139 | end | |
| 140 | go | |
| 141 | ||
| 142 | IF OBJECT_ ID('nva.Ge tStations' , 'P') IS NOT NULL | |
| 143 | DROP P ROCEDURE n va.GetStat ions ; | |
| 144 | GO | |
| 145 | CREATE PRO CEDURE nva .GetStatio ns | |
| 146 | ||
| 147 | AS | |
| 148 | BEGIN | |
| 149 | SE T NOCOUNT ON; | |
| 150 | SE LECT * fro m nva.Stat ions; | |
| 151 | END | |
| 152 | GO | |
| 153 | ||
| 154 | IF OBJECT_ ID('nva.Ge tStation', 'P') IS N OT NULL | |
| 155 | DROP P ROCEDURE n va.GetStat ion ; | |
| 156 | GO | |
| 157 | CREATE PR OCEDURE [n va].[GetSt ation] | |
| 158 | @s tation int --station to get in formation for | |
| 159 | ||
| 160 | AS | |
| 161 | BEGIN | |
| 162 | SE T NOCOUNT ON; | |
| 163 | SE LECT * fro m nva.Stat ions where Sta3n=@st ation; | |
| 164 | END | |
| 165 | go | |
| 166 | --To add a station, follow thi s example with your own data | |
| 167 | --this sho uld be don e using SQ L | |
| 168 | /* | |
| 169 | exec nva.P utStation | |
| 170 | @st ation= 000 | |
| 171 | ,@MedCtr = 'My Med C enter' | |
| 172 | ,@Address = '123 my street, Ci ty, State, ZipCode' | |
| 173 | ,@Server = 'Descript ion=DataWa rehouse;DR IVER=SQL S erver;SERV ER=
|
|
| 174 | ,@DBase = 'S000_My_D ataBase' | |
| 175 | ,@DSchema = 'nva' | |
| 176 | ,@TPAOK = 'YES' --ty pically th is is yes, otherwise no | |
| 177 | ,@TPAName = 'HealthN et' | |
| 178 | ,@NVAPhone = '800-55 5-1111' | |
| 179 | ,@faxphone ) = '800-5 55-2222'; | |
| 180 | */ | |
| 181 | ||
| 182 | ||
| 183 | if object_ id('nva.Do cTypes') i s not null drop tabl e nva.DocT ypes; | |
| 184 | go | |
| 185 | create tab le nva.Doc Types ( | |
| 186 | DocName varchar(3 5) not nul l | |
| 187 | ,DocType varchar(1 0) not nul l | |
| 188 | ,RadOrd varchar(3) not null | |
| 189 | ,Ndx int not null | |
| 190 | ); | |
| 191 | ||
| 192 | insert int o nva.DocT ypes ( | |
| 193 | DocName | |
| 194 | ,DocType | |
| 195 | ,RadOrd | |
| 196 | ,Ndx | |
| 197 | ) values | |
| 198 | ('Choice F irst','TPA ','No',1), | |
| 199 | ('Veterans Choice Li st','TPA', 'No',2), | |
| 200 | ('NVCC','N on-VA','No ',3), | |
| 201 | ('Radiolog y Order (C hoice)','T PA','Yes', 4), | |
| 202 | ('Radiolog y Order (N on-VA/Non- TPA)','Non -VA','Yes' ,5), | |
| 203 | ('PC3','TP A','No',6) ; | |
| 204 | ||
| 205 | IF OBJECT_ ID('nva.Ge tDocTypes' , 'P') IS NOT NULL | |
| 206 | DROP P ROCEDURE n va.GetDocT ypes ; | |
| 207 | GO | |
| 208 | CREATE PRO CEDURE nva .GetDocTyp es | |
| 209 | AS | |
| 210 | BEGIN | |
| 211 | SE T NOCOUNT ON; | |
| 212 | SE LECT * fro m nva.Doct ypes order by ndx; | |
| 213 | END | |
| 214 | GO | |
| 215 | ||
| 216 | if object_ id('nva.la bselection s') is not null drop table nva .labselect ions; | |
| 217 | ||
| 218 | create tab le nva.lab selections ( | |
| 219 | sta3n i nt not nul l -- this is t he station to which these code s apply | |
| 220 | ,testnam e varchar( 50) null - -this is t he local n ame for th e test | |
| 221 | ,ctrlnam e varchar( 20) not nu ll --this is the pro gram's nam e for the test, DO N OT CHANGE | |
| 222 | ,testsid varchar(2 0) null -- this is t he labchem SID for th is test in text form at | |
| 223 | ); | |
| 224 | ||
| 225 | ||
| 226 | --exec nva .GetLabSel ections @s tation=508 | |
| 227 | --Lab valu es for Atl anta | |
| 228 | --The stat ion number is import ant, of co urse, the second fie ld is the | |
| 229 | --Local na me for the test, tho ugh does n ot maatter for the p rogram to | |
| 230 | --function . The thir d field is critical, and must not be alt ered. That | |
| 231 | --is how t he program know what it is. Th e fourth f ield is th e database | |
| 232 | --SID that when comb ined with the Patien tSID ident ifies the test to be | |
| 233 | --resulted to produc e the valu e for this test. | |
| 234 | Insert int o nva.labs elections (sta3n,tes tname,ctrl name,tests id) values | |
| 235 | (508,'HGB' ,'Hgb','12 00002842') , | |
| 236 | (508,'HCT' ,'Hct','12 00002917') , | |
| 237 | (508,'WBC' ,'WBC','12 00002636') , | |
| 238 | (508,'PLT' ,'Plts','1 200002943' ), | |
| 239 | (508,'INR' ,'INR','12 00073837') , | |
| 240 | (508,'CHOL ESTEROL',' Tchol','12 00002729') , | |
| 241 | (508,'DIRE CT HDL','H DL','12000 79515'), | |
| 242 | (508,'LDL- CHOL(CALCU LATED)','L DL','12000 22770'), | |
| 243 | (508,'TRIG LYCERIDE', 'TGA','120 0002753'), | |
| 244 | (508,'RHEU MATOID FAC T 3752','R A','120010 9728'), | |
| 245 | (508,'ANA' ,'ANA','12 00002660') , | |
| 246 | (508,'SODI UM','Na',' 1200002721 '), | |
| 247 | (508,'POTA SSIUM','K' ,'12000027 22'), | |
| 248 | (508,'CHLO RIDE','Cl' ,'12000027 23'), | |
| 249 | (508,'CO2' ,'CO2','12 00002724') , | |
| 250 | (508,'UREA NITROGEN' ,'BUN','12 00002719') , | |
| 251 | (508,'CREA TININE','C r','120000 2718'), | |
| 252 | (508,'GLUC OSE','Glu' ,'12000027 20'), | |
| 253 | (508,'HGB A1C %','A1 C','120006 2855'), | |
| 254 | (508,'AST (SGOT)','A ST','12000 02737'), | |
| 255 | (508,'ALT (SGPT)','A LT','12000 02738'), | |
| 256 | (508,'TOT. BILIRUBIN ','Tbili', '120000273 2'); | |
| 257 | ||
| 258 | --Lab Valu es for Dub lin | |
| 259 | Insert int o nva.labs elections (sta3n,tes tname,ctrl name,tests id) values | |
| 260 | (557,'HGB' ,'Hgb','12 00007955') , | |
| 261 | (557,'HCT' ,'Hct','12 00008028') , | |
| 262 | (557,'WBC' ,'WBC','12 00007753') , | |
| 263 | (557,'PLT' ,'Plts','1 200008054' ), | |
| 264 | (557,'INR' ,'INR','12 00045480') , | |
| 265 | (557,'CHOL ESTEROL',' Tchol','12 00007844') , | |
| 266 | (557,'DIRE CT HDL','H DL','12000 69101'), | |
| 267 | (557,'LDL- CHOL(CALCU LATED)','L DL','12000 58678'), | |
| 268 | (557,'TRIG LYCERIDE', 'TGA','120 0035682'), | |
| 269 | (557,'RHEU MATOID FAC T 3752','R A','120000 7794'), | |
| 270 | (557,'ANA' ,'ANA','12 00036469') , | |
| 271 | (557,'SODI UM','Na',' 1200007836 '), | |
| 272 | (557,'POTA SSIUM','K' ,'12000078 37'), | |
| 273 | (557,'CHLO RIDE','Cl' ,'12000078 38'), | |
| 274 | (557,'CO2' ,'CO2','12 00007839') , | |
| 275 | (557,'UREA NITROGEN' ,'BUN','12 00007835') , | |
| 276 | (557,'CREA TININE','C r','120000 7834'), | |
| 277 | (557,'GLUC OSE','Glu' ,'12000001 11'), | |
| 278 | (557,'HGB A1C %','A1 C','120000 8057'), | |
| 279 | (557,'AST (SGOT)','A ST','12000 07852'), | |
| 280 | (557,'ALT (SGPT)','A LT','12000 07853'), | |
| 281 | (557,'TOT. BILIRUBIN ','Tbili', '120000784 7'); | |
| 282 | ||
| 283 | /****** Ob ject: Sto redProcedu re [nva].[ GetLabSele ctions] Script Da te: 9/29/2 015 4:45:2 8 PM ***** */ | |
| 284 | SET ANSI_N ULLS ON | |
| 285 | GO | |
| 286 | SET QUOTED _IDENTIFIE R ON | |
| 287 | GO | |
| 288 | IF OBJECT_ ID('nva.Ge tLabSelect ions', 'P' ) IS NOT N ULL | |
| 289 | DROP P ROCEDURE n va.GetLabS elections ; | |
| 290 | GO | |
| 291 | Create PRO CEDURE [nv a].[GetLab Selections ] | |
| 292 | @statio n int | |
| 293 | AS | |
| 294 | BEGIN | |
| 295 | SE T NOCOUNT ON; | |
| 296 | select testname, ctrlname, testsid f rom nva.la bselection s where st a3n=@stati on ; | |
| 297 | END | |
| 298 | go | |
| 299 | ||
| 300 | if object_ id('nva.HI PAATerms') is not nu ll drop ta ble nva.HI PAATerms; | |
| 301 | ||
| 302 | create tab le nva.HIP AATerms ( | |
| 303 | term va rchar(35) not null | |
| 304 | ); | |
| 305 | ||
| 306 | insert int o nva.HIPA ATerms ( | |
| 307 | term) va lues | |
| 308 | ('hiv') | |
| 309 | ,('sickle' ) | |
| 310 | ,('drug') | |
| 311 | ,('abuse') | |
| 312 | ,('cocaine ') | |
| 313 | ,('alcohol ') | |
| 314 | ,('etoh') | |
| 315 | ,('immunod eficiency' ) | |
| 316 | ,('heroin' ) | |
| 317 | ,('cannabi s') | |
| 318 | ,('thc') | |
| 319 | ,('ampheta mine') | |
| 320 | ,('methamp hetamine') | |
| 321 | ,('disulfi ram') | |
| 322 | ,('antabus e') | |
| 323 | ,('hgbss') | |
| 324 | ,('kaposi' ); | |
| 325 | ||
| 326 | IF OBJECT_ ID('nva.Ad dHIPAATerm ', 'P') IS NOT NULL | |
| 327 | DROP P ROCEDURE n va.AddHIPA ATerm ; | |
| 328 | GO | |
| 329 | CREATE PRO CEDURE nva .AddHIPAAT erm | |
| 330 | @newter m varchar( 35) | |
| 331 | AS | |
| 332 | BEGIN | |
| 333 | SE T NOCOUNT ON; | |
| 334 | se lect term into #t1 f rom nva.HI PAATerms w here term like @newt erm; | |
| 335 | ||
| 336 | de clare @cnt int; | |
| 337 | se t @cnt = ( select cou nt(*) from #t1); | |
| 338 | if @cnt=0 | |
| 339 | begin | |
| 340 | insert i nto nva.HI PAATerms ( | |
| 341 | term) va lues (@new term); | |
| 342 | end; | |
| 343 | re turn 0; | |
| 344 | END | |
| 345 | GO | |
| 346 | ||
| 347 | --exec nva .AddHIPAAT erm @newte rm='crack' ; | |
| 348 | ||
| 349 | IF OBJECT_ ID('nva.De leteHIPAAT erm', 'P') IS NOT NU LL | |
| 350 | DROP P ROCEDURE n va.DeleteH IPAATerm ; | |
| 351 | GO | |
| 352 | CREATE PRO CEDURE nva .DeleteHIP AATerm | |
| 353 | @badter m varchar( 35) | |
| 354 | AS | |
| 355 | BEGIN | |
| 356 | SE T NOCOUNT ON; | |
| 357 | de lete from nva.HIPAAT erms where term like @badterm; | |
| 358 | re turn 0; | |
| 359 | END | |
| 360 | GO | |
| 361 | ||
| 362 | IF OBJECT_ ID('nva.Ge tHIPAATerm s', 'P') I S NOT NULL | |
| 363 | DROP P ROCEDURE n va.GetHIPA ATerms ; | |
| 364 | GO | |
| 365 | CREATE PRO CEDURE nva .GetHIPAAT erms | |
| 366 | ||
| 367 | AS | |
| 368 | BEGIN | |
| 369 | SE T NOCOUNT ON; | |
| 370 | se lect * fro m nva.HIPA ATerms; | |
| 371 | re turn 0; | |
| 372 | END | |
| 373 | GO | |
| 374 | ||
| 375 | --exec nva .GetHIPAAT erms; | |
| 376 | ||
| 377 | ||
| 378 | if object_ id('nva.NV ASettings' ) is not n ull drop t able nva.N VASettings ; | |
| 379 | go | |
| 380 | create tab le nva.NVA Settings ( | |
| 381 | usr var char(25) n ot null -- userID to whom this parameter applied | |
| 382 | ,sta3n i nt null--s tation if applicable | |
| 383 | ,parm va rchar(25) not null - -name of s etting | |
| 384 | ,pvalue varchar(20 00) not nu ll --param eter value | |
| 385 | ); | |
| 386 | go | |
| 387 | ||
| 388 | IF OBJECT_ ID('nva.Pa rm', 'P') IS NOT NUL L | |
| 389 | DROP P ROCEDURE n va.Parm ; | |
| 390 | GO | |
| 391 | CREATE PR OCEDURE [n va].[parm] | |
| 392 | @s tation int --station to get in formation for, used primarily for global s | |
| 393 | ,@parmn ame varcha r(25) --Name of setting (p arameter) | |
| 394 | ,@parmv alue varch ar(2000) --Always p rovide a d efault val ue, if the parameter does not | |
| 395 | --exist, t his value will be us ed to crea te the par ameter | |
| 396 | ,@putge t varchar( 3) -- 'Get ' to get a parameter , 'Put' to store a p arameter | |
| 397 | ,@globa l varchar( 3) -- 'Yes ' if don't care abou t user or station, | |
| 398 | -- 'Stn ' if only care about station, 'No' if us er specifi c | |
| 399 | AS | |
| 400 | BEGIN | |
| 401 | declare @r esult as v archar(100 0); | |
| 402 | set @resul t = @parmv alue; | |
| 403 | SE T NOCOUNT ON; | |
| 404 | if @pu tget like 'PUT' | |
| 405 | begin | |
| 406 | if @global like 'No' | |
| 407 | be gin | |
| 408 | UPDATE nva .NVASettin gs set | |
| 409 | pv alue=@parm value wher e usr like CURRENT_U SER and st a3n=@stati on and par m=@parmnam e; | |
| 410 | if @@rowcoun t =0 | |
| 411 | begin | |
| 412 | insert into nva. NVASetting s (usr,sta 3n,parm,pv alue) valu es | |
| 413 | (cu rrent_user , @station ,@parmname ,@parmvalu e); | |
| 414 | end | |
| 415 | end | |
| 416 | else if @g lobal like 'Stn' | |
| 417 | be gin | |
| 418 | UPDATE nva .NVASettin gs set | |
| 419 | u sr=CURRENT _USER | |
| 420 | ,p value=@par mvalue whe re sta3n=@ station an d parm=@pa rmname | |
| 421 | if @@rowcoun t =0 | |
| 422 | begin | |
| 423 | insert into nva. NVASetting s (usr,sta 3n,parm,pv alue) valu es | |
| 424 | (cu rrent_user , @station ,@parmname ,@parmvalu e); | |
| 425 | end | |
| 426 | en d | |
| 427 | ||
| 428 | else | |
| 429 | begin | |
| 430 | UPDATE nva .NVASettin gs set | |
| 431 | u sr=CURRENT _USER | |
| 432 | ,s ta3n=@stat ion | |
| 433 | ,p value=@par mvalue whe re parm=@p armname | |
| 434 | if @@rowco unt =0 | |
| 435 | begin | |
| 436 | insert into nva. NVASetting s (usr,sta 3n,parm,pv alue) valu es | |
| 437 | (cu rrent_user , @station ,@parmname ,@parmvalu e); | |
| 438 | end | |
| 439 | end | |
| 440 | end | |
| 441 | el se --putge t is not ' put' so mu st be get | |
| 442 | begi n | |
| 443 | if @glob al like 'N o' | |
| 444 | begi n | |
| 445 | set @res ult = (sel ect top 1 pvalue fro m nva.NVAS ettings wh ere parm l ike @parmn ame | |
| 446 | and usr l ike CURREN T_USER and Sta3n = @ station); | |
| 447 | if @result is null | |
| 448 | begin | |
| 449 | set @r esult = @p armvalue; | |
| 450 | inse rt into nv a.NVASetti ngs (usr,s ta3n,parm, pvalue) va lues | |
| 451 | (cu rrent_user , @station ,@parmname ,@parmvalu e); | |
| 452 | end | |
| 453 | end | |
| 454 | else if @globa l like 'St n' | |
| 455 | be gin | |
| 456 | se t @result = (select top 1 pval ue from nv a.NVASetti ngs where parm like @parmname | |
| 457 | and Sta3n = @statio n); | |
| 458 | if @result is null | |
| 459 | begin | |
| 460 | set @r esult = @p armvalue; | |
| 461 | inse rt into nv a.NVASetti ngs (usr,s ta3n,parm, pvalue) va lues | |
| 462 | (cu rrent_user , @station ,@parmname ,@parmvalu e); | |
| 463 | end | |
| 464 | end | |
| 465 | else | |
| 466 | be gin | |
| 467 | se t @result = (select top 1 pval ue from nv a.NVASetti ngs where parm like @parmname) ; | |
| 468 | if @result is null | |
| 469 | begin | |
| 470 | set @r esult = @p armvalue; | |
| 471 | inse rt into nv a.NVASetti ngs (usr,s ta3n,parm, pvalue) va lues | |
| 472 | (cu rrent_user , @station ,@parmname ,@parmvalu e); | |
| 473 | end | |
| 474 | e nd | |
| 475 | en d | |
| 476 | select @re sult as pa rameterval ue; | |
| 477 | --exec nva .parm @sta tion=508,@ parmvalue= '666',@par mname='par m2',@putge t='PUT',@g lobal='No' | |
| 478 | end | |
| 479 | go | |
| 480 | ||
| 481 | ||
| 482 | if object_ id('nva.Se nsitiveDxC odes') is not null d rop table nva.Sensit iveDxCodes ; | |
| 483 | ||
| 484 | create tab le nva.Sen sitiveDxCo des ( | |
| 485 | CodingS ystem varc har(12) no t null | |
| 486 | ,Code va rchar(12) not null | |
| 487 | ,Diagnos isText var char(250) not null | |
| 488 | ,AbuseDx int | |
| 489 | ,SickleD x int | |
| 490 | ,HIVDx i nt ); | |
| 491 | ||
| 492 | IF OBJECT_ ID('nva.Ge tSensDxCod es', 'P') IS NOT NUL L | |
| 493 | DROP P ROCEDURE n va.GetSens DxCodes; | |
| 494 | GO | |
| 495 | create PRO CEDURE [nv a].[GetSen sDxCodes] | |
| 496 | -- Add the p arameters for the st ored proce dure here | |
| 497 | -- | |
| 498 | AS | |
| 499 | BEGIN | |
| 500 | --This pro cedure get s the sens itive diag nosis code list. It is not sta tion speci fic | |
| 501 | -- SET NOCOU NT ON adde d to preve nt extra r esult sets from | |
| 502 | -- interferi ng with SE LECT state ments. | |
| 503 | SE T NOCOUNT ON; | |
| 504 | SELECT [Co dingSystem ] | |
| 505 | ,[Co de] | |
| 506 | ,[Di agnosisTex t] | |
| 507 | ,[Ab useDx] | |
| 508 | ,[Si ckleDx] | |
| 509 | ,[HI VDx] | |
| 510 | FROM [nv a].[Sensit iveDxCodes ]; | |
| 511 | end; | |
| 512 | go | |
| 513 | ||
| 514 | insert int o nva.Sens itiveDxCod es ( | |
| 515 | CodingS ystem | |
| 516 | ,Code | |
| 517 | ,Diagnos isText | |
| 518 | ,AbuseDx | |
| 519 | ,SickleD x | |
| 520 | ,HIVDx) values ('I CD9','282. 42','THLAS SEMIA HB-S W CRISIS' ,0,1,0), | |
| 521 | ('ICD9','2 82.59','SI CKLE-CELL TRAIT, OTH ER',0,1,0) , | |
| 522 | ('ICD9','2 82.64','HB -S/HB-C DI S W CRISIS ',0,1,0), | |
| 523 | ('ICD9','2 82.68','HB -S DIS W/O CRISIS NE C',0,1,0), | |
| 524 | ('ICD9','V 78.2','SCR EEN-SICKLE CELL DIS' ,0,0,1), | |
| 525 | ('ICD9','0 43.2','HIV CAUSE OTH IMMUNE DI S',0,0,1), | |
| 526 | ('ICD9','0 42.1','HIV CAUSING O THER SPEC INF',0,0,1 ), | |
| 527 | ('ICD9','1 76.8','KAP OSI''S SAR COMA, OTHE R SITES',0 ,0,1), | |
| 528 | ('ICD9','7 95.8','POS ITIVE SERO /VIRAL HIV ',0,0,1), | |
| 529 | ('ICD9','1 76.2','KAP OSI''S SAR COMA, PALA TE',0,0,1) , | |
| 530 | ('ICD9','0 42.2','HIV WITH SPEC MALIGNANT NEO',0,0, 1), | |
| 531 | ('ICD9','1 76.9','KAP OSI''S SAR COMA, NOS' ,0,0,1), | |
| 532 | ('ICD9','0 43.9','HIV -ARC, UNSP ECIFIED',0 ,0,1), | |
| 533 | ('ICD9','0 42.0','HIV WITH SPEC IFIED INFE CTIONS',0, 0,1), | |
| 534 | ('ICD9','1 76.4','KAP OSI''S SAR COMA, LUNG ',0,0,1), | |
| 535 | ('ICD9','0 44.9','HIV INFECTION UNSPECIFI ED',0,0,1) , | |
| 536 | ('ICD9','1 76.3','KAP OSI''S SAR COMA, GI S ITES',0,0, 1), | |
| 537 | ('ICD9','1 76.5','KAP OSI''S SAR COMA, LYMP H NODES',0 ,0,1), | |
| 538 | ('ICD9','0 42.9','HIV -AIDS UNSP ECIFIED',0 ,0,1), | |
| 539 | ('ICD9','0 43.3','HIV CAUSE OTH ER SPEC DI SORDERS',0 ,0,1), | |
| 540 | ('ICD9','1 76.1','KAP OSI''S SAR COMA, SOFT TISSUE',0 ,0,1), | |
| 541 | ('ICD9','0 43.1','HIV CAUSING S PEC DISEAS E-CNS',0,0 ,1), | |
| 542 | ('ICD9','1 76.0','KAP OSI''S SAR COMA, SKIN ',0,0,1), | |
| 543 | ('ICD9','7 95.71','NO NSPEC SERO L EVID OF HIV',0,0,1 ), | |
| 544 | ('ICD9','0 79.53','HI V 2',0,0,1 ), | |
| 545 | ('ICD9','0 79.51','HT LV-I',0,0, 1), | |
| 546 | ('ICD9','0 79.59','OT HER SPEC R ETROVIRUS' ,0,0,1), | |
| 547 | ('ICD9','0 79.52','HT LV-II',0,0 ,1), | |
| 548 | ('ICD9','0 42.','HIV DISEASE',0 ,0,1), | |
| 549 | ('ICD9','V 08.','ASYM PT HIV STA TUS',0,0,1 ), | |
| 550 | ('ICD9','V 65.44','HI V COUNSELI NG',0,0,1) , | |
| 551 | ('ICD9','2 91.1','ALC OHOL AMNES TIC DISORD R',1,0,0), | |
| 552 | ('ICD9','2 91.2','ALC OHOL PERSI ST DEMENTI A',1,0,0), | |
| 553 | ('ICD9','2 91.3','ALC OH PSY DIS W HALLUCI N',1,0,0), | |
| 554 | ('ICD9','2 91.4','PAT HOLOGIC AL COHOL INTO X',1,0,0), | |
| 555 | ('ICD9','2 91.5','ALC OH PSYCH D IS W DELUS ',1,0,0), | |
| 556 | ('ICD9','2 91.8','ALC OHOLIC PSY CHOSIS NEC ',1,0,0), | |
| 557 | ('ICD9','2 91.9','ALC OHOL MENTA L DISOR NO S',1,0,0), | |
| 558 | ('ICD9','2 92.84','DR UG-INDUCED MOOD DISO RD',1,0,0) , | |
| 559 | ('ICD9','3 04.41','AM PHETAMINE DEPENDENCE CONT',1,0 ,0), | |
| 560 | ('ICD9','3 04.13','SE D,HYP,ANXI OLYT DEP-R EM',1,0,0) , | |
| 561 | ('ICD9','3 05.02','AL COHOL ABUS E-EPISODIC ',1,0,0), | |
| 562 | ('ICD9','3 03.01','AC ALCOHOL I NTOX-CONTI N',1,0,0), | |
| 563 | ('ICD9','3 04.72','OP IOID+OTHER DEP-EPISO D',1,0,0), | |
| 564 | ('ICD9','3 05.23','CA NNABIS ABU SE-IN REMI SS',1,0,0) , | |
| 565 | ('ICD9','3 05.52','OP IOID ABUSE EPISODIC' ,1,0,0), | |
| 566 | ('ICD9','3 04.51','HA LLUCINOGEN DEPENDENC E CONT',1, 0,0), | |
| 567 | ('ICD9','3 04.93','DR UG DEPEND NOS-REMISS ',1,0,0), | |
| 568 | ('ICD9','3 04.63','DR UG DEPEND OTH-IN REM ',1,0,0), | |
| 569 | ('ICD9','3 05.32','HA LLUCINOG A BUSE-EPISO D',1,0,0), | |
| 570 | ('ICD9','3 57.5','ALC OHOLIC POL YNEUROPATH Y',1,0,0), | |
| 571 | ('ICD9','3 04.03','OP IOID DEPEN DENCE IN R EMISSION', 1,0,0), | |
| 572 | ('ICD9','3 05.72','AM PHETAMINE ABUSE-EPIS ODIC',1,0, 0), | |
| 573 | ('ICD9','3 05.82','AN TIDEPRESS ABUSE-EPIS OD',1,0,0) , | |
| 574 | ('ICD9','3 04.81','CO MB DRUG DE P NEC-CONT IN',1,0,0) , | |
| 575 | ('ICD9','3 05.21','CA NNABIS ABU SE-CONTIN' ,1,0,0), | |
| 576 | ('ICD9','3 05.62','CO CAINE ABUS E-EPISODIC ',1,0,0), | |
| 577 | ('ICD9','3 05.81','AN TIDEPRESS ABUSE-CONT IN',1,0,0) , | |
| 578 | ('ICD9','3 04.02','OP IOID DEPEN DENCE EPIS ODIC',1,0, 0), | |
| 579 | ('ICD9','3 04.73','OP IOID+OTHER DEP-REMIS S',1,0,0), | |
| 580 | ('ICD9','3 05.31','HA LLUCINOG A BUSE-CONTI N',1,0,0), | |
| 581 | ('ICD9','3 05.71','AM PHETAMINE ABUSE-CONT INUOUS',1, 0,0), | |
| 582 | ('ICD9','3 05.33','HA LLUCINOG A BUSE-REMIS S',1,0,0), | |
| 583 | ('ICD9','3 04.53','HA LLUCINOGEN DEPENDENC E IN REM', 1,0,0), | |
| 584 | ('ICD9','3 05.91','OT HER DRUG A BUSE-CONTI N',1,0,0), | |
| 585 | ('ICD9','3 04.32','CA NNABIS DEP ENDENCE EP ISODIC',1, 0,0), | |
| 586 | ('ICD9','3 05.43','SE D,HYP,ANXI OLYTC AB-R EM',1,0,0) , | |
| 587 | ('ICD9','3 04.52','HA LLUCINOGEN DEPENDENC E EPISOD', 1,0,0), | |
| 588 | ('ICD9','3 04.31','CA NNABIS DEP ENDENCE CO NTINUOUS', 1,0,0), | |
| 589 | ('ICD9','3 05.73','AM PHETAMINE ABUSE-REMI SS',1,0,0) , | |
| 590 | ('ICD9','3 03.92','AL COH DEP NE C/NOS-EPIS OD',1,0,0) , | |
| 591 | ('ICD9','3 05.83','AN TIDEPRESS ABUSE-REMI SS',1,0,0) , | |
| 592 | ('ICD9','3 04.11','SE D,HYP,ANXI OLYT DEP-C ON',1,0,0) , | |
| 593 | ('ICD9','3 05.93','OT HER DRUG A BUSE-REMIS S',1,0,0), | |
| 594 | ('ICD9','3 05.41','SE D,HYP,ANXI OLYTC AB-C ON',1,0,0) , | |
| 595 | ('ICD9','3 03.03','AC ALCOHOL I NTOX-REMIS S',1,0,0), | |
| 596 | ('ICD9','3 05.53','OP IOID ABUSE IN REMISS ION',1,0,0 ), | |
| 597 | ('ICD9','3 04.43','AM PHETAMINE DEPENDENCE IN REM',1 ,0,0), | |
| 598 | ('ICD9','3 04.83','CO MB DRUG DE P NEC-REMI SS',1,0,0) , | |
| 599 | ('ICD9','3 05.12','TO BACCO ABUS E-EPISODIC ',1,0,0), | |
| 600 | ('ICD9','3 04.22','CO CAINE DEPE ND-EPISODI C',1,0,0), | |
| 601 | ('ICD9','3 03.02','AC ALCOHOL I NTOX-EPISO D',1,0,0), | |
| 602 | ('ICD9','3 04.62','DR UG DEPEND OTH-EPISOD IC',1,0,0) , | |
| 603 | ('ICD9','3 05.22','CA NNABIS ABU SE-EPISODI C',1,0,0), | |
| 604 | ('ICD9','3 04.12','SE D,HYP,ANXI OLYT DEP-E PI',1,0,0) , | |
| 605 | ('ICD9','3 04.71','OP IOID+OTHER DEP-CONTI N',1,0,0), | |
| 606 | ('ICD9','3 04.01','OP IOID DEPEN DENCE CONT ',1,0,0), | |
| 607 | ('ICD9','3 05.51','OP IOID ABUSE CONTINUOU S',1,0,0), | |
| 608 | ('ICD9','3 05.92','OT HER DRUG A BUSE-EPISO D',1,0,0), | |
| 609 | ('ICD9','3 04.42','AM PHETAMINE DEPENDENCE EPISOD',1 ,0,0), | |
| 610 | ('ICD9','3 03.91','AL COH DEP NE C/NOS-CONT IN',1,0,0) , | |
| 611 | ('ICD9','3 04.21','CO CAINE DEPE ND-CONTIN' ,1,0,0), | |
| 612 | ('ICD9','3 05.61','CO CAINE ABUS E-CONTINUO US',1,0,0) , | |
| 613 | ('ICD9','3 04.61','DR UG DEPEND OTH-CONTIN ',1,0,0), | |
| 614 | ('ICD9','3 04.39','OT HER CANNAB IS DEPEND, NEC',1,0, 0), | |
| 615 | ('ICD9','3 05.01','AL COHOL ABUS E-CONTINUO US',1,0,0) , | |
| 616 | ('ICD9','3 05.42','SE D,HYP,ANXI OLYTC AB-E PI',1,0,0) , | |
| 617 | ('ICD9','3 05.11','TO BACCO ABUS E-CONTINUO US',1,0,0) , | |
| 618 | ('ICD9','3 03.93','AL COH DEP NE C/NOS-REMI SS',1,0,0) , | |
| 619 | ('ICD9','3 04.23','CO CAINE DEPE ND-REMISS' ,1,0,0), | |
| 620 | ('ICD9','3 05.03','AL COHOL ABUS E-IN REMIS S',1,0,0), | |
| 621 | ('ICD9','3 04.92','DR UG DEPEND NOS-EPISOD IC',1,0,0) , | |
| 622 | ('ICD9','3 04.91','UN SPEC DRUG DEPEND CON TIN',1,0,0 ), | |
| 623 | ('ICD9','3 05.13','TO BACCO ABUS E-IN REMIS S',1,0,0), | |
| 624 | ('ICD9','3 05.63','CO CAINE ABUS E-IN REMIS S',1,0,0), | |
| 625 | ('ICD9','3 04.50','HA LLUCINOGEN DEPENDENC E UNSPEC', 1,0,0), | |
| 626 | ('ICD9','3 05.80','AN TIDEPRESS ABUSE-UNSP EC',1,0,0) , | |
| 627 | ('ICD9','3 04.80','CO MB DRUG DE P NEC-UNSP EC',1,0,0) , | |
| 628 | ('ICD9','3 05.00','AL COHOL ABUS E-UNSPEC', 1,0,0), | |
| 629 | ('ICD9','3 04.10','SE D,HYP,ANXI OLYT DEP-N OS',1,0,0) , | |
| 630 | ('ICD9','3 05.30','HA LLUCINOG A BUSE-UNSPE C',1,0,0), | |
| 631 | ('ICD9','3 05.90','OT HER DRUG A BUSE-UNSPE C',1,0,0), | |
| 632 | ('ICD9','3 05.70','AM PHETAMINE ABUSE-UNSP ECIFIED',1 ,0,0), | |
| 633 | ('ICD9','3 04.00','OP IOID DEPEN DENCE UNSP ECIFIED',1 ,0,0), | |
| 634 | ('ICD9','3 05.1','TOB ACCO USE D ISORDER',1 ,0,0), | |
| 635 | ('ICD9','3 05.6','COC AINE ABUSE -UNSPEC',1 ,0,0), | |
| 636 | ('ICD9','3 04.30','CA NNABIS DEP ENDENCE UN SPEC',1,0, 0), | |
| 637 | ('ICD9','3 04.40','AM PHETAMINE DEPENDENCE UNSPEC',1 ,0,0), | |
| 638 | ('ICD9','3 04.20','CO CAINE DEPE ND-UNSPEC' ,1,0,0), | |
| 639 | ('ICD9','2 91.0','DEL IRIUM TREM ENS',1,0,0 ), | |
| 640 | ('ICD9','3 05.40','SE D,HYP,ANXI OLYTC AB-N OS',1,0,0) , | |
| 641 | ('ICD9','3 04.60','DR UG DEPEND OTH-UNSPEC ',1,0,0), | |
| 642 | ('ICD9','3 03.90','AL COH DEP NE C/NOS-UNSP EC',1,0,0) , | |
| 643 | ('ICD9','3 04.70','OP IOID+OTHER DEP-UNSPE C',1,0,0), | |
| 644 | ('ICD9','3 03.00','AC ALCOHOL I NTOX-UNSPE C',1,0,0), | |
| 645 | ('ICD9','3 05.20','CA NNABIS ABU SE UNSPECI FIED',1,0, 0), | |
| 646 | ('ICD9','3 04.90','UN SPEC DRUG DEPEND NEC UNSPEC',1 ,0,0), | |
| 647 | ('ICD9','3 05.50','OP IOID ABUSE UNSPECIFI ED',1,0,0) , | |
| 648 | ('ICD9','V 11.3','HX OF ALCOHOL ISM',1,0,0 ), | |
| 649 | ('ICD9','3 04.122','M EPROBAMATE DEPENDENC E EPISODI' ,1,0,0), | |
| 650 | ('ICD9','3 04.49','OT HER PSYCHO STIM DEPEN D',1,0,0), | |
| 651 | ('ICD9','3 05.502','M ORPHINE AB USE UNSPEC IFIED',1,0 ,0), | |
| 652 | ('ICD9','3 05.428','B ARBITURATE S ABUSE EP ISODIC',1, 0,0), | |
| 653 | ('ICD9','3 05.329','O THER HALLU CINOGEN AB USE EPISO' ,1,0,0), | |
| 654 | ('ICD9','3 05.408','B ARBITURATE S ABUSE UN SPECIFIED' ,1,0,0), | |
| 655 | ('ICD9','3 05.511','M ETHADONE A BUSE CONTI NUOUS',1,0 ,0), | |
| 656 | ('ICD9','3 05.929','O THER MIXED /UNSPEC DR UG ABUSE', 1,0,0), | |
| 657 | ('ICD9','3 05.709','O THER RELAT ED ACTING SYMPATHOM' ,1,0,0), | |
| 658 | ('ICD9','3 05.422','M EPROBAMATE ABUSE EPI SODIC',1,0 ,0), | |
| 659 | ('ICD9','3 04.129','O THER SEDAT IVE OR HYP NOTIC DEP' ,1,0,0), | |
| 660 | ('ICD9','3 05.46','VA LIUM, DIAZ EPAM ABUSE ',1,0,0), | |
| 661 | ('ICD9','3 05.423','N OLUDAR MET HYPRYLOME ABUSE EPI' ,1,0,0), | |
| 662 | ('ICD9','3 05.523','O PIUM ABUSE EPISODIC' ,1,0,0), | |
| 663 | ('ICD9','3 04.421','P RELUDIN DE PENDENCE E PISODIC',1 ,0,0), | |
| 664 | ('ICD9','3 04.33','CA NNABIS DEP ENDENCE IN REMISS',1 ,0,0), | |
| 665 | ('ICD9','3 05.79','OT HER SYMPAT HOMIMETIC, NEC',1,0, 0), | |
| 666 | ('ICD9','3 05.417','D ORIDEN GLU TETHIMIDE ABUSE CON' ,1,0,0), | |
| 667 | ('ICD9','3 05.519','O THER OPIOD ABUSE NEC CONTINUO' ,1,0,0), | |
| 668 | ('ICD9','3 04.539','O THER HALLU CINOGEN DE PENDENCE', 1,0,0), | |
| 669 | ('ICD9','3 05.701','P RELUDIN AB USE UNSPEC IFIED',1,0 ,0), | |
| 670 | ('ICD9','3 05.239','O THER CANNA BIS ABUSE IN REMISS' ,1,0,0), | |
| 671 | ('ICD9','3 04.104','P ARALDEHYDE DEPENDENC E UNSPECI' ,1,0,0), | |
| 672 | ('ICD9','3 04.919','U NSPECIFIED DRUG DEPE NDENCE NE' ,1,0,0), | |
| 673 | ('ICD9','3 05.731','P RELUDIN AB USE IN REM ISSION',1, 0,0), | |
| 674 | ('ICD9','3 04.411','P RELUDIN DE PENDENCE C ONTINUOUS' ,1,0,0), | |
| 675 | ('ICD9','3 04.15','PL ACIDYL, ET HCHLORUYNO L DEPEND', 1,0,0), | |
| 676 | ('ICD9','2 91.21','DE MENTIA ASS OC W/ETOH, MILD',1,0 ,0), | |
| 677 | ('ICD9','3 04.137','D ORIDEN GLU TETHIMIDE DEPENDENC' ,1,0,0), | |
| 678 | ('ICD9','3 04.109','O THER SEDAT IVE OR HYP NOTIC DEP' ,1,0,0), | |
| 679 | ('ICD9','3 05.436','V ALIUM DIAZ EPAM ABUSE IN REMIS' ,1,0,0), | |
| 680 | ('ICD9','3 04.401','P RELUDIN DE PENDENCE U NSPECIFIE' ,1,0,0), | |
| 681 | ('ICD9','3 04.132','M EPROBAMATE DEPENDENC E IN REMI' ,1,0,0), | |
| 682 | ('ICD9','3 05.405','P LACIDYL ET HCHLORUYNO L ABUSE U' ,1,0,0), | |
| 683 | ('ICD9','2 91.20','DE MENTIA ASS OC W/ETOH, UNSPEC',1 ,0,0), | |
| 684 | ('ICD9','3 05.439','O THER SEDAT IVE OR HYP NOTIC ABU' ,1,0,0), | |
| 685 | ('ICD9','3 04.126','V ALIUM DIAZ EPAM DEPEN DENCE EPI' ,1,0,0), | |
| 686 | ('ICD9','3 05.229','O THER CANNA BIS ABUSE EPISODIC', 1,0,0), | |
| 687 | ('ICD9','3 04.14','PA RALDEHYDE DEPENDENCE ',1,0,0), | |
| 688 | ('ICD9','3 05.59','OT HER OPIOID ABUSE, NE C',1,0,0), | |
| 689 | ('ICD9','3 04.309','O THER CANNA BIS DEPEND ENCE UNSP' ,1,0,0), | |
| 690 | ('ICD9','3 04.113','N OLUDAR MET HYPRYLOME DEPENDENC' ,1,0,0), | |
| 691 | ('ICD9','3 05.719','O THER RELAT ED ACTING SYMPATHOM' ,1,0,0), | |
| 692 | ('ICD9','3 04.127','D ORIDEN GLU TETHIMIDE DEPENDENC' ,1,0,0), | |
| 693 | ('ICD9','3 05.412','M EPROBAMATE ABUSE CON TINUOUS',1 ,0,0), | |
| 694 | ('ICD9','3 05.939','O THER MIXED /UNSPEC DR UG ABUSE', 1,0,0), | |
| 695 | ('ICD9','3 05.531','M ETHADONE A BUSE IN RE MISSION',1 ,0,0), | |
| 696 | ('ICD9','3 04.18','BA RBITURATE DEPENDENCE ',1,0,0), | |
| 697 | ('ICD9','3 04.09','OT HER OPIOID TYPE DEPE N, NEC',1, 0,0), | |
| 698 | ('ICD9','3 04.106','V ALIUM DIAZ EPAM DEPEN DENCE UNS' ,1,0,0), | |
| 699 | ('ICD9','3 04.431','P RELUDIN DE PENDENCE I N REMISSI' ,1,0,0), | |
| 700 | ('ICD9','3 04.929','U NSPECIFIED DRUG DEPE NDENCE NE' ,1,0,0), | |
| 701 | ('ICD9','3 05.418','B ARBITURATE S ABUSE CO NTINUOUS', 1,0,0), | |
| 702 | ('ICD9','3 04.409','O THER PSYCH OSTIMULANT DEPENDEN' ,1,0,0), | |
| 703 | ('ICD9','3 04.133','N OLUDAR MET HYPRYLOME DEPENDENC' ,1,0,0), | |
| 704 | ('ICD9','3 05.432','M EPROBAMATE ABUSE IN REMISSION' ,1,0,0), | |
| 705 | ('ICD9','2 91.23','DE MENTIA ASS OC W/ETOH SEVERE',1, 0,0), | |
| 706 | ('ICD9','3 04.339','O THER CANNA BIS DEPEND ENCE IN R' ,1,0,0), | |
| 707 | ('ICD9','3 05.522','M ORPHINE AB USE EPISOD IC',1,0,0) , | |
| 708 | ('ICD9','3 04.429','O THER PSYCH OSTIMULANT DEPENDEN' ,1,0,0), | |
| 709 | ('ICD9','3 05.404','P ARALDEHYDE ABUSE UNS PECIFIED', 1,0,0), | |
| 710 | ('ICD9','3 04.135','P LACIDYL ET HCHLORUYNO L DEPENDE' ,1,0,0), | |
| 711 | ('ICD9','3 04.19','OT HER SEDATI VE OR HYPN OTIC',1,0, 0), | |
| 712 | ('ICD9','3 04.105','P LACIDYL ET HCHLORUYNO L DEPENDE' ,1,0,0), | |
| 713 | ('ICD9','3 04.021','M ETHADONE D EPENDENCE EPISODIC', 1,0,0), | |
| 714 | ('ICD9','3 05.402','M EPROBAMATE ABUSE UNS PECIFIED', 1,0,0), | |
| 715 | ('ICD9','3 05.45','PL ACIDYL, ET HCHLORUYNO L ABUSE',1 ,0,0), | |
| 716 | ('ICD9','3 04.103','N OLUDAR MET HYPRYLOME DEPENDENC' ,1,0,0), | |
| 717 | ('ICD9','3 05.434','P ARALDEHYDE ABUSE IN REMISSION' ,1,0,0), | |
| 718 | ('ICD9','3 04.102','M EPROBAMATE DEPENDENC E UNSPECI' ,1,0,0), | |
| 719 | ('ICD9','3 04.115','P LACIDYL ET HCHLORUYNO L DEPENDE' ,1,0,0), | |
| 720 | ('ICD9','3 04.125','P LACIDYL ET HCHLORUYNO L DEPENDE' ,1,0,0), | |
| 721 | ('ICD9','3 05.431','L IBRIUM ABU SE IN REMI SSION',1,0 ,0), | |
| 722 | ('ICD9','3 04.002','M ORPHINE DE PENDENCE U NSPECIFIE' ,1,0,0), | |
| 723 | ('ICD9','3 04.033','O PIUM DEPEN DENCE IN R EMISSION', 1,0,0), | |
| 724 | ('ICD9','3 05.209','O THER CANNA BIS ABUSE UNSPECIFI' ,1,0,0), | |
| 725 | ('ICD9','3 05.437','D ORIDEN GLU TETHIMIDE ABUSE IN', 1,0,0), | |
| 726 | ('ICD9','3 04.011','M ETHADONE D EPENDENCE CONTINUOU' ,1,0,0), | |
| 727 | ('ICD9','3 04.112','M EPROBAMATE DEPENDENC E CONTINU' ,1,0,0), | |
| 728 | ('ICD9','3 04.118','B ARBITURATE S DEPENDEN CE CONTIN' ,1,0,0), | |
| 729 | ('ICD9','3 04.329','O THER CANNA BIS DEPEND ENCE EPIS' ,1,0,0), | |
| 730 | ('ICD9','3 04.032','M ORPHINE DE PENDENCE I N REMISSI' ,1,0,0), | |
| 731 | ('ICD9','3 05.421','L IBRIUM ABU SE EPISODI C',1,0,0), | |
| 732 | ('ICD9','3 05.401','L IBRIUM ABU SE UNSPECI FIED',1,0, 0), | |
| 733 | ('ICD9','3 04.124','P ARALDEHYDE DEPENDENC E EPISODI' ,1,0,0), | |
| 734 | ('ICD9','3 04.107','D ORIDEN GLU TETHIMIDE DEPENDENC' ,1,0,0), | |
| 735 | ('ICD9','3 04.131','L IBRIUM DEP ENDENCE IN REMISSIO' ,1,0,0), | |
| 736 | ('ICD9','3 04.138','B ARBITURATE S DEPENDEN CE IN REM' ,1,0,0), | |
| 737 | ('ICD9','3 05.429','O THER SEDAT IVE OR HYP NOTIC ABU' ,1,0,0), | |
| 738 | ('ICD9','3 05.435','P LACIDYL ET HCHLORUYNO L ABUSE I' ,1,0,0), | |
| 739 | ('ICD9','3 04.003','O PIUM DEPEN DENCE UNSP ECIFIED',1 ,0,0), | |
| 740 | ('ICD9','3 04.101','L IBRIUM DEP ENDENCE UN SPECIFIED' ,1,0,0), | |
| 741 | ('ICD9','3 04.16','VA LIUM, DIAZ EPAM DEPEN D',1,0,0), | |
| 742 | ('ICD9','3 05.406','V ALIUM DIAZ EPAM ABUSE UNSPECIF' ,1,0,0), | |
| 743 | ('ICD9','3 04.99','UN SPEC DRUG DEPEND, NE C',1,0,0), | |
| 744 | ('ICD9','3 04.108','B ARBITURATE S DEPENDEN CE UNSPEC' ,1,0,0), | |
| 745 | ('ICD9','3 05.219','O THER CANNA BIS ABUSE CONTINUOU' ,1,0,0), | |
| 746 | ('ICD9','3 05.438','B ARBITURATE S ABUSE IN REMISSIO' ,1,0,0), | |
| 747 | ('ICD9','3 04.031','M ETHADONE D EPENDENCE IN REMISS' ,1,0,0), | |
| 748 | ('ICD9','3 04.013','O PIUM DEPEN DENCE CONT INUOUS',1, 0,0), | |
| 749 | ('ICD9','3 04.134','P ARALDEHYDE DEPENDENC E IN REMI' ,1,0,0), | |
| 750 | ('ICD9','3 04.319','O THER CANNA BIS DEPEND ENCE CONT' ,1,0,0), | |
| 751 | ('ICD9','3 04.012','M ORPHINE DE PENDENCE C ONTINUOUS' ,1,0,0), | |
| 752 | ('ICD9','3 05.403','N OLUDAR MET HYPRYLOME ABUSE UNS' ,1,0,0), | |
| 753 | ('ICD9','3 05.29','OT HER CANNAB IS USE, NE C',1,0,0), | |
| 754 | ('ICD9','3 05.513','O PIUM ABUSE CONTINUOU S',1,0,0), | |
| 755 | ('ICD9','3 05.414','P ARALDEHYDE ABUSE CON TINUOUS',1 ,0,0), | |
| 756 | ('ICD9','3 04.509','O THER HALLU CINOGEN DE PENDENCE', 1,0,0), | |
| 757 | ('ICD9','3 05.427','D ORIDEN GLU TETHIMIDE ABUSE EPI' ,1,0,0), | |
| 758 | ('ICD9','3 05.309','O THER HALLU CINOGEN AB USE UNSPE' ,1,0,0), | |
| 759 | ('ICD9','3 04.029','O THER OPIOD DEPENDENC E EPISODI' ,1,0,0), | |
| 760 | ('ICD9','3 05.503','O PIUM ABUSE UNSPECIFI ED',1,0,0) , | |
| 761 | ('ICD9','3 05.47','DO RIDEN, GLU TETHIMIDE ABUSE',1,0 ,0), | |
| 762 | ('ICD9','3 05.407','D ORIDEN GLU TETHIMIDE ABUSE UNS' ,1,0,0), | |
| 763 | ('ICD9','3 05.919','O THER MIXED /UNSPEC DR UG ABUSE', 1,0,0), | |
| 764 | ('ICD9','3 05.509','O THER OPIOD ABUSE NEC UNSPECIF' ,1,0,0), | |
| 765 | ('ICD9','3 05.411','L IBRIUM ABU SE CONTINU OUS',1,0,0 ), | |
| 766 | ('ICD9','3 05.909','O THER MIXED /UNSPEC DR UG ABUSE', 1,0,0), | |
| 767 | ('ICD9','3 04.117','D ORIDEN GLU TETHIMIDE DEPENDENC' ,1,0,0), | |
| 768 | ('ICD9','3 05.711','P RELUDIN AB USE CONTIN UOUS',1,0, 0), | |
| 769 | ('ICD9','3 05.48','BA RBITURATES ABUSE',1, 0,0), | |
| 770 | ('ICD9','3 05.532','M ORPHINE AB USE IN REM ISSION',1, 0,0), | |
| 771 | ('ICD9','3 05.426','V ALIUM DIAZ EPAM ABUSE EPISODIC' ,1,0,0), | |
| 772 | ('ICD9','3 04.419','O THER PSYCH OSTIMULANT DEPENDEN' ,1,0,0), | |
| 773 | ('ICD9','3 04.121','L IBRIUM DEP ENDENCE EP ISODIC',1, 0,0), | |
| 774 | ('ICD9','3 04.023','O PIUM DEPEN DENCE EPIS ODIC',1,0, 0), | |
| 775 | ('ICD9','3 04.001','M ETHADONE D EPENDENCE UNSPECIFI' ,1,0,0), | |
| 776 | ('ICD9','3 05.433','N OLUDAR MET HYPRYLOME ABUSE IN', 1,0,0), | |
| 777 | ('ICD9','3 05.533','O PIUM ABUSE IN REMISS ION',1,0,0 ), | |
| 778 | ('ICD9','3 04.019','O THER OPIOD DEPENDENC E CONTINU' ,1,0,0), | |
| 779 | ('ICD9','3 05.512','M ORPHINE AB USE CONTIN UOUS',1,0, 0), | |
| 780 | ('ICD9','3 04.519','O THER HALLU CINOGEN DE PENDENCE', 1,0,0), | |
| 781 | ('ICD9','3 05.44','PA RALDEHYDE ABUSE',1,0 ,0), | |
| 782 | ('ICD9','3 05.319','O THER HALLU CINOGEN AB USE CONTI' ,1,0,0), | |
| 783 | ('ICD9','3 05.339','O THER HALLU CINOGEN AB USE IN RE' ,1,0,0), | |
| 784 | ('ICD9','3 04.022','M ORPHINE DE PENDENCE E PISODIC',1 ,0,0), | |
| 785 | ('ICD9','3 04.939','U NSPECIFIED DRUG DEPE NDENCE NE' ,1,0,0), | |
| 786 | ('ICD9','3 04.116','V ALIUM DIAZ EPAM DEPEN DENCE CON' ,1,0,0), | |
| 787 | ('ICD9','3 05.99','OT HER, MIXED , UNSPEC, NEC',1,0,0 ), | |
| 788 | ('ICD9','3 04.909','U NSPECIFIED DRUG DEPE NDENCE NE' ,1,0,0), | |
| 789 | ('ICD9','3 05.49','OT HER SEDATI VE OR HYPN OT, NEC',1 ,0,0), | |
| 790 | ('ICD9','3 04.039','O THER OPIOD DEPENDENC E IN REMI' ,1,0,0), | |
| 791 | ('ICD9','3 05.416','V ALIUM DIAZ EPAM ABUSE CONTINUO' ,1,0,0), | |
| 792 | ('ICD9','3 04.009','O THER OPIOD DEPENDENC E UNSPECI' ,1,0,0), | |
| 793 | ('ICD9','3 05.425','P LACIDYL ET HCHLORUYNO L ABUSE E' ,1,0,0), | |
| 794 | ('ICD9','3 04.111','L IBRIUM DEP ENDENCE CO NTINUOUS', 1,0,0), | |
| 795 | ('ICD9','3 05.39','OT HER HALLUC INOGEN ABU SE, NEC',1 ,0,0), | |
| 796 | ('ICD9','3 04.119','O THER SEDAT IVE OR HYP NOTIC DEP' ,1,0,0), | |
| 797 | ('ICD9','3 05.415','P LACIDYL ET HCHLORUYNO L ABUSE C' ,1,0,0), | |
| 798 | ('ICD9','3 04.128','B ARBITURATE S DEPENDEN CE EPISOD' ,1,0,0), | |
| 799 | ('ICD9','3 04.136','V ALIUM DIAZ EPAM DEPEN DENCE IN', 1,0,0), | |
| 800 | ('ICD9','3 04.139','O THER SEDAT IVE OR HYP NOTIC DEP' ,1,0,0), | |
| 801 | ('ICD9','3 04.17','DO RIDEN, GLU TETHIMIDE DEPEND',1, 0,0), | |
| 802 | ('ICD9','3 05.409','O THER SEDAT IVE OR HYP NOTIC ABU' ,1,0,0), | |
| 803 | ('ICD9','3 04.123','N OLUDAR MET HYPRYLOME DEPENDENC' ,1,0,0), | |
| 804 | ('ICD9','3 05.413','N OLUDAR MET HYPRYLOME ABUSE CON' ,1,0,0), | |
| 805 | ('ICD9','3 05.529','O THER OPIOD ABUSE NEC EPISODIC' ,1,0,0), | |
| 806 | ('ICD9','3 04.439','O THER PSYCH OSTIMULANT DEPENDEN' ,1,0,0), | |
| 807 | ('ICD9','3 05.721','P RELUDIN AB USE EPISOD IC',1,0,0) , | |
| 808 | ('ICD9','3 05.419','O THER SEDAT IVE OR HYP NOTIC ABU' ,1,0,0), | |
| 809 | ('ICD9','3 05.539','O THER OPIOD ABUSE NEC IN REMIS' ,1,0,0), | |
| 810 | ('ICD9','3 05.424','P ARALDEHYDE ABUSE EPI SODIC',1,0 ,0), | |
| 811 | ('ICD9','3 05.739','O THER RELAT ED ACTING SYMPATHOM' ,1,0,0), | |
| 812 | ('ICD9','3 04.114','P ARALDEHYDE DEPENDENC E CONTINU' ,1,0,0), | |
| 813 | ('ICD9','3 05.521','M ETHADONE A BUSE EPISO DIC',1,0,0 ), | |
| 814 | ('ICD9','3 04.529','O THER HALLU CINOGEN DE PENDENCE', 1,0,0), | |
| 815 | ('ICD9','3 05.729','O THER RELAT ED ACTING SYMPATHOM' ,1,0,0), | |
| 816 | ('ICD9','3 04.59','OT HER HALLUC INOGEN DEP END',1,0,0 ), | |
| 817 | ('ICD9','2 91.22','DE MENTIA ASS OC W/ETOH, MOD',1,0, 0), | |
| 818 | ('ICD9','3 05.501','M ETHADONE A BUSE UNSPE CIFIED',1, 0,0), | |
| 819 | ('ICD9','3 04.430','A MPHETAMINE DEPENDENC E IN REMI' ,1,0,0), | |
| 820 | ('ICD9','3 04.930','P HENCYCLIDI NE (PCP) D EPENDENCE' ,1,0,0), | |
| 821 | ('ICD9','3 05.60','CO CAINE ABUS E UNSPECIF IED',1,0,0 ), | |
| 822 | ('ICD9','3 05.410','C HLORAL HYD RATE ABUSE CONTINUO' ,1,0,0), | |
| 823 | ('ICD9','3 04.610','P CP DEPENDE NCE, CONTI NUOUS',1,0 ,0), | |
| 824 | ('ICD9','3 05.310','L SD ABUSE C ONTINUOUS' ,1,0,0), | |
| 825 | ('ICD9','3 04.900','P HENCYCLIDI NE (PCP) D EPENDENCE' ,1,0,0), | |
| 826 | ('ICD9','3 05.400','C HLORAL HYD RATE ABUSE UNSPECIF' ,1,0,0), | |
| 827 | ('ICD9','3 05.210','M ARIJUANA A BUSE CONTI NUOUS',1,0 ,0), | |
| 828 | ('ICD9','3 05.910','P HENCYCLIDI NE (PCP) A BUSE (INC' ,1,0,0), | |
| 829 | ('ICD9','3 04.619','O THER SPEC DRUG DEPEN D, CONT',1 ,0,0), | |
| 830 | ('ICD9','3 04.310','M ARIJUANA D EPENDENCE CONTINUOU' ,1,0,0), | |
| 831 | ('ICD9','3 05.900','P HENCYCLIDI NE (PCP) A BUSE (INC' ,1,0,0), | |
| 832 | ('ICD9','3 04.510','L SD DEPENDE NCE CONTIN UOUS',1,0, 0), | |
| 833 | ('ICD9','3 05.730','A MPHETAMINE ABUSE IN REMISSION' ,1,0,0), | |
| 834 | ('ICD9','3 04.400','A MPHETAMINE DEPENDENC E UNSPECI' ,1,0,0), | |
| 835 | ('ICD9','3 05.300','L SD ABUSE U NSPECIFIED ',1,0,0), | |
| 836 | ('ICD9','3 04.000','H EROIN DEPE NDENCE UNS PECIFIED', 1,0,0), | |
| 837 | ('ICD9','3 05.220','M ARIJUANA A BUSE EPISO DIC',1,0,0 ), | |
| 838 | ('ICD9','3 04.520','L SD DEPENDE NCE EPISOD IC',1,0,0) , | |
| 839 | ('ICD9','3 04.300','M ARIJUANA D EPENDENCE UNSPECIFI' ,1,0,0), | |
| 840 | ('ICD9','3 05.330','L SD ABUSE I N REMISSIO N',1,0,0), | |
| 841 | ('ICD9','3 05.720','A MPHETAMINE ABUSE EPI SODIC',1,0 ,0), | |
| 842 | ('ICD9','3 05.230','M ARIJUANA A BUSE IN RE MISSION',1 ,0,0), | |
| 843 | ('ICD9','3 05.10','TO BACCO USE DISORDER U NSPECIFI', 1,0,0), | |
| 844 | ('ICD9','3 04.629','O THER SPEC DRUG DEPEN D',1,0,0), | |
| 845 | ('ICD9','3 04.120','C HLORAL HYD RATE DEPEN DENCE EPI' ,1,0,0), | |
| 846 | ('ICD9','3 04.010','H EROIN DEPE NDENCE CON TINUOUS',1 ,0,0), | |
| 847 | ('ICD9','3 05.700','A MPHETAMINE ABUSE UNS PECIFIED', 1,0,0), | |
| 848 | ('ICD9','3 04.330','M ARIJUANA D EPENDENCE IN REMISS' ,1,0,0), | |
| 849 | ('ICD9','3 04.320','M ARIJUANA D EPENDENCE EPISODIC', 1,0,0), | |
| 850 | ('ICD9','3 04.020','H EROIN DEPE NDENCE EPI SODIC',1,0 ,0), | |
| 851 | ('ICD9','3 05.530','H EROIN ABUS E IN REMIS SION',1,0, 0), | |
| 852 | ('ICD9','3 04.420','A MPHETAMINE DEPENDENC E EPISODI' ,1,0,0), | |
| 853 | ('ICD9','3 04.030','H EROIN DEPE NDENCE IN REMISSION' ,1,0,0), | |
| 854 | ('ICD9','3 05.520','H EROIN ABUS E EPISODIC ',1,0,0), | |
| 855 | ('ICD9','3 04.639','O THER SPEC DRUG DEPEN D, REMISS' ,1,0,0), | |
| 856 | ('ICD9','3 04.620','P CP DEPENDE NCE, EPISO DIC',1,0,0 ), | |
| 857 | ('ICD9','3 04.630','P CP DEPEND IN REMISSI ON',1,0,0) , | |
| 858 | ('ICD9','3 04.910','P HENCYCLIDI NE (PCP) D EPENDENCE' ,1,0,0), | |
| 859 | ('ICD9','3 05.920','P HENCYCLIDI NE (PCP) A BUSE (INC' ,1,0,0), | |
| 860 | ('ICD9','3 04.100','C HLORAL HYD RATE DEPEN DENCE UNS' ,1,0,0), | |
| 861 | ('ICD9','3 04.609','O THER SPEC DRUG DEPEN D, UNSPEC' ,1,0,0), | |
| 862 | ('ICD9','3 04.110','C HLORAL HYD RATE DEPEN DENCE CON' ,1,0,0), | |
| 863 | ('ICD9','3 04.410','A MPHETAMINE DEPENDENC E CONTINU' ,1,0,0), | |
| 864 | ('ICD9','3 05.710','A MPHETAMINE ABUSE CON TINUOUS',1 ,0,0), | |
| 865 | ('ICD9','3 05.430','C HLORAL HYD RATE ABUSE IN REMIS' ,1,0,0), | |
| 866 | ('ICD9','3 04.920','P HENCYCLIDI NE (PCP) D EPENDENCE' ,1,0,0), | |
| 867 | ('ICD9','3 04.130','C HLORAL HYD RATE DEPEN DENCE IN', 1,0,0), | |
| 868 | ('ICD9','3 05.510','H EROIN ABUS E CONTINUO US',1,0,0) , | |
| 869 | ('ICD9','3 05.420','C HLORAL HYD RATE ABUSE EPISODIC' ,1,0,0), | |
| 870 | ('ICD9','3 04.500','L SD DEPENDE NCE UNSPEC IFIED',1,0 ,0), | |
| 871 | ('ICD9','3 05.930','P HENCYCLIDI NE (PCP) A BUSE (INC' ,1,0,0), | |
| 872 | ('ICD9','3 04.530','L SD DEPENDE NCE IN REM ISSION',1, 0,0), | |
| 873 | ('ICD9','3 05.500','H EROIN ABUS E UNSPECIF IED',1,0,0 ), | |
| 874 | ('ICD9','3 05.320','L SD ABUSE E PISODIC',1 ,0,0), | |
| 875 | ('ICD9','3 05.200','M ARIJUANA A BUSE UNSPE CIFIED',1, 0,0), | |
| 876 | ('ICD9','3 04.600','P CP DEPENDE NCE, UNSPE CIFIED',1, 0,0), | |
| 877 | ('ICD9','2 91.89','AL COHOL MENT AL DISOR N EC',1,0,0) , | |
| 878 | ('ICD9','V 65.42','CO UNSEL-SUBS USE/ABUSE ',1,0,0), | |
| 879 | ('ICD9','2 91.81','AL COHOL WITH DRAWAL',1, 0,0), | |
| 880 | ('ICD9','2 91.82','AL COH INDUCE SLEEP DIS OR',1,0,0) , | |
| 881 | ('ICD9','2 82.5','SIC KLE-CELL T RAIT',0,1, 0), | |
| 882 | ('ICD9','2 82.61','HB -SS DISEAS E W/O CRIS IS',0,1,0) , | |
| 883 | ('ICD9','2 82.62','HB -SS DISEAS E W CRISIS ',0,1,0), | |
| 884 | ('ICD9','2 82.63','HB -SS/HB-C D IS W/O CRS IS',0,1,0) , | |
| 885 | ('ICD9','2 82.69','HB -SS DIS NE C W CRISIS ',0,1,0), | |
| 886 | ('ICD9','2 82.60','SI CKLE CELL DISEASE NO S',0,1,0), | |
| 887 | ('ICD9','2 82.44','SI CKLE-CELL THALASSEMI A',0,1,0), | |
| 888 | ('ICD9','2 82.41','TH LASEMA HB- S W/O CRIS IS',0,1,0) , | |
| 889 | ('ICD9','2 82.50','SI CKLE-CELL TRAIT HB-A S GENO',0, 1,0), | |
| 890 | ('ICD9','2 82.64','HB -S/HB-C DI S W CRISIS ',0,1,0), | |
| 891 | ('ICD9','2 82.65','SI CKLE-CELL DISEASE/HB -E',0,1,0) , | |
| 892 | ||
| 893 | ('ICD10',' B20.','Hum an immunod eficiency virus [HIV ] disease' , 0,0,1), | |
| 894 | ('ICD10',' B33.3','Re trovirus i nfections, not elsew here class ified', 0, 0,1), | |
| 895 | ('ICD10',' B97.33','H TLV-I as t he cause o f diseases classifie d elsewher e', 0,0,1) , | |
| 896 | ('ICD10',' B97.34','H TLV-II as the cause of disease s classifi ed elsewhe re', 0,0,1 ), | |
| 897 | ('ICD10',' B97.35','H IV 2 as th e cause of diseases classified elsewhere ', 0,1,0), | |
| 898 | ('ICD10',' B97.35','H IV 2 as th e cause of diseases classified elsewhere ', 0,0,1), | |
| 899 | ('ICD10',' B97.39','O th retrovi rus as the cause of diseases c lassified elsewhere' , 0,0,1), | |
| 900 | ('ICD10',' C46.0','KA POSI''S sa rcoma of s kin', 0,0, 1), | |
| 901 | ('ICD10',' C46.1','KA POSI''S sa rcoma of s oft tissue ', 0,0,1), | |
| 902 | ('ICD10',' C46.2','KA POSI''S sa rcoma of p alate', 0, 0,1), | |
| 903 | ('ICD10',' C46.3','KA POSI''S sa rcoma of l ymph nodes ', 0,0,1), | |
| 904 | ('ICD10',' C46.4','KA POSI''S sa rcoma of g astrointes tinal site s', 0,0,1) , | |
| 905 | ('ICD10',' C46.50','K APOSI''S s arcoma of unspecifie d lung', 0 ,0,1), | |
| 906 | ('ICD10',' C46.7','KA POSI''S sa rcoma of o ther sites ', 0,0,1), | |
| 907 | ('ICD10',' C46.9','KA POSI''S sa rcoma, uns pecified', 0,0,1), | |
| 908 | ('ICD10',' D56.1','Be ta thalass emia', 0,1 ,0), | |
| 909 | ('ICD10',' D57.00','H b-SS disea se with cr isis, unsp ecified', 0,1,0), | |
| 910 | ('ICD10',' D57.1','Si ckle-cell disease wi thout cris is', 0,1,0 ), | |
| 911 | ('ICD10',' D57.1','Si ckle-cell disease wi thout cris is', 0,1,0 ), | |
| 912 | ('ICD10',' D57.20','S ickle-cell /Hb-C dise ase withou t crisis', 0,1,0), | |
| 913 | ('ICD10',' D57.219',' Sickle-cel l/Hb-C dis ease with crisis, un specified' , 0,1,0), | |
| 914 | ('ICD10',' D57.219',' Sickle-cel l/Hb-C dis ease with crisis, un specified' , 0,1,0), | |
| 915 | ('ICD10',' D57.3','Si ckle-cell trait', 0, 1,0), | |
| 916 | ('ICD10',' D57.40','S ickle-cell thalassem ia without crisis', 0,1,0), | |
| 917 | ('ICD10',' D57.419',' Sickle-cel l thalasse mia with c risis, uns pecified', 0,1,0), | |
| 918 | ('ICD10',' D57.80','O ther sickl e-cell dis orders wit hout crisi s', 0,1,0) , | |
| 919 | ('ICD10',' D57.819',' Other sick le-cell di sorders wi th crisis, unspecifi ed', 0,1,0 ), | |
| 920 | ('ICD10',' F10.10','A lcohol abu se, uncomp licated', 1,0,0), | |
| 921 | ('ICD10',' F10.10','A lcohol abu se, uncomp licated', 1,0,0), | |
| 922 | ('ICD10',' F10.10','A lcohol abu se, uncomp licated', 1,0,0), | |
| 923 | ('ICD10',' F10.10','A lcohol abu se, uncomp licated', 1,0,0), | |
| 924 | ('ICD10',' F10.159',' Alcohol ab use with a lcohol-ind uced psych otic disor der, unsp' , 1,0,0), | |
| 925 | ('ICD10',' F10.180',' Alcohol ab use with a lcohol-ind uced anxie ty disorde r', 1,0,0) , | |
| 926 | ('ICD10',' F10.181',' Alcohol ab use with a lcohol-ind uced sexua l dysfunct ion', 1,0, 0), | |
| 927 | ('ICD10',' F10.182',' Alcohol ab use with a lcohol-ind uced sleep disorder' , 1,0,0), | |
| 928 | ('ICD10',' F10.188',' Alcohol ab use with o ther alcoh ol-induced disorder' , 1,0,0), | |
| 929 | ('ICD10',' F10.20','A lcohol dep endence, u ncomplicat ed', 1,0,0 ), | |
| 930 | ('ICD10',' F10.20','A lcohol dep endence, u ncomplicat ed', 1,0,0 ), | |
| 931 | ('ICD10',' F10.20','A lcohol dep endence, u ncomplicat ed', 1,0,0 ), | |
| 932 | ('ICD10',' F10.21','A lcohol dep endence, i n remissio n', 1,0,0) , | |
| 933 | ('ICD10',' F10.229',' Alcohol de pendence w ith intoxi cation, un specified' , 1,0,0), | |
| 934 | ('ICD10',' F10.229',' Alcohol de pendence w ith intoxi cation, un specified' , 1,0,0), | |
| 935 | ('ICD10',' F10.229',' Alcohol de pendence w ith intoxi cation, un specified' , 1,0,0), | |
| 936 | ('ICD10',' F10.229',' Alcohol de pendence w ith intoxi cation, un specified' , 1,0,0), | |
| 937 | ('ICD10',' F10.231',' Alcohol de pendence w ith withdr awal delir ium', 1,0, 0), | |
| 938 | ('ICD10',' F10.239',' Alcohol de pendence w ith withdr awal, unsp ecified', 1,0,0), | |
| 939 | ('ICD10',' F10.259',' Alcohol de pendence w alcoh-ind uce psycho tic disord er, unsp', 1,0,0), | |
| 940 | ('ICD10',' F10.27','A lcohol dep endence wi th alcohol -induced p ersisting dementia', 1,0,0), | |
| 941 | ('ICD10',' F10.280',' Alcohol de pendence w ith alcoho l-induced anxiety di sorder', 1 ,0,0), | |
| 942 | ('ICD10',' F10.281',' Alcohol de pendence w ith alcoho l-induced sexual dys function', 1,0,0), | |
| 943 | ('ICD10',' F10.282',' Alcohol de pendence w ith alcoho l-induced sleep diso rder', 1,0 ,0), | |
| 944 | ('ICD10',' F10.288',' Alcohol de pendence w ith other alcohol-in duced diso rder', 1,0 ,0), | |
| 945 | ('ICD10',' F10.929',' Alcohol us e, unspeci fied with intoxicati on, unspec ified', 1, 0,0), | |
| 946 | ('ICD10',' F10.950',' Alcohol us e, unsp w alcoh-indu ce psych d isorder w delusions' , 1,0,0), | |
| 947 | ('ICD10',' F10.951',' Alcohol us e, unsp w alcoh-indu ce psych d isorder w hallucin', 1,0,0), | |
| 948 | ('ICD10',' F10.959',' Alcohol us e, unsp w alcohol-in duced psyc hotic diso rder, unsp ', 1,0,0), | |
| 949 | ('ICD10',' F10.96','A lcohol use , unsp w a lcoh-induc e persist amnestic d isorder', 1,0,0), | |
| 950 | ('ICD10',' F10.980',' Alcohol us e, unsp wi th alcohol -induced a nxiety dis order', 1, 0,0), | |
| 951 | ('ICD10',' F10.982',' Alcohol us e, unspeci fied with alcohol-in duced slee p disorder ', 1,0,0), | |
| 952 | ('ICD10',' F10.99','A lcohol use , unsp wit h unspecif ied alcoho l-induced disorder', 1,0,0), | |
| 953 | ('ICD10',' F11.10','O pioid abus e, uncompl icated', 1 ,0,0), | |
| 954 | ('ICD10',' F11.10','O pioid abus e, uncompl icated', 1 ,0,0), | |
| 955 | ('ICD10',' F11.10','O pioid abus e, uncompl icated', 1 ,0,0), | |
| 956 | ('ICD10',' F11.10','O pioid abus e, uncompl icated', 1 ,0,0), | |
| 957 | ('ICD10',' F11.20','O pioid depe ndence, un complicate d', 1,0,0) , | |
| 958 | ('ICD10',' F11.20','O pioid depe ndence, un complicate d', 1,0,0) , | |
| 959 | ('ICD10',' F11.20','O pioid depe ndence, un complicate d', 1,0,0) , | |
| 960 | ('ICD10',' F11.21','O pioid depe ndence, in remission ', 1,0,0), | |
| 961 | ('ICD10',' F12.10','C annabis ab use, uncom plicated', 1,0,0), | |
| 962 | ('ICD10',' F12.10','C annabis ab use, uncom plicated', 1,0,0), | |
| 963 | ('ICD10',' F12.10','C annabis ab use, uncom plicated', 1,0,0), | |
| 964 | ('ICD10',' F12.10','C annabis ab use, uncom plicated', 1,0,0), | |
| 965 | ('ICD10',' F12.20','C annabis de pendence, uncomplica ted', 1,0, 0), | |
| 966 | ('ICD10',' F12.20','C annabis de pendence, uncomplica ted', 1,0, 0), | |
| 967 | ('ICD10',' F12.20','C annabis de pendence, uncomplica ted', 1,0, 0), | |
| 968 | ('ICD10',' F12.21','C annabis de pendence, in remissi on', 1,0,0 ), | |
| 969 | ('ICD10',' F12.90','C annabis us e, unspeci fied, unco mplicated' , 1,0,0), | |
| 970 | ('ICD10',' F12.90','C annabis us e, unspeci fied, unco mplicated' , 1,0,0), | |
| 971 | ('ICD10',' F12.90','C annabis us e, unspeci fied, unco mplicated' , 1,0,0), | |
| 972 | ('ICD10',' F13.10','S edative, h ypnotic or anxiolyti c abuse, u ncomplicat ed', 1,0,0 ), | |
| 973 | ('ICD10',' F13.10','S edative, h ypnotic or anxiolyti c abuse, u ncomplicat ed', 1,0,0 ), | |
| 974 | ('ICD10',' F13.10','S edative, h ypnotic or anxiolyti c abuse, u ncomplicat ed', 1,0,0 ), | |
| 975 | ('ICD10',' F13.10','S edative, h ypnotic or anxiolyti c abuse, u ncomplicat ed', 1,0,0 ), | |
| 976 | ('ICD10',' F13.20','S edative, h ypnotic or anxiolyti c dependen ce, uncomp licated', 1,0,0), | |
| 977 | ('ICD10',' F13.20','S edative, h ypnotic or anxiolyti c dependen ce, uncomp licated', 1,0,0), | |
| 978 | ('ICD10',' F13.20','S edative, h ypnotic or anxiolyti c dependen ce, uncomp licated', 1,0,0), | |
| 979 | ('ICD10',' F13.21','S edative, h ypnotic or anxiolyti c dependen ce, in rem ission', 1 ,0,0), | |
| 980 | ('ICD10',' F14.10','C ocaine abu se, uncomp licated', 1,0,0), | |
| 981 | ('ICD10',' F14.10','C ocaine abu se, uncomp licated', 1,0,0), | |
| 982 | ('ICD10',' F14.10','C ocaine abu se, uncomp licated', 1,0,0), | |
| 983 | ('ICD10',' F14.10','C ocaine abu se, uncomp licated', 1,0,0), | |
| 984 | ('ICD10',' F14.20','C ocaine dep endence, u ncomplicat ed', 1,0,0 ), | |
| 985 | ('ICD10',' F14.20','C ocaine dep endence, u ncomplicat ed', 1,0,0 ), | |
| 986 | ('ICD10',' F14.20','C ocaine dep endence, u ncomplicat ed', 1,0,0 ), | |
| 987 | ('ICD10',' F14.21','C ocaine dep endence, i n remissio n', 1,0,0) , | |
| 988 | ('ICD10',' F15.10','O ther stimu lant abuse , uncompli cated', 1, 0,0), | |
| 989 | ('ICD10',' F15.10','O ther stimu lant abuse , uncompli cated', 1, 0,0), | |
| 990 | ('ICD10',' F15.10','O ther stimu lant abuse , uncompli cated', 1, 0,0), | |
| 991 | ('ICD10',' F15.10','O ther stimu lant abuse , uncompli cated', 1, 0,0), | |
| 992 | ('ICD10',' F15.20','O ther stimu lant depen dence, unc omplicated ', 1,0,0), | |
| 993 | ('ICD10',' F15.20','O ther stimu lant depen dence, unc omplicated ', 1,0,0), | |
| 994 | ('ICD10',' F15.20','O ther stimu lant depen dence, unc omplicated ', 1,0,0), | |
| 995 | ('ICD10',' F15.21','O ther stimu lant depen dence, in remission' , 1,0,0), | |
| 996 | ('ICD10',' F16.10','H allucinoge n abuse, u ncomplicat ed', 1,0,0 ), | |
| 997 | ('ICD10',' F16.10','H allucinoge n abuse, u ncomplicat ed', 1,0,0 ), | |
| 998 | ('ICD10',' F16.10','H allucinoge n abuse, u ncomplicat ed', 1,0,0 ), | |
| 999 | ('ICD10',' F16.10','H allucinoge n abuse, u ncomplicat ed', 1,0,0 ), | |
| 1000 | ('ICD10',' F16.20','H allucinoge n dependen ce, uncomp licated', 1,0,0), | |
| 1001 | ('ICD10',' F16.20','H allucinoge n dependen ce, uncomp licated', 1,0,0), | |
| 1002 | ('ICD10',' F16.20','H allucinoge n dependen ce, uncomp licated', 1,0,0), | |
| 1003 | ('ICD10',' F16.21','H allucinoge n dependen ce, in rem ission', 1 ,0,0), | |
| 1004 | ('ICD10',' F17.200',' Nicotine d ependence, unspecifi ed, uncomp licated', 1,0,0), | |
| 1005 | ('ICD10',' F18.10','I nhalant ab use, uncom plicated', 1,0,0), | |
| 1006 | ('ICD10',' F18.10','I nhalant ab use, uncom plicated', 1,0,0), | |
| 1007 | ('ICD10',' F18.10','I nhalant ab use, uncom plicated', 1,0,0), | |
| 1008 | ('ICD10',' F18.10','I nhalant ab use, uncom plicated', 1,0,0), | |
| 1009 | ('ICD10',' F19.10','O ther psych oactive su bstance ab use, uncom plicated', 1,0,0), | |
| 1010 | ('ICD10',' F19.10','O ther psych oactive su bstance ab use, uncom plicated', 1,0,0), | |
| 1011 | ('ICD10',' F19.10','O ther psych oactive su bstance ab use, uncom plicated', 1,0,0), | |
| 1012 | ('ICD10',' F19.10','O ther psych oactive su bstance ab use, uncom plicated', 1,0,0), | |
| 1013 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1014 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1015 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1016 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1017 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1018 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1019 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1020 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1021 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1022 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1023 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1024 | ('ICD10',' F19.20','O ther psych oactive su bstance de pendence, uncomplica ted', 1,0, 0), | |
| 1025 | ('ICD10',' F19.21','O ther psych oactive su bstance de pendence, in remissi on', 1,0,0 ), | |
| 1026 | ('ICD10',' F19.21','O ther psych oactive su bstance de pendence, in remissi on', 1,0,0 ), | |
| 1027 | ('ICD10',' F19.21','O ther psych oactive su bstance de pendence, in remissi on', 1,0,0 ), | |
| 1028 | ('ICD10',' F19.21','O ther psych oactive su bstance de pendence, in remissi on', 1,0,0 ), | |
| 1029 | ('ICD10',' F19.94','O th psychoa ctive subs tance use, unsp w mo od disorde r', 1,0,0) , | |
| 1030 | ('ICD10',' G62.1','Al coholic po lyneuropat hy', 1,0,0 ), | |
| 1031 | ('ICD10',' O98.711',' Human immu nodef viru s disease comp preg, first tri mester', 0 ,1,0), | |
| 1032 | ('ICD10',' O98.712',' Human immu nodef viru s disease comp preg, second tr imester', 0,1,0), | |
| 1033 | ('ICD10',' O98.713',' Human immu nodef viru s disease comp preg, third tri mester', 0 ,1,0), | |
| 1034 | ('ICD10',' O98.719',' Human immu nodef viru s disease comp pregn ancy, unsp trimester ', 0,1,0), | |
| 1035 | ('ICD10',' O98.72','H uman immun odeficienc y virus di sease comp licating c hildbirth' , 0,1,0), | |
| 1036 | ('ICD10',' O98.73','H uman immun odef virus disease c omplicatin g the puer perium', 0 ,1,0), | |
| 1037 | ('ICD10',' R75.','Inc onclusive laboratory evidence of human i mmunodef v irus', 0,0 ,1), | |
| 1038 | ('ICD10',' Z13.0','En cntr scree n for dis of the bld /bld-form org/immun mechnsm', 0,0,1), | |
| 1039 | ('ICD10',' Z21.','Asy mptomatic human immu nodeficien cy virus i nfection s tatus', 0, 1,0), | |
| 1040 | ('ICD10',' Z21.','Asy mptomatic human immu nodeficien cy virus i nfection s tatus', 0, 0,1), | |
| 1041 | ('ICD10',' Z65.8','Ot h problems related t o psychoso cial circu mstances', 1,0,0), | |
| 1042 | ('ICD10',' Z71.41','A lcohol abu se counsel ing and su rveillance of alcoho lic', 1,0, 0), | |
| 1043 | ('ICD10',' Z71.7','Hu man immuno deficiency virus [HI V] counsel ing', 0,0, 1); | |
| 1044 | ||
| 1045 | --select * from nva. SensitiveD xCodes; |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.