IBDEI0AD ; ; 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,25392,1,3,0)
;;=3^Pressure Ulcer Left Lower Back,Stage 1
;;^UTILITY(U,$J,358.3,25392,1,4,0)
;;=4^L89.141
;;^UTILITY(U,$J,358.3,25392,2)
;;=^5133656
;;^UTILITY(U,$J,358.3,25393,0)
;;=L89.142^^77^1018^46
;;^UTILITY(U,$J,358.3,25393,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25393,1,3,0)
;;=3^Pressure Ulcer Left Lower Back,Stage 2
;;^UTILITY(U,$J,358.3,25393,1,4,0)
;;=4^L89.142
;;^UTILITY(U,$J,358.3,25393,2)
;;=^5133657
;;^UTILITY(U,$J,358.3,25394,0)
;;=L89.143^^77^1018^47
;;^UTILITY(U,$J,358.3,25394,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25394,1,3,0)
;;=3^Pressure Ulcer Left Lower Back,Stage 3
;;^UTILITY(U,$J,358.3,25394,1,4,0)
;;=4^L89.143
;;^UTILITY(U,$J,358.3,25394,2)
;;=Pressure Ulcer Left Lower Back,Stage 3^5133658
;;^UTILITY(U,$J,358.3,25395,0)
;;=L89.144^^77^1018^48
;;^UTILITY(U,$J,358.3,25395,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25395,1,3,0)
;;=3^Pressure Ulcer Left Lower Back,Stage 4
;;^UTILITY(U,$J,358.3,25395,1,4,0)
;;=4^L89.144
;;^UTILITY(U,$J,358.3,25395,2)
;;=^5133659
;;^UTILITY(U,$J,358.3,25396,0)
;;=L89.210^^77^1018^86
;;^UTILITY(U,$J,358.3,25396,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25396,1,3,0)
;;=3^Pressure Ulcer Right Hip,Unstageable
;;^UTILITY(U,$J,358.3,25396,1,4,0)
;;=4^L89.210
;;^UTILITY(U,$J,358.3,25396,2)
;;=^5009379
;;^UTILITY(U,$J,358.3,25397,0)
;;=L89.219^^77^1018^85
;;^UTILITY(U,$J,358.3,25397,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25397,1,3,0)
;;=3^Pressure Ulcer Right Hip,Stage Unspec
;;^UTILITY(U,$J,358.3,25397,1,4,0)
;;=4^L89.219
;;^UTILITY(U,$J,358.3,25397,2)
;;=^5133661
;;^UTILITY(U,$J,358.3,25398,0)
;;=L89.211^^77^1018^81
;;^UTILITY(U,$J,358.3,25398,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25398,1,3,0)
;;=3^Pressure Ulcer Right Hip,Stage 1
;;^UTILITY(U,$J,358.3,25398,1,4,0)
;;=4^L89.211
;;^UTILITY(U,$J,358.3,25398,2)
;;=^5009380
;;^UTILITY(U,$J,358.3,25399,0)
;;=L89.212^^77^1018^82
;;^UTILITY(U,$J,358.3,25399,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25399,1,3,0)
;;=3^Pressure Ulcer Right Hip,Stage 2
;;^UTILITY(U,$J,358.3,25399,1,4,0)
;;=4^L89.212
;;^UTILITY(U,$J,358.3,25399,2)
;;=^5009381
;;^UTILITY(U,$J,358.3,25400,0)
;;=L89.213^^77^1018^83
;;^UTILITY(U,$J,358.3,25400,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25400,1,3,0)
;;=3^Pressure Ulcer Right Hip,Stage 3
;;^UTILITY(U,$J,358.3,25400,1,4,0)
;;=4^L89.213
;;^UTILITY(U,$J,358.3,25400,2)
;;=^5009382
;;^UTILITY(U,$J,358.3,25401,0)
;;=L89.214^^77^1018^84
;;^UTILITY(U,$J,358.3,25401,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25401,1,3,0)
;;=3^Pressure Ulcer Right Hip,Stage 4
;;^UTILITY(U,$J,358.3,25401,1,4,0)
;;=4^L89.214
;;^UTILITY(U,$J,358.3,25401,2)
;;=^5009383
;;^UTILITY(U,$J,358.3,25402,0)
;;=L89.220^^77^1018^44
;;^UTILITY(U,$J,358.3,25402,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25402,1,3,0)
;;=3^Pressure Ulcer Left Hip,Unstageable
;;^UTILITY(U,$J,358.3,25402,1,4,0)
;;=4^L89.220
;;^UTILITY(U,$J,358.3,25402,2)
;;=^5009384
;;^UTILITY(U,$J,358.3,25403,0)
;;=L89.229^^77^1018^43
;;^UTILITY(U,$J,358.3,25403,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25403,1,3,0)
;;=3^Pressure Ulcer Left Hip,Stage Unspec
;;^UTILITY(U,$J,358.3,25403,1,4,0)
;;=4^L89.229
;;^UTILITY(U,$J,358.3,25403,2)
;;=^5133662
;;^UTILITY(U,$J,358.3,25404,0)
;;=L89.221^^77^1018^39
;;^UTILITY(U,$J,358.3,25404,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25404,1,3,0)
;;=3^Pressure Ulcer Left Hip,Stage 1
;;^UTILITY(U,$J,358.3,25404,1,4,0)
;;=4^L89.221
;;^UTILITY(U,$J,358.3,25404,2)
;;=^5009385
;;^UTILITY(U,$J,358.3,25405,0)
;;=L89.222^^77^1018^40
;;^UTILITY(U,$J,358.3,25405,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25405,1,3,0)
;;=3^Pressure Ulcer Left Hip,Stage 2
;;^UTILITY(U,$J,358.3,25405,1,4,0)
;;=4^L89.222
;;^UTILITY(U,$J,358.3,25405,2)
;;=^5009386
;;^UTILITY(U,$J,358.3,25406,0)
;;=L89.223^^77^1018^41
;;^UTILITY(U,$J,358.3,25406,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25406,1,3,0)
;;=3^Pressure Ulcer Left Hip,Stage 3
;;^UTILITY(U,$J,358.3,25406,1,4,0)
;;=4^L89.223
;;^UTILITY(U,$J,358.3,25406,2)
;;=^5009387
;;^UTILITY(U,$J,358.3,25407,0)
;;=L89.224^^77^1018^42
;;^UTILITY(U,$J,358.3,25407,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25407,1,3,0)
;;=3^Pressure Ulcer Left Hip,Stage 4
;;^UTILITY(U,$J,358.3,25407,1,4,0)
;;=4^L89.224
;;^UTILITY(U,$J,358.3,25407,2)
;;=^5009388
;;^UTILITY(U,$J,358.3,25408,0)
;;=L89.310^^77^1018^68
;;^UTILITY(U,$J,358.3,25408,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25408,1,3,0)
;;=3^Pressure Ulcer Right Buttock,Unstageable
;;^UTILITY(U,$J,358.3,25408,1,4,0)
;;=4^L89.310
;;^UTILITY(U,$J,358.3,25408,2)
;;=^5009394
;;^UTILITY(U,$J,358.3,25409,0)
;;=L89.319^^77^1018^67
;;^UTILITY(U,$J,358.3,25409,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25409,1,3,0)
;;=3^Pressure Ulcer Right Buttock,Stage Unspec
;;^UTILITY(U,$J,358.3,25409,1,4,0)
;;=4^L89.319
;;^UTILITY(U,$J,358.3,25409,2)
;;=^5133670
;;^UTILITY(U,$J,358.3,25410,0)
;;=L89.311^^77^1018^63
;;^UTILITY(U,$J,358.3,25410,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25410,1,3,0)
;;=3^Pressure Ulcer Right Buttock,Stage 1
;;^UTILITY(U,$J,358.3,25410,1,4,0)
;;=4^L89.311
;;^UTILITY(U,$J,358.3,25410,2)
;;=^5009395
;;^UTILITY(U,$J,358.3,25411,0)
;;=L89.312^^77^1018^64
;;^UTILITY(U,$J,358.3,25411,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25411,1,3,0)
;;=3^Pressure Ulcer Right Buttock,Stage 2
;;^UTILITY(U,$J,358.3,25411,1,4,0)
;;=4^L89.312
;;^UTILITY(U,$J,358.3,25411,2)
;;=^5009396
;;^UTILITY(U,$J,358.3,25412,0)
;;=L89.313^^77^1018^65
;;^UTILITY(U,$J,358.3,25412,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25412,1,3,0)
;;=3^Pressure Ulcer Right Buttock,Stage 3
;;^UTILITY(U,$J,358.3,25412,1,4,0)
;;=4^L89.313
;;^UTILITY(U,$J,358.3,25412,2)
;;=^5009397
;;^UTILITY(U,$J,358.3,25413,0)
;;=L89.314^^77^1018^66
;;^UTILITY(U,$J,358.3,25413,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25413,1,3,0)
;;=3^Pressure Ulcer Right Buttock,Stage 4
;;^UTILITY(U,$J,358.3,25413,1,4,0)
;;=4^L89.314
;;^UTILITY(U,$J,358.3,25413,2)
;;=^5009398
;;^UTILITY(U,$J,358.3,25414,0)
;;=L89.320^^77^1018^26
;;^UTILITY(U,$J,358.3,25414,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25414,1,3,0)
;;=3^Pressure Ulcer Left Buttock,Unstageable
;;^UTILITY(U,$J,358.3,25414,1,4,0)
;;=4^L89.320
;;^UTILITY(U,$J,358.3,25414,2)
;;=^5009399
;;^UTILITY(U,$J,358.3,25415,0)
;;=L89.329^^77^1018^25
;;^UTILITY(U,$J,358.3,25415,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25415,1,3,0)
;;=3^Pressure Ulcer Left Buttock,Stage Unspec
;;^UTILITY(U,$J,358.3,25415,1,4,0)
;;=4^L89.329
;;^UTILITY(U,$J,358.3,25415,2)
;;=^5133671
;;^UTILITY(U,$J,358.3,25416,0)
;;=L89.321^^77^1018^21
;;^UTILITY(U,$J,358.3,25416,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25416,1,3,0)
;;=3^Pressure Ulcer Left Buttock,Stage 1
;;^UTILITY(U,$J,358.3,25416,1,4,0)
;;=4^L89.321
;;^UTILITY(U,$J,358.3,25416,2)
;;=^5009400
;;^UTILITY(U,$J,358.3,25417,0)
;;=L89.322^^77^1018^22
;;^UTILITY(U,$J,358.3,25417,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25417,1,3,0)
;;=3^Pressure Ulcer Left Buttock,Stage 2
;;^UTILITY(U,$J,358.3,25417,1,4,0)
;;=4^L89.322
;;^UTILITY(U,$J,358.3,25417,2)
;;=^5009401
;;^UTILITY(U,$J,358.3,25418,0)
;;=L89.323^^77^1018^23
;;^UTILITY(U,$J,358.3,25418,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25418,1,3,0)
;;=3^Pressure Ulcer Left Buttock,Stage 3
;;^UTILITY(U,$J,358.3,25418,1,4,0)
;;=4^L89.323
;;^UTILITY(U,$J,358.3,25418,2)
;;=^5009402
;;^UTILITY(U,$J,358.3,25419,0)
;;=L89.324^^77^1018^24
;;^UTILITY(U,$J,358.3,25419,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25419,1,3,0)
;;=3^Pressure Ulcer Left Buttock,Stage 4
;;^UTILITY(U,$J,358.3,25419,1,4,0)
;;=4^L89.324
;;^UTILITY(U,$J,358.3,25419,2)
;;=^5009403
;;^UTILITY(U,$J,358.3,25420,0)
;;=L89.510^^77^1018^62
;;^UTILITY(U,$J,358.3,25420,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25420,1,3,0)
;;=3^Pressure Ulcer Right Ankle,Unstageable
;;^UTILITY(U,$J,358.3,25420,1,4,0)
;;=4^L89.510
;;^UTILITY(U,$J,358.3,25420,2)
;;=^5009415
;;^UTILITY(U,$J,358.3,25421,0)
;;=L89.519^^77^1018^61
;;^UTILITY(U,$J,358.3,25421,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25421,1,3,0)
;;=3^Pressure Ulcer Right Ankle,Stage Unspec
;;^UTILITY(U,$J,358.3,25421,1,4,0)
;;=4^L89.519
;;^UTILITY(U,$J,358.3,25421,2)
;;=^5133673
;;^UTILITY(U,$J,358.3,25422,0)
;;=L89.511^^77^1018^57
;;^UTILITY(U,$J,358.3,25422,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25422,1,3,0)
;;=3^Pressure Ulcer Right Ankle,Stage 1
;;^UTILITY(U,$J,358.3,25422,1,4,0)
;;=4^L89.511
;;^UTILITY(U,$J,358.3,25422,2)
;;=^5009416
;;^UTILITY(U,$J,358.3,25423,0)
;;=L89.512^^77^1018^58
;;^UTILITY(U,$J,358.3,25423,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25423,1,3,0)
;;=3^Pressure Ulcer Right Ankle,Stage 2
;;^UTILITY(U,$J,358.3,25423,1,4,0)
;;=4^L89.512
;;^UTILITY(U,$J,358.3,25423,2)
;;=^5009417
;;^UTILITY(U,$J,358.3,25424,0)
;;=L89.513^^77^1018^59
;;^UTILITY(U,$J,358.3,25424,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25424,1,3,0)
;;=3^Pressure Ulcer Right Ankle,Stage 3
;;^UTILITY(U,$J,358.3,25424,1,4,0)
;;=4^L89.513
;;^UTILITY(U,$J,358.3,25424,2)
;;=^5009418
;;^UTILITY(U,$J,358.3,25425,0)
;;=L89.514^^77^1018^60
;;^UTILITY(U,$J,358.3,25425,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25425,1,3,0)
;;=3^Pressure Ulcer Right Ankle,Stage 4
;;^UTILITY(U,$J,358.3,25425,1,4,0)
;;=4^L89.514
;;^UTILITY(U,$J,358.3,25425,2)
;;=^5009419
;;^UTILITY(U,$J,358.3,25426,0)
;;=L89.520^^77^1018^20
;;^UTILITY(U,$J,358.3,25426,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25426,1,3,0)
;;=3^Pressure Ulcer Left Ankle,Unstageable
;;^UTILITY(U,$J,358.3,25426,1,4,0)
;;=4^L89.520
;;^UTILITY(U,$J,358.3,25426,2)
;;=^5009420
;;^UTILITY(U,$J,358.3,25427,0)
;;=L89.529^^77^1018^19
;;^UTILITY(U,$J,358.3,25427,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25427,1,3,0)
;;=3^Pressure Ulcer Left Ankle,Stage Unspec
;;^UTILITY(U,$J,358.3,25427,1,4,0)
;;=4^L89.529
;;^UTILITY(U,$J,358.3,25427,2)
;;=^5133674
;;^UTILITY(U,$J,358.3,25428,0)
;;=L89.521^^77^1018^15
;;^UTILITY(U,$J,358.3,25428,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25428,1,3,0)
;;=3^Pressure Ulcer Left Ankle,Stage 1
;;^UTILITY(U,$J,358.3,25428,1,4,0)
;;=4^L89.521
;;^UTILITY(U,$J,358.3,25428,2)
;;=^5009421
;;^UTILITY(U,$J,358.3,25429,0)
;;=L89.522^^77^1018^16
;;^UTILITY(U,$J,358.3,25429,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25429,1,3,0)
;;=3^Pressure Ulcer Left Ankle,Stage 2
;;^UTILITY(U,$J,358.3,25429,1,4,0)
;;=4^L89.522
;;^UTILITY(U,$J,358.3,25429,2)
;;=^5009422
;;^UTILITY(U,$J,358.3,25430,0)
;;=L89.523^^77^1018^17
;;^UTILITY(U,$J,358.3,25430,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25430,1,3,0)
;;=3^Pressure Ulcer Left Ankle,Stage 3
;;^UTILITY(U,$J,358.3,25430,1,4,0)
;;=4^L89.523
;;^UTILITY(U,$J,358.3,25430,2)
;;=^5009423
;;^UTILITY(U,$J,358.3,25431,0)
;;=L89.524^^77^1018^18
;;^UTILITY(U,$J,358.3,25431,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25431,1,3,0)
;;=3^Pressure Ulcer Left Ankle,Stage 4
;;^UTILITY(U,$J,358.3,25431,1,4,0)
;;=4^L89.524
;;^UTILITY(U,$J,358.3,25431,2)
;;=^5009424
;;^UTILITY(U,$J,358.3,25432,0)
;;=L89.610^^77^1018^80
;;^UTILITY(U,$J,358.3,25432,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25432,1,3,0)
;;=3^Pressure Ulcer Right Heel,Unstageable
;;^UTILITY(U,$J,358.3,25432,1,4,0)
;;=4^L89.610
;;^UTILITY(U,$J,358.3,25432,2)
;;=^5009430
;;^UTILITY(U,$J,358.3,25433,0)
;;=L89.619^^77^1018^79
;;^UTILITY(U,$J,358.3,25433,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25433,1,3,0)
;;=3^Pressure Ulcer Right Heel,Stage Unspec
;;^UTILITY(U,$J,358.3,25433,1,4,0)
;;=4^L89.619
;;^UTILITY(U,$J,358.3,25433,2)
;;=^5133676
;;^UTILITY(U,$J,358.3,25434,0)
;;=L89.611^^77^1018^75
;;^UTILITY(U,$J,358.3,25434,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25434,1,3,0)
;;=3^Pressure Ulcer Right Heel,Stage 1
;;^UTILITY(U,$J,358.3,25434,1,4,0)
;;=4^L89.611
;;^UTILITY(U,$J,358.3,25434,2)
;;=^5009431
;;^UTILITY(U,$J,358.3,25435,0)
;;=L89.612^^77^1018^76
;;^UTILITY(U,$J,358.3,25435,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25435,1,3,0)
;;=3^Pressure Ulcer Right Heel,Stage 2
;;^UTILITY(U,$J,358.3,25435,1,4,0)
;;=4^L89.612
;;^UTILITY(U,$J,358.3,25435,2)
;;=^5009432
;;^UTILITY(U,$J,358.3,25436,0)
;;=L89.613^^77^1018^77
;;^UTILITY(U,$J,358.3,25436,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25436,1,3,0)
;;=3^Pressure Ulcer Right Heel,Stage 3
;;^UTILITY(U,$J,358.3,25436,1,4,0)
;;=4^L89.613
;;^UTILITY(U,$J,358.3,25436,2)
;;=^5009433
;;^UTILITY(U,$J,358.3,25437,0)
;;=L89.614^^77^1018^78
;;^UTILITY(U,$J,358.3,25437,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25437,1,3,0)
;;=3^Pressure Ulcer Right Heel,Stage 4
;;^UTILITY(U,$J,358.3,25437,1,4,0)
;;=4^L89.614
;;^UTILITY(U,$J,358.3,25437,2)
;;=^5009434
;;^UTILITY(U,$J,358.3,25438,0)
;;=L89.620^^77^1018^38
;;^UTILITY(U,$J,358.3,25438,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25438,1,3,0)
;;=3^Pressure Ulcer Left Heel,Unstageable
;;^UTILITY(U,$J,358.3,25438,1,4,0)
;;=4^L89.620
;;^UTILITY(U,$J,358.3,25438,2)
;;=^5009435
;;^UTILITY(U,$J,358.3,25439,0)
;;=L89.629^^77^1018^37
;;^UTILITY(U,$J,358.3,25439,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25439,1,3,0)
;;=3^Pressure Ulcer Left Heel,Stage Unspec
;;^UTILITY(U,$J,358.3,25439,1,4,0)
;;=4^L89.629
;;^UTILITY(U,$J,358.3,25439,2)
;;=^5133677
;;^UTILITY(U,$J,358.3,25440,0)
;;=L89.621^^77^1018^33
;;^UTILITY(U,$J,358.3,25440,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25440,1,3,0)
;;=3^Pressure Ulcer Left Heel,Stage 1
;;^UTILITY(U,$J,358.3,25440,1,4,0)
;;=4^L89.621
;;^UTILITY(U,$J,358.3,25440,2)
;;=^5009436
;;^UTILITY(U,$J,358.3,25441,0)
;;=L89.622^^77^1018^34
;;^UTILITY(U,$J,358.3,25441,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25441,1,3,0)
;;=3^Pressure Ulcer Left Heel,Stage 2
;;^UTILITY(U,$J,358.3,25441,1,4,0)
;;=4^L89.622
;;^UTILITY(U,$J,358.3,25441,2)
;;=^5009437
;;^UTILITY(U,$J,358.3,25442,0)
;;=L89.623^^77^1018^35
;;^UTILITY(U,$J,358.3,25442,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25442,1,3,0)
;;=3^Pressure Ulcer Left Heel,Stage 3
;;^UTILITY(U,$J,358.3,25442,1,4,0)
;;=4^L89.623
;;^UTILITY(U,$J,358.3,25442,2)
;;=^5009438
;;^UTILITY(U,$J,358.3,25443,0)
;;=L89.624^^77^1018^36
;;^UTILITY(U,$J,358.3,25443,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25443,1,3,0)
;;=3^Pressure Ulcer Left Heel,Stage 4
;;^UTILITY(U,$J,358.3,25443,1,4,0)
;;=4^L89.624
;;^UTILITY(U,$J,358.3,25443,2)
;;=^5009439
;;^UTILITY(U,$J,358.3,25444,0)
;;=L89.899^^77^1018^99
;;^UTILITY(U,$J,358.3,25444,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25444,1,3,0)
;;=3^Pressure Ulcer of Other Site,Stage Unspec
;;^UTILITY(U,$J,358.3,25444,1,4,0)
;;=4^L89.899
;;^UTILITY(U,$J,358.3,25444,2)
;;=^5133663
;;^UTILITY(U,$J,358.3,25445,0)
;;=L89.526^^77^1018^1
;;^UTILITY(U,$J,358.3,25445,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25445,1,3,0)
;;=3^Pressure Induced DTI,Left Ankle
;;^UTILITY(U,$J,358.3,25445,1,4,0)
;;=4^L89.526
;;^UTILITY(U,$J,358.3,25445,2)
;;=^5158094
;;^UTILITY(U,$J,358.3,25446,0)
;;=L89.326^^77^1018^2
;;^UTILITY(U,$J,358.3,25446,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25446,1,3,0)
;;=3^Pressure Induced DTI,Left Buttock
;;^UTILITY(U,$J,358.3,25446,1,4,0)
;;=4^L89.326
;;^UTILITY(U,$J,358.3,25446,2)
;;=^5158090
;;^UTILITY(U,$J,358.3,25447,0)
;;=L89.026^^77^1018^3
;;^UTILITY(U,$J,358.3,25447,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25447,1,3,0)
;;=3^Pressure Induced DTI,Left Elbow
;;^UTILITY(U,$J,358.3,25447,1,4,0)
;;=4^L89.026
;;^UTILITY(U,$J,358.3,25447,2)
;;=^5158078
;;^UTILITY(U,$J,358.3,25448,0)
;;=L89.226^^77^1018^5
;;^UTILITY(U,$J,358.3,25448,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25448,1,3,0)
;;=3^Pressure Induced DTI,Left Hip
;;^UTILITY(U,$J,358.3,25448,1,4,0)
;;=4^L89.226
;;^UTILITY(U,$J,358.3,25448,2)
;;=^5158087
;;^UTILITY(U,$J,358.3,25449,0)
;;=L89.626^^77^1018^4
;;^UTILITY(U,$J,358.3,25449,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25449,1,3,0)
;;=3^Pressure Induced DTI,Left Heel
;;^UTILITY(U,$J,358.3,25449,1,4,0)
;;=4^L89.626
;;^UTILITY(U,$J,358.3,25449,2)
;;=^5158097
;;^UTILITY(U,$J,358.3,25450,0)
;;=L89.146^^77^1018^6
;;^UTILITY(U,$J,358.3,25450,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25450,1,3,0)
;;=3^Pressure Induced DTI,Left Lower Back
;;^UTILITY(U,$J,358.3,25450,1,4,0)
;;=4^L89.146
;;^UTILITY(U,$J,358.3,25450,2)
;;=^5158083
;;^UTILITY(U,$J,358.3,25451,0)
;;=L89.126^^77^1018^7
;;^UTILITY(U,$J,358.3,25451,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25451,1,3,0)
;;=3^Pressure Induced DTI,Left Upper Back
;;^UTILITY(U,$J,358.3,25451,1,4,0)
;;=4^L89.126
;;^UTILITY(U,$J,358.3,25451,2)
;;=^5158081
;;^UTILITY(U,$J,358.3,25452,0)
;;=L89.516^^77^1018^8
;;^UTILITY(U,$J,358.3,25452,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25452,1,3,0)
;;=3^Pressure Induced DTI,Right Ankle
;;^UTILITY(U,$J,358.3,25452,1,4,0)
;;=4^L89.516
;;^UTILITY(U,$J,358.3,25452,2)
;;=^5158093
;;^UTILITY(U,$J,358.3,25453,0)
;;=L89.316^^77^1018^9
;;^UTILITY(U,$J,358.3,25453,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25453,1,3,0)
;;=3^Pressure Induced DTI,Right Buttock
;;^UTILITY(U,$J,358.3,25453,1,4,0)
;;=4^L89.316
;;^UTILITY(U,$J,358.3,25453,2)
;;=^5158089
;;^UTILITY(U,$J,358.3,25454,0)
;;=L89.016^^77^1018^10
;;^UTILITY(U,$J,358.3,25454,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25454,1,3,0)
;;=3^Pressure Induced DTI,Right Elbow
;;^UTILITY(U,$J,358.3,25454,1,4,0)
;;=4^L89.016
;;^UTILITY(U,$J,358.3,25454,2)
;;=^5158077
;;^UTILITY(U,$J,358.3,25455,0)
;;=L89.616^^77^1018^11
;;^UTILITY(U,$J,358.3,25455,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25455,1,3,0)
;;=3^Pressure Induced DTI,Right Heel
;;^UTILITY(U,$J,358.3,25455,1,4,0)
;;=4^L89.616
;;^UTILITY(U,$J,358.3,25455,2)
;;=^5158096
;;^UTILITY(U,$J,358.3,25456,0)
;;=L89.216^^77^1018^12
;;^UTILITY(U,$J,358.3,25456,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25456,1,3,0)
;;=3^Pressure Induced DTI,Right Hip
;;^UTILITY(U,$J,358.3,25456,1,4,0)
;;=4^L89.216
;;^UTILITY(U,$J,358.3,25456,2)
;;=^5158086
;;^UTILITY(U,$J,358.3,25457,0)
;;=L89.136^^77^1018^13
;;^UTILITY(U,$J,358.3,25457,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25457,1,3,0)
;;=3^Pressure Induced DTI,Right Lower Back
;;^UTILITY(U,$J,358.3,25457,1,4,0)
;;=4^L89.136
;;^UTILITY(U,$J,358.3,25457,2)
;;=^5158082
;;^UTILITY(U,$J,358.3,25458,0)
;;=L89.116^^77^1018^14
;;^UTILITY(U,$J,358.3,25458,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,25458,1,3,0)
;;=3^Pressure Induced DTI,Right Upper Back
;;^UTILITY(U,$J,358.3,25458,1,4,0)
;;=4^L89.116
;;^UTILITY(U,$J,358.3,25458,2)
;;=^5158080
;;^UTILITY(U,$J,358.3,25459,0)
;;=Z59.1^^77^1019^13
;;^UTILITY(U,$J,358.3,25459,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0AD 19755 printed Sep 23, 2025@19:20:46 Page 2
IBDEI0AD ; ; 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,25392,1,3,0)
+2 ;;=3^Pressure Ulcer Left Lower Back,Stage 1
+3 ;;^UTILITY(U,$J,358.3,25392,1,4,0)
+4 ;;=4^L89.141
+5 ;;^UTILITY(U,$J,358.3,25392,2)
+6 ;;=^5133656
+7 ;;^UTILITY(U,$J,358.3,25393,0)
+8 ;;=L89.142^^77^1018^46
+9 ;;^UTILITY(U,$J,358.3,25393,1,0)
+10 ;;=^358.31IA^4^2
+11 ;;^UTILITY(U,$J,358.3,25393,1,3,0)
+12 ;;=3^Pressure Ulcer Left Lower Back,Stage 2
+13 ;;^UTILITY(U,$J,358.3,25393,1,4,0)
+14 ;;=4^L89.142
+15 ;;^UTILITY(U,$J,358.3,25393,2)
+16 ;;=^5133657
+17 ;;^UTILITY(U,$J,358.3,25394,0)
+18 ;;=L89.143^^77^1018^47
+19 ;;^UTILITY(U,$J,358.3,25394,1,0)
+20 ;;=^358.31IA^4^2
+21 ;;^UTILITY(U,$J,358.3,25394,1,3,0)
+22 ;;=3^Pressure Ulcer Left Lower Back,Stage 3
+23 ;;^UTILITY(U,$J,358.3,25394,1,4,0)
+24 ;;=4^L89.143
+25 ;;^UTILITY(U,$J,358.3,25394,2)
+26 ;;=Pressure Ulcer Left Lower Back,Stage 3^5133658
+27 ;;^UTILITY(U,$J,358.3,25395,0)
+28 ;;=L89.144^^77^1018^48
+29 ;;^UTILITY(U,$J,358.3,25395,1,0)
+30 ;;=^358.31IA^4^2
+31 ;;^UTILITY(U,$J,358.3,25395,1,3,0)
+32 ;;=3^Pressure Ulcer Left Lower Back,Stage 4
+33 ;;^UTILITY(U,$J,358.3,25395,1,4,0)
+34 ;;=4^L89.144
+35 ;;^UTILITY(U,$J,358.3,25395,2)
+36 ;;=^5133659
+37 ;;^UTILITY(U,$J,358.3,25396,0)
+38 ;;=L89.210^^77^1018^86
+39 ;;^UTILITY(U,$J,358.3,25396,1,0)
+40 ;;=^358.31IA^4^2
+41 ;;^UTILITY(U,$J,358.3,25396,1,3,0)
+42 ;;=3^Pressure Ulcer Right Hip,Unstageable
+43 ;;^UTILITY(U,$J,358.3,25396,1,4,0)
+44 ;;=4^L89.210
+45 ;;^UTILITY(U,$J,358.3,25396,2)
+46 ;;=^5009379
+47 ;;^UTILITY(U,$J,358.3,25397,0)
+48 ;;=L89.219^^77^1018^85
+49 ;;^UTILITY(U,$J,358.3,25397,1,0)
+50 ;;=^358.31IA^4^2
+51 ;;^UTILITY(U,$J,358.3,25397,1,3,0)
+52 ;;=3^Pressure Ulcer Right Hip,Stage Unspec
+53 ;;^UTILITY(U,$J,358.3,25397,1,4,0)
+54 ;;=4^L89.219
+55 ;;^UTILITY(U,$J,358.3,25397,2)
+56 ;;=^5133661
+57 ;;^UTILITY(U,$J,358.3,25398,0)
+58 ;;=L89.211^^77^1018^81
+59 ;;^UTILITY(U,$J,358.3,25398,1,0)
+60 ;;=^358.31IA^4^2
+61 ;;^UTILITY(U,$J,358.3,25398,1,3,0)
+62 ;;=3^Pressure Ulcer Right Hip,Stage 1
+63 ;;^UTILITY(U,$J,358.3,25398,1,4,0)
+64 ;;=4^L89.211
+65 ;;^UTILITY(U,$J,358.3,25398,2)
+66 ;;=^5009380
+67 ;;^UTILITY(U,$J,358.3,25399,0)
+68 ;;=L89.212^^77^1018^82
+69 ;;^UTILITY(U,$J,358.3,25399,1,0)
+70 ;;=^358.31IA^4^2
+71 ;;^UTILITY(U,$J,358.3,25399,1,3,0)
+72 ;;=3^Pressure Ulcer Right Hip,Stage 2
+73 ;;^UTILITY(U,$J,358.3,25399,1,4,0)
+74 ;;=4^L89.212
+75 ;;^UTILITY(U,$J,358.3,25399,2)
+76 ;;=^5009381
+77 ;;^UTILITY(U,$J,358.3,25400,0)
+78 ;;=L89.213^^77^1018^83
+79 ;;^UTILITY(U,$J,358.3,25400,1,0)
+80 ;;=^358.31IA^4^2
+81 ;;^UTILITY(U,$J,358.3,25400,1,3,0)
+82 ;;=3^Pressure Ulcer Right Hip,Stage 3
+83 ;;^UTILITY(U,$J,358.3,25400,1,4,0)
+84 ;;=4^L89.213
+85 ;;^UTILITY(U,$J,358.3,25400,2)
+86 ;;=^5009382
+87 ;;^UTILITY(U,$J,358.3,25401,0)
+88 ;;=L89.214^^77^1018^84
+89 ;;^UTILITY(U,$J,358.3,25401,1,0)
+90 ;;=^358.31IA^4^2
+91 ;;^UTILITY(U,$J,358.3,25401,1,3,0)
+92 ;;=3^Pressure Ulcer Right Hip,Stage 4
+93 ;;^UTILITY(U,$J,358.3,25401,1,4,0)
+94 ;;=4^L89.214
+95 ;;^UTILITY(U,$J,358.3,25401,2)
+96 ;;=^5009383
+97 ;;^UTILITY(U,$J,358.3,25402,0)
+98 ;;=L89.220^^77^1018^44
+99 ;;^UTILITY(U,$J,358.3,25402,1,0)
+100 ;;=^358.31IA^4^2
+101 ;;^UTILITY(U,$J,358.3,25402,1,3,0)
+102 ;;=3^Pressure Ulcer Left Hip,Unstageable
+103 ;;^UTILITY(U,$J,358.3,25402,1,4,0)
+104 ;;=4^L89.220
+105 ;;^UTILITY(U,$J,358.3,25402,2)
+106 ;;=^5009384
+107 ;;^UTILITY(U,$J,358.3,25403,0)
+108 ;;=L89.229^^77^1018^43
+109 ;;^UTILITY(U,$J,358.3,25403,1,0)
+110 ;;=^358.31IA^4^2
+111 ;;^UTILITY(U,$J,358.3,25403,1,3,0)
+112 ;;=3^Pressure Ulcer Left Hip,Stage Unspec
+113 ;;^UTILITY(U,$J,358.3,25403,1,4,0)
+114 ;;=4^L89.229
+115 ;;^UTILITY(U,$J,358.3,25403,2)
+116 ;;=^5133662
+117 ;;^UTILITY(U,$J,358.3,25404,0)
+118 ;;=L89.221^^77^1018^39
+119 ;;^UTILITY(U,$J,358.3,25404,1,0)
+120 ;;=^358.31IA^4^2
+121 ;;^UTILITY(U,$J,358.3,25404,1,3,0)
+122 ;;=3^Pressure Ulcer Left Hip,Stage 1
+123 ;;^UTILITY(U,$J,358.3,25404,1,4,0)
+124 ;;=4^L89.221
+125 ;;^UTILITY(U,$J,358.3,25404,2)
+126 ;;=^5009385
+127 ;;^UTILITY(U,$J,358.3,25405,0)
+128 ;;=L89.222^^77^1018^40
+129 ;;^UTILITY(U,$J,358.3,25405,1,0)
+130 ;;=^358.31IA^4^2
+131 ;;^UTILITY(U,$J,358.3,25405,1,3,0)
+132 ;;=3^Pressure Ulcer Left Hip,Stage 2
+133 ;;^UTILITY(U,$J,358.3,25405,1,4,0)
+134 ;;=4^L89.222
+135 ;;^UTILITY(U,$J,358.3,25405,2)
+136 ;;=^5009386
+137 ;;^UTILITY(U,$J,358.3,25406,0)
+138 ;;=L89.223^^77^1018^41
+139 ;;^UTILITY(U,$J,358.3,25406,1,0)
+140 ;;=^358.31IA^4^2
+141 ;;^UTILITY(U,$J,358.3,25406,1,3,0)
+142 ;;=3^Pressure Ulcer Left Hip,Stage 3
+143 ;;^UTILITY(U,$J,358.3,25406,1,4,0)
+144 ;;=4^L89.223
+145 ;;^UTILITY(U,$J,358.3,25406,2)
+146 ;;=^5009387
+147 ;;^UTILITY(U,$J,358.3,25407,0)
+148 ;;=L89.224^^77^1018^42
+149 ;;^UTILITY(U,$J,358.3,25407,1,0)
+150 ;;=^358.31IA^4^2
+151 ;;^UTILITY(U,$J,358.3,25407,1,3,0)
+152 ;;=3^Pressure Ulcer Left Hip,Stage 4
+153 ;;^UTILITY(U,$J,358.3,25407,1,4,0)
+154 ;;=4^L89.224
+155 ;;^UTILITY(U,$J,358.3,25407,2)
+156 ;;=^5009388
+157 ;;^UTILITY(U,$J,358.3,25408,0)
+158 ;;=L89.310^^77^1018^68
+159 ;;^UTILITY(U,$J,358.3,25408,1,0)
+160 ;;=^358.31IA^4^2
+161 ;;^UTILITY(U,$J,358.3,25408,1,3,0)
+162 ;;=3^Pressure Ulcer Right Buttock,Unstageable
+163 ;;^UTILITY(U,$J,358.3,25408,1,4,0)
+164 ;;=4^L89.310
+165 ;;^UTILITY(U,$J,358.3,25408,2)
+166 ;;=^5009394
+167 ;;^UTILITY(U,$J,358.3,25409,0)
+168 ;;=L89.319^^77^1018^67
+169 ;;^UTILITY(U,$J,358.3,25409,1,0)
+170 ;;=^358.31IA^4^2
+171 ;;^UTILITY(U,$J,358.3,25409,1,3,0)
+172 ;;=3^Pressure Ulcer Right Buttock,Stage Unspec
+173 ;;^UTILITY(U,$J,358.3,25409,1,4,0)
+174 ;;=4^L89.319
+175 ;;^UTILITY(U,$J,358.3,25409,2)
+176 ;;=^5133670
+177 ;;^UTILITY(U,$J,358.3,25410,0)
+178 ;;=L89.311^^77^1018^63
+179 ;;^UTILITY(U,$J,358.3,25410,1,0)
+180 ;;=^358.31IA^4^2
+181 ;;^UTILITY(U,$J,358.3,25410,1,3,0)
+182 ;;=3^Pressure Ulcer Right Buttock,Stage 1
+183 ;;^UTILITY(U,$J,358.3,25410,1,4,0)
+184 ;;=4^L89.311
+185 ;;^UTILITY(U,$J,358.3,25410,2)
+186 ;;=^5009395
+187 ;;^UTILITY(U,$J,358.3,25411,0)
+188 ;;=L89.312^^77^1018^64
+189 ;;^UTILITY(U,$J,358.3,25411,1,0)
+190 ;;=^358.31IA^4^2
+191 ;;^UTILITY(U,$J,358.3,25411,1,3,0)
+192 ;;=3^Pressure Ulcer Right Buttock,Stage 2
+193 ;;^UTILITY(U,$J,358.3,25411,1,4,0)
+194 ;;=4^L89.312
+195 ;;^UTILITY(U,$J,358.3,25411,2)
+196 ;;=^5009396
+197 ;;^UTILITY(U,$J,358.3,25412,0)
+198 ;;=L89.313^^77^1018^65
+199 ;;^UTILITY(U,$J,358.3,25412,1,0)
+200 ;;=^358.31IA^4^2
+201 ;;^UTILITY(U,$J,358.3,25412,1,3,0)
+202 ;;=3^Pressure Ulcer Right Buttock,Stage 3
+203 ;;^UTILITY(U,$J,358.3,25412,1,4,0)
+204 ;;=4^L89.313
+205 ;;^UTILITY(U,$J,358.3,25412,2)
+206 ;;=^5009397
+207 ;;^UTILITY(U,$J,358.3,25413,0)
+208 ;;=L89.314^^77^1018^66
+209 ;;^UTILITY(U,$J,358.3,25413,1,0)
+210 ;;=^358.31IA^4^2
+211 ;;^UTILITY(U,$J,358.3,25413,1,3,0)
+212 ;;=3^Pressure Ulcer Right Buttock,Stage 4
+213 ;;^UTILITY(U,$J,358.3,25413,1,4,0)
+214 ;;=4^L89.314
+215 ;;^UTILITY(U,$J,358.3,25413,2)
+216 ;;=^5009398
+217 ;;^UTILITY(U,$J,358.3,25414,0)
+218 ;;=L89.320^^77^1018^26
+219 ;;^UTILITY(U,$J,358.3,25414,1,0)
+220 ;;=^358.31IA^4^2
+221 ;;^UTILITY(U,$J,358.3,25414,1,3,0)
+222 ;;=3^Pressure Ulcer Left Buttock,Unstageable
+223 ;;^UTILITY(U,$J,358.3,25414,1,4,0)
+224 ;;=4^L89.320
+225 ;;^UTILITY(U,$J,358.3,25414,2)
+226 ;;=^5009399
+227 ;;^UTILITY(U,$J,358.3,25415,0)
+228 ;;=L89.329^^77^1018^25
+229 ;;^UTILITY(U,$J,358.3,25415,1,0)
+230 ;;=^358.31IA^4^2
+231 ;;^UTILITY(U,$J,358.3,25415,1,3,0)
+232 ;;=3^Pressure Ulcer Left Buttock,Stage Unspec
+233 ;;^UTILITY(U,$J,358.3,25415,1,4,0)
+234 ;;=4^L89.329
+235 ;;^UTILITY(U,$J,358.3,25415,2)
+236 ;;=^5133671
+237 ;;^UTILITY(U,$J,358.3,25416,0)
+238 ;;=L89.321^^77^1018^21
+239 ;;^UTILITY(U,$J,358.3,25416,1,0)
+240 ;;=^358.31IA^4^2
+241 ;;^UTILITY(U,$J,358.3,25416,1,3,0)
+242 ;;=3^Pressure Ulcer Left Buttock,Stage 1
+243 ;;^UTILITY(U,$J,358.3,25416,1,4,0)
+244 ;;=4^L89.321
+245 ;;^UTILITY(U,$J,358.3,25416,2)
+246 ;;=^5009400
+247 ;;^UTILITY(U,$J,358.3,25417,0)
+248 ;;=L89.322^^77^1018^22
+249 ;;^UTILITY(U,$J,358.3,25417,1,0)
+250 ;;=^358.31IA^4^2
+251 ;;^UTILITY(U,$J,358.3,25417,1,3,0)
+252 ;;=3^Pressure Ulcer Left Buttock,Stage 2
+253 ;;^UTILITY(U,$J,358.3,25417,1,4,0)
+254 ;;=4^L89.322
+255 ;;^UTILITY(U,$J,358.3,25417,2)
+256 ;;=^5009401
+257 ;;^UTILITY(U,$J,358.3,25418,0)
+258 ;;=L89.323^^77^1018^23
+259 ;;^UTILITY(U,$J,358.3,25418,1,0)
+260 ;;=^358.31IA^4^2
+261 ;;^UTILITY(U,$J,358.3,25418,1,3,0)
+262 ;;=3^Pressure Ulcer Left Buttock,Stage 3
+263 ;;^UTILITY(U,$J,358.3,25418,1,4,0)
+264 ;;=4^L89.323
+265 ;;^UTILITY(U,$J,358.3,25418,2)
+266 ;;=^5009402
+267 ;;^UTILITY(U,$J,358.3,25419,0)
+268 ;;=L89.324^^77^1018^24
+269 ;;^UTILITY(U,$J,358.3,25419,1,0)
+270 ;;=^358.31IA^4^2
+271 ;;^UTILITY(U,$J,358.3,25419,1,3,0)
+272 ;;=3^Pressure Ulcer Left Buttock,Stage 4
+273 ;;^UTILITY(U,$J,358.3,25419,1,4,0)
+274 ;;=4^L89.324
+275 ;;^UTILITY(U,$J,358.3,25419,2)
+276 ;;=^5009403
+277 ;;^UTILITY(U,$J,358.3,25420,0)
+278 ;;=L89.510^^77^1018^62
+279 ;;^UTILITY(U,$J,358.3,25420,1,0)
+280 ;;=^358.31IA^4^2
+281 ;;^UTILITY(U,$J,358.3,25420,1,3,0)
+282 ;;=3^Pressure Ulcer Right Ankle,Unstageable
+283 ;;^UTILITY(U,$J,358.3,25420,1,4,0)
+284 ;;=4^L89.510
+285 ;;^UTILITY(U,$J,358.3,25420,2)
+286 ;;=^5009415
+287 ;;^UTILITY(U,$J,358.3,25421,0)
+288 ;;=L89.519^^77^1018^61
+289 ;;^UTILITY(U,$J,358.3,25421,1,0)
+290 ;;=^358.31IA^4^2
+291 ;;^UTILITY(U,$J,358.3,25421,1,3,0)
+292 ;;=3^Pressure Ulcer Right Ankle,Stage Unspec
+293 ;;^UTILITY(U,$J,358.3,25421,1,4,0)
+294 ;;=4^L89.519
+295 ;;^UTILITY(U,$J,358.3,25421,2)
+296 ;;=^5133673
+297 ;;^UTILITY(U,$J,358.3,25422,0)
+298 ;;=L89.511^^77^1018^57
+299 ;;^UTILITY(U,$J,358.3,25422,1,0)
+300 ;;=^358.31IA^4^2
+301 ;;^UTILITY(U,$J,358.3,25422,1,3,0)
+302 ;;=3^Pressure Ulcer Right Ankle,Stage 1
+303 ;;^UTILITY(U,$J,358.3,25422,1,4,0)
+304 ;;=4^L89.511
+305 ;;^UTILITY(U,$J,358.3,25422,2)
+306 ;;=^5009416
+307 ;;^UTILITY(U,$J,358.3,25423,0)
+308 ;;=L89.512^^77^1018^58
+309 ;;^UTILITY(U,$J,358.3,25423,1,0)
+310 ;;=^358.31IA^4^2
+311 ;;^UTILITY(U,$J,358.3,25423,1,3,0)
+312 ;;=3^Pressure Ulcer Right Ankle,Stage 2
+313 ;;^UTILITY(U,$J,358.3,25423,1,4,0)
+314 ;;=4^L89.512
+315 ;;^UTILITY(U,$J,358.3,25423,2)
+316 ;;=^5009417
+317 ;;^UTILITY(U,$J,358.3,25424,0)
+318 ;;=L89.513^^77^1018^59
+319 ;;^UTILITY(U,$J,358.3,25424,1,0)
+320 ;;=^358.31IA^4^2
+321 ;;^UTILITY(U,$J,358.3,25424,1,3,0)
+322 ;;=3^Pressure Ulcer Right Ankle,Stage 3
+323 ;;^UTILITY(U,$J,358.3,25424,1,4,0)
+324 ;;=4^L89.513
+325 ;;^UTILITY(U,$J,358.3,25424,2)
+326 ;;=^5009418
+327 ;;^UTILITY(U,$J,358.3,25425,0)
+328 ;;=L89.514^^77^1018^60
+329 ;;^UTILITY(U,$J,358.3,25425,1,0)
+330 ;;=^358.31IA^4^2
+331 ;;^UTILITY(U,$J,358.3,25425,1,3,0)
+332 ;;=3^Pressure Ulcer Right Ankle,Stage 4
+333 ;;^UTILITY(U,$J,358.3,25425,1,4,0)
+334 ;;=4^L89.514
+335 ;;^UTILITY(U,$J,358.3,25425,2)
+336 ;;=^5009419
+337 ;;^UTILITY(U,$J,358.3,25426,0)
+338 ;;=L89.520^^77^1018^20
+339 ;;^UTILITY(U,$J,358.3,25426,1,0)
+340 ;;=^358.31IA^4^2
+341 ;;^UTILITY(U,$J,358.3,25426,1,3,0)
+342 ;;=3^Pressure Ulcer Left Ankle,Unstageable
+343 ;;^UTILITY(U,$J,358.3,25426,1,4,0)
+344 ;;=4^L89.520
+345 ;;^UTILITY(U,$J,358.3,25426,2)
+346 ;;=^5009420
+347 ;;^UTILITY(U,$J,358.3,25427,0)
+348 ;;=L89.529^^77^1018^19
+349 ;;^UTILITY(U,$J,358.3,25427,1,0)
+350 ;;=^358.31IA^4^2
+351 ;;^UTILITY(U,$J,358.3,25427,1,3,0)
+352 ;;=3^Pressure Ulcer Left Ankle,Stage Unspec
+353 ;;^UTILITY(U,$J,358.3,25427,1,4,0)
+354 ;;=4^L89.529
+355 ;;^UTILITY(U,$J,358.3,25427,2)
+356 ;;=^5133674
+357 ;;^UTILITY(U,$J,358.3,25428,0)
+358 ;;=L89.521^^77^1018^15
+359 ;;^UTILITY(U,$J,358.3,25428,1,0)
+360 ;;=^358.31IA^4^2
+361 ;;^UTILITY(U,$J,358.3,25428,1,3,0)
+362 ;;=3^Pressure Ulcer Left Ankle,Stage 1
+363 ;;^UTILITY(U,$J,358.3,25428,1,4,0)
+364 ;;=4^L89.521
+365 ;;^UTILITY(U,$J,358.3,25428,2)
+366 ;;=^5009421
+367 ;;^UTILITY(U,$J,358.3,25429,0)
+368 ;;=L89.522^^77^1018^16
+369 ;;^UTILITY(U,$J,358.3,25429,1,0)
+370 ;;=^358.31IA^4^2
+371 ;;^UTILITY(U,$J,358.3,25429,1,3,0)
+372 ;;=3^Pressure Ulcer Left Ankle,Stage 2
+373 ;;^UTILITY(U,$J,358.3,25429,1,4,0)
+374 ;;=4^L89.522
+375 ;;^UTILITY(U,$J,358.3,25429,2)
+376 ;;=^5009422
+377 ;;^UTILITY(U,$J,358.3,25430,0)
+378 ;;=L89.523^^77^1018^17
+379 ;;^UTILITY(U,$J,358.3,25430,1,0)
+380 ;;=^358.31IA^4^2
+381 ;;^UTILITY(U,$J,358.3,25430,1,3,0)
+382 ;;=3^Pressure Ulcer Left Ankle,Stage 3
+383 ;;^UTILITY(U,$J,358.3,25430,1,4,0)
+384 ;;=4^L89.523
+385 ;;^UTILITY(U,$J,358.3,25430,2)
+386 ;;=^5009423
+387 ;;^UTILITY(U,$J,358.3,25431,0)
+388 ;;=L89.524^^77^1018^18
+389 ;;^UTILITY(U,$J,358.3,25431,1,0)
+390 ;;=^358.31IA^4^2
+391 ;;^UTILITY(U,$J,358.3,25431,1,3,0)
+392 ;;=3^Pressure Ulcer Left Ankle,Stage 4
+393 ;;^UTILITY(U,$J,358.3,25431,1,4,0)
+394 ;;=4^L89.524
+395 ;;^UTILITY(U,$J,358.3,25431,2)
+396 ;;=^5009424
+397 ;;^UTILITY(U,$J,358.3,25432,0)
+398 ;;=L89.610^^77^1018^80
+399 ;;^UTILITY(U,$J,358.3,25432,1,0)
+400 ;;=^358.31IA^4^2
+401 ;;^UTILITY(U,$J,358.3,25432,1,3,0)
+402 ;;=3^Pressure Ulcer Right Heel,Unstageable
+403 ;;^UTILITY(U,$J,358.3,25432,1,4,0)
+404 ;;=4^L89.610
+405 ;;^UTILITY(U,$J,358.3,25432,2)
+406 ;;=^5009430
+407 ;;^UTILITY(U,$J,358.3,25433,0)
+408 ;;=L89.619^^77^1018^79
+409 ;;^UTILITY(U,$J,358.3,25433,1,0)
+410 ;;=^358.31IA^4^2
+411 ;;^UTILITY(U,$J,358.3,25433,1,3,0)
+412 ;;=3^Pressure Ulcer Right Heel,Stage Unspec
+413 ;;^UTILITY(U,$J,358.3,25433,1,4,0)
+414 ;;=4^L89.619
+415 ;;^UTILITY(U,$J,358.3,25433,2)
+416 ;;=^5133676
+417 ;;^UTILITY(U,$J,358.3,25434,0)
+418 ;;=L89.611^^77^1018^75
+419 ;;^UTILITY(U,$J,358.3,25434,1,0)
+420 ;;=^358.31IA^4^2
+421 ;;^UTILITY(U,$J,358.3,25434,1,3,0)
+422 ;;=3^Pressure Ulcer Right Heel,Stage 1
+423 ;;^UTILITY(U,$J,358.3,25434,1,4,0)
+424 ;;=4^L89.611
+425 ;;^UTILITY(U,$J,358.3,25434,2)
+426 ;;=^5009431
+427 ;;^UTILITY(U,$J,358.3,25435,0)
+428 ;;=L89.612^^77^1018^76
+429 ;;^UTILITY(U,$J,358.3,25435,1,0)
+430 ;;=^358.31IA^4^2
+431 ;;^UTILITY(U,$J,358.3,25435,1,3,0)
+432 ;;=3^Pressure Ulcer Right Heel,Stage 2
+433 ;;^UTILITY(U,$J,358.3,25435,1,4,0)
+434 ;;=4^L89.612
+435 ;;^UTILITY(U,$J,358.3,25435,2)
+436 ;;=^5009432
+437 ;;^UTILITY(U,$J,358.3,25436,0)
+438 ;;=L89.613^^77^1018^77
+439 ;;^UTILITY(U,$J,358.3,25436,1,0)
+440 ;;=^358.31IA^4^2
+441 ;;^UTILITY(U,$J,358.3,25436,1,3,0)
+442 ;;=3^Pressure Ulcer Right Heel,Stage 3
+443 ;;^UTILITY(U,$J,358.3,25436,1,4,0)
+444 ;;=4^L89.613
+445 ;;^UTILITY(U,$J,358.3,25436,2)
+446 ;;=^5009433
+447 ;;^UTILITY(U,$J,358.3,25437,0)
+448 ;;=L89.614^^77^1018^78
+449 ;;^UTILITY(U,$J,358.3,25437,1,0)
+450 ;;=^358.31IA^4^2
+451 ;;^UTILITY(U,$J,358.3,25437,1,3,0)
+452 ;;=3^Pressure Ulcer Right Heel,Stage 4
+453 ;;^UTILITY(U,$J,358.3,25437,1,4,0)
+454 ;;=4^L89.614
+455 ;;^UTILITY(U,$J,358.3,25437,2)
+456 ;;=^5009434
+457 ;;^UTILITY(U,$J,358.3,25438,0)
+458 ;;=L89.620^^77^1018^38
+459 ;;^UTILITY(U,$J,358.3,25438,1,0)
+460 ;;=^358.31IA^4^2
+461 ;;^UTILITY(U,$J,358.3,25438,1,3,0)
+462 ;;=3^Pressure Ulcer Left Heel,Unstageable
+463 ;;^UTILITY(U,$J,358.3,25438,1,4,0)
+464 ;;=4^L89.620
+465 ;;^UTILITY(U,$J,358.3,25438,2)
+466 ;;=^5009435
+467 ;;^UTILITY(U,$J,358.3,25439,0)
+468 ;;=L89.629^^77^1018^37
+469 ;;^UTILITY(U,$J,358.3,25439,1,0)
+470 ;;=^358.31IA^4^2
+471 ;;^UTILITY(U,$J,358.3,25439,1,3,0)
+472 ;;=3^Pressure Ulcer Left Heel,Stage Unspec
+473 ;;^UTILITY(U,$J,358.3,25439,1,4,0)
+474 ;;=4^L89.629
+475 ;;^UTILITY(U,$J,358.3,25439,2)
+476 ;;=^5133677
+477 ;;^UTILITY(U,$J,358.3,25440,0)
+478 ;;=L89.621^^77^1018^33
+479 ;;^UTILITY(U,$J,358.3,25440,1,0)
+480 ;;=^358.31IA^4^2
+481 ;;^UTILITY(U,$J,358.3,25440,1,3,0)
+482 ;;=3^Pressure Ulcer Left Heel,Stage 1
+483 ;;^UTILITY(U,$J,358.3,25440,1,4,0)
+484 ;;=4^L89.621
+485 ;;^UTILITY(U,$J,358.3,25440,2)
+486 ;;=^5009436
+487 ;;^UTILITY(U,$J,358.3,25441,0)
+488 ;;=L89.622^^77^1018^34
+489 ;;^UTILITY(U,$J,358.3,25441,1,0)
+490 ;;=^358.31IA^4^2
+491 ;;^UTILITY(U,$J,358.3,25441,1,3,0)
+492 ;;=3^Pressure Ulcer Left Heel,Stage 2
+493 ;;^UTILITY(U,$J,358.3,25441,1,4,0)
+494 ;;=4^L89.622
+495 ;;^UTILITY(U,$J,358.3,25441,2)
+496 ;;=^5009437
+497 ;;^UTILITY(U,$J,358.3,25442,0)
+498 ;;=L89.623^^77^1018^35
+499 ;;^UTILITY(U,$J,358.3,25442,1,0)
+500 ;;=^358.31IA^4^2
+501 ;;^UTILITY(U,$J,358.3,25442,1,3,0)
+502 ;;=3^Pressure Ulcer Left Heel,Stage 3
+503 ;;^UTILITY(U,$J,358.3,25442,1,4,0)
+504 ;;=4^L89.623
+505 ;;^UTILITY(U,$J,358.3,25442,2)
+506 ;;=^5009438
+507 ;;^UTILITY(U,$J,358.3,25443,0)
+508 ;;=L89.624^^77^1018^36
+509 ;;^UTILITY(U,$J,358.3,25443,1,0)
+510 ;;=^358.31IA^4^2
+511 ;;^UTILITY(U,$J,358.3,25443,1,3,0)
+512 ;;=3^Pressure Ulcer Left Heel,Stage 4
+513 ;;^UTILITY(U,$J,358.3,25443,1,4,0)
+514 ;;=4^L89.624
+515 ;;^UTILITY(U,$J,358.3,25443,2)
+516 ;;=^5009439
+517 ;;^UTILITY(U,$J,358.3,25444,0)
+518 ;;=L89.899^^77^1018^99
+519 ;;^UTILITY(U,$J,358.3,25444,1,0)
+520 ;;=^358.31IA^4^2
+521 ;;^UTILITY(U,$J,358.3,25444,1,3,0)
+522 ;;=3^Pressure Ulcer of Other Site,Stage Unspec
+523 ;;^UTILITY(U,$J,358.3,25444,1,4,0)
+524 ;;=4^L89.899
+525 ;;^UTILITY(U,$J,358.3,25444,2)
+526 ;;=^5133663
+527 ;;^UTILITY(U,$J,358.3,25445,0)
+528 ;;=L89.526^^77^1018^1
+529 ;;^UTILITY(U,$J,358.3,25445,1,0)
+530 ;;=^358.31IA^4^2
+531 ;;^UTILITY(U,$J,358.3,25445,1,3,0)
+532 ;;=3^Pressure Induced DTI,Left Ankle
+533 ;;^UTILITY(U,$J,358.3,25445,1,4,0)
+534 ;;=4^L89.526
+535 ;;^UTILITY(U,$J,358.3,25445,2)
+536 ;;=^5158094
+537 ;;^UTILITY(U,$J,358.3,25446,0)
+538 ;;=L89.326^^77^1018^2
+539 ;;^UTILITY(U,$J,358.3,25446,1,0)
+540 ;;=^358.31IA^4^2
+541 ;;^UTILITY(U,$J,358.3,25446,1,3,0)
+542 ;;=3^Pressure Induced DTI,Left Buttock
+543 ;;^UTILITY(U,$J,358.3,25446,1,4,0)
+544 ;;=4^L89.326
+545 ;;^UTILITY(U,$J,358.3,25446,2)
+546 ;;=^5158090
+547 ;;^UTILITY(U,$J,358.3,25447,0)
+548 ;;=L89.026^^77^1018^3
+549 ;;^UTILITY(U,$J,358.3,25447,1,0)
+550 ;;=^358.31IA^4^2
+551 ;;^UTILITY(U,$J,358.3,25447,1,3,0)
+552 ;;=3^Pressure Induced DTI,Left Elbow
+553 ;;^UTILITY(U,$J,358.3,25447,1,4,0)
+554 ;;=4^L89.026
+555 ;;^UTILITY(U,$J,358.3,25447,2)
+556 ;;=^5158078
+557 ;;^UTILITY(U,$J,358.3,25448,0)
+558 ;;=L89.226^^77^1018^5
+559 ;;^UTILITY(U,$J,358.3,25448,1,0)
+560 ;;=^358.31IA^4^2
+561 ;;^UTILITY(U,$J,358.3,25448,1,3,0)
+562 ;;=3^Pressure Induced DTI,Left Hip
+563 ;;^UTILITY(U,$J,358.3,25448,1,4,0)
+564 ;;=4^L89.226
+565 ;;^UTILITY(U,$J,358.3,25448,2)
+566 ;;=^5158087
+567 ;;^UTILITY(U,$J,358.3,25449,0)
+568 ;;=L89.626^^77^1018^4
+569 ;;^UTILITY(U,$J,358.3,25449,1,0)
+570 ;;=^358.31IA^4^2
+571 ;;^UTILITY(U,$J,358.3,25449,1,3,0)
+572 ;;=3^Pressure Induced DTI,Left Heel
+573 ;;^UTILITY(U,$J,358.3,25449,1,4,0)
+574 ;;=4^L89.626
+575 ;;^UTILITY(U,$J,358.3,25449,2)
+576 ;;=^5158097
+577 ;;^UTILITY(U,$J,358.3,25450,0)
+578 ;;=L89.146^^77^1018^6
+579 ;;^UTILITY(U,$J,358.3,25450,1,0)
+580 ;;=^358.31IA^4^2
+581 ;;^UTILITY(U,$J,358.3,25450,1,3,0)
+582 ;;=3^Pressure Induced DTI,Left Lower Back
+583 ;;^UTILITY(U,$J,358.3,25450,1,4,0)
+584 ;;=4^L89.146
+585 ;;^UTILITY(U,$J,358.3,25450,2)
+586 ;;=^5158083
+587 ;;^UTILITY(U,$J,358.3,25451,0)
+588 ;;=L89.126^^77^1018^7
+589 ;;^UTILITY(U,$J,358.3,25451,1,0)
+590 ;;=^358.31IA^4^2
+591 ;;^UTILITY(U,$J,358.3,25451,1,3,0)
+592 ;;=3^Pressure Induced DTI,Left Upper Back
+593 ;;^UTILITY(U,$J,358.3,25451,1,4,0)
+594 ;;=4^L89.126
+595 ;;^UTILITY(U,$J,358.3,25451,2)
+596 ;;=^5158081
+597 ;;^UTILITY(U,$J,358.3,25452,0)
+598 ;;=L89.516^^77^1018^8
+599 ;;^UTILITY(U,$J,358.3,25452,1,0)
+600 ;;=^358.31IA^4^2
+601 ;;^UTILITY(U,$J,358.3,25452,1,3,0)
+602 ;;=3^Pressure Induced DTI,Right Ankle
+603 ;;^UTILITY(U,$J,358.3,25452,1,4,0)
+604 ;;=4^L89.516
+605 ;;^UTILITY(U,$J,358.3,25452,2)
+606 ;;=^5158093
+607 ;;^UTILITY(U,$J,358.3,25453,0)
+608 ;;=L89.316^^77^1018^9
+609 ;;^UTILITY(U,$J,358.3,25453,1,0)
+610 ;;=^358.31IA^4^2
+611 ;;^UTILITY(U,$J,358.3,25453,1,3,0)
+612 ;;=3^Pressure Induced DTI,Right Buttock
+613 ;;^UTILITY(U,$J,358.3,25453,1,4,0)
+614 ;;=4^L89.316
+615 ;;^UTILITY(U,$J,358.3,25453,2)
+616 ;;=^5158089
+617 ;;^UTILITY(U,$J,358.3,25454,0)
+618 ;;=L89.016^^77^1018^10
+619 ;;^UTILITY(U,$J,358.3,25454,1,0)
+620 ;;=^358.31IA^4^2
+621 ;;^UTILITY(U,$J,358.3,25454,1,3,0)
+622 ;;=3^Pressure Induced DTI,Right Elbow
+623 ;;^UTILITY(U,$J,358.3,25454,1,4,0)
+624 ;;=4^L89.016
+625 ;;^UTILITY(U,$J,358.3,25454,2)
+626 ;;=^5158077
+627 ;;^UTILITY(U,$J,358.3,25455,0)
+628 ;;=L89.616^^77^1018^11
+629 ;;^UTILITY(U,$J,358.3,25455,1,0)
+630 ;;=^358.31IA^4^2
+631 ;;^UTILITY(U,$J,358.3,25455,1,3,0)
+632 ;;=3^Pressure Induced DTI,Right Heel
+633 ;;^UTILITY(U,$J,358.3,25455,1,4,0)
+634 ;;=4^L89.616
+635 ;;^UTILITY(U,$J,358.3,25455,2)
+636 ;;=^5158096
+637 ;;^UTILITY(U,$J,358.3,25456,0)
+638 ;;=L89.216^^77^1018^12
+639 ;;^UTILITY(U,$J,358.3,25456,1,0)
+640 ;;=^358.31IA^4^2
+641 ;;^UTILITY(U,$J,358.3,25456,1,3,0)
+642 ;;=3^Pressure Induced DTI,Right Hip
+643 ;;^UTILITY(U,$J,358.3,25456,1,4,0)
+644 ;;=4^L89.216
+645 ;;^UTILITY(U,$J,358.3,25456,2)
+646 ;;=^5158086
+647 ;;^UTILITY(U,$J,358.3,25457,0)
+648 ;;=L89.136^^77^1018^13
+649 ;;^UTILITY(U,$J,358.3,25457,1,0)
+650 ;;=^358.31IA^4^2
+651 ;;^UTILITY(U,$J,358.3,25457,1,3,0)
+652 ;;=3^Pressure Induced DTI,Right Lower Back
+653 ;;^UTILITY(U,$J,358.3,25457,1,4,0)
+654 ;;=4^L89.136
+655 ;;^UTILITY(U,$J,358.3,25457,2)
+656 ;;=^5158082
+657 ;;^UTILITY(U,$J,358.3,25458,0)
+658 ;;=L89.116^^77^1018^14
+659 ;;^UTILITY(U,$J,358.3,25458,1,0)
+660 ;;=^358.31IA^4^2
+661 ;;^UTILITY(U,$J,358.3,25458,1,3,0)
+662 ;;=3^Pressure Induced DTI,Right Upper Back
+663 ;;^UTILITY(U,$J,358.3,25458,1,4,0)
+664 ;;=4^L89.116
+665 ;;^UTILITY(U,$J,358.3,25458,2)
+666 ;;=^5158080
+667 ;;^UTILITY(U,$J,358.3,25459,0)
+668 ;;=Z59.1^^77^1019^13
+669 ;;^UTILITY(U,$J,358.3,25459,1,0)
+670 ;;=^358.31IA^4^2
