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

IBDEI01X.m

Go to the documentation of this file.
IBDEI01X ; ; 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,4315,1,2,0)
 ;;=2^85025
 ;;^UTILITY(U,$J,358.3,4315,1,3,0)
 ;;=3^CBC w/ Diff
 ;;^UTILITY(U,$J,358.3,4316,0)
 ;;=99281^^31^259^1
 ;;^UTILITY(U,$J,358.3,4316,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4316,1,1,0)
 ;;=1^Problem Focused
 ;;^UTILITY(U,$J,358.3,4316,1,2,0)
 ;;=2^99281
 ;;^UTILITY(U,$J,358.3,4317,0)
 ;;=99282^^31^259^2
 ;;^UTILITY(U,$J,358.3,4317,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4317,1,1,0)
 ;;=1^Expanded Problem Focus,Low
 ;;^UTILITY(U,$J,358.3,4317,1,2,0)
 ;;=2^99282
 ;;^UTILITY(U,$J,358.3,4318,0)
 ;;=99283^^31^259^3
 ;;^UTILITY(U,$J,358.3,4318,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4318,1,1,0)
 ;;=1^Expanded Problem Focus,Mod
 ;;^UTILITY(U,$J,358.3,4318,1,2,0)
 ;;=2^99283
 ;;^UTILITY(U,$J,358.3,4319,0)
 ;;=99284^^31^259^4
 ;;^UTILITY(U,$J,358.3,4319,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4319,1,1,0)
 ;;=1^Detailed
 ;;^UTILITY(U,$J,358.3,4319,1,2,0)
 ;;=2^99284
 ;;^UTILITY(U,$J,358.3,4320,0)
 ;;=99285^^31^259^5
 ;;^UTILITY(U,$J,358.3,4320,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4320,1,1,0)
 ;;=1^Comprehensive
 ;;^UTILITY(U,$J,358.3,4320,1,2,0)
 ;;=2^99285
 ;;^UTILITY(U,$J,358.3,4321,0)
 ;;=99291^^31^259^6
 ;;^UTILITY(U,$J,358.3,4321,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4321,1,1,0)
 ;;=1^Critical Care,1st Hr (99292 on proc tab)
 ;;^UTILITY(U,$J,358.3,4321,1,2,0)
 ;;=2^99291
 ;;^UTILITY(U,$J,358.3,4322,0)
 ;;=99211^^31^260^1
 ;;^UTILITY(U,$J,358.3,4322,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4322,1,1,0)
 ;;=1^Nursing Visit (NO MD Seen)
 ;;^UTILITY(U,$J,358.3,4322,1,2,0)
 ;;=2^99211
 ;;^UTILITY(U,$J,358.3,4323,0)
 ;;=99218^^31^261^1
 ;;^UTILITY(U,$J,358.3,4323,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4323,1,1,0)
 ;;=1^Detail Hx/Exam,Low MDM/Complex (3 of 3)
 ;;^UTILITY(U,$J,358.3,4323,1,2,0)
 ;;=2^99218
 ;;^UTILITY(U,$J,358.3,4324,0)
 ;;=99219^^31^261^2
 ;;^UTILITY(U,$J,358.3,4324,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4324,1,1,0)
 ;;=1^Comp Hx/Exam,Mod MDM/Complex (3 of 3)
 ;;^UTILITY(U,$J,358.3,4324,1,2,0)
 ;;=2^99219
 ;;^UTILITY(U,$J,358.3,4325,0)
 ;;=99220^^31^261^3
 ;;^UTILITY(U,$J,358.3,4325,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4325,1,1,0)
 ;;=1^Comp Hx/Exam,High MDM/Complex (3 of 3)
 ;;^UTILITY(U,$J,358.3,4325,1,2,0)
 ;;=2^99220
 ;;^UTILITY(U,$J,358.3,4326,0)
 ;;=99234^^31^262^1
 ;;^UTILITY(U,$J,358.3,4326,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4326,1,1,0)
 ;;=1^Detail Hx/Exam,Low MDM/Complex (3 of 3)
 ;;^UTILITY(U,$J,358.3,4326,1,2,0)
 ;;=2^99234
 ;;^UTILITY(U,$J,358.3,4327,0)
 ;;=99235^^31^262^2
 ;;^UTILITY(U,$J,358.3,4327,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4327,1,1,0)
 ;;=1^Comp Hx/Exam,Mod MDM/Complex (3 of 3)
 ;;^UTILITY(U,$J,358.3,4327,1,2,0)
 ;;=2^99235
 ;;^UTILITY(U,$J,358.3,4328,0)
 ;;=99236^^31^262^3
 ;;^UTILITY(U,$J,358.3,4328,1,0)
 ;;=^358.31IA^2^2
 ;;^UTILITY(U,$J,358.3,4328,1,1,0)
 ;;=1^Comp Hx/Exam,High MDM/Complex (3 of 3)
 ;;^UTILITY(U,$J,358.3,4328,1,2,0)
 ;;=2^99236
 ;;^UTILITY(U,$J,358.3,4329,0)
 ;;=R07.9^^32^263^12
 ;;^UTILITY(U,$J,358.3,4329,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4329,1,3,0)
 ;;=3^Chest Pain
 ;;^UTILITY(U,$J,358.3,4329,1,4,0)
 ;;=4^R07.9
 ;;^UTILITY(U,$J,358.3,4329,2)
 ;;=^5019201
 ;;^UTILITY(U,$J,358.3,4330,0)
 ;;=M79.609^^32^263^32
 ;;^UTILITY(U,$J,358.3,4330,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4330,1,3,0)
 ;;=3^Pain in Limb
 ;;^UTILITY(U,$J,358.3,4330,1,4,0)
 ;;=4^M79.609
 ;;^UTILITY(U,$J,358.3,4330,2)
 ;;=^5013331
 ;;^UTILITY(U,$J,358.3,4331,0)
 ;;=S93.409A^^32^263^9
 ;;^UTILITY(U,$J,358.3,4331,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4331,1,3,0)
 ;;=3^Ankle Sprain
 ;;^UTILITY(U,$J,358.3,4331,1,4,0)
 ;;=4^S93.409A
 ;;^UTILITY(U,$J,358.3,4331,2)
 ;;=^5137675
 ;;^UTILITY(U,$J,358.3,4332,0)
 ;;=M25.50^^32^263^31
 ;;^UTILITY(U,$J,358.3,4332,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4332,1,3,0)
 ;;=3^Pain in Joint
 ;;^UTILITY(U,$J,358.3,4332,1,4,0)
 ;;=4^M25.50
 ;;^UTILITY(U,$J,358.3,4332,2)
 ;;=^5011601
 ;;^UTILITY(U,$J,358.3,4333,0)
 ;;=S09.90XA^^32^263^20
 ;;^UTILITY(U,$J,358.3,4333,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4333,1,3,0)
 ;;=3^Head Injury
 ;;^UTILITY(U,$J,358.3,4333,1,4,0)
 ;;=4^S09.90XA
 ;;^UTILITY(U,$J,358.3,4333,2)
 ;;=^5021332
 ;;^UTILITY(U,$J,358.3,4334,0)
 ;;=J06.9^^32^263^5
 ;;^UTILITY(U,$J,358.3,4334,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4334,1,3,0)
 ;;=3^Acute Upper Respiratory Infection
 ;;^UTILITY(U,$J,358.3,4334,1,4,0)
 ;;=4^J06.9
 ;;^UTILITY(U,$J,358.3,4334,2)
 ;;=^5008143
 ;;^UTILITY(U,$J,358.3,4335,0)
 ;;=J20.9^^32^263^3
 ;;^UTILITY(U,$J,358.3,4335,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4335,1,3,0)
 ;;=3^Acute Bronchitis
 ;;^UTILITY(U,$J,358.3,4335,1,4,0)
 ;;=4^J20.9
 ;;^UTILITY(U,$J,358.3,4335,2)
 ;;=^5008195
 ;;^UTILITY(U,$J,358.3,4336,0)
 ;;=J44.1^^32^263^10
 ;;^UTILITY(U,$J,358.3,4336,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4336,1,3,0)
 ;;=3^COPD w/ Acute Exacerbation
 ;;^UTILITY(U,$J,358.3,4336,1,4,0)
 ;;=4^J44.1
 ;;^UTILITY(U,$J,358.3,4336,2)
 ;;=^5008240
 ;;^UTILITY(U,$J,358.3,4337,0)
 ;;=E11.65^^32^263^38
 ;;^UTILITY(U,$J,358.3,4337,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4337,1,3,0)
 ;;=3^Type 2 DM w/ Hyperglycemia
 ;;^UTILITY(U,$J,358.3,4337,1,4,0)
 ;;=4^E11.65
 ;;^UTILITY(U,$J,358.3,4337,2)
 ;;=^5002663
 ;;^UTILITY(U,$J,358.3,4338,0)
 ;;=L03.119^^32^263^11
 ;;^UTILITY(U,$J,358.3,4338,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4338,1,3,0)
 ;;=3^Cellulitis of Limb,Unspec Part
 ;;^UTILITY(U,$J,358.3,4338,1,4,0)
 ;;=4^L03.119
 ;;^UTILITY(U,$J,358.3,4338,2)
 ;;=^5009036
 ;;^UTILITY(U,$J,358.3,4339,0)
 ;;=R50.9^^32^263^16
 ;;^UTILITY(U,$J,358.3,4339,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4339,1,3,0)
 ;;=3^Fever
 ;;^UTILITY(U,$J,358.3,4339,1,4,0)
 ;;=4^R50.9
 ;;^UTILITY(U,$J,358.3,4339,2)
 ;;=^5019512
 ;;^UTILITY(U,$J,358.3,4340,0)
 ;;=A41.9^^32^263^36
 ;;^UTILITY(U,$J,358.3,4340,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4340,1,3,0)
 ;;=3^Sepsis
 ;;^UTILITY(U,$J,358.3,4340,1,4,0)
 ;;=4^A41.9
 ;;^UTILITY(U,$J,358.3,4340,2)
 ;;=^5000214
 ;;^UTILITY(U,$J,358.3,4341,0)
 ;;=N39.0^^32^263^39
 ;;^UTILITY(U,$J,358.3,4341,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4341,1,3,0)
 ;;=3^UTI
 ;;^UTILITY(U,$J,358.3,4341,1,4,0)
 ;;=4^N39.0
 ;;^UTILITY(U,$J,358.3,4341,2)
 ;;=^124436
 ;;^UTILITY(U,$J,358.3,4342,0)
 ;;=N17.9^^32^263^4
 ;;^UTILITY(U,$J,358.3,4342,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4342,1,3,0)
 ;;=3^Acute Kidney Failure
 ;;^UTILITY(U,$J,358.3,4342,1,4,0)
 ;;=4^N17.9
 ;;^UTILITY(U,$J,358.3,4342,2)
 ;;=^338532
 ;;^UTILITY(U,$J,358.3,4343,0)
 ;;=E86.0^^32^263^13
 ;;^UTILITY(U,$J,358.3,4343,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4343,1,3,0)
 ;;=3^Dehydration
 ;;^UTILITY(U,$J,358.3,4343,1,4,0)
 ;;=4^E86.0
 ;;^UTILITY(U,$J,358.3,4343,2)
 ;;=^332743
 ;;^UTILITY(U,$J,358.3,4344,0)
 ;;=R10.9^^32^263^1
 ;;^UTILITY(U,$J,358.3,4344,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4344,1,3,0)
 ;;=3^Abdominal Pain
 ;;^UTILITY(U,$J,358.3,4344,1,4,0)
 ;;=4^R10.9
 ;;^UTILITY(U,$J,358.3,4344,2)
 ;;=^5019230
 ;;^UTILITY(U,$J,358.3,4345,0)
 ;;=R11.2^^32^263^29
 ;;^UTILITY(U,$J,358.3,4345,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4345,1,3,0)
 ;;=3^Nausea w/ Vomiting
 ;;^UTILITY(U,$J,358.3,4345,1,4,0)
 ;;=4^R11.2
 ;;^UTILITY(U,$J,358.3,4345,2)
 ;;=^5019237
 ;;^UTILITY(U,$J,358.3,4346,0)
 ;;=K52.9^^32^263^19
 ;;^UTILITY(U,$J,358.3,4346,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4346,1,3,0)
 ;;=3^Gastroenteritis and Colitis,Noninfectious
 ;;^UTILITY(U,$J,358.3,4346,1,4,0)
 ;;=4^K52.9
 ;;^UTILITY(U,$J,358.3,4346,2)
 ;;=^5008704
 ;;^UTILITY(U,$J,358.3,4347,0)
 ;;=A09.^^32^263^18
 ;;^UTILITY(U,$J,358.3,4347,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4347,1,3,0)
 ;;=3^Gastroenteritis and Colitis,Infectious
 ;;^UTILITY(U,$J,358.3,4347,1,4,0)
 ;;=4^A09.
 ;;^UTILITY(U,$J,358.3,4347,2)
 ;;=^5000061
 ;;^UTILITY(U,$J,358.3,4348,0)
 ;;=R19.7^^32^263^14
 ;;^UTILITY(U,$J,358.3,4348,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4348,1,3,0)
 ;;=3^Diarrhea
 ;;^UTILITY(U,$J,358.3,4348,1,4,0)
 ;;=4^R19.7
 ;;^UTILITY(U,$J,358.3,4348,2)
 ;;=^5019276
 ;;^UTILITY(U,$J,358.3,4349,0)
 ;;=E87.70^^32^263^17
 ;;^UTILITY(U,$J,358.3,4349,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4349,1,3,0)
 ;;=3^Fluid Overload
 ;;^UTILITY(U,$J,358.3,4349,1,4,0)
 ;;=4^E87.70
 ;;^UTILITY(U,$J,358.3,4349,2)
 ;;=^5003023
 ;;^UTILITY(U,$J,358.3,4350,0)
 ;;=R60.0^^32^263^25
 ;;^UTILITY(U,$J,358.3,4350,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4350,1,3,0)
 ;;=3^Localized Edema
 ;;^UTILITY(U,$J,358.3,4350,1,4,0)
 ;;=4^R60.0
 ;;^UTILITY(U,$J,358.3,4350,2)
 ;;=^5019532
 ;;^UTILITY(U,$J,358.3,4351,0)
 ;;=N18.6^^32^263^15
 ;;^UTILITY(U,$J,358.3,4351,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4351,1,3,0)
 ;;=3^ESRD
 ;;^UTILITY(U,$J,358.3,4351,1,4,0)
 ;;=4^N18.6
 ;;^UTILITY(U,$J,358.3,4351,2)
 ;;=^303986
 ;;^UTILITY(U,$J,358.3,4352,0)
 ;;=D64.9^^32^263^8
 ;;^UTILITY(U,$J,358.3,4352,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4352,1,3,0)
 ;;=3^Anemia
 ;;^UTILITY(U,$J,358.3,4352,1,4,0)
 ;;=4^D64.9
 ;;^UTILITY(U,$J,358.3,4352,2)
 ;;=^5002351
 ;;^UTILITY(U,$J,358.3,4353,0)
 ;;=F10.129^^32^263^7
 ;;^UTILITY(U,$J,358.3,4353,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4353,1,3,0)
 ;;=3^Alcohol Abuse w/ Intoxication
 ;;^UTILITY(U,$J,358.3,4353,1,4,0)
 ;;=4^F10.129
 ;;^UTILITY(U,$J,358.3,4353,2)
 ;;=^5003071
 ;;^UTILITY(U,$J,358.3,4354,0)
 ;;=F11.20^^32^263^30
 ;;^UTILITY(U,$J,358.3,4354,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4354,1,3,0)
 ;;=3^Opioid Dependence
 ;;^UTILITY(U,$J,358.3,4354,1,4,0)
 ;;=4^F11.20
 ;;^UTILITY(U,$J,358.3,4354,2)
 ;;=^5003127
 ;;^UTILITY(U,$J,358.3,4355,0)
 ;;=R21.^^32^263^35
 ;;^UTILITY(U,$J,358.3,4355,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4355,1,3,0)
 ;;=3^Rash/Oth Nonspecific Skin Eruption
 ;;^UTILITY(U,$J,358.3,4355,1,4,0)
 ;;=4^R21.
 ;;^UTILITY(U,$J,358.3,4355,2)
 ;;=^5019283
 ;;^UTILITY(U,$J,358.3,4356,0)
 ;;=R54.^^32^263^6
 ;;^UTILITY(U,$J,358.3,4356,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4356,1,3,0)
 ;;=3^Age-Related Physical Debility
 ;;^UTILITY(U,$J,358.3,4356,1,4,0)
 ;;=4^R54.
 ;;^UTILITY(U,$J,358.3,4356,2)
 ;;=^5019521
 ;;^UTILITY(U,$J,358.3,4357,0)
 ;;=Z78.9^^32^263^37
 ;;^UTILITY(U,$J,358.3,4357,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4357,1,3,0)
 ;;=3^Triaged to PCC
 ;;^UTILITY(U,$J,358.3,4357,1,4,0)
 ;;=4^Z78.9
 ;;^UTILITY(U,$J,358.3,4357,2)
 ;;=^5063329
 ;;^UTILITY(U,$J,358.3,4358,0)
 ;;=Z53.21^^32^263^34
 ;;^UTILITY(U,$J,358.3,4358,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4358,1,3,0)
 ;;=3^Pt Leaving Prior to Being Seen by Provider
 ;;^UTILITY(U,$J,358.3,4358,1,4,0)
 ;;=4^Z53.21
 ;;^UTILITY(U,$J,358.3,4358,2)
 ;;=^5063096
 ;;^UTILITY(U,$J,358.3,4359,0)
 ;;=Z76.0^^32^263^33
 ;;^UTILITY(U,$J,358.3,4359,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4359,1,3,0)
 ;;=3^Prescription Refill
 ;;^UTILITY(U,$J,358.3,4359,1,4,0)
 ;;=4^Z76.0
 ;;^UTILITY(U,$J,358.3,4359,2)
 ;;=^5063297
 ;;^UTILITY(U,$J,358.3,4360,0)
 ;;=R69.^^32^263^24
 ;;^UTILITY(U,$J,358.3,4360,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4360,1,3,0)
 ;;=3^Illness,Unspec
 ;;^UTILITY(U,$J,358.3,4360,1,4,0)
 ;;=4^R69.
 ;;^UTILITY(U,$J,358.3,4360,2)
 ;;=^5019558
 ;;^UTILITY(U,$J,358.3,4361,0)
 ;;=D62.^^32^263^2
 ;;^UTILITY(U,$J,358.3,4361,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4361,1,3,0)
 ;;=3^Acute Blood Loss Anemia
 ;;^UTILITY(U,$J,358.3,4361,1,4,0)
 ;;=4^D62.
 ;;^UTILITY(U,$J,358.3,4361,2)
 ;;=^267986
 ;;^UTILITY(U,$J,358.3,4362,0)
 ;;=Z59.00^^32^263^23
 ;;^UTILITY(U,$J,358.3,4362,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4362,1,3,0)
 ;;=3^Homelessness,Unspec
 ;;^UTILITY(U,$J,358.3,4362,1,4,0)
 ;;=4^Z59.00
 ;;^UTILITY(U,$J,358.3,4362,2)
 ;;=^5161304
 ;;^UTILITY(U,$J,358.3,4363,0)
 ;;=Z59.01^^32^263^21
 ;;^UTILITY(U,$J,358.3,4363,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4363,1,3,0)
 ;;=3^Homelessness,Sheltered
 ;;^UTILITY(U,$J,358.3,4363,1,4,0)
 ;;=4^Z59.01
 ;;^UTILITY(U,$J,358.3,4363,2)
 ;;=^5161305
 ;;^UTILITY(U,$J,358.3,4364,0)
 ;;=Z59.02^^32^263^22
 ;;^UTILITY(U,$J,358.3,4364,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4364,1,3,0)
 ;;=3^Homelessness,Unsheltered
 ;;^UTILITY(U,$J,358.3,4364,1,4,0)
 ;;=4^Z59.02
 ;;^UTILITY(U,$J,358.3,4364,2)
 ;;=^5161306
 ;;^UTILITY(U,$J,358.3,4365,0)
 ;;=M54.50^^32^263^27
 ;;^UTILITY(U,$J,358.3,4365,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4365,1,3,0)
 ;;=3^Low Back Pain,Unspec
 ;;^UTILITY(U,$J,358.3,4365,1,4,0)
 ;;=4^M54.50
 ;;^UTILITY(U,$J,358.3,4365,2)
 ;;=^5161215
 ;;^UTILITY(U,$J,358.3,4366,0)
 ;;=M54.51^^32^263^28
 ;;^UTILITY(U,$J,358.3,4366,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4366,1,3,0)
 ;;=3^Low Back Pain,Vertebrogenic
 ;;^UTILITY(U,$J,358.3,4366,1,4,0)
 ;;=4^M54.51
 ;;^UTILITY(U,$J,358.3,4366,2)
 ;;=^5161216
 ;;^UTILITY(U,$J,358.3,4367,0)
 ;;=M54.59^^32^263^26
 ;;^UTILITY(U,$J,358.3,4367,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4367,1,3,0)
 ;;=3^Low Back Pain,Other
 ;;^UTILITY(U,$J,358.3,4367,1,4,0)
 ;;=4^M54.59
 ;;^UTILITY(U,$J,358.3,4367,2)
 ;;=^5161217
 ;;^UTILITY(U,$J,358.3,4368,0)
 ;;=Z51.81^^32^264^20
 ;;^UTILITY(U,$J,358.3,4368,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4368,1,3,0)
 ;;=3^Drug Level Monitoring
 ;;^UTILITY(U,$J,358.3,4368,1,4,0)
 ;;=4^Z51.81
 ;;^UTILITY(U,$J,358.3,4368,2)
 ;;=^5063064
 ;;^UTILITY(U,$J,358.3,4369,0)
 ;;=Z02.79^^32^264^10
 ;;^UTILITY(U,$J,358.3,4369,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4369,1,3,0)
 ;;=3^Issue of Medical Certificate NEC
 ;;^UTILITY(U,$J,358.3,4369,1,4,0)
 ;;=4^Z02.79
 ;;^UTILITY(U,$J,358.3,4369,2)
 ;;=^5062641
 ;;^UTILITY(U,$J,358.3,4370,0)
 ;;=Z04.9^^32^264^9
 ;;^UTILITY(U,$J,358.3,4370,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4370,1,3,0)
 ;;=3^Exam & Observation for Unsp Reason
 ;;^UTILITY(U,$J,358.3,4370,1,4,0)
 ;;=4^Z04.9
 ;;^UTILITY(U,$J,358.3,4370,2)
 ;;=^5062666
 ;;^UTILITY(U,$J,358.3,4371,0)
 ;;=Z02.2^^32^264^11
 ;;^UTILITY(U,$J,358.3,4371,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4371,1,3,0)
 ;;=3^Exam for Admission to Residential Institution
 ;;^UTILITY(U,$J,358.3,4371,1,4,0)
 ;;=4^Z02.2
 ;;^UTILITY(U,$J,358.3,4371,2)
 ;;=^5062635
 ;;^UTILITY(U,$J,358.3,4372,0)
 ;;=Z02.89^^32^264^8
 ;;^UTILITY(U,$J,358.3,4372,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4372,1,3,0)
 ;;=3^Admin Exam NEC
 ;;^UTILITY(U,$J,358.3,4372,1,4,0)
 ;;=4^Z02.89
 ;;^UTILITY(U,$J,358.3,4372,2)
 ;;=^5062645
 ;;^UTILITY(U,$J,358.3,4373,0)
 ;;=Z71.0^^32^264^13
 ;;^UTILITY(U,$J,358.3,4373,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4373,1,3,0)
 ;;=3^Hlth Service to Consult on Behalf of Another
 ;;^UTILITY(U,$J,358.3,4373,1,4,0)
 ;;=4^Z71.0
 ;;^UTILITY(U,$J,358.3,4373,2)
 ;;=^5063242
 ;;^UTILITY(U,$J,358.3,4374,0)
 ;;=Z53.21^^32^264^17
 ;;^UTILITY(U,$J,358.3,4374,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4374,1,3,0)
 ;;=3^Pt Leaving Prior to Being Seen by Provider
 ;;^UTILITY(U,$J,358.3,4374,1,4,0)
 ;;=4^Z53.21
 ;;^UTILITY(U,$J,358.3,4374,2)
 ;;=^5063096
 ;;^UTILITY(U,$J,358.3,4375,0)
 ;;=Z11.1^^32^264^4
 ;;^UTILITY(U,$J,358.3,4375,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4375,1,3,0)
 ;;=3^Screening/Reading TB Test
 ;;^UTILITY(U,$J,358.3,4375,1,4,0)
 ;;=4^Z11.1
 ;;^UTILITY(U,$J,358.3,4375,2)
 ;;=^5062670
 ;;^UTILITY(U,$J,358.3,4376,0)
 ;;=Z48.02^^32^264^5
 ;;^UTILITY(U,$J,358.3,4376,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4376,1,3,0)
 ;;=3^Removal of Sutures/Staples
 ;;^UTILITY(U,$J,358.3,4376,1,4,0)
 ;;=4^Z48.02
 ;;^UTILITY(U,$J,358.3,4376,2)
 ;;=^5063035
 ;;^UTILITY(U,$J,358.3,4377,0)
 ;;=Z46.6^^32^264^6
 ;;^UTILITY(U,$J,358.3,4377,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4377,1,3,0)
 ;;=3^Fitting/Adjusting Urinary Device
 ;;^UTILITY(U,$J,358.3,4377,1,4,0)
 ;;=4^Z46.6
 ;;^UTILITY(U,$J,358.3,4377,2)
 ;;=^5063020
 ;;^UTILITY(U,$J,358.3,4378,0)
 ;;=Z09.^^32^264^7
 ;;^UTILITY(U,$J,358.3,4378,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4378,1,3,0)
 ;;=3^F/U Exam after Completed Treatment
 ;;^UTILITY(U,$J,358.3,4378,1,4,0)
 ;;=4^Z09.
 ;;^UTILITY(U,$J,358.3,4378,2)
 ;;=^5062668
 ;;^UTILITY(U,$J,358.3,4379,0)
 ;;=Z04.6^^32^264^12
 ;;^UTILITY(U,$J,358.3,4379,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4379,1,3,0)
 ;;=3^General Psych Exam,Requested Authority
 ;;^UTILITY(U,$J,358.3,4379,1,4,0)
 ;;=4^Z04.6
 ;;^UTILITY(U,$J,358.3,4379,2)
 ;;=^5062662
 ;;^UTILITY(U,$J,358.3,4380,0)
 ;;=Z91.14^^32^264^14
 ;;^UTILITY(U,$J,358.3,4380,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4380,1,3,0)
 ;;=3^Patient's Noncompliance w/ Medical Treatment
 ;;^UTILITY(U,$J,358.3,4380,1,4,0)
 ;;=4^Z91.14
 ;;^UTILITY(U,$J,358.3,4380,2)
 ;;=^5063616
 ;;^UTILITY(U,$J,358.3,4381,0)
 ;;=Z76.5^^32^264^16
 ;;^UTILITY(U,$J,358.3,4381,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4381,1,3,0)
 ;;=3^Malingerer
 ;;^UTILITY(U,$J,358.3,4381,1,4,0)
 ;;=4^Z76.5
 ;;^UTILITY(U,$J,358.3,4381,2)
 ;;=^5063302
 ;;^UTILITY(U,$J,358.3,4382,0)
 ;;=Z23.^^32^264^18
 ;;^UTILITY(U,$J,358.3,4382,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4382,1,3,0)
 ;;=3^Immunization
 ;;^UTILITY(U,$J,358.3,4382,1,4,0)
 ;;=4^Z23.
 ;;^UTILITY(U,$J,358.3,4382,2)
 ;;=^5062795
 ;;^UTILITY(U,$J,358.3,4383,0)
 ;;=Z03.6^^32^264^15
 ;;^UTILITY(U,$J,358.3,4383,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4383,1,3,0)
 ;;=3^Observation for Suspected Toxic Effect From Ingested Subs Ruled-Out
 ;;^UTILITY(U,$J,358.3,4383,1,4,0)
 ;;=4^Z03.6
 ;;^UTILITY(U,$J,358.3,4383,2)
 ;;=^5062647
 ;;^UTILITY(U,$J,358.3,4384,0)
 ;;=Z03.89^^32^264^19
 ;;^UTILITY(U,$J,358.3,4384,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4384,1,3,0)
 ;;=3^Suspected Diseases and Conditions Ruled Out
 ;;^UTILITY(U,$J,358.3,4384,1,4,0)
 ;;=4^Z03.89
 ;;^UTILITY(U,$J,358.3,4384,2)
 ;;=^5062656
 ;;^UTILITY(U,$J,358.3,4385,0)
 ;;=Z59.00^^32^264^3
 ;;^UTILITY(U,$J,358.3,4385,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4385,1,3,0)
 ;;=3^Homelessness,Unspec
 ;;^UTILITY(U,$J,358.3,4385,1,4,0)
 ;;=4^Z59.00
 ;;^UTILITY(U,$J,358.3,4385,2)
 ;;=^5161304
 ;;^UTILITY(U,$J,358.3,4386,0)
 ;;=Z59.01^^32^264^1
 ;;^UTILITY(U,$J,358.3,4386,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4386,1,3,0)
 ;;=3^Homelessness,Sheltered
 ;;^UTILITY(U,$J,358.3,4386,1,4,0)
 ;;=4^Z59.01
 ;;^UTILITY(U,$J,358.3,4386,2)
 ;;=^5161305
 ;;^UTILITY(U,$J,358.3,4387,0)
 ;;=Z59.02^^32^264^2
 ;;^UTILITY(U,$J,358.3,4387,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4387,1,3,0)
 ;;=3^Homelessness,Unsheltered
 ;;^UTILITY(U,$J,358.3,4387,1,4,0)
 ;;=4^Z59.02
 ;;^UTILITY(U,$J,358.3,4387,2)
 ;;=^5161306
 ;;^UTILITY(U,$J,358.3,4388,0)
 ;;=Z71.85^^32^264^21
 ;;^UTILITY(U,$J,358.3,4388,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4388,1,3,0)
 ;;=3^Counseling,Immunization Safety
 ;;^UTILITY(U,$J,358.3,4388,1,4,0)
 ;;=4^Z71.85
 ;;^UTILITY(U,$J,358.3,4388,2)
 ;;=^5161315
 ;;^UTILITY(U,$J,358.3,4389,0)
 ;;=I10.^^32^265^14
 ;;^UTILITY(U,$J,358.3,4389,1,0)
 ;;=^358.31IA^4^2
 ;;^UTILITY(U,$J,358.3,4389,1,3,0)
 ;;=3^Hypertension,Essential
 ;;^UTILITY(U,$J,358.3,4389,1,4,0)
 ;;=4^I10.
 ;;^UTILITY(U,$J,358.3,4389,2)
 ;;=^5007062