IBDEI0AU ; ; 01-AUG-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
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,26546,1,3,0)
;;=3^Diaphragmatic Hernia w/o Obst/Gangr
;;^UTILITY(U,$J,358.3,26546,1,4,0)
;;=4^K44.9
;;^UTILITY(U,$J,358.3,26546,2)
;;=^5008617
;;^UTILITY(U,$J,358.3,26547,0)
;;=E10.42^^83^1065^10
;;^UTILITY(U,$J,358.3,26547,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26547,1,3,0)
;;=3^Diabetes Type 1 w/ Diabetic Polyneuropathy
;;^UTILITY(U,$J,358.3,26547,1,4,0)
;;=4^E10.42
;;^UTILITY(U,$J,358.3,26547,2)
;;=^5002606
;;^UTILITY(U,$J,358.3,26548,0)
;;=E11.42^^83^1065^13
;;^UTILITY(U,$J,358.3,26548,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26548,1,3,0)
;;=3^Diabetes Type 2 w/ Diabetic Polyneuropathy
;;^UTILITY(U,$J,358.3,26548,1,4,0)
;;=4^E11.42
;;^UTILITY(U,$J,358.3,26548,2)
;;=^5002646
;;^UTILITY(U,$J,358.3,26549,0)
;;=E13.42^^83^1065^9
;;^UTILITY(U,$J,358.3,26549,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26549,1,3,0)
;;=3^Diabetes Other w/ Diabetic Polyneuropathy
;;^UTILITY(U,$J,358.3,26549,1,4,0)
;;=4^E13.42
;;^UTILITY(U,$J,358.3,26549,2)
;;=^5002686
;;^UTILITY(U,$J,358.3,26550,0)
;;=E08.42^^83^1065^16
;;^UTILITY(U,$J,358.3,26550,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26550,1,3,0)
;;=3^Diabetes d/t Underlying Condition w/ Diabetic Polyneuropathy
;;^UTILITY(U,$J,358.3,26550,1,4,0)
;;=4^E08.42
;;^UTILITY(U,$J,358.3,26550,2)
;;=^5002524
;;^UTILITY(U,$J,358.3,26551,0)
;;=E09.42^^83^1065^8
;;^UTILITY(U,$J,358.3,26551,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26551,1,3,0)
;;=3^Diabetes Drug-Induced w/ Neurological Compl w/ Diabetic Polyneuropathy
;;^UTILITY(U,$J,358.3,26551,1,4,0)
;;=4^E09.42
;;^UTILITY(U,$J,358.3,26551,2)
;;=^5002566
;;^UTILITY(U,$J,358.3,26552,0)
;;=M54.9^^83^1065^21
;;^UTILITY(U,$J,358.3,26552,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26552,1,3,0)
;;=3^Dorsalgia,Unspec
;;^UTILITY(U,$J,358.3,26552,1,4,0)
;;=4^M54.9
;;^UTILITY(U,$J,358.3,26552,2)
;;=^5012314
;;^UTILITY(U,$J,358.3,26553,0)
;;=K26.9^^83^1065^22
;;^UTILITY(U,$J,358.3,26553,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26553,1,3,0)
;;=3^Duodenal Ulcer w/o Hemorrhage/Perforation
;;^UTILITY(U,$J,358.3,26553,1,4,0)
;;=4^K26.9
;;^UTILITY(U,$J,358.3,26553,2)
;;=^5008527
;;^UTILITY(U,$J,358.3,26554,0)
;;=N40.0^^83^1066^4
;;^UTILITY(U,$J,358.3,26554,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26554,1,3,0)
;;=3^Enlarged Prostate w/o Lower Urinary Tract Symptoms
;;^UTILITY(U,$J,358.3,26554,1,4,0)
;;=4^N40.0
;;^UTILITY(U,$J,358.3,26554,2)
;;=^5015689
;;^UTILITY(U,$J,358.3,26555,0)
;;=N40.1^^83^1066^3
;;^UTILITY(U,$J,358.3,26555,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26555,1,3,0)
;;=3^Enlarged Prostate w/ Lower Urinary Tract Symptoms
;;^UTILITY(U,$J,358.3,26555,1,4,0)
;;=4^N40.1
;;^UTILITY(U,$J,358.3,26555,2)
;;=^5015690
;;^UTILITY(U,$J,358.3,26556,0)
;;=E87.70^^83^1066^16
;;^UTILITY(U,$J,358.3,26556,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26556,1,3,0)
;;=3^Fluid Overload,Unspec
;;^UTILITY(U,$J,358.3,26556,1,4,0)
;;=4^E87.70
;;^UTILITY(U,$J,358.3,26556,2)
;;=^5003023
;;^UTILITY(U,$J,358.3,26557,0)
;;=J43.9^^83^1066^2
;;^UTILITY(U,$J,358.3,26557,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26557,1,3,0)
;;=3^Emphysema,Unspec
;;^UTILITY(U,$J,358.3,26557,1,4,0)
;;=4^J43.9
;;^UTILITY(U,$J,358.3,26557,2)
;;=^5008238
;;^UTILITY(U,$J,358.3,26558,0)
;;=K22.10^^83^1066^12
;;^UTILITY(U,$J,358.3,26558,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26558,1,3,0)
;;=3^Esophagus Ulcer w/o Bleeding
;;^UTILITY(U,$J,358.3,26558,1,4,0)
;;=4^K22.10
;;^UTILITY(U,$J,358.3,26558,2)
;;=^329929
;;^UTILITY(U,$J,358.3,26559,0)
;;=K22.11^^83^1066^11
;;^UTILITY(U,$J,358.3,26559,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26559,1,3,0)
;;=3^Esophagus Ulcer w/ Bleeding
;;^UTILITY(U,$J,358.3,26559,1,4,0)
;;=4^K22.11
;;^UTILITY(U,$J,358.3,26559,2)
;;=^329930
;;^UTILITY(U,$J,358.3,26560,0)
;;=K22.2^^83^1066^8
;;^UTILITY(U,$J,358.3,26560,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26560,1,3,0)
;;=3^Esophageal Obstruction
;;^UTILITY(U,$J,358.3,26560,1,4,0)
;;=4^K22.2
;;^UTILITY(U,$J,358.3,26560,2)
;;=^5008507
;;^UTILITY(U,$J,358.3,26561,0)
;;=M79.7^^83^1066^15
;;^UTILITY(U,$J,358.3,26561,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26561,1,3,0)
;;=3^Fibromyalgia
;;^UTILITY(U,$J,358.3,26561,1,4,0)
;;=4^M79.7
;;^UTILITY(U,$J,358.3,26561,2)
;;=^46261
;;^UTILITY(U,$J,358.3,26562,0)
;;=R50.9^^83^1066^14
;;^UTILITY(U,$J,358.3,26562,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26562,1,3,0)
;;=3^Fever,Unspec
;;^UTILITY(U,$J,358.3,26562,1,4,0)
;;=4^R50.9
;;^UTILITY(U,$J,358.3,26562,2)
;;=^5019512
;;^UTILITY(U,$J,358.3,26563,0)
;;=R53.83^^83^1066^13
;;^UTILITY(U,$J,358.3,26563,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26563,1,3,0)
;;=3^Fatigue,Other
;;^UTILITY(U,$J,358.3,26563,1,4,0)
;;=4^R53.83
;;^UTILITY(U,$J,358.3,26563,2)
;;=^5019520
;;^UTILITY(U,$J,358.3,26564,0)
;;=R60.9^^83^1066^1
;;^UTILITY(U,$J,358.3,26564,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26564,1,3,0)
;;=3^Edema,Unspec
;;^UTILITY(U,$J,358.3,26564,1,4,0)
;;=4^R60.9
;;^UTILITY(U,$J,358.3,26564,2)
;;=^5019534
;;^UTILITY(U,$J,358.3,26565,0)
;;=R04.0^^83^1066^7
;;^UTILITY(U,$J,358.3,26565,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26565,1,3,0)
;;=3^Epistaxis
;;^UTILITY(U,$J,358.3,26565,1,4,0)
;;=4^R04.0
;;^UTILITY(U,$J,358.3,26565,2)
;;=^5019173
;;^UTILITY(U,$J,358.3,26566,0)
;;=G40.909^^83^1066^6
;;^UTILITY(U,$J,358.3,26566,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26566,1,3,0)
;;=3^Epilepsy Not Intractable w/o Status Epilepticus
;;^UTILITY(U,$J,358.3,26566,1,4,0)
;;=4^G40.909
;;^UTILITY(U,$J,358.3,26566,2)
;;=^5003865
;;^UTILITY(U,$J,358.3,26567,0)
;;=M77.9^^83^1066^5
;;^UTILITY(U,$J,358.3,26567,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26567,1,3,0)
;;=3^Enthesopathy,Unspec
;;^UTILITY(U,$J,358.3,26567,1,4,0)
;;=4^M77.9
;;^UTILITY(U,$J,358.3,26567,2)
;;=^5013319
;;^UTILITY(U,$J,358.3,26568,0)
;;=K20.90^^83^1066^10
;;^UTILITY(U,$J,358.3,26568,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26568,1,3,0)
;;=3^Esophagitis,Unspec w/o Bleeding
;;^UTILITY(U,$J,358.3,26568,1,4,0)
;;=4^K20.90
;;^UTILITY(U,$J,358.3,26568,2)
;;=^5159212
;;^UTILITY(U,$J,358.3,26569,0)
;;=K20.91^^83^1066^9
;;^UTILITY(U,$J,358.3,26569,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26569,1,3,0)
;;=3^Esophagitis,Unspec w/ Bleeding
;;^UTILITY(U,$J,358.3,26569,1,4,0)
;;=4^K20.91
;;^UTILITY(U,$J,358.3,26569,2)
;;=^5159213
;;^UTILITY(U,$J,358.3,26570,0)
;;=M10.9^^83^1067^8
;;^UTILITY(U,$J,358.3,26570,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26570,1,3,0)
;;=3^Gout,Unspec
;;^UTILITY(U,$J,358.3,26570,1,4,0)
;;=4^M10.9
;;^UTILITY(U,$J,358.3,26570,2)
;;=^5010404
;;^UTILITY(U,$J,358.3,26571,0)
;;=H40.9^^83^1067^7
;;^UTILITY(U,$J,358.3,26571,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26571,1,3,0)
;;=3^Glaucoma,Unspec
;;^UTILITY(U,$J,358.3,26571,1,4,0)
;;=4^H40.9
;;^UTILITY(U,$J,358.3,26571,2)
;;=^5005931
;;^UTILITY(U,$J,358.3,26572,0)
;;=K21.9^^83^1067^1
;;^UTILITY(U,$J,358.3,26572,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26572,1,3,0)
;;=3^GERD w/o Esophagitis
;;^UTILITY(U,$J,358.3,26572,1,4,0)
;;=4^K21.9
;;^UTILITY(U,$J,358.3,26572,2)
;;=^5008505
;;^UTILITY(U,$J,358.3,26573,0)
;;=K29.70^^83^1067^4
;;^UTILITY(U,$J,358.3,26573,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26573,1,3,0)
;;=3^Gastritis w/o Bleeding,Unspec
;;^UTILITY(U,$J,358.3,26573,1,4,0)
;;=4^K29.70
;;^UTILITY(U,$J,358.3,26573,2)
;;=^5008552
;;^UTILITY(U,$J,358.3,26574,0)
;;=K52.9^^83^1067^5
;;^UTILITY(U,$J,358.3,26574,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26574,1,3,0)
;;=3^Gastroenteritis & Colitis Noninfective,Unspec
;;^UTILITY(U,$J,358.3,26574,1,4,0)
;;=4^K52.9
;;^UTILITY(U,$J,358.3,26574,2)
;;=^5008704
;;^UTILITY(U,$J,358.3,26575,0)
;;=K82.9^^83^1067^2
;;^UTILITY(U,$J,358.3,26575,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26575,1,3,0)
;;=3^Gallbladder Disease,Unspec
;;^UTILITY(U,$J,358.3,26575,1,4,0)
;;=4^K82.9
;;^UTILITY(U,$J,358.3,26575,2)
;;=^5008875
;;^UTILITY(U,$J,358.3,26576,0)
;;=K92.2^^83^1067^6
;;^UTILITY(U,$J,358.3,26576,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26576,1,3,0)
;;=3^Gastrointestinal Hemorrhage,Unspec
;;^UTILITY(U,$J,358.3,26576,1,4,0)
;;=4^K92.2
;;^UTILITY(U,$J,358.3,26576,2)
;;=^5008915
;;^UTILITY(U,$J,358.3,26577,0)
;;=K25.9^^83^1067^3
;;^UTILITY(U,$J,358.3,26577,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26577,1,3,0)
;;=3^Gastric Ulcer w/o Hemorrhage/Perforation
;;^UTILITY(U,$J,358.3,26577,1,4,0)
;;=4^K25.9
;;^UTILITY(U,$J,358.3,26577,2)
;;=^5008522
;;^UTILITY(U,$J,358.3,26578,0)
;;=I69.959^^83^1068^22
;;^UTILITY(U,$J,358.3,26578,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26578,1,3,0)
;;=3^Hemiplegia/Hemiparesis Following Unspec Cerebrovascular Disease
;;^UTILITY(U,$J,358.3,26578,1,4,0)
;;=4^I69.959
;;^UTILITY(U,$J,358.3,26578,2)
;;=^5007563
;;^UTILITY(U,$J,358.3,26579,0)
;;=D89.2^^83^1068^33
;;^UTILITY(U,$J,358.3,26579,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26579,1,3,0)
;;=3^Hypergammaglobulinemia,Unspec
;;^UTILITY(U,$J,358.3,26579,1,4,0)
;;=4^D89.2
;;^UTILITY(U,$J,358.3,26579,2)
;;=^5002455
;;^UTILITY(U,$J,358.3,26580,0)
;;=B19.10^^83^1068^26
;;^UTILITY(U,$J,358.3,26580,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26580,1,3,0)
;;=3^Hepatitis B w/o Hepatic Coma
;;^UTILITY(U,$J,358.3,26580,1,4,0)
;;=4^B19.10
;;^UTILITY(U,$J,358.3,26580,2)
;;=^5000552
;;^UTILITY(U,$J,358.3,26581,0)
;;=B17.10^^83^1068^27
;;^UTILITY(U,$J,358.3,26581,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26581,1,3,0)
;;=3^Hepatitis C w/o Hepatic Coma,Acute
;;^UTILITY(U,$J,358.3,26581,1,4,0)
;;=4^B17.10
;;^UTILITY(U,$J,358.3,26581,2)
;;=^5000542
;;^UTILITY(U,$J,358.3,26582,0)
;;=B18.2^^83^1068^28
;;^UTILITY(U,$J,358.3,26582,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26582,1,3,0)
;;=3^Hepatitis C,Chr/Carrier
;;^UTILITY(U,$J,358.3,26582,1,4,0)
;;=4^B18.2
;;^UTILITY(U,$J,358.3,26582,2)
;;=^5000548
;;^UTILITY(U,$J,358.3,26583,0)
;;=E03.9^^83^1068^42
;;^UTILITY(U,$J,358.3,26583,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26583,1,3,0)
;;=3^Hypothyroidism,Unspec
;;^UTILITY(U,$J,358.3,26583,1,4,0)
;;=4^E03.9
;;^UTILITY(U,$J,358.3,26583,2)
;;=^5002476
;;^UTILITY(U,$J,358.3,26584,0)
;;=E16.2^^83^1068^39
;;^UTILITY(U,$J,358.3,26584,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26584,1,3,0)
;;=3^Hypoglycemia,Unspec
;;^UTILITY(U,$J,358.3,26584,1,4,0)
;;=4^E16.2
;;^UTILITY(U,$J,358.3,26584,2)
;;=^5002708
;;^UTILITY(U,$J,358.3,26585,0)
;;=E78.1^^83^1068^34
;;^UTILITY(U,$J,358.3,26585,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26585,1,3,0)
;;=3^Hyperglyceridemia,Pure
;;^UTILITY(U,$J,358.3,26585,1,4,0)
;;=4^E78.1
;;^UTILITY(U,$J,358.3,26585,2)
;;=^101303
;;^UTILITY(U,$J,358.3,26586,0)
;;=E78.5^^83^1068^37
;;^UTILITY(U,$J,358.3,26586,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26586,1,3,0)
;;=3^Hyperlipidemia,Unspec
;;^UTILITY(U,$J,358.3,26586,1,4,0)
;;=4^E78.5
;;^UTILITY(U,$J,358.3,26586,2)
;;=^5002969
;;^UTILITY(U,$J,358.3,26587,0)
;;=E87.1^^83^1068^38
;;^UTILITY(U,$J,358.3,26587,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26587,1,3,0)
;;=3^Hypo-osmolatlity & Hyponatremia
;;^UTILITY(U,$J,358.3,26587,1,4,0)
;;=4^E87.1
;;^UTILITY(U,$J,358.3,26587,2)
;;=^5003019
;;^UTILITY(U,$J,358.3,26588,0)
;;=E87.5^^83^1068^35
;;^UTILITY(U,$J,358.3,26588,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26588,1,3,0)
;;=3^Hyperkalemia
;;^UTILITY(U,$J,358.3,26588,1,4,0)
;;=4^E87.5
;;^UTILITY(U,$J,358.3,26588,2)
;;=^60041
;;^UTILITY(U,$J,358.3,26589,0)
;;=E87.6^^83^1068^40
;;^UTILITY(U,$J,358.3,26589,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26589,1,3,0)
;;=3^Hypokalemia
;;^UTILITY(U,$J,358.3,26589,1,4,0)
;;=4^E87.6
;;^UTILITY(U,$J,358.3,26589,2)
;;=^60610
;;^UTILITY(U,$J,358.3,26590,0)
;;=G81.90^^83^1068^19
;;^UTILITY(U,$J,358.3,26590,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26590,1,3,0)
;;=3^Hemiplegia,Unspec
;;^UTILITY(U,$J,358.3,26590,1,4,0)
;;=4^G81.90
;;^UTILITY(U,$J,358.3,26590,2)
;;=^5004120
;;^UTILITY(U,$J,358.3,26591,0)
;;=G81.91^^83^1068^18
;;^UTILITY(U,$J,358.3,26591,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26591,1,3,0)
;;=3^Hemiplegia Affecting Right Dominant Side
;;^UTILITY(U,$J,358.3,26591,1,4,0)
;;=4^G81.91
;;^UTILITY(U,$J,358.3,26591,2)
;;=^5004121
;;^UTILITY(U,$J,358.3,26592,0)
;;=G81.92^^83^1068^17
;;^UTILITY(U,$J,358.3,26592,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26592,1,3,0)
;;=3^Hemiplegia Affecting Left Dominant Side
;;^UTILITY(U,$J,358.3,26592,1,4,0)
;;=4^G81.92
;;^UTILITY(U,$J,358.3,26592,2)
;;=^5004122
;;^UTILITY(U,$J,358.3,26593,0)
;;=H91.91^^83^1068^7
;;^UTILITY(U,$J,358.3,26593,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26593,1,3,0)
;;=3^Hearing Loss,Unspec,Right Ear
;;^UTILITY(U,$J,358.3,26593,1,4,0)
;;=4^H91.91
;;^UTILITY(U,$J,358.3,26593,2)
;;=^5133553
;;^UTILITY(U,$J,358.3,26594,0)
;;=H91.92^^83^1068^6
;;^UTILITY(U,$J,358.3,26594,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26594,1,3,0)
;;=3^Hearing Loss,Unspec,Left Ear
;;^UTILITY(U,$J,358.3,26594,1,4,0)
;;=4^H91.92
;;^UTILITY(U,$J,358.3,26594,2)
;;=^5133554
;;^UTILITY(U,$J,358.3,26595,0)
;;=H91.93^^83^1068^5
;;^UTILITY(U,$J,358.3,26595,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26595,1,3,0)
;;=3^Hearing Loss,Unspec,Bilateral
;;^UTILITY(U,$J,358.3,26595,1,4,0)
;;=4^H91.93
;;^UTILITY(U,$J,358.3,26595,2)
;;=^5006944
;;^UTILITY(U,$J,358.3,26596,0)
;;=I10.^^83^1068^2
;;^UTILITY(U,$J,358.3,26596,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26596,1,3,0)
;;=3^HTN,Essential
;;^UTILITY(U,$J,358.3,26596,1,4,0)
;;=4^I10.
;;^UTILITY(U,$J,358.3,26596,2)
;;=^5007062
;;^UTILITY(U,$J,358.3,26597,0)
;;=K64.8^^83^1068^25
;;^UTILITY(U,$J,358.3,26597,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26597,1,3,0)
;;=3^Hemorrhoids,Other
;;^UTILITY(U,$J,358.3,26597,1,4,0)
;;=4^K64.8
;;^UTILITY(U,$J,358.3,26597,2)
;;=^5008774
;;^UTILITY(U,$J,358.3,26598,0)
;;=K64.4^^83^1068^24
;;^UTILITY(U,$J,358.3,26598,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26598,1,3,0)
;;=3^Hemorrhoidal Skin Tags,Residual
;;^UTILITY(U,$J,358.3,26598,1,4,0)
;;=4^K64.4
;;^UTILITY(U,$J,358.3,26598,2)
;;=^269834
;;^UTILITY(U,$J,358.3,26599,0)
;;=I95.9^^83^1068^41
;;^UTILITY(U,$J,358.3,26599,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26599,1,3,0)
;;=3^Hypotension,Unspec
;;^UTILITY(U,$J,358.3,26599,1,4,0)
;;=4^I95.9
;;^UTILITY(U,$J,358.3,26599,2)
;;=^5008080
;;^UTILITY(U,$J,358.3,26600,0)
;;=K73.9^^83^1068^29
;;^UTILITY(U,$J,358.3,26600,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26600,1,3,0)
;;=3^Hepatitis,Chr Unspec
;;^UTILITY(U,$J,358.3,26600,1,4,0)
;;=4^K73.9
;;^UTILITY(U,$J,358.3,26600,2)
;;=^5008815
;;^UTILITY(U,$J,358.3,26601,0)
;;=R31.9^^83^1068^16
;;^UTILITY(U,$J,358.3,26601,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26601,1,3,0)
;;=3^Hematuria,Unspec
;;^UTILITY(U,$J,358.3,26601,1,4,0)
;;=4^R31.9
;;^UTILITY(U,$J,358.3,26601,2)
;;=^5019328
;;^UTILITY(U,$J,358.3,26602,0)
;;=N43.3^^83^1068^30
;;^UTILITY(U,$J,358.3,26602,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26602,1,3,0)
;;=3^Hydrocele,Unspec
;;^UTILITY(U,$J,358.3,26602,1,4,0)
;;=4^N43.3
;;^UTILITY(U,$J,358.3,26602,2)
;;=^5015700
;;^UTILITY(U,$J,358.3,26603,0)
;;=Z21.^^83^1068^1
;;^UTILITY(U,$J,358.3,26603,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26603,1,3,0)
;;=3^HIV Status,Asymptomatic
;;^UTILITY(U,$J,358.3,26603,1,4,0)
;;=4^Z21.
;;^UTILITY(U,$J,358.3,26603,2)
;;=^5062777
;;^UTILITY(U,$J,358.3,26604,0)
;;=K62.5^^83^1068^23
;;^UTILITY(U,$J,358.3,26604,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26604,1,3,0)
;;=3^Hemorrhage Anus & Rectum
;;^UTILITY(U,$J,358.3,26604,1,4,0)
;;=4^K62.5
;;^UTILITY(U,$J,358.3,26604,2)
;;=^5008755
;;^UTILITY(U,$J,358.3,26605,0)
;;=E78.00^^83^1068^32
;;^UTILITY(U,$J,358.3,26605,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26605,1,3,0)
;;=3^Hypercholesterolemia,Pure,Unspec
;;^UTILITY(U,$J,358.3,26605,1,4,0)
;;=4^E78.00
;;^UTILITY(U,$J,358.3,26605,2)
;;=^5138435
;;^UTILITY(U,$J,358.3,26606,0)
;;=E78.01^^83^1068^31
;;^UTILITY(U,$J,358.3,26606,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26606,1,3,0)
;;=3^Hypercholesterolemia,Familial
;;^UTILITY(U,$J,358.3,26606,1,4,0)
;;=4^E78.01
;;^UTILITY(U,$J,358.3,26606,2)
;;=^7570555
;;^UTILITY(U,$J,358.3,26607,0)
;;=I50.810^^83^1068^15
;;^UTILITY(U,$J,358.3,26607,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26607,1,3,0)
;;=3^Heart Failure,Right,Unspec
;;^UTILITY(U,$J,358.3,26607,1,4,0)
;;=4^I50.810
;;^UTILITY(U,$J,358.3,26607,2)
;;=^5151384
;;^UTILITY(U,$J,358.3,26608,0)
;;=I50.811^^83^1068^12
;;^UTILITY(U,$J,358.3,26608,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26608,1,3,0)
;;=3^Heart Failure,Right,Acute
;;^UTILITY(U,$J,358.3,26608,1,4,0)
;;=4^I50.811
;;^UTILITY(U,$J,358.3,26608,2)
;;=^5151385
;;^UTILITY(U,$J,358.3,26609,0)
;;=I50.812^^83^1068^14
;;^UTILITY(U,$J,358.3,26609,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26609,1,3,0)
;;=3^Heart Failure,Right,Chronic
;;^UTILITY(U,$J,358.3,26609,1,4,0)
;;=4^I50.812
;;^UTILITY(U,$J,358.3,26609,2)
;;=^5151386
;;^UTILITY(U,$J,358.3,26610,0)
;;=I50.813^^83^1068^13
;;^UTILITY(U,$J,358.3,26610,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26610,1,3,0)
;;=3^Heart Failure,Right,Acute on Chronic
;;^UTILITY(U,$J,358.3,26610,1,4,0)
;;=4^I50.813
;;^UTILITY(U,$J,358.3,26610,2)
;;=^5151387
;;^UTILITY(U,$J,358.3,26611,0)
;;=I50.814^^83^1068^11
;;^UTILITY(U,$J,358.3,26611,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26611,1,3,0)
;;=3^Heart Failure,Right d/t Left Heart Failure
;;^UTILITY(U,$J,358.3,26611,1,4,0)
;;=4^I50.814
;;^UTILITY(U,$J,358.3,26611,2)
;;=^5151388
;;^UTILITY(U,$J,358.3,26612,0)
;;=I50.82^^83^1068^8
;;^UTILITY(U,$J,358.3,26612,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26612,1,3,0)
;;=3^Heart Failure,Biventricular
;;^UTILITY(U,$J,358.3,26612,1,4,0)
;;=4^I50.82
;;^UTILITY(U,$J,358.3,26612,2)
;;=^5151389
;;^UTILITY(U,$J,358.3,26613,0)
;;=I50.83^^83^1068^10
;;^UTILITY(U,$J,358.3,26613,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26613,1,3,0)
;;=3^Heart Failure,High Output
;;^UTILITY(U,$J,358.3,26613,1,4,0)
;;=4^I50.83
;;^UTILITY(U,$J,358.3,26613,2)
;;=^5151390
;;^UTILITY(U,$J,358.3,26614,0)
;;=I50.84^^83^1068^9
;;^UTILITY(U,$J,358.3,26614,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26614,1,3,0)
;;=3^Heart Failure,End Stage
;;^UTILITY(U,$J,358.3,26614,1,4,0)
;;=4^I50.84
;;^UTILITY(U,$J,358.3,26614,2)
;;=^5151391
;;^UTILITY(U,$J,358.3,26615,0)
;;=E78.49^^83^1068^36
;;^UTILITY(U,$J,358.3,26615,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,26615,1,3,0)
;;=3^Hyperlipidemia,Other
;;^UTILITY(U,$J,358.3,26615,1,4,0)
;;=4^E78.49
;;^UTILITY(U,$J,358.3,26615,2)
;;=^5157299
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0AU 19777 printed Apr 09, 2024@21:10:34 Page 2
IBDEI0AU ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
+2 if 'DIFQR(358.3)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
if X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
if $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
if $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,358.3,26546,1,3,0)
+2 ;;=3^Diaphragmatic Hernia w/o Obst/Gangr
+3 ;;^UTILITY(U,$J,358.3,26546,1,4,0)
+4 ;;=4^K44.9
+5 ;;^UTILITY(U,$J,358.3,26546,2)
+6 ;;=^5008617
+7 ;;^UTILITY(U,$J,358.3,26547,0)
+8 ;;=E10.42^^83^1065^10
+9 ;;^UTILITY(U,$J,358.3,26547,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,26547,1,3,0)
+12 ;;=3^Diabetes Type 1 w/ Diabetic Polyneuropathy
+13 ;;^UTILITY(U,$J,358.3,26547,1,4,0)
+14 ;;=4^E10.42
+15 ;;^UTILITY(U,$J,358.3,26547,2)
+16 ;;=^5002606
+17 ;;^UTILITY(U,$J,358.3,26548,0)
+18 ;;=E11.42^^83^1065^13
+19 ;;^UTILITY(U,$J,358.3,26548,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,26548,1,3,0)
+22 ;;=3^Diabetes Type 2 w/ Diabetic Polyneuropathy
+23 ;;^UTILITY(U,$J,358.3,26548,1,4,0)
+24 ;;=4^E11.42
+25 ;;^UTILITY(U,$J,358.3,26548,2)
+26 ;;=^5002646
+27 ;;^UTILITY(U,$J,358.3,26549,0)
+28 ;;=E13.42^^83^1065^9
+29 ;;^UTILITY(U,$J,358.3,26549,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,26549,1,3,0)
+32 ;;=3^Diabetes Other w/ Diabetic Polyneuropathy
+33 ;;^UTILITY(U,$J,358.3,26549,1,4,0)
+34 ;;=4^E13.42
+35 ;;^UTILITY(U,$J,358.3,26549,2)
+36 ;;=^5002686
+37 ;;^UTILITY(U,$J,358.3,26550,0)
+38 ;;=E08.42^^83^1065^16
+39 ;;^UTILITY(U,$J,358.3,26550,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,26550,1,3,0)
+42 ;;=3^Diabetes d/t Underlying Condition w/ Diabetic Polyneuropathy
+43 ;;^UTILITY(U,$J,358.3,26550,1,4,0)
+44 ;;=4^E08.42
+45 ;;^UTILITY(U,$J,358.3,26550,2)
+46 ;;=^5002524
+47 ;;^UTILITY(U,$J,358.3,26551,0)
+48 ;;=E09.42^^83^1065^8
+49 ;;^UTILITY(U,$J,358.3,26551,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,26551,1,3,0)
+52 ;;=3^Diabetes Drug-Induced w/ Neurological Compl w/ Diabetic Polyneuropathy
+53 ;;^UTILITY(U,$J,358.3,26551,1,4,0)
+54 ;;=4^E09.42
+55 ;;^UTILITY(U,$J,358.3,26551,2)
+56 ;;=^5002566
+57 ;;^UTILITY(U,$J,358.3,26552,0)
+58 ;;=M54.9^^83^1065^21
+59 ;;^UTILITY(U,$J,358.3,26552,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,26552,1,3,0)
+62 ;;=3^Dorsalgia,Unspec
+63 ;;^UTILITY(U,$J,358.3,26552,1,4,0)
+64 ;;=4^M54.9
+65 ;;^UTILITY(U,$J,358.3,26552,2)
+66 ;;=^5012314
+67 ;;^UTILITY(U,$J,358.3,26553,0)
+68 ;;=K26.9^^83^1065^22
+69 ;;^UTILITY(U,$J,358.3,26553,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,26553,1,3,0)
+72 ;;=3^Duodenal Ulcer w/o Hemorrhage/Perforation
+73 ;;^UTILITY(U,$J,358.3,26553,1,4,0)
+74 ;;=4^K26.9
+75 ;;^UTILITY(U,$J,358.3,26553,2)
+76 ;;=^5008527
+77 ;;^UTILITY(U,$J,358.3,26554,0)
+78 ;;=N40.0^^83^1066^4
+79 ;;^UTILITY(U,$J,358.3,26554,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,26554,1,3,0)
+82 ;;=3^Enlarged Prostate w/o Lower Urinary Tract Symptoms
+83 ;;^UTILITY(U,$J,358.3,26554,1,4,0)
+84 ;;=4^N40.0
+85 ;;^UTILITY(U,$J,358.3,26554,2)
+86 ;;=^5015689
+87 ;;^UTILITY(U,$J,358.3,26555,0)
+88 ;;=N40.1^^83^1066^3
+89 ;;^UTILITY(U,$J,358.3,26555,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,26555,1,3,0)
+92 ;;=3^Enlarged Prostate w/ Lower Urinary Tract Symptoms
+93 ;;^UTILITY(U,$J,358.3,26555,1,4,0)
+94 ;;=4^N40.1
+95 ;;^UTILITY(U,$J,358.3,26555,2)
+96 ;;=^5015690
+97 ;;^UTILITY(U,$J,358.3,26556,0)
+98 ;;=E87.70^^83^1066^16
+99 ;;^UTILITY(U,$J,358.3,26556,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,26556,1,3,0)
+102 ;;=3^Fluid Overload,Unspec
+103 ;;^UTILITY(U,$J,358.3,26556,1,4,0)
+104 ;;=4^E87.70
+105 ;;^UTILITY(U,$J,358.3,26556,2)
+106 ;;=^5003023
+107 ;;^UTILITY(U,$J,358.3,26557,0)
+108 ;;=J43.9^^83^1066^2
+109 ;;^UTILITY(U,$J,358.3,26557,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,26557,1,3,0)
+112 ;;=3^Emphysema,Unspec
+113 ;;^UTILITY(U,$J,358.3,26557,1,4,0)
+114 ;;=4^J43.9
+115 ;;^UTILITY(U,$J,358.3,26557,2)
+116 ;;=^5008238
+117 ;;^UTILITY(U,$J,358.3,26558,0)
+118 ;;=K22.10^^83^1066^12
+119 ;;^UTILITY(U,$J,358.3,26558,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,26558,1,3,0)
+122 ;;=3^Esophagus Ulcer w/o Bleeding
+123 ;;^UTILITY(U,$J,358.3,26558,1,4,0)
+124 ;;=4^K22.10
+125 ;;^UTILITY(U,$J,358.3,26558,2)
+126 ;;=^329929
+127 ;;^UTILITY(U,$J,358.3,26559,0)
+128 ;;=K22.11^^83^1066^11
+129 ;;^UTILITY(U,$J,358.3,26559,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,26559,1,3,0)
+132 ;;=3^Esophagus Ulcer w/ Bleeding
+133 ;;^UTILITY(U,$J,358.3,26559,1,4,0)
+134 ;;=4^K22.11
+135 ;;^UTILITY(U,$J,358.3,26559,2)
+136 ;;=^329930
+137 ;;^UTILITY(U,$J,358.3,26560,0)
+138 ;;=K22.2^^83^1066^8
+139 ;;^UTILITY(U,$J,358.3,26560,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,26560,1,3,0)
+142 ;;=3^Esophageal Obstruction
+143 ;;^UTILITY(U,$J,358.3,26560,1,4,0)
+144 ;;=4^K22.2
+145 ;;^UTILITY(U,$J,358.3,26560,2)
+146 ;;=^5008507
+147 ;;^UTILITY(U,$J,358.3,26561,0)
+148 ;;=M79.7^^83^1066^15
+149 ;;^UTILITY(U,$J,358.3,26561,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,26561,1,3,0)
+152 ;;=3^Fibromyalgia
+153 ;;^UTILITY(U,$J,358.3,26561,1,4,0)
+154 ;;=4^M79.7
+155 ;;^UTILITY(U,$J,358.3,26561,2)
+156 ;;=^46261
+157 ;;^UTILITY(U,$J,358.3,26562,0)
+158 ;;=R50.9^^83^1066^14
+159 ;;^UTILITY(U,$J,358.3,26562,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,26562,1,3,0)
+162 ;;=3^Fever,Unspec
+163 ;;^UTILITY(U,$J,358.3,26562,1,4,0)
+164 ;;=4^R50.9
+165 ;;^UTILITY(U,$J,358.3,26562,2)
+166 ;;=^5019512
+167 ;;^UTILITY(U,$J,358.3,26563,0)
+168 ;;=R53.83^^83^1066^13
+169 ;;^UTILITY(U,$J,358.3,26563,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,26563,1,3,0)
+172 ;;=3^Fatigue,Other
+173 ;;^UTILITY(U,$J,358.3,26563,1,4,0)
+174 ;;=4^R53.83
+175 ;;^UTILITY(U,$J,358.3,26563,2)
+176 ;;=^5019520
+177 ;;^UTILITY(U,$J,358.3,26564,0)
+178 ;;=R60.9^^83^1066^1
+179 ;;^UTILITY(U,$J,358.3,26564,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,26564,1,3,0)
+182 ;;=3^Edema,Unspec
+183 ;;^UTILITY(U,$J,358.3,26564,1,4,0)
+184 ;;=4^R60.9
+185 ;;^UTILITY(U,$J,358.3,26564,2)
+186 ;;=^5019534
+187 ;;^UTILITY(U,$J,358.3,26565,0)
+188 ;;=R04.0^^83^1066^7
+189 ;;^UTILITY(U,$J,358.3,26565,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,26565,1,3,0)
+192 ;;=3^Epistaxis
+193 ;;^UTILITY(U,$J,358.3,26565,1,4,0)
+194 ;;=4^R04.0
+195 ;;^UTILITY(U,$J,358.3,26565,2)
+196 ;;=^5019173
+197 ;;^UTILITY(U,$J,358.3,26566,0)
+198 ;;=G40.909^^83^1066^6
+199 ;;^UTILITY(U,$J,358.3,26566,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,26566,1,3,0)
+202 ;;=3^Epilepsy Not Intractable w/o Status Epilepticus
+203 ;;^UTILITY(U,$J,358.3,26566,1,4,0)
+204 ;;=4^G40.909
+205 ;;^UTILITY(U,$J,358.3,26566,2)
+206 ;;=^5003865
+207 ;;^UTILITY(U,$J,358.3,26567,0)
+208 ;;=M77.9^^83^1066^5
+209 ;;^UTILITY(U,$J,358.3,26567,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,26567,1,3,0)
+212 ;;=3^Enthesopathy,Unspec
+213 ;;^UTILITY(U,$J,358.3,26567,1,4,0)
+214 ;;=4^M77.9
+215 ;;^UTILITY(U,$J,358.3,26567,2)
+216 ;;=^5013319
+217 ;;^UTILITY(U,$J,358.3,26568,0)
+218 ;;=K20.90^^83^1066^10
+219 ;;^UTILITY(U,$J,358.3,26568,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,26568,1,3,0)
+222 ;;=3^Esophagitis,Unspec w/o Bleeding
+223 ;;^UTILITY(U,$J,358.3,26568,1,4,0)
+224 ;;=4^K20.90
+225 ;;^UTILITY(U,$J,358.3,26568,2)
+226 ;;=^5159212
+227 ;;^UTILITY(U,$J,358.3,26569,0)
+228 ;;=K20.91^^83^1066^9
+229 ;;^UTILITY(U,$J,358.3,26569,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,26569,1,3,0)
+232 ;;=3^Esophagitis,Unspec w/ Bleeding
+233 ;;^UTILITY(U,$J,358.3,26569,1,4,0)
+234 ;;=4^K20.91
+235 ;;^UTILITY(U,$J,358.3,26569,2)
+236 ;;=^5159213
+237 ;;^UTILITY(U,$J,358.3,26570,0)
+238 ;;=M10.9^^83^1067^8
+239 ;;^UTILITY(U,$J,358.3,26570,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,26570,1,3,0)
+242 ;;=3^Gout,Unspec
+243 ;;^UTILITY(U,$J,358.3,26570,1,4,0)
+244 ;;=4^M10.9
+245 ;;^UTILITY(U,$J,358.3,26570,2)
+246 ;;=^5010404
+247 ;;^UTILITY(U,$J,358.3,26571,0)
+248 ;;=H40.9^^83^1067^7
+249 ;;^UTILITY(U,$J,358.3,26571,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,26571,1,3,0)
+252 ;;=3^Glaucoma,Unspec
+253 ;;^UTILITY(U,$J,358.3,26571,1,4,0)
+254 ;;=4^H40.9
+255 ;;^UTILITY(U,$J,358.3,26571,2)
+256 ;;=^5005931
+257 ;;^UTILITY(U,$J,358.3,26572,0)
+258 ;;=K21.9^^83^1067^1
+259 ;;^UTILITY(U,$J,358.3,26572,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,26572,1,3,0)
+262 ;;=3^GERD w/o Esophagitis
+263 ;;^UTILITY(U,$J,358.3,26572,1,4,0)
+264 ;;=4^K21.9
+265 ;;^UTILITY(U,$J,358.3,26572,2)
+266 ;;=^5008505
+267 ;;^UTILITY(U,$J,358.3,26573,0)
+268 ;;=K29.70^^83^1067^4
+269 ;;^UTILITY(U,$J,358.3,26573,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,26573,1,3,0)
+272 ;;=3^Gastritis w/o Bleeding,Unspec
+273 ;;^UTILITY(U,$J,358.3,26573,1,4,0)
+274 ;;=4^K29.70
+275 ;;^UTILITY(U,$J,358.3,26573,2)
+276 ;;=^5008552
+277 ;;^UTILITY(U,$J,358.3,26574,0)
+278 ;;=K52.9^^83^1067^5
+279 ;;^UTILITY(U,$J,358.3,26574,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,26574,1,3,0)
+282 ;;=3^Gastroenteritis & Colitis Noninfective,Unspec
+283 ;;^UTILITY(U,$J,358.3,26574,1,4,0)
+284 ;;=4^K52.9
+285 ;;^UTILITY(U,$J,358.3,26574,2)
+286 ;;=^5008704
+287 ;;^UTILITY(U,$J,358.3,26575,0)
+288 ;;=K82.9^^83^1067^2
+289 ;;^UTILITY(U,$J,358.3,26575,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,26575,1,3,0)
+292 ;;=3^Gallbladder Disease,Unspec
+293 ;;^UTILITY(U,$J,358.3,26575,1,4,0)
+294 ;;=4^K82.9
+295 ;;^UTILITY(U,$J,358.3,26575,2)
+296 ;;=^5008875
+297 ;;^UTILITY(U,$J,358.3,26576,0)
+298 ;;=K92.2^^83^1067^6
+299 ;;^UTILITY(U,$J,358.3,26576,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,26576,1,3,0)
+302 ;;=3^Gastrointestinal Hemorrhage,Unspec
+303 ;;^UTILITY(U,$J,358.3,26576,1,4,0)
+304 ;;=4^K92.2
+305 ;;^UTILITY(U,$J,358.3,26576,2)
+306 ;;=^5008915
+307 ;;^UTILITY(U,$J,358.3,26577,0)
+308 ;;=K25.9^^83^1067^3
+309 ;;^UTILITY(U,$J,358.3,26577,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,26577,1,3,0)
+312 ;;=3^Gastric Ulcer w/o Hemorrhage/Perforation
+313 ;;^UTILITY(U,$J,358.3,26577,1,4,0)
+314 ;;=4^K25.9
+315 ;;^UTILITY(U,$J,358.3,26577,2)
+316 ;;=^5008522
+317 ;;^UTILITY(U,$J,358.3,26578,0)
+318 ;;=I69.959^^83^1068^22
+319 ;;^UTILITY(U,$J,358.3,26578,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,26578,1,3,0)
+322 ;;=3^Hemiplegia/Hemiparesis Following Unspec Cerebrovascular Disease
+323 ;;^UTILITY(U,$J,358.3,26578,1,4,0)
+324 ;;=4^I69.959
+325 ;;^UTILITY(U,$J,358.3,26578,2)
+326 ;;=^5007563
+327 ;;^UTILITY(U,$J,358.3,26579,0)
+328 ;;=D89.2^^83^1068^33
+329 ;;^UTILITY(U,$J,358.3,26579,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,26579,1,3,0)
+332 ;;=3^Hypergammaglobulinemia,Unspec
+333 ;;^UTILITY(U,$J,358.3,26579,1,4,0)
+334 ;;=4^D89.2
+335 ;;^UTILITY(U,$J,358.3,26579,2)
+336 ;;=^5002455
+337 ;;^UTILITY(U,$J,358.3,26580,0)
+338 ;;=B19.10^^83^1068^26
+339 ;;^UTILITY(U,$J,358.3,26580,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,26580,1,3,0)
+342 ;;=3^Hepatitis B w/o Hepatic Coma
+343 ;;^UTILITY(U,$J,358.3,26580,1,4,0)
+344 ;;=4^B19.10
+345 ;;^UTILITY(U,$J,358.3,26580,2)
+346 ;;=^5000552
+347 ;;^UTILITY(U,$J,358.3,26581,0)
+348 ;;=B17.10^^83^1068^27
+349 ;;^UTILITY(U,$J,358.3,26581,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,26581,1,3,0)
+352 ;;=3^Hepatitis C w/o Hepatic Coma,Acute
+353 ;;^UTILITY(U,$J,358.3,26581,1,4,0)
+354 ;;=4^B17.10
+355 ;;^UTILITY(U,$J,358.3,26581,2)
+356 ;;=^5000542
+357 ;;^UTILITY(U,$J,358.3,26582,0)
+358 ;;=B18.2^^83^1068^28
+359 ;;^UTILITY(U,$J,358.3,26582,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,26582,1,3,0)
+362 ;;=3^Hepatitis C,Chr/Carrier
+363 ;;^UTILITY(U,$J,358.3,26582,1,4,0)
+364 ;;=4^B18.2
+365 ;;^UTILITY(U,$J,358.3,26582,2)
+366 ;;=^5000548
+367 ;;^UTILITY(U,$J,358.3,26583,0)
+368 ;;=E03.9^^83^1068^42
+369 ;;^UTILITY(U,$J,358.3,26583,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,26583,1,3,0)
+372 ;;=3^Hypothyroidism,Unspec
+373 ;;^UTILITY(U,$J,358.3,26583,1,4,0)
+374 ;;=4^E03.9
+375 ;;^UTILITY(U,$J,358.3,26583,2)
+376 ;;=^5002476
+377 ;;^UTILITY(U,$J,358.3,26584,0)
+378 ;;=E16.2^^83^1068^39
+379 ;;^UTILITY(U,$J,358.3,26584,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,26584,1,3,0)
+382 ;;=3^Hypoglycemia,Unspec
+383 ;;^UTILITY(U,$J,358.3,26584,1,4,0)
+384 ;;=4^E16.2
+385 ;;^UTILITY(U,$J,358.3,26584,2)
+386 ;;=^5002708
+387 ;;^UTILITY(U,$J,358.3,26585,0)
+388 ;;=E78.1^^83^1068^34
+389 ;;^UTILITY(U,$J,358.3,26585,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,26585,1,3,0)
+392 ;;=3^Hyperglyceridemia,Pure
+393 ;;^UTILITY(U,$J,358.3,26585,1,4,0)
+394 ;;=4^E78.1
+395 ;;^UTILITY(U,$J,358.3,26585,2)
+396 ;;=^101303
+397 ;;^UTILITY(U,$J,358.3,26586,0)
+398 ;;=E78.5^^83^1068^37
+399 ;;^UTILITY(U,$J,358.3,26586,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,26586,1,3,0)
+402 ;;=3^Hyperlipidemia,Unspec
+403 ;;^UTILITY(U,$J,358.3,26586,1,4,0)
+404 ;;=4^E78.5
+405 ;;^UTILITY(U,$J,358.3,26586,2)
+406 ;;=^5002969
+407 ;;^UTILITY(U,$J,358.3,26587,0)
+408 ;;=E87.1^^83^1068^38
+409 ;;^UTILITY(U,$J,358.3,26587,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,26587,1,3,0)
+412 ;;=3^Hypo-osmolatlity & Hyponatremia
+413 ;;^UTILITY(U,$J,358.3,26587,1,4,0)
+414 ;;=4^E87.1
+415 ;;^UTILITY(U,$J,358.3,26587,2)
+416 ;;=^5003019
+417 ;;^UTILITY(U,$J,358.3,26588,0)
+418 ;;=E87.5^^83^1068^35
+419 ;;^UTILITY(U,$J,358.3,26588,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,26588,1,3,0)
+422 ;;=3^Hyperkalemia
+423 ;;^UTILITY(U,$J,358.3,26588,1,4,0)
+424 ;;=4^E87.5
+425 ;;^UTILITY(U,$J,358.3,26588,2)
+426 ;;=^60041
+427 ;;^UTILITY(U,$J,358.3,26589,0)
+428 ;;=E87.6^^83^1068^40
+429 ;;^UTILITY(U,$J,358.3,26589,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,26589,1,3,0)
+432 ;;=3^Hypokalemia
+433 ;;^UTILITY(U,$J,358.3,26589,1,4,0)
+434 ;;=4^E87.6
+435 ;;^UTILITY(U,$J,358.3,26589,2)
+436 ;;=^60610
+437 ;;^UTILITY(U,$J,358.3,26590,0)
+438 ;;=G81.90^^83^1068^19
+439 ;;^UTILITY(U,$J,358.3,26590,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,26590,1,3,0)
+442 ;;=3^Hemiplegia,Unspec
+443 ;;^UTILITY(U,$J,358.3,26590,1,4,0)
+444 ;;=4^G81.90
+445 ;;^UTILITY(U,$J,358.3,26590,2)
+446 ;;=^5004120
+447 ;;^UTILITY(U,$J,358.3,26591,0)
+448 ;;=G81.91^^83^1068^18
+449 ;;^UTILITY(U,$J,358.3,26591,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,26591,1,3,0)
+452 ;;=3^Hemiplegia Affecting Right Dominant Side
+453 ;;^UTILITY(U,$J,358.3,26591,1,4,0)
+454 ;;=4^G81.91
+455 ;;^UTILITY(U,$J,358.3,26591,2)
+456 ;;=^5004121
+457 ;;^UTILITY(U,$J,358.3,26592,0)
+458 ;;=G81.92^^83^1068^17
+459 ;;^UTILITY(U,$J,358.3,26592,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,26592,1,3,0)
+462 ;;=3^Hemiplegia Affecting Left Dominant Side
+463 ;;^UTILITY(U,$J,358.3,26592,1,4,0)
+464 ;;=4^G81.92
+465 ;;^UTILITY(U,$J,358.3,26592,2)
+466 ;;=^5004122
+467 ;;^UTILITY(U,$J,358.3,26593,0)
+468 ;;=H91.91^^83^1068^7
+469 ;;^UTILITY(U,$J,358.3,26593,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,26593,1,3,0)
+472 ;;=3^Hearing Loss,Unspec,Right Ear
+473 ;;^UTILITY(U,$J,358.3,26593,1,4,0)
+474 ;;=4^H91.91
+475 ;;^UTILITY(U,$J,358.3,26593,2)
+476 ;;=^5133553
+477 ;;^UTILITY(U,$J,358.3,26594,0)
+478 ;;=H91.92^^83^1068^6
+479 ;;^UTILITY(U,$J,358.3,26594,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,26594,1,3,0)
+482 ;;=3^Hearing Loss,Unspec,Left Ear
+483 ;;^UTILITY(U,$J,358.3,26594,1,4,0)
+484 ;;=4^H91.92
+485 ;;^UTILITY(U,$J,358.3,26594,2)
+486 ;;=^5133554
+487 ;;^UTILITY(U,$J,358.3,26595,0)
+488 ;;=H91.93^^83^1068^5
+489 ;;^UTILITY(U,$J,358.3,26595,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,26595,1,3,0)
+492 ;;=3^Hearing Loss,Unspec,Bilateral
+493 ;;^UTILITY(U,$J,358.3,26595,1,4,0)
+494 ;;=4^H91.93
+495 ;;^UTILITY(U,$J,358.3,26595,2)
+496 ;;=^5006944
+497 ;;^UTILITY(U,$J,358.3,26596,0)
+498 ;;=I10.^^83^1068^2
+499 ;;^UTILITY(U,$J,358.3,26596,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,26596,1,3,0)
+502 ;;=3^HTN,Essential
+503 ;;^UTILITY(U,$J,358.3,26596,1,4,0)
+504 ;;=4^I10.
+505 ;;^UTILITY(U,$J,358.3,26596,2)
+506 ;;=^5007062
+507 ;;^UTILITY(U,$J,358.3,26597,0)
+508 ;;=K64.8^^83^1068^25
+509 ;;^UTILITY(U,$J,358.3,26597,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,26597,1,3,0)
+512 ;;=3^Hemorrhoids,Other
+513 ;;^UTILITY(U,$J,358.3,26597,1,4,0)
+514 ;;=4^K64.8
+515 ;;^UTILITY(U,$J,358.3,26597,2)
+516 ;;=^5008774
+517 ;;^UTILITY(U,$J,358.3,26598,0)
+518 ;;=K64.4^^83^1068^24
+519 ;;^UTILITY(U,$J,358.3,26598,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,26598,1,3,0)
+522 ;;=3^Hemorrhoidal Skin Tags,Residual
+523 ;;^UTILITY(U,$J,358.3,26598,1,4,0)
+524 ;;=4^K64.4
+525 ;;^UTILITY(U,$J,358.3,26598,2)
+526 ;;=^269834
+527 ;;^UTILITY(U,$J,358.3,26599,0)
+528 ;;=I95.9^^83^1068^41
+529 ;;^UTILITY(U,$J,358.3,26599,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,26599,1,3,0)
+532 ;;=3^Hypotension,Unspec
+533 ;;^UTILITY(U,$J,358.3,26599,1,4,0)
+534 ;;=4^I95.9
+535 ;;^UTILITY(U,$J,358.3,26599,2)
+536 ;;=^5008080
+537 ;;^UTILITY(U,$J,358.3,26600,0)
+538 ;;=K73.9^^83^1068^29
+539 ;;^UTILITY(U,$J,358.3,26600,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,26600,1,3,0)
+542 ;;=3^Hepatitis,Chr Unspec
+543 ;;^UTILITY(U,$J,358.3,26600,1,4,0)
+544 ;;=4^K73.9
+545 ;;^UTILITY(U,$J,358.3,26600,2)
+546 ;;=^5008815
+547 ;;^UTILITY(U,$J,358.3,26601,0)
+548 ;;=R31.9^^83^1068^16
+549 ;;^UTILITY(U,$J,358.3,26601,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,26601,1,3,0)
+552 ;;=3^Hematuria,Unspec
+553 ;;^UTILITY(U,$J,358.3,26601,1,4,0)
+554 ;;=4^R31.9
+555 ;;^UTILITY(U,$J,358.3,26601,2)
+556 ;;=^5019328
+557 ;;^UTILITY(U,$J,358.3,26602,0)
+558 ;;=N43.3^^83^1068^30
+559 ;;^UTILITY(U,$J,358.3,26602,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,26602,1,3,0)
+562 ;;=3^Hydrocele,Unspec
+563 ;;^UTILITY(U,$J,358.3,26602,1,4,0)
+564 ;;=4^N43.3
+565 ;;^UTILITY(U,$J,358.3,26602,2)
+566 ;;=^5015700
+567 ;;^UTILITY(U,$J,358.3,26603,0)
+568 ;;=Z21.^^83^1068^1
+569 ;;^UTILITY(U,$J,358.3,26603,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,26603,1,3,0)
+572 ;;=3^HIV Status,Asymptomatic
+573 ;;^UTILITY(U,$J,358.3,26603,1,4,0)
+574 ;;=4^Z21.
+575 ;;^UTILITY(U,$J,358.3,26603,2)
+576 ;;=^5062777
+577 ;;^UTILITY(U,$J,358.3,26604,0)
+578 ;;=K62.5^^83^1068^23
+579 ;;^UTILITY(U,$J,358.3,26604,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,26604,1,3,0)
+582 ;;=3^Hemorrhage Anus & Rectum
+583 ;;^UTILITY(U,$J,358.3,26604,1,4,0)
+584 ;;=4^K62.5
+585 ;;^UTILITY(U,$J,358.3,26604,2)
+586 ;;=^5008755
+587 ;;^UTILITY(U,$J,358.3,26605,0)
+588 ;;=E78.00^^83^1068^32
+589 ;;^UTILITY(U,$J,358.3,26605,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,26605,1,3,0)
+592 ;;=3^Hypercholesterolemia,Pure,Unspec
+593 ;;^UTILITY(U,$J,358.3,26605,1,4,0)
+594 ;;=4^E78.00
+595 ;;^UTILITY(U,$J,358.3,26605,2)
+596 ;;=^5138435
+597 ;;^UTILITY(U,$J,358.3,26606,0)
+598 ;;=E78.01^^83^1068^31
+599 ;;^UTILITY(U,$J,358.3,26606,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,26606,1,3,0)
+602 ;;=3^Hypercholesterolemia,Familial
+603 ;;^UTILITY(U,$J,358.3,26606,1,4,0)
+604 ;;=4^E78.01
+605 ;;^UTILITY(U,$J,358.3,26606,2)
+606 ;;=^7570555
+607 ;;^UTILITY(U,$J,358.3,26607,0)
+608 ;;=I50.810^^83^1068^15
+609 ;;^UTILITY(U,$J,358.3,26607,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,26607,1,3,0)
+612 ;;=3^Heart Failure,Right,Unspec
+613 ;;^UTILITY(U,$J,358.3,26607,1,4,0)
+614 ;;=4^I50.810
+615 ;;^UTILITY(U,$J,358.3,26607,2)
+616 ;;=^5151384
+617 ;;^UTILITY(U,$J,358.3,26608,0)
+618 ;;=I50.811^^83^1068^12
+619 ;;^UTILITY(U,$J,358.3,26608,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,26608,1,3,0)
+622 ;;=3^Heart Failure,Right,Acute
+623 ;;^UTILITY(U,$J,358.3,26608,1,4,0)
+624 ;;=4^I50.811
+625 ;;^UTILITY(U,$J,358.3,26608,2)
+626 ;;=^5151385
+627 ;;^UTILITY(U,$J,358.3,26609,0)
+628 ;;=I50.812^^83^1068^14
+629 ;;^UTILITY(U,$J,358.3,26609,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,26609,1,3,0)
+632 ;;=3^Heart Failure,Right,Chronic
+633 ;;^UTILITY(U,$J,358.3,26609,1,4,0)
+634 ;;=4^I50.812
+635 ;;^UTILITY(U,$J,358.3,26609,2)
+636 ;;=^5151386
+637 ;;^UTILITY(U,$J,358.3,26610,0)
+638 ;;=I50.813^^83^1068^13
+639 ;;^UTILITY(U,$J,358.3,26610,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,26610,1,3,0)
+642 ;;=3^Heart Failure,Right,Acute on Chronic
+643 ;;^UTILITY(U,$J,358.3,26610,1,4,0)
+644 ;;=4^I50.813
+645 ;;^UTILITY(U,$J,358.3,26610,2)
+646 ;;=^5151387
+647 ;;^UTILITY(U,$J,358.3,26611,0)
+648 ;;=I50.814^^83^1068^11
+649 ;;^UTILITY(U,$J,358.3,26611,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,26611,1,3,0)
+652 ;;=3^Heart Failure,Right d/t Left Heart Failure
+653 ;;^UTILITY(U,$J,358.3,26611,1,4,0)
+654 ;;=4^I50.814
+655 ;;^UTILITY(U,$J,358.3,26611,2)
+656 ;;=^5151388
+657 ;;^UTILITY(U,$J,358.3,26612,0)
+658 ;;=I50.82^^83^1068^8
+659 ;;^UTILITY(U,$J,358.3,26612,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,26612,1,3,0)
+662 ;;=3^Heart Failure,Biventricular
+663 ;;^UTILITY(U,$J,358.3,26612,1,4,0)
+664 ;;=4^I50.82
+665 ;;^UTILITY(U,$J,358.3,26612,2)
+666 ;;=^5151389
+667 ;;^UTILITY(U,$J,358.3,26613,0)
+668 ;;=I50.83^^83^1068^10
+669 ;;^UTILITY(U,$J,358.3,26613,1,0)
+670 ;;=^358.31IA^4^2
+671 ;;^UTILITY(U,$J,358.3,26613,1,3,0)
+672 ;;=3^Heart Failure,High Output
+673 ;;^UTILITY(U,$J,358.3,26613,1,4,0)
+674 ;;=4^I50.83
+675 ;;^UTILITY(U,$J,358.3,26613,2)
+676 ;;=^5151390
+677 ;;^UTILITY(U,$J,358.3,26614,0)
+678 ;;=I50.84^^83^1068^9
+679 ;;^UTILITY(U,$J,358.3,26614,1,0)
+680 ;;=^358.31IA^4^2
+681 ;;^UTILITY(U,$J,358.3,26614,1,3,0)
+682 ;;=3^Heart Failure,End Stage
+683 ;;^UTILITY(U,$J,358.3,26614,1,4,0)
+684 ;;=4^I50.84
+685 ;;^UTILITY(U,$J,358.3,26614,2)
+686 ;;=^5151391
+687 ;;^UTILITY(U,$J,358.3,26615,0)
+688 ;;=E78.49^^83^1068^36
+689 ;;^UTILITY(U,$J,358.3,26615,1,0)
+690 ;;=^358.31IA^4^2
+691 ;;^UTILITY(U,$J,358.3,26615,1,3,0)
+692 ;;=3^Hyperlipidemia,Other
+693 ;;^UTILITY(U,$J,358.3,26615,1,4,0)
+694 ;;=4^E78.49
+695 ;;^UTILITY(U,$J,358.3,26615,2)
+696 ;;=^5157299
