IBDEI05G ; ; 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,13174,2)
;;=^5008336
;;^UTILITY(U,$J,358.3,13175,0)
;;=T82.110A^^53^582^5
;;^UTILITY(U,$J,358.3,13175,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13175,1,3,0)
;;=3^Breakdown,Cardiac Electrode,Init Encntr
;;^UTILITY(U,$J,358.3,13175,1,4,0)
;;=4^T82.110A
;;^UTILITY(U,$J,358.3,13175,2)
;;=^5054680
;;^UTILITY(U,$J,358.3,13176,0)
;;=T82.191A^^53^582^148
;;^UTILITY(U,$J,358.3,13176,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13176,1,3,0)
;;=3^Mech Compl of Cardiac Pulse Generator,Init Encntr
;;^UTILITY(U,$J,358.3,13176,1,4,0)
;;=4^T82.191A
;;^UTILITY(U,$J,358.3,13176,2)
;;=^5054707
;;^UTILITY(U,$J,358.3,13177,0)
;;=T82.111A^^53^582^6
;;^UTILITY(U,$J,358.3,13177,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13177,1,3,0)
;;=3^Breakdown,Cardiac Pulse Generator,Init Encntr
;;^UTILITY(U,$J,358.3,13177,1,4,0)
;;=4^T82.111A
;;^UTILITY(U,$J,358.3,13177,2)
;;=^5054683
;;^UTILITY(U,$J,358.3,13178,0)
;;=T82.120A^^53^582^32
;;^UTILITY(U,$J,358.3,13178,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13178,1,3,0)
;;=3^Dsplcmnt of Cardiac Electrode,Init Encntr
;;^UTILITY(U,$J,358.3,13178,1,4,0)
;;=4^T82.120A
;;^UTILITY(U,$J,358.3,13178,2)
;;=^5054692
;;^UTILITY(U,$J,358.3,13179,0)
;;=T82.121A^^53^582^33
;;^UTILITY(U,$J,358.3,13179,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13179,1,3,0)
;;=3^Dsplcmnt of Cardiac Pulse Generator,Init Encntr
;;^UTILITY(U,$J,358.3,13179,1,4,0)
;;=4^T82.121A
;;^UTILITY(U,$J,358.3,13179,2)
;;=^5054695
;;^UTILITY(U,$J,358.3,13180,0)
;;=T82.190A^^53^582^150
;;^UTILITY(U,$J,358.3,13180,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13180,1,3,0)
;;=3^Mech Compl of Cardiact Electrode,Init Encntr
;;^UTILITY(U,$J,358.3,13180,1,4,0)
;;=4^T82.190A
;;^UTILITY(U,$J,358.3,13180,2)
;;=^5054704
;;^UTILITY(U,$J,358.3,13181,0)
;;=T82.310A^^53^582^2
;;^UTILITY(U,$J,358.3,13181,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13181,1,3,0)
;;=3^Breakdown,Aortic Grft,Init Encntr
;;^UTILITY(U,$J,358.3,13181,1,4,0)
;;=4^T82.310A
;;^UTILITY(U,$J,358.3,13181,2)
;;=^5054740
;;^UTILITY(U,$J,358.3,13182,0)
;;=T82.311A^^53^582^7
;;^UTILITY(U,$J,358.3,13182,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13182,1,3,0)
;;=3^Breakdown,Carotid Arterial Grft,Init Encntr
;;^UTILITY(U,$J,358.3,13182,1,4,0)
;;=4^T82.311A
;;^UTILITY(U,$J,358.3,13182,2)
;;=^5054743
;;^UTILITY(U,$J,358.3,13183,0)
;;=T82.312A^^53^582^8
;;^UTILITY(U,$J,358.3,13183,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13183,1,3,0)
;;=3^Breakdown,Femoral Arterial Grft,Init Encntr
;;^UTILITY(U,$J,358.3,13183,1,4,0)
;;=4^T82.312A
;;^UTILITY(U,$J,358.3,13183,2)
;;=^5054746
;;^UTILITY(U,$J,358.3,13184,0)
;;=T82.318A^^53^582^17
;;^UTILITY(U,$J,358.3,13184,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13184,1,3,0)
;;=3^Breakdown,Vasc Grfts,Init Encntr
;;^UTILITY(U,$J,358.3,13184,1,4,0)
;;=4^T82.318A
;;^UTILITY(U,$J,358.3,13184,2)
;;=^5054749
;;^UTILITY(U,$J,358.3,13185,0)
;;=T82.319A^^53^582^18
;;^UTILITY(U,$J,358.3,13185,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13185,1,3,0)
;;=3^Breakdown,Vasc Grfts,Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13185,1,4,0)
;;=4^T82.319A
;;^UTILITY(U,$J,358.3,13185,2)
;;=^5054752
;;^UTILITY(U,$J,358.3,13186,0)
;;=T82.320A^^53^582^30
;;^UTILITY(U,$J,358.3,13186,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13186,1,3,0)
;;=3^Dsplcmnt of Aortic Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13186,1,4,0)
;;=4^T82.320A
;;^UTILITY(U,$J,358.3,13186,2)
;;=^5054755
;;^UTILITY(U,$J,358.3,13187,0)
;;=T82.321A^^53^582^35
;;^UTILITY(U,$J,358.3,13187,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13187,1,3,0)
;;=3^Dsplcmnt of Carotid Arterial Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13187,1,4,0)
;;=4^T82.321A
;;^UTILITY(U,$J,358.3,13187,2)
;;=^5054758
;;^UTILITY(U,$J,358.3,13188,0)
;;=T82.322A^^53^582^36
;;^UTILITY(U,$J,358.3,13188,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13188,1,3,0)
;;=3^Dsplcmnt of Femoral Arterial Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13188,1,4,0)
;;=4^T82.322A
;;^UTILITY(U,$J,358.3,13188,2)
;;=^5054761
;;^UTILITY(U,$J,358.3,13189,0)
;;=T82.329A^^53^582^45
;;^UTILITY(U,$J,358.3,13189,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13189,1,3,0)
;;=3^Dsplcmnt of Vascular Grafts,Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13189,1,4,0)
;;=4^T82.329A
;;^UTILITY(U,$J,358.3,13189,2)
;;=^5054767
;;^UTILITY(U,$J,358.3,13190,0)
;;=T82.330A^^53^582^135
;;^UTILITY(U,$J,358.3,13190,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13190,1,3,0)
;;=3^Leakage of Aortic Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13190,1,4,0)
;;=4^T82.330A
;;^UTILITY(U,$J,358.3,13190,2)
;;=^5054770
;;^UTILITY(U,$J,358.3,13191,0)
;;=T82.331A^^53^582^138
;;^UTILITY(U,$J,358.3,13191,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13191,1,3,0)
;;=3^Leakage of Carotid Arterial Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13191,1,4,0)
;;=4^T82.331A
;;^UTILITY(U,$J,358.3,13191,2)
;;=^5054773
;;^UTILITY(U,$J,358.3,13192,0)
;;=T82.332A^^53^582^139
;;^UTILITY(U,$J,358.3,13192,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13192,1,3,0)
;;=3^Leakage of Femoral Arterial Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13192,1,4,0)
;;=4^T82.332A
;;^UTILITY(U,$J,358.3,13192,2)
;;=^5054776
;;^UTILITY(U,$J,358.3,13193,0)
;;=T82.339A^^53^582^144
;;^UTILITY(U,$J,358.3,13193,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13193,1,3,0)
;;=3^Leakage of Vascular Graft,Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13193,1,4,0)
;;=4^T82.339A
;;^UTILITY(U,$J,358.3,13193,2)
;;=^5054782
;;^UTILITY(U,$J,358.3,13194,0)
;;=T82.390A^^53^582^146
;;^UTILITY(U,$J,358.3,13194,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13194,1,3,0)
;;=3^Mech Compl of Aortic Graft,NEC,Init Encntr
;;^UTILITY(U,$J,358.3,13194,1,4,0)
;;=4^T82.390A
;;^UTILITY(U,$J,358.3,13194,2)
;;=^5054785
;;^UTILITY(U,$J,358.3,13195,0)
;;=T82.391A^^53^582^151
;;^UTILITY(U,$J,358.3,13195,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13195,1,3,0)
;;=3^Mech Compl of Carotid Arterial Graft,NEC,Init Encntr
;;^UTILITY(U,$J,358.3,13195,1,4,0)
;;=4^T82.391A
;;^UTILITY(U,$J,358.3,13195,2)
;;=^5054788
;;^UTILITY(U,$J,358.3,13196,0)
;;=T82.392A^^53^582^152
;;^UTILITY(U,$J,358.3,13196,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13196,1,3,0)
;;=3^Mech Compl of Femoral Arterial Graft,NEC,Init Encntr
;;^UTILITY(U,$J,358.3,13196,1,4,0)
;;=4^T82.392A
;;^UTILITY(U,$J,358.3,13196,2)
;;=^5054791
;;^UTILITY(U,$J,358.3,13197,0)
;;=T82.399A^^53^582^165
;;^UTILITY(U,$J,358.3,13197,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13197,1,3,0)
;;=3^Mech Compl of Vascular Graft,Unspec,NEC,Init Encntr
;;^UTILITY(U,$J,358.3,13197,1,4,0)
;;=4^T82.399A
;;^UTILITY(U,$J,358.3,13197,2)
;;=^5054797
;;^UTILITY(U,$J,358.3,13198,0)
;;=T82.41XA^^53^582^16
;;^UTILITY(U,$J,358.3,13198,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13198,1,3,0)
;;=3^Breakdown,Vasc Dialysis Cath,Init Encntr
;;^UTILITY(U,$J,358.3,13198,1,4,0)
;;=4^T82.41XA
;;^UTILITY(U,$J,358.3,13198,2)
;;=^5054800
;;^UTILITY(U,$J,358.3,13199,0)
;;=T82.42XA^^53^582^44
;;^UTILITY(U,$J,358.3,13199,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13199,1,3,0)
;;=3^Dsplcmnt of Vascular Dialysis Catheter,Init Encntr
;;^UTILITY(U,$J,358.3,13199,1,4,0)
;;=4^T82.42XA
;;^UTILITY(U,$J,358.3,13199,2)
;;=^5054803
;;^UTILITY(U,$J,358.3,13200,0)
;;=T82.43XA^^53^582^143
;;^UTILITY(U,$J,358.3,13200,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13200,1,3,0)
;;=3^Leakage of Vascular Dialysis Catheter,Init Encntr
;;^UTILITY(U,$J,358.3,13200,1,4,0)
;;=4^T82.43XA
;;^UTILITY(U,$J,358.3,13200,2)
;;=^5054806
;;^UTILITY(U,$J,358.3,13201,0)
;;=T82.49XA^^53^582^27
;;^UTILITY(U,$J,358.3,13201,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13201,1,3,0)
;;=3^Complic,Vasc Dialysis Cath NEC,Init Encntr
;;^UTILITY(U,$J,358.3,13201,1,4,0)
;;=4^T82.49XA
;;^UTILITY(U,$J,358.3,13201,2)
;;=^5054809
;;^UTILITY(U,$J,358.3,13202,0)
;;=T82.510A^^53^582^13
;;^UTILITY(U,$J,358.3,13202,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13202,1,3,0)
;;=3^Breakdown,Surg Created AV Fist,Init Encntr
;;^UTILITY(U,$J,358.3,13202,1,4,0)
;;=4^T82.510A
;;^UTILITY(U,$J,358.3,13202,2)
;;=^5054812
;;^UTILITY(U,$J,358.3,13203,0)
;;=T82.511A^^53^582^14
;;^UTILITY(U,$J,358.3,13203,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13203,1,3,0)
;;=3^Breakdown,Surg Created AV Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13203,1,4,0)
;;=4^T82.511A
;;^UTILITY(U,$J,358.3,13203,2)
;;=^5054815
;;^UTILITY(U,$J,358.3,13204,0)
;;=T82.513A^^53^582^3
;;^UTILITY(U,$J,358.3,13204,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13204,1,3,0)
;;=3^Breakdown,Balloon Device,Init Encntr
;;^UTILITY(U,$J,358.3,13204,1,4,0)
;;=4^T82.513A
;;^UTILITY(U,$J,358.3,13204,2)
;;=^5054821
;;^UTILITY(U,$J,358.3,13205,0)
;;=T82.515A^^53^582^15
;;^UTILITY(U,$J,358.3,13205,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13205,1,3,0)
;;=3^Breakdown,Umbrella Device,Init Encntr
;;^UTILITY(U,$J,358.3,13205,1,4,0)
;;=4^T82.515A
;;^UTILITY(U,$J,358.3,13205,2)
;;=^5054827
;;^UTILITY(U,$J,358.3,13206,0)
;;=T82.519A^^53^582^4
;;^UTILITY(U,$J,358.3,13206,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13206,1,3,0)
;;=3^Breakdown,Card/Vasc Devices/Implants,Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13206,1,4,0)
;;=4^T82.519A
;;^UTILITY(U,$J,358.3,13206,2)
;;=^5054833
;;^UTILITY(U,$J,358.3,13207,0)
;;=T82.520A^^53^582^41
;;^UTILITY(U,$J,358.3,13207,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13207,1,3,0)
;;=3^Dsplcmnt of Surgically Created AV Fistula,Init Encntr
;;^UTILITY(U,$J,358.3,13207,1,4,0)
;;=4^T82.520A
;;^UTILITY(U,$J,358.3,13207,2)
;;=^5054836
;;^UTILITY(U,$J,358.3,13208,0)
;;=T82.521A^^53^582^42
;;^UTILITY(U,$J,358.3,13208,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13208,1,3,0)
;;=3^Dsplcmnt of Surgically Created AV Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13208,1,4,0)
;;=4^T82.521A
;;^UTILITY(U,$J,358.3,13208,2)
;;=^5054839
;;^UTILITY(U,$J,358.3,13209,0)
;;=T82.523A^^53^582^31
;;^UTILITY(U,$J,358.3,13209,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13209,1,3,0)
;;=3^Dsplcmnt of Balloon Device,Init Encntr
;;^UTILITY(U,$J,358.3,13209,1,4,0)
;;=4^T82.523A
;;^UTILITY(U,$J,358.3,13209,2)
;;=^5054845
;;^UTILITY(U,$J,358.3,13210,0)
;;=T82.525A^^53^582^43
;;^UTILITY(U,$J,358.3,13210,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13210,1,3,0)
;;=3^Dsplcmnt of Umbrella Device,Init Encntr
;;^UTILITY(U,$J,358.3,13210,1,4,0)
;;=4^T82.525A
;;^UTILITY(U,$J,358.3,13210,2)
;;=^5054851
;;^UTILITY(U,$J,358.3,13211,0)
;;=T82.529A^^53^582^34
;;^UTILITY(U,$J,358.3,13211,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13211,1,3,0)
;;=3^Dsplcmnt of Cardiac/Vascular Devices/Implants Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13211,1,4,0)
;;=4^T82.529A
;;^UTILITY(U,$J,358.3,13211,2)
;;=^5054857
;;^UTILITY(U,$J,358.3,13212,0)
;;=T82.530A^^53^582^140
;;^UTILITY(U,$J,358.3,13212,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13212,1,3,0)
;;=3^Leakage of Surgically Created AV Fistula,Init Encntr
;;^UTILITY(U,$J,358.3,13212,1,4,0)
;;=4^T82.530A
;;^UTILITY(U,$J,358.3,13212,2)
;;=^5054860
;;^UTILITY(U,$J,358.3,13213,0)
;;=T82.531A^^53^582^141
;;^UTILITY(U,$J,358.3,13213,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13213,1,3,0)
;;=3^Leakage of Surgically Created AV Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13213,1,4,0)
;;=4^T82.531A
;;^UTILITY(U,$J,358.3,13213,2)
;;=^5054863
;;^UTILITY(U,$J,358.3,13214,0)
;;=T82.533A^^53^582^136
;;^UTILITY(U,$J,358.3,13214,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13214,1,3,0)
;;=3^Leakage of Balloon Device,Init Encntr
;;^UTILITY(U,$J,358.3,13214,1,4,0)
;;=4^T82.533A
;;^UTILITY(U,$J,358.3,13214,2)
;;=^5054869
;;^UTILITY(U,$J,358.3,13215,0)
;;=T82.535A^^53^582^142
;;^UTILITY(U,$J,358.3,13215,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13215,1,3,0)
;;=3^Leakage of Umbrella Device,Init Encntr
;;^UTILITY(U,$J,358.3,13215,1,4,0)
;;=4^T82.535A
;;^UTILITY(U,$J,358.3,13215,2)
;;=^5054875
;;^UTILITY(U,$J,358.3,13216,0)
;;=T82.539A^^53^582^137
;;^UTILITY(U,$J,358.3,13216,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13216,1,3,0)
;;=3^Leakage of Cardiac/Vascular Device/Implant Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13216,1,4,0)
;;=4^T82.539A
;;^UTILITY(U,$J,358.3,13216,2)
;;=^5054881
;;^UTILITY(U,$J,358.3,13217,0)
;;=T82.590A^^53^582^162
;;^UTILITY(U,$J,358.3,13217,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13217,1,3,0)
;;=3^Mech Compl of Surgically Created AV Fistula,Init Encntr
;;^UTILITY(U,$J,358.3,13217,1,4,0)
;;=4^T82.590A
;;^UTILITY(U,$J,358.3,13217,2)
;;=^5054884
;;^UTILITY(U,$J,358.3,13218,0)
;;=T82.591A^^53^582^163
;;^UTILITY(U,$J,358.3,13218,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13218,1,3,0)
;;=3^Mech Compl of Surgically Created AV Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13218,1,4,0)
;;=4^T82.591A
;;^UTILITY(U,$J,358.3,13218,2)
;;=^5054887
;;^UTILITY(U,$J,358.3,13219,0)
;;=T82.593A^^53^582^147
;;^UTILITY(U,$J,358.3,13219,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13219,1,3,0)
;;=3^Mech Compl of Balloon Device,Init Encntr
;;^UTILITY(U,$J,358.3,13219,1,4,0)
;;=4^T82.593A
;;^UTILITY(U,$J,358.3,13219,2)
;;=^5054893
;;^UTILITY(U,$J,358.3,13220,0)
;;=T82.595A^^53^582^164
;;^UTILITY(U,$J,358.3,13220,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13220,1,3,0)
;;=3^Mech Compl of Umbrella Device,Init Encntr
;;^UTILITY(U,$J,358.3,13220,1,4,0)
;;=4^T82.595A
;;^UTILITY(U,$J,358.3,13220,2)
;;=^5054899
;;^UTILITY(U,$J,358.3,13221,0)
;;=T82.599A^^53^582^149
;;^UTILITY(U,$J,358.3,13221,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13221,1,3,0)
;;=3^Mech Compl of Cardiac/Vascular Device/Implant Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13221,1,4,0)
;;=4^T82.599A
;;^UTILITY(U,$J,358.3,13221,2)
;;=^5054905
;;^UTILITY(U,$J,358.3,13222,0)
;;=T85.01XA^^53^582^19
;;^UTILITY(U,$J,358.3,13222,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13222,1,3,0)
;;=3^Breakdown,Ventricular Intracranial Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13222,1,4,0)
;;=4^T85.01XA
;;^UTILITY(U,$J,358.3,13222,2)
;;=^5055478
;;^UTILITY(U,$J,358.3,13223,0)
;;=T85.02XA^^53^582^46
;;^UTILITY(U,$J,358.3,13223,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13223,1,3,0)
;;=3^Dsplcmnt of Ventricular Intracranial Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13223,1,4,0)
;;=4^T85.02XA
;;^UTILITY(U,$J,358.3,13223,2)
;;=^5055481
;;^UTILITY(U,$J,358.3,13224,0)
;;=T85.03XA^^53^582^145
;;^UTILITY(U,$J,358.3,13224,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13224,1,3,0)
;;=3^Leakage of Ventricular Intracranial Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13224,1,4,0)
;;=4^T85.03XA
;;^UTILITY(U,$J,358.3,13224,2)
;;=^5055484
;;^UTILITY(U,$J,358.3,13225,0)
;;=T85.09XA^^53^582^166
;;^UTILITY(U,$J,358.3,13225,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13225,1,3,0)
;;=3^Mech Compl of Ventricular Intracranial Shunt,Init Encntr
;;^UTILITY(U,$J,358.3,13225,1,4,0)
;;=4^T85.09XA
;;^UTILITY(U,$J,358.3,13225,2)
;;=^5055487
;;^UTILITY(U,$J,358.3,13226,0)
;;=T85.110A^^53^582^9
;;^UTILITY(U,$J,358.3,13226,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13226,1,3,0)
;;=3^Breakdown,Implnt Elect Neurostim,Brain,Init Encntr
;;^UTILITY(U,$J,358.3,13226,1,4,0)
;;=4^T85.110A
;;^UTILITY(U,$J,358.3,13226,2)
;;=^5055490
;;^UTILITY(U,$J,358.3,13227,0)
;;=T85.111A^^53^582^11
;;^UTILITY(U,$J,358.3,13227,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13227,1,3,0)
;;=3^Breakdown,Implnt Elect Neurostim,Periph Nrv,Init Encntr
;;^UTILITY(U,$J,358.3,13227,1,4,0)
;;=4^T85.111A
;;^UTILITY(U,$J,358.3,13227,2)
;;=^5055493
;;^UTILITY(U,$J,358.3,13228,0)
;;=T85.112A^^53^582^12
;;^UTILITY(U,$J,358.3,13228,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13228,1,3,0)
;;=3^Breakdown,Implnt Elect Neurostim,Spinal Cord,Init Encntr
;;^UTILITY(U,$J,358.3,13228,1,4,0)
;;=4^T85.112A
;;^UTILITY(U,$J,358.3,13228,2)
;;=^5055496
;;^UTILITY(U,$J,358.3,13229,0)
;;=T85.118A^^53^582^10
;;^UTILITY(U,$J,358.3,13229,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13229,1,3,0)
;;=3^Breakdown,Implnt Elect Neurostim,Nerv Sys,Init Encntr
;;^UTILITY(U,$J,358.3,13229,1,4,0)
;;=4^T85.118A
;;^UTILITY(U,$J,358.3,13229,2)
;;=^5055499
;;^UTILITY(U,$J,358.3,13230,0)
;;=T85.120A^^53^582^37
;;^UTILITY(U,$J,358.3,13230,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13230,1,3,0)
;;=3^Dsplcmnt of Implnt Elect Neurostim,Brain,Init Encntr
;;^UTILITY(U,$J,358.3,13230,1,4,0)
;;=4^T85.120A
;;^UTILITY(U,$J,358.3,13230,2)
;;=^5055502
;;^UTILITY(U,$J,358.3,13231,0)
;;=T85.121A^^53^582^38
;;^UTILITY(U,$J,358.3,13231,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13231,1,3,0)
;;=3^Dsplcmnt of Implnt Elect Neurostim,Periph Nrv,Init Encntr
;;^UTILITY(U,$J,358.3,13231,1,4,0)
;;=4^T85.121A
;;^UTILITY(U,$J,358.3,13231,2)
;;=^5055505
;;^UTILITY(U,$J,358.3,13232,0)
;;=T85.122A^^53^582^39
;;^UTILITY(U,$J,358.3,13232,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13232,1,3,0)
;;=3^Dsplcmnt of Implnt Elect Neurostim,Spinal Cord,Init Encntr
;;^UTILITY(U,$J,358.3,13232,1,4,0)
;;=4^T85.122A
;;^UTILITY(U,$J,358.3,13232,2)
;;=^5055508
;;^UTILITY(U,$J,358.3,13233,0)
;;=T85.128A^^53^582^40
;;^UTILITY(U,$J,358.3,13233,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13233,1,3,0)
;;=3^Dsplcmnt of Implnt Elect Stim,Nrv Sys,Init Encntr
;;^UTILITY(U,$J,358.3,13233,1,4,0)
;;=4^T85.128A
;;^UTILITY(U,$J,358.3,13233,2)
;;=^5055511
;;^UTILITY(U,$J,358.3,13234,0)
;;=T85.190A^^53^582^153
;;^UTILITY(U,$J,358.3,13234,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13234,1,3,0)
;;=3^Mech Compl of Implanted Electronic Neurostim of Brain,Init Encntr
;;^UTILITY(U,$J,358.3,13234,1,4,0)
;;=4^T85.190A
;;^UTILITY(U,$J,358.3,13234,2)
;;=^5055514
;;^UTILITY(U,$J,358.3,13235,0)
;;=T85.191A^^53^582^154
;;^UTILITY(U,$J,358.3,13235,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13235,1,3,0)
;;=3^Mech Compl of Implanted Electronic Neurostim of Periph Nrv,Init Encntr
;;^UTILITY(U,$J,358.3,13235,1,4,0)
;;=4^T85.191A
;;^UTILITY(U,$J,358.3,13235,2)
;;=^5055517
;;^UTILITY(U,$J,358.3,13236,0)
;;=T85.192A^^53^582^155
;;^UTILITY(U,$J,358.3,13236,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13236,1,3,0)
;;=3^Mech Compl of Implanted Electronic Neurostim of Spinal Cord,Init Encntr
;;^UTILITY(U,$J,358.3,13236,1,4,0)
;;=4^T85.192A
;;^UTILITY(U,$J,358.3,13236,2)
;;=^5055520
;;^UTILITY(U,$J,358.3,13237,0)
;;=T85.199A^^53^582^156
;;^UTILITY(U,$J,358.3,13237,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13237,1,3,0)
;;=3^Mech Compl of Implanted Electronic Stim of Nervous Sys,Init Encntr
;;^UTILITY(U,$J,358.3,13237,1,4,0)
;;=4^T85.199A
;;^UTILITY(U,$J,358.3,13237,2)
;;=^5055523
;;^UTILITY(U,$J,358.3,13238,0)
;;=T83.498A^^53^582^159
;;^UTILITY(U,$J,358.3,13238,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13238,1,3,0)
;;=3^Mech Compl of Prosthetic Device/Implant/Graft of Genital Tract,Init Encntr
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI05G 19787 printed Sep 23, 2025@19:17:59 Page 2
IBDEI05G ; ; 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,13174,2)
+2 ;;=^5008336
+3 ;;^UTILITY(U,$J,358.3,13175,0)
+4 ;;=T82.110A^^53^582^5
+5 ;;^UTILITY(U,$J,358.3,13175,1,0)
+6 ;;=^358.31IA^4^2
+7 ;;^UTILITY(U,$J,358.3,13175,1,3,0)
+8 ;;=3^Breakdown,Cardiac Electrode,Init Encntr
+9 ;;^UTILITY(U,$J,358.3,13175,1,4,0)
+10 ;;=4^T82.110A
+11 ;;^UTILITY(U,$J,358.3,13175,2)
+12 ;;=^5054680
+13 ;;^UTILITY(U,$J,358.3,13176,0)
+14 ;;=T82.191A^^53^582^148
+15 ;;^UTILITY(U,$J,358.3,13176,1,0)
+16 ;;=^358.31IA^4^2
+17 ;;^UTILITY(U,$J,358.3,13176,1,3,0)
+18 ;;=3^Mech Compl of Cardiac Pulse Generator,Init Encntr
+19 ;;^UTILITY(U,$J,358.3,13176,1,4,0)
+20 ;;=4^T82.191A
+21 ;;^UTILITY(U,$J,358.3,13176,2)
+22 ;;=^5054707
+23 ;;^UTILITY(U,$J,358.3,13177,0)
+24 ;;=T82.111A^^53^582^6
+25 ;;^UTILITY(U,$J,358.3,13177,1,0)
+26 ;;=^358.31IA^4^2
+27 ;;^UTILITY(U,$J,358.3,13177,1,3,0)
+28 ;;=3^Breakdown,Cardiac Pulse Generator,Init Encntr
+29 ;;^UTILITY(U,$J,358.3,13177,1,4,0)
+30 ;;=4^T82.111A
+31 ;;^UTILITY(U,$J,358.3,13177,2)
+32 ;;=^5054683
+33 ;;^UTILITY(U,$J,358.3,13178,0)
+34 ;;=T82.120A^^53^582^32
+35 ;;^UTILITY(U,$J,358.3,13178,1,0)
+36 ;;=^358.31IA^4^2
+37 ;;^UTILITY(U,$J,358.3,13178,1,3,0)
+38 ;;=3^Dsplcmnt of Cardiac Electrode,Init Encntr
+39 ;;^UTILITY(U,$J,358.3,13178,1,4,0)
+40 ;;=4^T82.120A
+41 ;;^UTILITY(U,$J,358.3,13178,2)
+42 ;;=^5054692
+43 ;;^UTILITY(U,$J,358.3,13179,0)
+44 ;;=T82.121A^^53^582^33
+45 ;;^UTILITY(U,$J,358.3,13179,1,0)
+46 ;;=^358.31IA^4^2
+47 ;;^UTILITY(U,$J,358.3,13179,1,3,0)
+48 ;;=3^Dsplcmnt of Cardiac Pulse Generator,Init Encntr
+49 ;;^UTILITY(U,$J,358.3,13179,1,4,0)
+50 ;;=4^T82.121A
+51 ;;^UTILITY(U,$J,358.3,13179,2)
+52 ;;=^5054695
+53 ;;^UTILITY(U,$J,358.3,13180,0)
+54 ;;=T82.190A^^53^582^150
+55 ;;^UTILITY(U,$J,358.3,13180,1,0)
+56 ;;=^358.31IA^4^2
+57 ;;^UTILITY(U,$J,358.3,13180,1,3,0)
+58 ;;=3^Mech Compl of Cardiact Electrode,Init Encntr
+59 ;;^UTILITY(U,$J,358.3,13180,1,4,0)
+60 ;;=4^T82.190A
+61 ;;^UTILITY(U,$J,358.3,13180,2)
+62 ;;=^5054704
+63 ;;^UTILITY(U,$J,358.3,13181,0)
+64 ;;=T82.310A^^53^582^2
+65 ;;^UTILITY(U,$J,358.3,13181,1,0)
+66 ;;=^358.31IA^4^2
+67 ;;^UTILITY(U,$J,358.3,13181,1,3,0)
+68 ;;=3^Breakdown,Aortic Grft,Init Encntr
+69 ;;^UTILITY(U,$J,358.3,13181,1,4,0)
+70 ;;=4^T82.310A
+71 ;;^UTILITY(U,$J,358.3,13181,2)
+72 ;;=^5054740
+73 ;;^UTILITY(U,$J,358.3,13182,0)
+74 ;;=T82.311A^^53^582^7
+75 ;;^UTILITY(U,$J,358.3,13182,1,0)
+76 ;;=^358.31IA^4^2
+77 ;;^UTILITY(U,$J,358.3,13182,1,3,0)
+78 ;;=3^Breakdown,Carotid Arterial Grft,Init Encntr
+79 ;;^UTILITY(U,$J,358.3,13182,1,4,0)
+80 ;;=4^T82.311A
+81 ;;^UTILITY(U,$J,358.3,13182,2)
+82 ;;=^5054743
+83 ;;^UTILITY(U,$J,358.3,13183,0)
+84 ;;=T82.312A^^53^582^8
+85 ;;^UTILITY(U,$J,358.3,13183,1,0)
+86 ;;=^358.31IA^4^2
+87 ;;^UTILITY(U,$J,358.3,13183,1,3,0)
+88 ;;=3^Breakdown,Femoral Arterial Grft,Init Encntr
+89 ;;^UTILITY(U,$J,358.3,13183,1,4,0)
+90 ;;=4^T82.312A
+91 ;;^UTILITY(U,$J,358.3,13183,2)
+92 ;;=^5054746
+93 ;;^UTILITY(U,$J,358.3,13184,0)
+94 ;;=T82.318A^^53^582^17
+95 ;;^UTILITY(U,$J,358.3,13184,1,0)
+96 ;;=^358.31IA^4^2
+97 ;;^UTILITY(U,$J,358.3,13184,1,3,0)
+98 ;;=3^Breakdown,Vasc Grfts,Init Encntr
+99 ;;^UTILITY(U,$J,358.3,13184,1,4,0)
+100 ;;=4^T82.318A
+101 ;;^UTILITY(U,$J,358.3,13184,2)
+102 ;;=^5054749
+103 ;;^UTILITY(U,$J,358.3,13185,0)
+104 ;;=T82.319A^^53^582^18
+105 ;;^UTILITY(U,$J,358.3,13185,1,0)
+106 ;;=^358.31IA^4^2
+107 ;;^UTILITY(U,$J,358.3,13185,1,3,0)
+108 ;;=3^Breakdown,Vasc Grfts,Unspec,Init Encntr
+109 ;;^UTILITY(U,$J,358.3,13185,1,4,0)
+110 ;;=4^T82.319A
+111 ;;^UTILITY(U,$J,358.3,13185,2)
+112 ;;=^5054752
+113 ;;^UTILITY(U,$J,358.3,13186,0)
+114 ;;=T82.320A^^53^582^30
+115 ;;^UTILITY(U,$J,358.3,13186,1,0)
+116 ;;=^358.31IA^4^2
+117 ;;^UTILITY(U,$J,358.3,13186,1,3,0)
+118 ;;=3^Dsplcmnt of Aortic Graft,Init Encntr
+119 ;;^UTILITY(U,$J,358.3,13186,1,4,0)
+120 ;;=4^T82.320A
+121 ;;^UTILITY(U,$J,358.3,13186,2)
+122 ;;=^5054755
+123 ;;^UTILITY(U,$J,358.3,13187,0)
+124 ;;=T82.321A^^53^582^35
+125 ;;^UTILITY(U,$J,358.3,13187,1,0)
+126 ;;=^358.31IA^4^2
+127 ;;^UTILITY(U,$J,358.3,13187,1,3,0)
+128 ;;=3^Dsplcmnt of Carotid Arterial Graft,Init Encntr
+129 ;;^UTILITY(U,$J,358.3,13187,1,4,0)
+130 ;;=4^T82.321A
+131 ;;^UTILITY(U,$J,358.3,13187,2)
+132 ;;=^5054758
+133 ;;^UTILITY(U,$J,358.3,13188,0)
+134 ;;=T82.322A^^53^582^36
+135 ;;^UTILITY(U,$J,358.3,13188,1,0)
+136 ;;=^358.31IA^4^2
+137 ;;^UTILITY(U,$J,358.3,13188,1,3,0)
+138 ;;=3^Dsplcmnt of Femoral Arterial Graft,Init Encntr
+139 ;;^UTILITY(U,$J,358.3,13188,1,4,0)
+140 ;;=4^T82.322A
+141 ;;^UTILITY(U,$J,358.3,13188,2)
+142 ;;=^5054761
+143 ;;^UTILITY(U,$J,358.3,13189,0)
+144 ;;=T82.329A^^53^582^45
+145 ;;^UTILITY(U,$J,358.3,13189,1,0)
+146 ;;=^358.31IA^4^2
+147 ;;^UTILITY(U,$J,358.3,13189,1,3,0)
+148 ;;=3^Dsplcmnt of Vascular Grafts,Unspec,Init Encntr
+149 ;;^UTILITY(U,$J,358.3,13189,1,4,0)
+150 ;;=4^T82.329A
+151 ;;^UTILITY(U,$J,358.3,13189,2)
+152 ;;=^5054767
+153 ;;^UTILITY(U,$J,358.3,13190,0)
+154 ;;=T82.330A^^53^582^135
+155 ;;^UTILITY(U,$J,358.3,13190,1,0)
+156 ;;=^358.31IA^4^2
+157 ;;^UTILITY(U,$J,358.3,13190,1,3,0)
+158 ;;=3^Leakage of Aortic Graft,Init Encntr
+159 ;;^UTILITY(U,$J,358.3,13190,1,4,0)
+160 ;;=4^T82.330A
+161 ;;^UTILITY(U,$J,358.3,13190,2)
+162 ;;=^5054770
+163 ;;^UTILITY(U,$J,358.3,13191,0)
+164 ;;=T82.331A^^53^582^138
+165 ;;^UTILITY(U,$J,358.3,13191,1,0)
+166 ;;=^358.31IA^4^2
+167 ;;^UTILITY(U,$J,358.3,13191,1,3,0)
+168 ;;=3^Leakage of Carotid Arterial Graft,Init Encntr
+169 ;;^UTILITY(U,$J,358.3,13191,1,4,0)
+170 ;;=4^T82.331A
+171 ;;^UTILITY(U,$J,358.3,13191,2)
+172 ;;=^5054773
+173 ;;^UTILITY(U,$J,358.3,13192,0)
+174 ;;=T82.332A^^53^582^139
+175 ;;^UTILITY(U,$J,358.3,13192,1,0)
+176 ;;=^358.31IA^4^2
+177 ;;^UTILITY(U,$J,358.3,13192,1,3,0)
+178 ;;=3^Leakage of Femoral Arterial Graft,Init Encntr
+179 ;;^UTILITY(U,$J,358.3,13192,1,4,0)
+180 ;;=4^T82.332A
+181 ;;^UTILITY(U,$J,358.3,13192,2)
+182 ;;=^5054776
+183 ;;^UTILITY(U,$J,358.3,13193,0)
+184 ;;=T82.339A^^53^582^144
+185 ;;^UTILITY(U,$J,358.3,13193,1,0)
+186 ;;=^358.31IA^4^2
+187 ;;^UTILITY(U,$J,358.3,13193,1,3,0)
+188 ;;=3^Leakage of Vascular Graft,Unspec,Init Encntr
+189 ;;^UTILITY(U,$J,358.3,13193,1,4,0)
+190 ;;=4^T82.339A
+191 ;;^UTILITY(U,$J,358.3,13193,2)
+192 ;;=^5054782
+193 ;;^UTILITY(U,$J,358.3,13194,0)
+194 ;;=T82.390A^^53^582^146
+195 ;;^UTILITY(U,$J,358.3,13194,1,0)
+196 ;;=^358.31IA^4^2
+197 ;;^UTILITY(U,$J,358.3,13194,1,3,0)
+198 ;;=3^Mech Compl of Aortic Graft,NEC,Init Encntr
+199 ;;^UTILITY(U,$J,358.3,13194,1,4,0)
+200 ;;=4^T82.390A
+201 ;;^UTILITY(U,$J,358.3,13194,2)
+202 ;;=^5054785
+203 ;;^UTILITY(U,$J,358.3,13195,0)
+204 ;;=T82.391A^^53^582^151
+205 ;;^UTILITY(U,$J,358.3,13195,1,0)
+206 ;;=^358.31IA^4^2
+207 ;;^UTILITY(U,$J,358.3,13195,1,3,0)
+208 ;;=3^Mech Compl of Carotid Arterial Graft,NEC,Init Encntr
+209 ;;^UTILITY(U,$J,358.3,13195,1,4,0)
+210 ;;=4^T82.391A
+211 ;;^UTILITY(U,$J,358.3,13195,2)
+212 ;;=^5054788
+213 ;;^UTILITY(U,$J,358.3,13196,0)
+214 ;;=T82.392A^^53^582^152
+215 ;;^UTILITY(U,$J,358.3,13196,1,0)
+216 ;;=^358.31IA^4^2
+217 ;;^UTILITY(U,$J,358.3,13196,1,3,0)
+218 ;;=3^Mech Compl of Femoral Arterial Graft,NEC,Init Encntr
+219 ;;^UTILITY(U,$J,358.3,13196,1,4,0)
+220 ;;=4^T82.392A
+221 ;;^UTILITY(U,$J,358.3,13196,2)
+222 ;;=^5054791
+223 ;;^UTILITY(U,$J,358.3,13197,0)
+224 ;;=T82.399A^^53^582^165
+225 ;;^UTILITY(U,$J,358.3,13197,1,0)
+226 ;;=^358.31IA^4^2
+227 ;;^UTILITY(U,$J,358.3,13197,1,3,0)
+228 ;;=3^Mech Compl of Vascular Graft,Unspec,NEC,Init Encntr
+229 ;;^UTILITY(U,$J,358.3,13197,1,4,0)
+230 ;;=4^T82.399A
+231 ;;^UTILITY(U,$J,358.3,13197,2)
+232 ;;=^5054797
+233 ;;^UTILITY(U,$J,358.3,13198,0)
+234 ;;=T82.41XA^^53^582^16
+235 ;;^UTILITY(U,$J,358.3,13198,1,0)
+236 ;;=^358.31IA^4^2
+237 ;;^UTILITY(U,$J,358.3,13198,1,3,0)
+238 ;;=3^Breakdown,Vasc Dialysis Cath,Init Encntr
+239 ;;^UTILITY(U,$J,358.3,13198,1,4,0)
+240 ;;=4^T82.41XA
+241 ;;^UTILITY(U,$J,358.3,13198,2)
+242 ;;=^5054800
+243 ;;^UTILITY(U,$J,358.3,13199,0)
+244 ;;=T82.42XA^^53^582^44
+245 ;;^UTILITY(U,$J,358.3,13199,1,0)
+246 ;;=^358.31IA^4^2
+247 ;;^UTILITY(U,$J,358.3,13199,1,3,0)
+248 ;;=3^Dsplcmnt of Vascular Dialysis Catheter,Init Encntr
+249 ;;^UTILITY(U,$J,358.3,13199,1,4,0)
+250 ;;=4^T82.42XA
+251 ;;^UTILITY(U,$J,358.3,13199,2)
+252 ;;=^5054803
+253 ;;^UTILITY(U,$J,358.3,13200,0)
+254 ;;=T82.43XA^^53^582^143
+255 ;;^UTILITY(U,$J,358.3,13200,1,0)
+256 ;;=^358.31IA^4^2
+257 ;;^UTILITY(U,$J,358.3,13200,1,3,0)
+258 ;;=3^Leakage of Vascular Dialysis Catheter,Init Encntr
+259 ;;^UTILITY(U,$J,358.3,13200,1,4,0)
+260 ;;=4^T82.43XA
+261 ;;^UTILITY(U,$J,358.3,13200,2)
+262 ;;=^5054806
+263 ;;^UTILITY(U,$J,358.3,13201,0)
+264 ;;=T82.49XA^^53^582^27
+265 ;;^UTILITY(U,$J,358.3,13201,1,0)
+266 ;;=^358.31IA^4^2
+267 ;;^UTILITY(U,$J,358.3,13201,1,3,0)
+268 ;;=3^Complic,Vasc Dialysis Cath NEC,Init Encntr
+269 ;;^UTILITY(U,$J,358.3,13201,1,4,0)
+270 ;;=4^T82.49XA
+271 ;;^UTILITY(U,$J,358.3,13201,2)
+272 ;;=^5054809
+273 ;;^UTILITY(U,$J,358.3,13202,0)
+274 ;;=T82.510A^^53^582^13
+275 ;;^UTILITY(U,$J,358.3,13202,1,0)
+276 ;;=^358.31IA^4^2
+277 ;;^UTILITY(U,$J,358.3,13202,1,3,0)
+278 ;;=3^Breakdown,Surg Created AV Fist,Init Encntr
+279 ;;^UTILITY(U,$J,358.3,13202,1,4,0)
+280 ;;=4^T82.510A
+281 ;;^UTILITY(U,$J,358.3,13202,2)
+282 ;;=^5054812
+283 ;;^UTILITY(U,$J,358.3,13203,0)
+284 ;;=T82.511A^^53^582^14
+285 ;;^UTILITY(U,$J,358.3,13203,1,0)
+286 ;;=^358.31IA^4^2
+287 ;;^UTILITY(U,$J,358.3,13203,1,3,0)
+288 ;;=3^Breakdown,Surg Created AV Shunt,Init Encntr
+289 ;;^UTILITY(U,$J,358.3,13203,1,4,0)
+290 ;;=4^T82.511A
+291 ;;^UTILITY(U,$J,358.3,13203,2)
+292 ;;=^5054815
+293 ;;^UTILITY(U,$J,358.3,13204,0)
+294 ;;=T82.513A^^53^582^3
+295 ;;^UTILITY(U,$J,358.3,13204,1,0)
+296 ;;=^358.31IA^4^2
+297 ;;^UTILITY(U,$J,358.3,13204,1,3,0)
+298 ;;=3^Breakdown,Balloon Device,Init Encntr
+299 ;;^UTILITY(U,$J,358.3,13204,1,4,0)
+300 ;;=4^T82.513A
+301 ;;^UTILITY(U,$J,358.3,13204,2)
+302 ;;=^5054821
+303 ;;^UTILITY(U,$J,358.3,13205,0)
+304 ;;=T82.515A^^53^582^15
+305 ;;^UTILITY(U,$J,358.3,13205,1,0)
+306 ;;=^358.31IA^4^2
+307 ;;^UTILITY(U,$J,358.3,13205,1,3,0)
+308 ;;=3^Breakdown,Umbrella Device,Init Encntr
+309 ;;^UTILITY(U,$J,358.3,13205,1,4,0)
+310 ;;=4^T82.515A
+311 ;;^UTILITY(U,$J,358.3,13205,2)
+312 ;;=^5054827
+313 ;;^UTILITY(U,$J,358.3,13206,0)
+314 ;;=T82.519A^^53^582^4
+315 ;;^UTILITY(U,$J,358.3,13206,1,0)
+316 ;;=^358.31IA^4^2
+317 ;;^UTILITY(U,$J,358.3,13206,1,3,0)
+318 ;;=3^Breakdown,Card/Vasc Devices/Implants,Unspec,Init Encntr
+319 ;;^UTILITY(U,$J,358.3,13206,1,4,0)
+320 ;;=4^T82.519A
+321 ;;^UTILITY(U,$J,358.3,13206,2)
+322 ;;=^5054833
+323 ;;^UTILITY(U,$J,358.3,13207,0)
+324 ;;=T82.520A^^53^582^41
+325 ;;^UTILITY(U,$J,358.3,13207,1,0)
+326 ;;=^358.31IA^4^2
+327 ;;^UTILITY(U,$J,358.3,13207,1,3,0)
+328 ;;=3^Dsplcmnt of Surgically Created AV Fistula,Init Encntr
+329 ;;^UTILITY(U,$J,358.3,13207,1,4,0)
+330 ;;=4^T82.520A
+331 ;;^UTILITY(U,$J,358.3,13207,2)
+332 ;;=^5054836
+333 ;;^UTILITY(U,$J,358.3,13208,0)
+334 ;;=T82.521A^^53^582^42
+335 ;;^UTILITY(U,$J,358.3,13208,1,0)
+336 ;;=^358.31IA^4^2
+337 ;;^UTILITY(U,$J,358.3,13208,1,3,0)
+338 ;;=3^Dsplcmnt of Surgically Created AV Shunt,Init Encntr
+339 ;;^UTILITY(U,$J,358.3,13208,1,4,0)
+340 ;;=4^T82.521A
+341 ;;^UTILITY(U,$J,358.3,13208,2)
+342 ;;=^5054839
+343 ;;^UTILITY(U,$J,358.3,13209,0)
+344 ;;=T82.523A^^53^582^31
+345 ;;^UTILITY(U,$J,358.3,13209,1,0)
+346 ;;=^358.31IA^4^2
+347 ;;^UTILITY(U,$J,358.3,13209,1,3,0)
+348 ;;=3^Dsplcmnt of Balloon Device,Init Encntr
+349 ;;^UTILITY(U,$J,358.3,13209,1,4,0)
+350 ;;=4^T82.523A
+351 ;;^UTILITY(U,$J,358.3,13209,2)
+352 ;;=^5054845
+353 ;;^UTILITY(U,$J,358.3,13210,0)
+354 ;;=T82.525A^^53^582^43
+355 ;;^UTILITY(U,$J,358.3,13210,1,0)
+356 ;;=^358.31IA^4^2
+357 ;;^UTILITY(U,$J,358.3,13210,1,3,0)
+358 ;;=3^Dsplcmnt of Umbrella Device,Init Encntr
+359 ;;^UTILITY(U,$J,358.3,13210,1,4,0)
+360 ;;=4^T82.525A
+361 ;;^UTILITY(U,$J,358.3,13210,2)
+362 ;;=^5054851
+363 ;;^UTILITY(U,$J,358.3,13211,0)
+364 ;;=T82.529A^^53^582^34
+365 ;;^UTILITY(U,$J,358.3,13211,1,0)
+366 ;;=^358.31IA^4^2
+367 ;;^UTILITY(U,$J,358.3,13211,1,3,0)
+368 ;;=3^Dsplcmnt of Cardiac/Vascular Devices/Implants Unspec,Init Encntr
+369 ;;^UTILITY(U,$J,358.3,13211,1,4,0)
+370 ;;=4^T82.529A
+371 ;;^UTILITY(U,$J,358.3,13211,2)
+372 ;;=^5054857
+373 ;;^UTILITY(U,$J,358.3,13212,0)
+374 ;;=T82.530A^^53^582^140
+375 ;;^UTILITY(U,$J,358.3,13212,1,0)
+376 ;;=^358.31IA^4^2
+377 ;;^UTILITY(U,$J,358.3,13212,1,3,0)
+378 ;;=3^Leakage of Surgically Created AV Fistula,Init Encntr
+379 ;;^UTILITY(U,$J,358.3,13212,1,4,0)
+380 ;;=4^T82.530A
+381 ;;^UTILITY(U,$J,358.3,13212,2)
+382 ;;=^5054860
+383 ;;^UTILITY(U,$J,358.3,13213,0)
+384 ;;=T82.531A^^53^582^141
+385 ;;^UTILITY(U,$J,358.3,13213,1,0)
+386 ;;=^358.31IA^4^2
+387 ;;^UTILITY(U,$J,358.3,13213,1,3,0)
+388 ;;=3^Leakage of Surgically Created AV Shunt,Init Encntr
+389 ;;^UTILITY(U,$J,358.3,13213,1,4,0)
+390 ;;=4^T82.531A
+391 ;;^UTILITY(U,$J,358.3,13213,2)
+392 ;;=^5054863
+393 ;;^UTILITY(U,$J,358.3,13214,0)
+394 ;;=T82.533A^^53^582^136
+395 ;;^UTILITY(U,$J,358.3,13214,1,0)
+396 ;;=^358.31IA^4^2
+397 ;;^UTILITY(U,$J,358.3,13214,1,3,0)
+398 ;;=3^Leakage of Balloon Device,Init Encntr
+399 ;;^UTILITY(U,$J,358.3,13214,1,4,0)
+400 ;;=4^T82.533A
+401 ;;^UTILITY(U,$J,358.3,13214,2)
+402 ;;=^5054869
+403 ;;^UTILITY(U,$J,358.3,13215,0)
+404 ;;=T82.535A^^53^582^142
+405 ;;^UTILITY(U,$J,358.3,13215,1,0)
+406 ;;=^358.31IA^4^2
+407 ;;^UTILITY(U,$J,358.3,13215,1,3,0)
+408 ;;=3^Leakage of Umbrella Device,Init Encntr
+409 ;;^UTILITY(U,$J,358.3,13215,1,4,0)
+410 ;;=4^T82.535A
+411 ;;^UTILITY(U,$J,358.3,13215,2)
+412 ;;=^5054875
+413 ;;^UTILITY(U,$J,358.3,13216,0)
+414 ;;=T82.539A^^53^582^137
+415 ;;^UTILITY(U,$J,358.3,13216,1,0)
+416 ;;=^358.31IA^4^2
+417 ;;^UTILITY(U,$J,358.3,13216,1,3,0)
+418 ;;=3^Leakage of Cardiac/Vascular Device/Implant Unspec,Init Encntr
+419 ;;^UTILITY(U,$J,358.3,13216,1,4,0)
+420 ;;=4^T82.539A
+421 ;;^UTILITY(U,$J,358.3,13216,2)
+422 ;;=^5054881
+423 ;;^UTILITY(U,$J,358.3,13217,0)
+424 ;;=T82.590A^^53^582^162
+425 ;;^UTILITY(U,$J,358.3,13217,1,0)
+426 ;;=^358.31IA^4^2
+427 ;;^UTILITY(U,$J,358.3,13217,1,3,0)
+428 ;;=3^Mech Compl of Surgically Created AV Fistula,Init Encntr
+429 ;;^UTILITY(U,$J,358.3,13217,1,4,0)
+430 ;;=4^T82.590A
+431 ;;^UTILITY(U,$J,358.3,13217,2)
+432 ;;=^5054884
+433 ;;^UTILITY(U,$J,358.3,13218,0)
+434 ;;=T82.591A^^53^582^163
+435 ;;^UTILITY(U,$J,358.3,13218,1,0)
+436 ;;=^358.31IA^4^2
+437 ;;^UTILITY(U,$J,358.3,13218,1,3,0)
+438 ;;=3^Mech Compl of Surgically Created AV Shunt,Init Encntr
+439 ;;^UTILITY(U,$J,358.3,13218,1,4,0)
+440 ;;=4^T82.591A
+441 ;;^UTILITY(U,$J,358.3,13218,2)
+442 ;;=^5054887
+443 ;;^UTILITY(U,$J,358.3,13219,0)
+444 ;;=T82.593A^^53^582^147
+445 ;;^UTILITY(U,$J,358.3,13219,1,0)
+446 ;;=^358.31IA^4^2
+447 ;;^UTILITY(U,$J,358.3,13219,1,3,0)
+448 ;;=3^Mech Compl of Balloon Device,Init Encntr
+449 ;;^UTILITY(U,$J,358.3,13219,1,4,0)
+450 ;;=4^T82.593A
+451 ;;^UTILITY(U,$J,358.3,13219,2)
+452 ;;=^5054893
+453 ;;^UTILITY(U,$J,358.3,13220,0)
+454 ;;=T82.595A^^53^582^164
+455 ;;^UTILITY(U,$J,358.3,13220,1,0)
+456 ;;=^358.31IA^4^2
+457 ;;^UTILITY(U,$J,358.3,13220,1,3,0)
+458 ;;=3^Mech Compl of Umbrella Device,Init Encntr
+459 ;;^UTILITY(U,$J,358.3,13220,1,4,0)
+460 ;;=4^T82.595A
+461 ;;^UTILITY(U,$J,358.3,13220,2)
+462 ;;=^5054899
+463 ;;^UTILITY(U,$J,358.3,13221,0)
+464 ;;=T82.599A^^53^582^149
+465 ;;^UTILITY(U,$J,358.3,13221,1,0)
+466 ;;=^358.31IA^4^2
+467 ;;^UTILITY(U,$J,358.3,13221,1,3,0)
+468 ;;=3^Mech Compl of Cardiac/Vascular Device/Implant Unspec,Init Encntr
+469 ;;^UTILITY(U,$J,358.3,13221,1,4,0)
+470 ;;=4^T82.599A
+471 ;;^UTILITY(U,$J,358.3,13221,2)
+472 ;;=^5054905
+473 ;;^UTILITY(U,$J,358.3,13222,0)
+474 ;;=T85.01XA^^53^582^19
+475 ;;^UTILITY(U,$J,358.3,13222,1,0)
+476 ;;=^358.31IA^4^2
+477 ;;^UTILITY(U,$J,358.3,13222,1,3,0)
+478 ;;=3^Breakdown,Ventricular Intracranial Shunt,Init Encntr
+479 ;;^UTILITY(U,$J,358.3,13222,1,4,0)
+480 ;;=4^T85.01XA
+481 ;;^UTILITY(U,$J,358.3,13222,2)
+482 ;;=^5055478
+483 ;;^UTILITY(U,$J,358.3,13223,0)
+484 ;;=T85.02XA^^53^582^46
+485 ;;^UTILITY(U,$J,358.3,13223,1,0)
+486 ;;=^358.31IA^4^2
+487 ;;^UTILITY(U,$J,358.3,13223,1,3,0)
+488 ;;=3^Dsplcmnt of Ventricular Intracranial Shunt,Init Encntr
+489 ;;^UTILITY(U,$J,358.3,13223,1,4,0)
+490 ;;=4^T85.02XA
+491 ;;^UTILITY(U,$J,358.3,13223,2)
+492 ;;=^5055481
+493 ;;^UTILITY(U,$J,358.3,13224,0)
+494 ;;=T85.03XA^^53^582^145
+495 ;;^UTILITY(U,$J,358.3,13224,1,0)
+496 ;;=^358.31IA^4^2
+497 ;;^UTILITY(U,$J,358.3,13224,1,3,0)
+498 ;;=3^Leakage of Ventricular Intracranial Shunt,Init Encntr
+499 ;;^UTILITY(U,$J,358.3,13224,1,4,0)
+500 ;;=4^T85.03XA
+501 ;;^UTILITY(U,$J,358.3,13224,2)
+502 ;;=^5055484
+503 ;;^UTILITY(U,$J,358.3,13225,0)
+504 ;;=T85.09XA^^53^582^166
+505 ;;^UTILITY(U,$J,358.3,13225,1,0)
+506 ;;=^358.31IA^4^2
+507 ;;^UTILITY(U,$J,358.3,13225,1,3,0)
+508 ;;=3^Mech Compl of Ventricular Intracranial Shunt,Init Encntr
+509 ;;^UTILITY(U,$J,358.3,13225,1,4,0)
+510 ;;=4^T85.09XA
+511 ;;^UTILITY(U,$J,358.3,13225,2)
+512 ;;=^5055487
+513 ;;^UTILITY(U,$J,358.3,13226,0)
+514 ;;=T85.110A^^53^582^9
+515 ;;^UTILITY(U,$J,358.3,13226,1,0)
+516 ;;=^358.31IA^4^2
+517 ;;^UTILITY(U,$J,358.3,13226,1,3,0)
+518 ;;=3^Breakdown,Implnt Elect Neurostim,Brain,Init Encntr
+519 ;;^UTILITY(U,$J,358.3,13226,1,4,0)
+520 ;;=4^T85.110A
+521 ;;^UTILITY(U,$J,358.3,13226,2)
+522 ;;=^5055490
+523 ;;^UTILITY(U,$J,358.3,13227,0)
+524 ;;=T85.111A^^53^582^11
+525 ;;^UTILITY(U,$J,358.3,13227,1,0)
+526 ;;=^358.31IA^4^2
+527 ;;^UTILITY(U,$J,358.3,13227,1,3,0)
+528 ;;=3^Breakdown,Implnt Elect Neurostim,Periph Nrv,Init Encntr
+529 ;;^UTILITY(U,$J,358.3,13227,1,4,0)
+530 ;;=4^T85.111A
+531 ;;^UTILITY(U,$J,358.3,13227,2)
+532 ;;=^5055493
+533 ;;^UTILITY(U,$J,358.3,13228,0)
+534 ;;=T85.112A^^53^582^12
+535 ;;^UTILITY(U,$J,358.3,13228,1,0)
+536 ;;=^358.31IA^4^2
+537 ;;^UTILITY(U,$J,358.3,13228,1,3,0)
+538 ;;=3^Breakdown,Implnt Elect Neurostim,Spinal Cord,Init Encntr
+539 ;;^UTILITY(U,$J,358.3,13228,1,4,0)
+540 ;;=4^T85.112A
+541 ;;^UTILITY(U,$J,358.3,13228,2)
+542 ;;=^5055496
+543 ;;^UTILITY(U,$J,358.3,13229,0)
+544 ;;=T85.118A^^53^582^10
+545 ;;^UTILITY(U,$J,358.3,13229,1,0)
+546 ;;=^358.31IA^4^2
+547 ;;^UTILITY(U,$J,358.3,13229,1,3,0)
+548 ;;=3^Breakdown,Implnt Elect Neurostim,Nerv Sys,Init Encntr
+549 ;;^UTILITY(U,$J,358.3,13229,1,4,0)
+550 ;;=4^T85.118A
+551 ;;^UTILITY(U,$J,358.3,13229,2)
+552 ;;=^5055499
+553 ;;^UTILITY(U,$J,358.3,13230,0)
+554 ;;=T85.120A^^53^582^37
+555 ;;^UTILITY(U,$J,358.3,13230,1,0)
+556 ;;=^358.31IA^4^2
+557 ;;^UTILITY(U,$J,358.3,13230,1,3,0)
+558 ;;=3^Dsplcmnt of Implnt Elect Neurostim,Brain,Init Encntr
+559 ;;^UTILITY(U,$J,358.3,13230,1,4,0)
+560 ;;=4^T85.120A
+561 ;;^UTILITY(U,$J,358.3,13230,2)
+562 ;;=^5055502
+563 ;;^UTILITY(U,$J,358.3,13231,0)
+564 ;;=T85.121A^^53^582^38
+565 ;;^UTILITY(U,$J,358.3,13231,1,0)
+566 ;;=^358.31IA^4^2
+567 ;;^UTILITY(U,$J,358.3,13231,1,3,0)
+568 ;;=3^Dsplcmnt of Implnt Elect Neurostim,Periph Nrv,Init Encntr
+569 ;;^UTILITY(U,$J,358.3,13231,1,4,0)
+570 ;;=4^T85.121A
+571 ;;^UTILITY(U,$J,358.3,13231,2)
+572 ;;=^5055505
+573 ;;^UTILITY(U,$J,358.3,13232,0)
+574 ;;=T85.122A^^53^582^39
+575 ;;^UTILITY(U,$J,358.3,13232,1,0)
+576 ;;=^358.31IA^4^2
+577 ;;^UTILITY(U,$J,358.3,13232,1,3,0)
+578 ;;=3^Dsplcmnt of Implnt Elect Neurostim,Spinal Cord,Init Encntr
+579 ;;^UTILITY(U,$J,358.3,13232,1,4,0)
+580 ;;=4^T85.122A
+581 ;;^UTILITY(U,$J,358.3,13232,2)
+582 ;;=^5055508
+583 ;;^UTILITY(U,$J,358.3,13233,0)
+584 ;;=T85.128A^^53^582^40
+585 ;;^UTILITY(U,$J,358.3,13233,1,0)
+586 ;;=^358.31IA^4^2
+587 ;;^UTILITY(U,$J,358.3,13233,1,3,0)
+588 ;;=3^Dsplcmnt of Implnt Elect Stim,Nrv Sys,Init Encntr
+589 ;;^UTILITY(U,$J,358.3,13233,1,4,0)
+590 ;;=4^T85.128A
+591 ;;^UTILITY(U,$J,358.3,13233,2)
+592 ;;=^5055511
+593 ;;^UTILITY(U,$J,358.3,13234,0)
+594 ;;=T85.190A^^53^582^153
+595 ;;^UTILITY(U,$J,358.3,13234,1,0)
+596 ;;=^358.31IA^4^2
+597 ;;^UTILITY(U,$J,358.3,13234,1,3,0)
+598 ;;=3^Mech Compl of Implanted Electronic Neurostim of Brain,Init Encntr
+599 ;;^UTILITY(U,$J,358.3,13234,1,4,0)
+600 ;;=4^T85.190A
+601 ;;^UTILITY(U,$J,358.3,13234,2)
+602 ;;=^5055514
+603 ;;^UTILITY(U,$J,358.3,13235,0)
+604 ;;=T85.191A^^53^582^154
+605 ;;^UTILITY(U,$J,358.3,13235,1,0)
+606 ;;=^358.31IA^4^2
+607 ;;^UTILITY(U,$J,358.3,13235,1,3,0)
+608 ;;=3^Mech Compl of Implanted Electronic Neurostim of Periph Nrv,Init Encntr
+609 ;;^UTILITY(U,$J,358.3,13235,1,4,0)
+610 ;;=4^T85.191A
+611 ;;^UTILITY(U,$J,358.3,13235,2)
+612 ;;=^5055517
+613 ;;^UTILITY(U,$J,358.3,13236,0)
+614 ;;=T85.192A^^53^582^155
+615 ;;^UTILITY(U,$J,358.3,13236,1,0)
+616 ;;=^358.31IA^4^2
+617 ;;^UTILITY(U,$J,358.3,13236,1,3,0)
+618 ;;=3^Mech Compl of Implanted Electronic Neurostim of Spinal Cord,Init Encntr
+619 ;;^UTILITY(U,$J,358.3,13236,1,4,0)
+620 ;;=4^T85.192A
+621 ;;^UTILITY(U,$J,358.3,13236,2)
+622 ;;=^5055520
+623 ;;^UTILITY(U,$J,358.3,13237,0)
+624 ;;=T85.199A^^53^582^156
+625 ;;^UTILITY(U,$J,358.3,13237,1,0)
+626 ;;=^358.31IA^4^2
+627 ;;^UTILITY(U,$J,358.3,13237,1,3,0)
+628 ;;=3^Mech Compl of Implanted Electronic Stim of Nervous Sys,Init Encntr
+629 ;;^UTILITY(U,$J,358.3,13237,1,4,0)
+630 ;;=4^T85.199A
+631 ;;^UTILITY(U,$J,358.3,13237,2)
+632 ;;=^5055523
+633 ;;^UTILITY(U,$J,358.3,13238,0)
+634 ;;=T83.498A^^53^582^159
+635 ;;^UTILITY(U,$J,358.3,13238,1,0)
+636 ;;=^358.31IA^4^2
+637 ;;^UTILITY(U,$J,358.3,13238,1,3,0)
+638 ;;=3^Mech Compl of Prosthetic Device/Implant/Graft of Genital Tract,Init Encntr
