IBDEI05Z ; ; 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,14490,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14490,1,3,0)
;;=3^Athscl Natv Arteries of Extrm w/ Gangrene,Left Leg
;;^UTILITY(U,$J,358.3,14490,1,4,0)
;;=4^I70.262
;;^UTILITY(U,$J,358.3,14490,2)
;;=^5007604
;;^UTILITY(U,$J,358.3,14491,0)
;;=I70.261^^56^632^16
;;^UTILITY(U,$J,358.3,14491,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14491,1,3,0)
;;=3^Athscl Natv Arteries of Extrm w/ Gangrene,Right Leg
;;^UTILITY(U,$J,358.3,14491,1,4,0)
;;=4^I70.261
;;^UTILITY(U,$J,358.3,14491,2)
;;=^5007603
;;^UTILITY(U,$J,358.3,14492,0)
;;=I71.2^^56^632^34
;;^UTILITY(U,$J,358.3,14492,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14492,1,3,0)
;;=3^Thoracic Aortic Aneurysm w/o Rupture
;;^UTILITY(U,$J,358.3,14492,1,4,0)
;;=4^I71.2
;;^UTILITY(U,$J,358.3,14492,2)
;;=^5007787
;;^UTILITY(U,$J,358.3,14493,0)
;;=I71.4^^56^632^1
;;^UTILITY(U,$J,358.3,14493,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14493,1,3,0)
;;=3^Abdominal Aortic Aneurysm w/o Rupture
;;^UTILITY(U,$J,358.3,14493,1,4,0)
;;=4^I71.4
;;^UTILITY(U,$J,358.3,14493,2)
;;=^5007789
;;^UTILITY(U,$J,358.3,14494,0)
;;=I73.9^^56^632^32
;;^UTILITY(U,$J,358.3,14494,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14494,1,3,0)
;;=3^Peripheral Vascular Disease,Unspec
;;^UTILITY(U,$J,358.3,14494,1,4,0)
;;=4^I73.9
;;^UTILITY(U,$J,358.3,14494,2)
;;=^184182
;;^UTILITY(U,$J,358.3,14495,0)
;;=I82.891^^56^632^23
;;^UTILITY(U,$J,358.3,14495,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14495,1,3,0)
;;=3^Embolism/Thrombosis Oth Spec Veins,Chronic
;;^UTILITY(U,$J,358.3,14495,1,4,0)
;;=4^I82.891
;;^UTILITY(U,$J,358.3,14495,2)
;;=^5007939
;;^UTILITY(U,$J,358.3,14496,0)
;;=I82.890^^56^632^22
;;^UTILITY(U,$J,358.3,14496,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14496,1,3,0)
;;=3^Embolism/Thrombosis Oth Spec Veins,Acute
;;^UTILITY(U,$J,358.3,14496,1,4,0)
;;=4^I82.890
;;^UTILITY(U,$J,358.3,14496,2)
;;=^5007938
;;^UTILITY(U,$J,358.3,14497,0)
;;=I25.729^^56^632^2
;;^UTILITY(U,$J,358.3,14497,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14497,1,3,0)
;;=3^Athscl Autologous Artery CABG w/ Unspec Angina Pectoris
;;^UTILITY(U,$J,358.3,14497,1,4,0)
;;=4^I25.729
;;^UTILITY(U,$J,358.3,14497,2)
;;=^5133561
;;^UTILITY(U,$J,358.3,14498,0)
;;=I25.119^^56^632^3
;;^UTILITY(U,$J,358.3,14498,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14498,1,3,0)
;;=3^Athscl HRT Dis of Native Cor Art w/ Ang Pctrs,Unspec
;;^UTILITY(U,$J,358.3,14498,1,4,0)
;;=4^I25.119
;;^UTILITY(U,$J,358.3,14498,2)
;;=^5007111
;;^UTILITY(U,$J,358.3,14499,0)
;;=I25.10^^56^632^4
;;^UTILITY(U,$J,358.3,14499,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14499,1,3,0)
;;=3^Athscl HRT Dis of Native Cor Art w/o Ang Pctrs
;;^UTILITY(U,$J,358.3,14499,1,4,0)
;;=4^I25.10
;;^UTILITY(U,$J,358.3,14499,2)
;;=^5007107
;;^UTILITY(U,$J,358.3,14500,0)
;;=I25.110^^56^632^5
;;^UTILITY(U,$J,358.3,14500,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14500,1,3,0)
;;=3^Athscl Hrt Dis of Native Cor Art w/ Unstable Ang Pctrs
;;^UTILITY(U,$J,358.3,14500,1,4,0)
;;=4^I25.110
;;^UTILITY(U,$J,358.3,14500,2)
;;=^5007108
;;^UTILITY(U,$J,358.3,14501,0)
;;=I25.810^^56^632^17
;;^UTILITY(U,$J,358.3,14501,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14501,1,3,0)
;;=3^Athscl of CABG w/o Angina Pectoris
;;^UTILITY(U,$J,358.3,14501,1,4,0)
;;=4^I25.810
;;^UTILITY(U,$J,358.3,14501,2)
;;=^5007141
;;^UTILITY(U,$J,358.3,14502,0)
;;=I25.701^^56^632^18
;;^UTILITY(U,$J,358.3,14502,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14502,1,3,0)
;;=3^Athscl of CABG,Unspec w/ Angina Pectoris w/ Documented Spasm
;;^UTILITY(U,$J,358.3,14502,1,4,0)
;;=4^I25.701
;;^UTILITY(U,$J,358.3,14502,2)
;;=^5007118
;;^UTILITY(U,$J,358.3,14503,0)
;;=I25.708^^56^632^19
;;^UTILITY(U,$J,358.3,14503,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14503,1,3,0)
;;=3^Athscl of CABG,Unspec w/ Oth Angina Pectoris
;;^UTILITY(U,$J,358.3,14503,1,4,0)
;;=4^I25.708
;;^UTILITY(U,$J,358.3,14503,2)
;;=^5007119
;;^UTILITY(U,$J,358.3,14504,0)
;;=I25.709^^56^632^20
;;^UTILITY(U,$J,358.3,14504,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14504,1,3,0)
;;=3^Athscl of CABG,Unspec w/ Unspec Angina Pectoris
;;^UTILITY(U,$J,358.3,14504,1,4,0)
;;=4^I25.709
;;^UTILITY(U,$J,358.3,14504,2)
;;=^5007120
;;^UTILITY(U,$J,358.3,14505,0)
;;=I25.700^^56^632^21
;;^UTILITY(U,$J,358.3,14505,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14505,1,3,0)
;;=3^Athscl of CABG,Unspec w/ Unstable Angina Pectoris
;;^UTILITY(U,$J,358.3,14505,1,4,0)
;;=4^I25.700
;;^UTILITY(U,$J,358.3,14505,2)
;;=^5007117
;;^UTILITY(U,$J,358.3,14506,0)
;;=I82.469^^56^632^24
;;^UTILITY(U,$J,358.3,14506,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14506,1,3,0)
;;=3^Embolism/Thrombosis,Unspec Calf Muscle Vein,Acute
;;^UTILITY(U,$J,358.3,14506,1,4,0)
;;=4^I82.469
;;^UTILITY(U,$J,358.3,14506,2)
;;=^5158066
;;^UTILITY(U,$J,358.3,14507,0)
;;=I82.569^^56^632^25
;;^UTILITY(U,$J,358.3,14507,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14507,1,3,0)
;;=3^Embolism/Thrombosis,Unspec Calf Muscle Vein,Chronic
;;^UTILITY(U,$J,358.3,14507,1,4,0)
;;=4^I82.569
;;^UTILITY(U,$J,358.3,14507,2)
;;=^5158074
;;^UTILITY(U,$J,358.3,14508,0)
;;=I80.259^^56^632^33
;;^UTILITY(U,$J,358.3,14508,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14508,1,3,0)
;;=3^Phlebitis & Thrombophlebitis,Unspec Calf Muscle Vein
;;^UTILITY(U,$J,358.3,14508,1,4,0)
;;=4^I80.259
;;^UTILITY(U,$J,358.3,14508,2)
;;=^5158058
;;^UTILITY(U,$J,358.3,14509,0)
;;=I82.409^^56^632^26
;;^UTILITY(U,$J,358.3,14509,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14509,1,3,0)
;;=3^Embolism/Thrombosis,Unspec Deep Vein,LE Unspec Acute
;;^UTILITY(U,$J,358.3,14509,1,4,0)
;;=4^I82.409
;;^UTILITY(U,$J,358.3,14509,2)
;;=^5133625
;;^UTILITY(U,$J,358.3,14510,0)
;;=I82.509^^56^632^27
;;^UTILITY(U,$J,358.3,14510,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14510,1,3,0)
;;=3^Embolism/Thrombosis,Unspec Deep Vein,LE Unspec Chronic
;;^UTILITY(U,$J,358.3,14510,1,4,0)
;;=4^I82.509
;;^UTILITY(U,$J,358.3,14510,2)
;;=^5133628
;;^UTILITY(U,$J,358.3,14511,0)
;;=E78.1^^56^633^24
;;^UTILITY(U,$J,358.3,14511,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14511,1,3,0)
;;=3^Pure Hyperglyceridemia
;;^UTILITY(U,$J,358.3,14511,1,4,0)
;;=4^E78.1
;;^UTILITY(U,$J,358.3,14511,2)
;;=^101303
;;^UTILITY(U,$J,358.3,14512,0)
;;=E78.2^^56^633^22
;;^UTILITY(U,$J,358.3,14512,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14512,1,3,0)
;;=3^Mixed Hyperlipidemia
;;^UTILITY(U,$J,358.3,14512,1,4,0)
;;=4^E78.2
;;^UTILITY(U,$J,358.3,14512,2)
;;=^78424
;;^UTILITY(U,$J,358.3,14513,0)
;;=I10.^^56^633^9
;;^UTILITY(U,$J,358.3,14513,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14513,1,3,0)
;;=3^Essential Primary Hypertension
;;^UTILITY(U,$J,358.3,14513,1,4,0)
;;=4^I10.
;;^UTILITY(U,$J,358.3,14513,2)
;;=^5007062
;;^UTILITY(U,$J,358.3,14514,0)
;;=I11.9^^56^633^20
;;^UTILITY(U,$J,358.3,14514,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14514,1,3,0)
;;=3^Hypertensive Heart Disease w/o Heart Failure
;;^UTILITY(U,$J,358.3,14514,1,4,0)
;;=4^I11.9
;;^UTILITY(U,$J,358.3,14514,2)
;;=^5007064
;;^UTILITY(U,$J,358.3,14515,0)
;;=I11.0^^56^633^19
;;^UTILITY(U,$J,358.3,14515,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14515,1,3,0)
;;=3^Hypertensive Heart Disease w/ Heart Failure
;;^UTILITY(U,$J,358.3,14515,1,4,0)
;;=4^I11.0
;;^UTILITY(U,$J,358.3,14515,2)
;;=^5007063
;;^UTILITY(U,$J,358.3,14516,0)
;;=I12.0^^56^633^15
;;^UTILITY(U,$J,358.3,14516,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14516,1,3,0)
;;=3^Hypertensive CKD w/ ESRD
;;^UTILITY(U,$J,358.3,14516,1,4,0)
;;=4^I12.0
;;^UTILITY(U,$J,358.3,14516,2)
;;=^5007065
;;^UTILITY(U,$J,358.3,14517,0)
;;=I13.10^^56^633^13
;;^UTILITY(U,$J,358.3,14517,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14517,1,3,0)
;;=3^HTN Hrt & Chr Kdny Dis w/o Hrt Fail w/ Stg 1-4 Chr Kdny
;;^UTILITY(U,$J,358.3,14517,1,4,0)
;;=4^I13.10
;;^UTILITY(U,$J,358.3,14517,2)
;;=^5007068
;;^UTILITY(U,$J,358.3,14518,0)
;;=I13.0^^56^633^11
;;^UTILITY(U,$J,358.3,14518,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14518,1,3,0)
;;=3^HTN Hrt & Chr Kdny Dis w/ Hrt Fail w/ Stg 1-4 Chr Kdny
;;^UTILITY(U,$J,358.3,14518,1,4,0)
;;=4^I13.0
;;^UTILITY(U,$J,358.3,14518,2)
;;=^5007067
;;^UTILITY(U,$J,358.3,14519,0)
;;=I13.11^^56^633^14
;;^UTILITY(U,$J,358.3,14519,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14519,1,3,0)
;;=3^HTN Hrt & Chr Kdny Dis w/o Hrt Fail w/ Stg 5 Chr Kdny
;;^UTILITY(U,$J,358.3,14519,1,4,0)
;;=4^I13.11
;;^UTILITY(U,$J,358.3,14519,2)
;;=^5007069
;;^UTILITY(U,$J,358.3,14520,0)
;;=I13.2^^56^633^12
;;^UTILITY(U,$J,358.3,14520,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14520,1,3,0)
;;=3^HTN Hrt & Chr Kdny Dis w/ Hrt Fail w/ Stg 5 Chr Kdny
;;^UTILITY(U,$J,358.3,14520,1,4,0)
;;=4^I13.2
;;^UTILITY(U,$J,358.3,14520,2)
;;=^5007070
;;^UTILITY(U,$J,358.3,14521,0)
;;=I48.91^^56^633^6
;;^UTILITY(U,$J,358.3,14521,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14521,1,3,0)
;;=3^Atrial Fibrillation,Unspec
;;^UTILITY(U,$J,358.3,14521,1,4,0)
;;=4^I48.91
;;^UTILITY(U,$J,358.3,14521,2)
;;=^5007229
;;^UTILITY(U,$J,358.3,14522,0)
;;=I48.92^^56^633^7
;;^UTILITY(U,$J,358.3,14522,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14522,1,3,0)
;;=3^Atrial Flutter,Unspec
;;^UTILITY(U,$J,358.3,14522,1,4,0)
;;=4^I48.92
;;^UTILITY(U,$J,358.3,14522,2)
;;=^5007230
;;^UTILITY(U,$J,358.3,14523,0)
;;=I16.1^^56^633^18
;;^UTILITY(U,$J,358.3,14523,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14523,1,3,0)
;;=3^Hypertensive Emergency
;;^UTILITY(U,$J,358.3,14523,1,4,0)
;;=4^I16.1
;;^UTILITY(U,$J,358.3,14523,2)
;;=^8204721
;;^UTILITY(U,$J,358.3,14524,0)
;;=I16.0^^56^633^21
;;^UTILITY(U,$J,358.3,14524,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14524,1,3,0)
;;=3^Hypertensive Urgency
;;^UTILITY(U,$J,358.3,14524,1,4,0)
;;=4^I16.0
;;^UTILITY(U,$J,358.3,14524,2)
;;=^8133013
;;^UTILITY(U,$J,358.3,14525,0)
;;=I16.9^^56^633^17
;;^UTILITY(U,$J,358.3,14525,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14525,1,3,0)
;;=3^Hypertensive Crisis,Unspec
;;^UTILITY(U,$J,358.3,14525,1,4,0)
;;=4^I16.9
;;^UTILITY(U,$J,358.3,14525,2)
;;=^5138600
;;^UTILITY(U,$J,358.3,14526,0)
;;=E78.01^^56^633^10
;;^UTILITY(U,$J,358.3,14526,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14526,1,3,0)
;;=3^Familial Hypercholesterolemia
;;^UTILITY(U,$J,358.3,14526,1,4,0)
;;=4^E78.01
;;^UTILITY(U,$J,358.3,14526,2)
;;=^7570555
;;^UTILITY(U,$J,358.3,14527,0)
;;=E78.00^^56^633^23
;;^UTILITY(U,$J,358.3,14527,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14527,1,3,0)
;;=3^Pure Hypercholesterolemia,Unspec
;;^UTILITY(U,$J,358.3,14527,1,4,0)
;;=4^E78.00
;;^UTILITY(U,$J,358.3,14527,2)
;;=^5138435
;;^UTILITY(U,$J,358.3,14528,0)
;;=I47.2^^56^633^25
;;^UTILITY(U,$J,358.3,14528,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14528,1,3,0)
;;=3^Ventricular Tachycardia
;;^UTILITY(U,$J,358.3,14528,1,4,0)
;;=4^I47.2
;;^UTILITY(U,$J,358.3,14528,2)
;;=^125976
;;^UTILITY(U,$J,358.3,14529,0)
;;=I42.6^^56^633^1
;;^UTILITY(U,$J,358.3,14529,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14529,1,3,0)
;;=3^Alcoholic Cardiomyopathy
;;^UTILITY(U,$J,358.3,14529,1,4,0)
;;=4^I42.6
;;^UTILITY(U,$J,358.3,14529,2)
;;=^5007197
;;^UTILITY(U,$J,358.3,14530,0)
;;=I51.7^^56^633^8
;;^UTILITY(U,$J,358.3,14530,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14530,1,3,0)
;;=3^Cardiomegaly
;;^UTILITY(U,$J,358.3,14530,1,4,0)
;;=4^I51.7
;;^UTILITY(U,$J,358.3,14530,2)
;;=^5007257
;;^UTILITY(U,$J,358.3,14531,0)
;;=I48.20^^56^633^2
;;^UTILITY(U,$J,358.3,14531,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14531,1,3,0)
;;=3^Atrial Fibrillation,Chronic,Unspec
;;^UTILITY(U,$J,358.3,14531,1,4,0)
;;=4^I48.20
;;^UTILITY(U,$J,358.3,14531,2)
;;=^5158048
;;^UTILITY(U,$J,358.3,14532,0)
;;=I48.11^^56^633^3
;;^UTILITY(U,$J,358.3,14532,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14532,1,3,0)
;;=3^Atrial Fibrillation,Longstanding Persistent
;;^UTILITY(U,$J,358.3,14532,1,4,0)
;;=4^I48.11
;;^UTILITY(U,$J,358.3,14532,2)
;;=^5158046
;;^UTILITY(U,$J,358.3,14533,0)
;;=I48.19^^56^633^4
;;^UTILITY(U,$J,358.3,14533,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14533,1,3,0)
;;=3^Atrial Fibrillation,Other Persistent
;;^UTILITY(U,$J,358.3,14533,1,4,0)
;;=4^I48.19
;;^UTILITY(U,$J,358.3,14533,2)
;;=^5158047
;;^UTILITY(U,$J,358.3,14534,0)
;;=I48.21^^56^633^5
;;^UTILITY(U,$J,358.3,14534,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14534,1,3,0)
;;=3^Atrial Fibrillation,Permanent
;;^UTILITY(U,$J,358.3,14534,1,4,0)
;;=4^I48.21
;;^UTILITY(U,$J,358.3,14534,2)
;;=^304710
;;^UTILITY(U,$J,358.3,14535,0)
;;=I12.9^^56^633^16
;;^UTILITY(U,$J,358.3,14535,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14535,1,3,0)
;;=3^Hypertensive CKD w/ Stg 1-4 CKD
;;^UTILITY(U,$J,358.3,14535,1,4,0)
;;=4^I12.9
;;^UTILITY(U,$J,358.3,14535,2)
;;=^5007066
;;^UTILITY(U,$J,358.3,14536,0)
;;=B07.9^^56^634^328
;;^UTILITY(U,$J,358.3,14536,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14536,1,3,0)
;;=3^Viral Wart,Unspec
;;^UTILITY(U,$J,358.3,14536,1,4,0)
;;=4^B07.9
;;^UTILITY(U,$J,358.3,14536,2)
;;=^5000519
;;^UTILITY(U,$J,358.3,14537,0)
;;=A63.0^^56^634^35
;;^UTILITY(U,$J,358.3,14537,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14537,1,3,0)
;;=3^Anogenital (Venereal) Warts
;;^UTILITY(U,$J,358.3,14537,1,4,0)
;;=4^A63.0
;;^UTILITY(U,$J,358.3,14537,2)
;;=^5000360
;;^UTILITY(U,$J,358.3,14538,0)
;;=B35.0^^56^634^319
;;^UTILITY(U,$J,358.3,14538,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14538,1,3,0)
;;=3^Tinea Barbae and Tinea Capitis
;;^UTILITY(U,$J,358.3,14538,1,4,0)
;;=4^B35.0
;;^UTILITY(U,$J,358.3,14538,2)
;;=^5000604
;;^UTILITY(U,$J,358.3,14539,0)
;;=B35.1^^56^634^324
;;^UTILITY(U,$J,358.3,14539,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14539,1,3,0)
;;=3^Tinea Unguium
;;^UTILITY(U,$J,358.3,14539,1,4,0)
;;=4^B35.1
;;^UTILITY(U,$J,358.3,14539,2)
;;=^119748
;;^UTILITY(U,$J,358.3,14540,0)
;;=B35.6^^56^634^321
;;^UTILITY(U,$J,358.3,14540,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14540,1,3,0)
;;=3^Tinea Cruris
;;^UTILITY(U,$J,358.3,14540,1,4,0)
;;=4^B35.6
;;^UTILITY(U,$J,358.3,14540,2)
;;=^119711
;;^UTILITY(U,$J,358.3,14541,0)
;;=B35.3^^56^634^323
;;^UTILITY(U,$J,358.3,14541,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14541,1,3,0)
;;=3^Tinea Pedis
;;^UTILITY(U,$J,358.3,14541,1,4,0)
;;=4^B35.3
;;^UTILITY(U,$J,358.3,14541,2)
;;=^119732
;;^UTILITY(U,$J,358.3,14542,0)
;;=B35.5^^56^634^322
;;^UTILITY(U,$J,358.3,14542,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14542,1,3,0)
;;=3^Tinea Imbricata
;;^UTILITY(U,$J,358.3,14542,1,4,0)
;;=4^B35.5
;;^UTILITY(U,$J,358.3,14542,2)
;;=^119725
;;^UTILITY(U,$J,358.3,14543,0)
;;=B35.4^^56^634^320
;;^UTILITY(U,$J,358.3,14543,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14543,1,3,0)
;;=3^Tinea Corporis
;;^UTILITY(U,$J,358.3,14543,1,4,0)
;;=4^B35.4
;;^UTILITY(U,$J,358.3,14543,2)
;;=^119704
;;^UTILITY(U,$J,358.3,14544,0)
;;=B35.8^^56^634^140
;;^UTILITY(U,$J,358.3,14544,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14544,1,3,0)
;;=3^Dermatophytoses,Other
;;^UTILITY(U,$J,358.3,14544,1,4,0)
;;=4^B35.8
;;^UTILITY(U,$J,358.3,14544,2)
;;=^5000606
;;^UTILITY(U,$J,358.3,14545,0)
;;=B36.9^^56^634^312
;;^UTILITY(U,$J,358.3,14545,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14545,1,3,0)
;;=3^Superficial Mycosis,Unspec
;;^UTILITY(U,$J,358.3,14545,1,4,0)
;;=4^B36.9
;;^UTILITY(U,$J,358.3,14545,2)
;;=^5000611
;;^UTILITY(U,$J,358.3,14546,0)
;;=D69.0^^56^634^33
;;^UTILITY(U,$J,358.3,14546,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14546,1,3,0)
;;=3^Allergic Purpura
;;^UTILITY(U,$J,358.3,14546,1,4,0)
;;=4^D69.0
;;^UTILITY(U,$J,358.3,14546,2)
;;=^5002365
;;^UTILITY(U,$J,358.3,14547,0)
;;=B00.9^^56^634^161
;;^UTILITY(U,$J,358.3,14547,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14547,1,3,0)
;;=3^Herpesviral Infection,Unspec
;;^UTILITY(U,$J,358.3,14547,1,4,0)
;;=4^B00.9
;;^UTILITY(U,$J,358.3,14547,2)
;;=^5000480
;;^UTILITY(U,$J,358.3,14548,0)
;;=B02.9^^56^634^331
;;^UTILITY(U,$J,358.3,14548,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14548,1,3,0)
;;=3^Zoster w/o Complications
;;^UTILITY(U,$J,358.3,14548,1,4,0)
;;=4^B02.9
;;^UTILITY(U,$J,358.3,14548,2)
;;=^5000501
;;^UTILITY(U,$J,358.3,14549,0)
;;=D17.9^^56^634^90
;;^UTILITY(U,$J,358.3,14549,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14549,1,3,0)
;;=3^Benign Lipomatous Neop,Unspec
;;^UTILITY(U,$J,358.3,14549,1,4,0)
;;=4^D17.9
;;^UTILITY(U,$J,358.3,14549,2)
;;=^5002020
;;^UTILITY(U,$J,358.3,14550,0)
;;=E08.621^^56^634^137
;;^UTILITY(U,$J,358.3,14550,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14550,1,3,0)
;;=3^DM d/t Underlying Condition w/ Foot Ulcer
;;^UTILITY(U,$J,358.3,14550,1,4,0)
;;=4^E08.621
;;^UTILITY(U,$J,358.3,14550,2)
;;=^5002534
;;^UTILITY(U,$J,358.3,14551,0)
;;=E09.621^^56^634^136
;;^UTILITY(U,$J,358.3,14551,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14551,1,3,0)
;;=3^DM d/t Drug/Chemical w/ Foot Ulcer
;;^UTILITY(U,$J,358.3,14551,1,4,0)
;;=4^E09.621
;;^UTILITY(U,$J,358.3,14551,2)
;;=^5002576
;;^UTILITY(U,$J,358.3,14552,0)
;;=H05.011^^56^634^112
;;^UTILITY(U,$J,358.3,14552,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14552,1,3,0)
;;=3^Cellulitis of Right Orbit
;;^UTILITY(U,$J,358.3,14552,1,4,0)
;;=4^H05.011
;;^UTILITY(U,$J,358.3,14552,2)
;;=^5004560
;;^UTILITY(U,$J,358.3,14553,0)
;;=H05.012^^56^634^105
;;^UTILITY(U,$J,358.3,14553,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14553,1,3,0)
;;=3^Cellulitis of Left Orbit
;;^UTILITY(U,$J,358.3,14553,1,4,0)
;;=4^H05.012
;;^UTILITY(U,$J,358.3,14553,2)
;;=^5004561
;;^UTILITY(U,$J,358.3,14554,0)
;;=H05.013^^56^634^99
;;^UTILITY(U,$J,358.3,14554,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14554,1,3,0)
;;=3^Cellulitis of Bilateral Orbits
;;^UTILITY(U,$J,358.3,14554,1,4,0)
;;=4^H05.013
;;^UTILITY(U,$J,358.3,14554,2)
;;=^5004562
;;^UTILITY(U,$J,358.3,14555,0)
;;=I70.331^^56^634^51
;;^UTILITY(U,$J,358.3,14555,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14555,1,3,0)
;;=3^Athscl Bypass of Right Leg w/ Ulcer of Thigh
;;^UTILITY(U,$J,358.3,14555,1,4,0)
;;=4^I70.331
;;^UTILITY(U,$J,358.3,14555,2)
;;=^5007626
;;^UTILITY(U,$J,358.3,14556,0)
;;=I70.332^^56^634^52
;;^UTILITY(U,$J,358.3,14556,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14556,1,3,0)
;;=3^Athscl Bypass of Right Leg w/ Ulcer of Calf
;;^UTILITY(U,$J,358.3,14556,1,4,0)
;;=4^I70.332
;;^UTILITY(U,$J,358.3,14556,2)
;;=^5007627
;;^UTILITY(U,$J,358.3,14557,0)
;;=I70.333^^56^634^53
;;^UTILITY(U,$J,358.3,14557,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,14557,1,3,0)
;;=3^Athscl Bypass of Right Leg w/ Ulcer of Ankle
;;^UTILITY(U,$J,358.3,14557,1,4,0)
;;=4^I70.333
;;^UTILITY(U,$J,358.3,14557,2)
;;=^5007628
;;^UTILITY(U,$J,358.3,14558,0)
;;=I70.334^^56^634^54
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI05Z 19796 printed Dec 13, 2024@01:42:18 Page 2
IBDEI05Z ; ; 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,14490,1,0)
+2 ;;=^358.31IA^4^2
+3 ;;^UTILITY(U,$J,358.3,14490,1,3,0)
+4 ;;=3^Athscl Natv Arteries of Extrm w/ Gangrene,Left Leg
+5 ;;^UTILITY(U,$J,358.3,14490,1,4,0)
+6 ;;=4^I70.262
+7 ;;^UTILITY(U,$J,358.3,14490,2)
+8 ;;=^5007604
+9 ;;^UTILITY(U,$J,358.3,14491,0)
+10 ;;=I70.261^^56^632^16
+11 ;;^UTILITY(U,$J,358.3,14491,1,0)
+12 ;;=^358.31IA^4^2
+13 ;;^UTILITY(U,$J,358.3,14491,1,3,0)
+14 ;;=3^Athscl Natv Arteries of Extrm w/ Gangrene,Right Leg
+15 ;;^UTILITY(U,$J,358.3,14491,1,4,0)
+16 ;;=4^I70.261
+17 ;;^UTILITY(U,$J,358.3,14491,2)
+18 ;;=^5007603
+19 ;;^UTILITY(U,$J,358.3,14492,0)
+20 ;;=I71.2^^56^632^34
+21 ;;^UTILITY(U,$J,358.3,14492,1,0)
+22 ;;=^358.31IA^4^2
+23 ;;^UTILITY(U,$J,358.3,14492,1,3,0)
+24 ;;=3^Thoracic Aortic Aneurysm w/o Rupture
+25 ;;^UTILITY(U,$J,358.3,14492,1,4,0)
+26 ;;=4^I71.2
+27 ;;^UTILITY(U,$J,358.3,14492,2)
+28 ;;=^5007787
+29 ;;^UTILITY(U,$J,358.3,14493,0)
+30 ;;=I71.4^^56^632^1
+31 ;;^UTILITY(U,$J,358.3,14493,1,0)
+32 ;;=^358.31IA^4^2
+33 ;;^UTILITY(U,$J,358.3,14493,1,3,0)
+34 ;;=3^Abdominal Aortic Aneurysm w/o Rupture
+35 ;;^UTILITY(U,$J,358.3,14493,1,4,0)
+36 ;;=4^I71.4
+37 ;;^UTILITY(U,$J,358.3,14493,2)
+38 ;;=^5007789
+39 ;;^UTILITY(U,$J,358.3,14494,0)
+40 ;;=I73.9^^56^632^32
+41 ;;^UTILITY(U,$J,358.3,14494,1,0)
+42 ;;=^358.31IA^4^2
+43 ;;^UTILITY(U,$J,358.3,14494,1,3,0)
+44 ;;=3^Peripheral Vascular Disease,Unspec
+45 ;;^UTILITY(U,$J,358.3,14494,1,4,0)
+46 ;;=4^I73.9
+47 ;;^UTILITY(U,$J,358.3,14494,2)
+48 ;;=^184182
+49 ;;^UTILITY(U,$J,358.3,14495,0)
+50 ;;=I82.891^^56^632^23
+51 ;;^UTILITY(U,$J,358.3,14495,1,0)
+52 ;;=^358.31IA^4^2
+53 ;;^UTILITY(U,$J,358.3,14495,1,3,0)
+54 ;;=3^Embolism/Thrombosis Oth Spec Veins,Chronic
+55 ;;^UTILITY(U,$J,358.3,14495,1,4,0)
+56 ;;=4^I82.891
+57 ;;^UTILITY(U,$J,358.3,14495,2)
+58 ;;=^5007939
+59 ;;^UTILITY(U,$J,358.3,14496,0)
+60 ;;=I82.890^^56^632^22
+61 ;;^UTILITY(U,$J,358.3,14496,1,0)
+62 ;;=^358.31IA^4^2
+63 ;;^UTILITY(U,$J,358.3,14496,1,3,0)
+64 ;;=3^Embolism/Thrombosis Oth Spec Veins,Acute
+65 ;;^UTILITY(U,$J,358.3,14496,1,4,0)
+66 ;;=4^I82.890
+67 ;;^UTILITY(U,$J,358.3,14496,2)
+68 ;;=^5007938
+69 ;;^UTILITY(U,$J,358.3,14497,0)
+70 ;;=I25.729^^56^632^2
+71 ;;^UTILITY(U,$J,358.3,14497,1,0)
+72 ;;=^358.31IA^4^2
+73 ;;^UTILITY(U,$J,358.3,14497,1,3,0)
+74 ;;=3^Athscl Autologous Artery CABG w/ Unspec Angina Pectoris
+75 ;;^UTILITY(U,$J,358.3,14497,1,4,0)
+76 ;;=4^I25.729
+77 ;;^UTILITY(U,$J,358.3,14497,2)
+78 ;;=^5133561
+79 ;;^UTILITY(U,$J,358.3,14498,0)
+80 ;;=I25.119^^56^632^3
+81 ;;^UTILITY(U,$J,358.3,14498,1,0)
+82 ;;=^358.31IA^4^2
+83 ;;^UTILITY(U,$J,358.3,14498,1,3,0)
+84 ;;=3^Athscl HRT Dis of Native Cor Art w/ Ang Pctrs,Unspec
+85 ;;^UTILITY(U,$J,358.3,14498,1,4,0)
+86 ;;=4^I25.119
+87 ;;^UTILITY(U,$J,358.3,14498,2)
+88 ;;=^5007111
+89 ;;^UTILITY(U,$J,358.3,14499,0)
+90 ;;=I25.10^^56^632^4
+91 ;;^UTILITY(U,$J,358.3,14499,1,0)
+92 ;;=^358.31IA^4^2
+93 ;;^UTILITY(U,$J,358.3,14499,1,3,0)
+94 ;;=3^Athscl HRT Dis of Native Cor Art w/o Ang Pctrs
+95 ;;^UTILITY(U,$J,358.3,14499,1,4,0)
+96 ;;=4^I25.10
+97 ;;^UTILITY(U,$J,358.3,14499,2)
+98 ;;=^5007107
+99 ;;^UTILITY(U,$J,358.3,14500,0)
+100 ;;=I25.110^^56^632^5
+101 ;;^UTILITY(U,$J,358.3,14500,1,0)
+102 ;;=^358.31IA^4^2
+103 ;;^UTILITY(U,$J,358.3,14500,1,3,0)
+104 ;;=3^Athscl Hrt Dis of Native Cor Art w/ Unstable Ang Pctrs
+105 ;;^UTILITY(U,$J,358.3,14500,1,4,0)
+106 ;;=4^I25.110
+107 ;;^UTILITY(U,$J,358.3,14500,2)
+108 ;;=^5007108
+109 ;;^UTILITY(U,$J,358.3,14501,0)
+110 ;;=I25.810^^56^632^17
+111 ;;^UTILITY(U,$J,358.3,14501,1,0)
+112 ;;=^358.31IA^4^2
+113 ;;^UTILITY(U,$J,358.3,14501,1,3,0)
+114 ;;=3^Athscl of CABG w/o Angina Pectoris
+115 ;;^UTILITY(U,$J,358.3,14501,1,4,0)
+116 ;;=4^I25.810
+117 ;;^UTILITY(U,$J,358.3,14501,2)
+118 ;;=^5007141
+119 ;;^UTILITY(U,$J,358.3,14502,0)
+120 ;;=I25.701^^56^632^18
+121 ;;^UTILITY(U,$J,358.3,14502,1,0)
+122 ;;=^358.31IA^4^2
+123 ;;^UTILITY(U,$J,358.3,14502,1,3,0)
+124 ;;=3^Athscl of CABG,Unspec w/ Angina Pectoris w/ Documented Spasm
+125 ;;^UTILITY(U,$J,358.3,14502,1,4,0)
+126 ;;=4^I25.701
+127 ;;^UTILITY(U,$J,358.3,14502,2)
+128 ;;=^5007118
+129 ;;^UTILITY(U,$J,358.3,14503,0)
+130 ;;=I25.708^^56^632^19
+131 ;;^UTILITY(U,$J,358.3,14503,1,0)
+132 ;;=^358.31IA^4^2
+133 ;;^UTILITY(U,$J,358.3,14503,1,3,0)
+134 ;;=3^Athscl of CABG,Unspec w/ Oth Angina Pectoris
+135 ;;^UTILITY(U,$J,358.3,14503,1,4,0)
+136 ;;=4^I25.708
+137 ;;^UTILITY(U,$J,358.3,14503,2)
+138 ;;=^5007119
+139 ;;^UTILITY(U,$J,358.3,14504,0)
+140 ;;=I25.709^^56^632^20
+141 ;;^UTILITY(U,$J,358.3,14504,1,0)
+142 ;;=^358.31IA^4^2
+143 ;;^UTILITY(U,$J,358.3,14504,1,3,0)
+144 ;;=3^Athscl of CABG,Unspec w/ Unspec Angina Pectoris
+145 ;;^UTILITY(U,$J,358.3,14504,1,4,0)
+146 ;;=4^I25.709
+147 ;;^UTILITY(U,$J,358.3,14504,2)
+148 ;;=^5007120
+149 ;;^UTILITY(U,$J,358.3,14505,0)
+150 ;;=I25.700^^56^632^21
+151 ;;^UTILITY(U,$J,358.3,14505,1,0)
+152 ;;=^358.31IA^4^2
+153 ;;^UTILITY(U,$J,358.3,14505,1,3,0)
+154 ;;=3^Athscl of CABG,Unspec w/ Unstable Angina Pectoris
+155 ;;^UTILITY(U,$J,358.3,14505,1,4,0)
+156 ;;=4^I25.700
+157 ;;^UTILITY(U,$J,358.3,14505,2)
+158 ;;=^5007117
+159 ;;^UTILITY(U,$J,358.3,14506,0)
+160 ;;=I82.469^^56^632^24
+161 ;;^UTILITY(U,$J,358.3,14506,1,0)
+162 ;;=^358.31IA^4^2
+163 ;;^UTILITY(U,$J,358.3,14506,1,3,0)
+164 ;;=3^Embolism/Thrombosis,Unspec Calf Muscle Vein,Acute
+165 ;;^UTILITY(U,$J,358.3,14506,1,4,0)
+166 ;;=4^I82.469
+167 ;;^UTILITY(U,$J,358.3,14506,2)
+168 ;;=^5158066
+169 ;;^UTILITY(U,$J,358.3,14507,0)
+170 ;;=I82.569^^56^632^25
+171 ;;^UTILITY(U,$J,358.3,14507,1,0)
+172 ;;=^358.31IA^4^2
+173 ;;^UTILITY(U,$J,358.3,14507,1,3,0)
+174 ;;=3^Embolism/Thrombosis,Unspec Calf Muscle Vein,Chronic
+175 ;;^UTILITY(U,$J,358.3,14507,1,4,0)
+176 ;;=4^I82.569
+177 ;;^UTILITY(U,$J,358.3,14507,2)
+178 ;;=^5158074
+179 ;;^UTILITY(U,$J,358.3,14508,0)
+180 ;;=I80.259^^56^632^33
+181 ;;^UTILITY(U,$J,358.3,14508,1,0)
+182 ;;=^358.31IA^4^2
+183 ;;^UTILITY(U,$J,358.3,14508,1,3,0)
+184 ;;=3^Phlebitis & Thrombophlebitis,Unspec Calf Muscle Vein
+185 ;;^UTILITY(U,$J,358.3,14508,1,4,0)
+186 ;;=4^I80.259
+187 ;;^UTILITY(U,$J,358.3,14508,2)
+188 ;;=^5158058
+189 ;;^UTILITY(U,$J,358.3,14509,0)
+190 ;;=I82.409^^56^632^26
+191 ;;^UTILITY(U,$J,358.3,14509,1,0)
+192 ;;=^358.31IA^4^2
+193 ;;^UTILITY(U,$J,358.3,14509,1,3,0)
+194 ;;=3^Embolism/Thrombosis,Unspec Deep Vein,LE Unspec Acute
+195 ;;^UTILITY(U,$J,358.3,14509,1,4,0)
+196 ;;=4^I82.409
+197 ;;^UTILITY(U,$J,358.3,14509,2)
+198 ;;=^5133625
+199 ;;^UTILITY(U,$J,358.3,14510,0)
+200 ;;=I82.509^^56^632^27
+201 ;;^UTILITY(U,$J,358.3,14510,1,0)
+202 ;;=^358.31IA^4^2
+203 ;;^UTILITY(U,$J,358.3,14510,1,3,0)
+204 ;;=3^Embolism/Thrombosis,Unspec Deep Vein,LE Unspec Chronic
+205 ;;^UTILITY(U,$J,358.3,14510,1,4,0)
+206 ;;=4^I82.509
+207 ;;^UTILITY(U,$J,358.3,14510,2)
+208 ;;=^5133628
+209 ;;^UTILITY(U,$J,358.3,14511,0)
+210 ;;=E78.1^^56^633^24
+211 ;;^UTILITY(U,$J,358.3,14511,1,0)
+212 ;;=^358.31IA^4^2
+213 ;;^UTILITY(U,$J,358.3,14511,1,3,0)
+214 ;;=3^Pure Hyperglyceridemia
+215 ;;^UTILITY(U,$J,358.3,14511,1,4,0)
+216 ;;=4^E78.1
+217 ;;^UTILITY(U,$J,358.3,14511,2)
+218 ;;=^101303
+219 ;;^UTILITY(U,$J,358.3,14512,0)
+220 ;;=E78.2^^56^633^22
+221 ;;^UTILITY(U,$J,358.3,14512,1,0)
+222 ;;=^358.31IA^4^2
+223 ;;^UTILITY(U,$J,358.3,14512,1,3,0)
+224 ;;=3^Mixed Hyperlipidemia
+225 ;;^UTILITY(U,$J,358.3,14512,1,4,0)
+226 ;;=4^E78.2
+227 ;;^UTILITY(U,$J,358.3,14512,2)
+228 ;;=^78424
+229 ;;^UTILITY(U,$J,358.3,14513,0)
+230 ;;=I10.^^56^633^9
+231 ;;^UTILITY(U,$J,358.3,14513,1,0)
+232 ;;=^358.31IA^4^2
+233 ;;^UTILITY(U,$J,358.3,14513,1,3,0)
+234 ;;=3^Essential Primary Hypertension
+235 ;;^UTILITY(U,$J,358.3,14513,1,4,0)
+236 ;;=4^I10.
+237 ;;^UTILITY(U,$J,358.3,14513,2)
+238 ;;=^5007062
+239 ;;^UTILITY(U,$J,358.3,14514,0)
+240 ;;=I11.9^^56^633^20
+241 ;;^UTILITY(U,$J,358.3,14514,1,0)
+242 ;;=^358.31IA^4^2
+243 ;;^UTILITY(U,$J,358.3,14514,1,3,0)
+244 ;;=3^Hypertensive Heart Disease w/o Heart Failure
+245 ;;^UTILITY(U,$J,358.3,14514,1,4,0)
+246 ;;=4^I11.9
+247 ;;^UTILITY(U,$J,358.3,14514,2)
+248 ;;=^5007064
+249 ;;^UTILITY(U,$J,358.3,14515,0)
+250 ;;=I11.0^^56^633^19
+251 ;;^UTILITY(U,$J,358.3,14515,1,0)
+252 ;;=^358.31IA^4^2
+253 ;;^UTILITY(U,$J,358.3,14515,1,3,0)
+254 ;;=3^Hypertensive Heart Disease w/ Heart Failure
+255 ;;^UTILITY(U,$J,358.3,14515,1,4,0)
+256 ;;=4^I11.0
+257 ;;^UTILITY(U,$J,358.3,14515,2)
+258 ;;=^5007063
+259 ;;^UTILITY(U,$J,358.3,14516,0)
+260 ;;=I12.0^^56^633^15
+261 ;;^UTILITY(U,$J,358.3,14516,1,0)
+262 ;;=^358.31IA^4^2
+263 ;;^UTILITY(U,$J,358.3,14516,1,3,0)
+264 ;;=3^Hypertensive CKD w/ ESRD
+265 ;;^UTILITY(U,$J,358.3,14516,1,4,0)
+266 ;;=4^I12.0
+267 ;;^UTILITY(U,$J,358.3,14516,2)
+268 ;;=^5007065
+269 ;;^UTILITY(U,$J,358.3,14517,0)
+270 ;;=I13.10^^56^633^13
+271 ;;^UTILITY(U,$J,358.3,14517,1,0)
+272 ;;=^358.31IA^4^2
+273 ;;^UTILITY(U,$J,358.3,14517,1,3,0)
+274 ;;=3^HTN Hrt & Chr Kdny Dis w/o Hrt Fail w/ Stg 1-4 Chr Kdny
+275 ;;^UTILITY(U,$J,358.3,14517,1,4,0)
+276 ;;=4^I13.10
+277 ;;^UTILITY(U,$J,358.3,14517,2)
+278 ;;=^5007068
+279 ;;^UTILITY(U,$J,358.3,14518,0)
+280 ;;=I13.0^^56^633^11
+281 ;;^UTILITY(U,$J,358.3,14518,1,0)
+282 ;;=^358.31IA^4^2
+283 ;;^UTILITY(U,$J,358.3,14518,1,3,0)
+284 ;;=3^HTN Hrt & Chr Kdny Dis w/ Hrt Fail w/ Stg 1-4 Chr Kdny
+285 ;;^UTILITY(U,$J,358.3,14518,1,4,0)
+286 ;;=4^I13.0
+287 ;;^UTILITY(U,$J,358.3,14518,2)
+288 ;;=^5007067
+289 ;;^UTILITY(U,$J,358.3,14519,0)
+290 ;;=I13.11^^56^633^14
+291 ;;^UTILITY(U,$J,358.3,14519,1,0)
+292 ;;=^358.31IA^4^2
+293 ;;^UTILITY(U,$J,358.3,14519,1,3,0)
+294 ;;=3^HTN Hrt & Chr Kdny Dis w/o Hrt Fail w/ Stg 5 Chr Kdny
+295 ;;^UTILITY(U,$J,358.3,14519,1,4,0)
+296 ;;=4^I13.11
+297 ;;^UTILITY(U,$J,358.3,14519,2)
+298 ;;=^5007069
+299 ;;^UTILITY(U,$J,358.3,14520,0)
+300 ;;=I13.2^^56^633^12
+301 ;;^UTILITY(U,$J,358.3,14520,1,0)
+302 ;;=^358.31IA^4^2
+303 ;;^UTILITY(U,$J,358.3,14520,1,3,0)
+304 ;;=3^HTN Hrt & Chr Kdny Dis w/ Hrt Fail w/ Stg 5 Chr Kdny
+305 ;;^UTILITY(U,$J,358.3,14520,1,4,0)
+306 ;;=4^I13.2
+307 ;;^UTILITY(U,$J,358.3,14520,2)
+308 ;;=^5007070
+309 ;;^UTILITY(U,$J,358.3,14521,0)
+310 ;;=I48.91^^56^633^6
+311 ;;^UTILITY(U,$J,358.3,14521,1,0)
+312 ;;=^358.31IA^4^2
+313 ;;^UTILITY(U,$J,358.3,14521,1,3,0)
+314 ;;=3^Atrial Fibrillation,Unspec
+315 ;;^UTILITY(U,$J,358.3,14521,1,4,0)
+316 ;;=4^I48.91
+317 ;;^UTILITY(U,$J,358.3,14521,2)
+318 ;;=^5007229
+319 ;;^UTILITY(U,$J,358.3,14522,0)
+320 ;;=I48.92^^56^633^7
+321 ;;^UTILITY(U,$J,358.3,14522,1,0)
+322 ;;=^358.31IA^4^2
+323 ;;^UTILITY(U,$J,358.3,14522,1,3,0)
+324 ;;=3^Atrial Flutter,Unspec
+325 ;;^UTILITY(U,$J,358.3,14522,1,4,0)
+326 ;;=4^I48.92
+327 ;;^UTILITY(U,$J,358.3,14522,2)
+328 ;;=^5007230
+329 ;;^UTILITY(U,$J,358.3,14523,0)
+330 ;;=I16.1^^56^633^18
+331 ;;^UTILITY(U,$J,358.3,14523,1,0)
+332 ;;=^358.31IA^4^2
+333 ;;^UTILITY(U,$J,358.3,14523,1,3,0)
+334 ;;=3^Hypertensive Emergency
+335 ;;^UTILITY(U,$J,358.3,14523,1,4,0)
+336 ;;=4^I16.1
+337 ;;^UTILITY(U,$J,358.3,14523,2)
+338 ;;=^8204721
+339 ;;^UTILITY(U,$J,358.3,14524,0)
+340 ;;=I16.0^^56^633^21
+341 ;;^UTILITY(U,$J,358.3,14524,1,0)
+342 ;;=^358.31IA^4^2
+343 ;;^UTILITY(U,$J,358.3,14524,1,3,0)
+344 ;;=3^Hypertensive Urgency
+345 ;;^UTILITY(U,$J,358.3,14524,1,4,0)
+346 ;;=4^I16.0
+347 ;;^UTILITY(U,$J,358.3,14524,2)
+348 ;;=^8133013
+349 ;;^UTILITY(U,$J,358.3,14525,0)
+350 ;;=I16.9^^56^633^17
+351 ;;^UTILITY(U,$J,358.3,14525,1,0)
+352 ;;=^358.31IA^4^2
+353 ;;^UTILITY(U,$J,358.3,14525,1,3,0)
+354 ;;=3^Hypertensive Crisis,Unspec
+355 ;;^UTILITY(U,$J,358.3,14525,1,4,0)
+356 ;;=4^I16.9
+357 ;;^UTILITY(U,$J,358.3,14525,2)
+358 ;;=^5138600
+359 ;;^UTILITY(U,$J,358.3,14526,0)
+360 ;;=E78.01^^56^633^10
+361 ;;^UTILITY(U,$J,358.3,14526,1,0)
+362 ;;=^358.31IA^4^2
+363 ;;^UTILITY(U,$J,358.3,14526,1,3,0)
+364 ;;=3^Familial Hypercholesterolemia
+365 ;;^UTILITY(U,$J,358.3,14526,1,4,0)
+366 ;;=4^E78.01
+367 ;;^UTILITY(U,$J,358.3,14526,2)
+368 ;;=^7570555
+369 ;;^UTILITY(U,$J,358.3,14527,0)
+370 ;;=E78.00^^56^633^23
+371 ;;^UTILITY(U,$J,358.3,14527,1,0)
+372 ;;=^358.31IA^4^2
+373 ;;^UTILITY(U,$J,358.3,14527,1,3,0)
+374 ;;=3^Pure Hypercholesterolemia,Unspec
+375 ;;^UTILITY(U,$J,358.3,14527,1,4,0)
+376 ;;=4^E78.00
+377 ;;^UTILITY(U,$J,358.3,14527,2)
+378 ;;=^5138435
+379 ;;^UTILITY(U,$J,358.3,14528,0)
+380 ;;=I47.2^^56^633^25
+381 ;;^UTILITY(U,$J,358.3,14528,1,0)
+382 ;;=^358.31IA^4^2
+383 ;;^UTILITY(U,$J,358.3,14528,1,3,0)
+384 ;;=3^Ventricular Tachycardia
+385 ;;^UTILITY(U,$J,358.3,14528,1,4,0)
+386 ;;=4^I47.2
+387 ;;^UTILITY(U,$J,358.3,14528,2)
+388 ;;=^125976
+389 ;;^UTILITY(U,$J,358.3,14529,0)
+390 ;;=I42.6^^56^633^1
+391 ;;^UTILITY(U,$J,358.3,14529,1,0)
+392 ;;=^358.31IA^4^2
+393 ;;^UTILITY(U,$J,358.3,14529,1,3,0)
+394 ;;=3^Alcoholic Cardiomyopathy
+395 ;;^UTILITY(U,$J,358.3,14529,1,4,0)
+396 ;;=4^I42.6
+397 ;;^UTILITY(U,$J,358.3,14529,2)
+398 ;;=^5007197
+399 ;;^UTILITY(U,$J,358.3,14530,0)
+400 ;;=I51.7^^56^633^8
+401 ;;^UTILITY(U,$J,358.3,14530,1,0)
+402 ;;=^358.31IA^4^2
+403 ;;^UTILITY(U,$J,358.3,14530,1,3,0)
+404 ;;=3^Cardiomegaly
+405 ;;^UTILITY(U,$J,358.3,14530,1,4,0)
+406 ;;=4^I51.7
+407 ;;^UTILITY(U,$J,358.3,14530,2)
+408 ;;=^5007257
+409 ;;^UTILITY(U,$J,358.3,14531,0)
+410 ;;=I48.20^^56^633^2
+411 ;;^UTILITY(U,$J,358.3,14531,1,0)
+412 ;;=^358.31IA^4^2
+413 ;;^UTILITY(U,$J,358.3,14531,1,3,0)
+414 ;;=3^Atrial Fibrillation,Chronic,Unspec
+415 ;;^UTILITY(U,$J,358.3,14531,1,4,0)
+416 ;;=4^I48.20
+417 ;;^UTILITY(U,$J,358.3,14531,2)
+418 ;;=^5158048
+419 ;;^UTILITY(U,$J,358.3,14532,0)
+420 ;;=I48.11^^56^633^3
+421 ;;^UTILITY(U,$J,358.3,14532,1,0)
+422 ;;=^358.31IA^4^2
+423 ;;^UTILITY(U,$J,358.3,14532,1,3,0)
+424 ;;=3^Atrial Fibrillation,Longstanding Persistent
+425 ;;^UTILITY(U,$J,358.3,14532,1,4,0)
+426 ;;=4^I48.11
+427 ;;^UTILITY(U,$J,358.3,14532,2)
+428 ;;=^5158046
+429 ;;^UTILITY(U,$J,358.3,14533,0)
+430 ;;=I48.19^^56^633^4
+431 ;;^UTILITY(U,$J,358.3,14533,1,0)
+432 ;;=^358.31IA^4^2
+433 ;;^UTILITY(U,$J,358.3,14533,1,3,0)
+434 ;;=3^Atrial Fibrillation,Other Persistent
+435 ;;^UTILITY(U,$J,358.3,14533,1,4,0)
+436 ;;=4^I48.19
+437 ;;^UTILITY(U,$J,358.3,14533,2)
+438 ;;=^5158047
+439 ;;^UTILITY(U,$J,358.3,14534,0)
+440 ;;=I48.21^^56^633^5
+441 ;;^UTILITY(U,$J,358.3,14534,1,0)
+442 ;;=^358.31IA^4^2
+443 ;;^UTILITY(U,$J,358.3,14534,1,3,0)
+444 ;;=3^Atrial Fibrillation,Permanent
+445 ;;^UTILITY(U,$J,358.3,14534,1,4,0)
+446 ;;=4^I48.21
+447 ;;^UTILITY(U,$J,358.3,14534,2)
+448 ;;=^304710
+449 ;;^UTILITY(U,$J,358.3,14535,0)
+450 ;;=I12.9^^56^633^16
+451 ;;^UTILITY(U,$J,358.3,14535,1,0)
+452 ;;=^358.31IA^4^2
+453 ;;^UTILITY(U,$J,358.3,14535,1,3,0)
+454 ;;=3^Hypertensive CKD w/ Stg 1-4 CKD
+455 ;;^UTILITY(U,$J,358.3,14535,1,4,0)
+456 ;;=4^I12.9
+457 ;;^UTILITY(U,$J,358.3,14535,2)
+458 ;;=^5007066
+459 ;;^UTILITY(U,$J,358.3,14536,0)
+460 ;;=B07.9^^56^634^328
+461 ;;^UTILITY(U,$J,358.3,14536,1,0)
+462 ;;=^358.31IA^4^2
+463 ;;^UTILITY(U,$J,358.3,14536,1,3,0)
+464 ;;=3^Viral Wart,Unspec
+465 ;;^UTILITY(U,$J,358.3,14536,1,4,0)
+466 ;;=4^B07.9
+467 ;;^UTILITY(U,$J,358.3,14536,2)
+468 ;;=^5000519
+469 ;;^UTILITY(U,$J,358.3,14537,0)
+470 ;;=A63.0^^56^634^35
+471 ;;^UTILITY(U,$J,358.3,14537,1,0)
+472 ;;=^358.31IA^4^2
+473 ;;^UTILITY(U,$J,358.3,14537,1,3,0)
+474 ;;=3^Anogenital (Venereal) Warts
+475 ;;^UTILITY(U,$J,358.3,14537,1,4,0)
+476 ;;=4^A63.0
+477 ;;^UTILITY(U,$J,358.3,14537,2)
+478 ;;=^5000360
+479 ;;^UTILITY(U,$J,358.3,14538,0)
+480 ;;=B35.0^^56^634^319
+481 ;;^UTILITY(U,$J,358.3,14538,1,0)
+482 ;;=^358.31IA^4^2
+483 ;;^UTILITY(U,$J,358.3,14538,1,3,0)
+484 ;;=3^Tinea Barbae and Tinea Capitis
+485 ;;^UTILITY(U,$J,358.3,14538,1,4,0)
+486 ;;=4^B35.0
+487 ;;^UTILITY(U,$J,358.3,14538,2)
+488 ;;=^5000604
+489 ;;^UTILITY(U,$J,358.3,14539,0)
+490 ;;=B35.1^^56^634^324
+491 ;;^UTILITY(U,$J,358.3,14539,1,0)
+492 ;;=^358.31IA^4^2
+493 ;;^UTILITY(U,$J,358.3,14539,1,3,0)
+494 ;;=3^Tinea Unguium
+495 ;;^UTILITY(U,$J,358.3,14539,1,4,0)
+496 ;;=4^B35.1
+497 ;;^UTILITY(U,$J,358.3,14539,2)
+498 ;;=^119748
+499 ;;^UTILITY(U,$J,358.3,14540,0)
+500 ;;=B35.6^^56^634^321
+501 ;;^UTILITY(U,$J,358.3,14540,1,0)
+502 ;;=^358.31IA^4^2
+503 ;;^UTILITY(U,$J,358.3,14540,1,3,0)
+504 ;;=3^Tinea Cruris
+505 ;;^UTILITY(U,$J,358.3,14540,1,4,0)
+506 ;;=4^B35.6
+507 ;;^UTILITY(U,$J,358.3,14540,2)
+508 ;;=^119711
+509 ;;^UTILITY(U,$J,358.3,14541,0)
+510 ;;=B35.3^^56^634^323
+511 ;;^UTILITY(U,$J,358.3,14541,1,0)
+512 ;;=^358.31IA^4^2
+513 ;;^UTILITY(U,$J,358.3,14541,1,3,0)
+514 ;;=3^Tinea Pedis
+515 ;;^UTILITY(U,$J,358.3,14541,1,4,0)
+516 ;;=4^B35.3
+517 ;;^UTILITY(U,$J,358.3,14541,2)
+518 ;;=^119732
+519 ;;^UTILITY(U,$J,358.3,14542,0)
+520 ;;=B35.5^^56^634^322
+521 ;;^UTILITY(U,$J,358.3,14542,1,0)
+522 ;;=^358.31IA^4^2
+523 ;;^UTILITY(U,$J,358.3,14542,1,3,0)
+524 ;;=3^Tinea Imbricata
+525 ;;^UTILITY(U,$J,358.3,14542,1,4,0)
+526 ;;=4^B35.5
+527 ;;^UTILITY(U,$J,358.3,14542,2)
+528 ;;=^119725
+529 ;;^UTILITY(U,$J,358.3,14543,0)
+530 ;;=B35.4^^56^634^320
+531 ;;^UTILITY(U,$J,358.3,14543,1,0)
+532 ;;=^358.31IA^4^2
+533 ;;^UTILITY(U,$J,358.3,14543,1,3,0)
+534 ;;=3^Tinea Corporis
+535 ;;^UTILITY(U,$J,358.3,14543,1,4,0)
+536 ;;=4^B35.4
+537 ;;^UTILITY(U,$J,358.3,14543,2)
+538 ;;=^119704
+539 ;;^UTILITY(U,$J,358.3,14544,0)
+540 ;;=B35.8^^56^634^140
+541 ;;^UTILITY(U,$J,358.3,14544,1,0)
+542 ;;=^358.31IA^4^2
+543 ;;^UTILITY(U,$J,358.3,14544,1,3,0)
+544 ;;=3^Dermatophytoses,Other
+545 ;;^UTILITY(U,$J,358.3,14544,1,4,0)
+546 ;;=4^B35.8
+547 ;;^UTILITY(U,$J,358.3,14544,2)
+548 ;;=^5000606
+549 ;;^UTILITY(U,$J,358.3,14545,0)
+550 ;;=B36.9^^56^634^312
+551 ;;^UTILITY(U,$J,358.3,14545,1,0)
+552 ;;=^358.31IA^4^2
+553 ;;^UTILITY(U,$J,358.3,14545,1,3,0)
+554 ;;=3^Superficial Mycosis,Unspec
+555 ;;^UTILITY(U,$J,358.3,14545,1,4,0)
+556 ;;=4^B36.9
+557 ;;^UTILITY(U,$J,358.3,14545,2)
+558 ;;=^5000611
+559 ;;^UTILITY(U,$J,358.3,14546,0)
+560 ;;=D69.0^^56^634^33
+561 ;;^UTILITY(U,$J,358.3,14546,1,0)
+562 ;;=^358.31IA^4^2
+563 ;;^UTILITY(U,$J,358.3,14546,1,3,0)
+564 ;;=3^Allergic Purpura
+565 ;;^UTILITY(U,$J,358.3,14546,1,4,0)
+566 ;;=4^D69.0
+567 ;;^UTILITY(U,$J,358.3,14546,2)
+568 ;;=^5002365
+569 ;;^UTILITY(U,$J,358.3,14547,0)
+570 ;;=B00.9^^56^634^161
+571 ;;^UTILITY(U,$J,358.3,14547,1,0)
+572 ;;=^358.31IA^4^2
+573 ;;^UTILITY(U,$J,358.3,14547,1,3,0)
+574 ;;=3^Herpesviral Infection,Unspec
+575 ;;^UTILITY(U,$J,358.3,14547,1,4,0)
+576 ;;=4^B00.9
+577 ;;^UTILITY(U,$J,358.3,14547,2)
+578 ;;=^5000480
+579 ;;^UTILITY(U,$J,358.3,14548,0)
+580 ;;=B02.9^^56^634^331
+581 ;;^UTILITY(U,$J,358.3,14548,1,0)
+582 ;;=^358.31IA^4^2
+583 ;;^UTILITY(U,$J,358.3,14548,1,3,0)
+584 ;;=3^Zoster w/o Complications
+585 ;;^UTILITY(U,$J,358.3,14548,1,4,0)
+586 ;;=4^B02.9
+587 ;;^UTILITY(U,$J,358.3,14548,2)
+588 ;;=^5000501
+589 ;;^UTILITY(U,$J,358.3,14549,0)
+590 ;;=D17.9^^56^634^90
+591 ;;^UTILITY(U,$J,358.3,14549,1,0)
+592 ;;=^358.31IA^4^2
+593 ;;^UTILITY(U,$J,358.3,14549,1,3,0)
+594 ;;=3^Benign Lipomatous Neop,Unspec
+595 ;;^UTILITY(U,$J,358.3,14549,1,4,0)
+596 ;;=4^D17.9
+597 ;;^UTILITY(U,$J,358.3,14549,2)
+598 ;;=^5002020
+599 ;;^UTILITY(U,$J,358.3,14550,0)
+600 ;;=E08.621^^56^634^137
+601 ;;^UTILITY(U,$J,358.3,14550,1,0)
+602 ;;=^358.31IA^4^2
+603 ;;^UTILITY(U,$J,358.3,14550,1,3,0)
+604 ;;=3^DM d/t Underlying Condition w/ Foot Ulcer
+605 ;;^UTILITY(U,$J,358.3,14550,1,4,0)
+606 ;;=4^E08.621
+607 ;;^UTILITY(U,$J,358.3,14550,2)
+608 ;;=^5002534
+609 ;;^UTILITY(U,$J,358.3,14551,0)
+610 ;;=E09.621^^56^634^136
+611 ;;^UTILITY(U,$J,358.3,14551,1,0)
+612 ;;=^358.31IA^4^2
+613 ;;^UTILITY(U,$J,358.3,14551,1,3,0)
+614 ;;=3^DM d/t Drug/Chemical w/ Foot Ulcer
+615 ;;^UTILITY(U,$J,358.3,14551,1,4,0)
+616 ;;=4^E09.621
+617 ;;^UTILITY(U,$J,358.3,14551,2)
+618 ;;=^5002576
+619 ;;^UTILITY(U,$J,358.3,14552,0)
+620 ;;=H05.011^^56^634^112
+621 ;;^UTILITY(U,$J,358.3,14552,1,0)
+622 ;;=^358.31IA^4^2
+623 ;;^UTILITY(U,$J,358.3,14552,1,3,0)
+624 ;;=3^Cellulitis of Right Orbit
+625 ;;^UTILITY(U,$J,358.3,14552,1,4,0)
+626 ;;=4^H05.011
+627 ;;^UTILITY(U,$J,358.3,14552,2)
+628 ;;=^5004560
+629 ;;^UTILITY(U,$J,358.3,14553,0)
+630 ;;=H05.012^^56^634^105
+631 ;;^UTILITY(U,$J,358.3,14553,1,0)
+632 ;;=^358.31IA^4^2
+633 ;;^UTILITY(U,$J,358.3,14553,1,3,0)
+634 ;;=3^Cellulitis of Left Orbit
+635 ;;^UTILITY(U,$J,358.3,14553,1,4,0)
+636 ;;=4^H05.012
+637 ;;^UTILITY(U,$J,358.3,14553,2)
+638 ;;=^5004561
+639 ;;^UTILITY(U,$J,358.3,14554,0)
+640 ;;=H05.013^^56^634^99
+641 ;;^UTILITY(U,$J,358.3,14554,1,0)
+642 ;;=^358.31IA^4^2
+643 ;;^UTILITY(U,$J,358.3,14554,1,3,0)
+644 ;;=3^Cellulitis of Bilateral Orbits
+645 ;;^UTILITY(U,$J,358.3,14554,1,4,0)
+646 ;;=4^H05.013
+647 ;;^UTILITY(U,$J,358.3,14554,2)
+648 ;;=^5004562
+649 ;;^UTILITY(U,$J,358.3,14555,0)
+650 ;;=I70.331^^56^634^51
+651 ;;^UTILITY(U,$J,358.3,14555,1,0)
+652 ;;=^358.31IA^4^2
+653 ;;^UTILITY(U,$J,358.3,14555,1,3,0)
+654 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Thigh
+655 ;;^UTILITY(U,$J,358.3,14555,1,4,0)
+656 ;;=4^I70.331
+657 ;;^UTILITY(U,$J,358.3,14555,2)
+658 ;;=^5007626
+659 ;;^UTILITY(U,$J,358.3,14556,0)
+660 ;;=I70.332^^56^634^52
+661 ;;^UTILITY(U,$J,358.3,14556,1,0)
+662 ;;=^358.31IA^4^2
+663 ;;^UTILITY(U,$J,358.3,14556,1,3,0)
+664 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Calf
+665 ;;^UTILITY(U,$J,358.3,14556,1,4,0)
+666 ;;=4^I70.332
+667 ;;^UTILITY(U,$J,358.3,14556,2)
+668 ;;=^5007627
+669 ;;^UTILITY(U,$J,358.3,14557,0)
+670 ;;=I70.333^^56^634^53
+671 ;;^UTILITY(U,$J,358.3,14557,1,0)
+672 ;;=^358.31IA^4^2
+673 ;;^UTILITY(U,$J,358.3,14557,1,3,0)
+674 ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Ankle
+675 ;;^UTILITY(U,$J,358.3,14557,1,4,0)
+676 ;;=4^I70.333
+677 ;;^UTILITY(U,$J,358.3,14557,2)
+678 ;;=^5007628
+679 ;;^UTILITY(U,$J,358.3,14558,0)
+680 ;;=I70.334^^56^634^54