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

IBDEI09B.m

Go to the documentation of this file.
IBDEI09B ; ; 28-OCT-2020
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
 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,22483,1,3,0)
 ;;=3^Disp fx of pisiform, left wrist, sequela     
 ;;^UTILITY(U,$J,358.3,22483,1,4,0)
 ;;=4^S62.162S
 ;;^UTILITY(U,$J,358.3,22483,2)
 ;;=^5033436
 ;;^UTILITY(U,$J,358.3,22484,0)
 ;;=S62.161S^^90^1004^42
 ;;^UTILITY(U,$J,358.3,22484,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22484,1,3,0)
 ;;=3^Disp fx of pisiform, right wrist, sequela    
 ;;^UTILITY(U,$J,358.3,22484,1,4,0)
 ;;=4^S62.161S
 ;;^UTILITY(U,$J,358.3,22484,2)
 ;;=^5033429
 ;;^UTILITY(U,$J,358.3,22485,0)
 ;;=S62.032S^^90^1004^43
 ;;^UTILITY(U,$J,358.3,22485,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22485,1,3,0)
 ;;=3^Disp fx of proximal third of navic bone of l wrist, sequela
 ;;^UTILITY(U,$J,358.3,22485,1,4,0)
 ;;=4^S62.032S
 ;;^UTILITY(U,$J,358.3,22485,2)
 ;;=^5033170
 ;;^UTILITY(U,$J,358.3,22486,0)
 ;;=S62.031S^^90^1004^44
 ;;^UTILITY(U,$J,358.3,22486,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22486,1,3,0)
 ;;=3^Disp fx of proximal third of navic bone of r wrist, sequela
 ;;^UTILITY(U,$J,358.3,22486,1,4,0)
 ;;=4^S62.031S
 ;;^UTILITY(U,$J,358.3,22486,2)
 ;;=^5033163
 ;;^UTILITY(U,$J,358.3,22487,0)
 ;;=S62.172S^^90^1004^59
 ;;^UTILITY(U,$J,358.3,22487,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22487,1,3,0)
 ;;=3^Disp fx of trapezium, left wrist, sequela    
 ;;^UTILITY(U,$J,358.3,22487,1,4,0)
 ;;=4^S62.172S
 ;;^UTILITY(U,$J,358.3,22487,2)
 ;;=^5033478
 ;;^UTILITY(U,$J,358.3,22488,0)
 ;;=S62.171S^^90^1004^60
 ;;^UTILITY(U,$J,358.3,22488,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22488,1,3,0)
 ;;=3^Disp fx of trapezium, right wrist, sequela   
 ;;^UTILITY(U,$J,358.3,22488,1,4,0)
 ;;=4^S62.171S
 ;;^UTILITY(U,$J,358.3,22488,2)
 ;;=^5033471
 ;;^UTILITY(U,$J,358.3,22489,0)
 ;;=S62.182S^^90^1004^61
 ;;^UTILITY(U,$J,358.3,22489,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22489,1,3,0)
 ;;=3^Disp fx of trapezoid, left wrist, sequela   
 ;;^UTILITY(U,$J,358.3,22489,1,4,0)
 ;;=4^S62.182S
 ;;^UTILITY(U,$J,358.3,22489,2)
 ;;=^5033520
 ;;^UTILITY(U,$J,358.3,22490,0)
 ;;=S62.181S^^90^1004^62
 ;;^UTILITY(U,$J,358.3,22490,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22490,1,3,0)
 ;;=3^Disp fx of trapezoid, right wrist, sequela  
 ;;^UTILITY(U,$J,358.3,22490,1,4,0)
 ;;=4^S62.181S
 ;;^UTILITY(U,$J,358.3,22490,2)
 ;;=^5033513
 ;;^UTILITY(U,$J,358.3,22491,0)
 ;;=S62.112S^^90^1004^63
 ;;^UTILITY(U,$J,358.3,22491,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22491,1,3,0)
 ;;=3^Disp fx of triquetrum bone, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22491,1,4,0)
 ;;=4^S62.112S
 ;;^UTILITY(U,$J,358.3,22491,2)
 ;;=^5033226
 ;;^UTILITY(U,$J,358.3,22492,0)
 ;;=S62.111S^^90^1004^64
 ;;^UTILITY(U,$J,358.3,22492,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22492,1,3,0)
 ;;=3^Disp fx of triquetrum bone, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22492,1,4,0)
 ;;=4^S62.111S
 ;;^UTILITY(U,$J,358.3,22492,2)
 ;;=^5033219
 ;;^UTILITY(U,$J,358.3,22493,0)
 ;;=S62.145S^^90^1004^73
 ;;^UTILITY(U,$J,358.3,22493,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22493,1,3,0)
 ;;=3^Nondisp fx of body of hamate bone, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22493,1,4,0)
 ;;=4^S62.145S
 ;;^UTILITY(U,$J,358.3,22493,2)
 ;;=^5033373
 ;;^UTILITY(U,$J,358.3,22494,0)
 ;;=S62.144S^^90^1004^74
 ;;^UTILITY(U,$J,358.3,22494,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22494,1,3,0)
 ;;=3^Nondisp fx of body of hamate bone, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22494,1,4,0)
 ;;=4^S62.144S
 ;;^UTILITY(U,$J,358.3,22494,2)
 ;;=^5033366
 ;;^UTILITY(U,$J,358.3,22495,0)
 ;;=S62.135S^^90^1004^75
 ;;^UTILITY(U,$J,358.3,22495,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22495,1,3,0)
 ;;=3^Nondisp fx of capitate bone, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22495,1,4,0)
 ;;=4^S62.135S
 ;;^UTILITY(U,$J,358.3,22495,2)
 ;;=^5033331
 ;;^UTILITY(U,$J,358.3,22496,0)
 ;;=S62.134S^^90^1004^76
 ;;^UTILITY(U,$J,358.3,22496,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22496,1,3,0)
 ;;=3^Nondisp fx of capitate bone, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22496,1,4,0)
 ;;=4^S62.134S
 ;;^UTILITY(U,$J,358.3,22496,2)
 ;;=^5033324
 ;;^UTILITY(U,$J,358.3,22497,0)
 ;;=S62.015S^^90^1004^83
 ;;^UTILITY(U,$J,358.3,22497,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22497,1,3,0)
 ;;=3^Nondisp fx of distal pole of navic bone of left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22497,1,4,0)
 ;;=4^S62.015S
 ;;^UTILITY(U,$J,358.3,22497,2)
 ;;=^5033107
 ;;^UTILITY(U,$J,358.3,22498,0)
 ;;=S62.014S^^90^1004^84
 ;;^UTILITY(U,$J,358.3,22498,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22498,1,3,0)
 ;;=3^Nondisp fx of distal pole of navic bone of right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22498,1,4,0)
 ;;=4^S62.014S
 ;;^UTILITY(U,$J,358.3,22498,2)
 ;;=^5033100
 ;;^UTILITY(U,$J,358.3,22499,0)
 ;;=S62.155S^^90^1004^87
 ;;^UTILITY(U,$J,358.3,22499,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22499,1,3,0)
 ;;=3^Nondisp fx of hook process of hamate bone, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22499,1,4,0)
 ;;=4^S62.155S
 ;;^UTILITY(U,$J,358.3,22499,2)
 ;;=^5033415
 ;;^UTILITY(U,$J,358.3,22500,0)
 ;;=S62.154S^^90^1004^88
 ;;^UTILITY(U,$J,358.3,22500,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22500,1,3,0)
 ;;=3^Nondisp fx of hook process of hamate bone, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22500,1,4,0)
 ;;=4^S62.154S
 ;;^UTILITY(U,$J,358.3,22500,2)
 ;;=^5033408
 ;;^UTILITY(U,$J,358.3,22501,0)
 ;;=S62.125S^^90^1004^91
 ;;^UTILITY(U,$J,358.3,22501,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22501,1,3,0)
 ;;=3^Nondisp fx of lunate, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22501,1,4,0)
 ;;=4^S62.125S
 ;;^UTILITY(U,$J,358.3,22501,2)
 ;;=^5033289
 ;;^UTILITY(U,$J,358.3,22502,0)
 ;;=S62.124S^^90^1004^92
 ;;^UTILITY(U,$J,358.3,22502,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22502,1,3,0)
 ;;=3^Nondisp fx of lunate, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22502,1,4,0)
 ;;=4^S62.124S
 ;;^UTILITY(U,$J,358.3,22502,2)
 ;;=^5033282
 ;;^UTILITY(U,$J,358.3,22503,0)
 ;;=S62.025S^^90^1004^93
 ;;^UTILITY(U,$J,358.3,22503,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22503,1,3,0)
 ;;=3^Nondisp fx of middle third of navic bone of left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22503,1,4,0)
 ;;=4^S62.025S
 ;;^UTILITY(U,$J,358.3,22503,2)
 ;;=^5033149
 ;;^UTILITY(U,$J,358.3,22504,0)
 ;;=S62.024S^^90^1004^94
 ;;^UTILITY(U,$J,358.3,22504,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22504,1,3,0)
 ;;=3^Nondisp fx of middle third of navic bone of right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22504,1,4,0)
 ;;=4^S62.024S
 ;;^UTILITY(U,$J,358.3,22504,2)
 ;;=^5033142
 ;;^UTILITY(U,$J,358.3,22505,0)
 ;;=S62.165S^^90^1004^105
 ;;^UTILITY(U,$J,358.3,22505,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22505,1,3,0)
 ;;=3^Nondisp fx of pisiform, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22505,1,4,0)
 ;;=4^S62.165S
 ;;^UTILITY(U,$J,358.3,22505,2)
 ;;=^5033457
 ;;^UTILITY(U,$J,358.3,22506,0)
 ;;=S62.164S^^90^1004^106
 ;;^UTILITY(U,$J,358.3,22506,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22506,1,3,0)
 ;;=3^Nondisp fx of pisiform, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22506,1,4,0)
 ;;=4^S62.164S
 ;;^UTILITY(U,$J,358.3,22506,2)
 ;;=^5033450
 ;;^UTILITY(U,$J,358.3,22507,0)
 ;;=S62.035S^^90^1004^107
 ;;^UTILITY(U,$J,358.3,22507,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22507,1,3,0)
 ;;=3^Nondisp fx of prox third of navic bone of left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22507,1,4,0)
 ;;=4^S62.035S
 ;;^UTILITY(U,$J,358.3,22507,2)
 ;;=^5033191
 ;;^UTILITY(U,$J,358.3,22508,0)
 ;;=S62.034S^^90^1004^108
 ;;^UTILITY(U,$J,358.3,22508,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22508,1,3,0)
 ;;=3^Nondisp fx of prox third of navic bone of right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22508,1,4,0)
 ;;=4^S62.034S
 ;;^UTILITY(U,$J,358.3,22508,2)
 ;;=^5033184
 ;;^UTILITY(U,$J,358.3,22509,0)
 ;;=S62.175S^^90^1004^123
 ;;^UTILITY(U,$J,358.3,22509,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22509,1,3,0)
 ;;=3^Nondisp fx of trapezium, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22509,1,4,0)
 ;;=4^S62.175S
 ;;^UTILITY(U,$J,358.3,22509,2)
 ;;=^5033499
 ;;^UTILITY(U,$J,358.3,22510,0)
 ;;=S62.174S^^90^1004^124
 ;;^UTILITY(U,$J,358.3,22510,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22510,1,3,0)
 ;;=3^Nondisp fx of trapezium, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22510,1,4,0)
 ;;=4^S62.174S
 ;;^UTILITY(U,$J,358.3,22510,2)
 ;;=^5033492
 ;;^UTILITY(U,$J,358.3,22511,0)
 ;;=S62.185S^^90^1004^125
 ;;^UTILITY(U,$J,358.3,22511,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22511,1,3,0)
 ;;=3^Nondisp fx of trapezoid, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22511,1,4,0)
 ;;=4^S62.185S
 ;;^UTILITY(U,$J,358.3,22511,2)
 ;;=^5033541
 ;;^UTILITY(U,$J,358.3,22512,0)
 ;;=S62.184S^^90^1004^126
 ;;^UTILITY(U,$J,358.3,22512,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22512,1,3,0)
 ;;=3^Nondisp fx of trapezoid, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22512,1,4,0)
 ;;=4^S62.184S
 ;;^UTILITY(U,$J,358.3,22512,2)
 ;;=^5033534
 ;;^UTILITY(U,$J,358.3,22513,0)
 ;;=S62.115S^^90^1004^127
 ;;^UTILITY(U,$J,358.3,22513,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22513,1,3,0)
 ;;=3^Nondisp fx of triquetrum bone, left wrist, sequela
 ;;^UTILITY(U,$J,358.3,22513,1,4,0)
 ;;=4^S62.115S
 ;;^UTILITY(U,$J,358.3,22513,2)
 ;;=^5033247
 ;;^UTILITY(U,$J,358.3,22514,0)
 ;;=S62.114S^^90^1004^128
 ;;^UTILITY(U,$J,358.3,22514,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22514,1,3,0)
 ;;=3^Nondisp fx of triquetrum bone, right wrist, sequela
 ;;^UTILITY(U,$J,358.3,22514,1,4,0)
 ;;=4^S62.114S
 ;;^UTILITY(U,$J,358.3,22514,2)
 ;;=^5033240
 ;;^UTILITY(U,$J,358.3,22515,0)
 ;;=S52.282S^^90^1004^4
 ;;^UTILITY(U,$J,358.3,22515,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22515,1,3,0)
 ;;=3^Bent bone of left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22515,1,4,0)
 ;;=4^S52.282S
 ;;^UTILITY(U,$J,358.3,22515,2)
 ;;=^5029874
 ;;^UTILITY(U,$J,358.3,22516,0)
 ;;=S52.281S^^90^1004^6
 ;;^UTILITY(U,$J,358.3,22516,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22516,1,3,0)
 ;;=3^Bent bone of right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22516,1,4,0)
 ;;=4^S52.281S
 ;;^UTILITY(U,$J,358.3,22516,2)
 ;;=^5029858
 ;;^UTILITY(U,$J,358.3,22517,0)
 ;;=S52.252S^^90^1004^16
 ;;^UTILITY(U,$J,358.3,22517,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22517,1,3,0)
 ;;=3^Disp fx of comminuted shaft of ulna, right arm, sequela 
 ;;^UTILITY(U,$J,358.3,22517,1,4,0)
 ;;=4^S52.252S
 ;;^UTILITY(U,$J,358.3,22517,2)
 ;;=^5029634
 ;;^UTILITY(U,$J,358.3,22518,0)
 ;;=S52.251S^^90^1004^17
 ;;^UTILITY(U,$J,358.3,22518,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22518,1,3,0)
 ;;=3^Disp fx of comminuted shaft of ulna, right arm, sequela 
 ;;^UTILITY(U,$J,358.3,22518,1,4,0)
 ;;=4^S52.251S
 ;;^UTILITY(U,$J,358.3,22518,2)
 ;;=^5029618
 ;;^UTILITY(U,$J,358.3,22519,0)
 ;;=S52.042S^^90^1004^18
 ;;^UTILITY(U,$J,358.3,22519,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22519,1,3,0)
 ;;=3^Disp fx of coronoid process of left ulna, sequela 
 ;;^UTILITY(U,$J,358.3,22519,1,4,0)
 ;;=4^S52.042S
 ;;^UTILITY(U,$J,358.3,22519,2)
 ;;=^5028906
 ;;^UTILITY(U,$J,358.3,22520,0)
 ;;=S52.041S^^90^1004^19
 ;;^UTILITY(U,$J,358.3,22520,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22520,1,3,0)
 ;;=3^Disp fx of coronoid process of right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22520,1,4,0)
 ;;=4^S52.041S
 ;;^UTILITY(U,$J,358.3,22520,2)
 ;;=^5028890
 ;;^UTILITY(U,$J,358.3,22521,0)
 ;;=S52.612S^^90^1004^27
 ;;^UTILITY(U,$J,358.3,22521,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22521,1,3,0)
 ;;=3^Disp fx of left ulna styloid process, sequela 
 ;;^UTILITY(U,$J,358.3,22521,1,4,0)
 ;;=4^S52.612S
 ;;^UTILITY(U,$J,358.3,22521,2)
 ;;=^5031066
 ;;^UTILITY(U,$J,358.3,22522,0)
 ;;=S52.032S^^90^1004^14
 ;;^UTILITY(U,$J,358.3,22522,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22522,1,3,0)
 ;;=3^Disp fx of comminuted shaft of radius, left arm, sequela 
 ;;^UTILITY(U,$J,358.3,22522,1,4,0)
 ;;=4^S52.032S
 ;;^UTILITY(U,$J,358.3,22522,2)
 ;;=^5135105
 ;;^UTILITY(U,$J,358.3,22523,0)
 ;;=S52.031S^^90^1004^38
 ;;^UTILITY(U,$J,358.3,22523,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22523,1,3,0)
 ;;=3^Disp fx of olecran pro w intartic extn right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22523,1,4,0)
 ;;=4^S52.031S
 ;;^UTILITY(U,$J,358.3,22523,2)
 ;;=^5028856
 ;;^UTILITY(U,$J,358.3,22524,0)
 ;;=S52.022S^^90^1004^39
 ;;^UTILITY(U,$J,358.3,22524,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22524,1,3,0)
 ;;=3^Disp fx of olecran pro w/o intartic extn left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22524,1,4,0)
 ;;=4^S52.022S
 ;;^UTILITY(U,$J,358.3,22524,2)
 ;;=^5028784
 ;;^UTILITY(U,$J,358.3,22525,0)
 ;;=S52.021S^^90^1004^40
 ;;^UTILITY(U,$J,358.3,22525,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22525,1,3,0)
 ;;=3^Disp fx of olecran pro w/o intartic extn right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22525,1,4,0)
 ;;=4^S52.021S
 ;;^UTILITY(U,$J,358.3,22525,2)
 ;;=^5028768
 ;;^UTILITY(U,$J,358.3,22526,0)
 ;;=S52.611S^^90^1004^46
 ;;^UTILITY(U,$J,358.3,22526,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22526,1,3,0)
 ;;=3^Disp fx of right ulna styloid process, sequela 
 ;;^UTILITY(U,$J,358.3,22526,1,4,0)
 ;;=4^S52.611S
 ;;^UTILITY(U,$J,358.3,22526,2)
 ;;=^5031050
 ;;^UTILITY(U,$J,358.3,22527,0)
 ;;=S52.232S^^90^1004^35
 ;;^UTILITY(U,$J,358.3,22527,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22527,1,3,0)
 ;;=3^Disp fx of oblique shaft of left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22527,1,4,0)
 ;;=4^S52.232S
 ;;^UTILITY(U,$J,358.3,22527,2)
 ;;=^5029442
 ;;^UTILITY(U,$J,358.3,22528,0)
 ;;=S52.231S^^90^1004^37
 ;;^UTILITY(U,$J,358.3,22528,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22528,1,3,0)
 ;;=3^Disp fx of oblique shaft of right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22528,1,4,0)
 ;;=4^S52.231S
 ;;^UTILITY(U,$J,358.3,22528,2)
 ;;=^5029426
 ;;^UTILITY(U,$J,358.3,22529,0)
 ;;=S52.262S^^90^1004^49
 ;;^UTILITY(U,$J,358.3,22529,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22529,1,3,0)
 ;;=3^Disp fx of segmental shaft of ulna, left arm, sequela
 ;;^UTILITY(U,$J,358.3,22529,1,4,0)
 ;;=4^S52.262S
 ;;^UTILITY(U,$J,358.3,22529,2)
 ;;=^5029730
 ;;^UTILITY(U,$J,358.3,22530,0)
 ;;=S52.261S^^90^1004^50
 ;;^UTILITY(U,$J,358.3,22530,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22530,1,3,0)
 ;;=3^Disp fx of segmental shaft of ulna, right arm, sequela
 ;;^UTILITY(U,$J,358.3,22530,1,4,0)
 ;;=4^S52.261S
 ;;^UTILITY(U,$J,358.3,22530,2)
 ;;=^5029714
 ;;^UTILITY(U,$J,358.3,22531,0)
 ;;=S52.242S^^90^1004^53
 ;;^UTILITY(U,$J,358.3,22531,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22531,1,3,0)
 ;;=3^Disp fx of spiral shaft of ulna, left arm, sequela    
 ;;^UTILITY(U,$J,358.3,22531,1,4,0)
 ;;=4^S52.242S
 ;;^UTILITY(U,$J,358.3,22531,2)
 ;;=^5029538
 ;;^UTILITY(U,$J,358.3,22532,0)
 ;;=S52.241S^^90^1004^54
 ;;^UTILITY(U,$J,358.3,22532,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22532,1,3,0)
 ;;=3^Disp fx of spiral shaft of ulna, right arm, sequela   
 ;;^UTILITY(U,$J,358.3,22532,1,4,0)
 ;;=4^S52.241S
 ;;^UTILITY(U,$J,358.3,22532,2)
 ;;=^5029522
 ;;^UTILITY(U,$J,358.3,22533,0)
 ;;=S52.222S^^90^1004^56
 ;;^UTILITY(U,$J,358.3,22533,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22533,1,3,0)
 ;;=3^Disp fx of transverse shaft of left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22533,1,4,0)
 ;;=4^S52.222S
 ;;^UTILITY(U,$J,358.3,22533,2)
 ;;=^5029346
 ;;^UTILITY(U,$J,358.3,22534,0)
 ;;=S52.221S^^90^1004^58
 ;;^UTILITY(U,$J,358.3,22534,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22534,1,3,0)
 ;;=3^Disp fx of transverse shaft of right ulna, sequela    
 ;;^UTILITY(U,$J,358.3,22534,1,4,0)
 ;;=4^S52.221S
 ;;^UTILITY(U,$J,358.3,22534,2)
 ;;=^5029330
 ;;^UTILITY(U,$J,358.3,22535,0)
 ;;=S52.212S^^90^1004^68
 ;;^UTILITY(U,$J,358.3,22535,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22535,1,3,0)
 ;;=3^Greenstick fracture of shaft of left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22535,1,4,0)
 ;;=4^S52.212S
 ;;^UTILITY(U,$J,358.3,22535,2)
 ;;=^5029308
 ;;^UTILITY(U,$J,358.3,22536,0)
 ;;=S52.211S^^90^1004^70
 ;;^UTILITY(U,$J,358.3,22536,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22536,1,3,0)
 ;;=3^Greenstick fracture of shaft of right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22536,1,4,0)
 ;;=4^S52.211S
 ;;^UTILITY(U,$J,358.3,22536,2)
 ;;=^5029302
 ;;^UTILITY(U,$J,358.3,22537,0)
 ;;=S52.272S^^90^1004^71
 ;;^UTILITY(U,$J,358.3,22537,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22537,1,3,0)
 ;;=3^Monteggia's fracture of left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22537,1,4,0)
 ;;=4^S52.272S
 ;;^UTILITY(U,$J,358.3,22537,2)
 ;;=^5029826
 ;;^UTILITY(U,$J,358.3,22538,0)
 ;;=S52.271S^^90^1004^72
 ;;^UTILITY(U,$J,358.3,22538,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22538,1,3,0)
 ;;=3^Monteggia's fracture of right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22538,1,4,0)
 ;;=4^S52.271S
 ;;^UTILITY(U,$J,358.3,22538,2)
 ;;=^5029810
 ;;^UTILITY(U,$J,358.3,22539,0)
 ;;=S52.255S^^90^1004^79
 ;;^UTILITY(U,$J,358.3,22539,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22539,1,3,0)
 ;;=3^Nondisp fx of comminuted shaft of ulna, left arm, sequela
 ;;^UTILITY(U,$J,358.3,22539,1,4,0)
 ;;=4^S52.255S
 ;;^UTILITY(U,$J,358.3,22539,2)
 ;;=^5029682
 ;;^UTILITY(U,$J,358.3,22540,0)
 ;;=S52.254S^^90^1004^80
 ;;^UTILITY(U,$J,358.3,22540,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22540,1,3,0)
 ;;=3^Nondisp fx of comminuted shaft of ulna, right arm, sequela
 ;;^UTILITY(U,$J,358.3,22540,1,4,0)
 ;;=4^S52.254S
 ;;^UTILITY(U,$J,358.3,22540,2)
 ;;=^5029666
 ;;^UTILITY(U,$J,358.3,22541,0)
 ;;=S52.045S^^90^1004^81
 ;;^UTILITY(U,$J,358.3,22541,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22541,1,3,0)
 ;;=3^Nondisp fx of coronoid process of left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22541,1,4,0)
 ;;=4^S52.045S
 ;;^UTILITY(U,$J,358.3,22541,2)
 ;;=^5028954
 ;;^UTILITY(U,$J,358.3,22542,0)
 ;;=S52.044S^^90^1004^82
 ;;^UTILITY(U,$J,358.3,22542,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22542,1,3,0)
 ;;=3^Nondisp fx of coronoid process of right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22542,1,4,0)
 ;;=4^S52.044S
 ;;^UTILITY(U,$J,358.3,22542,2)
 ;;=^5028938
 ;;^UTILITY(U,$J,358.3,22543,0)
 ;;=S52.615S^^90^1004^90
 ;;^UTILITY(U,$J,358.3,22543,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22543,1,3,0)
 ;;=3^Nondisp fx of left ulna styloid process, sequela
 ;;^UTILITY(U,$J,358.3,22543,1,4,0)
 ;;=4^S52.615S
 ;;^UTILITY(U,$J,358.3,22543,2)
 ;;=^5031114
 ;;^UTILITY(U,$J,358.3,22544,0)
 ;;=S52.035S^^90^1004^101
 ;;^UTILITY(U,$J,358.3,22544,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22544,1,3,0)
 ;;=3^Nondisp fx of olecran pro w intartic extn left ulna, sequela
 ;;^UTILITY(U,$J,358.3,22544,1,4,0)
 ;;=4^S52.035S
 ;;^UTILITY(U,$J,358.3,22544,2)
 ;;=^5135140
 ;;^UTILITY(U,$J,358.3,22545,0)
 ;;=S52.034S^^90^1004^102
 ;;^UTILITY(U,$J,358.3,22545,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,22545,1,3,0)
 ;;=3^Nondisp fx of olecran pro w intartic extn right ulna, sequela
 ;;^UTILITY(U,$J,358.3,22545,1,4,0)
 ;;=4^S52.034S
 ;;^UTILITY(U,$J,358.3,22545,2)
 ;;=^5028869
 ;;^UTILITY(U,$J,358.3,22546,0)
 ;;=S52.025S^^90^1004^103
 ;;^UTILITY(U,$J,358.3,22546,1,0)
 ;;=^358.31IA^4^2