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

IBDEI04Z.m

Go to the documentation of this file.
IBDEI04Z ; ; 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,12041,1,4,0)
 ;;=4^S72.21XD
 ;;^UTILITY(U,$J,358.3,12041,2)
 ;;=^5038014
 ;;^UTILITY(U,$J,358.3,12042,0)
 ;;=S72.461D^^50^544^44
 ;;^UTILITY(U,$J,358.3,12042,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12042,1,3,0)
 ;;=3^Displaced suprcndl Fx w intrcndl extn lower end,rt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12042,1,4,0)
 ;;=4^S72.461D
 ;;^UTILITY(U,$J,358.3,12042,2)
 ;;=^5136399
 ;;^UTILITY(U,$J,358.3,12043,0)
 ;;=S72.462D^^50^544^45
 ;;^UTILITY(U,$J,358.3,12043,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12043,1,3,0)
 ;;=3^Displaced suprcndl Fx w intrcndl extn lower end,lt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12043,1,4,0)
 ;;=4^S72.462D
 ;;^UTILITY(U,$J,358.3,12043,2)
 ;;=^5136400
 ;;^UTILITY(U,$J,358.3,12044,0)
 ;;=S72.451D^^50^544^46
 ;;^UTILITY(U,$J,358.3,12044,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12044,1,3,0)
 ;;=3^Displaced suprcndl Fx w/o intrcndl extn lower end,rt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12044,1,4,0)
 ;;=4^S72.451D
 ;;^UTILITY(U,$J,358.3,12044,2)
 ;;=^5038993
 ;;^UTILITY(U,$J,358.3,12045,0)
 ;;=S72.452D^^50^544^47
 ;;^UTILITY(U,$J,358.3,12045,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12045,1,3,0)
 ;;=3^Displaced suprcndl Fx w/o intrcndl extn lower end,lt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12045,1,4,0)
 ;;=4^S72.452D
 ;;^UTILITY(U,$J,358.3,12045,2)
 ;;=^5039009
 ;;^UTILITY(U,$J,358.3,12046,0)
 ;;=S82.032D^^50^544^50
 ;;^UTILITY(U,$J,358.3,12046,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12046,1,3,0)
 ;;=3^Displaced transverse Fx,left patella,Subsq
 ;;^UTILITY(U,$J,358.3,12046,1,4,0)
 ;;=4^S82.032D
 ;;^UTILITY(U,$J,358.3,12046,2)
 ;;=^5040352
 ;;^UTILITY(U,$J,358.3,12047,0)
 ;;=S82.031D^^50^544^51
 ;;^UTILITY(U,$J,358.3,12047,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12047,1,3,0)
 ;;=3^Displaced transverse Fx,right patella,Subsq
 ;;^UTILITY(U,$J,358.3,12047,1,4,0)
 ;;=4^S82.031D
 ;;^UTILITY(U,$J,358.3,12047,2)
 ;;=^5040336
 ;;^UTILITY(U,$J,358.3,12048,0)
 ;;=S72.322D^^50^544^48
 ;;^UTILITY(U,$J,358.3,12048,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12048,1,3,0)
 ;;=3^Displaced transverse Fx shaft,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12048,1,4,0)
 ;;=4^S72.322D
 ;;^UTILITY(U,$J,358.3,12048,2)
 ;;=^5038163
 ;;^UTILITY(U,$J,358.3,12049,0)
 ;;=S72.321D^^50^544^49
 ;;^UTILITY(U,$J,358.3,12049,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12049,1,3,0)
 ;;=3^Displaced transverse Fx shaft,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12049,1,4,0)
 ;;=4^S72.321D
 ;;^UTILITY(U,$J,358.3,12049,2)
 ;;=^5038147
 ;;^UTILITY(U,$J,358.3,12050,0)
 ;;=M84.752D^^50^544^52
 ;;^UTILITY(U,$J,358.3,12050,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12050,1,3,0)
 ;;=3^Incomp Atypical Femoral Fx,Left,Subsq
 ;;^UTILITY(U,$J,358.3,12050,1,4,0)
 ;;=4^M84.752D
 ;;^UTILITY(U,$J,358.3,12050,2)
 ;;=^5138846
 ;;^UTILITY(U,$J,358.3,12051,0)
 ;;=M84.751D^^50^544^53
 ;;^UTILITY(U,$J,358.3,12051,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12051,1,3,0)
 ;;=3^Incomp Atypical Femoral Fx,Right,Subsq
 ;;^UTILITY(U,$J,358.3,12051,1,4,0)
 ;;=4^M84.751D
 ;;^UTILITY(U,$J,358.3,12051,2)
 ;;=^5138840
 ;;^UTILITY(U,$J,358.3,12052,0)
 ;;=S72.135D^^50^544^54
 ;;^UTILITY(U,$J,358.3,12052,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12052,1,3,0)
 ;;=3^Nondisp apophyseal Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12052,1,4,0)
 ;;=4^S72.135D
 ;;^UTILITY(U,$J,358.3,12052,2)
 ;;=^5037886
 ;;^UTILITY(U,$J,358.3,12053,0)
 ;;=S72.134D^^50^544^55
 ;;^UTILITY(U,$J,358.3,12053,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12053,1,3,0)
 ;;=3^Nondisp apophyseal Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12053,1,4,0)
 ;;=4^S72.134D
 ;;^UTILITY(U,$J,358.3,12053,2)
 ;;=^5037870
 ;;^UTILITY(U,$J,358.3,12054,0)
 ;;=S72.065D^^50^544^56
 ;;^UTILITY(U,$J,358.3,12054,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12054,1,3,0)
 ;;=3^Nondisp articular Fx,head,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12054,1,4,0)
 ;;=4^S72.065D
 ;;^UTILITY(U,$J,358.3,12054,2)
 ;;=^5037513
 ;;^UTILITY(U,$J,358.3,12055,0)
 ;;=S72.064D^^50^544^57
 ;;^UTILITY(U,$J,358.3,12055,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12055,1,3,0)
 ;;=3^Nondisp articular Fx,head,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12055,1,4,0)
 ;;=4^S72.064D
 ;;^UTILITY(U,$J,358.3,12055,2)
 ;;=^5037497
 ;;^UTILITY(U,$J,358.3,12056,0)
 ;;=S72.045D^^50^544^58
 ;;^UTILITY(U,$J,358.3,12056,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12056,1,3,0)
 ;;=3^Nondisp base of neck Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12056,1,4,0)
 ;;=4^S72.045D
 ;;^UTILITY(U,$J,358.3,12056,2)
 ;;=^5037380
 ;;^UTILITY(U,$J,358.3,12057,0)
 ;;=S72.044D^^50^544^59
 ;;^UTILITY(U,$J,358.3,12057,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12057,1,3,0)
 ;;=3^Nondisp base of neck Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12057,1,4,0)
 ;;=4^S72.044D
 ;;^UTILITY(U,$J,358.3,12057,2)
 ;;=^5037364
 ;;^UTILITY(U,$J,358.3,12058,0)
 ;;=S82.045D^^50^544^60
 ;;^UTILITY(U,$J,358.3,12058,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12058,1,3,0)
 ;;=3^Nondisp comminuted Fx,left patella,Subsq
 ;;^UTILITY(U,$J,358.3,12058,1,4,0)
 ;;=4^S82.045D
 ;;^UTILITY(U,$J,358.3,12058,2)
 ;;=^5040496
 ;;^UTILITY(U,$J,358.3,12059,0)
 ;;=S82.044D^^50^544^61
 ;;^UTILITY(U,$J,358.3,12059,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12059,1,3,0)
 ;;=3^Nondisp comminuted Fx,right patella,Subsq
 ;;^UTILITY(U,$J,358.3,12059,1,4,0)
 ;;=4^S82.044D
 ;;^UTILITY(U,$J,358.3,12059,2)
 ;;=^5040480
 ;;^UTILITY(U,$J,358.3,12060,0)
 ;;=S72.355D^^50^544^62
 ;;^UTILITY(U,$J,358.3,12060,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12060,1,3,0)
 ;;=3^Nondisp comminuted Fx,shaft,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12060,1,4,0)
 ;;=4^S72.355D
 ;;^UTILITY(U,$J,358.3,12060,2)
 ;;=^5038499
 ;;^UTILITY(U,$J,358.3,12061,0)
 ;;=S72.354D^^50^544^63
 ;;^UTILITY(U,$J,358.3,12061,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12061,1,3,0)
 ;;=3^Nondisp comminuted Fx,shaft,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12061,1,4,0)
 ;;=4^S72.354D
 ;;^UTILITY(U,$J,358.3,12061,2)
 ;;=^5038483
 ;;^UTILITY(U,$J,358.3,12062,0)
 ;;=S72.025D^^50^544^64
 ;;^UTILITY(U,$J,358.3,12062,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12062,1,3,0)
 ;;=3^Nondisp epiphy Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12062,1,4,0)
 ;;=4^S72.025D
 ;;^UTILITY(U,$J,358.3,12062,2)
 ;;=^5037188
 ;;^UTILITY(U,$J,358.3,12063,0)
 ;;=S72.024D^^50^544^65
 ;;^UTILITY(U,$J,358.3,12063,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12063,1,3,0)
 ;;=3^Nondisp epiphy Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12063,1,4,0)
 ;;=4^S72.024D
 ;;^UTILITY(U,$J,358.3,12063,2)
 ;;=^5037172
 ;;^UTILITY(U,$J,358.3,12064,0)
 ;;=S72.115D^^50^544^66
 ;;^UTILITY(U,$J,358.3,12064,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12064,1,3,0)
 ;;=3^Nondisp greater trochanter Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12064,1,4,0)
 ;;=4^S72.115D
 ;;^UTILITY(U,$J,358.3,12064,2)
 ;;=^5037694
 ;;^UTILITY(U,$J,358.3,12065,0)
 ;;=S72.114D^^50^544^67
 ;;^UTILITY(U,$J,358.3,12065,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12065,1,3,0)
 ;;=3^Nondisp greater trochanter Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12065,1,4,0)
 ;;=4^S72.114D
 ;;^UTILITY(U,$J,358.3,12065,2)
 ;;=^5037678
 ;;^UTILITY(U,$J,358.3,12066,0)
 ;;=S72.145D^^50^544^68
 ;;^UTILITY(U,$J,358.3,12066,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12066,1,3,0)
 ;;=3^Nondisp intertroch Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12066,1,4,0)
 ;;=4^S72.145D
 ;;^UTILITY(U,$J,358.3,12066,2)
 ;;=^5037982
 ;;^UTILITY(U,$J,358.3,12067,0)
 ;;=S72.144D^^50^544^69
 ;;^UTILITY(U,$J,358.3,12067,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12067,1,3,0)
 ;;=3^Nondisp intertroch Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12067,1,4,0)
 ;;=4^S72.144D
 ;;^UTILITY(U,$J,358.3,12067,2)
 ;;=^5037966
 ;;^UTILITY(U,$J,358.3,12068,0)
 ;;=S72.425D^^50^544^70
 ;;^UTILITY(U,$J,358.3,12068,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12068,1,3,0)
 ;;=3^Nondisp lateral condyle Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12068,1,4,0)
 ;;=4^S72.425D
 ;;^UTILITY(U,$J,358.3,12068,2)
 ;;=^5038823
 ;;^UTILITY(U,$J,358.3,12069,0)
 ;;=S72.454D^^50^544^71
 ;;^UTILITY(U,$J,358.3,12069,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12069,1,3,0)
 ;;=3^Nondisp lateral condyle Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12069,1,4,0)
 ;;=4^S72.454D
 ;;^UTILITY(U,$J,358.3,12069,2)
 ;;=^5039041
 ;;^UTILITY(U,$J,358.3,12070,0)
 ;;=S72.125D^^50^544^72
 ;;^UTILITY(U,$J,358.3,12070,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12070,1,3,0)
 ;;=3^Nondisp lesser trochanter Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12070,1,4,0)
 ;;=4^S72.125D
 ;;^UTILITY(U,$J,358.3,12070,2)
 ;;=^5037790
 ;;^UTILITY(U,$J,358.3,12071,0)
 ;;=S72.124D^^50^544^73
 ;;^UTILITY(U,$J,358.3,12071,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12071,1,3,0)
 ;;=3^Nondisp lesser trochanter Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12071,1,4,0)
 ;;=4^S72.124D
 ;;^UTILITY(U,$J,358.3,12071,2)
 ;;=^5037774
 ;;^UTILITY(U,$J,358.3,12072,0)
 ;;=S82.025D^^50^544^74
 ;;^UTILITY(U,$J,358.3,12072,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12072,1,3,0)
 ;;=3^Nondisp longitudinal Fx,left patella,Subsq
 ;;^UTILITY(U,$J,358.3,12072,1,4,0)
 ;;=4^S82.025D
 ;;^UTILITY(U,$J,358.3,12072,2)
 ;;=^5040304
 ;;^UTILITY(U,$J,358.3,12073,0)
 ;;=S82.024D^^50^544^75
 ;;^UTILITY(U,$J,358.3,12073,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12073,1,3,0)
 ;;=3^Nondisp longitudinal Fx,right patella,Subsq
 ;;^UTILITY(U,$J,358.3,12073,1,4,0)
 ;;=4^S82.024D
 ;;^UTILITY(U,$J,358.3,12073,2)
 ;;=^5040288
 ;;^UTILITY(U,$J,358.3,12074,0)
 ;;=S72.445D^^50^544^76
 ;;^UTILITY(U,$J,358.3,12074,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12074,1,3,0)
 ;;=3^Nondisp lower epiphy Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12074,1,4,0)
 ;;=4^S72.445D
 ;;^UTILITY(U,$J,358.3,12074,2)
 ;;=^5136257
 ;;^UTILITY(U,$J,358.3,12075,0)
 ;;=S72.444D^^50^544^77
 ;;^UTILITY(U,$J,358.3,12075,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12075,1,3,0)
 ;;=3^Nondisp lower epiphy Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12075,1,4,0)
 ;;=4^S72.444D
 ;;^UTILITY(U,$J,358.3,12075,2)
 ;;=^5038972
 ;;^UTILITY(U,$J,358.3,12076,0)
 ;;=S72.435D^^50^544^78
 ;;^UTILITY(U,$J,358.3,12076,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12076,1,3,0)
 ;;=3^Nondisp medial condyle Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12076,1,4,0)
 ;;=4^S72.435D
 ;;^UTILITY(U,$J,358.3,12076,2)
 ;;=^5038919
 ;;^UTILITY(U,$J,358.3,12077,0)
 ;;=S72.434D^^50^544^79
 ;;^UTILITY(U,$J,358.3,12077,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12077,1,3,0)
 ;;=3^Nondisp medial condyle Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12077,1,4,0)
 ;;=4^S72.434D
 ;;^UTILITY(U,$J,358.3,12077,2)
 ;;=^5038903
 ;;^UTILITY(U,$J,358.3,12078,0)
 ;;=S72.035D^^50^544^80
 ;;^UTILITY(U,$J,358.3,12078,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12078,1,3,0)
 ;;=3^Nondisp midcervical Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12078,1,4,0)
 ;;=4^S72.035D
 ;;^UTILITY(U,$J,358.3,12078,2)
 ;;=^5037284
 ;;^UTILITY(U,$J,358.3,12079,0)
 ;;=S72.034D^^50^544^81
 ;;^UTILITY(U,$J,358.3,12079,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12079,1,3,0)
 ;;=3^Nondisp midcervical Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12079,1,4,0)
 ;;=4^S72.034D
 ;;^UTILITY(U,$J,358.3,12079,2)
 ;;=^5037268
 ;;^UTILITY(U,$J,358.3,12080,0)
 ;;=S72.335D^^50^544^82
 ;;^UTILITY(U,$J,358.3,12080,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12080,1,3,0)
 ;;=3^Nondisp oblique Fx shaft,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12080,1,4,0)
 ;;=4^S72.335D
 ;;^UTILITY(U,$J,358.3,12080,2)
 ;;=^5038307
 ;;^UTILITY(U,$J,358.3,12081,0)
 ;;=S72.334D^^50^544^83
 ;;^UTILITY(U,$J,358.3,12081,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12081,1,3,0)
 ;;=3^Nondisp oblique Fx shaft,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12081,1,4,0)
 ;;=4^S72.334D
 ;;^UTILITY(U,$J,358.3,12081,2)
 ;;=^5038291
 ;;^UTILITY(U,$J,358.3,12082,0)
 ;;=S82.015D^^50^544^84
 ;;^UTILITY(U,$J,358.3,12082,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12082,1,3,0)
 ;;=3^Nondisp osteochondral Fx,left patella,Subsq
 ;;^UTILITY(U,$J,358.3,12082,1,4,0)
 ;;=4^S82.015D
 ;;^UTILITY(U,$J,358.3,12082,2)
 ;;=^5040208
 ;;^UTILITY(U,$J,358.3,12083,0)
 ;;=S82.014D^^50^544^85
 ;;^UTILITY(U,$J,358.3,12083,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12083,1,3,0)
 ;;=3^Nondisp osteochondral Fx,right patella,Subsq
 ;;^UTILITY(U,$J,358.3,12083,1,4,0)
 ;;=4^S82.014D
 ;;^UTILITY(U,$J,358.3,12083,2)
 ;;=^5040192
 ;;^UTILITY(U,$J,358.3,12084,0)
 ;;=S72.365D^^50^544^86
 ;;^UTILITY(U,$J,358.3,12084,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12084,1,3,0)
 ;;=3^Nondisp segmental Fx shaft,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12084,1,4,0)
 ;;=4^S72.365D
 ;;^UTILITY(U,$J,358.3,12084,2)
 ;;=^5038595
 ;;^UTILITY(U,$J,358.3,12085,0)
 ;;=S72.364D^^50^544^87
 ;;^UTILITY(U,$J,358.3,12085,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12085,1,3,0)
 ;;=3^Nondisp segmental Fx shaft,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12085,1,4,0)
 ;;=4^S72.364D
 ;;^UTILITY(U,$J,358.3,12085,2)
 ;;=^5038579
 ;;^UTILITY(U,$J,358.3,12086,0)
 ;;=S72.345D^^50^544^88
 ;;^UTILITY(U,$J,358.3,12086,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12086,1,3,0)
 ;;=3^Nondisp spiral Fx shaft,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12086,1,4,0)
 ;;=4^S72.345D
 ;;^UTILITY(U,$J,358.3,12086,2)
 ;;=^5038403
 ;;^UTILITY(U,$J,358.3,12087,0)
 ;;=S72.344D^^50^544^89
 ;;^UTILITY(U,$J,358.3,12087,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12087,1,3,0)
 ;;=3^Nondisp spiral Fx shaft,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12087,1,4,0)
 ;;=4^S72.344D
 ;;^UTILITY(U,$J,358.3,12087,2)
 ;;=^5038387
 ;;^UTILITY(U,$J,358.3,12088,0)
 ;;=S72.25XD^^50^544^90
 ;;^UTILITY(U,$J,358.3,12088,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12088,1,3,0)
 ;;=3^Nondisp subtrochanteric Fx,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12088,1,4,0)
 ;;=4^S72.25XD
 ;;^UTILITY(U,$J,358.3,12088,2)
 ;;=^5038078
 ;;^UTILITY(U,$J,358.3,12089,0)
 ;;=S72.24XD^^50^544^91
 ;;^UTILITY(U,$J,358.3,12089,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12089,1,3,0)
 ;;=3^Nondisp subtrochanteric Fx,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12089,1,4,0)
 ;;=4^S72.24XD
 ;;^UTILITY(U,$J,358.3,12089,2)
 ;;=^5038062
 ;;^UTILITY(U,$J,358.3,12090,0)
 ;;=S72.464D^^50^544^92
 ;;^UTILITY(U,$J,358.3,12090,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12090,1,3,0)
 ;;=3^Nondisp suprcndl Fx w intrcndl extn lower end,rt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12090,1,4,0)
 ;;=4^S72.464D
 ;;^UTILITY(U,$J,358.3,12090,2)
 ;;=^5136434
 ;;^UTILITY(U,$J,358.3,12091,0)
 ;;=S72.465D^^50^544^93
 ;;^UTILITY(U,$J,358.3,12091,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12091,1,3,0)
 ;;=3^Nondisp suprcndl Fx w intrcndl extn lower end,lt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12091,1,4,0)
 ;;=4^S72.465D
 ;;^UTILITY(U,$J,358.3,12091,2)
 ;;=^5136435
 ;;^UTILITY(U,$J,358.3,12092,0)
 ;;=S72.454D^^50^544^94
 ;;^UTILITY(U,$J,358.3,12092,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12092,1,3,0)
 ;;=3^Nondisp suprcndl Fx w/o intrcndl extn lower end,rt femr,Subsq
 ;;^UTILITY(U,$J,358.3,12092,1,4,0)
 ;;=4^S72.454D
 ;;^UTILITY(U,$J,358.3,12092,2)
 ;;=^5039041
 ;;^UTILITY(U,$J,358.3,12093,0)
 ;;=S72.455D^^50^544^95
 ;;^UTILITY(U,$J,358.3,12093,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12093,1,3,0)
 ;;=3^Nondisp suprcndl Fx w/o intrcndl extn lower end,lt femr,Subsq
 ;;^UTILITY(U,$J,358.3,12093,1,4,0)
 ;;=4^S72.455D
 ;;^UTILITY(U,$J,358.3,12093,2)
 ;;=^5039057
 ;;^UTILITY(U,$J,358.3,12094,0)
 ;;=S82.035D^^50^544^98
 ;;^UTILITY(U,$J,358.3,12094,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12094,1,3,0)
 ;;=3^Nondisp transverse Fx,left patella,Subsq
 ;;^UTILITY(U,$J,358.3,12094,1,4,0)
 ;;=4^S82.035D
 ;;^UTILITY(U,$J,358.3,12094,2)
 ;;=^5040400
 ;;^UTILITY(U,$J,358.3,12095,0)
 ;;=S82.034D^^50^544^99
 ;;^UTILITY(U,$J,358.3,12095,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12095,1,3,0)
 ;;=3^Nondisp transverse Fx,right patella,Subsq
 ;;^UTILITY(U,$J,358.3,12095,1,4,0)
 ;;=4^S82.034D
 ;;^UTILITY(U,$J,358.3,12095,2)
 ;;=^5040384
 ;;^UTILITY(U,$J,358.3,12096,0)
 ;;=S72.325D^^50^544^96
 ;;^UTILITY(U,$J,358.3,12096,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12096,1,3,0)
 ;;=3^Nondisp transverse Fx shaft,left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12096,1,4,0)
 ;;=4^S72.325D
 ;;^UTILITY(U,$J,358.3,12096,2)
 ;;=^5038211
 ;;^UTILITY(U,$J,358.3,12097,0)
 ;;=S72.324D^^50^544^97
 ;;^UTILITY(U,$J,358.3,12097,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12097,1,3,0)
 ;;=3^Nondisp transverse Fx shaft,right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12097,1,4,0)
 ;;=4^S72.324D
 ;;^UTILITY(U,$J,358.3,12097,2)
 ;;=^5038195
 ;;^UTILITY(U,$J,358.3,12098,0)
 ;;=M84.452D^^50^544^100
 ;;^UTILITY(U,$J,358.3,12098,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12098,1,3,0)
 ;;=3^Pathological Fx, left femur,Subsq
 ;;^UTILITY(U,$J,358.3,12098,1,4,0)
 ;;=4^M84.452D
 ;;^UTILITY(U,$J,358.3,12098,2)
 ;;=^5013909
 ;;^UTILITY(U,$J,358.3,12099,0)
 ;;=M84.451D^^50^544^101
 ;;^UTILITY(U,$J,358.3,12099,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12099,1,3,0)
 ;;=3^Pathological Fx, right femur,Subsq
 ;;^UTILITY(U,$J,358.3,12099,1,4,0)
 ;;=4^M84.451D
 ;;^UTILITY(U,$J,358.3,12099,2)
 ;;=^5013903
 ;;^UTILITY(U,$J,358.3,12100,0)
 ;;=S79.111D^^50^544^102
 ;;^UTILITY(U,$J,358.3,12100,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12100,1,3,0)
 ;;=3^Sltr-haris Type I physeal Fx lower end,rt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12100,1,4,0)
 ;;=4^S79.111D
 ;;^UTILITY(U,$J,358.3,12100,2)
 ;;=^5039799
 ;;^UTILITY(U,$J,358.3,12101,0)
 ;;=S79.112D^^50^544^103
 ;;^UTILITY(U,$J,358.3,12101,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12101,1,3,0)
 ;;=3^Sltr-haris Type I physeal Fx lower end,lt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12101,1,4,0)
 ;;=4^S79.112D
 ;;^UTILITY(U,$J,358.3,12101,2)
 ;;=^5136662
 ;;^UTILITY(U,$J,358.3,12102,0)
 ;;=S79.011D^^50^544^104
 ;;^UTILITY(U,$J,358.3,12102,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12102,1,3,0)
 ;;=3^Sltr-haris Type I physeal Fx upper end,rt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12102,1,4,0)
 ;;=4^S79.011D
 ;;^UTILITY(U,$J,358.3,12102,2)
 ;;=^5039769
 ;;^UTILITY(U,$J,358.3,12103,0)
 ;;=S79.012D^^50^544^105
 ;;^UTILITY(U,$J,358.3,12103,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12103,1,3,0)
 ;;=3^Sltr-haris Type I physeal Fx upper end,lt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12103,1,4,0)
 ;;=4^S79.012D
 ;;^UTILITY(U,$J,358.3,12103,2)
 ;;=^5039775
 ;;^UTILITY(U,$J,358.3,12104,0)
 ;;=S79.121D^^50^544^106
 ;;^UTILITY(U,$J,358.3,12104,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12104,1,3,0)
 ;;=3^Sltr-haris Type II physeal Fx lower end,rt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12104,1,4,0)
 ;;=4^S79.121D
 ;;^UTILITY(U,$J,358.3,12104,2)
 ;;=^5039811
 ;;^UTILITY(U,$J,358.3,12105,0)
 ;;=S79.122D^^50^544^107
 ;;^UTILITY(U,$J,358.3,12105,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,12105,1,3,0)
 ;;=3^Sltr-haris Type II physeal Fx lower end,lt femur,Subsq
 ;;^UTILITY(U,$J,358.3,12105,1,4,0)
 ;;=4^S79.122D
 ;;^UTILITY(U,$J,358.3,12105,2)
 ;;=^5039817
 ;;^UTILITY(U,$J,358.3,12106,0)
 ;;=S79.131D^^50^544^108