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

IBDEI09Y.m

Go to the documentation of this file.
IBDEI09Y ; ; 01-FEB-2021
 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;FEB 01, 2021
 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,24059,1,4,0)
 ;;=4^F12.988
 ;;^UTILITY(U,$J,358.3,24059,2)
 ;;=^5003187
 ;;^UTILITY(U,$J,358.3,24060,0)
 ;;=F12.929^^108^1217^17
 ;;^UTILITY(U,$J,358.3,24060,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24060,1,3,0)
 ;;=3^Cannabis Intox w/o Percep Disturb w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24060,1,4,0)
 ;;=4^F12.929
 ;;^UTILITY(U,$J,358.3,24060,2)
 ;;=^5003182
 ;;^UTILITY(U,$J,358.3,24061,0)
 ;;=F12.180^^108^1217^1
 ;;^UTILITY(U,$J,358.3,24061,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24061,1,3,0)
 ;;=3^Cannabis Induced Anxiety D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24061,1,4,0)
 ;;=4^F12.180
 ;;^UTILITY(U,$J,358.3,24061,2)
 ;;=^5003163
 ;;^UTILITY(U,$J,358.3,24062,0)
 ;;=F12.280^^108^1217^2
 ;;^UTILITY(U,$J,358.3,24062,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24062,1,3,0)
 ;;=3^Cannabis Induced Anxiety D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24062,1,4,0)
 ;;=4^F12.280
 ;;^UTILITY(U,$J,358.3,24062,2)
 ;;=^5003175
 ;;^UTILITY(U,$J,358.3,24063,0)
 ;;=F12.188^^108^1217^7
 ;;^UTILITY(U,$J,358.3,24063,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24063,1,3,0)
 ;;=3^Cannabis Induced Sleep D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24063,1,4,0)
 ;;=4^F12.188
 ;;^UTILITY(U,$J,358.3,24063,2)
 ;;=^5003164
 ;;^UTILITY(U,$J,358.3,24064,0)
 ;;=F12.288^^108^1217^8
 ;;^UTILITY(U,$J,358.3,24064,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24064,1,3,0)
 ;;=3^Cannabis Induced Sleep D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24064,1,4,0)
 ;;=4^F12.288
 ;;^UTILITY(U,$J,358.3,24064,2)
 ;;=^5003176
 ;;^UTILITY(U,$J,358.3,24065,0)
 ;;=F12.99^^108^1217^18
 ;;^UTILITY(U,$J,358.3,24065,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24065,1,3,0)
 ;;=3^Cannabis Related D/O,Unspec
 ;;^UTILITY(U,$J,358.3,24065,1,4,0)
 ;;=4^F12.99
 ;;^UTILITY(U,$J,358.3,24065,2)
 ;;=^5003188
 ;;^UTILITY(U,$J,358.3,24066,0)
 ;;=F12.21^^108^1217^24
 ;;^UTILITY(U,$J,358.3,24066,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24066,1,3,0)
 ;;=3^Cannabis Use D/O,Mod/Sev,In Remission
 ;;^UTILITY(U,$J,358.3,24066,1,4,0)
 ;;=4^F12.21
 ;;^UTILITY(U,$J,358.3,24066,2)
 ;;=^5003167
 ;;^UTILITY(U,$J,358.3,24067,0)
 ;;=F12.23^^108^1217^23
 ;;^UTILITY(U,$J,358.3,24067,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24067,1,3,0)
 ;;=3^Cannabis Use D/O,Mod/Sev w/ WD
 ;;^UTILITY(U,$J,358.3,24067,1,4,0)
 ;;=4^F12.23
 ;;^UTILITY(U,$J,358.3,24067,2)
 ;;=^5157301
 ;;^UTILITY(U,$J,358.3,24068,0)
 ;;=F12.129^^108^1217^19
 ;;^UTILITY(U,$J,358.3,24068,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24068,1,3,0)
 ;;=3^Cannabis Use D/O Mild w/ Intoxication
 ;;^UTILITY(U,$J,358.3,24068,1,4,0)
 ;;=4^F12.129
 ;;^UTILITY(U,$J,358.3,24068,2)
 ;;=^5003159
 ;;^UTILITY(U,$J,358.3,24069,0)
 ;;=F12.93^^108^1217^26
 ;;^UTILITY(U,$J,358.3,24069,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24069,1,3,0)
 ;;=3^Cannabis Withdrawal w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24069,1,4,0)
 ;;=4^F12.93
 ;;^UTILITY(U,$J,358.3,24069,2)
 ;;=^5157302
 ;;^UTILITY(U,$J,358.3,24070,0)
 ;;=F12.11^^108^1217^21
 ;;^UTILITY(U,$J,358.3,24070,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24070,1,3,0)
 ;;=3^Cannabis Use D/O,Mild,In Early Remission
 ;;^UTILITY(U,$J,358.3,24070,1,4,0)
 ;;=4^F12.11
 ;;^UTILITY(U,$J,358.3,24070,2)
 ;;=^268236
 ;;^UTILITY(U,$J,358.3,24071,0)
 ;;=F16.10^^108^1218^19
 ;;^UTILITY(U,$J,358.3,24071,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24071,1,3,0)
 ;;=3^Hallucinogen Use DO,Mild,Uncomp
 ;;^UTILITY(U,$J,358.3,24071,1,4,0)
 ;;=4^F16.10
 ;;^UTILITY(U,$J,358.3,24071,2)
 ;;=^5003323
 ;;^UTILITY(U,$J,358.3,24072,0)
 ;;=F16.20^^108^1218^21
 ;;^UTILITY(U,$J,358.3,24072,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24072,1,3,0)
 ;;=3^Hallucinogen Use DO,Mod/Sev,Uncomp
 ;;^UTILITY(U,$J,358.3,24072,1,4,0)
 ;;=4^F16.20
 ;;^UTILITY(U,$J,358.3,24072,2)
 ;;=^5003336
 ;;^UTILITY(U,$J,358.3,24073,0)
 ;;=F16.121^^108^1218^10
 ;;^UTILITY(U,$J,358.3,24073,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24073,1,3,0)
 ;;=3^Hallucinogen Intoxication Delirium w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24073,1,4,0)
 ;;=4^F16.121
 ;;^UTILITY(U,$J,358.3,24073,2)
 ;;=^5003325
 ;;^UTILITY(U,$J,358.3,24074,0)
 ;;=F16.221^^108^1218^11
 ;;^UTILITY(U,$J,358.3,24074,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24074,1,3,0)
 ;;=3^Hallucinogen Intoxication Delirium w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24074,1,4,0)
 ;;=4^F16.221
 ;;^UTILITY(U,$J,358.3,24074,2)
 ;;=^5003339
 ;;^UTILITY(U,$J,358.3,24075,0)
 ;;=F16.921^^108^1218^12
 ;;^UTILITY(U,$J,358.3,24075,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24075,1,3,0)
 ;;=3^Hallucinogen Intoxication Delirium w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24075,1,4,0)
 ;;=4^F16.921
 ;;^UTILITY(U,$J,358.3,24075,2)
 ;;=^5003351
 ;;^UTILITY(U,$J,358.3,24076,0)
 ;;=F16.129^^108^1218^13
 ;;^UTILITY(U,$J,358.3,24076,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24076,1,3,0)
 ;;=3^Hallucinogen Intoxication w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24076,1,4,0)
 ;;=4^F16.129
 ;;^UTILITY(U,$J,358.3,24076,2)
 ;;=^5003327
 ;;^UTILITY(U,$J,358.3,24077,0)
 ;;=F16.229^^108^1218^14
 ;;^UTILITY(U,$J,358.3,24077,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24077,1,3,0)
 ;;=3^Hallucinogen Intoxication w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24077,1,4,0)
 ;;=4^F16.229
 ;;^UTILITY(U,$J,358.3,24077,2)
 ;;=^5003340
 ;;^UTILITY(U,$J,358.3,24078,0)
 ;;=F16.929^^108^1218^15
 ;;^UTILITY(U,$J,358.3,24078,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24078,1,3,0)
 ;;=3^Hallucinogen Intoxication w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24078,1,4,0)
 ;;=4^F16.929
 ;;^UTILITY(U,$J,358.3,24078,2)
 ;;=^5003352
 ;;^UTILITY(U,$J,358.3,24079,0)
 ;;=F16.180^^108^1218^1
 ;;^UTILITY(U,$J,358.3,24079,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24079,1,3,0)
 ;;=3^Hallucinogen Induced Anxiety D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24079,1,4,0)
 ;;=4^F16.180
 ;;^UTILITY(U,$J,358.3,24079,2)
 ;;=^5003332
 ;;^UTILITY(U,$J,358.3,24080,0)
 ;;=F16.280^^108^1218^2
 ;;^UTILITY(U,$J,358.3,24080,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24080,1,3,0)
 ;;=3^Hallucinogen Induced Anxiety D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24080,1,4,0)
 ;;=4^F16.280
 ;;^UTILITY(U,$J,358.3,24080,2)
 ;;=^5003345
 ;;^UTILITY(U,$J,358.3,24081,0)
 ;;=F16.980^^108^1218^3
 ;;^UTILITY(U,$J,358.3,24081,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24081,1,3,0)
 ;;=3^Hallucinogen Induced Anxiety D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24081,1,4,0)
 ;;=4^F16.980
 ;;^UTILITY(U,$J,358.3,24081,2)
 ;;=^5003357
 ;;^UTILITY(U,$J,358.3,24082,0)
 ;;=F16.14^^108^1218^4
 ;;^UTILITY(U,$J,358.3,24082,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24082,1,3,0)
 ;;=3^Hallucinogen Induced Bipolar D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24082,1,4,0)
 ;;=4^F16.14
 ;;^UTILITY(U,$J,358.3,24082,2)
 ;;=^5003328
 ;;^UTILITY(U,$J,358.3,24083,0)
 ;;=F16.24^^108^1218^5
 ;;^UTILITY(U,$J,358.3,24083,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24083,1,3,0)
 ;;=3^Hallucinogen Induced Bipolar D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24083,1,4,0)
 ;;=4^F16.24
 ;;^UTILITY(U,$J,358.3,24083,2)
 ;;=^5003341
 ;;^UTILITY(U,$J,358.3,24084,0)
 ;;=F16.94^^108^1218^6
 ;;^UTILITY(U,$J,358.3,24084,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24084,1,3,0)
 ;;=3^Hallucinogen Induced Bipolar D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24084,1,4,0)
 ;;=4^F16.94
 ;;^UTILITY(U,$J,358.3,24084,2)
 ;;=^5003353
 ;;^UTILITY(U,$J,358.3,24085,0)
 ;;=F16.159^^108^1218^7
 ;;^UTILITY(U,$J,358.3,24085,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24085,1,3,0)
 ;;=3^Hallucinogen Induced Psychotic D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24085,1,4,0)
 ;;=4^F16.159
 ;;^UTILITY(U,$J,358.3,24085,2)
 ;;=^5003331
 ;;^UTILITY(U,$J,358.3,24086,0)
 ;;=F16.259^^108^1218^8
 ;;^UTILITY(U,$J,358.3,24086,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24086,1,3,0)
 ;;=3^Hallucinogen Induced Psychotic D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24086,1,4,0)
 ;;=4^F16.259
 ;;^UTILITY(U,$J,358.3,24086,2)
 ;;=^5003344
 ;;^UTILITY(U,$J,358.3,24087,0)
 ;;=F16.959^^108^1218^9
 ;;^UTILITY(U,$J,358.3,24087,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24087,1,3,0)
 ;;=3^Hallucinogen Induced Psychotic D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24087,1,4,0)
 ;;=4^F16.959
 ;;^UTILITY(U,$J,358.3,24087,2)
 ;;=^5003356
 ;;^UTILITY(U,$J,358.3,24088,0)
 ;;=F16.99^^108^1218^17
 ;;^UTILITY(U,$J,358.3,24088,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24088,1,3,0)
 ;;=3^Hallucinogen Related D/O,Unspec
 ;;^UTILITY(U,$J,358.3,24088,1,4,0)
 ;;=4^F16.99
 ;;^UTILITY(U,$J,358.3,24088,2)
 ;;=^5133359
 ;;^UTILITY(U,$J,358.3,24089,0)
 ;;=F16.983^^108^1218^16
 ;;^UTILITY(U,$J,358.3,24089,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24089,1,3,0)
 ;;=3^Hallucinogen Persisting Perception D/O
 ;;^UTILITY(U,$J,358.3,24089,1,4,0)
 ;;=4^F16.983
 ;;^UTILITY(U,$J,358.3,24089,2)
 ;;=^5003358
 ;;^UTILITY(U,$J,358.3,24090,0)
 ;;=F16.21^^108^1218^20
 ;;^UTILITY(U,$J,358.3,24090,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24090,1,3,0)
 ;;=3^Hallucinogen Use DO,Mod/Sev,In Remiss
 ;;^UTILITY(U,$J,358.3,24090,1,4,0)
 ;;=4^F16.21
 ;;^UTILITY(U,$J,358.3,24090,2)
 ;;=^5003337
 ;;^UTILITY(U,$J,358.3,24091,0)
 ;;=F16.11^^108^1218^18
 ;;^UTILITY(U,$J,358.3,24091,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24091,1,3,0)
 ;;=3^Hallucinogen Use DO,Mild,In Remiss
 ;;^UTILITY(U,$J,358.3,24091,1,4,0)
 ;;=4^F16.11
 ;;^UTILITY(U,$J,358.3,24091,2)
 ;;=^268239
 ;;^UTILITY(U,$J,358.3,24092,0)
 ;;=F11.10^^108^1219^25
 ;;^UTILITY(U,$J,358.3,24092,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24092,1,3,0)
 ;;=3^Opioid Use DO,Mild,Uncomp
 ;;^UTILITY(U,$J,358.3,24092,1,4,0)
 ;;=4^F11.10
 ;;^UTILITY(U,$J,358.3,24092,2)
 ;;=^5003114
 ;;^UTILITY(U,$J,358.3,24093,0)
 ;;=F11.129^^108^1219^22
 ;;^UTILITY(U,$J,358.3,24093,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24093,1,3,0)
 ;;=3^Opioid Intox w/o Perceptual Dists w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24093,1,4,0)
 ;;=4^F11.129
 ;;^UTILITY(U,$J,358.3,24093,2)
 ;;=^5003118
 ;;^UTILITY(U,$J,358.3,24094,0)
 ;;=F11.14^^108^1219^5
 ;;^UTILITY(U,$J,358.3,24094,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24094,1,3,0)
 ;;=3^Opioid Induced Depressive D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24094,1,4,0)
 ;;=4^F11.14
 ;;^UTILITY(U,$J,358.3,24094,2)
 ;;=^5003119
 ;;^UTILITY(U,$J,358.3,24095,0)
 ;;=F11.182^^108^1219^11
 ;;^UTILITY(U,$J,358.3,24095,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24095,1,3,0)
 ;;=3^Opioid Induced Sleep D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24095,1,4,0)
 ;;=4^F11.182
 ;;^UTILITY(U,$J,358.3,24095,2)
 ;;=^5003124
 ;;^UTILITY(U,$J,358.3,24096,0)
 ;;=F11.20^^108^1219^28
 ;;^UTILITY(U,$J,358.3,24096,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24096,1,3,0)
 ;;=3^Opioid Use DO,Mod/Sev,Uncomp
 ;;^UTILITY(U,$J,358.3,24096,1,4,0)
 ;;=4^F11.20
 ;;^UTILITY(U,$J,358.3,24096,2)
 ;;=^5003127
 ;;^UTILITY(U,$J,358.3,24097,0)
 ;;=F11.23^^108^1219^26
 ;;^UTILITY(U,$J,358.3,24097,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24097,1,3,0)
 ;;=3^Opioid Use DO,Mod/Sev w/ Withdrawal
 ;;^UTILITY(U,$J,358.3,24097,1,4,0)
 ;;=4^F11.23
 ;;^UTILITY(U,$J,358.3,24097,2)
 ;;=^5003133
 ;;^UTILITY(U,$J,358.3,24098,0)
 ;;=F11.24^^108^1219^6
 ;;^UTILITY(U,$J,358.3,24098,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24098,1,3,0)
 ;;=3^Opioid Induced Depressive D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24098,1,4,0)
 ;;=4^F11.24
 ;;^UTILITY(U,$J,358.3,24098,2)
 ;;=^5003134
 ;;^UTILITY(U,$J,358.3,24099,0)
 ;;=F11.188^^108^1219^2
 ;;^UTILITY(U,$J,358.3,24099,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24099,1,3,0)
 ;;=3^Opioid Induced Anxiety D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24099,1,4,0)
 ;;=4^F11.188
 ;;^UTILITY(U,$J,358.3,24099,2)
 ;;=^5003125
 ;;^UTILITY(U,$J,358.3,24100,0)
 ;;=F11.288^^108^1219^3
 ;;^UTILITY(U,$J,358.3,24100,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24100,1,3,0)
 ;;=3^Opioid Induced Anxiety D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24100,1,4,0)
 ;;=4^F11.288
 ;;^UTILITY(U,$J,358.3,24100,2)
 ;;=^5003140
 ;;^UTILITY(U,$J,358.3,24101,0)
 ;;=F11.988^^108^1219^4
 ;;^UTILITY(U,$J,358.3,24101,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24101,1,3,0)
 ;;=3^Opioid Induced Anxiety D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24101,1,4,0)
 ;;=4^F11.988
 ;;^UTILITY(U,$J,358.3,24101,2)
 ;;=^5003154
 ;;^UTILITY(U,$J,358.3,24102,0)
 ;;=F11.921^^108^1219^16
 ;;^UTILITY(U,$J,358.3,24102,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24102,1,3,0)
 ;;=3^Opioid Intox Delirium w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24102,1,4,0)
 ;;=4^F11.921
 ;;^UTILITY(U,$J,358.3,24102,2)
 ;;=^5003144
 ;;^UTILITY(U,$J,358.3,24103,0)
 ;;=F11.94^^108^1219^7
 ;;^UTILITY(U,$J,358.3,24103,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24103,1,3,0)
 ;;=3^Opioid Induced Depressive D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24103,1,4,0)
 ;;=4^F11.94
 ;;^UTILITY(U,$J,358.3,24103,2)
 ;;=^5003148
 ;;^UTILITY(U,$J,358.3,24104,0)
 ;;=F11.181^^108^1219^8
 ;;^UTILITY(U,$J,358.3,24104,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24104,1,3,0)
 ;;=3^Opioid Induced Sexual Dysf w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24104,1,4,0)
 ;;=4^F11.181
 ;;^UTILITY(U,$J,358.3,24104,2)
 ;;=^5003123
 ;;^UTILITY(U,$J,358.3,24105,0)
 ;;=F11.281^^108^1219^9
 ;;^UTILITY(U,$J,358.3,24105,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24105,1,3,0)
 ;;=3^Opioid Induced Sexual Dysfunc w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24105,1,4,0)
 ;;=4^F11.281
 ;;^UTILITY(U,$J,358.3,24105,2)
 ;;=^5003138
 ;;^UTILITY(U,$J,358.3,24106,0)
 ;;=F11.981^^108^1219^10
 ;;^UTILITY(U,$J,358.3,24106,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24106,1,3,0)
 ;;=3^Opioid Induced Sexual Dysfunc w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24106,1,4,0)
 ;;=4^F11.981
 ;;^UTILITY(U,$J,358.3,24106,2)
 ;;=^5003152
 ;;^UTILITY(U,$J,358.3,24107,0)
 ;;=F11.282^^108^1219^12
 ;;^UTILITY(U,$J,358.3,24107,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24107,1,3,0)
 ;;=3^Opioid Induced Sleep D/O w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24107,1,4,0)
 ;;=4^F11.282
 ;;^UTILITY(U,$J,358.3,24107,2)
 ;;=^5003139
 ;;^UTILITY(U,$J,358.3,24108,0)
 ;;=F11.982^^108^1219^13
 ;;^UTILITY(U,$J,358.3,24108,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24108,1,3,0)
 ;;=3^Opioid Induced Sleep D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24108,1,4,0)
 ;;=4^F11.982
 ;;^UTILITY(U,$J,358.3,24108,2)
 ;;=^5003153
 ;;^UTILITY(U,$J,358.3,24109,0)
 ;;=F11.121^^108^1219^14
 ;;^UTILITY(U,$J,358.3,24109,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24109,1,3,0)
 ;;=3^Opioid Intox Delirium w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24109,1,4,0)
 ;;=4^F11.121
 ;;^UTILITY(U,$J,358.3,24109,2)
 ;;=^5003116
 ;;^UTILITY(U,$J,358.3,24110,0)
 ;;=F11.221^^108^1219^15
 ;;^UTILITY(U,$J,358.3,24110,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24110,1,3,0)
 ;;=3^Opioid Intox Delirium w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24110,1,4,0)
 ;;=4^F11.221
 ;;^UTILITY(U,$J,358.3,24110,2)
 ;;=^5003130
 ;;^UTILITY(U,$J,358.3,24111,0)
 ;;=F11.229^^108^1219^20
 ;;^UTILITY(U,$J,358.3,24111,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24111,1,3,0)
 ;;=3^Opioid Intox w/o Percep Disturb w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24111,1,4,0)
 ;;=4^F11.229
 ;;^UTILITY(U,$J,358.3,24111,2)
 ;;=^5003132
 ;;^UTILITY(U,$J,358.3,24112,0)
 ;;=F11.929^^108^1219^21
 ;;^UTILITY(U,$J,358.3,24112,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24112,1,3,0)
 ;;=3^Opioid Intox w/o Percep Disturb w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24112,1,4,0)
 ;;=4^F11.929
 ;;^UTILITY(U,$J,358.3,24112,2)
 ;;=^5003146
 ;;^UTILITY(U,$J,358.3,24113,0)
 ;;=F11.122^^108^1219^17
 ;;^UTILITY(U,$J,358.3,24113,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24113,1,3,0)
 ;;=3^Opioid Intox w/ Percep Disturb w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24113,1,4,0)
 ;;=4^F11.122
 ;;^UTILITY(U,$J,358.3,24113,2)
 ;;=^5003117
 ;;^UTILITY(U,$J,358.3,24114,0)
 ;;=F11.222^^108^1219^18
 ;;^UTILITY(U,$J,358.3,24114,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24114,1,3,0)
 ;;=3^Opioid Intox w/ Percep Disturb w/ Mod/Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24114,1,4,0)
 ;;=4^F11.222
 ;;^UTILITY(U,$J,358.3,24114,2)
 ;;=^5003131
 ;;^UTILITY(U,$J,358.3,24115,0)
 ;;=F11.922^^108^1219^19
 ;;^UTILITY(U,$J,358.3,24115,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24115,1,3,0)
 ;;=3^Opioid Intox w/ Percep Disturb w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24115,1,4,0)
 ;;=4^F11.922
 ;;^UTILITY(U,$J,358.3,24115,2)
 ;;=^5003145
 ;;^UTILITY(U,$J,358.3,24116,0)
 ;;=F11.99^^108^1219^23
 ;;^UTILITY(U,$J,358.3,24116,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24116,1,3,0)
 ;;=3^Opioid Related D/O,Unspec
 ;;^UTILITY(U,$J,358.3,24116,1,4,0)
 ;;=4^F11.99
 ;;^UTILITY(U,$J,358.3,24116,2)
 ;;=^5133352
 ;;^UTILITY(U,$J,358.3,24117,0)
 ;;=F11.21^^108^1219^27
 ;;^UTILITY(U,$J,358.3,24117,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24117,1,3,0)
 ;;=3^Opioid Use DO,Mod/Sev,In Remiss
 ;;^UTILITY(U,$J,358.3,24117,1,4,0)
 ;;=4^F11.21
 ;;^UTILITY(U,$J,358.3,24117,2)
 ;;=^5003128
 ;;^UTILITY(U,$J,358.3,24118,0)
 ;;=Z79.891^^108^1219^1
 ;;^UTILITY(U,$J,358.3,24118,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24118,1,3,0)
 ;;=3^Long Term Opiate/Opioid Analgesic Use
 ;;^UTILITY(U,$J,358.3,24118,1,4,0)
 ;;=4^Z79.891
 ;;^UTILITY(U,$J,358.3,24118,2)
 ;;=^5063342
 ;;^UTILITY(U,$J,358.3,24119,0)
 ;;=F11.11^^108^1219^24
 ;;^UTILITY(U,$J,358.3,24119,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24119,1,3,0)
 ;;=3^Opioid Use DO,Mild,In Remiss
 ;;^UTILITY(U,$J,358.3,24119,1,4,0)
 ;;=4^F11.11
 ;;^UTILITY(U,$J,358.3,24119,2)
 ;;=^268246
 ;;^UTILITY(U,$J,358.3,24120,0)
 ;;=F13.180^^108^1220^1
 ;;^UTILITY(U,$J,358.3,24120,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24120,1,3,0)
 ;;=3^Sedative/Hypnotic/Anxiolytic Induced Anxiety D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24120,1,4,0)
 ;;=4^F13.180
 ;;^UTILITY(U,$J,358.3,24120,2)
 ;;=^5003197
 ;;^UTILITY(U,$J,358.3,24121,0)
 ;;=F13.280^^108^1220^2
 ;;^UTILITY(U,$J,358.3,24121,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24121,1,3,0)
 ;;=3^Sedative/Hypnotic/Anxiolytic Induced Anxiety D/O w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,24121,1,4,0)
 ;;=4^F13.280
 ;;^UTILITY(U,$J,358.3,24121,2)
 ;;=^5003216
 ;;^UTILITY(U,$J,358.3,24122,0)
 ;;=F13.980^^108^1220^3
 ;;^UTILITY(U,$J,358.3,24122,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24122,1,3,0)
 ;;=3^Sedative/Hypnotic/Anxiolytic Induced Anxiety D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,24122,1,4,0)
 ;;=4^F13.980
 ;;^UTILITY(U,$J,358.3,24122,2)
 ;;=^5003235
 ;;^UTILITY(U,$J,358.3,24123,0)
 ;;=F13.14^^108^1220^4
 ;;^UTILITY(U,$J,358.3,24123,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24123,1,3,0)
 ;;=3^Sedative/Hypnotic/Anxiolytic Induced Bipolar & Rel D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,24123,1,4,0)
 ;;=4^F13.14
 ;;^UTILITY(U,$J,358.3,24123,2)
 ;;=^5003193
 ;;^UTILITY(U,$J,358.3,24124,0)
 ;;=F13.24^^108^1220^5
 ;;^UTILITY(U,$J,358.3,24124,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,24124,1,3,0)
 ;;=3^Sedative/Hypnotic/Anxiolytic Induced Bipolar & Rel D/O w/ Mod-Sev Use D/O 
 ;;^UTILITY(U,$J,358.3,24124,1,4,0)
 ;;=4^F13.24
 ;;^UTILITY(U,$J,358.3,24124,2)
 ;;=^5003210