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

IBDEI05Z.m

Go to the documentation of this file.
  1. IBDEI05Z ; ; 01-AUG-2022
  1. ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 2022
  1. 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
  1. Q Q
  1. ;;^UTILITY(U,$J,358.3,14490,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14490,1,3,0)
  1. ;;=3^Athscl Natv Arteries of Extrm w/ Gangrene,Left Leg
  1. ;;^UTILITY(U,$J,358.3,14490,1,4,0)
  1. ;;=4^I70.262
  1. ;;^UTILITY(U,$J,358.3,14490,2)
  1. ;;=^5007604
  1. ;;^UTILITY(U,$J,358.3,14491,0)
  1. ;;=I70.261^^56^632^16
  1. ;;^UTILITY(U,$J,358.3,14491,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14491,1,3,0)
  1. ;;=3^Athscl Natv Arteries of Extrm w/ Gangrene,Right Leg
  1. ;;^UTILITY(U,$J,358.3,14491,1,4,0)
  1. ;;=4^I70.261
  1. ;;^UTILITY(U,$J,358.3,14491,2)
  1. ;;=^5007603
  1. ;;^UTILITY(U,$J,358.3,14492,0)
  1. ;;=I71.2^^56^632^34
  1. ;;^UTILITY(U,$J,358.3,14492,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14492,1,3,0)
  1. ;;=3^Thoracic Aortic Aneurysm w/o Rupture
  1. ;;^UTILITY(U,$J,358.3,14492,1,4,0)
  1. ;;=4^I71.2
  1. ;;^UTILITY(U,$J,358.3,14492,2)
  1. ;;=^5007787
  1. ;;^UTILITY(U,$J,358.3,14493,0)
  1. ;;=I71.4^^56^632^1
  1. ;;^UTILITY(U,$J,358.3,14493,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14493,1,3,0)
  1. ;;=3^Abdominal Aortic Aneurysm w/o Rupture
  1. ;;^UTILITY(U,$J,358.3,14493,1,4,0)
  1. ;;=4^I71.4
  1. ;;^UTILITY(U,$J,358.3,14493,2)
  1. ;;=^5007789
  1. ;;^UTILITY(U,$J,358.3,14494,0)
  1. ;;=I73.9^^56^632^32
  1. ;;^UTILITY(U,$J,358.3,14494,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14494,1,3,0)
  1. ;;=3^Peripheral Vascular Disease,Unspec
  1. ;;^UTILITY(U,$J,358.3,14494,1,4,0)
  1. ;;=4^I73.9
  1. ;;^UTILITY(U,$J,358.3,14494,2)
  1. ;;=^184182
  1. ;;^UTILITY(U,$J,358.3,14495,0)
  1. ;;=I82.891^^56^632^23
  1. ;;^UTILITY(U,$J,358.3,14495,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14495,1,3,0)
  1. ;;=3^Embolism/Thrombosis Oth Spec Veins,Chronic
  1. ;;^UTILITY(U,$J,358.3,14495,1,4,0)
  1. ;;=4^I82.891
  1. ;;^UTILITY(U,$J,358.3,14495,2)
  1. ;;=^5007939
  1. ;;^UTILITY(U,$J,358.3,14496,0)
  1. ;;=I82.890^^56^632^22
  1. ;;^UTILITY(U,$J,358.3,14496,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14496,1,3,0)
  1. ;;=3^Embolism/Thrombosis Oth Spec Veins,Acute
  1. ;;^UTILITY(U,$J,358.3,14496,1,4,0)
  1. ;;=4^I82.890
  1. ;;^UTILITY(U,$J,358.3,14496,2)
  1. ;;=^5007938
  1. ;;^UTILITY(U,$J,358.3,14497,0)
  1. ;;=I25.729^^56^632^2
  1. ;;^UTILITY(U,$J,358.3,14497,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14497,1,3,0)
  1. ;;=3^Athscl Autologous Artery CABG w/ Unspec Angina Pectoris
  1. ;;^UTILITY(U,$J,358.3,14497,1,4,0)
  1. ;;=4^I25.729
  1. ;;^UTILITY(U,$J,358.3,14497,2)
  1. ;;=^5133561
  1. ;;^UTILITY(U,$J,358.3,14498,0)
  1. ;;=I25.119^^56^632^3
  1. ;;^UTILITY(U,$J,358.3,14498,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14498,1,3,0)
  1. ;;=3^Athscl HRT Dis of Native Cor Art w/ Ang Pctrs,Unspec
  1. ;;^UTILITY(U,$J,358.3,14498,1,4,0)
  1. ;;=4^I25.119
  1. ;;^UTILITY(U,$J,358.3,14498,2)
  1. ;;=^5007111
  1. ;;^UTILITY(U,$J,358.3,14499,0)
  1. ;;=I25.10^^56^632^4
  1. ;;^UTILITY(U,$J,358.3,14499,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14499,1,3,0)
  1. ;;=3^Athscl HRT Dis of Native Cor Art w/o Ang Pctrs
  1. ;;^UTILITY(U,$J,358.3,14499,1,4,0)
  1. ;;=4^I25.10
  1. ;;^UTILITY(U,$J,358.3,14499,2)
  1. ;;=^5007107
  1. ;;^UTILITY(U,$J,358.3,14500,0)
  1. ;;=I25.110^^56^632^5
  1. ;;^UTILITY(U,$J,358.3,14500,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14500,1,3,0)
  1. ;;=3^Athscl Hrt Dis of Native Cor Art w/ Unstable Ang Pctrs
  1. ;;^UTILITY(U,$J,358.3,14500,1,4,0)
  1. ;;=4^I25.110
  1. ;;^UTILITY(U,$J,358.3,14500,2)
  1. ;;=^5007108
  1. ;;^UTILITY(U,$J,358.3,14501,0)
  1. ;;=I25.810^^56^632^17
  1. ;;^UTILITY(U,$J,358.3,14501,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14501,1,3,0)
  1. ;;=3^Athscl of CABG w/o Angina Pectoris
  1. ;;^UTILITY(U,$J,358.3,14501,1,4,0)
  1. ;;=4^I25.810
  1. ;;^UTILITY(U,$J,358.3,14501,2)
  1. ;;=^5007141
  1. ;;^UTILITY(U,$J,358.3,14502,0)
  1. ;;=I25.701^^56^632^18
  1. ;;^UTILITY(U,$J,358.3,14502,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14502,1,3,0)
  1. ;;=3^Athscl of CABG,Unspec w/ Angina Pectoris w/ Documented Spasm
  1. ;;^UTILITY(U,$J,358.3,14502,1,4,0)
  1. ;;=4^I25.701
  1. ;;^UTILITY(U,$J,358.3,14502,2)
  1. ;;=^5007118
  1. ;;^UTILITY(U,$J,358.3,14503,0)
  1. ;;=I25.708^^56^632^19
  1. ;;^UTILITY(U,$J,358.3,14503,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14503,1,3,0)
  1. ;;=3^Athscl of CABG,Unspec w/ Oth Angina Pectoris
  1. ;;^UTILITY(U,$J,358.3,14503,1,4,0)
  1. ;;=4^I25.708
  1. ;;^UTILITY(U,$J,358.3,14503,2)
  1. ;;=^5007119
  1. ;;^UTILITY(U,$J,358.3,14504,0)
  1. ;;=I25.709^^56^632^20
  1. ;;^UTILITY(U,$J,358.3,14504,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14504,1,3,0)
  1. ;;=3^Athscl of CABG,Unspec w/ Unspec Angina Pectoris
  1. ;;^UTILITY(U,$J,358.3,14504,1,4,0)
  1. ;;=4^I25.709
  1. ;;^UTILITY(U,$J,358.3,14504,2)
  1. ;;=^5007120
  1. ;;^UTILITY(U,$J,358.3,14505,0)
  1. ;;=I25.700^^56^632^21
  1. ;;^UTILITY(U,$J,358.3,14505,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14505,1,3,0)
  1. ;;=3^Athscl of CABG,Unspec w/ Unstable Angina Pectoris
  1. ;;^UTILITY(U,$J,358.3,14505,1,4,0)
  1. ;;=4^I25.700
  1. ;;^UTILITY(U,$J,358.3,14505,2)
  1. ;;=^5007117
  1. ;;^UTILITY(U,$J,358.3,14506,0)
  1. ;;=I82.469^^56^632^24
  1. ;;^UTILITY(U,$J,358.3,14506,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14506,1,3,0)
  1. ;;=3^Embolism/Thrombosis,Unspec Calf Muscle Vein,Acute
  1. ;;^UTILITY(U,$J,358.3,14506,1,4,0)
  1. ;;=4^I82.469
  1. ;;^UTILITY(U,$J,358.3,14506,2)
  1. ;;=^5158066
  1. ;;^UTILITY(U,$J,358.3,14507,0)
  1. ;;=I82.569^^56^632^25
  1. ;;^UTILITY(U,$J,358.3,14507,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14507,1,3,0)
  1. ;;=3^Embolism/Thrombosis,Unspec Calf Muscle Vein,Chronic
  1. ;;^UTILITY(U,$J,358.3,14507,1,4,0)
  1. ;;=4^I82.569
  1. ;;^UTILITY(U,$J,358.3,14507,2)
  1. ;;=^5158074
  1. ;;^UTILITY(U,$J,358.3,14508,0)
  1. ;;=I80.259^^56^632^33
  1. ;;^UTILITY(U,$J,358.3,14508,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14508,1,3,0)
  1. ;;=3^Phlebitis & Thrombophlebitis,Unspec Calf Muscle Vein
  1. ;;^UTILITY(U,$J,358.3,14508,1,4,0)
  1. ;;=4^I80.259
  1. ;;^UTILITY(U,$J,358.3,14508,2)
  1. ;;=^5158058
  1. ;;^UTILITY(U,$J,358.3,14509,0)
  1. ;;=I82.409^^56^632^26
  1. ;;^UTILITY(U,$J,358.3,14509,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14509,1,3,0)
  1. ;;=3^Embolism/Thrombosis,Unspec Deep Vein,LE Unspec Acute
  1. ;;^UTILITY(U,$J,358.3,14509,1,4,0)
  1. ;;=4^I82.409
  1. ;;^UTILITY(U,$J,358.3,14509,2)
  1. ;;=^5133625
  1. ;;^UTILITY(U,$J,358.3,14510,0)
  1. ;;=I82.509^^56^632^27
  1. ;;^UTILITY(U,$J,358.3,14510,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14510,1,3,0)
  1. ;;=3^Embolism/Thrombosis,Unspec Deep Vein,LE Unspec Chronic
  1. ;;^UTILITY(U,$J,358.3,14510,1,4,0)
  1. ;;=4^I82.509
  1. ;;^UTILITY(U,$J,358.3,14510,2)
  1. ;;=^5133628
  1. ;;^UTILITY(U,$J,358.3,14511,0)
  1. ;;=E78.1^^56^633^24
  1. ;;^UTILITY(U,$J,358.3,14511,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14511,1,3,0)
  1. ;;=3^Pure Hyperglyceridemia
  1. ;;^UTILITY(U,$J,358.3,14511,1,4,0)
  1. ;;=4^E78.1
  1. ;;^UTILITY(U,$J,358.3,14511,2)
  1. ;;=^101303
  1. ;;^UTILITY(U,$J,358.3,14512,0)
  1. ;;=E78.2^^56^633^22
  1. ;;^UTILITY(U,$J,358.3,14512,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14512,1,3,0)
  1. ;;=3^Mixed Hyperlipidemia
  1. ;;^UTILITY(U,$J,358.3,14512,1,4,0)
  1. ;;=4^E78.2
  1. ;;^UTILITY(U,$J,358.3,14512,2)
  1. ;;=^78424
  1. ;;^UTILITY(U,$J,358.3,14513,0)
  1. ;;=I10.^^56^633^9
  1. ;;^UTILITY(U,$J,358.3,14513,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14513,1,3,0)
  1. ;;=3^Essential Primary Hypertension
  1. ;;^UTILITY(U,$J,358.3,14513,1,4,0)
  1. ;;=4^I10.
  1. ;;^UTILITY(U,$J,358.3,14513,2)
  1. ;;=^5007062
  1. ;;^UTILITY(U,$J,358.3,14514,0)
  1. ;;=I11.9^^56^633^20
  1. ;;^UTILITY(U,$J,358.3,14514,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14514,1,3,0)
  1. ;;=3^Hypertensive Heart Disease w/o Heart Failure
  1. ;;^UTILITY(U,$J,358.3,14514,1,4,0)
  1. ;;=4^I11.9
  1. ;;^UTILITY(U,$J,358.3,14514,2)
  1. ;;=^5007064
  1. ;;^UTILITY(U,$J,358.3,14515,0)
  1. ;;=I11.0^^56^633^19
  1. ;;^UTILITY(U,$J,358.3,14515,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14515,1,3,0)
  1. ;;=3^Hypertensive Heart Disease w/ Heart Failure
  1. ;;^UTILITY(U,$J,358.3,14515,1,4,0)
  1. ;;=4^I11.0
  1. ;;^UTILITY(U,$J,358.3,14515,2)
  1. ;;=^5007063
  1. ;;^UTILITY(U,$J,358.3,14516,0)
  1. ;;=I12.0^^56^633^15
  1. ;;^UTILITY(U,$J,358.3,14516,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14516,1,3,0)
  1. ;;=3^Hypertensive CKD w/ ESRD
  1. ;;^UTILITY(U,$J,358.3,14516,1,4,0)
  1. ;;=4^I12.0
  1. ;;^UTILITY(U,$J,358.3,14516,2)
  1. ;;=^5007065
  1. ;;^UTILITY(U,$J,358.3,14517,0)
  1. ;;=I13.10^^56^633^13
  1. ;;^UTILITY(U,$J,358.3,14517,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14517,1,3,0)
  1. ;;=3^HTN Hrt & Chr Kdny Dis w/o Hrt Fail w/ Stg 1-4 Chr Kdny
  1. ;;^UTILITY(U,$J,358.3,14517,1,4,0)
  1. ;;=4^I13.10
  1. ;;^UTILITY(U,$J,358.3,14517,2)
  1. ;;=^5007068
  1. ;;^UTILITY(U,$J,358.3,14518,0)
  1. ;;=I13.0^^56^633^11
  1. ;;^UTILITY(U,$J,358.3,14518,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14518,1,3,0)
  1. ;;=3^HTN Hrt & Chr Kdny Dis w/ Hrt Fail w/ Stg 1-4 Chr Kdny
  1. ;;^UTILITY(U,$J,358.3,14518,1,4,0)
  1. ;;=4^I13.0
  1. ;;^UTILITY(U,$J,358.3,14518,2)
  1. ;;=^5007067
  1. ;;^UTILITY(U,$J,358.3,14519,0)
  1. ;;=I13.11^^56^633^14
  1. ;;^UTILITY(U,$J,358.3,14519,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14519,1,3,0)
  1. ;;=3^HTN Hrt & Chr Kdny Dis w/o Hrt Fail w/ Stg 5 Chr Kdny
  1. ;;^UTILITY(U,$J,358.3,14519,1,4,0)
  1. ;;=4^I13.11
  1. ;;^UTILITY(U,$J,358.3,14519,2)
  1. ;;=^5007069
  1. ;;^UTILITY(U,$J,358.3,14520,0)
  1. ;;=I13.2^^56^633^12
  1. ;;^UTILITY(U,$J,358.3,14520,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14520,1,3,0)
  1. ;;=3^HTN Hrt & Chr Kdny Dis w/ Hrt Fail w/ Stg 5 Chr Kdny
  1. ;;^UTILITY(U,$J,358.3,14520,1,4,0)
  1. ;;=4^I13.2
  1. ;;^UTILITY(U,$J,358.3,14520,2)
  1. ;;=^5007070
  1. ;;^UTILITY(U,$J,358.3,14521,0)
  1. ;;=I48.91^^56^633^6
  1. ;;^UTILITY(U,$J,358.3,14521,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14521,1,3,0)
  1. ;;=3^Atrial Fibrillation,Unspec
  1. ;;^UTILITY(U,$J,358.3,14521,1,4,0)
  1. ;;=4^I48.91
  1. ;;^UTILITY(U,$J,358.3,14521,2)
  1. ;;=^5007229
  1. ;;^UTILITY(U,$J,358.3,14522,0)
  1. ;;=I48.92^^56^633^7
  1. ;;^UTILITY(U,$J,358.3,14522,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14522,1,3,0)
  1. ;;=3^Atrial Flutter,Unspec
  1. ;;^UTILITY(U,$J,358.3,14522,1,4,0)
  1. ;;=4^I48.92
  1. ;;^UTILITY(U,$J,358.3,14522,2)
  1. ;;=^5007230
  1. ;;^UTILITY(U,$J,358.3,14523,0)
  1. ;;=I16.1^^56^633^18
  1. ;;^UTILITY(U,$J,358.3,14523,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14523,1,3,0)
  1. ;;=3^Hypertensive Emergency
  1. ;;^UTILITY(U,$J,358.3,14523,1,4,0)
  1. ;;=4^I16.1
  1. ;;^UTILITY(U,$J,358.3,14523,2)
  1. ;;=^8204721
  1. ;;^UTILITY(U,$J,358.3,14524,0)
  1. ;;=I16.0^^56^633^21
  1. ;;^UTILITY(U,$J,358.3,14524,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14524,1,3,0)
  1. ;;=3^Hypertensive Urgency
  1. ;;^UTILITY(U,$J,358.3,14524,1,4,0)
  1. ;;=4^I16.0
  1. ;;^UTILITY(U,$J,358.3,14524,2)
  1. ;;=^8133013
  1. ;;^UTILITY(U,$J,358.3,14525,0)
  1. ;;=I16.9^^56^633^17
  1. ;;^UTILITY(U,$J,358.3,14525,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14525,1,3,0)
  1. ;;=3^Hypertensive Crisis,Unspec
  1. ;;^UTILITY(U,$J,358.3,14525,1,4,0)
  1. ;;=4^I16.9
  1. ;;^UTILITY(U,$J,358.3,14525,2)
  1. ;;=^5138600
  1. ;;^UTILITY(U,$J,358.3,14526,0)
  1. ;;=E78.01^^56^633^10
  1. ;;^UTILITY(U,$J,358.3,14526,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14526,1,3,0)
  1. ;;=3^Familial Hypercholesterolemia
  1. ;;^UTILITY(U,$J,358.3,14526,1,4,0)
  1. ;;=4^E78.01
  1. ;;^UTILITY(U,$J,358.3,14526,2)
  1. ;;=^7570555
  1. ;;^UTILITY(U,$J,358.3,14527,0)
  1. ;;=E78.00^^56^633^23
  1. ;;^UTILITY(U,$J,358.3,14527,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14527,1,3,0)
  1. ;;=3^Pure Hypercholesterolemia,Unspec
  1. ;;^UTILITY(U,$J,358.3,14527,1,4,0)
  1. ;;=4^E78.00
  1. ;;^UTILITY(U,$J,358.3,14527,2)
  1. ;;=^5138435
  1. ;;^UTILITY(U,$J,358.3,14528,0)
  1. ;;=I47.2^^56^633^25
  1. ;;^UTILITY(U,$J,358.3,14528,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14528,1,3,0)
  1. ;;=3^Ventricular Tachycardia
  1. ;;^UTILITY(U,$J,358.3,14528,1,4,0)
  1. ;;=4^I47.2
  1. ;;^UTILITY(U,$J,358.3,14528,2)
  1. ;;=^125976
  1. ;;^UTILITY(U,$J,358.3,14529,0)
  1. ;;=I42.6^^56^633^1
  1. ;;^UTILITY(U,$J,358.3,14529,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14529,1,3,0)
  1. ;;=3^Alcoholic Cardiomyopathy
  1. ;;^UTILITY(U,$J,358.3,14529,1,4,0)
  1. ;;=4^I42.6
  1. ;;^UTILITY(U,$J,358.3,14529,2)
  1. ;;=^5007197
  1. ;;^UTILITY(U,$J,358.3,14530,0)
  1. ;;=I51.7^^56^633^8
  1. ;;^UTILITY(U,$J,358.3,14530,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14530,1,3,0)
  1. ;;=3^Cardiomegaly
  1. ;;^UTILITY(U,$J,358.3,14530,1,4,0)
  1. ;;=4^I51.7
  1. ;;^UTILITY(U,$J,358.3,14530,2)
  1. ;;=^5007257
  1. ;;^UTILITY(U,$J,358.3,14531,0)
  1. ;;=I48.20^^56^633^2
  1. ;;^UTILITY(U,$J,358.3,14531,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14531,1,3,0)
  1. ;;=3^Atrial Fibrillation,Chronic,Unspec
  1. ;;^UTILITY(U,$J,358.3,14531,1,4,0)
  1. ;;=4^I48.20
  1. ;;^UTILITY(U,$J,358.3,14531,2)
  1. ;;=^5158048
  1. ;;^UTILITY(U,$J,358.3,14532,0)
  1. ;;=I48.11^^56^633^3
  1. ;;^UTILITY(U,$J,358.3,14532,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14532,1,3,0)
  1. ;;=3^Atrial Fibrillation,Longstanding Persistent
  1. ;;^UTILITY(U,$J,358.3,14532,1,4,0)
  1. ;;=4^I48.11
  1. ;;^UTILITY(U,$J,358.3,14532,2)
  1. ;;=^5158046
  1. ;;^UTILITY(U,$J,358.3,14533,0)
  1. ;;=I48.19^^56^633^4
  1. ;;^UTILITY(U,$J,358.3,14533,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14533,1,3,0)
  1. ;;=3^Atrial Fibrillation,Other Persistent
  1. ;;^UTILITY(U,$J,358.3,14533,1,4,0)
  1. ;;=4^I48.19
  1. ;;^UTILITY(U,$J,358.3,14533,2)
  1. ;;=^5158047
  1. ;;^UTILITY(U,$J,358.3,14534,0)
  1. ;;=I48.21^^56^633^5
  1. ;;^UTILITY(U,$J,358.3,14534,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14534,1,3,0)
  1. ;;=3^Atrial Fibrillation,Permanent
  1. ;;^UTILITY(U,$J,358.3,14534,1,4,0)
  1. ;;=4^I48.21
  1. ;;^UTILITY(U,$J,358.3,14534,2)
  1. ;;=^304710
  1. ;;^UTILITY(U,$J,358.3,14535,0)
  1. ;;=I12.9^^56^633^16
  1. ;;^UTILITY(U,$J,358.3,14535,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14535,1,3,0)
  1. ;;=3^Hypertensive CKD w/ Stg 1-4 CKD
  1. ;;^UTILITY(U,$J,358.3,14535,1,4,0)
  1. ;;=4^I12.9
  1. ;;^UTILITY(U,$J,358.3,14535,2)
  1. ;;=^5007066
  1. ;;^UTILITY(U,$J,358.3,14536,0)
  1. ;;=B07.9^^56^634^328
  1. ;;^UTILITY(U,$J,358.3,14536,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14536,1,3,0)
  1. ;;=3^Viral Wart,Unspec
  1. ;;^UTILITY(U,$J,358.3,14536,1,4,0)
  1. ;;=4^B07.9
  1. ;;^UTILITY(U,$J,358.3,14536,2)
  1. ;;=^5000519
  1. ;;^UTILITY(U,$J,358.3,14537,0)
  1. ;;=A63.0^^56^634^35
  1. ;;^UTILITY(U,$J,358.3,14537,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14537,1,3,0)
  1. ;;=3^Anogenital (Venereal) Warts
  1. ;;^UTILITY(U,$J,358.3,14537,1,4,0)
  1. ;;=4^A63.0
  1. ;;^UTILITY(U,$J,358.3,14537,2)
  1. ;;=^5000360
  1. ;;^UTILITY(U,$J,358.3,14538,0)
  1. ;;=B35.0^^56^634^319
  1. ;;^UTILITY(U,$J,358.3,14538,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14538,1,3,0)
  1. ;;=3^Tinea Barbae and Tinea Capitis
  1. ;;^UTILITY(U,$J,358.3,14538,1,4,0)
  1. ;;=4^B35.0
  1. ;;^UTILITY(U,$J,358.3,14538,2)
  1. ;;=^5000604
  1. ;;^UTILITY(U,$J,358.3,14539,0)
  1. ;;=B35.1^^56^634^324
  1. ;;^UTILITY(U,$J,358.3,14539,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14539,1,3,0)
  1. ;;=3^Tinea Unguium
  1. ;;^UTILITY(U,$J,358.3,14539,1,4,0)
  1. ;;=4^B35.1
  1. ;;^UTILITY(U,$J,358.3,14539,2)
  1. ;;=^119748
  1. ;;^UTILITY(U,$J,358.3,14540,0)
  1. ;;=B35.6^^56^634^321
  1. ;;^UTILITY(U,$J,358.3,14540,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14540,1,3,0)
  1. ;;=3^Tinea Cruris
  1. ;;^UTILITY(U,$J,358.3,14540,1,4,0)
  1. ;;=4^B35.6
  1. ;;^UTILITY(U,$J,358.3,14540,2)
  1. ;;=^119711
  1. ;;^UTILITY(U,$J,358.3,14541,0)
  1. ;;=B35.3^^56^634^323
  1. ;;^UTILITY(U,$J,358.3,14541,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14541,1,3,0)
  1. ;;=3^Tinea Pedis
  1. ;;^UTILITY(U,$J,358.3,14541,1,4,0)
  1. ;;=4^B35.3
  1. ;;^UTILITY(U,$J,358.3,14541,2)
  1. ;;=^119732
  1. ;;^UTILITY(U,$J,358.3,14542,0)
  1. ;;=B35.5^^56^634^322
  1. ;;^UTILITY(U,$J,358.3,14542,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14542,1,3,0)
  1. ;;=3^Tinea Imbricata
  1. ;;^UTILITY(U,$J,358.3,14542,1,4,0)
  1. ;;=4^B35.5
  1. ;;^UTILITY(U,$J,358.3,14542,2)
  1. ;;=^119725
  1. ;;^UTILITY(U,$J,358.3,14543,0)
  1. ;;=B35.4^^56^634^320
  1. ;;^UTILITY(U,$J,358.3,14543,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14543,1,3,0)
  1. ;;=3^Tinea Corporis
  1. ;;^UTILITY(U,$J,358.3,14543,1,4,0)
  1. ;;=4^B35.4
  1. ;;^UTILITY(U,$J,358.3,14543,2)
  1. ;;=^119704
  1. ;;^UTILITY(U,$J,358.3,14544,0)
  1. ;;=B35.8^^56^634^140
  1. ;;^UTILITY(U,$J,358.3,14544,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14544,1,3,0)
  1. ;;=3^Dermatophytoses,Other
  1. ;;^UTILITY(U,$J,358.3,14544,1,4,0)
  1. ;;=4^B35.8
  1. ;;^UTILITY(U,$J,358.3,14544,2)
  1. ;;=^5000606
  1. ;;^UTILITY(U,$J,358.3,14545,0)
  1. ;;=B36.9^^56^634^312
  1. ;;^UTILITY(U,$J,358.3,14545,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14545,1,3,0)
  1. ;;=3^Superficial Mycosis,Unspec
  1. ;;^UTILITY(U,$J,358.3,14545,1,4,0)
  1. ;;=4^B36.9
  1. ;;^UTILITY(U,$J,358.3,14545,2)
  1. ;;=^5000611
  1. ;;^UTILITY(U,$J,358.3,14546,0)
  1. ;;=D69.0^^56^634^33
  1. ;;^UTILITY(U,$J,358.3,14546,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14546,1,3,0)
  1. ;;=3^Allergic Purpura
  1. ;;^UTILITY(U,$J,358.3,14546,1,4,0)
  1. ;;=4^D69.0
  1. ;;^UTILITY(U,$J,358.3,14546,2)
  1. ;;=^5002365
  1. ;;^UTILITY(U,$J,358.3,14547,0)
  1. ;;=B00.9^^56^634^161
  1. ;;^UTILITY(U,$J,358.3,14547,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14547,1,3,0)
  1. ;;=3^Herpesviral Infection,Unspec
  1. ;;^UTILITY(U,$J,358.3,14547,1,4,0)
  1. ;;=4^B00.9
  1. ;;^UTILITY(U,$J,358.3,14547,2)
  1. ;;=^5000480
  1. ;;^UTILITY(U,$J,358.3,14548,0)
  1. ;;=B02.9^^56^634^331
  1. ;;^UTILITY(U,$J,358.3,14548,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14548,1,3,0)
  1. ;;=3^Zoster w/o Complications
  1. ;;^UTILITY(U,$J,358.3,14548,1,4,0)
  1. ;;=4^B02.9
  1. ;;^UTILITY(U,$J,358.3,14548,2)
  1. ;;=^5000501
  1. ;;^UTILITY(U,$J,358.3,14549,0)
  1. ;;=D17.9^^56^634^90
  1. ;;^UTILITY(U,$J,358.3,14549,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14549,1,3,0)
  1. ;;=3^Benign Lipomatous Neop,Unspec
  1. ;;^UTILITY(U,$J,358.3,14549,1,4,0)
  1. ;;=4^D17.9
  1. ;;^UTILITY(U,$J,358.3,14549,2)
  1. ;;=^5002020
  1. ;;^UTILITY(U,$J,358.3,14550,0)
  1. ;;=E08.621^^56^634^137
  1. ;;^UTILITY(U,$J,358.3,14550,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14550,1,3,0)
  1. ;;=3^DM d/t Underlying Condition w/ Foot Ulcer
  1. ;;^UTILITY(U,$J,358.3,14550,1,4,0)
  1. ;;=4^E08.621
  1. ;;^UTILITY(U,$J,358.3,14550,2)
  1. ;;=^5002534
  1. ;;^UTILITY(U,$J,358.3,14551,0)
  1. ;;=E09.621^^56^634^136
  1. ;;^UTILITY(U,$J,358.3,14551,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14551,1,3,0)
  1. ;;=3^DM d/t Drug/Chemical w/ Foot Ulcer
  1. ;;^UTILITY(U,$J,358.3,14551,1,4,0)
  1. ;;=4^E09.621
  1. ;;^UTILITY(U,$J,358.3,14551,2)
  1. ;;=^5002576
  1. ;;^UTILITY(U,$J,358.3,14552,0)
  1. ;;=H05.011^^56^634^112
  1. ;;^UTILITY(U,$J,358.3,14552,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14552,1,3,0)
  1. ;;=3^Cellulitis of Right Orbit
  1. ;;^UTILITY(U,$J,358.3,14552,1,4,0)
  1. ;;=4^H05.011
  1. ;;^UTILITY(U,$J,358.3,14552,2)
  1. ;;=^5004560
  1. ;;^UTILITY(U,$J,358.3,14553,0)
  1. ;;=H05.012^^56^634^105
  1. ;;^UTILITY(U,$J,358.3,14553,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14553,1,3,0)
  1. ;;=3^Cellulitis of Left Orbit
  1. ;;^UTILITY(U,$J,358.3,14553,1,4,0)
  1. ;;=4^H05.012
  1. ;;^UTILITY(U,$J,358.3,14553,2)
  1. ;;=^5004561
  1. ;;^UTILITY(U,$J,358.3,14554,0)
  1. ;;=H05.013^^56^634^99
  1. ;;^UTILITY(U,$J,358.3,14554,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14554,1,3,0)
  1. ;;=3^Cellulitis of Bilateral Orbits
  1. ;;^UTILITY(U,$J,358.3,14554,1,4,0)
  1. ;;=4^H05.013
  1. ;;^UTILITY(U,$J,358.3,14554,2)
  1. ;;=^5004562
  1. ;;^UTILITY(U,$J,358.3,14555,0)
  1. ;;=I70.331^^56^634^51
  1. ;;^UTILITY(U,$J,358.3,14555,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14555,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Thigh
  1. ;;^UTILITY(U,$J,358.3,14555,1,4,0)
  1. ;;=4^I70.331
  1. ;;^UTILITY(U,$J,358.3,14555,2)
  1. ;;=^5007626
  1. ;;^UTILITY(U,$J,358.3,14556,0)
  1. ;;=I70.332^^56^634^52
  1. ;;^UTILITY(U,$J,358.3,14556,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14556,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Calf
  1. ;;^UTILITY(U,$J,358.3,14556,1,4,0)
  1. ;;=4^I70.332
  1. ;;^UTILITY(U,$J,358.3,14556,2)
  1. ;;=^5007627
  1. ;;^UTILITY(U,$J,358.3,14557,0)
  1. ;;=I70.333^^56^634^53
  1. ;;^UTILITY(U,$J,358.3,14557,1,0)
  1. ;;=^358.31IA^4^2
  1. ;;^UTILITY(U,$J,358.3,14557,1,3,0)
  1. ;;=3^Athscl Bypass of Right Leg w/ Ulcer of Ankle
  1. ;;^UTILITY(U,$J,358.3,14557,1,4,0)
  1. ;;=4^I70.333
  1. ;;^UTILITY(U,$J,358.3,14557,2)
  1. ;;=^5007628
  1. ;;^UTILITY(U,$J,358.3,14558,0)
  1. ;;=I70.334^^56^634^54