IBDEI046 ; ; 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,10052,0)
;;=F11.221^^45^445^52
;;^UTILITY(U,$J,358.3,10052,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10052,1,3,0)
;;=3^Opioid Dependence w/ Intoxication Delirium
;;^UTILITY(U,$J,358.3,10052,1,4,0)
;;=4^F11.221
;;^UTILITY(U,$J,358.3,10052,2)
;;=^5003130
;;^UTILITY(U,$J,358.3,10053,0)
;;=F11.220^^45^445^54
;;^UTILITY(U,$J,358.3,10053,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10053,1,3,0)
;;=3^Opioid Dependence w/ Intoxication,Uncomplicated
;;^UTILITY(U,$J,358.3,10053,1,4,0)
;;=4^F11.220
;;^UTILITY(U,$J,358.3,10053,2)
;;=^5003129
;;^UTILITY(U,$J,358.3,10054,0)
;;=F14.29^^45^445^34
;;^UTILITY(U,$J,358.3,10054,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10054,1,3,0)
;;=3^Cocaine Dependence w/ Unspec Cocaine-Induced Disorder
;;^UTILITY(U,$J,358.3,10054,1,4,0)
;;=4^F14.29
;;^UTILITY(U,$J,358.3,10054,2)
;;=^5003268
;;^UTILITY(U,$J,358.3,10055,0)
;;=F14.288^^45^445^33
;;^UTILITY(U,$J,358.3,10055,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10055,1,3,0)
;;=3^Cocaine Dependence w/ Other Cocaine-Induced Disorder
;;^UTILITY(U,$J,358.3,10055,1,4,0)
;;=4^F14.288
;;^UTILITY(U,$J,358.3,10055,2)
;;=^5003267
;;^UTILITY(U,$J,358.3,10056,0)
;;=F14.282^^45^445^27
;;^UTILITY(U,$J,358.3,10056,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10056,1,3,0)
;;=3^Cocaine Dependence w/ Cocaine-Induced Sleep Disorder
;;^UTILITY(U,$J,358.3,10056,1,4,0)
;;=4^F14.282
;;^UTILITY(U,$J,358.3,10056,2)
;;=^5003266
;;^UTILITY(U,$J,358.3,10057,0)
;;=F14.281^^45^445^28
;;^UTILITY(U,$J,358.3,10057,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10057,1,3,0)
;;=3^Cocaine Dependence w/ Cocaine-Induced Sexual Dysfunction
;;^UTILITY(U,$J,358.3,10057,1,4,0)
;;=4^F14.281
;;^UTILITY(U,$J,358.3,10057,2)
;;=^5003265
;;^UTILITY(U,$J,358.3,10058,0)
;;=F14.280^^45^445^25
;;^UTILITY(U,$J,358.3,10058,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10058,1,3,0)
;;=3^Cocaine Dependence w/ Cocaine-Induced Anxiety Disorder
;;^UTILITY(U,$J,358.3,10058,1,4,0)
;;=4^F14.280
;;^UTILITY(U,$J,358.3,10058,2)
;;=^5003264
;;^UTILITY(U,$J,358.3,10059,0)
;;=F14.259^^45^445^24
;;^UTILITY(U,$J,358.3,10059,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10059,1,3,0)
;;=3^Cocaine Dependence w/ Cocaine-Induc Psychotic Disorder,Unspec
;;^UTILITY(U,$J,358.3,10059,1,4,0)
;;=4^F14.259
;;^UTILITY(U,$J,358.3,10059,2)
;;=^5003263
;;^UTILITY(U,$J,358.3,10060,0)
;;=F14.251^^45^445^23
;;^UTILITY(U,$J,358.3,10060,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10060,1,3,0)
;;=3^Cocaine Depend w/ Cocaine-Induc Psychotic Disorder w/ Hallucin
;;^UTILITY(U,$J,358.3,10060,1,4,0)
;;=4^F14.251
;;^UTILITY(U,$J,358.3,10060,2)
;;=^5003262
;;^UTILITY(U,$J,358.3,10061,0)
;;=F14.250^^45^445^22
;;^UTILITY(U,$J,358.3,10061,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10061,1,3,0)
;;=3^Cocaine Depend w/ Cocaine-Induc Psych Disorder w/ Delusions
;;^UTILITY(U,$J,358.3,10061,1,4,0)
;;=4^F14.250
;;^UTILITY(U,$J,358.3,10061,2)
;;=^5003261
;;^UTILITY(U,$J,358.3,10062,0)
;;=F14.24^^45^445^26
;;^UTILITY(U,$J,358.3,10062,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10062,1,3,0)
;;=3^Cocaine Dependence w/ Cocaine-Induced Mood Disorder
;;^UTILITY(U,$J,358.3,10062,1,4,0)
;;=4^F14.24
;;^UTILITY(U,$J,358.3,10062,2)
;;=^5003260
;;^UTILITY(U,$J,358.3,10063,0)
;;=F14.23^^45^445^35
;;^UTILITY(U,$J,358.3,10063,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10063,1,3,0)
;;=3^Cocaine Dependence w/ Withdrawal
;;^UTILITY(U,$J,358.3,10063,1,4,0)
;;=4^F14.23
;;^UTILITY(U,$J,358.3,10063,2)
;;=^5003259
;;^UTILITY(U,$J,358.3,10064,0)
;;=F14.229^^45^445^32
;;^UTILITY(U,$J,358.3,10064,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10064,1,3,0)
;;=3^Cocaine Dependence w/ Intoxication,Unspec
;;^UTILITY(U,$J,358.3,10064,1,4,0)
;;=4^F14.229
;;^UTILITY(U,$J,358.3,10064,2)
;;=^5003258
;;^UTILITY(U,$J,358.3,10065,0)
;;=F14.222^^45^445^30
;;^UTILITY(U,$J,358.3,10065,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10065,1,3,0)
;;=3^Cocaine Dependence w/ Intoxication w/ Perceptual Disturbance
;;^UTILITY(U,$J,358.3,10065,1,4,0)
;;=4^F14.222
;;^UTILITY(U,$J,358.3,10065,2)
;;=^5003257
;;^UTILITY(U,$J,358.3,10066,0)
;;=F14.221^^45^445^29
;;^UTILITY(U,$J,358.3,10066,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10066,1,3,0)
;;=3^Cocaine Dependence w/ Intoxication Delirium
;;^UTILITY(U,$J,358.3,10066,1,4,0)
;;=4^F14.221
;;^UTILITY(U,$J,358.3,10066,2)
;;=^5003256
;;^UTILITY(U,$J,358.3,10067,0)
;;=F14.220^^45^445^31
;;^UTILITY(U,$J,358.3,10067,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10067,1,3,0)
;;=3^Cocaine Dependence w/ Intoxication,Uncomplicated
;;^UTILITY(U,$J,358.3,10067,1,4,0)
;;=4^F14.220
;;^UTILITY(U,$J,358.3,10067,2)
;;=^5003255
;;^UTILITY(U,$J,358.3,10068,0)
;;=F14.20^^45^445^36
;;^UTILITY(U,$J,358.3,10068,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10068,1,3,0)
;;=3^Cocaine Dependence,Uncompicated
;;^UTILITY(U,$J,358.3,10068,1,4,0)
;;=4^F14.20
;;^UTILITY(U,$J,358.3,10068,2)
;;=^5003253
;;^UTILITY(U,$J,358.3,10069,0)
;;=F10.120^^45^445^1
;;^UTILITY(U,$J,358.3,10069,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10069,1,3,0)
;;=3^Alcohol Abuse w/ Intoxication,Uncomplicated
;;^UTILITY(U,$J,358.3,10069,1,4,0)
;;=4^F10.120
;;^UTILITY(U,$J,358.3,10069,2)
;;=^5003069
;;^UTILITY(U,$J,358.3,10070,0)
;;=F10.10^^45^445^7
;;^UTILITY(U,$J,358.3,10070,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10070,1,3,0)
;;=3^Alcohol Abuse,Uncomplicated
;;^UTILITY(U,$J,358.3,10070,1,4,0)
;;=4^F10.10
;;^UTILITY(U,$J,358.3,10070,2)
;;=^5003068
;;^UTILITY(U,$J,358.3,10071,0)
;;=F17.201^^45^445^41
;;^UTILITY(U,$J,358.3,10071,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10071,1,3,0)
;;=3^Nicotine Dependence In Remission,Unspec
;;^UTILITY(U,$J,358.3,10071,1,4,0)
;;=4^F17.201
;;^UTILITY(U,$J,358.3,10071,2)
;;=^5003361
;;^UTILITY(U,$J,358.3,10072,0)
;;=F17.210^^45^445^40
;;^UTILITY(U,$J,358.3,10072,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10072,1,3,0)
;;=3^Nicotine Dependence Cigarettes,Uncomplicated
;;^UTILITY(U,$J,358.3,10072,1,4,0)
;;=4^F17.210
;;^UTILITY(U,$J,358.3,10072,2)
;;=^5003365
;;^UTILITY(U,$J,358.3,10073,0)
;;=F17.291^^45^445^42
;;^UTILITY(U,$J,358.3,10073,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10073,1,3,0)
;;=3^Nicotine Dependence Oth Tobacco Product,In Remission
;;^UTILITY(U,$J,358.3,10073,1,4,0)
;;=4^F17.291
;;^UTILITY(U,$J,358.3,10073,2)
;;=^5003376
;;^UTILITY(U,$J,358.3,10074,0)
;;=F17.290^^45^445^43
;;^UTILITY(U,$J,358.3,10074,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10074,1,3,0)
;;=3^Nicotine Dependence Oth Tobacco Product,Uncomplicated
;;^UTILITY(U,$J,358.3,10074,1,4,0)
;;=4^F17.290
;;^UTILITY(U,$J,358.3,10074,2)
;;=^5003375
;;^UTILITY(U,$J,358.3,10075,0)
;;=F17.221^^45^445^37
;;^UTILITY(U,$J,358.3,10075,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10075,1,3,0)
;;=3^Nicotine Dependence Chewing Tobacco,In Remission
;;^UTILITY(U,$J,358.3,10075,1,4,0)
;;=4^F17.221
;;^UTILITY(U,$J,358.3,10075,2)
;;=^5003371
;;^UTILITY(U,$J,358.3,10076,0)
;;=F17.220^^45^445^38
;;^UTILITY(U,$J,358.3,10076,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10076,1,3,0)
;;=3^Nicotine Dependence Chewing Tobacco,Uncomplicated
;;^UTILITY(U,$J,358.3,10076,1,4,0)
;;=4^F17.220
;;^UTILITY(U,$J,358.3,10076,2)
;;=^5003370
;;^UTILITY(U,$J,358.3,10077,0)
;;=F17.211^^45^445^39
;;^UTILITY(U,$J,358.3,10077,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10077,1,3,0)
;;=3^Nicotine Dependence Cigarettes,In Remission
;;^UTILITY(U,$J,358.3,10077,1,4,0)
;;=4^F17.211
;;^UTILITY(U,$J,358.3,10077,2)
;;=^5003366
;;^UTILITY(U,$J,358.3,10078,0)
;;=F17.200^^45^445^44
;;^UTILITY(U,$J,358.3,10078,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10078,1,3,0)
;;=3^Nicotine Dependence,Unspec,Uncomplicated
;;^UTILITY(U,$J,358.3,10078,1,4,0)
;;=4^F17.200
;;^UTILITY(U,$J,358.3,10078,2)
;;=^5003360
;;^UTILITY(U,$J,358.3,10079,0)
;;=F11.120^^45^445^45
;;^UTILITY(U,$J,358.3,10079,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10079,1,3,0)
;;=3^Opioid Abuse w/ Intoxication,Uncomplicated
;;^UTILITY(U,$J,358.3,10079,1,4,0)
;;=4^F11.120
;;^UTILITY(U,$J,358.3,10079,2)
;;=^5003115
;;^UTILITY(U,$J,358.3,10080,0)
;;=F11.10^^45^445^49
;;^UTILITY(U,$J,358.3,10080,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10080,1,3,0)
;;=3^Opioid Abuse,Uncomplicated
;;^UTILITY(U,$J,358.3,10080,1,4,0)
;;=4^F11.10
;;^UTILITY(U,$J,358.3,10080,2)
;;=^5003114
;;^UTILITY(U,$J,358.3,10081,0)
;;=F11.129^^45^445^46
;;^UTILITY(U,$J,358.3,10081,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10081,1,3,0)
;;=3^Opioid Abuse w/ Intoxication,Unspec
;;^UTILITY(U,$J,358.3,10081,1,4,0)
;;=4^F11.129
;;^UTILITY(U,$J,358.3,10081,2)
;;=^5003118
;;^UTILITY(U,$J,358.3,10082,0)
;;=F10.21^^45^445^8
;;^UTILITY(U,$J,358.3,10082,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10082,1,3,0)
;;=3^Alcohol Dependence,In Remission
;;^UTILITY(U,$J,358.3,10082,1,4,0)
;;=4^F10.21
;;^UTILITY(U,$J,358.3,10082,2)
;;=^5003082
;;^UTILITY(U,$J,358.3,10083,0)
;;=F12.10^^45^445^16
;;^UTILITY(U,$J,358.3,10083,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10083,1,3,0)
;;=3^Cannabis Abuse,Uncomplicated
;;^UTILITY(U,$J,358.3,10083,1,4,0)
;;=4^F12.10
;;^UTILITY(U,$J,358.3,10083,2)
;;=^5003155
;;^UTILITY(U,$J,358.3,10084,0)
;;=F12.20^^45^445^18
;;^UTILITY(U,$J,358.3,10084,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10084,1,3,0)
;;=3^Cannabis Dependence,Uncomplicated
;;^UTILITY(U,$J,358.3,10084,1,4,0)
;;=4^F12.20
;;^UTILITY(U,$J,358.3,10084,2)
;;=^5003166
;;^UTILITY(U,$J,358.3,10085,0)
;;=F12.21^^45^445^17
;;^UTILITY(U,$J,358.3,10085,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10085,1,3,0)
;;=3^Cannabis Dependence,In Remission
;;^UTILITY(U,$J,358.3,10085,1,4,0)
;;=4^F12.21
;;^UTILITY(U,$J,358.3,10085,2)
;;=^5003167
;;^UTILITY(U,$J,358.3,10086,0)
;;=F12.90^^45^445^20
;;^UTILITY(U,$J,358.3,10086,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10086,1,3,0)
;;=3^Cannabis Use,Unspec,Uncomplicated
;;^UTILITY(U,$J,358.3,10086,1,4,0)
;;=4^F12.90
;;^UTILITY(U,$J,358.3,10086,2)
;;=^5003178
;;^UTILITY(U,$J,358.3,10087,0)
;;=F10.11^^45^445^6
;;^UTILITY(U,$J,358.3,10087,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10087,1,3,0)
;;=3^Alcohol Abuse,In Remission
;;^UTILITY(U,$J,358.3,10087,1,4,0)
;;=4^F10.11
;;^UTILITY(U,$J,358.3,10087,2)
;;=^268230
;;^UTILITY(U,$J,358.3,10088,0)
;;=F12.11^^45^445^15
;;^UTILITY(U,$J,358.3,10088,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10088,1,3,0)
;;=3^Cannabis Abuse,In Remission
;;^UTILITY(U,$J,358.3,10088,1,4,0)
;;=4^F12.11
;;^UTILITY(U,$J,358.3,10088,2)
;;=^268236
;;^UTILITY(U,$J,358.3,10089,0)
;;=F14.11^^45^445^21
;;^UTILITY(U,$J,358.3,10089,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10089,1,3,0)
;;=3^Cocaine Abuse,In Remission
;;^UTILITY(U,$J,358.3,10089,1,4,0)
;;=4^F14.11
;;^UTILITY(U,$J,358.3,10089,2)
;;=^268249
;;^UTILITY(U,$J,358.3,10090,0)
;;=F11.11^^45^445^48
;;^UTILITY(U,$J,358.3,10090,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10090,1,3,0)
;;=3^Opioid Abuse,In Remission
;;^UTILITY(U,$J,358.3,10090,1,4,0)
;;=4^F11.11
;;^UTILITY(U,$J,358.3,10090,2)
;;=^268246
;;^UTILITY(U,$J,358.3,10091,0)
;;=F12.93^^45^445^19
;;^UTILITY(U,$J,358.3,10091,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10091,1,3,0)
;;=3^Cannabis Use,Unspec w/ Withdrawal
;;^UTILITY(U,$J,358.3,10091,1,4,0)
;;=4^F12.93
;;^UTILITY(U,$J,358.3,10091,2)
;;=^5157302
;;^UTILITY(U,$J,358.3,10092,0)
;;=F10.130^^45^445^4
;;^UTILITY(U,$J,358.3,10092,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10092,1,3,0)
;;=3^Alcohol Abuse w/ Withdrawal,Uncomp
;;^UTILITY(U,$J,358.3,10092,1,4,0)
;;=4^F10.130
;;^UTILITY(U,$J,358.3,10092,2)
;;=^5159130
;;^UTILITY(U,$J,358.3,10093,0)
;;=F10.131^^45^445^2
;;^UTILITY(U,$J,358.3,10093,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10093,1,3,0)
;;=3^Alcohol Abuse w/ Withdrawal Delirium
;;^UTILITY(U,$J,358.3,10093,1,4,0)
;;=4^F10.131
;;^UTILITY(U,$J,358.3,10093,2)
;;=^5159131
;;^UTILITY(U,$J,358.3,10094,0)
;;=F10.132^^45^445^3
;;^UTILITY(U,$J,358.3,10094,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10094,1,3,0)
;;=3^Alcohol Abuse w/ Withdrawal w/ Perceptual Disturbance
;;^UTILITY(U,$J,358.3,10094,1,4,0)
;;=4^F10.132
;;^UTILITY(U,$J,358.3,10094,2)
;;=^5159132
;;^UTILITY(U,$J,358.3,10095,0)
;;=F10.139^^45^445^5
;;^UTILITY(U,$J,358.3,10095,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10095,1,3,0)
;;=3^Alcohol Abuse w/ Withdrawal,Unspec
;;^UTILITY(U,$J,358.3,10095,1,4,0)
;;=4^F10.139
;;^UTILITY(U,$J,358.3,10095,2)
;;=^5159133
;;^UTILITY(U,$J,358.3,10096,0)
;;=F10.930^^45^445^12
;;^UTILITY(U,$J,358.3,10096,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10096,1,3,0)
;;=3^Alcohol Use,Unspec w/ Withdrawal,Uncomp
;;^UTILITY(U,$J,358.3,10096,1,4,0)
;;=4^F10.930
;;^UTILITY(U,$J,358.3,10096,2)
;;=^5159134
;;^UTILITY(U,$J,358.3,10097,0)
;;=F10.931^^45^445^10
;;^UTILITY(U,$J,358.3,10097,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10097,1,3,0)
;;=3^Alcohol Use,Unspec w/ Withdrawal Delirium
;;^UTILITY(U,$J,358.3,10097,1,4,0)
;;=4^F10.931
;;^UTILITY(U,$J,358.3,10097,2)
;;=^5159135
;;^UTILITY(U,$J,358.3,10098,0)
;;=F10.932^^45^445^11
;;^UTILITY(U,$J,358.3,10098,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10098,1,3,0)
;;=3^Alcohol Use,Unspec w/ Withdrawal w/ Perceptual Disturbance
;;^UTILITY(U,$J,358.3,10098,1,4,0)
;;=4^F10.932
;;^UTILITY(U,$J,358.3,10098,2)
;;=^5159136
;;^UTILITY(U,$J,358.3,10099,0)
;;=F10.939^^45^445^13
;;^UTILITY(U,$J,358.3,10099,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10099,1,3,0)
;;=3^Alcohol Use,Unspec w/ Withdrawal,Unspec
;;^UTILITY(U,$J,358.3,10099,1,4,0)
;;=4^F10.939
;;^UTILITY(U,$J,358.3,10099,2)
;;=^5159137
;;^UTILITY(U,$J,358.3,10100,0)
;;=F12.13^^45^445^14
;;^UTILITY(U,$J,358.3,10100,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10100,1,3,0)
;;=3^Cannabis Abuse w/ Withdrawal
;;^UTILITY(U,$J,358.3,10100,1,4,0)
;;=4^F12.13
;;^UTILITY(U,$J,358.3,10100,2)
;;=^5159139
;;^UTILITY(U,$J,358.3,10101,0)
;;=F11.13^^45^445^47
;;^UTILITY(U,$J,358.3,10101,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10101,1,3,0)
;;=3^Opioid Abuse w/ Withdrawal
;;^UTILITY(U,$J,358.3,10101,1,4,0)
;;=4^F11.13
;;^UTILITY(U,$J,358.3,10101,2)
;;=^5159138
;;^UTILITY(U,$J,358.3,10102,0)
;;=I83.019^^45^446^3
;;^UTILITY(U,$J,358.3,10102,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10102,1,3,0)
;;=3^Varicose Veins Right Lower Extrem w/ Ulcer,Unspec
;;^UTILITY(U,$J,358.3,10102,1,4,0)
;;=4^I83.019
;;^UTILITY(U,$J,358.3,10102,2)
;;=^5007979
;;^UTILITY(U,$J,358.3,10103,0)
;;=I83.219^^45^446^4
;;^UTILITY(U,$J,358.3,10103,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10103,1,3,0)
;;=3^Varicose Veins Right Lower Extrem w/ Ulcer & Inflam,Unspec
;;^UTILITY(U,$J,358.3,10103,1,4,0)
;;=4^I83.219
;;^UTILITY(U,$J,358.3,10103,2)
;;=^5008003
;;^UTILITY(U,$J,358.3,10104,0)
;;=I83.029^^45^446^1
;;^UTILITY(U,$J,358.3,10104,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10104,1,3,0)
;;=3^Varicose Veins Left Lower Extrem w/ Ulcer,Unspec
;;^UTILITY(U,$J,358.3,10104,1,4,0)
;;=4^I83.029
;;^UTILITY(U,$J,358.3,10104,2)
;;=^5007986
;;^UTILITY(U,$J,358.3,10105,0)
;;=I83.229^^45^446^2
;;^UTILITY(U,$J,358.3,10105,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10105,1,3,0)
;;=3^Varicose Veins Left Lower Extrem w/ Ulcer & Inflam,Unspec
;;^UTILITY(U,$J,358.3,10105,1,4,0)
;;=4^I83.229
;;^UTILITY(U,$J,358.3,10105,2)
;;=^5008010
;;^UTILITY(U,$J,358.3,10106,0)
;;=B00.81^^45^447^55
;;^UTILITY(U,$J,358.3,10106,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10106,1,3,0)
;;=3^Herpesviral Hepatitis
;;^UTILITY(U,$J,358.3,10106,1,4,0)
;;=4^B00.81
;;^UTILITY(U,$J,358.3,10106,2)
;;=^5000478
;;^UTILITY(U,$J,358.3,10107,0)
;;=D25.9^^45^447^64
;;^UTILITY(U,$J,358.3,10107,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10107,1,3,0)
;;=3^Leiomyoma of Uterus,Unspec
;;^UTILITY(U,$J,358.3,10107,1,4,0)
;;=4^D25.9
;;^UTILITY(U,$J,358.3,10107,2)
;;=^5002081
;;^UTILITY(U,$J,358.3,10108,0)
;;=F52.9^^45^447^103
;;^UTILITY(U,$J,358.3,10108,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10108,1,3,0)
;;=3^Sexual Dysfnct Not d/t a Sub/Known Physiol Cond,Unspec
;;^UTILITY(U,$J,358.3,10108,1,4,0)
;;=4^F52.9
;;^UTILITY(U,$J,358.3,10108,2)
;;=^5003625
;;^UTILITY(U,$J,358.3,10109,0)
;;=R37.^^45^447^104
;;^UTILITY(U,$J,358.3,10109,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10109,1,3,0)
;;=3^Sexual Dysfunction,Unspec
;;^UTILITY(U,$J,358.3,10109,1,4,0)
;;=4^R37.
;;^UTILITY(U,$J,358.3,10109,2)
;;=^5019339
;;^UTILITY(U,$J,358.3,10110,0)
;;=N60.01^^45^447^107
;;^UTILITY(U,$J,358.3,10110,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10110,1,3,0)
;;=3^Solitary Cyst of Right Breast
;;^UTILITY(U,$J,358.3,10110,1,4,0)
;;=4^N60.01
;;^UTILITY(U,$J,358.3,10110,2)
;;=^5015770
;;^UTILITY(U,$J,358.3,10111,0)
;;=N60.02^^45^447^106
;;^UTILITY(U,$J,358.3,10111,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10111,1,3,0)
;;=3^Solitary Cyst of Left Breast
;;^UTILITY(U,$J,358.3,10111,1,4,0)
;;=4^N60.02
;;^UTILITY(U,$J,358.3,10111,2)
;;=^5015771
;;^UTILITY(U,$J,358.3,10112,0)
;;=N60.09^^45^447^108
;;^UTILITY(U,$J,358.3,10112,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10112,1,3,0)
;;=3^Solitary Cyst of Unspec Breast
;;^UTILITY(U,$J,358.3,10112,1,4,0)
;;=4^N60.09
;;^UTILITY(U,$J,358.3,10112,2)
;;=^5015772
;;^UTILITY(U,$J,358.3,10113,0)
;;=N60.11^^45^447^27
;;^UTILITY(U,$J,358.3,10113,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10113,1,3,0)
;;=3^Diffuse Cystic Mastopathy of Right Breast
;;^UTILITY(U,$J,358.3,10113,1,4,0)
;;=4^N60.11
;;^UTILITY(U,$J,358.3,10113,2)
;;=^5015773
;;^UTILITY(U,$J,358.3,10114,0)
;;=N60.12^^45^447^26
;;^UTILITY(U,$J,358.3,10114,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10114,1,3,0)
;;=3^Diffuse Cystic Mastopathy of Left Breast
;;^UTILITY(U,$J,358.3,10114,1,4,0)
;;=4^N60.12
;;^UTILITY(U,$J,358.3,10114,2)
;;=^5015774
;;^UTILITY(U,$J,358.3,10115,0)
;;=N64.4^^45^447^68
;;^UTILITY(U,$J,358.3,10115,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10115,1,3,0)
;;=3^Mastodynia
;;^UTILITY(U,$J,358.3,10115,1,4,0)
;;=4^N64.4
;;^UTILITY(U,$J,358.3,10115,2)
;;=^5015794
;;^UTILITY(U,$J,358.3,10116,0)
;;=N64.51^^45^447^60
;;^UTILITY(U,$J,358.3,10116,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10116,1,3,0)
;;=3^Induration of Breast
;;^UTILITY(U,$J,358.3,10116,1,4,0)
;;=4^N64.51
;;^UTILITY(U,$J,358.3,10116,2)
;;=^5015795
;;^UTILITY(U,$J,358.3,10117,0)
;;=N64.59^^45^447^105
;;^UTILITY(U,$J,358.3,10117,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,10117,1,3,0)
;;=3^Signs and Symptoms in Breast,Other
;;^UTILITY(U,$J,358.3,10117,1,4,0)
;;=4^N64.59
;;^UTILITY(U,$J,358.3,10117,2)
;;=^5015797
;;^UTILITY(U,$J,358.3,10118,0)
;;=N64.52^^45^447^71
;;^UTILITY(U,$J,358.3,10118,1,0)
;;=^358.31IA^4^2
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI046 19753 printed Dec 13, 2024@01:41:17 Page 2
IBDEI046 ; ; 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,10052,0)
+2 ;;=F11.221^^45^445^52
+3 ;;^UTILITY(U,$J,358.3,10052,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,10052,1,3,0)
+6 ;;=3^Opioid Dependence w/ Intoxication Delirium
+7 ;;^UTILITY(U,$J,358.3,10052,1,4,0)
+8 ;;=4^F11.221
+9 ;;^UTILITY(U,$J,358.3,10052,2)
+10 ;;=^5003130
+11 ;;^UTILITY(U,$J,358.3,10053,0)
+12 ;;=F11.220^^45^445^54
+13 ;;^UTILITY(U,$J,358.3,10053,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,10053,1,3,0)
+16 ;;=3^Opioid Dependence w/ Intoxication,Uncomplicated
+17 ;;^UTILITY(U,$J,358.3,10053,1,4,0)
+18 ;;=4^F11.220
+19 ;;^UTILITY(U,$J,358.3,10053,2)
+20 ;;=^5003129
+21 ;;^UTILITY(U,$J,358.3,10054,0)
+22 ;;=F14.29^^45^445^34
+23 ;;^UTILITY(U,$J,358.3,10054,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,10054,1,3,0)
+26 ;;=3^Cocaine Dependence w/ Unspec Cocaine-Induced Disorder
+27 ;;^UTILITY(U,$J,358.3,10054,1,4,0)
+28 ;;=4^F14.29
+29 ;;^UTILITY(U,$J,358.3,10054,2)
+30 ;;=^5003268
+31 ;;^UTILITY(U,$J,358.3,10055,0)
+32 ;;=F14.288^^45^445^33
+33 ;;^UTILITY(U,$J,358.3,10055,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,10055,1,3,0)
+36 ;;=3^Cocaine Dependence w/ Other Cocaine-Induced Disorder
+37 ;;^UTILITY(U,$J,358.3,10055,1,4,0)
+38 ;;=4^F14.288
+39 ;;^UTILITY(U,$J,358.3,10055,2)
+40 ;;=^5003267
+41 ;;^UTILITY(U,$J,358.3,10056,0)
+42 ;;=F14.282^^45^445^27
+43 ;;^UTILITY(U,$J,358.3,10056,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,10056,1,3,0)
+46 ;;=3^Cocaine Dependence w/ Cocaine-Induced Sleep Disorder
+47 ;;^UTILITY(U,$J,358.3,10056,1,4,0)
+48 ;;=4^F14.282
+49 ;;^UTILITY(U,$J,358.3,10056,2)
+50 ;;=^5003266
+51 ;;^UTILITY(U,$J,358.3,10057,0)
+52 ;;=F14.281^^45^445^28
+53 ;;^UTILITY(U,$J,358.3,10057,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,10057,1,3,0)
+56 ;;=3^Cocaine Dependence w/ Cocaine-Induced Sexual Dysfunction
+57 ;;^UTILITY(U,$J,358.3,10057,1,4,0)
+58 ;;=4^F14.281
+59 ;;^UTILITY(U,$J,358.3,10057,2)
+60 ;;=^5003265
+61 ;;^UTILITY(U,$J,358.3,10058,0)
+62 ;;=F14.280^^45^445^25
+63 ;;^UTILITY(U,$J,358.3,10058,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,10058,1,3,0)
+66 ;;=3^Cocaine Dependence w/ Cocaine-Induced Anxiety Disorder
+67 ;;^UTILITY(U,$J,358.3,10058,1,4,0)
+68 ;;=4^F14.280
+69 ;;^UTILITY(U,$J,358.3,10058,2)
+70 ;;=^5003264
+71 ;;^UTILITY(U,$J,358.3,10059,0)
+72 ;;=F14.259^^45^445^24
+73 ;;^UTILITY(U,$J,358.3,10059,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,10059,1,3,0)
+76 ;;=3^Cocaine Dependence w/ Cocaine-Induc Psychotic Disorder,Unspec
+77 ;;^UTILITY(U,$J,358.3,10059,1,4,0)
+78 ;;=4^F14.259
+79 ;;^UTILITY(U,$J,358.3,10059,2)
+80 ;;=^5003263
+81 ;;^UTILITY(U,$J,358.3,10060,0)
+82 ;;=F14.251^^45^445^23
+83 ;;^UTILITY(U,$J,358.3,10060,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,10060,1,3,0)
+86 ;;=3^Cocaine Depend w/ Cocaine-Induc Psychotic Disorder w/ Hallucin
+87 ;;^UTILITY(U,$J,358.3,10060,1,4,0)
+88 ;;=4^F14.251
+89 ;;^UTILITY(U,$J,358.3,10060,2)
+90 ;;=^5003262
+91 ;;^UTILITY(U,$J,358.3,10061,0)
+92 ;;=F14.250^^45^445^22
+93 ;;^UTILITY(U,$J,358.3,10061,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,10061,1,3,0)
+96 ;;=3^Cocaine Depend w/ Cocaine-Induc Psych Disorder w/ Delusions
+97 ;;^UTILITY(U,$J,358.3,10061,1,4,0)
+98 ;;=4^F14.250
+99 ;;^UTILITY(U,$J,358.3,10061,2)
+100 ;;=^5003261
+101 ;;^UTILITY(U,$J,358.3,10062,0)
+102 ;;=F14.24^^45^445^26
+103 ;;^UTILITY(U,$J,358.3,10062,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,10062,1,3,0)
+106 ;;=3^Cocaine Dependence w/ Cocaine-Induced Mood Disorder
+107 ;;^UTILITY(U,$J,358.3,10062,1,4,0)
+108 ;;=4^F14.24
+109 ;;^UTILITY(U,$J,358.3,10062,2)
+110 ;;=^5003260
+111 ;;^UTILITY(U,$J,358.3,10063,0)
+112 ;;=F14.23^^45^445^35
+113 ;;^UTILITY(U,$J,358.3,10063,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,10063,1,3,0)
+116 ;;=3^Cocaine Dependence w/ Withdrawal
+117 ;;^UTILITY(U,$J,358.3,10063,1,4,0)
+118 ;;=4^F14.23
+119 ;;^UTILITY(U,$J,358.3,10063,2)
+120 ;;=^5003259
+121 ;;^UTILITY(U,$J,358.3,10064,0)
+122 ;;=F14.229^^45^445^32
+123 ;;^UTILITY(U,$J,358.3,10064,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,10064,1,3,0)
+126 ;;=3^Cocaine Dependence w/ Intoxication,Unspec
+127 ;;^UTILITY(U,$J,358.3,10064,1,4,0)
+128 ;;=4^F14.229
+129 ;;^UTILITY(U,$J,358.3,10064,2)
+130 ;;=^5003258
+131 ;;^UTILITY(U,$J,358.3,10065,0)
+132 ;;=F14.222^^45^445^30
+133 ;;^UTILITY(U,$J,358.3,10065,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,10065,1,3,0)
+136 ;;=3^Cocaine Dependence w/ Intoxication w/ Perceptual Disturbance
+137 ;;^UTILITY(U,$J,358.3,10065,1,4,0)
+138 ;;=4^F14.222
+139 ;;^UTILITY(U,$J,358.3,10065,2)
+140 ;;=^5003257
+141 ;;^UTILITY(U,$J,358.3,10066,0)
+142 ;;=F14.221^^45^445^29
+143 ;;^UTILITY(U,$J,358.3,10066,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,10066,1,3,0)
+146 ;;=3^Cocaine Dependence w/ Intoxication Delirium
+147 ;;^UTILITY(U,$J,358.3,10066,1,4,0)
+148 ;;=4^F14.221
+149 ;;^UTILITY(U,$J,358.3,10066,2)
+150 ;;=^5003256
+151 ;;^UTILITY(U,$J,358.3,10067,0)
+152 ;;=F14.220^^45^445^31
+153 ;;^UTILITY(U,$J,358.3,10067,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,10067,1,3,0)
+156 ;;=3^Cocaine Dependence w/ Intoxication,Uncomplicated
+157 ;;^UTILITY(U,$J,358.3,10067,1,4,0)
+158 ;;=4^F14.220
+159 ;;^UTILITY(U,$J,358.3,10067,2)
+160 ;;=^5003255
+161 ;;^UTILITY(U,$J,358.3,10068,0)
+162 ;;=F14.20^^45^445^36
+163 ;;^UTILITY(U,$J,358.3,10068,1,0)
+164 ;;=^358.31IA^4^2
+165 ;;^UTILITY(U,$J,358.3,10068,1,3,0)
+166 ;;=3^Cocaine Dependence,Uncompicated
+167 ;;^UTILITY(U,$J,358.3,10068,1,4,0)
+168 ;;=4^F14.20
+169 ;;^UTILITY(U,$J,358.3,10068,2)
+170 ;;=^5003253
+171 ;;^UTILITY(U,$J,358.3,10069,0)
+172 ;;=F10.120^^45^445^1
+173 ;;^UTILITY(U,$J,358.3,10069,1,0)
+174 ;;=^358.31IA^4^2
+175 ;;^UTILITY(U,$J,358.3,10069,1,3,0)
+176 ;;=3^Alcohol Abuse w/ Intoxication,Uncomplicated
+177 ;;^UTILITY(U,$J,358.3,10069,1,4,0)
+178 ;;=4^F10.120
+179 ;;^UTILITY(U,$J,358.3,10069,2)
+180 ;;=^5003069
+181 ;;^UTILITY(U,$J,358.3,10070,0)
+182 ;;=F10.10^^45^445^7
+183 ;;^UTILITY(U,$J,358.3,10070,1,0)
+184 ;;=^358.31IA^4^2
+185 ;;^UTILITY(U,$J,358.3,10070,1,3,0)
+186 ;;=3^Alcohol Abuse,Uncomplicated
+187 ;;^UTILITY(U,$J,358.3,10070,1,4,0)
+188 ;;=4^F10.10
+189 ;;^UTILITY(U,$J,358.3,10070,2)
+190 ;;=^5003068
+191 ;;^UTILITY(U,$J,358.3,10071,0)
+192 ;;=F17.201^^45^445^41
+193 ;;^UTILITY(U,$J,358.3,10071,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,10071,1,3,0)
+196 ;;=3^Nicotine Dependence In Remission,Unspec
+197 ;;^UTILITY(U,$J,358.3,10071,1,4,0)
+198 ;;=4^F17.201
+199 ;;^UTILITY(U,$J,358.3,10071,2)
+200 ;;=^5003361
+201 ;;^UTILITY(U,$J,358.3,10072,0)
+202 ;;=F17.210^^45^445^40
+203 ;;^UTILITY(U,$J,358.3,10072,1,0)
+204 ;;=^358.31IA^4^2
+205 ;;^UTILITY(U,$J,358.3,10072,1,3,0)
+206 ;;=3^Nicotine Dependence Cigarettes,Uncomplicated
+207 ;;^UTILITY(U,$J,358.3,10072,1,4,0)
+208 ;;=4^F17.210
+209 ;;^UTILITY(U,$J,358.3,10072,2)
+210 ;;=^5003365
+211 ;;^UTILITY(U,$J,358.3,10073,0)
+212 ;;=F17.291^^45^445^42
+213 ;;^UTILITY(U,$J,358.3,10073,1,0)
+214 ;;=^358.31IA^4^2
+215 ;;^UTILITY(U,$J,358.3,10073,1,3,0)
+216 ;;=3^Nicotine Dependence Oth Tobacco Product,In Remission
+217 ;;^UTILITY(U,$J,358.3,10073,1,4,0)
+218 ;;=4^F17.291
+219 ;;^UTILITY(U,$J,358.3,10073,2)
+220 ;;=^5003376
+221 ;;^UTILITY(U,$J,358.3,10074,0)
+222 ;;=F17.290^^45^445^43
+223 ;;^UTILITY(U,$J,358.3,10074,1,0)
+224 ;;=^358.31IA^4^2
+225 ;;^UTILITY(U,$J,358.3,10074,1,3,0)
+226 ;;=3^Nicotine Dependence Oth Tobacco Product,Uncomplicated
+227 ;;^UTILITY(U,$J,358.3,10074,1,4,0)
+228 ;;=4^F17.290
+229 ;;^UTILITY(U,$J,358.3,10074,2)
+230 ;;=^5003375
+231 ;;^UTILITY(U,$J,358.3,10075,0)
+232 ;;=F17.221^^45^445^37
+233 ;;^UTILITY(U,$J,358.3,10075,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,10075,1,3,0)
+236 ;;=3^Nicotine Dependence Chewing Tobacco,In Remission
+237 ;;^UTILITY(U,$J,358.3,10075,1,4,0)
+238 ;;=4^F17.221
+239 ;;^UTILITY(U,$J,358.3,10075,2)
+240 ;;=^5003371
+241 ;;^UTILITY(U,$J,358.3,10076,0)
+242 ;;=F17.220^^45^445^38
+243 ;;^UTILITY(U,$J,358.3,10076,1,0)
+244 ;;=^358.31IA^4^2
+245 ;;^UTILITY(U,$J,358.3,10076,1,3,0)
+246 ;;=3^Nicotine Dependence Chewing Tobacco,Uncomplicated
+247 ;;^UTILITY(U,$J,358.3,10076,1,4,0)
+248 ;;=4^F17.220
+249 ;;^UTILITY(U,$J,358.3,10076,2)
+250 ;;=^5003370
+251 ;;^UTILITY(U,$J,358.3,10077,0)
+252 ;;=F17.211^^45^445^39
+253 ;;^UTILITY(U,$J,358.3,10077,1,0)
+254 ;;=^358.31IA^4^2
+255 ;;^UTILITY(U,$J,358.3,10077,1,3,0)
+256 ;;=3^Nicotine Dependence Cigarettes,In Remission
+257 ;;^UTILITY(U,$J,358.3,10077,1,4,0)
+258 ;;=4^F17.211
+259 ;;^UTILITY(U,$J,358.3,10077,2)
+260 ;;=^5003366
+261 ;;^UTILITY(U,$J,358.3,10078,0)
+262 ;;=F17.200^^45^445^44
+263 ;;^UTILITY(U,$J,358.3,10078,1,0)
+264 ;;=^358.31IA^4^2
+265 ;;^UTILITY(U,$J,358.3,10078,1,3,0)
+266 ;;=3^Nicotine Dependence,Unspec,Uncomplicated
+267 ;;^UTILITY(U,$J,358.3,10078,1,4,0)
+268 ;;=4^F17.200
+269 ;;^UTILITY(U,$J,358.3,10078,2)
+270 ;;=^5003360
+271 ;;^UTILITY(U,$J,358.3,10079,0)
+272 ;;=F11.120^^45^445^45
+273 ;;^UTILITY(U,$J,358.3,10079,1,0)
+274 ;;=^358.31IA^4^2
+275 ;;^UTILITY(U,$J,358.3,10079,1,3,0)
+276 ;;=3^Opioid Abuse w/ Intoxication,Uncomplicated
+277 ;;^UTILITY(U,$J,358.3,10079,1,4,0)
+278 ;;=4^F11.120
+279 ;;^UTILITY(U,$J,358.3,10079,2)
+280 ;;=^5003115
+281 ;;^UTILITY(U,$J,358.3,10080,0)
+282 ;;=F11.10^^45^445^49
+283 ;;^UTILITY(U,$J,358.3,10080,1,0)
+284 ;;=^358.31IA^4^2
+285 ;;^UTILITY(U,$J,358.3,10080,1,3,0)
+286 ;;=3^Opioid Abuse,Uncomplicated
+287 ;;^UTILITY(U,$J,358.3,10080,1,4,0)
+288 ;;=4^F11.10
+289 ;;^UTILITY(U,$J,358.3,10080,2)
+290 ;;=^5003114
+291 ;;^UTILITY(U,$J,358.3,10081,0)
+292 ;;=F11.129^^45^445^46
+293 ;;^UTILITY(U,$J,358.3,10081,1,0)
+294 ;;=^358.31IA^4^2
+295 ;;^UTILITY(U,$J,358.3,10081,1,3,0)
+296 ;;=3^Opioid Abuse w/ Intoxication,Unspec
+297 ;;^UTILITY(U,$J,358.3,10081,1,4,0)
+298 ;;=4^F11.129
+299 ;;^UTILITY(U,$J,358.3,10081,2)
+300 ;;=^5003118
+301 ;;^UTILITY(U,$J,358.3,10082,0)
+302 ;;=F10.21^^45^445^8
+303 ;;^UTILITY(U,$J,358.3,10082,1,0)
+304 ;;=^358.31IA^4^2
+305 ;;^UTILITY(U,$J,358.3,10082,1,3,0)
+306 ;;=3^Alcohol Dependence,In Remission
+307 ;;^UTILITY(U,$J,358.3,10082,1,4,0)
+308 ;;=4^F10.21
+309 ;;^UTILITY(U,$J,358.3,10082,2)
+310 ;;=^5003082
+311 ;;^UTILITY(U,$J,358.3,10083,0)
+312 ;;=F12.10^^45^445^16
+313 ;;^UTILITY(U,$J,358.3,10083,1,0)
+314 ;;=^358.31IA^4^2
+315 ;;^UTILITY(U,$J,358.3,10083,1,3,0)
+316 ;;=3^Cannabis Abuse,Uncomplicated
+317 ;;^UTILITY(U,$J,358.3,10083,1,4,0)
+318 ;;=4^F12.10
+319 ;;^UTILITY(U,$J,358.3,10083,2)
+320 ;;=^5003155
+321 ;;^UTILITY(U,$J,358.3,10084,0)
+322 ;;=F12.20^^45^445^18
+323 ;;^UTILITY(U,$J,358.3,10084,1,0)
+324 ;;=^358.31IA^4^2
+325 ;;^UTILITY(U,$J,358.3,10084,1,3,0)
+326 ;;=3^Cannabis Dependence,Uncomplicated
+327 ;;^UTILITY(U,$J,358.3,10084,1,4,0)
+328 ;;=4^F12.20
+329 ;;^UTILITY(U,$J,358.3,10084,2)
+330 ;;=^5003166
+331 ;;^UTILITY(U,$J,358.3,10085,0)
+332 ;;=F12.21^^45^445^17
+333 ;;^UTILITY(U,$J,358.3,10085,1,0)
+334 ;;=^358.31IA^4^2
+335 ;;^UTILITY(U,$J,358.3,10085,1,3,0)
+336 ;;=3^Cannabis Dependence,In Remission
+337 ;;^UTILITY(U,$J,358.3,10085,1,4,0)
+338 ;;=4^F12.21
+339 ;;^UTILITY(U,$J,358.3,10085,2)
+340 ;;=^5003167
+341 ;;^UTILITY(U,$J,358.3,10086,0)
+342 ;;=F12.90^^45^445^20
+343 ;;^UTILITY(U,$J,358.3,10086,1,0)
+344 ;;=^358.31IA^4^2
+345 ;;^UTILITY(U,$J,358.3,10086,1,3,0)
+346 ;;=3^Cannabis Use,Unspec,Uncomplicated
+347 ;;^UTILITY(U,$J,358.3,10086,1,4,0)
+348 ;;=4^F12.90
+349 ;;^UTILITY(U,$J,358.3,10086,2)
+350 ;;=^5003178
+351 ;;^UTILITY(U,$J,358.3,10087,0)
+352 ;;=F10.11^^45^445^6
+353 ;;^UTILITY(U,$J,358.3,10087,1,0)
+354 ;;=^358.31IA^4^2
+355 ;;^UTILITY(U,$J,358.3,10087,1,3,0)
+356 ;;=3^Alcohol Abuse,In Remission
+357 ;;^UTILITY(U,$J,358.3,10087,1,4,0)
+358 ;;=4^F10.11
+359 ;;^UTILITY(U,$J,358.3,10087,2)
+360 ;;=^268230
+361 ;;^UTILITY(U,$J,358.3,10088,0)
+362 ;;=F12.11^^45^445^15
+363 ;;^UTILITY(U,$J,358.3,10088,1,0)
+364 ;;=^358.31IA^4^2
+365 ;;^UTILITY(U,$J,358.3,10088,1,3,0)
+366 ;;=3^Cannabis Abuse,In Remission
+367 ;;^UTILITY(U,$J,358.3,10088,1,4,0)
+368 ;;=4^F12.11
+369 ;;^UTILITY(U,$J,358.3,10088,2)
+370 ;;=^268236
+371 ;;^UTILITY(U,$J,358.3,10089,0)
+372 ;;=F14.11^^45^445^21
+373 ;;^UTILITY(U,$J,358.3,10089,1,0)
+374 ;;=^358.31IA^4^2
+375 ;;^UTILITY(U,$J,358.3,10089,1,3,0)
+376 ;;=3^Cocaine Abuse,In Remission
+377 ;;^UTILITY(U,$J,358.3,10089,1,4,0)
+378 ;;=4^F14.11
+379 ;;^UTILITY(U,$J,358.3,10089,2)
+380 ;;=^268249
+381 ;;^UTILITY(U,$J,358.3,10090,0)
+382 ;;=F11.11^^45^445^48
+383 ;;^UTILITY(U,$J,358.3,10090,1,0)
+384 ;;=^358.31IA^4^2
+385 ;;^UTILITY(U,$J,358.3,10090,1,3,0)
+386 ;;=3^Opioid Abuse,In Remission
+387 ;;^UTILITY(U,$J,358.3,10090,1,4,0)
+388 ;;=4^F11.11
+389 ;;^UTILITY(U,$J,358.3,10090,2)
+390 ;;=^268246
+391 ;;^UTILITY(U,$J,358.3,10091,0)
+392 ;;=F12.93^^45^445^19
+393 ;;^UTILITY(U,$J,358.3,10091,1,0)
+394 ;;=^358.31IA^4^2
+395 ;;^UTILITY(U,$J,358.3,10091,1,3,0)
+396 ;;=3^Cannabis Use,Unspec w/ Withdrawal
+397 ;;^UTILITY(U,$J,358.3,10091,1,4,0)
+398 ;;=4^F12.93
+399 ;;^UTILITY(U,$J,358.3,10091,2)
+400 ;;=^5157302
+401 ;;^UTILITY(U,$J,358.3,10092,0)
+402 ;;=F10.130^^45^445^4
+403 ;;^UTILITY(U,$J,358.3,10092,1,0)
+404 ;;=^358.31IA^4^2
+405 ;;^UTILITY(U,$J,358.3,10092,1,3,0)
+406 ;;=3^Alcohol Abuse w/ Withdrawal,Uncomp
+407 ;;^UTILITY(U,$J,358.3,10092,1,4,0)
+408 ;;=4^F10.130
+409 ;;^UTILITY(U,$J,358.3,10092,2)
+410 ;;=^5159130
+411 ;;^UTILITY(U,$J,358.3,10093,0)
+412 ;;=F10.131^^45^445^2
+413 ;;^UTILITY(U,$J,358.3,10093,1,0)
+414 ;;=^358.31IA^4^2
+415 ;;^UTILITY(U,$J,358.3,10093,1,3,0)
+416 ;;=3^Alcohol Abuse w/ Withdrawal Delirium
+417 ;;^UTILITY(U,$J,358.3,10093,1,4,0)
+418 ;;=4^F10.131
+419 ;;^UTILITY(U,$J,358.3,10093,2)
+420 ;;=^5159131
+421 ;;^UTILITY(U,$J,358.3,10094,0)
+422 ;;=F10.132^^45^445^3
+423 ;;^UTILITY(U,$J,358.3,10094,1,0)
+424 ;;=^358.31IA^4^2
+425 ;;^UTILITY(U,$J,358.3,10094,1,3,0)
+426 ;;=3^Alcohol Abuse w/ Withdrawal w/ Perceptual Disturbance
+427 ;;^UTILITY(U,$J,358.3,10094,1,4,0)
+428 ;;=4^F10.132
+429 ;;^UTILITY(U,$J,358.3,10094,2)
+430 ;;=^5159132
+431 ;;^UTILITY(U,$J,358.3,10095,0)
+432 ;;=F10.139^^45^445^5
+433 ;;^UTILITY(U,$J,358.3,10095,1,0)
+434 ;;=^358.31IA^4^2
+435 ;;^UTILITY(U,$J,358.3,10095,1,3,0)
+436 ;;=3^Alcohol Abuse w/ Withdrawal,Unspec
+437 ;;^UTILITY(U,$J,358.3,10095,1,4,0)
+438 ;;=4^F10.139
+439 ;;^UTILITY(U,$J,358.3,10095,2)
+440 ;;=^5159133
+441 ;;^UTILITY(U,$J,358.3,10096,0)
+442 ;;=F10.930^^45^445^12
+443 ;;^UTILITY(U,$J,358.3,10096,1,0)
+444 ;;=^358.31IA^4^2
+445 ;;^UTILITY(U,$J,358.3,10096,1,3,0)
+446 ;;=3^Alcohol Use,Unspec w/ Withdrawal,Uncomp
+447 ;;^UTILITY(U,$J,358.3,10096,1,4,0)
+448 ;;=4^F10.930
+449 ;;^UTILITY(U,$J,358.3,10096,2)
+450 ;;=^5159134
+451 ;;^UTILITY(U,$J,358.3,10097,0)
+452 ;;=F10.931^^45^445^10
+453 ;;^UTILITY(U,$J,358.3,10097,1,0)
+454 ;;=^358.31IA^4^2
+455 ;;^UTILITY(U,$J,358.3,10097,1,3,0)
+456 ;;=3^Alcohol Use,Unspec w/ Withdrawal Delirium
+457 ;;^UTILITY(U,$J,358.3,10097,1,4,0)
+458 ;;=4^F10.931
+459 ;;^UTILITY(U,$J,358.3,10097,2)
+460 ;;=^5159135
+461 ;;^UTILITY(U,$J,358.3,10098,0)
+462 ;;=F10.932^^45^445^11
+463 ;;^UTILITY(U,$J,358.3,10098,1,0)
+464 ;;=^358.31IA^4^2
+465 ;;^UTILITY(U,$J,358.3,10098,1,3,0)
+466 ;;=3^Alcohol Use,Unspec w/ Withdrawal w/ Perceptual Disturbance
+467 ;;^UTILITY(U,$J,358.3,10098,1,4,0)
+468 ;;=4^F10.932
+469 ;;^UTILITY(U,$J,358.3,10098,2)
+470 ;;=^5159136
+471 ;;^UTILITY(U,$J,358.3,10099,0)
+472 ;;=F10.939^^45^445^13
+473 ;;^UTILITY(U,$J,358.3,10099,1,0)
+474 ;;=^358.31IA^4^2
+475 ;;^UTILITY(U,$J,358.3,10099,1,3,0)
+476 ;;=3^Alcohol Use,Unspec w/ Withdrawal,Unspec
+477 ;;^UTILITY(U,$J,358.3,10099,1,4,0)
+478 ;;=4^F10.939
+479 ;;^UTILITY(U,$J,358.3,10099,2)
+480 ;;=^5159137
+481 ;;^UTILITY(U,$J,358.3,10100,0)
+482 ;;=F12.13^^45^445^14
+483 ;;^UTILITY(U,$J,358.3,10100,1,0)
+484 ;;=^358.31IA^4^2
+485 ;;^UTILITY(U,$J,358.3,10100,1,3,0)
+486 ;;=3^Cannabis Abuse w/ Withdrawal
+487 ;;^UTILITY(U,$J,358.3,10100,1,4,0)
+488 ;;=4^F12.13
+489 ;;^UTILITY(U,$J,358.3,10100,2)
+490 ;;=^5159139
+491 ;;^UTILITY(U,$J,358.3,10101,0)
+492 ;;=F11.13^^45^445^47
+493 ;;^UTILITY(U,$J,358.3,10101,1,0)
+494 ;;=^358.31IA^4^2
+495 ;;^UTILITY(U,$J,358.3,10101,1,3,0)
+496 ;;=3^Opioid Abuse w/ Withdrawal
+497 ;;^UTILITY(U,$J,358.3,10101,1,4,0)
+498 ;;=4^F11.13
+499 ;;^UTILITY(U,$J,358.3,10101,2)
+500 ;;=^5159138
+501 ;;^UTILITY(U,$J,358.3,10102,0)
+502 ;;=I83.019^^45^446^3
+503 ;;^UTILITY(U,$J,358.3,10102,1,0)
+504 ;;=^358.31IA^4^2
+505 ;;^UTILITY(U,$J,358.3,10102,1,3,0)
+506 ;;=3^Varicose Veins Right Lower Extrem w/ Ulcer,Unspec
+507 ;;^UTILITY(U,$J,358.3,10102,1,4,0)
+508 ;;=4^I83.019
+509 ;;^UTILITY(U,$J,358.3,10102,2)
+510 ;;=^5007979
+511 ;;^UTILITY(U,$J,358.3,10103,0)
+512 ;;=I83.219^^45^446^4
+513 ;;^UTILITY(U,$J,358.3,10103,1,0)
+514 ;;=^358.31IA^4^2
+515 ;;^UTILITY(U,$J,358.3,10103,1,3,0)
+516 ;;=3^Varicose Veins Right Lower Extrem w/ Ulcer & Inflam,Unspec
+517 ;;^UTILITY(U,$J,358.3,10103,1,4,0)
+518 ;;=4^I83.219
+519 ;;^UTILITY(U,$J,358.3,10103,2)
+520 ;;=^5008003
+521 ;;^UTILITY(U,$J,358.3,10104,0)
+522 ;;=I83.029^^45^446^1
+523 ;;^UTILITY(U,$J,358.3,10104,1,0)
+524 ;;=^358.31IA^4^2
+525 ;;^UTILITY(U,$J,358.3,10104,1,3,0)
+526 ;;=3^Varicose Veins Left Lower Extrem w/ Ulcer,Unspec
+527 ;;^UTILITY(U,$J,358.3,10104,1,4,0)
+528 ;;=4^I83.029
+529 ;;^UTILITY(U,$J,358.3,10104,2)
+530 ;;=^5007986
+531 ;;^UTILITY(U,$J,358.3,10105,0)
+532 ;;=I83.229^^45^446^2
+533 ;;^UTILITY(U,$J,358.3,10105,1,0)
+534 ;;=^358.31IA^4^2
+535 ;;^UTILITY(U,$J,358.3,10105,1,3,0)
+536 ;;=3^Varicose Veins Left Lower Extrem w/ Ulcer & Inflam,Unspec
+537 ;;^UTILITY(U,$J,358.3,10105,1,4,0)
+538 ;;=4^I83.229
+539 ;;^UTILITY(U,$J,358.3,10105,2)
+540 ;;=^5008010
+541 ;;^UTILITY(U,$J,358.3,10106,0)
+542 ;;=B00.81^^45^447^55
+543 ;;^UTILITY(U,$J,358.3,10106,1,0)
+544 ;;=^358.31IA^4^2
+545 ;;^UTILITY(U,$J,358.3,10106,1,3,0)
+546 ;;=3^Herpesviral Hepatitis
+547 ;;^UTILITY(U,$J,358.3,10106,1,4,0)
+548 ;;=4^B00.81
+549 ;;^UTILITY(U,$J,358.3,10106,2)
+550 ;;=^5000478
+551 ;;^UTILITY(U,$J,358.3,10107,0)
+552 ;;=D25.9^^45^447^64
+553 ;;^UTILITY(U,$J,358.3,10107,1,0)
+554 ;;=^358.31IA^4^2
+555 ;;^UTILITY(U,$J,358.3,10107,1,3,0)
+556 ;;=3^Leiomyoma of Uterus,Unspec
+557 ;;^UTILITY(U,$J,358.3,10107,1,4,0)
+558 ;;=4^D25.9
+559 ;;^UTILITY(U,$J,358.3,10107,2)
+560 ;;=^5002081
+561 ;;^UTILITY(U,$J,358.3,10108,0)
+562 ;;=F52.9^^45^447^103
+563 ;;^UTILITY(U,$J,358.3,10108,1,0)
+564 ;;=^358.31IA^4^2
+565 ;;^UTILITY(U,$J,358.3,10108,1,3,0)
+566 ;;=3^Sexual Dysfnct Not d/t a Sub/Known Physiol Cond,Unspec
+567 ;;^UTILITY(U,$J,358.3,10108,1,4,0)
+568 ;;=4^F52.9
+569 ;;^UTILITY(U,$J,358.3,10108,2)
+570 ;;=^5003625
+571 ;;^UTILITY(U,$J,358.3,10109,0)
+572 ;;=R37.^^45^447^104
+573 ;;^UTILITY(U,$J,358.3,10109,1,0)
+574 ;;=^358.31IA^4^2
+575 ;;^UTILITY(U,$J,358.3,10109,1,3,0)
+576 ;;=3^Sexual Dysfunction,Unspec
+577 ;;^UTILITY(U,$J,358.3,10109,1,4,0)
+578 ;;=4^R37.
+579 ;;^UTILITY(U,$J,358.3,10109,2)
+580 ;;=^5019339
+581 ;;^UTILITY(U,$J,358.3,10110,0)
+582 ;;=N60.01^^45^447^107
+583 ;;^UTILITY(U,$J,358.3,10110,1,0)
+584 ;;=^358.31IA^4^2
+585 ;;^UTILITY(U,$J,358.3,10110,1,3,0)
+586 ;;=3^Solitary Cyst of Right Breast
+587 ;;^UTILITY(U,$J,358.3,10110,1,4,0)
+588 ;;=4^N60.01
+589 ;;^UTILITY(U,$J,358.3,10110,2)
+590 ;;=^5015770
+591 ;;^UTILITY(U,$J,358.3,10111,0)
+592 ;;=N60.02^^45^447^106
+593 ;;^UTILITY(U,$J,358.3,10111,1,0)
+594 ;;=^358.31IA^4^2
+595 ;;^UTILITY(U,$J,358.3,10111,1,3,0)
+596 ;;=3^Solitary Cyst of Left Breast
+597 ;;^UTILITY(U,$J,358.3,10111,1,4,0)
+598 ;;=4^N60.02
+599 ;;^UTILITY(U,$J,358.3,10111,2)
+600 ;;=^5015771
+601 ;;^UTILITY(U,$J,358.3,10112,0)
+602 ;;=N60.09^^45^447^108
+603 ;;^UTILITY(U,$J,358.3,10112,1,0)
+604 ;;=^358.31IA^4^2
+605 ;;^UTILITY(U,$J,358.3,10112,1,3,0)
+606 ;;=3^Solitary Cyst of Unspec Breast
+607 ;;^UTILITY(U,$J,358.3,10112,1,4,0)
+608 ;;=4^N60.09
+609 ;;^UTILITY(U,$J,358.3,10112,2)
+610 ;;=^5015772
+611 ;;^UTILITY(U,$J,358.3,10113,0)
+612 ;;=N60.11^^45^447^27
+613 ;;^UTILITY(U,$J,358.3,10113,1,0)
+614 ;;=^358.31IA^4^2
+615 ;;^UTILITY(U,$J,358.3,10113,1,3,0)
+616 ;;=3^Diffuse Cystic Mastopathy of Right Breast
+617 ;;^UTILITY(U,$J,358.3,10113,1,4,0)
+618 ;;=4^N60.11
+619 ;;^UTILITY(U,$J,358.3,10113,2)
+620 ;;=^5015773
+621 ;;^UTILITY(U,$J,358.3,10114,0)
+622 ;;=N60.12^^45^447^26
+623 ;;^UTILITY(U,$J,358.3,10114,1,0)
+624 ;;=^358.31IA^4^2
+625 ;;^UTILITY(U,$J,358.3,10114,1,3,0)
+626 ;;=3^Diffuse Cystic Mastopathy of Left Breast
+627 ;;^UTILITY(U,$J,358.3,10114,1,4,0)
+628 ;;=4^N60.12
+629 ;;^UTILITY(U,$J,358.3,10114,2)
+630 ;;=^5015774
+631 ;;^UTILITY(U,$J,358.3,10115,0)
+632 ;;=N64.4^^45^447^68
+633 ;;^UTILITY(U,$J,358.3,10115,1,0)
+634 ;;=^358.31IA^4^2
+635 ;;^UTILITY(U,$J,358.3,10115,1,3,0)
+636 ;;=3^Mastodynia
+637 ;;^UTILITY(U,$J,358.3,10115,1,4,0)
+638 ;;=4^N64.4
+639 ;;^UTILITY(U,$J,358.3,10115,2)
+640 ;;=^5015794
+641 ;;^UTILITY(U,$J,358.3,10116,0)
+642 ;;=N64.51^^45^447^60
+643 ;;^UTILITY(U,$J,358.3,10116,1,0)
+644 ;;=^358.31IA^4^2
+645 ;;^UTILITY(U,$J,358.3,10116,1,3,0)
+646 ;;=3^Induration of Breast
+647 ;;^UTILITY(U,$J,358.3,10116,1,4,0)
+648 ;;=4^N64.51
+649 ;;^UTILITY(U,$J,358.3,10116,2)
+650 ;;=^5015795
+651 ;;^UTILITY(U,$J,358.3,10117,0)
+652 ;;=N64.59^^45^447^105
+653 ;;^UTILITY(U,$J,358.3,10117,1,0)
+654 ;;=^358.31IA^4^2
+655 ;;^UTILITY(U,$J,358.3,10117,1,3,0)
+656 ;;=3^Signs and Symptoms in Breast,Other
+657 ;;^UTILITY(U,$J,358.3,10117,1,4,0)
+658 ;;=4^N64.59
+659 ;;^UTILITY(U,$J,358.3,10117,2)
+660 ;;=^5015797
+661 ;;^UTILITY(U,$J,358.3,10118,0)
+662 ;;=N64.52^^45^447^71
+663 ;;^UTILITY(U,$J,358.3,10118,1,0)
+664 ;;=^358.31IA^4^2
