IBDEI05H ; ; 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,13238,1,4,0)
;;=4^T83.498A
;;^UTILITY(U,$J,358.3,13238,2)
;;=^5055055
;;^UTILITY(U,$J,358.3,13239,0)
;;=T85.398A^^53^582^160
;;^UTILITY(U,$J,358.3,13239,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13239,1,3,0)
;;=3^Mech Compl of Prosthetic Device/Implant/Graft of Ocular,Init Encntr
;;^UTILITY(U,$J,358.3,13239,1,4,0)
;;=4^T85.398A
;;^UTILITY(U,$J,358.3,13239,2)
;;=^5055559
;;^UTILITY(U,$J,358.3,13240,0)
;;=T85.590A^^53^582^161
;;^UTILITY(U,$J,358.3,13240,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13240,1,3,0)
;;=3^Mech Compl of Prosthetic Device/Implant/Graft of Bile Duct,Init Encntr
;;^UTILITY(U,$J,358.3,13240,1,4,0)
;;=4^T85.590A
;;^UTILITY(U,$J,358.3,13240,2)
;;=^5055595
;;^UTILITY(U,$J,358.3,13241,0)
;;=T85.692A^^53^582^158
;;^UTILITY(U,$J,358.3,13241,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13241,1,3,0)
;;=3^Mech Compl of Permanent Sutures,Init Encntr
;;^UTILITY(U,$J,358.3,13241,1,4,0)
;;=4^T85.692A
;;^UTILITY(U,$J,358.3,13241,2)
;;=^5055658
;;^UTILITY(U,$J,358.3,13242,0)
;;=T85.698A^^53^582^157
;;^UTILITY(U,$J,358.3,13242,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13242,1,3,0)
;;=3^Mech Compl of Internal Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13242,1,4,0)
;;=4^T85.698A
;;^UTILITY(U,$J,358.3,13242,2)
;;=^5055667
;;^UTILITY(U,$J,358.3,13243,0)
;;=T82.6XXA^^53^582^75
;;^UTILITY(U,$J,358.3,13243,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13243,1,3,0)
;;=3^Infect/Inflm Reaction d/t Cardiac Valve Prosthesis,Init Encntr
;;^UTILITY(U,$J,358.3,13243,1,4,0)
;;=4^T82.6XXA
;;^UTILITY(U,$J,358.3,13243,2)
;;=^5054908
;;^UTILITY(U,$J,358.3,13244,0)
;;=T82.7XXA^^53^582^76
;;^UTILITY(U,$J,358.3,13244,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13244,1,3,0)
;;=3^Infect/Inflm Reaction d/t Cardiac/Vasc Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13244,1,4,0)
;;=4^T82.7XXA
;;^UTILITY(U,$J,358.3,13244,2)
;;=^5054911
;;^UTILITY(U,$J,358.3,13245,0)
;;=T85.79XA^^53^582^96
;;^UTILITY(U,$J,358.3,13245,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13245,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13245,1,4,0)
;;=4^T85.79XA
;;^UTILITY(U,$J,358.3,13245,2)
;;=^5055676
;;^UTILITY(U,$J,358.3,13246,0)
;;=T84.50XA^^53^582^79
;;^UTILITY(U,$J,358.3,13246,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13246,1,3,0)
;;=3^Infect/Inflm Reaction d/t Int Joint Prosthesis,Init Encntr
;;^UTILITY(U,$J,358.3,13246,1,4,0)
;;=4^T84.50XA
;;^UTILITY(U,$J,358.3,13246,2)
;;=^5055382
;;^UTILITY(U,$J,358.3,13247,0)
;;=T84.51XA^^53^582^97
;;^UTILITY(U,$J,358.3,13247,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13247,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Right Hip Prosthesis,Init Encntr
;;^UTILITY(U,$J,358.3,13247,1,4,0)
;;=4^T84.51XA
;;^UTILITY(U,$J,358.3,13247,2)
;;=^5055385
;;^UTILITY(U,$J,358.3,13248,0)
;;=T84.52XA^^53^582^99
;;^UTILITY(U,$J,358.3,13248,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13248,1,3,0)
;;=3^Infect/Inflm Reaction d/t Left Hip Prosthesis,Init Encntr
;;^UTILITY(U,$J,358.3,13248,1,4,0)
;;=4^T84.52XA
;;^UTILITY(U,$J,358.3,13248,2)
;;=^5055388
;;^UTILITY(U,$J,358.3,13249,0)
;;=T84.53XA^^53^582^98
;;^UTILITY(U,$J,358.3,13249,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13249,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Right Knee Prosthesis,Init Encntr
;;^UTILITY(U,$J,358.3,13249,1,4,0)
;;=4^T84.53XA
;;^UTILITY(U,$J,358.3,13249,2)
;;=^5055391
;;^UTILITY(U,$J,358.3,13250,0)
;;=T84.54XA^^53^582^94
;;^UTILITY(U,$J,358.3,13250,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13250,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Left Knee Prosthesis,Init Encntr
;;^UTILITY(U,$J,358.3,13250,1,4,0)
;;=4^T84.54XA
;;^UTILITY(U,$J,358.3,13250,2)
;;=^5055394
;;^UTILITY(U,$J,358.3,13251,0)
;;=T84.60XA^^53^582^93
;;^UTILITY(U,$J,358.3,13251,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13251,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fixation Device,Unspec Site,Init Encntr
;;^UTILITY(U,$J,358.3,13251,1,4,0)
;;=4^T84.60XA
;;^UTILITY(U,$J,358.3,13251,2)
;;=^5055400
;;^UTILITY(U,$J,358.3,13252,0)
;;=T84.610A^^53^582^80
;;^UTILITY(U,$J,358.3,13252,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13252,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Right Humerus,Init Encntr
;;^UTILITY(U,$J,358.3,13252,1,4,0)
;;=4^T84.610A
;;^UTILITY(U,$J,358.3,13252,2)
;;=^5055403
;;^UTILITY(U,$J,358.3,13253,0)
;;=T84.611A^^53^582^81
;;^UTILITY(U,$J,358.3,13253,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13253,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Left Humerus,Init Encntr
;;^UTILITY(U,$J,358.3,13253,1,4,0)
;;=4^T84.611A
;;^UTILITY(U,$J,358.3,13253,2)
;;=^5055406
;;^UTILITY(U,$J,358.3,13254,0)
;;=T84.612A^^53^582^82
;;^UTILITY(U,$J,358.3,13254,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13254,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Right Radius,Init Encntr
;;^UTILITY(U,$J,358.3,13254,1,4,0)
;;=4^T84.612A
;;^UTILITY(U,$J,358.3,13254,2)
;;=^5055409
;;^UTILITY(U,$J,358.3,13255,0)
;;=T84.613A^^53^582^83
;;^UTILITY(U,$J,358.3,13255,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13255,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Left Radius,Init Encntr
;;^UTILITY(U,$J,358.3,13255,1,4,0)
;;=4^T84.613A
;;^UTILITY(U,$J,358.3,13255,2)
;;=^5055412
;;^UTILITY(U,$J,358.3,13256,0)
;;=T84.614A^^53^582^84
;;^UTILITY(U,$J,358.3,13256,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13256,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Right Ulna,Init Encntr
;;^UTILITY(U,$J,358.3,13256,1,4,0)
;;=4^T84.614A
;;^UTILITY(U,$J,358.3,13256,2)
;;=^5055415
;;^UTILITY(U,$J,358.3,13257,0)
;;=T84.615A^^53^582^85
;;^UTILITY(U,$J,358.3,13257,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13257,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Left Ulna,Init Encntr
;;^UTILITY(U,$J,358.3,13257,1,4,0)
;;=4^T84.615A
;;^UTILITY(U,$J,358.3,13257,2)
;;=^5055418
;;^UTILITY(U,$J,358.3,13258,0)
;;=T84.620A^^53^582^86
;;^UTILITY(U,$J,358.3,13258,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13258,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Right Femur,Init Encntr
;;^UTILITY(U,$J,358.3,13258,1,4,0)
;;=4^T84.620A
;;^UTILITY(U,$J,358.3,13258,2)
;;=^5055424
;;^UTILITY(U,$J,358.3,13259,0)
;;=T84.621A^^53^582^87
;;^UTILITY(U,$J,358.3,13259,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13259,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Left Femur,Init Encntr
;;^UTILITY(U,$J,358.3,13259,1,4,0)
;;=4^T84.621A
;;^UTILITY(U,$J,358.3,13259,2)
;;=^5055427
;;^UTILITY(U,$J,358.3,13260,0)
;;=T84.622A^^53^582^88
;;^UTILITY(U,$J,358.3,13260,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13260,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Right Tibia,Init Encntr
;;^UTILITY(U,$J,358.3,13260,1,4,0)
;;=4^T84.622A
;;^UTILITY(U,$J,358.3,13260,2)
;;=^5055430
;;^UTILITY(U,$J,358.3,13261,0)
;;=T84.623A^^53^582^89
;;^UTILITY(U,$J,358.3,13261,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13261,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Left Tibia,Init Encntr
;;^UTILITY(U,$J,358.3,13261,1,4,0)
;;=4^T84.623A
;;^UTILITY(U,$J,358.3,13261,2)
;;=^5055433
;;^UTILITY(U,$J,358.3,13262,0)
;;=T84.624A^^53^582^90
;;^UTILITY(U,$J,358.3,13262,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13262,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Right Fibula,Init Encntr
;;^UTILITY(U,$J,358.3,13262,1,4,0)
;;=4^T84.624A
;;^UTILITY(U,$J,358.3,13262,2)
;;=^5055436
;;^UTILITY(U,$J,358.3,13263,0)
;;=T84.625A^^53^582^91
;;^UTILITY(U,$J,358.3,13263,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13263,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Left Fibula,Init Encntr
;;^UTILITY(U,$J,358.3,13263,1,4,0)
;;=4^T84.625A
;;^UTILITY(U,$J,358.3,13263,2)
;;=^5055439
;;^UTILITY(U,$J,358.3,13264,0)
;;=T84.63XA^^53^582^92
;;^UTILITY(U,$J,358.3,13264,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13264,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Fix Spine,Init Encntr
;;^UTILITY(U,$J,358.3,13264,1,4,0)
;;=4^T84.63XA
;;^UTILITY(U,$J,358.3,13264,2)
;;=^5055445
;;^UTILITY(U,$J,358.3,13265,0)
;;=T84.7XXA^^53^582^95
;;^UTILITY(U,$J,358.3,13265,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13265,1,3,0)
;;=3^Infect/Inflm Reaction d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13265,1,4,0)
;;=4^T84.7XXA
;;^UTILITY(U,$J,358.3,13265,2)
;;=^5055451
;;^UTILITY(U,$J,358.3,13266,0)
;;=T82.817A^^53^582^51
;;^UTILITY(U,$J,358.3,13266,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13266,1,3,0)
;;=3^Embol of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13266,1,4,0)
;;=4^T82.817A
;;^UTILITY(U,$J,358.3,13266,2)
;;=^5054914
;;^UTILITY(U,$J,358.3,13267,0)
;;=T82.827A^^53^582^57
;;^UTILITY(U,$J,358.3,13267,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13267,1,3,0)
;;=3^Fibrosis of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13267,1,4,0)
;;=4^T82.827A
;;^UTILITY(U,$J,358.3,13267,2)
;;=^5054920
;;^UTILITY(U,$J,358.3,13268,0)
;;=T82.837A^^53^582^63
;;^UTILITY(U,$J,358.3,13268,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13268,1,3,0)
;;=3^Hemorrh of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13268,1,4,0)
;;=4^T82.837A
;;^UTILITY(U,$J,358.3,13268,2)
;;=^5054926
;;^UTILITY(U,$J,358.3,13269,0)
;;=T82.847A^^53^582^170
;;^UTILITY(U,$J,358.3,13269,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13269,1,3,0)
;;=3^Pain from Cardiac Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13269,1,4,0)
;;=4^T82.847A
;;^UTILITY(U,$J,358.3,13269,2)
;;=^5054932
;;^UTILITY(U,$J,358.3,13270,0)
;;=T82.857A^^53^582^223
;;^UTILITY(U,$J,358.3,13270,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13270,1,3,0)
;;=3^Sten,Cardiac Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13270,1,4,0)
;;=4^T82.857A
;;^UTILITY(U,$J,358.3,13270,2)
;;=^5054938
;;^UTILITY(U,$J,358.3,13271,0)
;;=T82.867A^^53^582^229
;;^UTILITY(U,$J,358.3,13271,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13271,1,3,0)
;;=3^Thromb,Cardiac Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13271,1,4,0)
;;=4^T82.867A
;;^UTILITY(U,$J,358.3,13271,2)
;;=^5054944
;;^UTILITY(U,$J,358.3,13272,0)
;;=T82.9XXA^^53^582^22
;;^UTILITY(U,$J,358.3,13272,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13272,1,3,0)
;;=3^Complic,Card/Vasc Prosth Dvc/Implnt/Grft Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13272,1,4,0)
;;=4^T82.9XXA
;;^UTILITY(U,$J,358.3,13272,2)
;;=^5054956
;;^UTILITY(U,$J,358.3,13273,0)
;;=T82.818A^^53^582^53
;;^UTILITY(U,$J,358.3,13273,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13273,1,3,0)
;;=3^Embol of Vascular Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13273,1,4,0)
;;=4^T82.818A
;;^UTILITY(U,$J,358.3,13273,2)
;;=^5054917
;;^UTILITY(U,$J,358.3,13274,0)
;;=T82.828A^^53^582^59
;;^UTILITY(U,$J,358.3,13274,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13274,1,3,0)
;;=3^Fibrosis of Vascular Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13274,1,4,0)
;;=4^T82.828A
;;^UTILITY(U,$J,358.3,13274,2)
;;=^5054923
;;^UTILITY(U,$J,358.3,13275,0)
;;=T82.838A^^53^582^65
;;^UTILITY(U,$J,358.3,13275,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13275,1,3,0)
;;=3^Hemorrh of Vascular Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13275,1,4,0)
;;=4^T82.838A
;;^UTILITY(U,$J,358.3,13275,2)
;;=^5054929
;;^UTILITY(U,$J,358.3,13276,0)
;;=T82.848A^^53^582^172
;;^UTILITY(U,$J,358.3,13276,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13276,1,3,0)
;;=3^Pain from Vascular Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13276,1,4,0)
;;=4^T82.848A
;;^UTILITY(U,$J,358.3,13276,2)
;;=^5054935
;;^UTILITY(U,$J,358.3,13277,0)
;;=T82.858A^^53^582^225
;;^UTILITY(U,$J,358.3,13277,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13277,1,3,0)
;;=3^Sten,Vasc Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13277,1,4,0)
;;=4^T82.858A
;;^UTILITY(U,$J,358.3,13277,2)
;;=^5054941
;;^UTILITY(U,$J,358.3,13278,0)
;;=T82.868A^^53^582^231
;;^UTILITY(U,$J,358.3,13278,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13278,1,3,0)
;;=3^Thromb,Vascular Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13278,1,4,0)
;;=4^T82.868A
;;^UTILITY(U,$J,358.3,13278,2)
;;=^5054947
;;^UTILITY(U,$J,358.3,13279,0)
;;=T82.898A^^53^582^28
;;^UTILITY(U,$J,358.3,13279,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13279,1,3,0)
;;=3^Complic,Vasc Prosth Dvc/Implt/Grft Unspec,Init Encntr
;;^UTILITY(U,$J,358.3,13279,1,4,0)
;;=4^T82.898A
;;^UTILITY(U,$J,358.3,13279,2)
;;=^5054953
;;^UTILITY(U,$J,358.3,13280,0)
;;=T83.81XA^^53^582^52
;;^UTILITY(U,$J,358.3,13280,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13280,1,3,0)
;;=3^Embol of Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13280,1,4,0)
;;=4^T83.81XA
;;^UTILITY(U,$J,358.3,13280,2)
;;=^5055079
;;^UTILITY(U,$J,358.3,13281,0)
;;=T83.82XA^^53^582^58
;;^UTILITY(U,$J,358.3,13281,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13281,1,3,0)
;;=3^Fibrosis of Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13281,1,4,0)
;;=4^T83.82XA
;;^UTILITY(U,$J,358.3,13281,2)
;;=^5055082
;;^UTILITY(U,$J,358.3,13282,0)
;;=T83.83XA^^53^582^64
;;^UTILITY(U,$J,358.3,13282,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13282,1,3,0)
;;=3^Hemorrh of Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13282,1,4,0)
;;=4^T83.83XA
;;^UTILITY(U,$J,358.3,13282,2)
;;=^5055085
;;^UTILITY(U,$J,358.3,13283,0)
;;=T83.84XA^^53^582^171
;;^UTILITY(U,$J,358.3,13283,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13283,1,3,0)
;;=3^Pain from Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13283,1,4,0)
;;=4^T83.84XA
;;^UTILITY(U,$J,358.3,13283,2)
;;=^5055088
;;^UTILITY(U,$J,358.3,13284,0)
;;=T83.85XA^^53^582^224
;;^UTILITY(U,$J,358.3,13284,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13284,1,3,0)
;;=3^Sten,Genitour Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13284,1,4,0)
;;=4^T83.85XA
;;^UTILITY(U,$J,358.3,13284,2)
;;=^5055091
;;^UTILITY(U,$J,358.3,13285,0)
;;=T83.86XA^^53^582^230
;;^UTILITY(U,$J,358.3,13285,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13285,1,3,0)
;;=3^Thromb,Genitour Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13285,1,4,0)
;;=4^T83.86XA
;;^UTILITY(U,$J,358.3,13285,2)
;;=^5055094
;;^UTILITY(U,$J,358.3,13286,0)
;;=T83.9XXA^^53^582^23
;;^UTILITY(U,$J,358.3,13286,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13286,1,3,0)
;;=3^Complic,Genitour Prosth Dvc/Implt/Grft,Init Encntr
;;^UTILITY(U,$J,358.3,13286,1,4,0)
;;=4^T83.9XXA
;;^UTILITY(U,$J,358.3,13286,2)
;;=^5055100
;;^UTILITY(U,$J,358.3,13287,0)
;;=T84.81XA^^53^582^47
;;^UTILITY(U,$J,358.3,13287,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13287,1,3,0)
;;=3^Embol d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13287,1,4,0)
;;=4^T84.81XA
;;^UTILITY(U,$J,358.3,13287,2)
;;=^5055454
;;^UTILITY(U,$J,358.3,13288,0)
;;=T84.82XA^^53^582^54
;;^UTILITY(U,$J,358.3,13288,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13288,1,3,0)
;;=3^Fibrosis d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13288,1,4,0)
;;=4^T84.82XA
;;^UTILITY(U,$J,358.3,13288,2)
;;=^5055457
;;^UTILITY(U,$J,358.3,13289,0)
;;=T84.83XA^^53^582^60
;;^UTILITY(U,$J,358.3,13289,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13289,1,3,0)
;;=3^Hemorrh d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13289,1,4,0)
;;=4^T84.83XA
;;^UTILITY(U,$J,358.3,13289,2)
;;=^5055460
;;^UTILITY(U,$J,358.3,13290,0)
;;=T84.84XA^^53^582^167
;;^UTILITY(U,$J,358.3,13290,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13290,1,3,0)
;;=3^Pain d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
;;^UTILITY(U,$J,358.3,13290,1,4,0)
;;=4^T84.84XA
;;^UTILITY(U,$J,358.3,13290,2)
;;=^5055463
;;^UTILITY(U,$J,358.3,13291,0)
;;=T84.85XA^^53^582^220
;;^UTILITY(U,$J,358.3,13291,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13291,1,3,0)
;;=3^Sten d/t Int Ortho Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13291,1,4,0)
;;=4^T84.85XA
;;^UTILITY(U,$J,358.3,13291,2)
;;=^5055466
;;^UTILITY(U,$J,358.3,13292,0)
;;=T84.86XA^^53^582^226
;;^UTILITY(U,$J,358.3,13292,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13292,1,3,0)
;;=3^Thromb d/t Int Ortho Prosth Dvc/Implnt/Grft,Init Enc
;;^UTILITY(U,$J,358.3,13292,1,4,0)
;;=4^T84.86XA
;;^UTILITY(U,$J,358.3,13292,2)
;;=^5055469
;;^UTILITY(U,$J,358.3,13293,0)
;;=T84.9XXA^^53^582^20
;;^UTILITY(U,$J,358.3,13293,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13293,1,3,0)
;;=3^Complic d/t Intrn Ortho Prosth Dvc/Implnt/Grft,Init Encntr
;;^UTILITY(U,$J,358.3,13293,1,4,0)
;;=4^T84.9XXA
;;^UTILITY(U,$J,358.3,13293,2)
;;=^5055475
;;^UTILITY(U,$J,358.3,13294,0)
;;=I97.110^^53^582^179
;;^UTILITY(U,$J,358.3,13294,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13294,1,3,0)
;;=3^Postproc Cardiac Insuff After Cardiac Surg
;;^UTILITY(U,$J,358.3,13294,1,4,0)
;;=4^I97.110
;;^UTILITY(U,$J,358.3,13294,2)
;;=^5008083
;;^UTILITY(U,$J,358.3,13295,0)
;;=I97.111^^53^582^180
;;^UTILITY(U,$J,358.3,13295,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13295,1,3,0)
;;=3^Postproc Cardiac Insuff After Oth Surg
;;^UTILITY(U,$J,358.3,13295,1,4,0)
;;=4^I97.111
;;^UTILITY(U,$J,358.3,13295,2)
;;=^5008084
;;^UTILITY(U,$J,358.3,13296,0)
;;=I97.120^^53^582^175
;;^UTILITY(U,$J,358.3,13296,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13296,1,3,0)
;;=3^Postproc Cardiac Arrest After Cardiac Surg
;;^UTILITY(U,$J,358.3,13296,1,4,0)
;;=4^I97.120
;;^UTILITY(U,$J,358.3,13296,2)
;;=^5008085
;;^UTILITY(U,$J,358.3,13297,0)
;;=I97.121^^53^582^176
;;^UTILITY(U,$J,358.3,13297,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13297,1,3,0)
;;=3^Postproc Cardiac Arrest After Oth Surg
;;^UTILITY(U,$J,358.3,13297,1,4,0)
;;=4^I97.121
;;^UTILITY(U,$J,358.3,13297,2)
;;=^5008086
;;^UTILITY(U,$J,358.3,13298,0)
;;=I97.130^^53^582^213
;;^UTILITY(U,$J,358.3,13298,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13298,1,3,0)
;;=3^Postproc Hrt Failure After Cardiac Surg
;;^UTILITY(U,$J,358.3,13298,1,4,0)
;;=4^I97.130
;;^UTILITY(U,$J,358.3,13298,2)
;;=^5008087
;;^UTILITY(U,$J,358.3,13299,0)
;;=I97.131^^53^582^214
;;^UTILITY(U,$J,358.3,13299,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,13299,1,3,0)
;;=3^Postproc Hrt Failure After Oth Surg
;;^UTILITY(U,$J,358.3,13299,1,4,0)
;;=4^I97.131
;;^UTILITY(U,$J,358.3,13299,2)
;;=^5008088
;;^UTILITY(U,$J,358.3,13300,0)
;;=I97.190^^53^582^177
;;^UTILITY(U,$J,358.3,13300,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI05H 19755 printed Sep 23, 2025@19:18 Page 2
IBDEI05H ; ; 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,13238,1,4,0)
+2 ;;=4^T83.498A
+3 ;;^UTILITY(U,$J,358.3,13238,2)
+4 ;;=^5055055
+5 ;;^UTILITY(U,$J,358.3,13239,0)
+6 ;;=T85.398A^^53^582^160
+7 ;;^UTILITY(U,$J,358.3,13239,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,13239,1,3,0)
+10 ;;=3^Mech Compl of Prosthetic Device/Implant/Graft of Ocular,Init Encntr
+11 ;;^UTILITY(U,$J,358.3,13239,1,4,0)
+12 ;;=4^T85.398A
+13 ;;^UTILITY(U,$J,358.3,13239,2)
+14 ;;=^5055559
+15 ;;^UTILITY(U,$J,358.3,13240,0)
+16 ;;=T85.590A^^53^582^161
+17 ;;^UTILITY(U,$J,358.3,13240,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,13240,1,3,0)
+20 ;;=3^Mech Compl of Prosthetic Device/Implant/Graft of Bile Duct,Init Encntr
+21 ;;^UTILITY(U,$J,358.3,13240,1,4,0)
+22 ;;=4^T85.590A
+23 ;;^UTILITY(U,$J,358.3,13240,2)
+24 ;;=^5055595
+25 ;;^UTILITY(U,$J,358.3,13241,0)
+26 ;;=T85.692A^^53^582^158
+27 ;;^UTILITY(U,$J,358.3,13241,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,13241,1,3,0)
+30 ;;=3^Mech Compl of Permanent Sutures,Init Encntr
+31 ;;^UTILITY(U,$J,358.3,13241,1,4,0)
+32 ;;=4^T85.692A
+33 ;;^UTILITY(U,$J,358.3,13241,2)
+34 ;;=^5055658
+35 ;;^UTILITY(U,$J,358.3,13242,0)
+36 ;;=T85.698A^^53^582^157
+37 ;;^UTILITY(U,$J,358.3,13242,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,13242,1,3,0)
+40 ;;=3^Mech Compl of Internal Prosthetic Device/Implant/Graft,Init Encntr
+41 ;;^UTILITY(U,$J,358.3,13242,1,4,0)
+42 ;;=4^T85.698A
+43 ;;^UTILITY(U,$J,358.3,13242,2)
+44 ;;=^5055667
+45 ;;^UTILITY(U,$J,358.3,13243,0)
+46 ;;=T82.6XXA^^53^582^75
+47 ;;^UTILITY(U,$J,358.3,13243,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,13243,1,3,0)
+50 ;;=3^Infect/Inflm Reaction d/t Cardiac Valve Prosthesis,Init Encntr
+51 ;;^UTILITY(U,$J,358.3,13243,1,4,0)
+52 ;;=4^T82.6XXA
+53 ;;^UTILITY(U,$J,358.3,13243,2)
+54 ;;=^5054908
+55 ;;^UTILITY(U,$J,358.3,13244,0)
+56 ;;=T82.7XXA^^53^582^76
+57 ;;^UTILITY(U,$J,358.3,13244,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,13244,1,3,0)
+60 ;;=3^Infect/Inflm Reaction d/t Cardiac/Vasc Device/Implant/Graft,Init Encntr
+61 ;;^UTILITY(U,$J,358.3,13244,1,4,0)
+62 ;;=4^T82.7XXA
+63 ;;^UTILITY(U,$J,358.3,13244,2)
+64 ;;=^5054911
+65 ;;^UTILITY(U,$J,358.3,13245,0)
+66 ;;=T85.79XA^^53^582^96
+67 ;;^UTILITY(U,$J,358.3,13245,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,13245,1,3,0)
+70 ;;=3^Infect/Inflm Reaction d/t Internal Prosthetic Device/Implant/Graft,Init Encntr
+71 ;;^UTILITY(U,$J,358.3,13245,1,4,0)
+72 ;;=4^T85.79XA
+73 ;;^UTILITY(U,$J,358.3,13245,2)
+74 ;;=^5055676
+75 ;;^UTILITY(U,$J,358.3,13246,0)
+76 ;;=T84.50XA^^53^582^79
+77 ;;^UTILITY(U,$J,358.3,13246,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,13246,1,3,0)
+80 ;;=3^Infect/Inflm Reaction d/t Int Joint Prosthesis,Init Encntr
+81 ;;^UTILITY(U,$J,358.3,13246,1,4,0)
+82 ;;=4^T84.50XA
+83 ;;^UTILITY(U,$J,358.3,13246,2)
+84 ;;=^5055382
+85 ;;^UTILITY(U,$J,358.3,13247,0)
+86 ;;=T84.51XA^^53^582^97
+87 ;;^UTILITY(U,$J,358.3,13247,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,13247,1,3,0)
+90 ;;=3^Infect/Inflm Reaction d/t Internal Right Hip Prosthesis,Init Encntr
+91 ;;^UTILITY(U,$J,358.3,13247,1,4,0)
+92 ;;=4^T84.51XA
+93 ;;^UTILITY(U,$J,358.3,13247,2)
+94 ;;=^5055385
+95 ;;^UTILITY(U,$J,358.3,13248,0)
+96 ;;=T84.52XA^^53^582^99
+97 ;;^UTILITY(U,$J,358.3,13248,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,13248,1,3,0)
+100 ;;=3^Infect/Inflm Reaction d/t Left Hip Prosthesis,Init Encntr
+101 ;;^UTILITY(U,$J,358.3,13248,1,4,0)
+102 ;;=4^T84.52XA
+103 ;;^UTILITY(U,$J,358.3,13248,2)
+104 ;;=^5055388
+105 ;;^UTILITY(U,$J,358.3,13249,0)
+106 ;;=T84.53XA^^53^582^98
+107 ;;^UTILITY(U,$J,358.3,13249,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,13249,1,3,0)
+110 ;;=3^Infect/Inflm Reaction d/t Internal Right Knee Prosthesis,Init Encntr
+111 ;;^UTILITY(U,$J,358.3,13249,1,4,0)
+112 ;;=4^T84.53XA
+113 ;;^UTILITY(U,$J,358.3,13249,2)
+114 ;;=^5055391
+115 ;;^UTILITY(U,$J,358.3,13250,0)
+116 ;;=T84.54XA^^53^582^94
+117 ;;^UTILITY(U,$J,358.3,13250,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,13250,1,3,0)
+120 ;;=3^Infect/Inflm Reaction d/t Internal Left Knee Prosthesis,Init Encntr
+121 ;;^UTILITY(U,$J,358.3,13250,1,4,0)
+122 ;;=4^T84.54XA
+123 ;;^UTILITY(U,$J,358.3,13250,2)
+124 ;;=^5055394
+125 ;;^UTILITY(U,$J,358.3,13251,0)
+126 ;;=T84.60XA^^53^582^93
+127 ;;^UTILITY(U,$J,358.3,13251,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,13251,1,3,0)
+130 ;;=3^Infect/Inflm Reaction d/t Internal Fixation Device,Unspec Site,Init Encntr
+131 ;;^UTILITY(U,$J,358.3,13251,1,4,0)
+132 ;;=4^T84.60XA
+133 ;;^UTILITY(U,$J,358.3,13251,2)
+134 ;;=^5055400
+135 ;;^UTILITY(U,$J,358.3,13252,0)
+136 ;;=T84.610A^^53^582^80
+137 ;;^UTILITY(U,$J,358.3,13252,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,13252,1,3,0)
+140 ;;=3^Infect/Inflm Reaction d/t Internal Fix Right Humerus,Init Encntr
+141 ;;^UTILITY(U,$J,358.3,13252,1,4,0)
+142 ;;=4^T84.610A
+143 ;;^UTILITY(U,$J,358.3,13252,2)
+144 ;;=^5055403
+145 ;;^UTILITY(U,$J,358.3,13253,0)
+146 ;;=T84.611A^^53^582^81
+147 ;;^UTILITY(U,$J,358.3,13253,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,13253,1,3,0)
+150 ;;=3^Infect/Inflm Reaction d/t Internal Fix Left Humerus,Init Encntr
+151 ;;^UTILITY(U,$J,358.3,13253,1,4,0)
+152 ;;=4^T84.611A
+153 ;;^UTILITY(U,$J,358.3,13253,2)
+154 ;;=^5055406
+155 ;;^UTILITY(U,$J,358.3,13254,0)
+156 ;;=T84.612A^^53^582^82
+157 ;;^UTILITY(U,$J,358.3,13254,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,13254,1,3,0)
+160 ;;=3^Infect/Inflm Reaction d/t Internal Fix Right Radius,Init Encntr
+161 ;;^UTILITY(U,$J,358.3,13254,1,4,0)
+162 ;;=4^T84.612A
+163 ;;^UTILITY(U,$J,358.3,13254,2)
+164 ;;=^5055409
+165 ;;^UTILITY(U,$J,358.3,13255,0)
+166 ;;=T84.613A^^53^582^83
+167 ;;^UTILITY(U,$J,358.3,13255,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,13255,1,3,0)
+170 ;;=3^Infect/Inflm Reaction d/t Internal Fix Left Radius,Init Encntr
+171 ;;^UTILITY(U,$J,358.3,13255,1,4,0)
+172 ;;=4^T84.613A
+173 ;;^UTILITY(U,$J,358.3,13255,2)
+174 ;;=^5055412
+175 ;;^UTILITY(U,$J,358.3,13256,0)
+176 ;;=T84.614A^^53^582^84
+177 ;;^UTILITY(U,$J,358.3,13256,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,13256,1,3,0)
+180 ;;=3^Infect/Inflm Reaction d/t Internal Fix Right Ulna,Init Encntr
+181 ;;^UTILITY(U,$J,358.3,13256,1,4,0)
+182 ;;=4^T84.614A
+183 ;;^UTILITY(U,$J,358.3,13256,2)
+184 ;;=^5055415
+185 ;;^UTILITY(U,$J,358.3,13257,0)
+186 ;;=T84.615A^^53^582^85
+187 ;;^UTILITY(U,$J,358.3,13257,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,13257,1,3,0)
+190 ;;=3^Infect/Inflm Reaction d/t Internal Fix Left Ulna,Init Encntr
+191 ;;^UTILITY(U,$J,358.3,13257,1,4,0)
+192 ;;=4^T84.615A
+193 ;;^UTILITY(U,$J,358.3,13257,2)
+194 ;;=^5055418
+195 ;;^UTILITY(U,$J,358.3,13258,0)
+196 ;;=T84.620A^^53^582^86
+197 ;;^UTILITY(U,$J,358.3,13258,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,13258,1,3,0)
+200 ;;=3^Infect/Inflm Reaction d/t Internal Fix Right Femur,Init Encntr
+201 ;;^UTILITY(U,$J,358.3,13258,1,4,0)
+202 ;;=4^T84.620A
+203 ;;^UTILITY(U,$J,358.3,13258,2)
+204 ;;=^5055424
+205 ;;^UTILITY(U,$J,358.3,13259,0)
+206 ;;=T84.621A^^53^582^87
+207 ;;^UTILITY(U,$J,358.3,13259,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,13259,1,3,0)
+210 ;;=3^Infect/Inflm Reaction d/t Internal Fix Left Femur,Init Encntr
+211 ;;^UTILITY(U,$J,358.3,13259,1,4,0)
+212 ;;=4^T84.621A
+213 ;;^UTILITY(U,$J,358.3,13259,2)
+214 ;;=^5055427
+215 ;;^UTILITY(U,$J,358.3,13260,0)
+216 ;;=T84.622A^^53^582^88
+217 ;;^UTILITY(U,$J,358.3,13260,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,13260,1,3,0)
+220 ;;=3^Infect/Inflm Reaction d/t Internal Fix Right Tibia,Init Encntr
+221 ;;^UTILITY(U,$J,358.3,13260,1,4,0)
+222 ;;=4^T84.622A
+223 ;;^UTILITY(U,$J,358.3,13260,2)
+224 ;;=^5055430
+225 ;;^UTILITY(U,$J,358.3,13261,0)
+226 ;;=T84.623A^^53^582^89
+227 ;;^UTILITY(U,$J,358.3,13261,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,13261,1,3,0)
+230 ;;=3^Infect/Inflm Reaction d/t Internal Fix Left Tibia,Init Encntr
+231 ;;^UTILITY(U,$J,358.3,13261,1,4,0)
+232 ;;=4^T84.623A
+233 ;;^UTILITY(U,$J,358.3,13261,2)
+234 ;;=^5055433
+235 ;;^UTILITY(U,$J,358.3,13262,0)
+236 ;;=T84.624A^^53^582^90
+237 ;;^UTILITY(U,$J,358.3,13262,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,13262,1,3,0)
+240 ;;=3^Infect/Inflm Reaction d/t Internal Fix Right Fibula,Init Encntr
+241 ;;^UTILITY(U,$J,358.3,13262,1,4,0)
+242 ;;=4^T84.624A
+243 ;;^UTILITY(U,$J,358.3,13262,2)
+244 ;;=^5055436
+245 ;;^UTILITY(U,$J,358.3,13263,0)
+246 ;;=T84.625A^^53^582^91
+247 ;;^UTILITY(U,$J,358.3,13263,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,13263,1,3,0)
+250 ;;=3^Infect/Inflm Reaction d/t Internal Fix Left Fibula,Init Encntr
+251 ;;^UTILITY(U,$J,358.3,13263,1,4,0)
+252 ;;=4^T84.625A
+253 ;;^UTILITY(U,$J,358.3,13263,2)
+254 ;;=^5055439
+255 ;;^UTILITY(U,$J,358.3,13264,0)
+256 ;;=T84.63XA^^53^582^92
+257 ;;^UTILITY(U,$J,358.3,13264,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,13264,1,3,0)
+260 ;;=3^Infect/Inflm Reaction d/t Internal Fix Spine,Init Encntr
+261 ;;^UTILITY(U,$J,358.3,13264,1,4,0)
+262 ;;=4^T84.63XA
+263 ;;^UTILITY(U,$J,358.3,13264,2)
+264 ;;=^5055445
+265 ;;^UTILITY(U,$J,358.3,13265,0)
+266 ;;=T84.7XXA^^53^582^95
+267 ;;^UTILITY(U,$J,358.3,13265,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,13265,1,3,0)
+270 ;;=3^Infect/Inflm Reaction d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
+271 ;;^UTILITY(U,$J,358.3,13265,1,4,0)
+272 ;;=4^T84.7XXA
+273 ;;^UTILITY(U,$J,358.3,13265,2)
+274 ;;=^5055451
+275 ;;^UTILITY(U,$J,358.3,13266,0)
+276 ;;=T82.817A^^53^582^51
+277 ;;^UTILITY(U,$J,358.3,13266,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,13266,1,3,0)
+280 ;;=3^Embol of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
+281 ;;^UTILITY(U,$J,358.3,13266,1,4,0)
+282 ;;=4^T82.817A
+283 ;;^UTILITY(U,$J,358.3,13266,2)
+284 ;;=^5054914
+285 ;;^UTILITY(U,$J,358.3,13267,0)
+286 ;;=T82.827A^^53^582^57
+287 ;;^UTILITY(U,$J,358.3,13267,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,13267,1,3,0)
+290 ;;=3^Fibrosis of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
+291 ;;^UTILITY(U,$J,358.3,13267,1,4,0)
+292 ;;=4^T82.827A
+293 ;;^UTILITY(U,$J,358.3,13267,2)
+294 ;;=^5054920
+295 ;;^UTILITY(U,$J,358.3,13268,0)
+296 ;;=T82.837A^^53^582^63
+297 ;;^UTILITY(U,$J,358.3,13268,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,13268,1,3,0)
+300 ;;=3^Hemorrh of Cardiac Prosthetic Device/Implant/Graft,Init Encntr
+301 ;;^UTILITY(U,$J,358.3,13268,1,4,0)
+302 ;;=4^T82.837A
+303 ;;^UTILITY(U,$J,358.3,13268,2)
+304 ;;=^5054926
+305 ;;^UTILITY(U,$J,358.3,13269,0)
+306 ;;=T82.847A^^53^582^170
+307 ;;^UTILITY(U,$J,358.3,13269,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,13269,1,3,0)
+310 ;;=3^Pain from Cardiac Prosthetic Device/Implant/Graft,Init Encntr
+311 ;;^UTILITY(U,$J,358.3,13269,1,4,0)
+312 ;;=4^T82.847A
+313 ;;^UTILITY(U,$J,358.3,13269,2)
+314 ;;=^5054932
+315 ;;^UTILITY(U,$J,358.3,13270,0)
+316 ;;=T82.857A^^53^582^223
+317 ;;^UTILITY(U,$J,358.3,13270,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,13270,1,3,0)
+320 ;;=3^Sten,Cardiac Prosth Dvc/Implnt/Grft,Init Enc
+321 ;;^UTILITY(U,$J,358.3,13270,1,4,0)
+322 ;;=4^T82.857A
+323 ;;^UTILITY(U,$J,358.3,13270,2)
+324 ;;=^5054938
+325 ;;^UTILITY(U,$J,358.3,13271,0)
+326 ;;=T82.867A^^53^582^229
+327 ;;^UTILITY(U,$J,358.3,13271,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,13271,1,3,0)
+330 ;;=3^Thromb,Cardiac Prosth Dvc/Implnt/Grft,Init Enc
+331 ;;^UTILITY(U,$J,358.3,13271,1,4,0)
+332 ;;=4^T82.867A
+333 ;;^UTILITY(U,$J,358.3,13271,2)
+334 ;;=^5054944
+335 ;;^UTILITY(U,$J,358.3,13272,0)
+336 ;;=T82.9XXA^^53^582^22
+337 ;;^UTILITY(U,$J,358.3,13272,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,13272,1,3,0)
+340 ;;=3^Complic,Card/Vasc Prosth Dvc/Implnt/Grft Unspec,Init Encntr
+341 ;;^UTILITY(U,$J,358.3,13272,1,4,0)
+342 ;;=4^T82.9XXA
+343 ;;^UTILITY(U,$J,358.3,13272,2)
+344 ;;=^5054956
+345 ;;^UTILITY(U,$J,358.3,13273,0)
+346 ;;=T82.818A^^53^582^53
+347 ;;^UTILITY(U,$J,358.3,13273,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,13273,1,3,0)
+350 ;;=3^Embol of Vascular Prosthetic Device/Implant/Graft,Init Encntr
+351 ;;^UTILITY(U,$J,358.3,13273,1,4,0)
+352 ;;=4^T82.818A
+353 ;;^UTILITY(U,$J,358.3,13273,2)
+354 ;;=^5054917
+355 ;;^UTILITY(U,$J,358.3,13274,0)
+356 ;;=T82.828A^^53^582^59
+357 ;;^UTILITY(U,$J,358.3,13274,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,13274,1,3,0)
+360 ;;=3^Fibrosis of Vascular Prosthetic Device/Implant/Graft,Init Encntr
+361 ;;^UTILITY(U,$J,358.3,13274,1,4,0)
+362 ;;=4^T82.828A
+363 ;;^UTILITY(U,$J,358.3,13274,2)
+364 ;;=^5054923
+365 ;;^UTILITY(U,$J,358.3,13275,0)
+366 ;;=T82.838A^^53^582^65
+367 ;;^UTILITY(U,$J,358.3,13275,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,13275,1,3,0)
+370 ;;=3^Hemorrh of Vascular Prosthetic Device/Implant/Graft,Init Encntr
+371 ;;^UTILITY(U,$J,358.3,13275,1,4,0)
+372 ;;=4^T82.838A
+373 ;;^UTILITY(U,$J,358.3,13275,2)
+374 ;;=^5054929
+375 ;;^UTILITY(U,$J,358.3,13276,0)
+376 ;;=T82.848A^^53^582^172
+377 ;;^UTILITY(U,$J,358.3,13276,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,13276,1,3,0)
+380 ;;=3^Pain from Vascular Prosthetic Device/Implant/Graft,Init Encntr
+381 ;;^UTILITY(U,$J,358.3,13276,1,4,0)
+382 ;;=4^T82.848A
+383 ;;^UTILITY(U,$J,358.3,13276,2)
+384 ;;=^5054935
+385 ;;^UTILITY(U,$J,358.3,13277,0)
+386 ;;=T82.858A^^53^582^225
+387 ;;^UTILITY(U,$J,358.3,13277,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,13277,1,3,0)
+390 ;;=3^Sten,Vasc Prosth Dvc/Implnt/Grft,Init Enc
+391 ;;^UTILITY(U,$J,358.3,13277,1,4,0)
+392 ;;=4^T82.858A
+393 ;;^UTILITY(U,$J,358.3,13277,2)
+394 ;;=^5054941
+395 ;;^UTILITY(U,$J,358.3,13278,0)
+396 ;;=T82.868A^^53^582^231
+397 ;;^UTILITY(U,$J,358.3,13278,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,13278,1,3,0)
+400 ;;=3^Thromb,Vascular Prosth Dvc/Implnt/Grft,Init Enc
+401 ;;^UTILITY(U,$J,358.3,13278,1,4,0)
+402 ;;=4^T82.868A
+403 ;;^UTILITY(U,$J,358.3,13278,2)
+404 ;;=^5054947
+405 ;;^UTILITY(U,$J,358.3,13279,0)
+406 ;;=T82.898A^^53^582^28
+407 ;;^UTILITY(U,$J,358.3,13279,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,13279,1,3,0)
+410 ;;=3^Complic,Vasc Prosth Dvc/Implt/Grft Unspec,Init Encntr
+411 ;;^UTILITY(U,$J,358.3,13279,1,4,0)
+412 ;;=4^T82.898A
+413 ;;^UTILITY(U,$J,358.3,13279,2)
+414 ;;=^5054953
+415 ;;^UTILITY(U,$J,358.3,13280,0)
+416 ;;=T83.81XA^^53^582^52
+417 ;;^UTILITY(U,$J,358.3,13280,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,13280,1,3,0)
+420 ;;=3^Embol of Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
+421 ;;^UTILITY(U,$J,358.3,13280,1,4,0)
+422 ;;=4^T83.81XA
+423 ;;^UTILITY(U,$J,358.3,13280,2)
+424 ;;=^5055079
+425 ;;^UTILITY(U,$J,358.3,13281,0)
+426 ;;=T83.82XA^^53^582^58
+427 ;;^UTILITY(U,$J,358.3,13281,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,13281,1,3,0)
+430 ;;=3^Fibrosis of Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
+431 ;;^UTILITY(U,$J,358.3,13281,1,4,0)
+432 ;;=4^T83.82XA
+433 ;;^UTILITY(U,$J,358.3,13281,2)
+434 ;;=^5055082
+435 ;;^UTILITY(U,$J,358.3,13282,0)
+436 ;;=T83.83XA^^53^582^64
+437 ;;^UTILITY(U,$J,358.3,13282,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,13282,1,3,0)
+440 ;;=3^Hemorrh of Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
+441 ;;^UTILITY(U,$J,358.3,13282,1,4,0)
+442 ;;=4^T83.83XA
+443 ;;^UTILITY(U,$J,358.3,13282,2)
+444 ;;=^5055085
+445 ;;^UTILITY(U,$J,358.3,13283,0)
+446 ;;=T83.84XA^^53^582^171
+447 ;;^UTILITY(U,$J,358.3,13283,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,13283,1,3,0)
+450 ;;=3^Pain from Genitourinary Prosthetic Device/Implant/Graft,Init Encntr
+451 ;;^UTILITY(U,$J,358.3,13283,1,4,0)
+452 ;;=4^T83.84XA
+453 ;;^UTILITY(U,$J,358.3,13283,2)
+454 ;;=^5055088
+455 ;;^UTILITY(U,$J,358.3,13284,0)
+456 ;;=T83.85XA^^53^582^224
+457 ;;^UTILITY(U,$J,358.3,13284,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,13284,1,3,0)
+460 ;;=3^Sten,Genitour Prosth Dvc/Implnt/Grft,Init Enc
+461 ;;^UTILITY(U,$J,358.3,13284,1,4,0)
+462 ;;=4^T83.85XA
+463 ;;^UTILITY(U,$J,358.3,13284,2)
+464 ;;=^5055091
+465 ;;^UTILITY(U,$J,358.3,13285,0)
+466 ;;=T83.86XA^^53^582^230
+467 ;;^UTILITY(U,$J,358.3,13285,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,13285,1,3,0)
+470 ;;=3^Thromb,Genitour Prosth Dvc/Implnt/Grft,Init Enc
+471 ;;^UTILITY(U,$J,358.3,13285,1,4,0)
+472 ;;=4^T83.86XA
+473 ;;^UTILITY(U,$J,358.3,13285,2)
+474 ;;=^5055094
+475 ;;^UTILITY(U,$J,358.3,13286,0)
+476 ;;=T83.9XXA^^53^582^23
+477 ;;^UTILITY(U,$J,358.3,13286,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,13286,1,3,0)
+480 ;;=3^Complic,Genitour Prosth Dvc/Implt/Grft,Init Encntr
+481 ;;^UTILITY(U,$J,358.3,13286,1,4,0)
+482 ;;=4^T83.9XXA
+483 ;;^UTILITY(U,$J,358.3,13286,2)
+484 ;;=^5055100
+485 ;;^UTILITY(U,$J,358.3,13287,0)
+486 ;;=T84.81XA^^53^582^47
+487 ;;^UTILITY(U,$J,358.3,13287,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,13287,1,3,0)
+490 ;;=3^Embol d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
+491 ;;^UTILITY(U,$J,358.3,13287,1,4,0)
+492 ;;=4^T84.81XA
+493 ;;^UTILITY(U,$J,358.3,13287,2)
+494 ;;=^5055454
+495 ;;^UTILITY(U,$J,358.3,13288,0)
+496 ;;=T84.82XA^^53^582^54
+497 ;;^UTILITY(U,$J,358.3,13288,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,13288,1,3,0)
+500 ;;=3^Fibrosis d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
+501 ;;^UTILITY(U,$J,358.3,13288,1,4,0)
+502 ;;=4^T84.82XA
+503 ;;^UTILITY(U,$J,358.3,13288,2)
+504 ;;=^5055457
+505 ;;^UTILITY(U,$J,358.3,13289,0)
+506 ;;=T84.83XA^^53^582^60
+507 ;;^UTILITY(U,$J,358.3,13289,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,13289,1,3,0)
+510 ;;=3^Hemorrh d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
+511 ;;^UTILITY(U,$J,358.3,13289,1,4,0)
+512 ;;=4^T84.83XA
+513 ;;^UTILITY(U,$J,358.3,13289,2)
+514 ;;=^5055460
+515 ;;^UTILITY(U,$J,358.3,13290,0)
+516 ;;=T84.84XA^^53^582^167
+517 ;;^UTILITY(U,$J,358.3,13290,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,13290,1,3,0)
+520 ;;=3^Pain d/t Internal Ortho Prosthetic Device/Implant/Graft,Init Encntr
+521 ;;^UTILITY(U,$J,358.3,13290,1,4,0)
+522 ;;=4^T84.84XA
+523 ;;^UTILITY(U,$J,358.3,13290,2)
+524 ;;=^5055463
+525 ;;^UTILITY(U,$J,358.3,13291,0)
+526 ;;=T84.85XA^^53^582^220
+527 ;;^UTILITY(U,$J,358.3,13291,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,13291,1,3,0)
+530 ;;=3^Sten d/t Int Ortho Prosth Dvc/Implnt/Grft,Init Enc
+531 ;;^UTILITY(U,$J,358.3,13291,1,4,0)
+532 ;;=4^T84.85XA
+533 ;;^UTILITY(U,$J,358.3,13291,2)
+534 ;;=^5055466
+535 ;;^UTILITY(U,$J,358.3,13292,0)
+536 ;;=T84.86XA^^53^582^226
+537 ;;^UTILITY(U,$J,358.3,13292,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,13292,1,3,0)
+540 ;;=3^Thromb d/t Int Ortho Prosth Dvc/Implnt/Grft,Init Enc
+541 ;;^UTILITY(U,$J,358.3,13292,1,4,0)
+542 ;;=4^T84.86XA
+543 ;;^UTILITY(U,$J,358.3,13292,2)
+544 ;;=^5055469
+545 ;;^UTILITY(U,$J,358.3,13293,0)
+546 ;;=T84.9XXA^^53^582^20
+547 ;;^UTILITY(U,$J,358.3,13293,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,13293,1,3,0)
+550 ;;=3^Complic d/t Intrn Ortho Prosth Dvc/Implnt/Grft,Init Encntr
+551 ;;^UTILITY(U,$J,358.3,13293,1,4,0)
+552 ;;=4^T84.9XXA
+553 ;;^UTILITY(U,$J,358.3,13293,2)
+554 ;;=^5055475
+555 ;;^UTILITY(U,$J,358.3,13294,0)
+556 ;;=I97.110^^53^582^179
+557 ;;^UTILITY(U,$J,358.3,13294,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,13294,1,3,0)
+560 ;;=3^Postproc Cardiac Insuff After Cardiac Surg
+561 ;;^UTILITY(U,$J,358.3,13294,1,4,0)
+562 ;;=4^I97.110
+563 ;;^UTILITY(U,$J,358.3,13294,2)
+564 ;;=^5008083
+565 ;;^UTILITY(U,$J,358.3,13295,0)
+566 ;;=I97.111^^53^582^180
+567 ;;^UTILITY(U,$J,358.3,13295,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,13295,1,3,0)
+570 ;;=3^Postproc Cardiac Insuff After Oth Surg
+571 ;;^UTILITY(U,$J,358.3,13295,1,4,0)
+572 ;;=4^I97.111
+573 ;;^UTILITY(U,$J,358.3,13295,2)
+574 ;;=^5008084
+575 ;;^UTILITY(U,$J,358.3,13296,0)
+576 ;;=I97.120^^53^582^175
+577 ;;^UTILITY(U,$J,358.3,13296,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,13296,1,3,0)
+580 ;;=3^Postproc Cardiac Arrest After Cardiac Surg
+581 ;;^UTILITY(U,$J,358.3,13296,1,4,0)
+582 ;;=4^I97.120
+583 ;;^UTILITY(U,$J,358.3,13296,2)
+584 ;;=^5008085
+585 ;;^UTILITY(U,$J,358.3,13297,0)
+586 ;;=I97.121^^53^582^176
+587 ;;^UTILITY(U,$J,358.3,13297,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,13297,1,3,0)
+590 ;;=3^Postproc Cardiac Arrest After Oth Surg
+591 ;;^UTILITY(U,$J,358.3,13297,1,4,0)
+592 ;;=4^I97.121
+593 ;;^UTILITY(U,$J,358.3,13297,2)
+594 ;;=^5008086
+595 ;;^UTILITY(U,$J,358.3,13298,0)
+596 ;;=I97.130^^53^582^213
+597 ;;^UTILITY(U,$J,358.3,13298,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,13298,1,3,0)
+600 ;;=3^Postproc Hrt Failure After Cardiac Surg
+601 ;;^UTILITY(U,$J,358.3,13298,1,4,0)
+602 ;;=4^I97.130
+603 ;;^UTILITY(U,$J,358.3,13298,2)
+604 ;;=^5008087
+605 ;;^UTILITY(U,$J,358.3,13299,0)
+606 ;;=I97.131^^53^582^214
+607 ;;^UTILITY(U,$J,358.3,13299,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,13299,1,3,0)
+610 ;;=3^Postproc Hrt Failure After Oth Surg
+611 ;;^UTILITY(U,$J,358.3,13299,1,4,0)
+612 ;;=4^I97.131
+613 ;;^UTILITY(U,$J,358.3,13299,2)
+614 ;;=^5008088
+615 ;;^UTILITY(U,$J,358.3,13300,0)
+616 ;;=I97.190^^53^582^177
+617 ;;^UTILITY(U,$J,358.3,13300,1,0)
+618 ;;=^358.31IA^4^2
