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

IBDEI057.m

Go to the documentation of this file.
IBDEI057 ; ; 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,12559,2)
 ;;=^5042786
 ;;^UTILITY(U,$J,358.3,12560,0)
 ;;=S82.871D^^50^549^22
 ;;^UTILITY(U,$J,358.3,12560,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12560,1,3,0)
 ;;=3^Disp Fx,pilon,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12560,1,4,0)
 ;;=4^S82.871D
 ;;^UTILITY(U,$J,358.3,12560,2)
 ;;=^5042770
 ;;^UTILITY(U,$J,358.3,12561,0)
 ;;=S82.462D^^50^549^25
 ;;^UTILITY(U,$J,358.3,12561,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12561,1,3,0)
 ;;=3^Disp Fx,segmental shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12561,1,4,0)
 ;;=4^S82.462D
 ;;^UTILITY(U,$J,358.3,12561,2)
 ;;=^5042117
 ;;^UTILITY(U,$J,358.3,12562,0)
 ;;=S82.461D^^50^549^27
 ;;^UTILITY(U,$J,358.3,12562,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12562,1,3,0)
 ;;=3^Disp Fx,segmental shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12562,1,4,0)
 ;;=4^S82.461D
 ;;^UTILITY(U,$J,358.3,12562,2)
 ;;=^5042101
 ;;^UTILITY(U,$J,358.3,12563,0)
 ;;=S82.262D^^50^549^26
 ;;^UTILITY(U,$J,358.3,12563,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12563,1,3,0)
 ;;=3^Disp Fx,segmental shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12563,1,4,0)
 ;;=4^S82.262D
 ;;^UTILITY(U,$J,358.3,12563,2)
 ;;=^5041542
 ;;^UTILITY(U,$J,358.3,12564,0)
 ;;=S82.261D^^50^549^28
 ;;^UTILITY(U,$J,358.3,12564,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12564,1,3,0)
 ;;=3^Disp Fx,segmental shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12564,1,4,0)
 ;;=4^S82.261D
 ;;^UTILITY(U,$J,358.3,12564,2)
 ;;=^5041526
 ;;^UTILITY(U,$J,358.3,12565,0)
 ;;=S82.442D^^50^549^29
 ;;^UTILITY(U,$J,358.3,12565,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12565,1,3,0)
 ;;=3^Disp Fx,spiral shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12565,1,4,0)
 ;;=4^S82.442D
 ;;^UTILITY(U,$J,358.3,12565,2)
 ;;=^5041925
 ;;^UTILITY(U,$J,358.3,12566,0)
 ;;=S82.441D^^50^549^31
 ;;^UTILITY(U,$J,358.3,12566,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12566,1,3,0)
 ;;=3^Disp Fx,spiral shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12566,1,4,0)
 ;;=4^S82.441D
 ;;^UTILITY(U,$J,358.3,12566,2)
 ;;=^5041909
 ;;^UTILITY(U,$J,358.3,12567,0)
 ;;=S82.242D^^50^549^30
 ;;^UTILITY(U,$J,358.3,12567,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12567,1,3,0)
 ;;=3^Disp Fx,spiral shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12567,1,4,0)
 ;;=4^S82.242D
 ;;^UTILITY(U,$J,358.3,12567,2)
 ;;=^5041350
 ;;^UTILITY(U,$J,358.3,12568,0)
 ;;=S82.241D^^50^549^32
 ;;^UTILITY(U,$J,358.3,12568,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12568,1,3,0)
 ;;=3^Disp Fx,spiral shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12568,1,4,0)
 ;;=4^S82.241D
 ;;^UTILITY(U,$J,358.3,12568,2)
 ;;=^5041334
 ;;^UTILITY(U,$J,358.3,12569,0)
 ;;=S82.422D^^50^549^33
 ;;^UTILITY(U,$J,358.3,12569,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12569,1,3,0)
 ;;=3^Disp Fx,transverse shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12569,1,4,0)
 ;;=4^S82.422D
 ;;^UTILITY(U,$J,358.3,12569,2)
 ;;=^5041733
 ;;^UTILITY(U,$J,358.3,12570,0)
 ;;=S82.421D^^50^549^35
 ;;^UTILITY(U,$J,358.3,12570,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12570,1,3,0)
 ;;=3^Disp Fx,transverse shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12570,1,4,0)
 ;;=4^S82.421D
 ;;^UTILITY(U,$J,358.3,12570,2)
 ;;=^5041717
 ;;^UTILITY(U,$J,358.3,12571,0)
 ;;=S82.222D^^50^549^34
 ;;^UTILITY(U,$J,358.3,12571,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12571,1,3,0)
 ;;=3^Disp Fx,transverse shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12571,1,4,0)
 ;;=4^S82.222D
 ;;^UTILITY(U,$J,358.3,12571,2)
 ;;=^5041158
 ;;^UTILITY(U,$J,358.3,12572,0)
 ;;=S82.221D^^50^549^36
 ;;^UTILITY(U,$J,358.3,12572,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12572,1,3,0)
 ;;=3^Disp Fx,transverse shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12572,1,4,0)
 ;;=4^S82.221D
 ;;^UTILITY(U,$J,358.3,12572,2)
 ;;=^5041142
 ;;^UTILITY(U,$J,358.3,12573,0)
 ;;=S82.865D^^50^549^73
 ;;^UTILITY(U,$J,358.3,12573,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12573,1,3,0)
 ;;=3^Nondisp Maisonneuve's Fx,left leg,Subsq
 ;;^UTILITY(U,$J,358.3,12573,1,4,0)
 ;;=4^S82.865D
 ;;^UTILITY(U,$J,358.3,12573,2)
 ;;=^5042738
 ;;^UTILITY(U,$J,358.3,12574,0)
 ;;=S82.864D^^50^549^74
 ;;^UTILITY(U,$J,358.3,12574,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12574,1,3,0)
 ;;=3^Nondisp Maisonneuve's Fx,right leg,Subsq
 ;;^UTILITY(U,$J,358.3,12574,1,4,0)
 ;;=4^S82.864D
 ;;^UTILITY(U,$J,358.3,12574,2)
 ;;=^5042722
 ;;^UTILITY(U,$J,358.3,12575,0)
 ;;=S82.145D^^50^549^37
 ;;^UTILITY(U,$J,358.3,12575,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12575,1,3,0)
 ;;=3^Nondisp Fx,bicondylar,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12575,1,4,0)
 ;;=4^S82.145D
 ;;^UTILITY(U,$J,358.3,12575,2)
 ;;=^5040938
 ;;^UTILITY(U,$J,358.3,12576,0)
 ;;=S82.144D^^50^549^38
 ;;^UTILITY(U,$J,358.3,12576,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12576,1,3,0)
 ;;=3^Nondisp Fx,bicondylar,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12576,1,4,0)
 ;;=4^S82.144D
 ;;^UTILITY(U,$J,358.3,12576,2)
 ;;=^5040922
 ;;^UTILITY(U,$J,358.3,12577,0)
 ;;=S82.255D^^50^549^40
 ;;^UTILITY(U,$J,358.3,12577,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12577,1,3,0)
 ;;=3^Nondisp Fx,comminuted shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12577,1,4,0)
 ;;=4^S82.255D
 ;;^UTILITY(U,$J,358.3,12577,2)
 ;;=^5041494
 ;;^UTILITY(U,$J,358.3,12578,0)
 ;;=S82.254D^^50^549^42
 ;;^UTILITY(U,$J,358.3,12578,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12578,1,3,0)
 ;;=3^Nondisp Fx,comminuted shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12578,1,4,0)
 ;;=4^S82.254D
 ;;^UTILITY(U,$J,358.3,12578,2)
 ;;=^5041478
 ;;^UTILITY(U,$J,358.3,12579,0)
 ;;=S82.455D^^50^549^39
 ;;^UTILITY(U,$J,358.3,12579,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12579,1,3,0)
 ;;=3^Nondisp Fx,comminuted shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12579,1,4,0)
 ;;=4^S82.455D
 ;;^UTILITY(U,$J,358.3,12579,2)
 ;;=^5042069
 ;;^UTILITY(U,$J,358.3,12580,0)
 ;;=S82.454D^^50^549^41
 ;;^UTILITY(U,$J,358.3,12580,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12580,1,3,0)
 ;;=3^Nondisp Fx,comminuted shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12580,1,4,0)
 ;;=4^S82.454D
 ;;^UTILITY(U,$J,358.3,12580,2)
 ;;=^5042053
 ;;^UTILITY(U,$J,358.3,12581,0)
 ;;=S82.125D^^50^549^43
 ;;^UTILITY(U,$J,358.3,12581,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12581,1,3,0)
 ;;=3^Nondisp Fx,lateral condyle,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12581,1,4,0)
 ;;=4^S82.125D
 ;;^UTILITY(U,$J,358.3,12581,2)
 ;;=^5040746
 ;;^UTILITY(U,$J,358.3,12582,0)
 ;;=S82.124D^^50^549^44
 ;;^UTILITY(U,$J,358.3,12582,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12582,1,3,0)
 ;;=3^Nondisp Fx,lateral condyle,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12582,1,4,0)
 ;;=4^S82.124D
 ;;^UTILITY(U,$J,358.3,12582,2)
 ;;=^5040730
 ;;^UTILITY(U,$J,358.3,12583,0)
 ;;=S82.65XD^^50^549^45
 ;;^UTILITY(U,$J,358.3,12583,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12583,1,3,0)
 ;;=3^Nondisp Fx,lateral malleolus,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12583,1,4,0)
 ;;=4^S82.65XD
 ;;^UTILITY(U,$J,358.3,12583,2)
 ;;=^5042378
 ;;^UTILITY(U,$J,358.3,12584,0)
 ;;=S82.64XD^^50^549^46
 ;;^UTILITY(U,$J,358.3,12584,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12584,1,3,0)
 ;;=3^Nondisp Fx,lateral malleolus,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12584,1,4,0)
 ;;=4^S82.64XD
 ;;^UTILITY(U,$J,358.3,12584,2)
 ;;=^5042362
 ;;^UTILITY(U,$J,358.3,12585,0)
 ;;=S82.115D^^50^549^47
 ;;^UTILITY(U,$J,358.3,12585,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12585,1,3,0)
 ;;=3^Nondisp Fx,left tibial spine,Subsq
 ;;^UTILITY(U,$J,358.3,12585,1,4,0)
 ;;=4^S82.115D
 ;;^UTILITY(U,$J,358.3,12585,2)
 ;;=^5040650
 ;;^UTILITY(U,$J,358.3,12586,0)
 ;;=S82.114D^^50^549^59
 ;;^UTILITY(U,$J,358.3,12586,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12586,1,3,0)
 ;;=3^Nondisp Fx,right tibial spine,Subsq
 ;;^UTILITY(U,$J,358.3,12586,1,4,0)
 ;;=4^S82.114D
 ;;^UTILITY(U,$J,358.3,12586,2)
 ;;=^5040634
 ;;^UTILITY(U,$J,358.3,12587,0)
 ;;=S82.155D^^50^549^48
 ;;^UTILITY(U,$J,358.3,12587,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12587,1,3,0)
 ;;=3^Nondisp Fx,left tibial tuberosity,Subsq
 ;;^UTILITY(U,$J,358.3,12587,1,4,0)
 ;;=4^S82.155D
 ;;^UTILITY(U,$J,358.3,12587,2)
 ;;=^5041034
 ;;^UTILITY(U,$J,358.3,12588,0)
 ;;=S82.154D^^50^549^60
 ;;^UTILITY(U,$J,358.3,12588,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12588,1,3,0)
 ;;=3^Nondisp Fx,right tibial tuberosity,Subsq
 ;;^UTILITY(U,$J,358.3,12588,1,4,0)
 ;;=4^S82.154D
 ;;^UTILITY(U,$J,358.3,12588,2)
 ;;=^5041018
 ;;^UTILITY(U,$J,358.3,12589,0)
 ;;=S82.135D^^50^549^49
 ;;^UTILITY(U,$J,358.3,12589,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12589,1,3,0)
 ;;=3^Nondisp Fx,medial condyle,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12589,1,4,0)
 ;;=4^S82.135D
 ;;^UTILITY(U,$J,358.3,12589,2)
 ;;=^5040842
 ;;^UTILITY(U,$J,358.3,12590,0)
 ;;=S82.134D^^50^549^50
 ;;^UTILITY(U,$J,358.3,12590,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12590,1,3,0)
 ;;=3^Nondisp Fx,medial condyle,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12590,1,4,0)
 ;;=4^S82.134D
 ;;^UTILITY(U,$J,358.3,12590,2)
 ;;=^5040826
 ;;^UTILITY(U,$J,358.3,12591,0)
 ;;=S82.55XD^^50^549^51
 ;;^UTILITY(U,$J,358.3,12591,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12591,1,3,0)
 ;;=3^Nondisp Fx,medial malleolus,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12591,1,4,0)
 ;;=4^S82.55XD
 ;;^UTILITY(U,$J,358.3,12591,2)
 ;;=^5042282
 ;;^UTILITY(U,$J,358.3,12592,0)
 ;;=S82.54XD^^50^549^52
 ;;^UTILITY(U,$J,358.3,12592,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12592,1,3,0)
 ;;=3^Nondisp Fx,medial malleolus,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12592,1,4,0)
 ;;=4^S82.54XD
 ;;^UTILITY(U,$J,358.3,12592,2)
 ;;=^5042266
 ;;^UTILITY(U,$J,358.3,12593,0)
 ;;=S82.435D^^50^549^53
 ;;^UTILITY(U,$J,358.3,12593,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12593,1,3,0)
 ;;=3^Nondisp Fx,oblique shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12593,1,4,0)
 ;;=4^S82.435D
 ;;^UTILITY(U,$J,358.3,12593,2)
 ;;=^5041877
 ;;^UTILITY(U,$J,358.3,12594,0)
 ;;=S82.434D^^50^549^55
 ;;^UTILITY(U,$J,358.3,12594,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12594,1,3,0)
 ;;=3^Nondisp Fx,oblique shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12594,1,4,0)
 ;;=4^S82.434D
 ;;^UTILITY(U,$J,358.3,12594,2)
 ;;=^5041861
 ;;^UTILITY(U,$J,358.3,12595,0)
 ;;=S82.235D^^50^549^54
 ;;^UTILITY(U,$J,358.3,12595,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12595,1,3,0)
 ;;=3^Nondisp Fx,oblique shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12595,1,4,0)
 ;;=4^S82.235D
 ;;^UTILITY(U,$J,358.3,12595,2)
 ;;=^5041302
 ;;^UTILITY(U,$J,358.3,12596,0)
 ;;=S82.234D^^50^549^56
 ;;^UTILITY(U,$J,358.3,12596,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12596,1,3,0)
 ;;=3^Nondisp Fx,oblique shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12596,1,4,0)
 ;;=4^S82.234D
 ;;^UTILITY(U,$J,358.3,12596,2)
 ;;=^5041286
 ;;^UTILITY(U,$J,358.3,12597,0)
 ;;=S82.875D^^50^549^57
 ;;^UTILITY(U,$J,358.3,12597,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12597,1,3,0)
 ;;=3^Nondisp Fx,pilon,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12597,1,4,0)
 ;;=4^S82.875D
 ;;^UTILITY(U,$J,358.3,12597,2)
 ;;=^5042834
 ;;^UTILITY(U,$J,358.3,12598,0)
 ;;=S82.874D^^50^549^58
 ;;^UTILITY(U,$J,358.3,12598,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12598,1,3,0)
 ;;=3^Nondisp Fx,pilon,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12598,1,4,0)
 ;;=4^S82.874D
 ;;^UTILITY(U,$J,358.3,12598,2)
 ;;=^5042818
 ;;^UTILITY(U,$J,358.3,12599,0)
 ;;=S82.465D^^50^549^61
 ;;^UTILITY(U,$J,358.3,12599,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12599,1,3,0)
 ;;=3^Nondisp Fx,segmental shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12599,1,4,0)
 ;;=4^S82.465D
 ;;^UTILITY(U,$J,358.3,12599,2)
 ;;=^5042165
 ;;^UTILITY(U,$J,358.3,12600,0)
 ;;=S82.464D^^50^549^63
 ;;^UTILITY(U,$J,358.3,12600,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12600,1,3,0)
 ;;=3^Nondisp Fx,segmental shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12600,1,4,0)
 ;;=4^S82.464D
 ;;^UTILITY(U,$J,358.3,12600,2)
 ;;=^5042149
 ;;^UTILITY(U,$J,358.3,12601,0)
 ;;=S82.265D^^50^549^62
 ;;^UTILITY(U,$J,358.3,12601,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12601,1,3,0)
 ;;=3^Nondisp Fx,segmental shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12601,1,4,0)
 ;;=4^S82.265D
 ;;^UTILITY(U,$J,358.3,12601,2)
 ;;=^5041590
 ;;^UTILITY(U,$J,358.3,12602,0)
 ;;=S82.264D^^50^549^64
 ;;^UTILITY(U,$J,358.3,12602,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12602,1,3,0)
 ;;=3^Nondisp Fx,segmental shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12602,1,4,0)
 ;;=4^S82.264D
 ;;^UTILITY(U,$J,358.3,12602,2)
 ;;=^5041574
 ;;^UTILITY(U,$J,358.3,12603,0)
 ;;=S82.445D^^50^549^65
 ;;^UTILITY(U,$J,358.3,12603,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12603,1,3,0)
 ;;=3^Nondisp Fx,spiral shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12603,1,4,0)
 ;;=4^S82.445D
 ;;^UTILITY(U,$J,358.3,12603,2)
 ;;=^5041973
 ;;^UTILITY(U,$J,358.3,12604,0)
 ;;=S82.444D^^50^549^67
 ;;^UTILITY(U,$J,358.3,12604,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12604,1,3,0)
 ;;=3^Nondisp Fx,spiral shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12604,1,4,0)
 ;;=4^S82.444D
 ;;^UTILITY(U,$J,358.3,12604,2)
 ;;=^5041957
 ;;^UTILITY(U,$J,358.3,12605,0)
 ;;=S82.245D^^50^549^66
 ;;^UTILITY(U,$J,358.3,12605,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12605,1,3,0)
 ;;=3^Nondisp Fx,spiral shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12605,1,4,0)
 ;;=4^S82.245D
 ;;^UTILITY(U,$J,358.3,12605,2)
 ;;=^5041398
 ;;^UTILITY(U,$J,358.3,12606,0)
 ;;=S82.244D^^50^549^68
 ;;^UTILITY(U,$J,358.3,12606,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12606,1,3,0)
 ;;=3^Nondisp Fx,spiral shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12606,1,4,0)
 ;;=4^S82.244D
 ;;^UTILITY(U,$J,358.3,12606,2)
 ;;=^5041382
 ;;^UTILITY(U,$J,358.3,12607,0)
 ;;=S82.225D^^50^549^70
 ;;^UTILITY(U,$J,358.3,12607,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12607,1,3,0)
 ;;=3^Nondisp Fx,transverse shaft,left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12607,1,4,0)
 ;;=4^S82.225D
 ;;^UTILITY(U,$J,358.3,12607,2)
 ;;=^5041206
 ;;^UTILITY(U,$J,358.3,12608,0)
 ;;=S82.224D^^50^549^72
 ;;^UTILITY(U,$J,358.3,12608,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12608,1,3,0)
 ;;=3^Nondisp Fx,transverse shaft,right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12608,1,4,0)
 ;;=4^S82.224D
 ;;^UTILITY(U,$J,358.3,12608,2)
 ;;=^5041190
 ;;^UTILITY(U,$J,358.3,12609,0)
 ;;=S82.425D^^50^549^69
 ;;^UTILITY(U,$J,358.3,12609,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12609,1,3,0)
 ;;=3^Nondisp Fx,transverse shaft,left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12609,1,4,0)
 ;;=4^S82.425D
 ;;^UTILITY(U,$J,358.3,12609,2)
 ;;=^5041781
 ;;^UTILITY(U,$J,358.3,12610,0)
 ;;=S82.424D^^50^549^71
 ;;^UTILITY(U,$J,358.3,12610,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12610,1,3,0)
 ;;=3^Nondisp Fx,transverse shaft,right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12610,1,4,0)
 ;;=4^S82.424D
 ;;^UTILITY(U,$J,358.3,12610,2)
 ;;=^5041765
 ;;^UTILITY(U,$J,358.3,12611,0)
 ;;=M84.464D^^50^549^75
 ;;^UTILITY(U,$J,358.3,12611,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12611,1,3,0)
 ;;=3^Pathological Fx, left fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12611,1,4,0)
 ;;=4^M84.464D
 ;;^UTILITY(U,$J,358.3,12611,2)
 ;;=^5013951
 ;;^UTILITY(U,$J,358.3,12612,0)
 ;;=M84.463D^^50^549^77
 ;;^UTILITY(U,$J,358.3,12612,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12612,1,3,0)
 ;;=3^Pathological Fx, right fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12612,1,4,0)
 ;;=4^M84.463D
 ;;^UTILITY(U,$J,358.3,12612,2)
 ;;=^5013945
 ;;^UTILITY(U,$J,358.3,12613,0)
 ;;=M84.462D^^50^549^76
 ;;^UTILITY(U,$J,358.3,12613,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12613,1,3,0)
 ;;=3^Pathological Fx, left tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12613,1,4,0)
 ;;=4^M84.462D
 ;;^UTILITY(U,$J,358.3,12613,2)
 ;;=^5013939
 ;;^UTILITY(U,$J,358.3,12614,0)
 ;;=M84.461D^^50^549^78
 ;;^UTILITY(U,$J,358.3,12614,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12614,1,3,0)
 ;;=3^Pathological Fx, right tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12614,1,4,0)
 ;;=4^M84.461D
 ;;^UTILITY(U,$J,358.3,12614,2)
 ;;=^5013933
 ;;^UTILITY(U,$J,358.3,12615,0)
 ;;=S89.112D^^50^549^79
 ;;^UTILITY(U,$J,358.3,12615,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12615,1,3,0)
 ;;=3^Sltr-haris Type I physeal fx lower end,lt tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12615,1,4,0)
 ;;=4^S89.112D
 ;;^UTILITY(U,$J,358.3,12615,2)
 ;;=^5137290
 ;;^UTILITY(U,$J,358.3,12616,0)
 ;;=S89.111D^^50^549^92
 ;;^UTILITY(U,$J,358.3,12616,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12616,1,3,0)
 ;;=3^Srtr-haris Type I physeal fx lower end,rt tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12616,1,4,0)
 ;;=4^S89.111D
 ;;^UTILITY(U,$J,358.3,12616,2)
 ;;=^5043728
 ;;^UTILITY(U,$J,358.3,12617,0)
 ;;=S89.312D^^50^549^80
 ;;^UTILITY(U,$J,358.3,12617,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12617,1,3,0)
 ;;=3^Sltr-haris Type I physeal fx lower end,lt fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12617,1,4,0)
 ;;=4^S89.312D
 ;;^UTILITY(U,$J,358.3,12617,2)
 ;;=^5137368
 ;;^UTILITY(U,$J,358.3,12618,0)
 ;;=S89.311D^^50^549^93
 ;;^UTILITY(U,$J,358.3,12618,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12618,1,3,0)
 ;;=3^Srtr-haris Type I physeal fx lower end,rt fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12618,1,4,0)
 ;;=4^S89.311D
 ;;^UTILITY(U,$J,358.3,12618,2)
 ;;=^5043818
 ;;^UTILITY(U,$J,358.3,12619,0)
 ;;=S89.012D^^50^549^81
 ;;^UTILITY(U,$J,358.3,12619,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12619,1,3,0)
 ;;=3^Sltr-haris Type I physeal fx upper end,lt tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12619,1,4,0)
 ;;=4^S89.012D
 ;;^UTILITY(U,$J,358.3,12619,2)
 ;;=^5043650
 ;;^UTILITY(U,$J,358.3,12620,0)
 ;;=S89.011D^^50^549^94
 ;;^UTILITY(U,$J,358.3,12620,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12620,1,3,0)
 ;;=3^Srtr-haris Type I physeal fx upper end,rt tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12620,1,4,0)
 ;;=4^S89.011D
 ;;^UTILITY(U,$J,358.3,12620,2)
 ;;=^5043644
 ;;^UTILITY(U,$J,358.3,12621,0)
 ;;=S89.212D^^50^549^82
 ;;^UTILITY(U,$J,358.3,12621,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12621,1,3,0)
 ;;=3^Sltr-haris Type I physeal fx upper end,lt fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12621,1,4,0)
 ;;=4^S89.212D
 ;;^UTILITY(U,$J,358.3,12621,2)
 ;;=^5043776
 ;;^UTILITY(U,$J,358.3,12622,0)
 ;;=S89.211D^^50^549^95
 ;;^UTILITY(U,$J,358.3,12622,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12622,1,3,0)
 ;;=3^Srtr-haris Type I physeal fx upper end,rt fibula,Subsq
 ;;^UTILITY(U,$J,358.3,12622,1,4,0)
 ;;=4^S89.211D
 ;;^UTILITY(U,$J,358.3,12622,2)
 ;;=^5043770
 ;;^UTILITY(U,$J,358.3,12623,0)
 ;;=S89.122D^^50^549^83
 ;;^UTILITY(U,$J,358.3,12623,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12623,1,3,0)
 ;;=3^Sltr-haris Type II physeal fx lower end,lt tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12623,1,4,0)
 ;;=4^S89.122D
 ;;^UTILITY(U,$J,358.3,12623,2)
 ;;=^5137296
 ;;^UTILITY(U,$J,358.3,12624,0)
 ;;=S89.121D^^50^549^96
 ;;^UTILITY(U,$J,358.3,12624,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12624,1,3,0)
 ;;=3^Srtr-haris Type II physeal fx lower end,rt tibia,Subsq
 ;;^UTILITY(U,$J,358.3,12624,1,4,0)
 ;;=4^S89.121D
 ;;^UTILITY(U,$J,358.3,12624,2)
 ;;=^5043740