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

IBDEI0AE.m

Go to the documentation of this file.
IBDEI0AE ; ; 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,25116,1,4,0)
 ;;=4^F15.982
 ;;^UTILITY(U,$J,358.3,25116,2)
 ;;=^5003322
 ;;^UTILITY(U,$J,358.3,25117,0)
 ;;=F15.122^^110^1289^20
 ;;^UTILITY(U,$J,358.3,25117,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25117,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intoxication w/ Percept Disturb w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25117,1,4,0)
 ;;=4^F15.122
 ;;^UTILITY(U,$J,358.3,25117,2)
 ;;=^5003285
 ;;^UTILITY(U,$J,358.3,25118,0)
 ;;=F15.222^^110^1289^21
 ;;^UTILITY(U,$J,358.3,25118,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25118,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intoxication w/ Percept Disturb w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25118,1,4,0)
 ;;=4^F15.222
 ;;^UTILITY(U,$J,358.3,25118,2)
 ;;=^5003299
 ;;^UTILITY(U,$J,358.3,25119,0)
 ;;=F15.922^^110^1289^22
 ;;^UTILITY(U,$J,358.3,25119,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25119,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intoxication w/ Percept Disturb w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25119,1,4,0)
 ;;=4^F15.922
 ;;^UTILITY(U,$J,358.3,25119,2)
 ;;=^5003313
 ;;^UTILITY(U,$J,358.3,25120,0)
 ;;=F15.129^^110^1289^23
 ;;^UTILITY(U,$J,358.3,25120,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25120,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intoxication w/o  Percept Disturb w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25120,1,4,0)
 ;;=4^F15.129
 ;;^UTILITY(U,$J,358.3,25120,2)
 ;;=^5003286
 ;;^UTILITY(U,$J,358.3,25121,0)
 ;;=F15.229^^110^1289^24
 ;;^UTILITY(U,$J,358.3,25121,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25121,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intoxication w/o  Percept Disturb w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25121,1,4,0)
 ;;=4^F15.229
 ;;^UTILITY(U,$J,358.3,25121,2)
 ;;=^5003300
 ;;^UTILITY(U,$J,358.3,25122,0)
 ;;=F15.929^^110^1289^25
 ;;^UTILITY(U,$J,358.3,25122,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25122,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intoxication w/o Percept Disturb w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25122,1,4,0)
 ;;=4^F15.929
 ;;^UTILITY(U,$J,358.3,25122,2)
 ;;=^5003314
 ;;^UTILITY(U,$J,358.3,25123,0)
 ;;=F15.121^^110^1289^18
 ;;^UTILITY(U,$J,358.3,25123,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25123,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intox Delirium  w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25123,1,4,0)
 ;;=4^F15.121
 ;;^UTILITY(U,$J,358.3,25123,2)
 ;;=^5003284
 ;;^UTILITY(U,$J,358.3,25124,0)
 ;;=F15.221^^110^1289^19
 ;;^UTILITY(U,$J,358.3,25124,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25124,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Intox Delirium  w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25124,1,4,0)
 ;;=4^F15.221
 ;;^UTILITY(U,$J,358.3,25124,2)
 ;;=^5003298
 ;;^UTILITY(U,$J,358.3,25125,0)
 ;;=F15.23^^110^1289^27
 ;;^UTILITY(U,$J,358.3,25125,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25125,1,3,0)
 ;;=3^Amphetamine/Other Stimulant Withdrawal
 ;;^UTILITY(U,$J,358.3,25125,1,4,0)
 ;;=4^F15.23
 ;;^UTILITY(U,$J,358.3,25125,2)
 ;;=^5003301
 ;;^UTILITY(U,$J,358.3,25126,0)
 ;;=F15.10^^110^1289^1
 ;;^UTILITY(U,$J,358.3,25126,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25126,1,3,0)
 ;;=3^Amphetamine Type Substance Abuse
 ;;^UTILITY(U,$J,358.3,25126,1,4,0)
 ;;=4^F15.10
 ;;^UTILITY(U,$J,358.3,25126,2)
 ;;=^5003282
 ;;^UTILITY(U,$J,358.3,25127,0)
 ;;=F15.20^^110^1289^2
 ;;^UTILITY(U,$J,358.3,25127,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25127,1,3,0)
 ;;=3^Amphetamine Type Substance Dependence
 ;;^UTILITY(U,$J,358.3,25127,1,4,0)
 ;;=4^F15.20
 ;;^UTILITY(U,$J,358.3,25127,2)
 ;;=^5003295
 ;;^UTILITY(U,$J,358.3,25128,0)
 ;;=F14.180^^110^1289^31
 ;;^UTILITY(U,$J,358.3,25128,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25128,1,3,0)
 ;;=3^Cocaine Induced Anxiety D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25128,1,4,0)
 ;;=4^F14.180
 ;;^UTILITY(U,$J,358.3,25128,2)
 ;;=^5003248
 ;;^UTILITY(U,$J,358.3,25129,0)
 ;;=F14.280^^110^1289^32
 ;;^UTILITY(U,$J,358.3,25129,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25129,1,3,0)
 ;;=3^Cocaine Induced Anxiety D/O w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25129,1,4,0)
 ;;=4^F14.280
 ;;^UTILITY(U,$J,358.3,25129,2)
 ;;=^5003264
 ;;^UTILITY(U,$J,358.3,25130,0)
 ;;=F14.980^^110^1289^33
 ;;^UTILITY(U,$J,358.3,25130,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25130,1,3,0)
 ;;=3^Cocaine Induced Anxiety D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25130,1,4,0)
 ;;=4^F14.980
 ;;^UTILITY(U,$J,358.3,25130,2)
 ;;=^5003278
 ;;^UTILITY(U,$J,358.3,25131,0)
 ;;=F14.14^^110^1289^28
 ;;^UTILITY(U,$J,358.3,25131,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25131,1,3,0)
 ;;=3^Cocaine Abuse w/ Induced Mood Disorder
 ;;^UTILITY(U,$J,358.3,25131,1,4,0)
 ;;=4^F14.14
 ;;^UTILITY(U,$J,358.3,25131,2)
 ;;=^5003244
 ;;^UTILITY(U,$J,358.3,25132,0)
 ;;=F14.24^^110^1289^30
 ;;^UTILITY(U,$J,358.3,25132,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25132,1,3,0)
 ;;=3^Cocaine Dependence w/ Induced Mood Disorder
 ;;^UTILITY(U,$J,358.3,25132,1,4,0)
 ;;=4^F14.24
 ;;^UTILITY(U,$J,358.3,25132,2)
 ;;=^5003260
 ;;^UTILITY(U,$J,358.3,25133,0)
 ;;=F14.94^^110^1289^57
 ;;^UTILITY(U,$J,358.3,25133,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25133,1,3,0)
 ;;=3^Cocaine Use w/ Induced Mood Disorder
 ;;^UTILITY(U,$J,358.3,25133,1,4,0)
 ;;=4^F14.94
 ;;^UTILITY(U,$J,358.3,25133,2)
 ;;=^5003274
 ;;^UTILITY(U,$J,358.3,25134,0)
 ;;=F14.188^^110^1289^34
 ;;^UTILITY(U,$J,358.3,25134,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25134,1,3,0)
 ;;=3^Cocaine Induced Obess-Compul & Rel D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25134,1,4,0)
 ;;=4^F14.188
 ;;^UTILITY(U,$J,358.3,25134,2)
 ;;=^5003251
 ;;^UTILITY(U,$J,358.3,25135,0)
 ;;=F14.288^^110^1289^35
 ;;^UTILITY(U,$J,358.3,25135,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25135,1,3,0)
 ;;=3^Cocaine Induced Obess-Compul & Rel D/O w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25135,1,4,0)
 ;;=4^F14.288
 ;;^UTILITY(U,$J,358.3,25135,2)
 ;;=^5003267
 ;;^UTILITY(U,$J,358.3,25136,0)
 ;;=F14.988^^110^1289^36
 ;;^UTILITY(U,$J,358.3,25136,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25136,1,3,0)
 ;;=3^Cocaine Induced Obess-Compul & Rel D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25136,1,4,0)
 ;;=4^F14.988
 ;;^UTILITY(U,$J,358.3,25136,2)
 ;;=^5003281
 ;;^UTILITY(U,$J,358.3,25137,0)
 ;;=F14.159^^110^1289^37
 ;;^UTILITY(U,$J,358.3,25137,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25137,1,3,0)
 ;;=3^Cocaine Induced Psychotic D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25137,1,4,0)
 ;;=4^F14.159
 ;;^UTILITY(U,$J,358.3,25137,2)
 ;;=^5003247
 ;;^UTILITY(U,$J,358.3,25138,0)
 ;;=F14.259^^110^1289^38
 ;;^UTILITY(U,$J,358.3,25138,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25138,1,3,0)
 ;;=3^Cocaine Induced Psychotic D/O w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25138,1,4,0)
 ;;=4^F14.259
 ;;^UTILITY(U,$J,358.3,25138,2)
 ;;=^5003263
 ;;^UTILITY(U,$J,358.3,25139,0)
 ;;=F14.959^^110^1289^39
 ;;^UTILITY(U,$J,358.3,25139,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25139,1,3,0)
 ;;=3^Cocaine Induced Psychotic D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25139,1,4,0)
 ;;=4^F14.959
 ;;^UTILITY(U,$J,358.3,25139,2)
 ;;=^5003277
 ;;^UTILITY(U,$J,358.3,25140,0)
 ;;=F14.181^^110^1289^40
 ;;^UTILITY(U,$J,358.3,25140,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25140,1,3,0)
 ;;=3^Cocaine Induced Sexual Dysfunction w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25140,1,4,0)
 ;;=4^F14.181
 ;;^UTILITY(U,$J,358.3,25140,2)
 ;;=^5003249
 ;;^UTILITY(U,$J,358.3,25141,0)
 ;;=F14.281^^110^1289^41
 ;;^UTILITY(U,$J,358.3,25141,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25141,1,3,0)
 ;;=3^Cocaine Induced Sexual Dysfunction w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25141,1,4,0)
 ;;=4^F14.281
 ;;^UTILITY(U,$J,358.3,25141,2)
 ;;=^5003265
 ;;^UTILITY(U,$J,358.3,25142,0)
 ;;=F14.981^^110^1289^42
 ;;^UTILITY(U,$J,358.3,25142,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25142,1,3,0)
 ;;=3^Cocaine Induced Sexual Dysfunction w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25142,1,4,0)
 ;;=4^F14.981
 ;;^UTILITY(U,$J,358.3,25142,2)
 ;;=^5003279
 ;;^UTILITY(U,$J,358.3,25143,0)
 ;;=F14.182^^110^1289^43
 ;;^UTILITY(U,$J,358.3,25143,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25143,1,3,0)
 ;;=3^Cocaine Induced Sleep D/O w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25143,1,4,0)
 ;;=4^F14.182
 ;;^UTILITY(U,$J,358.3,25143,2)
 ;;=^5003250
 ;;^UTILITY(U,$J,358.3,25144,0)
 ;;=F14.282^^110^1289^44
 ;;^UTILITY(U,$J,358.3,25144,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25144,1,3,0)
 ;;=3^Cocaine Induced Sleep D/O w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25144,1,4,0)
 ;;=4^F14.282
 ;;^UTILITY(U,$J,358.3,25144,2)
 ;;=^5003266
 ;;^UTILITY(U,$J,358.3,25145,0)
 ;;=F14.982^^110^1289^45
 ;;^UTILITY(U,$J,358.3,25145,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25145,1,3,0)
 ;;=3^Cocaine Induced Sleep D/O w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25145,1,4,0)
 ;;=4^F14.982
 ;;^UTILITY(U,$J,358.3,25145,2)
 ;;=^5003280
 ;;^UTILITY(U,$J,358.3,25146,0)
 ;;=F14.122^^110^1289^49
 ;;^UTILITY(U,$J,358.3,25146,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25146,1,3,0)
 ;;=3^Cocaine Intoxication w/ Percept Disturb w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25146,1,4,0)
 ;;=4^F14.122
 ;;^UTILITY(U,$J,358.3,25146,2)
 ;;=^5003242
 ;;^UTILITY(U,$J,358.3,25147,0)
 ;;=F14.222^^110^1289^50
 ;;^UTILITY(U,$J,358.3,25147,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25147,1,3,0)
 ;;=3^Cocaine Intoxication w/ Percept Disturb w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25147,1,4,0)
 ;;=4^F14.222
 ;;^UTILITY(U,$J,358.3,25147,2)
 ;;=^5003257
 ;;^UTILITY(U,$J,358.3,25148,0)
 ;;=F14.922^^110^1289^51
 ;;^UTILITY(U,$J,358.3,25148,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25148,1,3,0)
 ;;=3^Cocaine Intoxication w/ Percept Disturb w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25148,1,4,0)
 ;;=4^F14.922
 ;;^UTILITY(U,$J,358.3,25148,2)
 ;;=^5003272
 ;;^UTILITY(U,$J,358.3,25149,0)
 ;;=F14.129^^110^1289^52
 ;;^UTILITY(U,$J,358.3,25149,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25149,1,3,0)
 ;;=3^Cocaine Intoxication w/o  Percept Disturb w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25149,1,4,0)
 ;;=4^F14.129
 ;;^UTILITY(U,$J,358.3,25149,2)
 ;;=^5003243
 ;;^UTILITY(U,$J,358.3,25150,0)
 ;;=F14.229^^110^1289^53
 ;;^UTILITY(U,$J,358.3,25150,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25150,1,3,0)
 ;;=3^Cocaine Intoxication w/o  Percept Disturb w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25150,1,4,0)
 ;;=4^F14.229
 ;;^UTILITY(U,$J,358.3,25150,2)
 ;;=^5003258
 ;;^UTILITY(U,$J,358.3,25151,0)
 ;;=F14.929^^110^1289^54
 ;;^UTILITY(U,$J,358.3,25151,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25151,1,3,0)
 ;;=3^Cocaine Intoxication w/o Percept Disturb w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25151,1,4,0)
 ;;=4^F14.929
 ;;^UTILITY(U,$J,358.3,25151,2)
 ;;=^5003273
 ;;^UTILITY(U,$J,358.3,25152,0)
 ;;=F14.121^^110^1289^46
 ;;^UTILITY(U,$J,358.3,25152,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25152,1,3,0)
 ;;=3^Cocaine Intoxication Delirium w/ Mild Use D/O
 ;;^UTILITY(U,$J,358.3,25152,1,4,0)
 ;;=4^F14.121
 ;;^UTILITY(U,$J,358.3,25152,2)
 ;;=^5003241
 ;;^UTILITY(U,$J,358.3,25153,0)
 ;;=F14.221^^110^1289^47
 ;;^UTILITY(U,$J,358.3,25153,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25153,1,3,0)
 ;;=3^Cocaine Intoxication Delirium w/ Mod-Sev Use D/O
 ;;^UTILITY(U,$J,358.3,25153,1,4,0)
 ;;=4^F14.221
 ;;^UTILITY(U,$J,358.3,25153,2)
 ;;=^5003256
 ;;^UTILITY(U,$J,358.3,25154,0)
 ;;=F14.921^^110^1289^48
 ;;^UTILITY(U,$J,358.3,25154,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25154,1,3,0)
 ;;=3^Cocaine Intoxication Delirium w/o Use D/O
 ;;^UTILITY(U,$J,358.3,25154,1,4,0)
 ;;=4^F14.921
 ;;^UTILITY(U,$J,358.3,25154,2)
 ;;=^5003271
 ;;^UTILITY(U,$J,358.3,25155,0)
 ;;=F14.10^^110^1289^56
 ;;^UTILITY(U,$J,358.3,25155,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25155,1,3,0)
 ;;=3^Cocaine Use D/O, Mild
 ;;^UTILITY(U,$J,358.3,25155,1,4,0)
 ;;=4^F14.10
 ;;^UTILITY(U,$J,358.3,25155,2)
 ;;=^5003239
 ;;^UTILITY(U,$J,358.3,25156,0)
 ;;=F14.20^^110^1289^29
 ;;^UTILITY(U,$J,358.3,25156,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25156,1,3,0)
 ;;=3^Cocaine Dependence
 ;;^UTILITY(U,$J,358.3,25156,1,4,0)
 ;;=4^F14.20
 ;;^UTILITY(U,$J,358.3,25156,2)
 ;;=^5003253
 ;;^UTILITY(U,$J,358.3,25157,0)
 ;;=F14.23^^110^1289^58
 ;;^UTILITY(U,$J,358.3,25157,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25157,1,3,0)
 ;;=3^Cocaine Withdrawal
 ;;^UTILITY(U,$J,358.3,25157,1,4,0)
 ;;=4^F14.23
 ;;^UTILITY(U,$J,358.3,25157,2)
 ;;=^5003259
 ;;^UTILITY(U,$J,358.3,25158,0)
 ;;=F15.11^^110^1289^60
 ;;^UTILITY(U,$J,358.3,25158,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25158,1,3,0)
 ;;=3^Stimulant Abuse,Oth,In Remission
 ;;^UTILITY(U,$J,358.3,25158,1,4,0)
 ;;=4^F15.11
 ;;^UTILITY(U,$J,358.3,25158,2)
 ;;=^5151304
 ;;^UTILITY(U,$J,358.3,25159,0)
 ;;=Z02.71^^110^1290^2
 ;;^UTILITY(U,$J,358.3,25159,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25159,1,3,0)
 ;;=3^Disability Determination Exam
 ;;^UTILITY(U,$J,358.3,25159,1,4,0)
 ;;=4^Z02.71
 ;;^UTILITY(U,$J,358.3,25159,2)
 ;;=^5062640
 ;;^UTILITY(U,$J,358.3,25160,0)
 ;;=Z02.79^^110^1290^4
 ;;^UTILITY(U,$J,358.3,25160,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25160,1,3,0)
 ;;=3^Issue of Medical Certificate
 ;;^UTILITY(U,$J,358.3,25160,1,4,0)
 ;;=4^Z02.79
 ;;^UTILITY(U,$J,358.3,25160,2)
 ;;=^5062641
 ;;^UTILITY(U,$J,358.3,25161,0)
 ;;=Z04.9^^110^1290^3
 ;;^UTILITY(U,$J,358.3,25161,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25161,1,3,0)
 ;;=3^Exam & Observation for Unspec Reason
 ;;^UTILITY(U,$J,358.3,25161,1,4,0)
 ;;=4^Z04.9
 ;;^UTILITY(U,$J,358.3,25161,2)
 ;;=^5062666
 ;;^UTILITY(U,$J,358.3,25162,0)
 ;;=Z02.9^^110^1290^1
 ;;^UTILITY(U,$J,358.3,25162,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25162,1,3,0)
 ;;=3^Adminstrative Exams,Unspec
 ;;^UTILITY(U,$J,358.3,25162,1,4,0)
 ;;=4^Z02.9
 ;;^UTILITY(U,$J,358.3,25162,2)
 ;;=^5062646
 ;;^UTILITY(U,$J,358.3,25163,0)
 ;;=Z76.82^^110^1291^2
 ;;^UTILITY(U,$J,358.3,25163,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25163,1,3,0)
 ;;=3^Awaiting Organ Transplant Status
 ;;^UTILITY(U,$J,358.3,25163,1,4,0)
 ;;=4^Z76.82
 ;;^UTILITY(U,$J,358.3,25163,2)
 ;;=^331582
 ;;^UTILITY(U,$J,358.3,25164,0)
 ;;=Z78.0^^110^1291^1
 ;;^UTILITY(U,$J,358.3,25164,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25164,1,3,0)
 ;;=3^Asymptomatic Menopausal State
 ;;^UTILITY(U,$J,358.3,25164,1,4,0)
 ;;=4^Z78.0
 ;;^UTILITY(U,$J,358.3,25164,2)
 ;;=^5063327
 ;;^UTILITY(U,$J,358.3,25165,0)
 ;;=Z74.01^^110^1291^3
 ;;^UTILITY(U,$J,358.3,25165,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25165,1,3,0)
 ;;=3^Bed Confinement Status
 ;;^UTILITY(U,$J,358.3,25165,1,4,0)
 ;;=4^Z74.01
 ;;^UTILITY(U,$J,358.3,25165,2)
 ;;=^5063282
 ;;^UTILITY(U,$J,358.3,25166,0)
 ;;=Z73.82^^110^1291^5
 ;;^UTILITY(U,$J,358.3,25166,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25166,1,3,0)
 ;;=3^Dual Sensory Impairment
 ;;^UTILITY(U,$J,358.3,25166,1,4,0)
 ;;=4^Z73.82
 ;;^UTILITY(U,$J,358.3,25166,2)
 ;;=^5063279
 ;;^UTILITY(U,$J,358.3,25167,0)
 ;;=Z66.^^110^1291^4
 ;;^UTILITY(U,$J,358.3,25167,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25167,1,3,0)
 ;;=3^Do Not Resuscitate
 ;;^UTILITY(U,$J,358.3,25167,1,4,0)
 ;;=4^Z66.
 ;;^UTILITY(U,$J,358.3,25167,2)
 ;;=^5063187
 ;;^UTILITY(U,$J,358.3,25168,0)
 ;;=Z78.1^^110^1291^7
 ;;^UTILITY(U,$J,358.3,25168,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25168,1,3,0)
 ;;=3^Physical Restraint Status
 ;;^UTILITY(U,$J,358.3,25168,1,4,0)
 ;;=4^Z78.1
 ;;^UTILITY(U,$J,358.3,25168,2)
 ;;=^5063328
 ;;^UTILITY(U,$J,358.3,25169,0)
 ;;=Z87.898^^110^1291^6
 ;;^UTILITY(U,$J,358.3,25169,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25169,1,3,0)
 ;;=3^Personal Hx of Oth Spec Conditions
 ;;^UTILITY(U,$J,358.3,25169,1,4,0)
 ;;=4^Z87.898
 ;;^UTILITY(U,$J,358.3,25169,2)
 ;;=^5063520
 ;;^UTILITY(U,$J,358.3,25170,0)
 ;;=Z51.89^^110^1292^1
 ;;^UTILITY(U,$J,358.3,25170,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25170,1,3,0)
 ;;=3^Aftercare,Oth Spec
 ;;^UTILITY(U,$J,358.3,25170,1,4,0)
 ;;=4^Z51.89
 ;;^UTILITY(U,$J,358.3,25170,2)
 ;;=^5063065
 ;;^UTILITY(U,$J,358.3,25171,0)
 ;;=Z51.5^^110^1292^2
 ;;^UTILITY(U,$J,358.3,25171,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25171,1,3,0)
 ;;=3^Palliative Care
 ;;^UTILITY(U,$J,358.3,25171,1,4,0)
 ;;=4^Z51.5
 ;;^UTILITY(U,$J,358.3,25171,2)
 ;;=^5063063
 ;;^UTILITY(U,$J,358.3,25172,0)
 ;;=Z63.32^^110^1293^1
 ;;^UTILITY(U,$J,358.3,25172,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25172,1,3,0)
 ;;=3^Absence of Family Member
 ;;^UTILITY(U,$J,358.3,25172,1,4,0)
 ;;=4^Z63.32
 ;;^UTILITY(U,$J,358.3,25172,2)
 ;;=^5063167
 ;;^UTILITY(U,$J,358.3,25173,0)
 ;;=Z63.8^^110^1293^10
 ;;^UTILITY(U,$J,358.3,25173,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25173,1,3,0)
 ;;=3^Primary Support Group Problems
 ;;^UTILITY(U,$J,358.3,25173,1,4,0)
 ;;=4^Z63.8
 ;;^UTILITY(U,$J,358.3,25173,2)
 ;;=^5063174
 ;;^UTILITY(U,$J,358.3,25174,0)
 ;;=Z63.5^^110^1293^4
 ;;^UTILITY(U,$J,358.3,25174,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25174,1,3,0)
 ;;=3^Disruption of Family by Separation/Divorce
 ;;^UTILITY(U,$J,358.3,25174,1,4,0)
 ;;=4^Z63.5
 ;;^UTILITY(U,$J,358.3,25174,2)
 ;;=^5063169
 ;;^UTILITY(U,$J,358.3,25175,0)
 ;;=Z71.89^^110^1293^5
 ;;^UTILITY(U,$J,358.3,25175,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25175,1,3,0)
 ;;=3^Family Counseling
 ;;^UTILITY(U,$J,358.3,25175,1,4,0)
 ;;=4^Z71.89
 ;;^UTILITY(U,$J,358.3,25175,2)
 ;;=^5063253
 ;;^UTILITY(U,$J,358.3,25176,0)
 ;;=Z69.11^^110^1293^9
 ;;^UTILITY(U,$J,358.3,25176,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25176,1,3,0)
 ;;=3^Mental Hlth Svc for Victim of Spousal/Partner Abuse
 ;;^UTILITY(U,$J,358.3,25176,1,4,0)
 ;;=4^Z69.11
 ;;^UTILITY(U,$J,358.3,25176,2)
 ;;=^5063232
 ;;^UTILITY(U,$J,358.3,25177,0)
 ;;=Z69.12^^110^1293^7
 ;;^UTILITY(U,$J,358.3,25177,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25177,1,3,0)
 ;;=3^Mental Hlth Svc for Perpetrator of Spousal/Partner Abuse
 ;;^UTILITY(U,$J,358.3,25177,1,4,0)
 ;;=4^Z69.12
 ;;^UTILITY(U,$J,358.3,25177,2)
 ;;=^5063233
 ;;^UTILITY(U,$J,358.3,25178,0)
 ;;=Z69.010^^110^1293^8
 ;;^UTILITY(U,$J,358.3,25178,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25178,1,3,0)
 ;;=3^Mental Hlth Svc for Victim of Parental Child Abuse
 ;;^UTILITY(U,$J,358.3,25178,1,4,0)
 ;;=4^Z69.010
 ;;^UTILITY(U,$J,358.3,25178,2)
 ;;=^5063228
 ;;^UTILITY(U,$J,358.3,25179,0)
 ;;=Z69.011^^110^1293^6
 ;;^UTILITY(U,$J,358.3,25179,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25179,1,3,0)
 ;;=3^Mental Hlth Svc for Perpetrator of Parental Child Abuse
 ;;^UTILITY(U,$J,358.3,25179,1,4,0)
 ;;=4^Z69.011
 ;;^UTILITY(U,$J,358.3,25179,2)
 ;;=^5063229
 ;;^UTILITY(U,$J,358.3,25180,0)
 ;;=Z62.898^^110^1293^11
 ;;^UTILITY(U,$J,358.3,25180,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25180,1,3,0)
 ;;=3^Problems Related to Upbringing
 ;;^UTILITY(U,$J,358.3,25180,1,4,0)
 ;;=4^Z62.898
 ;;^UTILITY(U,$J,358.3,25180,2)
 ;;=^5063162
 ;;^UTILITY(U,$J,358.3,25181,0)
 ;;=Z63.79^^110^1293^12
 ;;^UTILITY(U,$J,358.3,25181,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,25181,1,3,0)
 ;;=3^Stressful Life Events
 ;;^UTILITY(U,$J,358.3,25181,1,4,0)
 ;;=4^Z63.79
 ;;^UTILITY(U,$J,358.3,25181,2)
 ;;=^5063173
 ;;^UTILITY(U,$J,358.3,25182,0)
 ;;=Z63.72^^110^1293^2