- IBDEI0AC ; ; 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,25325,1,3,0)
- ;;=3^SCI T1 Anterior Cord Syndrome,Sequela
- ;;^UTILITY(U,$J,358.3,25325,1,4,0)
- ;;=4^S24.131S
- ;;^UTILITY(U,$J,358.3,25325,2)
- ;;=^5023302
- ;;^UTILITY(U,$J,358.3,25326,0)
- ;;=S24.132S^^77^1016^27
- ;;^UTILITY(U,$J,358.3,25326,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25326,1,3,0)
- ;;=3^SCI T2-T6 Anterior Cord Syndrome,Sequela
- ;;^UTILITY(U,$J,358.3,25326,1,4,0)
- ;;=4^S24.132S
- ;;^UTILITY(U,$J,358.3,25326,2)
- ;;=^5023305
- ;;^UTILITY(U,$J,358.3,25327,0)
- ;;=S24.133S^^77^1016^31
- ;;^UTILITY(U,$J,358.3,25327,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25327,1,3,0)
- ;;=3^SCI T7-T10 Anterior Cord Syndrome,Sequela
- ;;^UTILITY(U,$J,358.3,25327,1,4,0)
- ;;=4^S24.133S
- ;;^UTILITY(U,$J,358.3,25327,2)
- ;;=^5023308
- ;;^UTILITY(U,$J,358.3,25328,0)
- ;;=S24.134S^^77^1016^23
- ;;^UTILITY(U,$J,358.3,25328,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25328,1,3,0)
- ;;=3^SCI T11-T12 Anterior Cord Syndrome,Sequela
- ;;^UTILITY(U,$J,358.3,25328,1,4,0)
- ;;=4^S24.134S
- ;;^UTILITY(U,$J,358.3,25328,2)
- ;;=^5023311
- ;;^UTILITY(U,$J,358.3,25329,0)
- ;;=S24.151S^^77^1016^21
- ;;^UTILITY(U,$J,358.3,25329,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25329,1,3,0)
- ;;=3^SCI T1 Other Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25329,1,4,0)
- ;;=4^S24.151S
- ;;^UTILITY(U,$J,358.3,25329,2)
- ;;=^5023332
- ;;^UTILITY(U,$J,358.3,25330,0)
- ;;=S24.152S^^77^1016^29
- ;;^UTILITY(U,$J,358.3,25330,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25330,1,3,0)
- ;;=3^SCI T2-T6 Other Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25330,1,4,0)
- ;;=4^S24.152S
- ;;^UTILITY(U,$J,358.3,25330,2)
- ;;=^5023335
- ;;^UTILITY(U,$J,358.3,25331,0)
- ;;=S24.153S^^77^1016^33
- ;;^UTILITY(U,$J,358.3,25331,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25331,1,3,0)
- ;;=3^SCI T7-T10 Other Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25331,1,4,0)
- ;;=4^S24.153S
- ;;^UTILITY(U,$J,358.3,25331,2)
- ;;=^5023338
- ;;^UTILITY(U,$J,358.3,25332,0)
- ;;=S24.154S^^77^1016^25
- ;;^UTILITY(U,$J,358.3,25332,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25332,1,3,0)
- ;;=3^SCI T11-T12 Other Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25332,1,4,0)
- ;;=4^S24.154S
- ;;^UTILITY(U,$J,358.3,25332,2)
- ;;=^5023341
- ;;^UTILITY(U,$J,358.3,25333,0)
- ;;=S24.101S^^77^1016^22
- ;;^UTILITY(U,$J,358.3,25333,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25333,1,3,0)
- ;;=3^SCI T1 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25333,1,4,0)
- ;;=4^S24.101S
- ;;^UTILITY(U,$J,358.3,25333,2)
- ;;=^5023275
- ;;^UTILITY(U,$J,358.3,25334,0)
- ;;=S24.102S^^77^1016^30
- ;;^UTILITY(U,$J,358.3,25334,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25334,1,3,0)
- ;;=3^SCI T2-T6 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25334,1,4,0)
- ;;=4^S24.102S
- ;;^UTILITY(U,$J,358.3,25334,2)
- ;;=^5023278
- ;;^UTILITY(U,$J,358.3,25335,0)
- ;;=S24.103S^^77^1016^34
- ;;^UTILITY(U,$J,358.3,25335,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25335,1,3,0)
- ;;=3^SCI T7-T10 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25335,1,4,0)
- ;;=4^S24.103S
- ;;^UTILITY(U,$J,358.3,25335,2)
- ;;=^5023281
- ;;^UTILITY(U,$J,358.3,25336,0)
- ;;=S24.104S^^77^1016^26
- ;;^UTILITY(U,$J,358.3,25336,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25336,1,3,0)
- ;;=3^SCI T11-T12 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25336,1,4,0)
- ;;=4^S24.104S
- ;;^UTILITY(U,$J,358.3,25336,2)
- ;;=^5023284
- ;;^UTILITY(U,$J,358.3,25337,0)
- ;;=S24.109S^^77^1016^35
- ;;^UTILITY(U,$J,358.3,25337,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25337,1,3,0)
- ;;=3^SCI Unspec Thoracic,Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25337,1,4,0)
- ;;=4^S24.109S
- ;;^UTILITY(U,$J,358.3,25337,2)
- ;;=^5134384
- ;;^UTILITY(U,$J,358.3,25338,0)
- ;;=S34.111S^^77^1016^4
- ;;^UTILITY(U,$J,358.3,25338,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25338,1,3,0)
- ;;=3^SCI L1 Complete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25338,1,4,0)
- ;;=4^S34.111S
- ;;^UTILITY(U,$J,358.3,25338,2)
- ;;=^5025207
- ;;^UTILITY(U,$J,358.3,25339,0)
- ;;=S34.112S^^77^1016^7
- ;;^UTILITY(U,$J,358.3,25339,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25339,1,3,0)
- ;;=3^SCI L2 Complete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25339,1,4,0)
- ;;=4^S34.112S
- ;;^UTILITY(U,$J,358.3,25339,2)
- ;;=^5025210
- ;;^UTILITY(U,$J,358.3,25340,0)
- ;;=S34.113S^^77^1016^10
- ;;^UTILITY(U,$J,358.3,25340,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25340,1,3,0)
- ;;=3^SCI L3 Complete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25340,1,4,0)
- ;;=4^S34.113S
- ;;^UTILITY(U,$J,358.3,25340,2)
- ;;=^5025213
- ;;^UTILITY(U,$J,358.3,25341,0)
- ;;=S34.114S^^77^1016^13
- ;;^UTILITY(U,$J,358.3,25341,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25341,1,3,0)
- ;;=3^SCI L4 Complete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25341,1,4,0)
- ;;=4^S34.114S
- ;;^UTILITY(U,$J,358.3,25341,2)
- ;;=^5025216
- ;;^UTILITY(U,$J,358.3,25342,0)
- ;;=S34.115S^^77^1016^16
- ;;^UTILITY(U,$J,358.3,25342,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25342,1,3,0)
- ;;=3^SCI L5 Complete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25342,1,4,0)
- ;;=4^S34.115S
- ;;^UTILITY(U,$J,358.3,25342,2)
- ;;=^5025219
- ;;^UTILITY(U,$J,358.3,25343,0)
- ;;=S34.121S^^77^1016^5
- ;;^UTILITY(U,$J,358.3,25343,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25343,1,3,0)
- ;;=3^SCI L1 Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25343,1,4,0)
- ;;=4^S34.121S
- ;;^UTILITY(U,$J,358.3,25343,2)
- ;;=^5025225
- ;;^UTILITY(U,$J,358.3,25344,0)
- ;;=S34.122S^^77^1016^8
- ;;^UTILITY(U,$J,358.3,25344,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25344,1,3,0)
- ;;=3^SCI L2 Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25344,1,4,0)
- ;;=4^S34.122S
- ;;^UTILITY(U,$J,358.3,25344,2)
- ;;=^5025228
- ;;^UTILITY(U,$J,358.3,25345,0)
- ;;=S34.123S^^77^1016^11
- ;;^UTILITY(U,$J,358.3,25345,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25345,1,3,0)
- ;;=3^SCI L3 Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25345,1,4,0)
- ;;=4^S34.123S
- ;;^UTILITY(U,$J,358.3,25345,2)
- ;;=^5025231
- ;;^UTILITY(U,$J,358.3,25346,0)
- ;;=S34.124S^^77^1016^14
- ;;^UTILITY(U,$J,358.3,25346,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25346,1,3,0)
- ;;=3^SCI L4 Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25346,1,4,0)
- ;;=4^S34.124S
- ;;^UTILITY(U,$J,358.3,25346,2)
- ;;=^5025234
- ;;^UTILITY(U,$J,358.3,25347,0)
- ;;=S34.125S^^77^1016^17
- ;;^UTILITY(U,$J,358.3,25347,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25347,1,3,0)
- ;;=3^SCI L5 Incomplete Lesion,Sequela
- ;;^UTILITY(U,$J,358.3,25347,1,4,0)
- ;;=4^S34.125S
- ;;^UTILITY(U,$J,358.3,25347,2)
- ;;=^5025237
- ;;^UTILITY(U,$J,358.3,25348,0)
- ;;=S34.101S^^77^1016^6
- ;;^UTILITY(U,$J,358.3,25348,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25348,1,3,0)
- ;;=3^SCI L1 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25348,1,4,0)
- ;;=4^S34.101S
- ;;^UTILITY(U,$J,358.3,25348,2)
- ;;=^5025192
- ;;^UTILITY(U,$J,358.3,25349,0)
- ;;=S34.102S^^77^1016^9
- ;;^UTILITY(U,$J,358.3,25349,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25349,1,3,0)
- ;;=3^SCI L2 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25349,1,4,0)
- ;;=4^S34.102S
- ;;^UTILITY(U,$J,358.3,25349,2)
- ;;=^5025195
- ;;^UTILITY(U,$J,358.3,25350,0)
- ;;=S34.103S^^77^1016^12
- ;;^UTILITY(U,$J,358.3,25350,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25350,1,3,0)
- ;;=3^SCI L3 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25350,1,4,0)
- ;;=4^S34.103S
- ;;^UTILITY(U,$J,358.3,25350,2)
- ;;=^5025198
- ;;^UTILITY(U,$J,358.3,25351,0)
- ;;=S34.104S^^77^1016^15
- ;;^UTILITY(U,$J,358.3,25351,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25351,1,3,0)
- ;;=3^SCI L4 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25351,1,4,0)
- ;;=4^S34.104S
- ;;^UTILITY(U,$J,358.3,25351,2)
- ;;=^5025201
- ;;^UTILITY(U,$J,358.3,25352,0)
- ;;=S34.105S^^77^1016^18
- ;;^UTILITY(U,$J,358.3,25352,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25352,1,3,0)
- ;;=3^SCI L5 Unspec Injury,Sequela
- ;;^UTILITY(U,$J,358.3,25352,1,4,0)
- ;;=4^S34.105S
- ;;^UTILITY(U,$J,358.3,25352,2)
- ;;=^5025204
- ;;^UTILITY(U,$J,358.3,25353,0)
- ;;=G82.21^^77^1016^1
- ;;^UTILITY(U,$J,358.3,25353,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25353,1,3,0)
- ;;=3^Paraplegia,Complete
- ;;^UTILITY(U,$J,358.3,25353,1,4,0)
- ;;=4^G82.21
- ;;^UTILITY(U,$J,358.3,25353,2)
- ;;=^5004126
- ;;^UTILITY(U,$J,358.3,25354,0)
- ;;=G82.22^^77^1016^2
- ;;^UTILITY(U,$J,358.3,25354,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25354,1,3,0)
- ;;=3^Paraplegia,Incomplete
- ;;^UTILITY(U,$J,358.3,25354,1,4,0)
- ;;=4^G82.22
- ;;^UTILITY(U,$J,358.3,25354,2)
- ;;=^5004127
- ;;^UTILITY(U,$J,358.3,25355,0)
- ;;=G82.51^^77^1017^1
- ;;^UTILITY(U,$J,358.3,25355,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25355,1,3,0)
- ;;=3^Quadriplegia,C1-C4,Complete
- ;;^UTILITY(U,$J,358.3,25355,1,4,0)
- ;;=4^G82.51
- ;;^UTILITY(U,$J,358.3,25355,2)
- ;;=^5004129
- ;;^UTILITY(U,$J,358.3,25356,0)
- ;;=G82.52^^77^1017^2
- ;;^UTILITY(U,$J,358.3,25356,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25356,1,3,0)
- ;;=3^Quadriplegia,C1-C4,Incomplete
- ;;^UTILITY(U,$J,358.3,25356,1,4,0)
- ;;=4^G82.52
- ;;^UTILITY(U,$J,358.3,25356,2)
- ;;=^5004130
- ;;^UTILITY(U,$J,358.3,25357,0)
- ;;=G82.53^^77^1017^3
- ;;^UTILITY(U,$J,358.3,25357,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25357,1,3,0)
- ;;=3^Quadriplegia,C5-C7,Complete
- ;;^UTILITY(U,$J,358.3,25357,1,4,0)
- ;;=4^G82.53
- ;;^UTILITY(U,$J,358.3,25357,2)
- ;;=^5004131
- ;;^UTILITY(U,$J,358.3,25358,0)
- ;;=G82.54^^77^1017^4
- ;;^UTILITY(U,$J,358.3,25358,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25358,1,3,0)
- ;;=3^Quadriplegia,C5-C7,Incomplete
- ;;^UTILITY(U,$J,358.3,25358,1,4,0)
- ;;=4^G82.54
- ;;^UTILITY(U,$J,358.3,25358,2)
- ;;=^5004132
- ;;^UTILITY(U,$J,358.3,25359,0)
- ;;=G82.50^^77^1017^5
- ;;^UTILITY(U,$J,358.3,25359,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25359,1,3,0)
- ;;=3^Quadriplegia,Unspec
- ;;^UTILITY(U,$J,358.3,25359,1,4,0)
- ;;=4^G82.50
- ;;^UTILITY(U,$J,358.3,25359,2)
- ;;=^5004128
- ;;^UTILITY(U,$J,358.3,25360,0)
- ;;=L89.010^^77^1018^74
- ;;^UTILITY(U,$J,358.3,25360,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25360,1,3,0)
- ;;=3^Pressure Ulcer Right Elbow,Unstageable
- ;;^UTILITY(U,$J,358.3,25360,1,4,0)
- ;;=4^L89.010
- ;;^UTILITY(U,$J,358.3,25360,2)
- ;;=^5009337
- ;;^UTILITY(U,$J,358.3,25361,0)
- ;;=L89.011^^77^1018^69
- ;;^UTILITY(U,$J,358.3,25361,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25361,1,3,0)
- ;;=3^Pressure Ulcer Right Elbow,Stage 1
- ;;^UTILITY(U,$J,358.3,25361,1,4,0)
- ;;=4^L89.011
- ;;^UTILITY(U,$J,358.3,25361,2)
- ;;=^5009338
- ;;^UTILITY(U,$J,358.3,25362,0)
- ;;=L89.012^^77^1018^70
- ;;^UTILITY(U,$J,358.3,25362,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25362,1,3,0)
- ;;=3^Pressure Ulcer Right Elbow,Stage 2
- ;;^UTILITY(U,$J,358.3,25362,1,4,0)
- ;;=4^L89.012
- ;;^UTILITY(U,$J,358.3,25362,2)
- ;;=^5009339
- ;;^UTILITY(U,$J,358.3,25363,0)
- ;;=L89.013^^77^1018^71
- ;;^UTILITY(U,$J,358.3,25363,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25363,1,3,0)
- ;;=3^Pressure Ulcer Right Elbow,Stage 3
- ;;^UTILITY(U,$J,358.3,25363,1,4,0)
- ;;=4^L89.013
- ;;^UTILITY(U,$J,358.3,25363,2)
- ;;=^5009340
- ;;^UTILITY(U,$J,358.3,25364,0)
- ;;=L89.014^^77^1018^72
- ;;^UTILITY(U,$J,358.3,25364,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25364,1,3,0)
- ;;=3^Pressure Ulcer Right Elbow,Stage 4
- ;;^UTILITY(U,$J,358.3,25364,1,4,0)
- ;;=4^L89.014
- ;;^UTILITY(U,$J,358.3,25364,2)
- ;;=^5009341
- ;;^UTILITY(U,$J,358.3,25365,0)
- ;;=L89.019^^77^1018^73
- ;;^UTILITY(U,$J,358.3,25365,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25365,1,3,0)
- ;;=3^Pressure Ulcer Right Elbow,Stage Unspec
- ;;^UTILITY(U,$J,358.3,25365,1,4,0)
- ;;=4^L89.019
- ;;^UTILITY(U,$J,358.3,25365,2)
- ;;=^5133648
- ;;^UTILITY(U,$J,358.3,25366,0)
- ;;=L89.020^^77^1018^32
- ;;^UTILITY(U,$J,358.3,25366,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25366,1,3,0)
- ;;=3^Pressure Ulcer Left Elbow,Unstageable
- ;;^UTILITY(U,$J,358.3,25366,1,4,0)
- ;;=4^L89.020
- ;;^UTILITY(U,$J,358.3,25366,2)
- ;;=^5009342
- ;;^UTILITY(U,$J,358.3,25367,0)
- ;;=L89.021^^77^1018^27
- ;;^UTILITY(U,$J,358.3,25367,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25367,1,3,0)
- ;;=3^Pressure Ulcer Left Elbow,Stage 1
- ;;^UTILITY(U,$J,358.3,25367,1,4,0)
- ;;=4^L89.021
- ;;^UTILITY(U,$J,358.3,25367,2)
- ;;=^5009343
- ;;^UTILITY(U,$J,358.3,25368,0)
- ;;=L89.022^^77^1018^28
- ;;^UTILITY(U,$J,358.3,25368,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25368,1,3,0)
- ;;=3^Pressure Ulcer Left Elbow,Stage 2
- ;;^UTILITY(U,$J,358.3,25368,1,4,0)
- ;;=4^L89.022
- ;;^UTILITY(U,$J,358.3,25368,2)
- ;;=^5009344
- ;;^UTILITY(U,$J,358.3,25369,0)
- ;;=L89.023^^77^1018^29
- ;;^UTILITY(U,$J,358.3,25369,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25369,1,3,0)
- ;;=3^Pressure Ulcer Left Elbow,Stage 3
- ;;^UTILITY(U,$J,358.3,25369,1,4,0)
- ;;=4^L89.023
- ;;^UTILITY(U,$J,358.3,25369,2)
- ;;=^5009345
- ;;^UTILITY(U,$J,358.3,25370,0)
- ;;=L89.024^^77^1018^30
- ;;^UTILITY(U,$J,358.3,25370,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25370,1,3,0)
- ;;=3^Pressure Ulcer Left Elbow,Stage 4
- ;;^UTILITY(U,$J,358.3,25370,1,4,0)
- ;;=4^L89.024
- ;;^UTILITY(U,$J,358.3,25370,2)
- ;;=^5009346
- ;;^UTILITY(U,$J,358.3,25371,0)
- ;;=L89.029^^77^1018^31
- ;;^UTILITY(U,$J,358.3,25371,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25371,1,3,0)
- ;;=3^Pressure Ulcer Left Elbow,Stage Unspec
- ;;^UTILITY(U,$J,358.3,25371,1,4,0)
- ;;=4^L89.029
- ;;^UTILITY(U,$J,358.3,25371,2)
- ;;=^5133649
- ;;^UTILITY(U,$J,358.3,25372,0)
- ;;=L89.119^^77^1018^97
- ;;^UTILITY(U,$J,358.3,25372,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25372,1,3,0)
- ;;=3^Pressure Ulcer Right Upper Back,Stage Unspec
- ;;^UTILITY(U,$J,358.3,25372,1,4,0)
- ;;=4^L89.119
- ;;^UTILITY(U,$J,358.3,25372,2)
- ;;=^5009357
- ;;^UTILITY(U,$J,358.3,25373,0)
- ;;=L89.110^^77^1018^98
- ;;^UTILITY(U,$J,358.3,25373,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25373,1,3,0)
- ;;=3^Pressure Ulcer Right Upper Back,Unstageable
- ;;^UTILITY(U,$J,358.3,25373,1,4,0)
- ;;=4^L89.110
- ;;^UTILITY(U,$J,358.3,25373,2)
- ;;=^5009352
- ;;^UTILITY(U,$J,358.3,25374,0)
- ;;=L89.111^^77^1018^93
- ;;^UTILITY(U,$J,358.3,25374,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25374,1,3,0)
- ;;=3^Pressure Ulcer Right Upper Back,Stage 1
- ;;^UTILITY(U,$J,358.3,25374,1,4,0)
- ;;=4^L89.111
- ;;^UTILITY(U,$J,358.3,25374,2)
- ;;=^5009353
- ;;^UTILITY(U,$J,358.3,25375,0)
- ;;=L89.112^^77^1018^94
- ;;^UTILITY(U,$J,358.3,25375,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25375,1,3,0)
- ;;=3^Pressure Ulcer Right Upper Back,Stage 2
- ;;^UTILITY(U,$J,358.3,25375,1,4,0)
- ;;=4^L89.112
- ;;^UTILITY(U,$J,358.3,25375,2)
- ;;=^5009354
- ;;^UTILITY(U,$J,358.3,25376,0)
- ;;=L89.113^^77^1018^95
- ;;^UTILITY(U,$J,358.3,25376,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25376,1,3,0)
- ;;=3^Pressure Ulcer Right Upper Back,Stage 3
- ;;^UTILITY(U,$J,358.3,25376,1,4,0)
- ;;=4^L89.113
- ;;^UTILITY(U,$J,358.3,25376,2)
- ;;=^5009355
- ;;^UTILITY(U,$J,358.3,25377,0)
- ;;=L89.114^^77^1018^96
- ;;^UTILITY(U,$J,358.3,25377,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25377,1,3,0)
- ;;=3^Pressure Ulcer Right Upper Back,Stage 4
- ;;^UTILITY(U,$J,358.3,25377,1,4,0)
- ;;=4^L89.114
- ;;^UTILITY(U,$J,358.3,25377,2)
- ;;=^5009356
- ;;^UTILITY(U,$J,358.3,25378,0)
- ;;=L89.129^^77^1018^55
- ;;^UTILITY(U,$J,358.3,25378,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25378,1,3,0)
- ;;=3^Pressure Ulcer Left Upper Back,Stage Unspec
- ;;^UTILITY(U,$J,358.3,25378,1,4,0)
- ;;=4^L89.129
- ;;^UTILITY(U,$J,358.3,25378,2)
- ;;=^5133652
- ;;^UTILITY(U,$J,358.3,25379,0)
- ;;=L89.120^^77^1018^56
- ;;^UTILITY(U,$J,358.3,25379,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25379,1,3,0)
- ;;=3^Pressure Ulcer Left Upper Back,Unstageable
- ;;^UTILITY(U,$J,358.3,25379,1,4,0)
- ;;=4^L89.120
- ;;^UTILITY(U,$J,358.3,25379,2)
- ;;=^5009358
- ;;^UTILITY(U,$J,358.3,25380,0)
- ;;=L89.121^^77^1018^51
- ;;^UTILITY(U,$J,358.3,25380,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25380,1,3,0)
- ;;=3^Pressure Ulcer Left Upper Back,Stage 1
- ;;^UTILITY(U,$J,358.3,25380,1,4,0)
- ;;=4^L89.121
- ;;^UTILITY(U,$J,358.3,25380,2)
- ;;=^5009359
- ;;^UTILITY(U,$J,358.3,25381,0)
- ;;=L89.122^^77^1018^52
- ;;^UTILITY(U,$J,358.3,25381,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25381,1,3,0)
- ;;=3^Pressure Ulcer Left Upper Back,Stage 2
- ;;^UTILITY(U,$J,358.3,25381,1,4,0)
- ;;=4^L89.122
- ;;^UTILITY(U,$J,358.3,25381,2)
- ;;=^5009360
- ;;^UTILITY(U,$J,358.3,25382,0)
- ;;=L89.123^^77^1018^53
- ;;^UTILITY(U,$J,358.3,25382,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25382,1,3,0)
- ;;=3^Pressure Ulcer Left Upper Back,Stage 3
- ;;^UTILITY(U,$J,358.3,25382,1,4,0)
- ;;=4^L89.123
- ;;^UTILITY(U,$J,358.3,25382,2)
- ;;=^5009361
- ;;^UTILITY(U,$J,358.3,25383,0)
- ;;=L89.124^^77^1018^54
- ;;^UTILITY(U,$J,358.3,25383,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25383,1,3,0)
- ;;=3^Pressure Ulcer Left Upper Back,Stage 4
- ;;^UTILITY(U,$J,358.3,25383,1,4,0)
- ;;=4^L89.124
- ;;^UTILITY(U,$J,358.3,25383,2)
- ;;=^5009362
- ;;^UTILITY(U,$J,358.3,25384,0)
- ;;=L89.130^^77^1018^92
- ;;^UTILITY(U,$J,358.3,25384,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25384,1,3,0)
- ;;=3^Pressure Ulcer Right Lower Back,Unstageable
- ;;^UTILITY(U,$J,358.3,25384,1,4,0)
- ;;=4^L89.130
- ;;^UTILITY(U,$J,358.3,25384,2)
- ;;=^5009363
- ;;^UTILITY(U,$J,358.3,25385,0)
- ;;=L89.139^^77^1018^91
- ;;^UTILITY(U,$J,358.3,25385,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25385,1,3,0)
- ;;=3^Pressure Ulcer Right Lower Back,Stage Unspec
- ;;^UTILITY(U,$J,358.3,25385,1,4,0)
- ;;=4^L89.139
- ;;^UTILITY(U,$J,358.3,25385,2)
- ;;=^5133653
- ;;^UTILITY(U,$J,358.3,25386,0)
- ;;=L89.131^^77^1018^87
- ;;^UTILITY(U,$J,358.3,25386,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25386,1,3,0)
- ;;=3^Pressure Ulcer Right Lower Back,Stage 1
- ;;^UTILITY(U,$J,358.3,25386,1,4,0)
- ;;=4^L89.131
- ;;^UTILITY(U,$J,358.3,25386,2)
- ;;=^5009364
- ;;^UTILITY(U,$J,358.3,25387,0)
- ;;=L89.132^^77^1018^88
- ;;^UTILITY(U,$J,358.3,25387,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25387,1,3,0)
- ;;=3^Pressure Ulcer Right Lower Back,Stage 2
- ;;^UTILITY(U,$J,358.3,25387,1,4,0)
- ;;=4^L89.132
- ;;^UTILITY(U,$J,358.3,25387,2)
- ;;=^5009365
- ;;^UTILITY(U,$J,358.3,25388,0)
- ;;=L89.133^^77^1018^89
- ;;^UTILITY(U,$J,358.3,25388,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25388,1,3,0)
- ;;=3^Pressure Ulcer Right Lower Back,Stage 3
- ;;^UTILITY(U,$J,358.3,25388,1,4,0)
- ;;=4^L89.133
- ;;^UTILITY(U,$J,358.3,25388,2)
- ;;=^5009366
- ;;^UTILITY(U,$J,358.3,25389,0)
- ;;=L89.134^^77^1018^90
- ;;^UTILITY(U,$J,358.3,25389,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25389,1,3,0)
- ;;=3^Pressure Ulcer Right Lower Back,Stage 4
- ;;^UTILITY(U,$J,358.3,25389,1,4,0)
- ;;=4^L89.134
- ;;^UTILITY(U,$J,358.3,25389,2)
- ;;=^5009367
- ;;^UTILITY(U,$J,358.3,25390,0)
- ;;=L89.140^^77^1018^50
- ;;^UTILITY(U,$J,358.3,25390,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25390,1,3,0)
- ;;=3^Pressure Ulcer Left Lower Back,Unstageable
- ;;^UTILITY(U,$J,358.3,25390,1,4,0)
- ;;=4^L89.140
- ;;^UTILITY(U,$J,358.3,25390,2)
- ;;=^5133655
- ;;^UTILITY(U,$J,358.3,25391,0)
- ;;=L89.149^^77^1018^49
- ;;^UTILITY(U,$J,358.3,25391,1,0)
- ;;=^358.31IA^4^2
- ;;^UTILITY(U,$J,358.3,25391,1,3,0)
- ;;=3^Pressure Ulcer Left Lower Back,Stage Unspec
- ;;^UTILITY(U,$J,358.3,25391,1,4,0)
- ;;=4^L89.149
- ;;^UTILITY(U,$J,358.3,25391,2)
- ;;=^5133654
- ;;^UTILITY(U,$J,358.3,25392,0)
- ;;=L89.141^^77^1018^45
- ;;^UTILITY(U,$J,358.3,25392,1,0)
- ;;=^358.31IA^4^2
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0AC 19774 printed Jan 18, 2025@02:46 Page 2
- IBDEI0AC ; ; 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,25325,1,3,0)
- +2 ;;=3^SCI T1 Anterior Cord Syndrome,Sequela
- +3 ;;^UTILITY(U,$J,358.3,25325,1,4,0)
- +4 ;;=4^S24.131S
- +5 ;;^UTILITY(U,$J,358.3,25325,2)
- +6 ;;=^5023302
- +7 ;;^UTILITY(U,$J,358.3,25326,0)
- +8 ;;=S24.132S^^77^1016^27
- +9 ;;^UTILITY(U,$J,358.3,25326,1,0)
- +10 ;;=^358.31IA^4^2
- +11 ;;^UTILITY(U,$J,358.3,25326,1,3,0)
- +12 ;;=3^SCI T2-T6 Anterior Cord Syndrome,Sequela
- +13 ;;^UTILITY(U,$J,358.3,25326,1,4,0)
- +14 ;;=4^S24.132S
- +15 ;;^UTILITY(U,$J,358.3,25326,2)
- +16 ;;=^5023305
- +17 ;;^UTILITY(U,$J,358.3,25327,0)
- +18 ;;=S24.133S^^77^1016^31
- +19 ;;^UTILITY(U,$J,358.3,25327,1,0)
- +20 ;;=^358.31IA^4^2
- +21 ;;^UTILITY(U,$J,358.3,25327,1,3,0)
- +22 ;;=3^SCI T7-T10 Anterior Cord Syndrome,Sequela
- +23 ;;^UTILITY(U,$J,358.3,25327,1,4,0)
- +24 ;;=4^S24.133S
- +25 ;;^UTILITY(U,$J,358.3,25327,2)
- +26 ;;=^5023308
- +27 ;;^UTILITY(U,$J,358.3,25328,0)
- +28 ;;=S24.134S^^77^1016^23
- +29 ;;^UTILITY(U,$J,358.3,25328,1,0)
- +30 ;;=^358.31IA^4^2
- +31 ;;^UTILITY(U,$J,358.3,25328,1,3,0)
- +32 ;;=3^SCI T11-T12 Anterior Cord Syndrome,Sequela
- +33 ;;^UTILITY(U,$J,358.3,25328,1,4,0)
- +34 ;;=4^S24.134S
- +35 ;;^UTILITY(U,$J,358.3,25328,2)
- +36 ;;=^5023311
- +37 ;;^UTILITY(U,$J,358.3,25329,0)
- +38 ;;=S24.151S^^77^1016^21
- +39 ;;^UTILITY(U,$J,358.3,25329,1,0)
- +40 ;;=^358.31IA^4^2
- +41 ;;^UTILITY(U,$J,358.3,25329,1,3,0)
- +42 ;;=3^SCI T1 Other Incomplete Lesion,Sequela
- +43 ;;^UTILITY(U,$J,358.3,25329,1,4,0)
- +44 ;;=4^S24.151S
- +45 ;;^UTILITY(U,$J,358.3,25329,2)
- +46 ;;=^5023332
- +47 ;;^UTILITY(U,$J,358.3,25330,0)
- +48 ;;=S24.152S^^77^1016^29
- +49 ;;^UTILITY(U,$J,358.3,25330,1,0)
- +50 ;;=^358.31IA^4^2
- +51 ;;^UTILITY(U,$J,358.3,25330,1,3,0)
- +52 ;;=3^SCI T2-T6 Other Incomplete Lesion,Sequela
- +53 ;;^UTILITY(U,$J,358.3,25330,1,4,0)
- +54 ;;=4^S24.152S
- +55 ;;^UTILITY(U,$J,358.3,25330,2)
- +56 ;;=^5023335
- +57 ;;^UTILITY(U,$J,358.3,25331,0)
- +58 ;;=S24.153S^^77^1016^33
- +59 ;;^UTILITY(U,$J,358.3,25331,1,0)
- +60 ;;=^358.31IA^4^2
- +61 ;;^UTILITY(U,$J,358.3,25331,1,3,0)
- +62 ;;=3^SCI T7-T10 Other Incomplete Lesion,Sequela
- +63 ;;^UTILITY(U,$J,358.3,25331,1,4,0)
- +64 ;;=4^S24.153S
- +65 ;;^UTILITY(U,$J,358.3,25331,2)
- +66 ;;=^5023338
- +67 ;;^UTILITY(U,$J,358.3,25332,0)
- +68 ;;=S24.154S^^77^1016^25
- +69 ;;^UTILITY(U,$J,358.3,25332,1,0)
- +70 ;;=^358.31IA^4^2
- +71 ;;^UTILITY(U,$J,358.3,25332,1,3,0)
- +72 ;;=3^SCI T11-T12 Other Incomplete Lesion,Sequela
- +73 ;;^UTILITY(U,$J,358.3,25332,1,4,0)
- +74 ;;=4^S24.154S
- +75 ;;^UTILITY(U,$J,358.3,25332,2)
- +76 ;;=^5023341
- +77 ;;^UTILITY(U,$J,358.3,25333,0)
- +78 ;;=S24.101S^^77^1016^22
- +79 ;;^UTILITY(U,$J,358.3,25333,1,0)
- +80 ;;=^358.31IA^4^2
- +81 ;;^UTILITY(U,$J,358.3,25333,1,3,0)
- +82 ;;=3^SCI T1 Unspec Injury,Sequela
- +83 ;;^UTILITY(U,$J,358.3,25333,1,4,0)
- +84 ;;=4^S24.101S
- +85 ;;^UTILITY(U,$J,358.3,25333,2)
- +86 ;;=^5023275
- +87 ;;^UTILITY(U,$J,358.3,25334,0)
- +88 ;;=S24.102S^^77^1016^30
- +89 ;;^UTILITY(U,$J,358.3,25334,1,0)
- +90 ;;=^358.31IA^4^2
- +91 ;;^UTILITY(U,$J,358.3,25334,1,3,0)
- +92 ;;=3^SCI T2-T6 Unspec Injury,Sequela
- +93 ;;^UTILITY(U,$J,358.3,25334,1,4,0)
- +94 ;;=4^S24.102S
- +95 ;;^UTILITY(U,$J,358.3,25334,2)
- +96 ;;=^5023278
- +97 ;;^UTILITY(U,$J,358.3,25335,0)
- +98 ;;=S24.103S^^77^1016^34
- +99 ;;^UTILITY(U,$J,358.3,25335,1,0)
- +100 ;;=^358.31IA^4^2
- +101 ;;^UTILITY(U,$J,358.3,25335,1,3,0)
- +102 ;;=3^SCI T7-T10 Unspec Injury,Sequela
- +103 ;;^UTILITY(U,$J,358.3,25335,1,4,0)
- +104 ;;=4^S24.103S
- +105 ;;^UTILITY(U,$J,358.3,25335,2)
- +106 ;;=^5023281
- +107 ;;^UTILITY(U,$J,358.3,25336,0)
- +108 ;;=S24.104S^^77^1016^26
- +109 ;;^UTILITY(U,$J,358.3,25336,1,0)
- +110 ;;=^358.31IA^4^2
- +111 ;;^UTILITY(U,$J,358.3,25336,1,3,0)
- +112 ;;=3^SCI T11-T12 Unspec Injury,Sequela
- +113 ;;^UTILITY(U,$J,358.3,25336,1,4,0)
- +114 ;;=4^S24.104S
- +115 ;;^UTILITY(U,$J,358.3,25336,2)
- +116 ;;=^5023284
- +117 ;;^UTILITY(U,$J,358.3,25337,0)
- +118 ;;=S24.109S^^77^1016^35
- +119 ;;^UTILITY(U,$J,358.3,25337,1,0)
- +120 ;;=^358.31IA^4^2
- +121 ;;^UTILITY(U,$J,358.3,25337,1,3,0)
- +122 ;;=3^SCI Unspec Thoracic,Unspec Injury,Sequela
- +123 ;;^UTILITY(U,$J,358.3,25337,1,4,0)
- +124 ;;=4^S24.109S
- +125 ;;^UTILITY(U,$J,358.3,25337,2)
- +126 ;;=^5134384
- +127 ;;^UTILITY(U,$J,358.3,25338,0)
- +128 ;;=S34.111S^^77^1016^4
- +129 ;;^UTILITY(U,$J,358.3,25338,1,0)
- +130 ;;=^358.31IA^4^2
- +131 ;;^UTILITY(U,$J,358.3,25338,1,3,0)
- +132 ;;=3^SCI L1 Complete Lesion,Sequela
- +133 ;;^UTILITY(U,$J,358.3,25338,1,4,0)
- +134 ;;=4^S34.111S
- +135 ;;^UTILITY(U,$J,358.3,25338,2)
- +136 ;;=^5025207
- +137 ;;^UTILITY(U,$J,358.3,25339,0)
- +138 ;;=S34.112S^^77^1016^7
- +139 ;;^UTILITY(U,$J,358.3,25339,1,0)
- +140 ;;=^358.31IA^4^2
- +141 ;;^UTILITY(U,$J,358.3,25339,1,3,0)
- +142 ;;=3^SCI L2 Complete Lesion,Sequela
- +143 ;;^UTILITY(U,$J,358.3,25339,1,4,0)
- +144 ;;=4^S34.112S
- +145 ;;^UTILITY(U,$J,358.3,25339,2)
- +146 ;;=^5025210
- +147 ;;^UTILITY(U,$J,358.3,25340,0)
- +148 ;;=S34.113S^^77^1016^10
- +149 ;;^UTILITY(U,$J,358.3,25340,1,0)
- +150 ;;=^358.31IA^4^2
- +151 ;;^UTILITY(U,$J,358.3,25340,1,3,0)
- +152 ;;=3^SCI L3 Complete Lesion,Sequela
- +153 ;;^UTILITY(U,$J,358.3,25340,1,4,0)
- +154 ;;=4^S34.113S
- +155 ;;^UTILITY(U,$J,358.3,25340,2)
- +156 ;;=^5025213
- +157 ;;^UTILITY(U,$J,358.3,25341,0)
- +158 ;;=S34.114S^^77^1016^13
- +159 ;;^UTILITY(U,$J,358.3,25341,1,0)
- +160 ;;=^358.31IA^4^2
- +161 ;;^UTILITY(U,$J,358.3,25341,1,3,0)
- +162 ;;=3^SCI L4 Complete Lesion,Sequela
- +163 ;;^UTILITY(U,$J,358.3,25341,1,4,0)
- +164 ;;=4^S34.114S
- +165 ;;^UTILITY(U,$J,358.3,25341,2)
- +166 ;;=^5025216
- +167 ;;^UTILITY(U,$J,358.3,25342,0)
- +168 ;;=S34.115S^^77^1016^16
- +169 ;;^UTILITY(U,$J,358.3,25342,1,0)
- +170 ;;=^358.31IA^4^2
- +171 ;;^UTILITY(U,$J,358.3,25342,1,3,0)
- +172 ;;=3^SCI L5 Complete Lesion,Sequela
- +173 ;;^UTILITY(U,$J,358.3,25342,1,4,0)
- +174 ;;=4^S34.115S
- +175 ;;^UTILITY(U,$J,358.3,25342,2)
- +176 ;;=^5025219
- +177 ;;^UTILITY(U,$J,358.3,25343,0)
- +178 ;;=S34.121S^^77^1016^5
- +179 ;;^UTILITY(U,$J,358.3,25343,1,0)
- +180 ;;=^358.31IA^4^2
- +181 ;;^UTILITY(U,$J,358.3,25343,1,3,0)
- +182 ;;=3^SCI L1 Incomplete Lesion,Sequela
- +183 ;;^UTILITY(U,$J,358.3,25343,1,4,0)
- +184 ;;=4^S34.121S
- +185 ;;^UTILITY(U,$J,358.3,25343,2)
- +186 ;;=^5025225
- +187 ;;^UTILITY(U,$J,358.3,25344,0)
- +188 ;;=S34.122S^^77^1016^8
- +189 ;;^UTILITY(U,$J,358.3,25344,1,0)
- +190 ;;=^358.31IA^4^2
- +191 ;;^UTILITY(U,$J,358.3,25344,1,3,0)
- +192 ;;=3^SCI L2 Incomplete Lesion,Sequela
- +193 ;;^UTILITY(U,$J,358.3,25344,1,4,0)
- +194 ;;=4^S34.122S
- +195 ;;^UTILITY(U,$J,358.3,25344,2)
- +196 ;;=^5025228
- +197 ;;^UTILITY(U,$J,358.3,25345,0)
- +198 ;;=S34.123S^^77^1016^11
- +199 ;;^UTILITY(U,$J,358.3,25345,1,0)
- +200 ;;=^358.31IA^4^2
- +201 ;;^UTILITY(U,$J,358.3,25345,1,3,0)
- +202 ;;=3^SCI L3 Incomplete Lesion,Sequela
- +203 ;;^UTILITY(U,$J,358.3,25345,1,4,0)
- +204 ;;=4^S34.123S
- +205 ;;^UTILITY(U,$J,358.3,25345,2)
- +206 ;;=^5025231
- +207 ;;^UTILITY(U,$J,358.3,25346,0)
- +208 ;;=S34.124S^^77^1016^14
- +209 ;;^UTILITY(U,$J,358.3,25346,1,0)
- +210 ;;=^358.31IA^4^2
- +211 ;;^UTILITY(U,$J,358.3,25346,1,3,0)
- +212 ;;=3^SCI L4 Incomplete Lesion,Sequela
- +213 ;;^UTILITY(U,$J,358.3,25346,1,4,0)
- +214 ;;=4^S34.124S
- +215 ;;^UTILITY(U,$J,358.3,25346,2)
- +216 ;;=^5025234
- +217 ;;^UTILITY(U,$J,358.3,25347,0)
- +218 ;;=S34.125S^^77^1016^17
- +219 ;;^UTILITY(U,$J,358.3,25347,1,0)
- +220 ;;=^358.31IA^4^2
- +221 ;;^UTILITY(U,$J,358.3,25347,1,3,0)
- +222 ;;=3^SCI L5 Incomplete Lesion,Sequela
- +223 ;;^UTILITY(U,$J,358.3,25347,1,4,0)
- +224 ;;=4^S34.125S
- +225 ;;^UTILITY(U,$J,358.3,25347,2)
- +226 ;;=^5025237
- +227 ;;^UTILITY(U,$J,358.3,25348,0)
- +228 ;;=S34.101S^^77^1016^6
- +229 ;;^UTILITY(U,$J,358.3,25348,1,0)
- +230 ;;=^358.31IA^4^2
- +231 ;;^UTILITY(U,$J,358.3,25348,1,3,0)
- +232 ;;=3^SCI L1 Unspec Injury,Sequela
- +233 ;;^UTILITY(U,$J,358.3,25348,1,4,0)
- +234 ;;=4^S34.101S
- +235 ;;^UTILITY(U,$J,358.3,25348,2)
- +236 ;;=^5025192
- +237 ;;^UTILITY(U,$J,358.3,25349,0)
- +238 ;;=S34.102S^^77^1016^9
- +239 ;;^UTILITY(U,$J,358.3,25349,1,0)
- +240 ;;=^358.31IA^4^2
- +241 ;;^UTILITY(U,$J,358.3,25349,1,3,0)
- +242 ;;=3^SCI L2 Unspec Injury,Sequela
- +243 ;;^UTILITY(U,$J,358.3,25349,1,4,0)
- +244 ;;=4^S34.102S
- +245 ;;^UTILITY(U,$J,358.3,25349,2)
- +246 ;;=^5025195
- +247 ;;^UTILITY(U,$J,358.3,25350,0)
- +248 ;;=S34.103S^^77^1016^12
- +249 ;;^UTILITY(U,$J,358.3,25350,1,0)
- +250 ;;=^358.31IA^4^2
- +251 ;;^UTILITY(U,$J,358.3,25350,1,3,0)
- +252 ;;=3^SCI L3 Unspec Injury,Sequela
- +253 ;;^UTILITY(U,$J,358.3,25350,1,4,0)
- +254 ;;=4^S34.103S
- +255 ;;^UTILITY(U,$J,358.3,25350,2)
- +256 ;;=^5025198
- +257 ;;^UTILITY(U,$J,358.3,25351,0)
- +258 ;;=S34.104S^^77^1016^15
- +259 ;;^UTILITY(U,$J,358.3,25351,1,0)
- +260 ;;=^358.31IA^4^2
- +261 ;;^UTILITY(U,$J,358.3,25351,1,3,0)
- +262 ;;=3^SCI L4 Unspec Injury,Sequela
- +263 ;;^UTILITY(U,$J,358.3,25351,1,4,0)
- +264 ;;=4^S34.104S
- +265 ;;^UTILITY(U,$J,358.3,25351,2)
- +266 ;;=^5025201
- +267 ;;^UTILITY(U,$J,358.3,25352,0)
- +268 ;;=S34.105S^^77^1016^18
- +269 ;;^UTILITY(U,$J,358.3,25352,1,0)
- +270 ;;=^358.31IA^4^2
- +271 ;;^UTILITY(U,$J,358.3,25352,1,3,0)
- +272 ;;=3^SCI L5 Unspec Injury,Sequela
- +273 ;;^UTILITY(U,$J,358.3,25352,1,4,0)
- +274 ;;=4^S34.105S
- +275 ;;^UTILITY(U,$J,358.3,25352,2)
- +276 ;;=^5025204
- +277 ;;^UTILITY(U,$J,358.3,25353,0)
- +278 ;;=G82.21^^77^1016^1
- +279 ;;^UTILITY(U,$J,358.3,25353,1,0)
- +280 ;;=^358.31IA^4^2
- +281 ;;^UTILITY(U,$J,358.3,25353,1,3,0)
- +282 ;;=3^Paraplegia,Complete
- +283 ;;^UTILITY(U,$J,358.3,25353,1,4,0)
- +284 ;;=4^G82.21
- +285 ;;^UTILITY(U,$J,358.3,25353,2)
- +286 ;;=^5004126
- +287 ;;^UTILITY(U,$J,358.3,25354,0)
- +288 ;;=G82.22^^77^1016^2
- +289 ;;^UTILITY(U,$J,358.3,25354,1,0)
- +290 ;;=^358.31IA^4^2
- +291 ;;^UTILITY(U,$J,358.3,25354,1,3,0)
- +292 ;;=3^Paraplegia,Incomplete
- +293 ;;^UTILITY(U,$J,358.3,25354,1,4,0)
- +294 ;;=4^G82.22
- +295 ;;^UTILITY(U,$J,358.3,25354,2)
- +296 ;;=^5004127
- +297 ;;^UTILITY(U,$J,358.3,25355,0)
- +298 ;;=G82.51^^77^1017^1
- +299 ;;^UTILITY(U,$J,358.3,25355,1,0)
- +300 ;;=^358.31IA^4^2
- +301 ;;^UTILITY(U,$J,358.3,25355,1,3,0)
- +302 ;;=3^Quadriplegia,C1-C4,Complete
- +303 ;;^UTILITY(U,$J,358.3,25355,1,4,0)
- +304 ;;=4^G82.51
- +305 ;;^UTILITY(U,$J,358.3,25355,2)
- +306 ;;=^5004129
- +307 ;;^UTILITY(U,$J,358.3,25356,0)
- +308 ;;=G82.52^^77^1017^2
- +309 ;;^UTILITY(U,$J,358.3,25356,1,0)
- +310 ;;=^358.31IA^4^2
- +311 ;;^UTILITY(U,$J,358.3,25356,1,3,0)
- +312 ;;=3^Quadriplegia,C1-C4,Incomplete
- +313 ;;^UTILITY(U,$J,358.3,25356,1,4,0)
- +314 ;;=4^G82.52
- +315 ;;^UTILITY(U,$J,358.3,25356,2)
- +316 ;;=^5004130
- +317 ;;^UTILITY(U,$J,358.3,25357,0)
- +318 ;;=G82.53^^77^1017^3
- +319 ;;^UTILITY(U,$J,358.3,25357,1,0)
- +320 ;;=^358.31IA^4^2
- +321 ;;^UTILITY(U,$J,358.3,25357,1,3,0)
- +322 ;;=3^Quadriplegia,C5-C7,Complete
- +323 ;;^UTILITY(U,$J,358.3,25357,1,4,0)
- +324 ;;=4^G82.53
- +325 ;;^UTILITY(U,$J,358.3,25357,2)
- +326 ;;=^5004131
- +327 ;;^UTILITY(U,$J,358.3,25358,0)
- +328 ;;=G82.54^^77^1017^4
- +329 ;;^UTILITY(U,$J,358.3,25358,1,0)
- +330 ;;=^358.31IA^4^2
- +331 ;;^UTILITY(U,$J,358.3,25358,1,3,0)
- +332 ;;=3^Quadriplegia,C5-C7,Incomplete
- +333 ;;^UTILITY(U,$J,358.3,25358,1,4,0)
- +334 ;;=4^G82.54
- +335 ;;^UTILITY(U,$J,358.3,25358,2)
- +336 ;;=^5004132
- +337 ;;^UTILITY(U,$J,358.3,25359,0)
- +338 ;;=G82.50^^77^1017^5
- +339 ;;^UTILITY(U,$J,358.3,25359,1,0)
- +340 ;;=^358.31IA^4^2
- +341 ;;^UTILITY(U,$J,358.3,25359,1,3,0)
- +342 ;;=3^Quadriplegia,Unspec
- +343 ;;^UTILITY(U,$J,358.3,25359,1,4,0)
- +344 ;;=4^G82.50
- +345 ;;^UTILITY(U,$J,358.3,25359,2)
- +346 ;;=^5004128
- +347 ;;^UTILITY(U,$J,358.3,25360,0)
- +348 ;;=L89.010^^77^1018^74
- +349 ;;^UTILITY(U,$J,358.3,25360,1,0)
- +350 ;;=^358.31IA^4^2
- +351 ;;^UTILITY(U,$J,358.3,25360,1,3,0)
- +352 ;;=3^Pressure Ulcer Right Elbow,Unstageable
- +353 ;;^UTILITY(U,$J,358.3,25360,1,4,0)
- +354 ;;=4^L89.010
- +355 ;;^UTILITY(U,$J,358.3,25360,2)
- +356 ;;=^5009337
- +357 ;;^UTILITY(U,$J,358.3,25361,0)
- +358 ;;=L89.011^^77^1018^69
- +359 ;;^UTILITY(U,$J,358.3,25361,1,0)
- +360 ;;=^358.31IA^4^2
- +361 ;;^UTILITY(U,$J,358.3,25361,1,3,0)
- +362 ;;=3^Pressure Ulcer Right Elbow,Stage 1
- +363 ;;^UTILITY(U,$J,358.3,25361,1,4,0)
- +364 ;;=4^L89.011
- +365 ;;^UTILITY(U,$J,358.3,25361,2)
- +366 ;;=^5009338
- +367 ;;^UTILITY(U,$J,358.3,25362,0)
- +368 ;;=L89.012^^77^1018^70
- +369 ;;^UTILITY(U,$J,358.3,25362,1,0)
- +370 ;;=^358.31IA^4^2
- +371 ;;^UTILITY(U,$J,358.3,25362,1,3,0)
- +372 ;;=3^Pressure Ulcer Right Elbow,Stage 2
- +373 ;;^UTILITY(U,$J,358.3,25362,1,4,0)
- +374 ;;=4^L89.012
- +375 ;;^UTILITY(U,$J,358.3,25362,2)
- +376 ;;=^5009339
- +377 ;;^UTILITY(U,$J,358.3,25363,0)
- +378 ;;=L89.013^^77^1018^71
- +379 ;;^UTILITY(U,$J,358.3,25363,1,0)
- +380 ;;=^358.31IA^4^2
- +381 ;;^UTILITY(U,$J,358.3,25363,1,3,0)
- +382 ;;=3^Pressure Ulcer Right Elbow,Stage 3
- +383 ;;^UTILITY(U,$J,358.3,25363,1,4,0)
- +384 ;;=4^L89.013
- +385 ;;^UTILITY(U,$J,358.3,25363,2)
- +386 ;;=^5009340
- +387 ;;^UTILITY(U,$J,358.3,25364,0)
- +388 ;;=L89.014^^77^1018^72
- +389 ;;^UTILITY(U,$J,358.3,25364,1,0)
- +390 ;;=^358.31IA^4^2
- +391 ;;^UTILITY(U,$J,358.3,25364,1,3,0)
- +392 ;;=3^Pressure Ulcer Right Elbow,Stage 4
- +393 ;;^UTILITY(U,$J,358.3,25364,1,4,0)
- +394 ;;=4^L89.014
- +395 ;;^UTILITY(U,$J,358.3,25364,2)
- +396 ;;=^5009341
- +397 ;;^UTILITY(U,$J,358.3,25365,0)
- +398 ;;=L89.019^^77^1018^73
- +399 ;;^UTILITY(U,$J,358.3,25365,1,0)
- +400 ;;=^358.31IA^4^2
- +401 ;;^UTILITY(U,$J,358.3,25365,1,3,0)
- +402 ;;=3^Pressure Ulcer Right Elbow,Stage Unspec
- +403 ;;^UTILITY(U,$J,358.3,25365,1,4,0)
- +404 ;;=4^L89.019
- +405 ;;^UTILITY(U,$J,358.3,25365,2)
- +406 ;;=^5133648
- +407 ;;^UTILITY(U,$J,358.3,25366,0)
- +408 ;;=L89.020^^77^1018^32
- +409 ;;^UTILITY(U,$J,358.3,25366,1,0)
- +410 ;;=^358.31IA^4^2
- +411 ;;^UTILITY(U,$J,358.3,25366,1,3,0)
- +412 ;;=3^Pressure Ulcer Left Elbow,Unstageable
- +413 ;;^UTILITY(U,$J,358.3,25366,1,4,0)
- +414 ;;=4^L89.020
- +415 ;;^UTILITY(U,$J,358.3,25366,2)
- +416 ;;=^5009342
- +417 ;;^UTILITY(U,$J,358.3,25367,0)
- +418 ;;=L89.021^^77^1018^27
- +419 ;;^UTILITY(U,$J,358.3,25367,1,0)
- +420 ;;=^358.31IA^4^2
- +421 ;;^UTILITY(U,$J,358.3,25367,1,3,0)
- +422 ;;=3^Pressure Ulcer Left Elbow,Stage 1
- +423 ;;^UTILITY(U,$J,358.3,25367,1,4,0)
- +424 ;;=4^L89.021
- +425 ;;^UTILITY(U,$J,358.3,25367,2)
- +426 ;;=^5009343
- +427 ;;^UTILITY(U,$J,358.3,25368,0)
- +428 ;;=L89.022^^77^1018^28
- +429 ;;^UTILITY(U,$J,358.3,25368,1,0)
- +430 ;;=^358.31IA^4^2
- +431 ;;^UTILITY(U,$J,358.3,25368,1,3,0)
- +432 ;;=3^Pressure Ulcer Left Elbow,Stage 2
- +433 ;;^UTILITY(U,$J,358.3,25368,1,4,0)
- +434 ;;=4^L89.022
- +435 ;;^UTILITY(U,$J,358.3,25368,2)
- +436 ;;=^5009344
- +437 ;;^UTILITY(U,$J,358.3,25369,0)
- +438 ;;=L89.023^^77^1018^29
- +439 ;;^UTILITY(U,$J,358.3,25369,1,0)
- +440 ;;=^358.31IA^4^2
- +441 ;;^UTILITY(U,$J,358.3,25369,1,3,0)
- +442 ;;=3^Pressure Ulcer Left Elbow,Stage 3
- +443 ;;^UTILITY(U,$J,358.3,25369,1,4,0)
- +444 ;;=4^L89.023
- +445 ;;^UTILITY(U,$J,358.3,25369,2)
- +446 ;;=^5009345
- +447 ;;^UTILITY(U,$J,358.3,25370,0)
- +448 ;;=L89.024^^77^1018^30
- +449 ;;^UTILITY(U,$J,358.3,25370,1,0)
- +450 ;;=^358.31IA^4^2
- +451 ;;^UTILITY(U,$J,358.3,25370,1,3,0)
- +452 ;;=3^Pressure Ulcer Left Elbow,Stage 4
- +453 ;;^UTILITY(U,$J,358.3,25370,1,4,0)
- +454 ;;=4^L89.024
- +455 ;;^UTILITY(U,$J,358.3,25370,2)
- +456 ;;=^5009346
- +457 ;;^UTILITY(U,$J,358.3,25371,0)
- +458 ;;=L89.029^^77^1018^31
- +459 ;;^UTILITY(U,$J,358.3,25371,1,0)
- +460 ;;=^358.31IA^4^2
- +461 ;;^UTILITY(U,$J,358.3,25371,1,3,0)
- +462 ;;=3^Pressure Ulcer Left Elbow,Stage Unspec
- +463 ;;^UTILITY(U,$J,358.3,25371,1,4,0)
- +464 ;;=4^L89.029
- +465 ;;^UTILITY(U,$J,358.3,25371,2)
- +466 ;;=^5133649
- +467 ;;^UTILITY(U,$J,358.3,25372,0)
- +468 ;;=L89.119^^77^1018^97
- +469 ;;^UTILITY(U,$J,358.3,25372,1,0)
- +470 ;;=^358.31IA^4^2
- +471 ;;^UTILITY(U,$J,358.3,25372,1,3,0)
- +472 ;;=3^Pressure Ulcer Right Upper Back,Stage Unspec
- +473 ;;^UTILITY(U,$J,358.3,25372,1,4,0)
- +474 ;;=4^L89.119
- +475 ;;^UTILITY(U,$J,358.3,25372,2)
- +476 ;;=^5009357
- +477 ;;^UTILITY(U,$J,358.3,25373,0)
- +478 ;;=L89.110^^77^1018^98
- +479 ;;^UTILITY(U,$J,358.3,25373,1,0)
- +480 ;;=^358.31IA^4^2
- +481 ;;^UTILITY(U,$J,358.3,25373,1,3,0)
- +482 ;;=3^Pressure Ulcer Right Upper Back,Unstageable
- +483 ;;^UTILITY(U,$J,358.3,25373,1,4,0)
- +484 ;;=4^L89.110
- +485 ;;^UTILITY(U,$J,358.3,25373,2)
- +486 ;;=^5009352
- +487 ;;^UTILITY(U,$J,358.3,25374,0)
- +488 ;;=L89.111^^77^1018^93
- +489 ;;^UTILITY(U,$J,358.3,25374,1,0)
- +490 ;;=^358.31IA^4^2
- +491 ;;^UTILITY(U,$J,358.3,25374,1,3,0)
- +492 ;;=3^Pressure Ulcer Right Upper Back,Stage 1
- +493 ;;^UTILITY(U,$J,358.3,25374,1,4,0)
- +494 ;;=4^L89.111
- +495 ;;^UTILITY(U,$J,358.3,25374,2)
- +496 ;;=^5009353
- +497 ;;^UTILITY(U,$J,358.3,25375,0)
- +498 ;;=L89.112^^77^1018^94
- +499 ;;^UTILITY(U,$J,358.3,25375,1,0)
- +500 ;;=^358.31IA^4^2
- +501 ;;^UTILITY(U,$J,358.3,25375,1,3,0)
- +502 ;;=3^Pressure Ulcer Right Upper Back,Stage 2
- +503 ;;^UTILITY(U,$J,358.3,25375,1,4,0)
- +504 ;;=4^L89.112
- +505 ;;^UTILITY(U,$J,358.3,25375,2)
- +506 ;;=^5009354
- +507 ;;^UTILITY(U,$J,358.3,25376,0)
- +508 ;;=L89.113^^77^1018^95
- +509 ;;^UTILITY(U,$J,358.3,25376,1,0)
- +510 ;;=^358.31IA^4^2
- +511 ;;^UTILITY(U,$J,358.3,25376,1,3,0)
- +512 ;;=3^Pressure Ulcer Right Upper Back,Stage 3
- +513 ;;^UTILITY(U,$J,358.3,25376,1,4,0)
- +514 ;;=4^L89.113
- +515 ;;^UTILITY(U,$J,358.3,25376,2)
- +516 ;;=^5009355
- +517 ;;^UTILITY(U,$J,358.3,25377,0)
- +518 ;;=L89.114^^77^1018^96
- +519 ;;^UTILITY(U,$J,358.3,25377,1,0)
- +520 ;;=^358.31IA^4^2
- +521 ;;^UTILITY(U,$J,358.3,25377,1,3,0)
- +522 ;;=3^Pressure Ulcer Right Upper Back,Stage 4
- +523 ;;^UTILITY(U,$J,358.3,25377,1,4,0)
- +524 ;;=4^L89.114
- +525 ;;^UTILITY(U,$J,358.3,25377,2)
- +526 ;;=^5009356
- +527 ;;^UTILITY(U,$J,358.3,25378,0)
- +528 ;;=L89.129^^77^1018^55
- +529 ;;^UTILITY(U,$J,358.3,25378,1,0)
- +530 ;;=^358.31IA^4^2
- +531 ;;^UTILITY(U,$J,358.3,25378,1,3,0)
- +532 ;;=3^Pressure Ulcer Left Upper Back,Stage Unspec
- +533 ;;^UTILITY(U,$J,358.3,25378,1,4,0)
- +534 ;;=4^L89.129
- +535 ;;^UTILITY(U,$J,358.3,25378,2)
- +536 ;;=^5133652
- +537 ;;^UTILITY(U,$J,358.3,25379,0)
- +538 ;;=L89.120^^77^1018^56
- +539 ;;^UTILITY(U,$J,358.3,25379,1,0)
- +540 ;;=^358.31IA^4^2
- +541 ;;^UTILITY(U,$J,358.3,25379,1,3,0)
- +542 ;;=3^Pressure Ulcer Left Upper Back,Unstageable
- +543 ;;^UTILITY(U,$J,358.3,25379,1,4,0)
- +544 ;;=4^L89.120
- +545 ;;^UTILITY(U,$J,358.3,25379,2)
- +546 ;;=^5009358
- +547 ;;^UTILITY(U,$J,358.3,25380,0)
- +548 ;;=L89.121^^77^1018^51
- +549 ;;^UTILITY(U,$J,358.3,25380,1,0)
- +550 ;;=^358.31IA^4^2
- +551 ;;^UTILITY(U,$J,358.3,25380,1,3,0)
- +552 ;;=3^Pressure Ulcer Left Upper Back,Stage 1
- +553 ;;^UTILITY(U,$J,358.3,25380,1,4,0)
- +554 ;;=4^L89.121
- +555 ;;^UTILITY(U,$J,358.3,25380,2)
- +556 ;;=^5009359
- +557 ;;^UTILITY(U,$J,358.3,25381,0)
- +558 ;;=L89.122^^77^1018^52
- +559 ;;^UTILITY(U,$J,358.3,25381,1,0)
- +560 ;;=^358.31IA^4^2
- +561 ;;^UTILITY(U,$J,358.3,25381,1,3,0)
- +562 ;;=3^Pressure Ulcer Left Upper Back,Stage 2
- +563 ;;^UTILITY(U,$J,358.3,25381,1,4,0)
- +564 ;;=4^L89.122
- +565 ;;^UTILITY(U,$J,358.3,25381,2)
- +566 ;;=^5009360
- +567 ;;^UTILITY(U,$J,358.3,25382,0)
- +568 ;;=L89.123^^77^1018^53
- +569 ;;^UTILITY(U,$J,358.3,25382,1,0)
- +570 ;;=^358.31IA^4^2
- +571 ;;^UTILITY(U,$J,358.3,25382,1,3,0)
- +572 ;;=3^Pressure Ulcer Left Upper Back,Stage 3
- +573 ;;^UTILITY(U,$J,358.3,25382,1,4,0)
- +574 ;;=4^L89.123
- +575 ;;^UTILITY(U,$J,358.3,25382,2)
- +576 ;;=^5009361
- +577 ;;^UTILITY(U,$J,358.3,25383,0)
- +578 ;;=L89.124^^77^1018^54
- +579 ;;^UTILITY(U,$J,358.3,25383,1,0)
- +580 ;;=^358.31IA^4^2
- +581 ;;^UTILITY(U,$J,358.3,25383,1,3,0)
- +582 ;;=3^Pressure Ulcer Left Upper Back,Stage 4
- +583 ;;^UTILITY(U,$J,358.3,25383,1,4,0)
- +584 ;;=4^L89.124
- +585 ;;^UTILITY(U,$J,358.3,25383,2)
- +586 ;;=^5009362
- +587 ;;^UTILITY(U,$J,358.3,25384,0)
- +588 ;;=L89.130^^77^1018^92
- +589 ;;^UTILITY(U,$J,358.3,25384,1,0)
- +590 ;;=^358.31IA^4^2
- +591 ;;^UTILITY(U,$J,358.3,25384,1,3,0)
- +592 ;;=3^Pressure Ulcer Right Lower Back,Unstageable
- +593 ;;^UTILITY(U,$J,358.3,25384,1,4,0)
- +594 ;;=4^L89.130
- +595 ;;^UTILITY(U,$J,358.3,25384,2)
- +596 ;;=^5009363
- +597 ;;^UTILITY(U,$J,358.3,25385,0)
- +598 ;;=L89.139^^77^1018^91
- +599 ;;^UTILITY(U,$J,358.3,25385,1,0)
- +600 ;;=^358.31IA^4^2
- +601 ;;^UTILITY(U,$J,358.3,25385,1,3,0)
- +602 ;;=3^Pressure Ulcer Right Lower Back,Stage Unspec
- +603 ;;^UTILITY(U,$J,358.3,25385,1,4,0)
- +604 ;;=4^L89.139
- +605 ;;^UTILITY(U,$J,358.3,25385,2)
- +606 ;;=^5133653
- +607 ;;^UTILITY(U,$J,358.3,25386,0)
- +608 ;;=L89.131^^77^1018^87
- +609 ;;^UTILITY(U,$J,358.3,25386,1,0)
- +610 ;;=^358.31IA^4^2
- +611 ;;^UTILITY(U,$J,358.3,25386,1,3,0)
- +612 ;;=3^Pressure Ulcer Right Lower Back,Stage 1
- +613 ;;^UTILITY(U,$J,358.3,25386,1,4,0)
- +614 ;;=4^L89.131
- +615 ;;^UTILITY(U,$J,358.3,25386,2)
- +616 ;;=^5009364
- +617 ;;^UTILITY(U,$J,358.3,25387,0)
- +618 ;;=L89.132^^77^1018^88
- +619 ;;^UTILITY(U,$J,358.3,25387,1,0)
- +620 ;;=^358.31IA^4^2
- +621 ;;^UTILITY(U,$J,358.3,25387,1,3,0)
- +622 ;;=3^Pressure Ulcer Right Lower Back,Stage 2
- +623 ;;^UTILITY(U,$J,358.3,25387,1,4,0)
- +624 ;;=4^L89.132
- +625 ;;^UTILITY(U,$J,358.3,25387,2)
- +626 ;;=^5009365
- +627 ;;^UTILITY(U,$J,358.3,25388,0)
- +628 ;;=L89.133^^77^1018^89
- +629 ;;^UTILITY(U,$J,358.3,25388,1,0)
- +630 ;;=^358.31IA^4^2
- +631 ;;^UTILITY(U,$J,358.3,25388,1,3,0)
- +632 ;;=3^Pressure Ulcer Right Lower Back,Stage 3
- +633 ;;^UTILITY(U,$J,358.3,25388,1,4,0)
- +634 ;;=4^L89.133
- +635 ;;^UTILITY(U,$J,358.3,25388,2)
- +636 ;;=^5009366
- +637 ;;^UTILITY(U,$J,358.3,25389,0)
- +638 ;;=L89.134^^77^1018^90
- +639 ;;^UTILITY(U,$J,358.3,25389,1,0)
- +640 ;;=^358.31IA^4^2
- +641 ;;^UTILITY(U,$J,358.3,25389,1,3,0)
- +642 ;;=3^Pressure Ulcer Right Lower Back,Stage 4
- +643 ;;^UTILITY(U,$J,358.3,25389,1,4,0)
- +644 ;;=4^L89.134
- +645 ;;^UTILITY(U,$J,358.3,25389,2)
- +646 ;;=^5009367
- +647 ;;^UTILITY(U,$J,358.3,25390,0)
- +648 ;;=L89.140^^77^1018^50
- +649 ;;^UTILITY(U,$J,358.3,25390,1,0)
- +650 ;;=^358.31IA^4^2
- +651 ;;^UTILITY(U,$J,358.3,25390,1,3,0)
- +652 ;;=3^Pressure Ulcer Left Lower Back,Unstageable
- +653 ;;^UTILITY(U,$J,358.3,25390,1,4,0)
- +654 ;;=4^L89.140
- +655 ;;^UTILITY(U,$J,358.3,25390,2)
- +656 ;;=^5133655
- +657 ;;^UTILITY(U,$J,358.3,25391,0)
- +658 ;;=L89.149^^77^1018^49
- +659 ;;^UTILITY(U,$J,358.3,25391,1,0)
- +660 ;;=^358.31IA^4^2
- +661 ;;^UTILITY(U,$J,358.3,25391,1,3,0)
- +662 ;;=3^Pressure Ulcer Left Lower Back,Stage Unspec
- +663 ;;^UTILITY(U,$J,358.3,25391,1,4,0)
- +664 ;;=4^L89.149
- +665 ;;^UTILITY(U,$J,358.3,25391,2)
- +666 ;;=^5133654
- +667 ;;^UTILITY(U,$J,358.3,25392,0)
- +668 ;;=L89.141^^77^1018^45
- +669 ;;^UTILITY(U,$J,358.3,25392,1,0)
- +670 ;;=^358.31IA^4^2