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

IBDEI0B5.m

Go to the documentation of this file.
IBDEI0B5 ; ; 03-MAY-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2021
 Q:'DIFQR(358.3)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q Q
 ;;^UTILITY(U,$J,358.3,27206,1,4,0)
 ;;=4^I70.243
 ;;^UTILITY(U,$J,358.3,27206,2)
 ;;=^5007597
 ;;^UTILITY(U,$J,358.3,27207,0)
 ;;=I70.244^^103^1298^56
 ;;^UTILITY(U,$J,358.3,27207,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27207,1,3,0)
 ;;=3^Athscl Lt Leg w/ Ulcer,Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,27207,1,4,0)
 ;;=4^I70.244
 ;;^UTILITY(U,$J,358.3,27207,2)
 ;;=^5007598
 ;;^UTILITY(U,$J,358.3,27208,0)
 ;;=I70.245^^103^1298^57
 ;;^UTILITY(U,$J,358.3,27208,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27208,1,3,0)
 ;;=3^Athscl Lt Leg w/ Ulcer,Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,27208,1,4,0)
 ;;=4^I70.245
 ;;^UTILITY(U,$J,358.3,27208,2)
 ;;=^5007599
 ;;^UTILITY(U,$J,358.3,27209,0)
 ;;=I70.262^^103^1298^52
 ;;^UTILITY(U,$J,358.3,27209,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27209,1,3,0)
 ;;=3^Athscl Lt Leg w/ Gangrene
 ;;^UTILITY(U,$J,358.3,27209,1,4,0)
 ;;=4^I70.262
 ;;^UTILITY(U,$J,358.3,27209,2)
 ;;=^5007604
 ;;^UTILITY(U,$J,358.3,27210,0)
 ;;=I70.263^^103^1298^50
 ;;^UTILITY(U,$J,358.3,27210,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27210,1,3,0)
 ;;=3^Athscl Bilateral Legs w/ Gangrene
 ;;^UTILITY(U,$J,358.3,27210,1,4,0)
 ;;=4^I70.263
 ;;^UTILITY(U,$J,358.3,27210,2)
 ;;=^5007605
 ;;^UTILITY(U,$J,358.3,27211,0)
 ;;=I71.2^^103^1298^211
 ;;^UTILITY(U,$J,358.3,27211,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27211,1,3,0)
 ;;=3^Thoracic Aortic Aneurysm w/o Rupture
 ;;^UTILITY(U,$J,358.3,27211,1,4,0)
 ;;=4^I71.2
 ;;^UTILITY(U,$J,358.3,27211,2)
 ;;=^5007787
 ;;^UTILITY(U,$J,358.3,27212,0)
 ;;=I71.3^^103^1298^36
 ;;^UTILITY(U,$J,358.3,27212,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27212,1,3,0)
 ;;=3^Abdominal Aortic Aneurysm w/ Rupture
 ;;^UTILITY(U,$J,358.3,27212,1,4,0)
 ;;=4^I71.3
 ;;^UTILITY(U,$J,358.3,27212,2)
 ;;=^5007788
 ;;^UTILITY(U,$J,358.3,27213,0)
 ;;=I71.4^^103^1298^37
 ;;^UTILITY(U,$J,358.3,27213,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27213,1,3,0)
 ;;=3^Abdominal Aortic Aneurysm w/o Rupture
 ;;^UTILITY(U,$J,358.3,27213,1,4,0)
 ;;=4^I71.4
 ;;^UTILITY(U,$J,358.3,27213,2)
 ;;=^5007789
 ;;^UTILITY(U,$J,358.3,27214,0)
 ;;=I71.5^^103^1298^212
 ;;^UTILITY(U,$J,358.3,27214,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27214,1,3,0)
 ;;=3^Thoracoabd Aortic Aneurysm w/ Rupture
 ;;^UTILITY(U,$J,358.3,27214,1,4,0)
 ;;=4^I71.5
 ;;^UTILITY(U,$J,358.3,27214,2)
 ;;=^5007790
 ;;^UTILITY(U,$J,358.3,27215,0)
 ;;=I71.6^^103^1298^213
 ;;^UTILITY(U,$J,358.3,27215,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27215,1,3,0)
 ;;=3^Thoracoabd Aortic Aneurysm w/o Rupture
 ;;^UTILITY(U,$J,358.3,27215,1,4,0)
 ;;=4^I71.6
 ;;^UTILITY(U,$J,358.3,27215,2)
 ;;=^5007791
 ;;^UTILITY(U,$J,358.3,27216,0)
 ;;=I72.2^^103^1298^44
 ;;^UTILITY(U,$J,358.3,27216,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27216,1,3,0)
 ;;=3^Aneurysm of Renal Artery
 ;;^UTILITY(U,$J,358.3,27216,1,4,0)
 ;;=4^I72.2
 ;;^UTILITY(U,$J,358.3,27216,2)
 ;;=^269773
 ;;^UTILITY(U,$J,358.3,27217,0)
 ;;=I72.3^^103^1298^41
 ;;^UTILITY(U,$J,358.3,27217,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27217,1,3,0)
 ;;=3^Aneurysm of Iliac Artery
 ;;^UTILITY(U,$J,358.3,27217,1,4,0)
 ;;=4^I72.3
 ;;^UTILITY(U,$J,358.3,27217,2)
 ;;=^269775
 ;;^UTILITY(U,$J,358.3,27218,0)
 ;;=I72.4^^103^1298^42
 ;;^UTILITY(U,$J,358.3,27218,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27218,1,3,0)
 ;;=3^Aneurysm of Lower Extremity Artery
 ;;^UTILITY(U,$J,358.3,27218,1,4,0)
 ;;=4^I72.4
 ;;^UTILITY(U,$J,358.3,27218,2)
 ;;=^269777
 ;;^UTILITY(U,$J,358.3,27219,0)
 ;;=I72.0^^103^1298^40
 ;;^UTILITY(U,$J,358.3,27219,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27219,1,3,0)
 ;;=3^Aneurysm of Carotid Artery
 ;;^UTILITY(U,$J,358.3,27219,1,4,0)
 ;;=4^I72.0
 ;;^UTILITY(U,$J,358.3,27219,2)
 ;;=^5007793
 ;;^UTILITY(U,$J,358.3,27220,0)
 ;;=I73.00^^103^1298^208
 ;;^UTILITY(U,$J,358.3,27220,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27220,1,3,0)
 ;;=3^Raynaud's Syndrome w/o Gangrene
 ;;^UTILITY(U,$J,358.3,27220,1,4,0)
 ;;=4^I73.00
 ;;^UTILITY(U,$J,358.3,27220,2)
 ;;=^5007796
 ;;^UTILITY(U,$J,358.3,27221,0)
 ;;=I73.9^^103^1298^192
 ;;^UTILITY(U,$J,358.3,27221,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27221,1,3,0)
 ;;=3^Peripheral Vascular Disease,Unspec
 ;;^UTILITY(U,$J,358.3,27221,1,4,0)
 ;;=4^I73.9
 ;;^UTILITY(U,$J,358.3,27221,2)
 ;;=^184182
 ;;^UTILITY(U,$J,358.3,27222,0)
 ;;=I74.2^^103^1298^116
 ;;^UTILITY(U,$J,358.3,27222,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27222,1,3,0)
 ;;=3^Embolism & Thrombosis UE Arteries
 ;;^UTILITY(U,$J,358.3,27222,1,4,0)
 ;;=4^I74.2
 ;;^UTILITY(U,$J,358.3,27222,2)
 ;;=^5007801
 ;;^UTILITY(U,$J,358.3,27223,0)
 ;;=I74.3^^103^1298^115
 ;;^UTILITY(U,$J,358.3,27223,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27223,1,3,0)
 ;;=3^Embolism & Thrombosis LE Arteries
 ;;^UTILITY(U,$J,358.3,27223,1,4,0)
 ;;=4^I74.3
 ;;^UTILITY(U,$J,358.3,27223,2)
 ;;=^5007802
 ;;^UTILITY(U,$J,358.3,27224,0)
 ;;=I80.11^^103^1298^204
 ;;^UTILITY(U,$J,358.3,27224,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27224,1,3,0)
 ;;=3^Phleb & Thrombphleb Rt Femoral Vein
 ;;^UTILITY(U,$J,358.3,27224,1,4,0)
 ;;=4^I80.11
 ;;^UTILITY(U,$J,358.3,27224,2)
 ;;=^5007825
 ;;^UTILITY(U,$J,358.3,27225,0)
 ;;=I80.211^^103^1298^205
 ;;^UTILITY(U,$J,358.3,27225,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27225,1,3,0)
 ;;=3^Phleb & Thrombphleb Rt Iliac Vein
 ;;^UTILITY(U,$J,358.3,27225,1,4,0)
 ;;=4^I80.211
 ;;^UTILITY(U,$J,358.3,27225,2)
 ;;=^5007831
 ;;^UTILITY(U,$J,358.3,27226,0)
 ;;=I80.12^^103^1298^199
 ;;^UTILITY(U,$J,358.3,27226,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27226,1,3,0)
 ;;=3^Phleb & Thrombphleb Lt Femoral Vein
 ;;^UTILITY(U,$J,358.3,27226,1,4,0)
 ;;=4^I80.12
 ;;^UTILITY(U,$J,358.3,27226,2)
 ;;=^5007826
 ;;^UTILITY(U,$J,358.3,27227,0)
 ;;=I80.13^^103^1298^194
 ;;^UTILITY(U,$J,358.3,27227,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27227,1,3,0)
 ;;=3^Phleb & Thrombphleb Bil Femoral Vein
 ;;^UTILITY(U,$J,358.3,27227,1,4,0)
 ;;=4^I80.13
 ;;^UTILITY(U,$J,358.3,27227,2)
 ;;=^5007827
 ;;^UTILITY(U,$J,358.3,27228,0)
 ;;=I80.202^^103^1298^201
 ;;^UTILITY(U,$J,358.3,27228,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27228,1,3,0)
 ;;=3^Phleb & Thrombphleb Lt LE Deep Vessels
 ;;^UTILITY(U,$J,358.3,27228,1,4,0)
 ;;=4^I80.202
 ;;^UTILITY(U,$J,358.3,27228,2)
 ;;=^5007829
 ;;^UTILITY(U,$J,358.3,27229,0)
 ;;=I80.201^^103^1298^206
 ;;^UTILITY(U,$J,358.3,27229,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27229,1,3,0)
 ;;=3^Phleb & Thrombphleb Rt LE Deep Vessels
 ;;^UTILITY(U,$J,358.3,27229,1,4,0)
 ;;=4^I80.201
 ;;^UTILITY(U,$J,358.3,27229,2)
 ;;=^5007828
 ;;^UTILITY(U,$J,358.3,27230,0)
 ;;=I80.203^^103^1298^196
 ;;^UTILITY(U,$J,358.3,27230,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27230,1,3,0)
 ;;=3^Phleb & Thrombphleb Bil LE Deep Vessels
 ;;^UTILITY(U,$J,358.3,27230,1,4,0)
 ;;=4^I80.203
 ;;^UTILITY(U,$J,358.3,27230,2)
 ;;=^5007830
 ;;^UTILITY(U,$J,358.3,27231,0)
 ;;=I80.212^^103^1298^200
 ;;^UTILITY(U,$J,358.3,27231,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27231,1,3,0)
 ;;=3^Phleb & Thrombphleb Lt Iliac Vein
 ;;^UTILITY(U,$J,358.3,27231,1,4,0)
 ;;=4^I80.212
 ;;^UTILITY(U,$J,358.3,27231,2)
 ;;=^5007832
 ;;^UTILITY(U,$J,358.3,27232,0)
 ;;=I80.213^^103^1298^195
 ;;^UTILITY(U,$J,358.3,27232,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27232,1,3,0)
 ;;=3^Phleb & Thrombphleb Bil Iliac Vein
 ;;^UTILITY(U,$J,358.3,27232,1,4,0)
 ;;=4^I80.213
 ;;^UTILITY(U,$J,358.3,27232,2)
 ;;=^5007833
 ;;^UTILITY(U,$J,358.3,27233,0)
 ;;=I82.411^^103^1298^26
 ;;^UTILITY(U,$J,358.3,27233,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27233,1,3,0)
 ;;=3^AC Embol & Thromb Rt Fem Vein
 ;;^UTILITY(U,$J,358.3,27233,1,4,0)
 ;;=4^I82.411
 ;;^UTILITY(U,$J,358.3,27233,2)
 ;;=^5007857
 ;;^UTILITY(U,$J,358.3,27234,0)
 ;;=I82.412^^103^1298^14
 ;;^UTILITY(U,$J,358.3,27234,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27234,1,3,0)
 ;;=3^AC Embol & Thromb Lt Fem Vein
 ;;^UTILITY(U,$J,358.3,27234,1,4,0)
 ;;=4^I82.412
 ;;^UTILITY(U,$J,358.3,27234,2)
 ;;=^5007858
 ;;^UTILITY(U,$J,358.3,27235,0)
 ;;=I82.413^^103^1298^4
 ;;^UTILITY(U,$J,358.3,27235,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27235,1,3,0)
 ;;=3^AC Embol & Thromb Bil Fem Vein
 ;;^UTILITY(U,$J,358.3,27235,1,4,0)
 ;;=4^I82.413
 ;;^UTILITY(U,$J,358.3,27235,2)
 ;;=^5007859
 ;;^UTILITY(U,$J,358.3,27236,0)
 ;;=I82.421^^103^1298^27
 ;;^UTILITY(U,$J,358.3,27236,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27236,1,3,0)
 ;;=3^AC Embol & Thromb Rt Iliac Vein
 ;;^UTILITY(U,$J,358.3,27236,1,4,0)
 ;;=4^I82.421
 ;;^UTILITY(U,$J,358.3,27236,2)
 ;;=^5007861
 ;;^UTILITY(U,$J,358.3,27237,0)
 ;;=I82.422^^103^1298^15
 ;;^UTILITY(U,$J,358.3,27237,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27237,1,3,0)
 ;;=3^AC Embol & Thromb Lt Iliac Vein
 ;;^UTILITY(U,$J,358.3,27237,1,4,0)
 ;;=4^I82.422
 ;;^UTILITY(U,$J,358.3,27237,2)
 ;;=^5007862
 ;;^UTILITY(U,$J,358.3,27238,0)
 ;;=I82.423^^103^1298^5
 ;;^UTILITY(U,$J,358.3,27238,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27238,1,3,0)
 ;;=3^AC Embol & Thromb Bil Iliac Vein
 ;;^UTILITY(U,$J,358.3,27238,1,4,0)
 ;;=4^I82.423
 ;;^UTILITY(U,$J,358.3,27238,2)
 ;;=^5007863
 ;;^UTILITY(U,$J,358.3,27239,0)
 ;;=I82.431^^103^1298^30
 ;;^UTILITY(U,$J,358.3,27239,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27239,1,3,0)
 ;;=3^AC Embol & Thromb Rt Pop Vein
 ;;^UTILITY(U,$J,358.3,27239,1,4,0)
 ;;=4^I82.431
 ;;^UTILITY(U,$J,358.3,27239,2)
 ;;=^5007865
 ;;^UTILITY(U,$J,358.3,27240,0)
 ;;=I82.432^^103^1298^18
 ;;^UTILITY(U,$J,358.3,27240,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27240,1,3,0)
 ;;=3^AC Embol & Thromb Lt Pop Vein
 ;;^UTILITY(U,$J,358.3,27240,1,4,0)
 ;;=4^I82.432
 ;;^UTILITY(U,$J,358.3,27240,2)
 ;;=^5007866
 ;;^UTILITY(U,$J,358.3,27241,0)
 ;;=I82.433^^103^1298^7
 ;;^UTILITY(U,$J,358.3,27241,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27241,1,3,0)
 ;;=3^AC Embol & Thromb Bil Pop Vein
 ;;^UTILITY(U,$J,358.3,27241,1,4,0)
 ;;=4^I82.433
 ;;^UTILITY(U,$J,358.3,27241,2)
 ;;=^5007867
 ;;^UTILITY(U,$J,358.3,27242,0)
 ;;=I82.4Y1^^103^1298^31
 ;;^UTILITY(U,$J,358.3,27242,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27242,1,3,0)
 ;;=3^AC Embol & Thromb Rt Prox LE Deep Veins
 ;;^UTILITY(U,$J,358.3,27242,1,4,0)
 ;;=4^I82.4Y1
 ;;^UTILITY(U,$J,358.3,27242,2)
 ;;=^5007877
 ;;^UTILITY(U,$J,358.3,27243,0)
 ;;=I82.4Y2^^103^1298^19
 ;;^UTILITY(U,$J,358.3,27243,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27243,1,3,0)
 ;;=3^AC Embol & Thromb Lt Prox LE Deep Veins
 ;;^UTILITY(U,$J,358.3,27243,1,4,0)
 ;;=4^I82.4Y2
 ;;^UTILITY(U,$J,358.3,27243,2)
 ;;=^5007878
 ;;^UTILITY(U,$J,358.3,27244,0)
 ;;=I82.4Y3^^103^1298^8
 ;;^UTILITY(U,$J,358.3,27244,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27244,1,3,0)
 ;;=3^AC Embol & Thromb Bil Prox LE Deep Veins
 ;;^UTILITY(U,$J,358.3,27244,1,4,0)
 ;;=4^I82.4Y3
 ;;^UTILITY(U,$J,358.3,27244,2)
 ;;=^5007879
 ;;^UTILITY(U,$J,358.3,27245,0)
 ;;=I82.611^^103^1298^34
 ;;^UTILITY(U,$J,358.3,27245,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27245,1,3,0)
 ;;=3^AC Embol & Thromb Rt UE Superfic Veins
 ;;^UTILITY(U,$J,358.3,27245,1,4,0)
 ;;=4^I82.611
 ;;^UTILITY(U,$J,358.3,27245,2)
 ;;=^5007915
 ;;^UTILITY(U,$J,358.3,27246,0)
 ;;=I82.612^^103^1298^22
 ;;^UTILITY(U,$J,358.3,27246,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27246,1,3,0)
 ;;=3^AC Embol & Thromb Lt UE Superfic Veins
 ;;^UTILITY(U,$J,358.3,27246,1,4,0)
 ;;=4^I82.612
 ;;^UTILITY(U,$J,358.3,27246,2)
 ;;=^5007916
 ;;^UTILITY(U,$J,358.3,27247,0)
 ;;=I82.613^^103^1298^11
 ;;^UTILITY(U,$J,358.3,27247,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27247,1,3,0)
 ;;=3^AC Embol & Thromb Bil UE Superfic Vein
 ;;^UTILITY(U,$J,358.3,27247,1,4,0)
 ;;=4^I82.613
 ;;^UTILITY(U,$J,358.3,27247,2)
 ;;=^5007917
 ;;^UTILITY(U,$J,358.3,27248,0)
 ;;=I82.621^^103^1298^33
 ;;^UTILITY(U,$J,358.3,27248,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27248,1,3,0)
 ;;=3^AC Embol & Thromb Rt UE Deep Veins
 ;;^UTILITY(U,$J,358.3,27248,1,4,0)
 ;;=4^I82.621
 ;;^UTILITY(U,$J,358.3,27248,2)
 ;;=^5007919
 ;;^UTILITY(U,$J,358.3,27249,0)
 ;;=I82.622^^103^1298^21
 ;;^UTILITY(U,$J,358.3,27249,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27249,1,3,0)
 ;;=3^AC Embol & Thromb Lt UE Deep Veins
 ;;^UTILITY(U,$J,358.3,27249,1,4,0)
 ;;=4^I82.622
 ;;^UTILITY(U,$J,358.3,27249,2)
 ;;=^5007920
 ;;^UTILITY(U,$J,358.3,27250,0)
 ;;=I82.623^^103^1298^10
 ;;^UTILITY(U,$J,358.3,27250,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27250,1,3,0)
 ;;=3^AC Embol & Thromb Bil UE Deep Veins
 ;;^UTILITY(U,$J,358.3,27250,1,4,0)
 ;;=4^I82.623
 ;;^UTILITY(U,$J,358.3,27250,2)
 ;;=^5007921
 ;;^UTILITY(U,$J,358.3,27251,0)
 ;;=I82.601^^103^1298^35
 ;;^UTILITY(U,$J,358.3,27251,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27251,1,3,0)
 ;;=3^AC Embol & Thromb Rt UE Veins,Unspec
 ;;^UTILITY(U,$J,358.3,27251,1,4,0)
 ;;=4^I82.601
 ;;^UTILITY(U,$J,358.3,27251,2)
 ;;=^5007912
 ;;^UTILITY(U,$J,358.3,27252,0)
 ;;=I82.602^^103^1298^23
 ;;^UTILITY(U,$J,358.3,27252,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27252,1,3,0)
 ;;=3^AC Embol & Thromb Lt UE Veins,Unspec
 ;;^UTILITY(U,$J,358.3,27252,1,4,0)
 ;;=4^I82.602
 ;;^UTILITY(U,$J,358.3,27252,2)
 ;;=^5007913
 ;;^UTILITY(U,$J,358.3,27253,0)
 ;;=I82.603^^103^1298^12
 ;;^UTILITY(U,$J,358.3,27253,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27253,1,3,0)
 ;;=3^AC Embol & Thromb Bil UE Veins,Unspec
 ;;^UTILITY(U,$J,358.3,27253,1,4,0)
 ;;=4^I82.603
 ;;^UTILITY(U,$J,358.3,27253,2)
 ;;=^5007914
 ;;^UTILITY(U,$J,358.3,27254,0)
 ;;=I82.A11^^103^1298^25
 ;;^UTILITY(U,$J,358.3,27254,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27254,1,3,0)
 ;;=3^AC Embol & Thromb Rt Ax Vein
 ;;^UTILITY(U,$J,358.3,27254,1,4,0)
 ;;=4^I82.A11
 ;;^UTILITY(U,$J,358.3,27254,2)
 ;;=^5007942
 ;;^UTILITY(U,$J,358.3,27255,0)
 ;;=I82.A12^^103^1298^13
 ;;^UTILITY(U,$J,358.3,27255,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27255,1,3,0)
 ;;=3^AC Embol & Thromb Lt Ax Vein
 ;;^UTILITY(U,$J,358.3,27255,1,4,0)
 ;;=4^I82.A12
 ;;^UTILITY(U,$J,358.3,27255,2)
 ;;=^5007943
 ;;^UTILITY(U,$J,358.3,27256,0)
 ;;=I82.A13^^103^1298^2
 ;;^UTILITY(U,$J,358.3,27256,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27256,1,3,0)
 ;;=3^AC Embol & Thromb Bil Ax Vein
 ;;^UTILITY(U,$J,358.3,27256,1,4,0)
 ;;=4^I82.A13
 ;;^UTILITY(U,$J,358.3,27256,2)
 ;;=^5007944
 ;;^UTILITY(U,$J,358.3,27257,0)
 ;;=I82.B11^^103^1298^32
 ;;^UTILITY(U,$J,358.3,27257,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27257,1,3,0)
 ;;=3^AC Embol & Thromb Rt Subclav Vein
 ;;^UTILITY(U,$J,358.3,27257,1,4,0)
 ;;=4^I82.B11
 ;;^UTILITY(U,$J,358.3,27257,2)
 ;;=^5007950
 ;;^UTILITY(U,$J,358.3,27258,0)
 ;;=I82.B12^^103^1298^20
 ;;^UTILITY(U,$J,358.3,27258,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27258,1,3,0)
 ;;=3^AC Embol & Thromb Lt Subclav Vein
 ;;^UTILITY(U,$J,358.3,27258,1,4,0)
 ;;=4^I82.B12
 ;;^UTILITY(U,$J,358.3,27258,2)
 ;;=^5007951
 ;;^UTILITY(U,$J,358.3,27259,0)
 ;;=I82.B13^^103^1298^9
 ;;^UTILITY(U,$J,358.3,27259,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27259,1,3,0)
 ;;=3^AC Embol & Thromb Bil Subclav Vein
 ;;^UTILITY(U,$J,358.3,27259,1,4,0)
 ;;=4^I82.B13
 ;;^UTILITY(U,$J,358.3,27259,2)
 ;;=^5007952
 ;;^UTILITY(U,$J,358.3,27260,0)
 ;;=I82.C11^^103^1298^28
 ;;^UTILITY(U,$J,358.3,27260,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27260,1,3,0)
 ;;=3^AC Embol & Thromb Rt Int Jug Vein
 ;;^UTILITY(U,$J,358.3,27260,1,4,0)
 ;;=4^I82.C11
 ;;^UTILITY(U,$J,358.3,27260,2)
 ;;=^5007958
 ;;^UTILITY(U,$J,358.3,27261,0)
 ;;=I82.C12^^103^1298^16
 ;;^UTILITY(U,$J,358.3,27261,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27261,1,3,0)
 ;;=3^AC Embol & Thromb Lt Int Jug Vein
 ;;^UTILITY(U,$J,358.3,27261,1,4,0)
 ;;=4^I82.C12
 ;;^UTILITY(U,$J,358.3,27261,2)
 ;;=^5007959
 ;;^UTILITY(U,$J,358.3,27262,0)
 ;;=I82.C13^^103^1298^6
 ;;^UTILITY(U,$J,358.3,27262,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27262,1,3,0)
 ;;=3^AC Embol & Thromb Bil Int Jug Vein
 ;;^UTILITY(U,$J,358.3,27262,1,4,0)
 ;;=4^I82.C13
 ;;^UTILITY(U,$J,358.3,27262,2)
 ;;=^5007960
 ;;^UTILITY(U,$J,358.3,27263,0)
 ;;=I82.890^^103^1298^24
 ;;^UTILITY(U,$J,358.3,27263,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27263,1,3,0)
 ;;=3^AC Embol & Thromb Oth Spec Veins
 ;;^UTILITY(U,$J,358.3,27263,1,4,0)
 ;;=4^I82.890
 ;;^UTILITY(U,$J,358.3,27263,2)
 ;;=^5007938
 ;;^UTILITY(U,$J,358.3,27264,0)
 ;;=I83.011^^103^1298^236
 ;;^UTILITY(U,$J,358.3,27264,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27264,1,3,0)
 ;;=3^Varic Veins RLE w/ Ulc of Thigh
 ;;^UTILITY(U,$J,358.3,27264,1,4,0)
 ;;=4^I83.011
 ;;^UTILITY(U,$J,358.3,27264,2)
 ;;=^5007973
 ;;^UTILITY(U,$J,358.3,27265,0)
 ;;=I83.012^^103^1298^232
 ;;^UTILITY(U,$J,358.3,27265,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27265,1,3,0)
 ;;=3^Varic Veins RLE w/ Ulc of Calf
 ;;^UTILITY(U,$J,358.3,27265,1,4,0)
 ;;=4^I83.012
 ;;^UTILITY(U,$J,358.3,27265,2)
 ;;=^5007974
 ;;^UTILITY(U,$J,358.3,27266,0)
 ;;=I83.013^^103^1298^230
 ;;^UTILITY(U,$J,358.3,27266,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27266,1,3,0)
 ;;=3^Varic Veins RLE w/ Ulc of Ankle
 ;;^UTILITY(U,$J,358.3,27266,1,4,0)
 ;;=4^I83.013
 ;;^UTILITY(U,$J,358.3,27266,2)
 ;;=^5007975
 ;;^UTILITY(U,$J,358.3,27267,0)
 ;;=I83.014^^103^1298^233
 ;;^UTILITY(U,$J,358.3,27267,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27267,1,3,0)
 ;;=3^Varic Veins RLE w/ Ulc of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,27267,1,4,0)
 ;;=4^I83.014
 ;;^UTILITY(U,$J,358.3,27267,2)
 ;;=^5007976
 ;;^UTILITY(U,$J,358.3,27268,0)
 ;;=I83.015^^103^1298^235
 ;;^UTILITY(U,$J,358.3,27268,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27268,1,3,0)
 ;;=3^Varic Veins RLE w/ Ulc of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,27268,1,4,0)
 ;;=4^I83.015
 ;;^UTILITY(U,$J,358.3,27268,2)
 ;;=^5007977
 ;;^UTILITY(U,$J,358.3,27269,0)
 ;;=I83.023^^103^1298^215
 ;;^UTILITY(U,$J,358.3,27269,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27269,1,3,0)
 ;;=3^Varic Veins LLE w/ Ulc of Ankle
 ;;^UTILITY(U,$J,358.3,27269,1,4,0)
 ;;=4^I83.023
 ;;^UTILITY(U,$J,358.3,27269,2)
 ;;=^5007982
 ;;^UTILITY(U,$J,358.3,27270,0)
 ;;=I83.024^^103^1298^219
 ;;^UTILITY(U,$J,358.3,27270,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27270,1,3,0)
 ;;=3^Varic Veins LLE w/ Ulc of Heel/Midfoot
 ;;^UTILITY(U,$J,358.3,27270,1,4,0)
 ;;=4^I83.024
 ;;^UTILITY(U,$J,358.3,27270,2)
 ;;=^5007983
 ;;^UTILITY(U,$J,358.3,27271,0)
 ;;=I83.025^^103^1298^223
 ;;^UTILITY(U,$J,358.3,27271,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27271,1,3,0)
 ;;=3^Varic Veins LLE w/ Ulc of Oth Part of Foot
 ;;^UTILITY(U,$J,358.3,27271,1,4,0)
 ;;=4^I83.025
 ;;^UTILITY(U,$J,358.3,27271,2)
 ;;=^5007984
 ;;^UTILITY(U,$J,358.3,27272,0)
 ;;=I83.021^^103^1298^225
 ;;^UTILITY(U,$J,358.3,27272,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27272,1,3,0)
 ;;=3^Varic Veins LLE w/ Ulc of Thigh
 ;;^UTILITY(U,$J,358.3,27272,1,4,0)
 ;;=4^I83.021
 ;;^UTILITY(U,$J,358.3,27272,2)
 ;;=^5007980
 ;;^UTILITY(U,$J,358.3,27273,0)
 ;;=I83.022^^103^1298^217
 ;;^UTILITY(U,$J,358.3,27273,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,27273,1,3,0)
 ;;=3^Varic Veins LLE w/ Ulc of Calf
 ;;^UTILITY(U,$J,358.3,27273,1,4,0)
 ;;=4^I83.022
 ;;^UTILITY(U,$J,358.3,27273,2)
 ;;=^5007981