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

IBDEI045.m

Go to the documentation of this file.
IBDEI045 ; ; 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,9988,1,3,0)
 ;;=3^Strain of Right Thumb at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9988,1,4,0)
 ;;=4^S56.011A
 ;;^UTILITY(U,$J,358.3,9988,2)
 ;;=^5031568
 ;;^UTILITY(U,$J,358.3,9989,0)
 ;;=S56.012A^^45^444^38
 ;;^UTILITY(U,$J,358.3,9989,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9989,1,3,0)
 ;;=3^Strain of Left Thumb at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9989,1,4,0)
 ;;=4^S56.012A
 ;;^UTILITY(U,$J,358.3,9989,2)
 ;;=^5031571
 ;;^UTILITY(U,$J,358.3,9990,0)
 ;;=S56.111A^^45^444^44
 ;;^UTILITY(U,$J,358.3,9990,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9990,1,3,0)
 ;;=3^Strain of Right Index Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9990,1,4,0)
 ;;=4^S56.111A
 ;;^UTILITY(U,$J,358.3,9990,2)
 ;;=^5031616
 ;;^UTILITY(U,$J,358.3,9991,0)
 ;;=S56.112A^^45^444^25
 ;;^UTILITY(U,$J,358.3,9991,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9991,1,3,0)
 ;;=3^Strain of Left Index Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9991,1,4,0)
 ;;=4^S56.112A
 ;;^UTILITY(U,$J,358.3,9991,2)
 ;;=^5031619
 ;;^UTILITY(U,$J,358.3,9992,0)
 ;;=S56.113A^^45^444^52
 ;;^UTILITY(U,$J,358.3,9992,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9992,1,3,0)
 ;;=3^Strain of Right Middle Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9992,1,4,0)
 ;;=4^S56.113A
 ;;^UTILITY(U,$J,358.3,9992,2)
 ;;=^5031622
 ;;^UTILITY(U,$J,358.3,9993,0)
 ;;=S56.114A^^45^444^33
 ;;^UTILITY(U,$J,358.3,9993,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9993,1,3,0)
 ;;=3^Strain of Left Middle Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9993,1,4,0)
 ;;=4^S56.114A
 ;;^UTILITY(U,$J,358.3,9993,2)
 ;;=^5031625
 ;;^UTILITY(U,$J,358.3,9994,0)
 ;;=S56.115A^^45^444^54
 ;;^UTILITY(U,$J,358.3,9994,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9994,1,3,0)
 ;;=3^Strain of Right Ring Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9994,1,4,0)
 ;;=4^S56.115A
 ;;^UTILITY(U,$J,358.3,9994,2)
 ;;=^5031628
 ;;^UTILITY(U,$J,358.3,9995,0)
 ;;=S56.417A^^45^444^46
 ;;^UTILITY(U,$J,358.3,9995,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9995,1,3,0)
 ;;=3^Strain of Right Little Finger at Forearm Level Extn Musc/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9995,1,4,0)
 ;;=4^S56.417A
 ;;^UTILITY(U,$J,358.3,9995,2)
 ;;=^5031781
 ;;^UTILITY(U,$J,358.3,9996,0)
 ;;=S56.418A^^45^444^27
 ;;^UTILITY(U,$J,358.3,9996,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9996,1,3,0)
 ;;=3^Strain of Left Little Finger at Forearm Level Extn Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9996,1,4,0)
 ;;=4^S56.418A
 ;;^UTILITY(U,$J,358.3,9996,2)
 ;;=^5031784
 ;;^UTILITY(U,$J,358.3,9997,0)
 ;;=S56.811A^^45^444^42
 ;;^UTILITY(U,$J,358.3,9997,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9997,1,3,0)
 ;;=3^Strain of Right Forearm Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9997,1,4,0)
 ;;=4^S56.811A
 ;;^UTILITY(U,$J,358.3,9997,2)
 ;;=^5031862
 ;;^UTILITY(U,$J,358.3,9998,0)
 ;;=S56.812A^^45^444^23
 ;;^UTILITY(U,$J,358.3,9998,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9998,1,3,0)
 ;;=3^Strain of Left Forearm Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9998,1,4,0)
 ;;=4^S56.812A
 ;;^UTILITY(U,$J,358.3,9998,2)
 ;;=^5031865
 ;;^UTILITY(U,$J,358.3,9999,0)
 ;;=S56.116A^^45^444^35
 ;;^UTILITY(U,$J,358.3,9999,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,9999,1,3,0)
 ;;=3^Strain of Left Ring Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,9999,1,4,0)
 ;;=4^S56.116A
 ;;^UTILITY(U,$J,358.3,9999,2)
 ;;=^5031631
 ;;^UTILITY(U,$J,358.3,10000,0)
 ;;=S56.117A^^45^444^47
 ;;^UTILITY(U,$J,358.3,10000,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10000,1,3,0)
 ;;=3^Strain of Right Little Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10000,1,4,0)
 ;;=4^S56.117A
 ;;^UTILITY(U,$J,358.3,10000,2)
 ;;=^5031634
 ;;^UTILITY(U,$J,358.3,10001,0)
 ;;=S56.118A^^45^444^28
 ;;^UTILITY(U,$J,358.3,10001,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10001,1,3,0)
 ;;=3^Strain of Left Little Finger at Forearm Level Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10001,1,4,0)
 ;;=4^S56.118A
 ;;^UTILITY(U,$J,358.3,10001,2)
 ;;=^5031637
 ;;^UTILITY(U,$J,358.3,10002,0)
 ;;=S56.211A^^45^444^41
 ;;^UTILITY(U,$J,358.3,10002,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10002,1,3,0)
 ;;=3^Strain of Right Forearm Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10002,1,4,0)
 ;;=4^S56.211A
 ;;^UTILITY(U,$J,358.3,10002,2)
 ;;=^5031691
 ;;^UTILITY(U,$J,358.3,10003,0)
 ;;=S56.212A^^45^444^22
 ;;^UTILITY(U,$J,358.3,10003,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10003,1,3,0)
 ;;=3^Strain of Left Forearm Flexor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10003,1,4,0)
 ;;=4^S56.212A
 ;;^UTILITY(U,$J,358.3,10003,2)
 ;;=^5031694
 ;;^UTILITY(U,$J,358.3,10004,0)
 ;;=S56.311A^^45^444^57
 ;;^UTILITY(U,$J,358.3,10004,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10004,1,3,0)
 ;;=3^Strain of Right Thumb at Forearm Level Extn/Abdr Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10004,1,4,0)
 ;;=4^S56.311A
 ;;^UTILITY(U,$J,358.3,10004,2)
 ;;=^5031715
 ;;^UTILITY(U,$J,358.3,10005,0)
 ;;=S56.312A^^45^444^37
 ;;^UTILITY(U,$J,358.3,10005,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10005,1,3,0)
 ;;=3^Strain of Left Thumb at Forearm Level Extn/Abdr Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10005,1,4,0)
 ;;=4^S56.312A
 ;;^UTILITY(U,$J,358.3,10005,2)
 ;;=^5031718
 ;;^UTILITY(U,$J,358.3,10006,0)
 ;;=S56.411A^^45^444^45
 ;;^UTILITY(U,$J,358.3,10006,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10006,1,3,0)
 ;;=3^Strain of Right Index Finger at Forearm Level Extensor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10006,1,4,0)
 ;;=4^S56.411A
 ;;^UTILITY(U,$J,358.3,10006,2)
 ;;=^5031763
 ;;^UTILITY(U,$J,358.3,10007,0)
 ;;=S56.412A^^45^444^26
 ;;^UTILITY(U,$J,358.3,10007,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10007,1,3,0)
 ;;=3^Strain of Left Index Finger at Forearm Level Extensor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10007,1,4,0)
 ;;=4^S56.412A
 ;;^UTILITY(U,$J,358.3,10007,2)
 ;;=^5031766
 ;;^UTILITY(U,$J,358.3,10008,0)
 ;;=S56.413A^^45^444^53
 ;;^UTILITY(U,$J,358.3,10008,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10008,1,3,0)
 ;;=3^Strain of Right Middle Finger at Forearm Level Extensor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10008,1,4,0)
 ;;=4^S56.413A
 ;;^UTILITY(U,$J,358.3,10008,2)
 ;;=^5031769
 ;;^UTILITY(U,$J,358.3,10009,0)
 ;;=S56.414A^^45^444^34
 ;;^UTILITY(U,$J,358.3,10009,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10009,1,3,0)
 ;;=3^Strain of Left Middle Finger at Forearm Levle Extensor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10009,1,4,0)
 ;;=4^S56.414A
 ;;^UTILITY(U,$J,358.3,10009,2)
 ;;=^5031772
 ;;^UTILITY(U,$J,358.3,10010,0)
 ;;=S56.415A^^45^444^55
 ;;^UTILITY(U,$J,358.3,10010,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10010,1,3,0)
 ;;=3^Strain of Right Ring Finger at Forearm Level Extensor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10010,1,4,0)
 ;;=4^S56.415A
 ;;^UTILITY(U,$J,358.3,10010,2)
 ;;=^5031775
 ;;^UTILITY(U,$J,358.3,10011,0)
 ;;=S56.416A^^45^444^36
 ;;^UTILITY(U,$J,358.3,10011,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10011,1,3,0)
 ;;=3^Strain of Left Ring Finger at Forearm Level Extensor Muscle/Fasc/Tendon
 ;;^UTILITY(U,$J,358.3,10011,1,4,0)
 ;;=4^S56.416A
 ;;^UTILITY(U,$J,358.3,10011,2)
 ;;=^5031778
 ;;^UTILITY(U,$J,358.3,10012,0)
 ;;=S66.912A^^45^444^24
 ;;^UTILITY(U,$J,358.3,10012,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10012,1,3,0)
 ;;=3^Strain of Left Hand Muscle/Fasc/Tendon,Unspec
 ;;^UTILITY(U,$J,358.3,10012,1,4,0)
 ;;=4^S66.912A
 ;;^UTILITY(U,$J,358.3,10012,2)
 ;;=^5036534
 ;;^UTILITY(U,$J,358.3,10013,0)
 ;;=S66.911A^^45^444^43
 ;;^UTILITY(U,$J,358.3,10013,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10013,1,3,0)
 ;;=3^Strain of Right Hand Muscle/Fasc/Tendon,Unspec
 ;;^UTILITY(U,$J,358.3,10013,1,4,0)
 ;;=4^S66.911A
 ;;^UTILITY(U,$J,358.3,10013,2)
 ;;=^5036531
 ;;^UTILITY(U,$J,358.3,10014,0)
 ;;=S63.501A^^45^444^20
 ;;^UTILITY(U,$J,358.3,10014,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10014,1,3,0)
 ;;=3^Sprain of Right Wrist
 ;;^UTILITY(U,$J,358.3,10014,1,4,0)
 ;;=4^S63.501A
 ;;^UTILITY(U,$J,358.3,10014,2)
 ;;=^5035583
 ;;^UTILITY(U,$J,358.3,10015,0)
 ;;=S63.502A^^45^444^11
 ;;^UTILITY(U,$J,358.3,10015,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10015,1,3,0)
 ;;=3^Sprain of Left Wrist
 ;;^UTILITY(U,$J,358.3,10015,1,4,0)
 ;;=4^S63.502A
 ;;^UTILITY(U,$J,358.3,10015,2)
 ;;=^5035586
 ;;^UTILITY(U,$J,358.3,10016,0)
 ;;=S83.8X1A^^45^444^18
 ;;^UTILITY(U,$J,358.3,10016,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10016,1,3,0)
 ;;=3^Sprain of Right Knee,Oth Spec Parts
 ;;^UTILITY(U,$J,358.3,10016,1,4,0)
 ;;=4^S83.8X1A
 ;;^UTILITY(U,$J,358.3,10016,2)
 ;;=^5043160
 ;;^UTILITY(U,$J,358.3,10017,0)
 ;;=S83.8X2A^^45^444^9
 ;;^UTILITY(U,$J,358.3,10017,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10017,1,3,0)
 ;;=3^Sprain of Left Knee,Oth Spec Parts
 ;;^UTILITY(U,$J,358.3,10017,1,4,0)
 ;;=4^S83.8X2A
 ;;^UTILITY(U,$J,358.3,10017,2)
 ;;=^5043163
 ;;^UTILITY(U,$J,358.3,10018,0)
 ;;=S86.211A^^45^444^48
 ;;^UTILITY(U,$J,358.3,10018,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10018,1,3,0)
 ;;=3^Strain of Right Lower Leg Anterior Muscle/Tendon
 ;;^UTILITY(U,$J,358.3,10018,1,4,0)
 ;;=4^S86.211A
 ;;^UTILITY(U,$J,358.3,10018,2)
 ;;=^5043484
 ;;^UTILITY(U,$J,358.3,10019,0)
 ;;=S86.212A^^45^444^29
 ;;^UTILITY(U,$J,358.3,10019,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10019,1,3,0)
 ;;=3^Strain of Left Lower Leg Anterior Muscle/Tendon
 ;;^UTILITY(U,$J,358.3,10019,1,4,0)
 ;;=4^S86.212A
 ;;^UTILITY(U,$J,358.3,10019,2)
 ;;=^5043487
 ;;^UTILITY(U,$J,358.3,10020,0)
 ;;=S86.311A^^45^444^50
 ;;^UTILITY(U,$J,358.3,10020,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10020,1,3,0)
 ;;=3^Strain of Right Lower Leg Peroneal Muscle/Tendon
 ;;^UTILITY(U,$J,358.3,10020,1,4,0)
 ;;=4^S86.311A
 ;;^UTILITY(U,$J,358.3,10020,2)
 ;;=^5043511
 ;;^UTILITY(U,$J,358.3,10021,0)
 ;;=S86.312A^^45^444^31
 ;;^UTILITY(U,$J,358.3,10021,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10021,1,3,0)
 ;;=3^Strain of Left Lower Leg Peroneal Muscle/Tendon
 ;;^UTILITY(U,$J,358.3,10021,1,4,0)
 ;;=4^S86.312A
 ;;^UTILITY(U,$J,358.3,10021,2)
 ;;=^5043514
 ;;^UTILITY(U,$J,358.3,10022,0)
 ;;=S86.811A^^45^444^49
 ;;^UTILITY(U,$J,358.3,10022,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10022,1,3,0)
 ;;=3^Strain of Right Lower Leg Muscle/Tendon NEC
 ;;^UTILITY(U,$J,358.3,10022,1,4,0)
 ;;=4^S86.811A
 ;;^UTILITY(U,$J,358.3,10022,2)
 ;;=^5043538
 ;;^UTILITY(U,$J,358.3,10023,0)
 ;;=S86.812A^^45^444^30
 ;;^UTILITY(U,$J,358.3,10023,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10023,1,3,0)
 ;;=3^Strain of Left Lower Leg Muscle/Tendon NEC
 ;;^UTILITY(U,$J,358.3,10023,1,4,0)
 ;;=4^S86.812A
 ;;^UTILITY(U,$J,358.3,10023,2)
 ;;=^5043541
 ;;^UTILITY(U,$J,358.3,10024,0)
 ;;=S86.111A^^45^444^51
 ;;^UTILITY(U,$J,358.3,10024,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10024,1,3,0)
 ;;=3^Strain of Right Lower Leg Posterior Muscle/Tendon
 ;;^UTILITY(U,$J,358.3,10024,1,4,0)
 ;;=4^S86.111A
 ;;^UTILITY(U,$J,358.3,10024,2)
 ;;=^5043460
 ;;^UTILITY(U,$J,358.3,10025,0)
 ;;=S86.112A^^45^444^32
 ;;^UTILITY(U,$J,358.3,10025,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10025,1,3,0)
 ;;=3^Strain of Left Lower Leg Posterior Muscle/Tendon
 ;;^UTILITY(U,$J,358.3,10025,1,4,0)
 ;;=4^S86.112A
 ;;^UTILITY(U,$J,358.3,10025,2)
 ;;=^5043463
 ;;^UTILITY(U,$J,358.3,10026,0)
 ;;=S83.401A^^45^444^17
 ;;^UTILITY(U,$J,358.3,10026,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10026,1,3,0)
 ;;=3^Sprain of Right Knee Collateral Ligament
 ;;^UTILITY(U,$J,358.3,10026,1,4,0)
 ;;=4^S83.401A
 ;;^UTILITY(U,$J,358.3,10026,2)
 ;;=^5043103
 ;;^UTILITY(U,$J,358.3,10027,0)
 ;;=S83.402A^^45^444^8
 ;;^UTILITY(U,$J,358.3,10027,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10027,1,3,0)
 ;;=3^Sprain of Left Knee Collateral Ligament
 ;;^UTILITY(U,$J,358.3,10027,1,4,0)
 ;;=4^S83.402A
 ;;^UTILITY(U,$J,358.3,10027,2)
 ;;=^5043106
 ;;^UTILITY(U,$J,358.3,10028,0)
 ;;=S93.402A^^45^444^6
 ;;^UTILITY(U,$J,358.3,10028,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10028,1,3,0)
 ;;=3^Sprain of Left Ankle Ligament
 ;;^UTILITY(U,$J,358.3,10028,1,4,0)
 ;;=4^S93.402A
 ;;^UTILITY(U,$J,358.3,10028,2)
 ;;=^5045777
 ;;^UTILITY(U,$J,358.3,10029,0)
 ;;=S93.401A^^45^444^15
 ;;^UTILITY(U,$J,358.3,10029,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10029,1,3,0)
 ;;=3^Sprain of Right Ankle Ligament
 ;;^UTILITY(U,$J,358.3,10029,1,4,0)
 ;;=4^S93.401A
 ;;^UTILITY(U,$J,358.3,10029,2)
 ;;=^5045774
 ;;^UTILITY(U,$J,358.3,10030,0)
 ;;=S56.511A^^45^444^40
 ;;^UTILITY(U,$J,358.3,10030,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10030,1,3,0)
 ;;=3^Strain of Right Forearm Extn Musc/Fasc/Tend
 ;;^UTILITY(U,$J,358.3,10030,1,4,0)
 ;;=4^S56.511A
 ;;^UTILITY(U,$J,358.3,10030,2)
 ;;=^5031838
 ;;^UTILITY(U,$J,358.3,10031,0)
 ;;=S56.512A^^45^444^21
 ;;^UTILITY(U,$J,358.3,10031,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10031,1,3,0)
 ;;=3^Strain of Left Forearm Extn Musc/Fasc/Tend
 ;;^UTILITY(U,$J,358.3,10031,1,4,0)
 ;;=4^S56.512A
 ;;^UTILITY(U,$J,358.3,10031,2)
 ;;=^5031841
 ;;^UTILITY(U,$J,358.3,10032,0)
 ;;=S13.8XXA^^45^444^13
 ;;^UTILITY(U,$J,358.3,10032,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10032,1,3,0)
 ;;=3^Sprain of Neck Joints/Ligaments,Init Encntr
 ;;^UTILITY(U,$J,358.3,10032,1,4,0)
 ;;=4^S13.8XXA
 ;;^UTILITY(U,$J,358.3,10032,2)
 ;;=^5022034
 ;;^UTILITY(U,$J,358.3,10033,0)
 ;;=S16.1XXA^^45^444^39
 ;;^UTILITY(U,$J,358.3,10033,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10033,1,3,0)
 ;;=3^Strain of Neck Muscle/Fasc/Tendon,Init Encntr
 ;;^UTILITY(U,$J,358.3,10033,1,4,0)
 ;;=4^S16.1XXA
 ;;^UTILITY(U,$J,358.3,10033,2)
 ;;=^5022358
 ;;^UTILITY(U,$J,358.3,10034,0)
 ;;=S33.5XXA^^45^444^12
 ;;^UTILITY(U,$J,358.3,10034,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10034,1,3,0)
 ;;=3^Sprain of Lumbar Spine Ligaments,Init Encntr
 ;;^UTILITY(U,$J,358.3,10034,1,4,0)
 ;;=4^S33.5XXA
 ;;^UTILITY(U,$J,358.3,10034,2)
 ;;=^5025172
 ;;^UTILITY(U,$J,358.3,10035,0)
 ;;=S20.221A^^45^444^4
 ;;^UTILITY(U,$J,358.3,10035,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10035,1,3,0)
 ;;=3^Contusion,Rt Back Wall of Thorax
 ;;^UTILITY(U,$J,358.3,10035,1,4,0)
 ;;=4^S20.221A
 ;;^UTILITY(U,$J,358.3,10035,2)
 ;;=^5022484
 ;;^UTILITY(U,$J,358.3,10036,0)
 ;;=S20.222A^^45^444^2
 ;;^UTILITY(U,$J,358.3,10036,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10036,1,3,0)
 ;;=3^Contusion,Lt Back Wall of Thorax
 ;;^UTILITY(U,$J,358.3,10036,1,4,0)
 ;;=4^S20.222A
 ;;^UTILITY(U,$J,358.3,10036,2)
 ;;=^5022487
 ;;^UTILITY(U,$J,358.3,10037,0)
 ;;=S20.223A^^45^444^1
 ;;^UTILITY(U,$J,358.3,10037,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10037,1,3,0)
 ;;=3^Contusion,Bilateral Back Wall of Thorax
 ;;^UTILITY(U,$J,358.3,10037,1,4,0)
 ;;=4^S20.223A
 ;;^UTILITY(U,$J,358.3,10037,2)
 ;;=^5159315
 ;;^UTILITY(U,$J,358.3,10038,0)
 ;;=S20.224A^^45^444^3
 ;;^UTILITY(U,$J,358.3,10038,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10038,1,3,0)
 ;;=3^Contusion,Middle Back Wall of Thorax
 ;;^UTILITY(U,$J,358.3,10038,1,4,0)
 ;;=4^S20.224A
 ;;^UTILITY(U,$J,358.3,10038,2)
 ;;=^5159318
 ;;^UTILITY(U,$J,358.3,10039,0)
 ;;=F10.20^^45^445^9
 ;;^UTILITY(U,$J,358.3,10039,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10039,1,3,0)
 ;;=3^Alcohol Dependence,Uncomplicated
 ;;^UTILITY(U,$J,358.3,10039,1,4,0)
 ;;=4^F10.20
 ;;^UTILITY(U,$J,358.3,10039,2)
 ;;=^5003081
 ;;^UTILITY(U,$J,358.3,10040,0)
 ;;=F11.29^^45^445^61
 ;;^UTILITY(U,$J,358.3,10040,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10040,1,3,0)
 ;;=3^Opioid Dependence w/ Unspec Opioid-Induced Disorder
 ;;^UTILITY(U,$J,358.3,10040,1,4,0)
 ;;=4^F11.29
 ;;^UTILITY(U,$J,358.3,10040,2)
 ;;=^5003141
 ;;^UTILITY(U,$J,358.3,10041,0)
 ;;=F11.288^^45^445^60
 ;;^UTILITY(U,$J,358.3,10041,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10041,1,3,0)
 ;;=3^Opioid Dependence w/ Other Opioid-Induced Disorder
 ;;^UTILITY(U,$J,358.3,10041,1,4,0)
 ;;=4^F11.288
 ;;^UTILITY(U,$J,358.3,10041,2)
 ;;=^5003140
 ;;^UTILITY(U,$J,358.3,10042,0)
 ;;=F11.282^^45^445^59
 ;;^UTILITY(U,$J,358.3,10042,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10042,1,3,0)
 ;;=3^Opioid Dependence w/ Opioid-Induced Sleep Disorder
 ;;^UTILITY(U,$J,358.3,10042,1,4,0)
 ;;=4^F11.282
 ;;^UTILITY(U,$J,358.3,10042,2)
 ;;=^5003139
 ;;^UTILITY(U,$J,358.3,10043,0)
 ;;=F11.281^^45^445^58
 ;;^UTILITY(U,$J,358.3,10043,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10043,1,3,0)
 ;;=3^Opioid Dependence w/ Opioid-Induced Sexual Dysfunction
 ;;^UTILITY(U,$J,358.3,10043,1,4,0)
 ;;=4^F11.281
 ;;^UTILITY(U,$J,358.3,10043,2)
 ;;=^5003138
 ;;^UTILITY(U,$J,358.3,10044,0)
 ;;=F11.259^^45^445^57
 ;;^UTILITY(U,$J,358.3,10044,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10044,1,3,0)
 ;;=3^Opioid Dependence w/ Opioid-Induced Psychotic Disorder,Unspec
 ;;^UTILITY(U,$J,358.3,10044,1,4,0)
 ;;=4^F11.259
 ;;^UTILITY(U,$J,358.3,10044,2)
 ;;=^5003137
 ;;^UTILITY(U,$J,358.3,10045,0)
 ;;=F11.251^^45^445^50
 ;;^UTILITY(U,$J,358.3,10045,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10045,1,3,0)
 ;;=3^Opioid Depend w/ Opioid-Induc Psychotic Disorder w/ Hallucin
 ;;^UTILITY(U,$J,358.3,10045,1,4,0)
 ;;=4^F11.251
 ;;^UTILITY(U,$J,358.3,10045,2)
 ;;=^5003136
 ;;^UTILITY(U,$J,358.3,10046,0)
 ;;=F11.250^^45^445^51
 ;;^UTILITY(U,$J,358.3,10046,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10046,1,3,0)
 ;;=3^Opioid Depend w/ Opioid-Induc Psychotic Disorder w/ Delusions
 ;;^UTILITY(U,$J,358.3,10046,1,4,0)
 ;;=4^F11.250
 ;;^UTILITY(U,$J,358.3,10046,2)
 ;;=^5003135
 ;;^UTILITY(U,$J,358.3,10047,0)
 ;;=F11.24^^45^445^56
 ;;^UTILITY(U,$J,358.3,10047,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10047,1,3,0)
 ;;=3^Opioid Dependence w/ Opioid-Induced Mood Disorder
 ;;^UTILITY(U,$J,358.3,10047,1,4,0)
 ;;=4^F11.24
 ;;^UTILITY(U,$J,358.3,10047,2)
 ;;=^5003134
 ;;^UTILITY(U,$J,358.3,10048,0)
 ;;=F11.23^^45^445^62
 ;;^UTILITY(U,$J,358.3,10048,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10048,1,3,0)
 ;;=3^Opioid Dependence w/ Withdrawal
 ;;^UTILITY(U,$J,358.3,10048,1,4,0)
 ;;=4^F11.23
 ;;^UTILITY(U,$J,358.3,10048,2)
 ;;=^5003133
 ;;^UTILITY(U,$J,358.3,10049,0)
 ;;=F11.20^^45^445^63
 ;;^UTILITY(U,$J,358.3,10049,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10049,1,3,0)
 ;;=3^Opioid Dependence,Uncomplicated
 ;;^UTILITY(U,$J,358.3,10049,1,4,0)
 ;;=4^F11.20
 ;;^UTILITY(U,$J,358.3,10049,2)
 ;;=^5003127
 ;;^UTILITY(U,$J,358.3,10050,0)
 ;;=F11.229^^45^445^55
 ;;^UTILITY(U,$J,358.3,10050,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10050,1,3,0)
 ;;=3^Opioid Dependence w/ Intoxication,Unspec
 ;;^UTILITY(U,$J,358.3,10050,1,4,0)
 ;;=4^F11.229
 ;;^UTILITY(U,$J,358.3,10050,2)
 ;;=^5003132
 ;;^UTILITY(U,$J,358.3,10051,0)
 ;;=F11.222^^45^445^53
 ;;^UTILITY(U,$J,358.3,10051,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,10051,1,3,0)
 ;;=3^Opioid Dependence w/ Intoxication w/ Perceptual Disturbance
 ;;^UTILITY(U,$J,358.3,10051,1,4,0)
 ;;=4^F11.222
 ;;^UTILITY(U,$J,358.3,10051,2)
 ;;=^5003131