Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: IBDEI044

IBDEI044.m

Go to the documentation of this file.
IBDEI044 ; ; 01-FEB-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;FEB 01, 2021
 Q:'DIFQR(358.3)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q Q
 ;;^UTILITY(U,$J,358.3,9541,1,4,0)
 ;;=4^I50.33
 ;;^UTILITY(U,$J,358.3,9541,2)
 ;;=^5007246
 ;;^UTILITY(U,$J,358.3,9542,0)
 ;;=I50.21^^69^634^4
 ;;^UTILITY(U,$J,358.3,9542,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9542,1,3,0)
 ;;=3^Acute Systolic Heart Failure
 ;;^UTILITY(U,$J,358.3,9542,1,4,0)
 ;;=4^I50.21
 ;;^UTILITY(U,$J,358.3,9542,2)
 ;;=^5007240
 ;;^UTILITY(U,$J,358.3,9543,0)
 ;;=I50.22^^69^634^14
 ;;^UTILITY(U,$J,358.3,9543,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9543,1,3,0)
 ;;=3^Chronic Systolic Heart Failure
 ;;^UTILITY(U,$J,358.3,9543,1,4,0)
 ;;=4^I50.22
 ;;^UTILITY(U,$J,358.3,9543,2)
 ;;=^5007241
 ;;^UTILITY(U,$J,358.3,9544,0)
 ;;=I50.23^^69^634^7
 ;;^UTILITY(U,$J,358.3,9544,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9544,1,3,0)
 ;;=3^Acute on Chronic Systolic Heart Failure
 ;;^UTILITY(U,$J,358.3,9544,1,4,0)
 ;;=4^I50.23
 ;;^UTILITY(U,$J,358.3,9544,2)
 ;;=^5007242
 ;;^UTILITY(U,$J,358.3,9545,0)
 ;;=I50.20^^69^634^28
 ;;^UTILITY(U,$J,358.3,9545,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9545,1,3,0)
 ;;=3^Systolic Heart Failure,Unspec
 ;;^UTILITY(U,$J,358.3,9545,1,4,0)
 ;;=4^I50.20
 ;;^UTILITY(U,$J,358.3,9545,2)
 ;;=^5007239
 ;;^UTILITY(U,$J,358.3,9546,0)
 ;;=I65.23^^69^634^23
 ;;^UTILITY(U,$J,358.3,9546,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9546,1,3,0)
 ;;=3^Occlusion/Stenosis of Bilateral Carotid Arteries
 ;;^UTILITY(U,$J,358.3,9546,1,4,0)
 ;;=4^I65.23
 ;;^UTILITY(U,$J,358.3,9546,2)
 ;;=^5007362
 ;;^UTILITY(U,$J,358.3,9547,0)
 ;;=I65.22^^69^634^24
 ;;^UTILITY(U,$J,358.3,9547,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9547,1,3,0)
 ;;=3^Occlusion/Stenosis of Left Carotid Artery
 ;;^UTILITY(U,$J,358.3,9547,1,4,0)
 ;;=4^I65.22
 ;;^UTILITY(U,$J,358.3,9547,2)
 ;;=^5007361
 ;;^UTILITY(U,$J,358.3,9548,0)
 ;;=I65.21^^69^634^26
 ;;^UTILITY(U,$J,358.3,9548,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9548,1,3,0)
 ;;=3^Occlusion/Stenosis of Right Carotid Artery
 ;;^UTILITY(U,$J,358.3,9548,1,4,0)
 ;;=4^I65.21
 ;;^UTILITY(U,$J,358.3,9548,2)
 ;;=^5007360
 ;;^UTILITY(U,$J,358.3,9549,0)
 ;;=I65.8^^69^634^25
 ;;^UTILITY(U,$J,358.3,9549,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9549,1,3,0)
 ;;=3^Occlusion/Stenosis of Precerebral Arteries NEC
 ;;^UTILITY(U,$J,358.3,9549,1,4,0)
 ;;=4^I65.8
 ;;^UTILITY(U,$J,358.3,9549,2)
 ;;=^5007364
 ;;^UTILITY(U,$J,358.3,9550,0)
 ;;=I70.211^^69^634^11
 ;;^UTILITY(U,$J,358.3,9550,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9550,1,3,0)
 ;;=3^Athscl Native Arteries of Right Leg w/ Intrmt Claud
 ;;^UTILITY(U,$J,358.3,9550,1,4,0)
 ;;=4^I70.211
 ;;^UTILITY(U,$J,358.3,9550,2)
 ;;=^5007578
 ;;^UTILITY(U,$J,358.3,9551,0)
 ;;=I70.212^^69^634^10
 ;;^UTILITY(U,$J,358.3,9551,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9551,1,3,0)
 ;;=3^Athscl Native Arteries of Left Leg w/ Intrmt Claud
 ;;^UTILITY(U,$J,358.3,9551,1,4,0)
 ;;=4^I70.212
 ;;^UTILITY(U,$J,358.3,9551,2)
 ;;=^5007579
 ;;^UTILITY(U,$J,358.3,9552,0)
 ;;=I70.213^^69^634^9
 ;;^UTILITY(U,$J,358.3,9552,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9552,1,3,0)
 ;;=3^Athscl Native Arteries of Bilateral Legs w/ Intrmt Claud
 ;;^UTILITY(U,$J,358.3,9552,1,4,0)
 ;;=4^I70.213
 ;;^UTILITY(U,$J,358.3,9552,2)
 ;;=^5007580
 ;;^UTILITY(U,$J,358.3,9553,0)
 ;;=I71.2^^69^634^29
 ;;^UTILITY(U,$J,358.3,9553,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9553,1,3,0)
 ;;=3^Thoracic Aortic Aneurysm w/o Rupture
 ;;^UTILITY(U,$J,358.3,9553,1,4,0)
 ;;=4^I71.2
 ;;^UTILITY(U,$J,358.3,9553,2)
 ;;=^5007787
 ;;^UTILITY(U,$J,358.3,9554,0)
 ;;=I71.4^^69^634^1
 ;;^UTILITY(U,$J,358.3,9554,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9554,1,3,0)
 ;;=3^Abdominal Aortic Aneurysm w/o Rupture
 ;;^UTILITY(U,$J,358.3,9554,1,4,0)
 ;;=4^I71.4
 ;;^UTILITY(U,$J,358.3,9554,2)
 ;;=^5007789
 ;;^UTILITY(U,$J,358.3,9555,0)
 ;;=I73.9^^69^634^27
 ;;^UTILITY(U,$J,358.3,9555,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9555,1,3,0)
 ;;=3^Peripheral Vascular Disease,Unspec
 ;;^UTILITY(U,$J,358.3,9555,1,4,0)
 ;;=4^I73.9
 ;;^UTILITY(U,$J,358.3,9555,2)
 ;;=^184182
 ;;^UTILITY(U,$J,358.3,9556,0)
 ;;=I74.2^^69^634^21
 ;;^UTILITY(U,$J,358.3,9556,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9556,1,3,0)
 ;;=3^Embolism/Thrombosis of Upper Extremity Arteries
 ;;^UTILITY(U,$J,358.3,9556,1,4,0)
 ;;=4^I74.2
 ;;^UTILITY(U,$J,358.3,9556,2)
 ;;=^5007801
 ;;^UTILITY(U,$J,358.3,9557,0)
 ;;=I74.3^^69^634^19
 ;;^UTILITY(U,$J,358.3,9557,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9557,1,3,0)
 ;;=3^Embolism/Thrombosis of Lower Extremity Arteries
 ;;^UTILITY(U,$J,358.3,9557,1,4,0)
 ;;=4^I74.3
 ;;^UTILITY(U,$J,358.3,9557,2)
 ;;=^5007802
 ;;^UTILITY(U,$J,358.3,9558,0)
 ;;=I82.402^^69^634^18
 ;;^UTILITY(U,$J,358.3,9558,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9558,1,3,0)
 ;;=3^Embolism/Thrombosis of Left Lower Extrem Deep Veins,Acute
 ;;^UTILITY(U,$J,358.3,9558,1,4,0)
 ;;=4^I82.402
 ;;^UTILITY(U,$J,358.3,9558,2)
 ;;=^5007855
 ;;^UTILITY(U,$J,358.3,9559,0)
 ;;=I82.401^^69^634^20
 ;;^UTILITY(U,$J,358.3,9559,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9559,1,3,0)
 ;;=3^Embolism/Thrombosis of Right Lower Extrem Deep Veins,Acute
 ;;^UTILITY(U,$J,358.3,9559,1,4,0)
 ;;=4^I82.401
 ;;^UTILITY(U,$J,358.3,9559,2)
 ;;=^5007854
 ;;^UTILITY(U,$J,358.3,9560,0)
 ;;=I82.403^^69^634^17
 ;;^UTILITY(U,$J,358.3,9560,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9560,1,3,0)
 ;;=3^Embolism/Thrombosis of Bilateral Lower Extrem Deep Veins,Acute
 ;;^UTILITY(U,$J,358.3,9560,1,4,0)
 ;;=4^I82.403
 ;;^UTILITY(U,$J,358.3,9560,2)
 ;;=^5007856
 ;;^UTILITY(U,$J,358.3,9561,0)
 ;;=K70.30^^69^635^2
 ;;^UTILITY(U,$J,358.3,9561,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9561,1,3,0)
 ;;=3^Alcoholic Cirrhosis of Liver w/o Ascites
 ;;^UTILITY(U,$J,358.3,9561,1,4,0)
 ;;=4^K70.30
 ;;^UTILITY(U,$J,358.3,9561,2)
 ;;=^5008788
 ;;^UTILITY(U,$J,358.3,9562,0)
 ;;=K70.31^^69^635^1
 ;;^UTILITY(U,$J,358.3,9562,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9562,1,3,0)
 ;;=3^Alcoholic Cirrhosis of Liver w/ Ascites
 ;;^UTILITY(U,$J,358.3,9562,1,4,0)
 ;;=4^K70.31
 ;;^UTILITY(U,$J,358.3,9562,2)
 ;;=^5008789
 ;;^UTILITY(U,$J,358.3,9563,0)
 ;;=K74.60^^69^635^5
 ;;^UTILITY(U,$J,358.3,9563,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9563,1,3,0)
 ;;=3^Cirrhosis of Liver,Unspec
 ;;^UTILITY(U,$J,358.3,9563,1,4,0)
 ;;=4^K74.60
 ;;^UTILITY(U,$J,358.3,9563,2)
 ;;=^5008822
 ;;^UTILITY(U,$J,358.3,9564,0)
 ;;=K74.69^^69^635^4
 ;;^UTILITY(U,$J,358.3,9564,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9564,1,3,0)
 ;;=3^Cirrhosis of Liver NEC
 ;;^UTILITY(U,$J,358.3,9564,1,4,0)
 ;;=4^K74.69
 ;;^UTILITY(U,$J,358.3,9564,2)
 ;;=^5008823
 ;;^UTILITY(U,$J,358.3,9565,0)
 ;;=K70.2^^69^635^3
 ;;^UTILITY(U,$J,358.3,9565,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9565,1,3,0)
 ;;=3^Alcoholic Fibrosis/Sclerosis of Liver
 ;;^UTILITY(U,$J,358.3,9565,1,4,0)
 ;;=4^K70.2
 ;;^UTILITY(U,$J,358.3,9565,2)
 ;;=^5008787
 ;;^UTILITY(U,$J,358.3,9566,0)
 ;;=K74.2^^69^635^6
 ;;^UTILITY(U,$J,358.3,9566,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9566,1,3,0)
 ;;=3^Hepatic Fibrosis w/ Hepatic Sclerosis
 ;;^UTILITY(U,$J,358.3,9566,1,4,0)
 ;;=4^K74.2
 ;;^UTILITY(U,$J,358.3,9566,2)
 ;;=^5008818
 ;;^UTILITY(U,$J,358.3,9567,0)
 ;;=K74.1^^69^635^10
 ;;^UTILITY(U,$J,358.3,9567,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9567,1,3,0)
 ;;=3^Hepatic Sclerosis
 ;;^UTILITY(U,$J,358.3,9567,1,4,0)
 ;;=4^K74.1
 ;;^UTILITY(U,$J,358.3,9567,2)
 ;;=^5008817
 ;;^UTILITY(U,$J,358.3,9568,0)
 ;;=K74.00^^69^635^9
 ;;^UTILITY(U,$J,358.3,9568,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9568,1,3,0)
 ;;=3^Hepatic Fibrosis,Unspec
 ;;^UTILITY(U,$J,358.3,9568,1,4,0)
 ;;=4^K74.00
 ;;^UTILITY(U,$J,358.3,9568,2)
 ;;=^5159218
 ;;^UTILITY(U,$J,358.3,9569,0)
 ;;=K74.01^^69^635^8
 ;;^UTILITY(U,$J,358.3,9569,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9569,1,3,0)
 ;;=3^Hepatic Fibrosis,Early Fibrosis
 ;;^UTILITY(U,$J,358.3,9569,1,4,0)
 ;;=4^K74.01
 ;;^UTILITY(U,$J,358.3,9569,2)
 ;;=^5159219
 ;;^UTILITY(U,$J,358.3,9570,0)
 ;;=K74.02^^69^635^7
 ;;^UTILITY(U,$J,358.3,9570,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9570,1,3,0)
 ;;=3^Hepatic Fibrosis,Advanced Fibrosis
 ;;^UTILITY(U,$J,358.3,9570,1,4,0)
 ;;=4^K74.02
 ;;^UTILITY(U,$J,358.3,9570,2)
 ;;=^5159220
 ;;^UTILITY(U,$J,358.3,9571,0)
 ;;=K52.89^^69^636^4
 ;;^UTILITY(U,$J,358.3,9571,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9571,1,3,0)
 ;;=3^Noninfective Gastroenteritis/Colitis NEC
 ;;^UTILITY(U,$J,358.3,9571,1,4,0)
 ;;=4^K52.89
 ;;^UTILITY(U,$J,358.3,9571,2)
 ;;=^5008703
 ;;^UTILITY(U,$J,358.3,9572,0)
 ;;=K51.90^^69^636^11
 ;;^UTILITY(U,$J,358.3,9572,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9572,1,3,0)
 ;;=3^Ulcerative Colitis w/o Complications,Unspec
 ;;^UTILITY(U,$J,358.3,9572,1,4,0)
 ;;=4^K51.90
 ;;^UTILITY(U,$J,358.3,9572,2)
 ;;=^5008694
 ;;^UTILITY(U,$J,358.3,9573,0)
 ;;=K51.919^^69^636^10
 ;;^UTILITY(U,$J,358.3,9573,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9573,1,3,0)
 ;;=3^Ulcerative Colitis w/ Unspec Complications,Unspec
 ;;^UTILITY(U,$J,358.3,9573,1,4,0)
 ;;=4^K51.919
 ;;^UTILITY(U,$J,358.3,9573,2)
 ;;=^5008700
 ;;^UTILITY(U,$J,358.3,9574,0)
 ;;=K51.912^^69^636^7
 ;;^UTILITY(U,$J,358.3,9574,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9574,1,3,0)
 ;;=3^Ulcerative Colitis w/ Intestinal Obstruction,Unspec
 ;;^UTILITY(U,$J,358.3,9574,1,4,0)
 ;;=4^K51.912
 ;;^UTILITY(U,$J,358.3,9574,2)
 ;;=^5008696
 ;;^UTILITY(U,$J,358.3,9575,0)
 ;;=K51.913^^69^636^6
 ;;^UTILITY(U,$J,358.3,9575,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9575,1,3,0)
 ;;=3^Ulcerative Colitis w/ Fistula,Unspec
 ;;^UTILITY(U,$J,358.3,9575,1,4,0)
 ;;=4^K51.913
 ;;^UTILITY(U,$J,358.3,9575,2)
 ;;=^5008697
 ;;^UTILITY(U,$J,358.3,9576,0)
 ;;=K51.914^^69^636^5
 ;;^UTILITY(U,$J,358.3,9576,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9576,1,3,0)
 ;;=3^Ulcerative Colitis w/ Abscess,Unspec
 ;;^UTILITY(U,$J,358.3,9576,1,4,0)
 ;;=4^K51.914
 ;;^UTILITY(U,$J,358.3,9576,2)
 ;;=^5008698
 ;;^UTILITY(U,$J,358.3,9577,0)
 ;;=K51.918^^69^636^8
 ;;^UTILITY(U,$J,358.3,9577,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9577,1,3,0)
 ;;=3^Ulcerative Colitis w/ Oth Complications,Unspec
 ;;^UTILITY(U,$J,358.3,9577,1,4,0)
 ;;=4^K51.918
 ;;^UTILITY(U,$J,358.3,9577,2)
 ;;=^5008699
 ;;^UTILITY(U,$J,358.3,9578,0)
 ;;=K51.911^^69^636^9
 ;;^UTILITY(U,$J,358.3,9578,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9578,1,3,0)
 ;;=3^Ulcerative Colitis w/ Rectal Bleeding,Unspec
 ;;^UTILITY(U,$J,358.3,9578,1,4,0)
 ;;=4^K51.911
 ;;^UTILITY(U,$J,358.3,9578,2)
 ;;=^5008695
 ;;^UTILITY(U,$J,358.3,9579,0)
 ;;=K52.29^^69^636^1
 ;;^UTILITY(U,$J,358.3,9579,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9579,1,3,0)
 ;;=3^Allergic/Dietetic Gastroenteritis/Colitis,Other
 ;;^UTILITY(U,$J,358.3,9579,1,4,0)
 ;;=4^K52.29
 ;;^UTILITY(U,$J,358.3,9579,2)
 ;;=^5138715
 ;;^UTILITY(U,$J,358.3,9580,0)
 ;;=K52.21^^69^636^2
 ;;^UTILITY(U,$J,358.3,9580,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9580,1,3,0)
 ;;=3^Food Protein-Induced Enterocolitis Syndrome
 ;;^UTILITY(U,$J,358.3,9580,1,4,0)
 ;;=4^K52.21
 ;;^UTILITY(U,$J,358.3,9580,2)
 ;;=^5138713
 ;;^UTILITY(U,$J,358.3,9581,0)
 ;;=K52.22^^69^636^3
 ;;^UTILITY(U,$J,358.3,9581,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9581,1,3,0)
 ;;=3^Food Protein-Induced Enteropathy
 ;;^UTILITY(U,$J,358.3,9581,1,4,0)
 ;;=4^K52.22
 ;;^UTILITY(U,$J,358.3,9581,2)
 ;;=^5138714
 ;;^UTILITY(U,$J,358.3,9582,0)
 ;;=K50.00^^69^637^11
 ;;^UTILITY(U,$J,358.3,9582,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9582,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/o Complications
 ;;^UTILITY(U,$J,358.3,9582,1,4,0)
 ;;=4^K50.00
 ;;^UTILITY(U,$J,358.3,9582,2)
 ;;=^5008624
 ;;^UTILITY(U,$J,358.3,9583,0)
 ;;=K50.011^^69^637^9
 ;;^UTILITY(U,$J,358.3,9583,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9583,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/ Rectal Bleeding
 ;;^UTILITY(U,$J,358.3,9583,1,4,0)
 ;;=4^K50.011
 ;;^UTILITY(U,$J,358.3,9583,2)
 ;;=^5008625
 ;;^UTILITY(U,$J,358.3,9584,0)
 ;;=K50.012^^69^637^7
 ;;^UTILITY(U,$J,358.3,9584,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9584,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/ Intestinal Obstruction
 ;;^UTILITY(U,$J,358.3,9584,1,4,0)
 ;;=4^K50.012
 ;;^UTILITY(U,$J,358.3,9584,2)
 ;;=^5008626
 ;;^UTILITY(U,$J,358.3,9585,0)
 ;;=K50.013^^69^637^6
 ;;^UTILITY(U,$J,358.3,9585,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9585,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/ Fistula
 ;;^UTILITY(U,$J,358.3,9585,1,4,0)
 ;;=4^K50.013
 ;;^UTILITY(U,$J,358.3,9585,2)
 ;;=^5008627
 ;;^UTILITY(U,$J,358.3,9586,0)
 ;;=K50.014^^69^637^5
 ;;^UTILITY(U,$J,358.3,9586,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9586,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,9586,1,4,0)
 ;;=4^K50.014
 ;;^UTILITY(U,$J,358.3,9586,2)
 ;;=^5008628
 ;;^UTILITY(U,$J,358.3,9587,0)
 ;;=K50.018^^69^637^8
 ;;^UTILITY(U,$J,358.3,9587,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9587,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/ Oth Complications
 ;;^UTILITY(U,$J,358.3,9587,1,4,0)
 ;;=4^K50.018
 ;;^UTILITY(U,$J,358.3,9587,2)
 ;;=^5008629
 ;;^UTILITY(U,$J,358.3,9588,0)
 ;;=K50.019^^69^637^10
 ;;^UTILITY(U,$J,358.3,9588,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9588,1,3,0)
 ;;=3^Crohn's Disease of Small Intestine w/ Unspec Complications
 ;;^UTILITY(U,$J,358.3,9588,1,4,0)
 ;;=4^K50.019
 ;;^UTILITY(U,$J,358.3,9588,2)
 ;;=^5008630
 ;;^UTILITY(U,$J,358.3,9589,0)
 ;;=K50.10^^69^637^4
 ;;^UTILITY(U,$J,358.3,9589,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9589,1,3,0)
 ;;=3^Crohn's Disease of Large Intestine w/o Complications
 ;;^UTILITY(U,$J,358.3,9589,1,4,0)
 ;;=4^K50.10
 ;;^UTILITY(U,$J,358.3,9589,2)
 ;;=^5008631
 ;;^UTILITY(U,$J,358.3,9590,0)
 ;;=K50.818^^69^637^12
 ;;^UTILITY(U,$J,358.3,9590,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9590,1,3,0)
 ;;=3^Crohn's Disease of Small/Large Intestine w/ Oth Complication
 ;;^UTILITY(U,$J,358.3,9590,1,4,0)
 ;;=4^K50.818
 ;;^UTILITY(U,$J,358.3,9590,2)
 ;;=^5008643
 ;;^UTILITY(U,$J,358.3,9591,0)
 ;;=K50.819^^69^637^13
 ;;^UTILITY(U,$J,358.3,9591,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9591,1,3,0)
 ;;=3^Crohn's Disease of Small/Large Intestine w/ Unspec Complications
 ;;^UTILITY(U,$J,358.3,9591,1,4,0)
 ;;=4^K50.819
 ;;^UTILITY(U,$J,358.3,9591,2)
 ;;=^5008644
 ;;^UTILITY(U,$J,358.3,9592,0)
 ;;=K50.912^^69^637^17
 ;;^UTILITY(U,$J,358.3,9592,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9592,1,3,0)
 ;;=3^Crohn's Disease w/ Intestinal Obstruction,Unspec
 ;;^UTILITY(U,$J,358.3,9592,1,4,0)
 ;;=4^K50.912
 ;;^UTILITY(U,$J,358.3,9592,2)
 ;;=^5008647
 ;;^UTILITY(U,$J,358.3,9593,0)
 ;;=K50.918^^69^637^18
 ;;^UTILITY(U,$J,358.3,9593,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9593,1,3,0)
 ;;=3^Crohn's Disease w/ Oth Complications,Unspec
 ;;^UTILITY(U,$J,358.3,9593,1,4,0)
 ;;=4^K50.918
 ;;^UTILITY(U,$J,358.3,9593,2)
 ;;=^5008650
 ;;^UTILITY(U,$J,358.3,9594,0)
 ;;=K50.919^^69^637^20
 ;;^UTILITY(U,$J,358.3,9594,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9594,1,3,0)
 ;;=3^Crohn's Disease w/ Unspec Complications,Unspec
 ;;^UTILITY(U,$J,358.3,9594,1,4,0)
 ;;=4^K50.919
 ;;^UTILITY(U,$J,358.3,9594,2)
 ;;=^5008651
 ;;^UTILITY(U,$J,358.3,9595,0)
 ;;=K50.911^^69^637^19
 ;;^UTILITY(U,$J,358.3,9595,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9595,1,3,0)
 ;;=3^Crohn's Disease w/ Rectal Bleeding,Unspec
 ;;^UTILITY(U,$J,358.3,9595,1,4,0)
 ;;=4^K50.911
 ;;^UTILITY(U,$J,358.3,9595,2)
 ;;=^5008646
 ;;^UTILITY(U,$J,358.3,9596,0)
 ;;=K50.90^^69^637^21
 ;;^UTILITY(U,$J,358.3,9596,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9596,1,3,0)
 ;;=3^Crohn's Disease w/o Complications,Unspec
 ;;^UTILITY(U,$J,358.3,9596,1,4,0)
 ;;=4^K50.90
 ;;^UTILITY(U,$J,358.3,9596,2)
 ;;=^5008645
 ;;^UTILITY(U,$J,358.3,9597,0)
 ;;=K50.913^^69^637^16
 ;;^UTILITY(U,$J,358.3,9597,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9597,1,3,0)
 ;;=3^Crohn's Disease w/ Fistual,Unspec
 ;;^UTILITY(U,$J,358.3,9597,1,4,0)
 ;;=4^K50.913
 ;;^UTILITY(U,$J,358.3,9597,2)
 ;;=^5008648
 ;;^UTILITY(U,$J,358.3,9598,0)
 ;;=K50.914^^69^637^15
 ;;^UTILITY(U,$J,358.3,9598,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9598,1,3,0)
 ;;=3^Crohn's Disease w/ Abscess,Unspec
 ;;^UTILITY(U,$J,358.3,9598,1,4,0)
 ;;=4^K50.914
 ;;^UTILITY(U,$J,358.3,9598,2)
 ;;=^5008649
 ;;^UTILITY(U,$J,358.3,9599,0)
 ;;=K50.114^^69^637^1
 ;;^UTILITY(U,$J,358.3,9599,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9599,1,3,0)
 ;;=3^Crohn's Disease of Large Intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,9599,1,4,0)
 ;;=4^K50.114
 ;;^UTILITY(U,$J,358.3,9599,2)
 ;;=^5008635
 ;;^UTILITY(U,$J,358.3,9600,0)
 ;;=K50.814^^69^637^14
 ;;^UTILITY(U,$J,358.3,9600,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9600,1,3,0)
 ;;=3^Crohn's Disease of Small/Large Intestine w/ Abscess
 ;;^UTILITY(U,$J,358.3,9600,1,4,0)
 ;;=4^K50.814
 ;;^UTILITY(U,$J,358.3,9600,2)
 ;;=^5008642
 ;;^UTILITY(U,$J,358.3,9601,0)
 ;;=K50.111^^69^637^2
 ;;^UTILITY(U,$J,358.3,9601,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9601,1,3,0)
 ;;=3^Crohn's Disease of Large Intestine w/ Rectal Bleeding
 ;;^UTILITY(U,$J,358.3,9601,1,4,0)
 ;;=4^K50.111
 ;;^UTILITY(U,$J,358.3,9601,2)
 ;;=^5008632
 ;;^UTILITY(U,$J,358.3,9602,0)
 ;;=K50.119^^69^637^3
 ;;^UTILITY(U,$J,358.3,9602,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9602,1,3,0)
 ;;=3^Crohn's Disease of Large Intestine w/ Unspec Complications
 ;;^UTILITY(U,$J,358.3,9602,1,4,0)
 ;;=4^K50.119
 ;;^UTILITY(U,$J,358.3,9602,2)
 ;;=^5008637
 ;;^UTILITY(U,$J,358.3,9603,0)
 ;;=K57.20^^69^638^3
 ;;^UTILITY(U,$J,358.3,9603,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9603,1,3,0)
 ;;=3^Diverticulitis of Large Intestine w/ Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,9603,1,4,0)
 ;;=4^K57.20
 ;;^UTILITY(U,$J,358.3,9603,2)
 ;;=^5008721
 ;;^UTILITY(U,$J,358.3,9604,0)
 ;;=K57.92^^69^638^2
 ;;^UTILITY(U,$J,358.3,9604,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9604,1,3,0)
 ;;=3^Diverticulitis of Intestine w/o Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,9604,1,4,0)
 ;;=4^K57.92
 ;;^UTILITY(U,$J,358.3,9604,2)
 ;;=^5008737
 ;;^UTILITY(U,$J,358.3,9605,0)
 ;;=K57.80^^69^638^1
 ;;^UTILITY(U,$J,358.3,9605,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9605,1,3,0)
 ;;=3^Diverticulitis of Intestine w/ Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,9605,1,4,0)
 ;;=4^K57.80
 ;;^UTILITY(U,$J,358.3,9605,2)
 ;;=^5008733
 ;;^UTILITY(U,$J,358.3,9606,0)
 ;;=K57.52^^69^638^5
 ;;^UTILITY(U,$J,358.3,9606,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9606,1,3,0)
 ;;=3^Diverticulitis of Small/Large Intestine w/o Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,9606,1,4,0)
 ;;=4^K57.52
 ;;^UTILITY(U,$J,358.3,9606,2)
 ;;=^5008731
 ;;^UTILITY(U,$J,358.3,9607,0)
 ;;=K57.40^^69^638^6
 ;;^UTILITY(U,$J,358.3,9607,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9607,1,3,0)
 ;;=3^Diverticulitis of Small/Large Intestine w/ Perforation/Abscess w/o Bleeding
 ;;^UTILITY(U,$J,358.3,9607,1,4,0)
 ;;=4^K57.40
 ;;^UTILITY(U,$J,358.3,9607,2)
 ;;=^5008727
 ;;^UTILITY(U,$J,358.3,9608,0)
 ;;=K57.32^^69^638^4