VistA-WorldVistAEHR/r/ONCOLOGY-ONC/ONCLNG.m

160 lines
3.3 KiB
Mathematica

ONCLNG ;Hines OIFOGWB - Lung histology exclusion table; 061406
;;2.11;ONCOLOGY;**46**;Mar 07) 1995;Build 39
;
K ONCLUNG
S ONCLUNG(82401)=""
S ONCLUNG(82403)=""
S ONCLUNG(82413)=""
S ONCLUNG(82421)=""
S ONCLUNG(82423)=""
S ONCLUNG(82433)=""
S ONCLUNG(82481)=""
S ONCLUNG(86800)=""
S ONCLUNG(86801)=""
S ONCLUNG(86803)=""
S ONCLUNG(86811)=""
S ONCLUNG(86821)=""
S ONCLUNG(86830)=""
S ONCLUNG(86901)=""
S ONCLUNG(86911)=""
S ONCLUNG(86921)=""
S ONCLUNG(86931)=""
S ONCLUNG(86933)=""
S ONCLUNG(87000)=""
S ONCLUNG(87003)=""
S ONCLUNG(87103)=""
S ONCLUNG(87110)=""
S ONCLUNG(87113)=""
S ONCLUNG(87120)=""
S ONCLUNG(87130)=""
S ONCLUNG(88000)=""
S ONCLUNG(88003)=""
S ONCLUNG(88009)=""
S ONCLUNG(88013)=""
S ONCLUNG(88023)=""
S ONCLUNG(88033)=""
S ONCLUNG(88043)=""
S ONCLUNG(88053)=""
S ONCLUNG(88063)=""
S ONCLUNG(88100)=""
S ONCLUNG(88101)=""
S ONCLUNG(88103)=""
S ONCLUNG(88110)=""
S ONCLUNG(88113)=""
S ONCLUNG(88120)=""
S ONCLUNG(88123)=""
S ONCLUNG(88130)=""
S ONCLUNG(88133)=""
S ONCLUNG(88143)=""
S ONCLUNG(88150)=""
S ONCLUNG(88153)=""
S ONCLUNG(88200)=""
S ONCLUNG(88211)=""
S ONCLUNG(88221)=""
S ONCLUNG(88230)=""
S ONCLUNG(88240)=""
S ONCLUNG(88241)=""
S ONCLUNG(88250)=""
S ONCLUNG(88251)=""
S ONCLUNG(88260)=""
S ONCLUNG(88271)=""
S ONCLUNG(88300)=""
S ONCLUNG(88301)=""
S ONCLUNG(88303)=""
S ONCLUNG(88310)=""
S ONCLUNG(88320)=""
S ONCLUNG(88323)=""
S ONCLUNG(88333)=""
S ONCLUNG(88341)=""
S ONCLUNG(88351)=""
S ONCLUNG(88361)=""
S ONCLUNG(88400)=""
S ONCLUNG(88403)=""
S ONCLUNG(88411)=""
S ONCLUNG(88420)=""
S ONCLUNG(88500)=""
S ONCLUNG(88501)=""
S ONCLUNG(88503)=""
S ONCLUNG(88510)=""
S ONCLUNG(88513)=""
S ONCLUNG(88520)=""
S ONCLUNG(88523)=""
S ONCLUNG(88533)=""
S ONCLUNG(88540)=""
S ONCLUNG(88543)=""
S ONCLUNG(88553)=""
S ONCLUNG(88560)=""
S ONCLUNG(88570)=""
S ONCLUNG(88573)=""
S ONCLUNG(88583)=""
S ONCLUNG(88600)=""
S ONCLUNG(88610)=""
S ONCLUNG(88620)=""
S ONCLUNG(88700)=""
S ONCLUNG(88800)=""
S ONCLUNG(88810)=""
S ONCLUNG(88900)=""
S ONCLUNG(88901)=""
S ONCLUNG(88903)=""
S ONCLUNG(88910)=""
S ONCLUNG(88913)=""
S ONCLUNG(88920)=""
S ONCLUNG(88930)=""
S ONCLUNG(88940)=""
S ONCLUNG(88943)=""
S ONCLUNG(88950)=""
S ONCLUNG(88953)=""
S ONCLUNG(88963)=""
S ONCLUNG(88971)=""
S ONCLUNG(88981)=""
S ONCLUNG(89000)=""
S ONCLUNG(89003)=""
S ONCLUNG(89013)=""
S ONCLUNG(89023)=""
S ONCLUNG(89030)=""
S ONCLUNG(89040)=""
S ONCLUNG(89050)=""
S ONCLUNG(89103)=""
S ONCLUNG(89123)=""
S ONCLUNG(89203)=""
S ONCLUNG(89213)=""
S ONCLUNG(89300)=""
S ONCLUNG(89303)=""
S ONCLUNG(89313)=""
S ONCLUNG(89320)=""
S ONCLUNG(89333)=""
S ONCLUNG(89343)=""
S ONCLUNG(89350)=""
S ONCLUNG(89351)=""
S ONCLUNG(89353)=""
S ONCLUNG(89360)=""
S ONCLUNG(89361)=""
S ONCLUNG(89363)=""
S ONCLUNG(89503)=""
S ONCLUNG(89513)=""
S ONCLUNG(89590)=""
S ONCLUNG(89591)=""
S ONCLUNG(89593)=""
S ONCLUNG(89601)=""
S ONCLUNG(89603)=""
S ONCLUNG(89633)=""
S ONCLUNG(89643)=""
S ONCLUNG(89650)=""
S ONCLUNG(89660)=""
S ONCLUNG(89670)=""
S ONCLUNG(89703)=""
S ONCLUNG(89713)=""
S ONCLUNG(89723)=""
S ONCLUNG(89733)=""
S ONCLUNG(89741)=""
S ONCLUNG(89803)=""
S ONCLUNG(89813)=""
S ONCLUNG(89820)=""
S ONCLUNG(89823)=""
S ONCLUNG(89830)=""
S ONCLUNG(89900)=""
S ONCLUNG(89901)=""
S ONCLUNG(89903)=""
S ONCLUNG(89913)=""
Q