IBDEI02M ; ; 28-OCT-2020
;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
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,5808,0)
;;=R20.2^^47^371^17
;;^UTILITY(U,$J,358.3,5808,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5808,1,3,0)
;;=3^Paresthesia of Skin
;;^UTILITY(U,$J,358.3,5808,1,4,0)
;;=4^R20.2
;;^UTILITY(U,$J,358.3,5808,2)
;;=^5019280
;;^UTILITY(U,$J,358.3,5809,0)
;;=R26.89^^47^371^7
;;^UTILITY(U,$J,358.3,5809,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5809,1,3,0)
;;=3^Gait/Mobility Abnormalities
;;^UTILITY(U,$J,358.3,5809,1,4,0)
;;=4^R26.89
;;^UTILITY(U,$J,358.3,5809,2)
;;=^5019308
;;^UTILITY(U,$J,358.3,5810,0)
;;=R42.^^47^371^5
;;^UTILITY(U,$J,358.3,5810,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5810,1,3,0)
;;=3^Dizziness and Giddiness
;;^UTILITY(U,$J,358.3,5810,1,4,0)
;;=4^R42.
;;^UTILITY(U,$J,358.3,5810,2)
;;=^5019450
;;^UTILITY(U,$J,358.3,5811,0)
;;=R45.4^^47^371^10
;;^UTILITY(U,$J,358.3,5811,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5811,1,3,0)
;;=3^Irritability and Anger
;;^UTILITY(U,$J,358.3,5811,1,4,0)
;;=4^R45.4
;;^UTILITY(U,$J,358.3,5811,2)
;;=^5019465
;;^UTILITY(U,$J,358.3,5812,0)
;;=R45.851^^47^371^23
;;^UTILITY(U,$J,358.3,5812,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5812,1,3,0)
;;=3^Suicidal Ideations
;;^UTILITY(U,$J,358.3,5812,1,4,0)
;;=4^R45.851
;;^UTILITY(U,$J,358.3,5812,2)
;;=^5019474
;;^UTILITY(U,$J,358.3,5813,0)
;;=R52.^^47^371^16
;;^UTILITY(U,$J,358.3,5813,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5813,1,3,0)
;;=3^Pain,Unspec
;;^UTILITY(U,$J,358.3,5813,1,4,0)
;;=4^R52.
;;^UTILITY(U,$J,358.3,5813,2)
;;=^5019514
;;^UTILITY(U,$J,358.3,5814,0)
;;=R53.82^^47^371^4
;;^UTILITY(U,$J,358.3,5814,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5814,1,3,0)
;;=3^Chronic Fatigue,Unspec
;;^UTILITY(U,$J,358.3,5814,1,4,0)
;;=4^R53.82
;;^UTILITY(U,$J,358.3,5814,2)
;;=^5019519
;;^UTILITY(U,$J,358.3,5815,0)
;;=R68.84^^47^371^11
;;^UTILITY(U,$J,358.3,5815,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5815,1,3,0)
;;=3^Jaw Pain
;;^UTILITY(U,$J,358.3,5815,1,4,0)
;;=4^R68.84
;;^UTILITY(U,$J,358.3,5815,2)
;;=^5019556
;;^UTILITY(U,$J,358.3,5816,0)
;;=R51.0^^47^371^8
;;^UTILITY(U,$J,358.3,5816,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5816,1,3,0)
;;=3^Headache w/ Orthostatic Component,NEC
;;^UTILITY(U,$J,358.3,5816,1,4,0)
;;=4^R51.0
;;^UTILITY(U,$J,358.3,5816,2)
;;=^5159305
;;^UTILITY(U,$J,358.3,5817,0)
;;=R51.9^^47^371^9
;;^UTILITY(U,$J,358.3,5817,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5817,1,3,0)
;;=3^Headache,Unspecified
;;^UTILITY(U,$J,358.3,5817,1,4,0)
;;=4^R51.9
;;^UTILITY(U,$J,358.3,5817,2)
;;=^5159306
;;^UTILITY(U,$J,358.3,5818,0)
;;=F10.10^^47^372^2
;;^UTILITY(U,$J,358.3,5818,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5818,1,3,0)
;;=3^Alcohol Abuse,Mild,Uncomplicated
;;^UTILITY(U,$J,358.3,5818,1,4,0)
;;=4^F10.10
;;^UTILITY(U,$J,358.3,5818,2)
;;=^5003068
;;^UTILITY(U,$J,358.3,5819,0)
;;=F10.14^^47^372^8
;;^UTILITY(U,$J,358.3,5819,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5819,1,3,0)
;;=3^Alcohol Induced Mood D/O w/ Mild Use D/O
;;^UTILITY(U,$J,358.3,5819,1,4,0)
;;=4^F10.14
;;^UTILITY(U,$J,358.3,5819,2)
;;=^5003072
;;^UTILITY(U,$J,358.3,5820,0)
;;=F10.20^^47^372^7
;;^UTILITY(U,$J,358.3,5820,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5820,1,3,0)
;;=3^Alcohol Dependence,Mod/Sev,Uncomplicated
;;^UTILITY(U,$J,358.3,5820,1,4,0)
;;=4^F10.20
;;^UTILITY(U,$J,358.3,5820,2)
;;=^5003081
;;^UTILITY(U,$J,358.3,5821,0)
;;=F10.230^^47^372^5
;;^UTILITY(U,$J,358.3,5821,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5821,1,3,0)
;;=3^Alcohol Dependence,Mod/Sev w/ Withdrawal,Uncomplicated
;;^UTILITY(U,$J,358.3,5821,1,4,0)
;;=4^F10.230
;;^UTILITY(U,$J,358.3,5821,2)
;;=^5003086
;;^UTILITY(U,$J,358.3,5822,0)
;;=F10.239^^47^372^6
;;^UTILITY(U,$J,358.3,5822,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5822,1,3,0)
;;=3^Alcohol Dependence,Mod/Sev w/ Withdrawal,Unspec
;;^UTILITY(U,$J,358.3,5822,1,4,0)
;;=4^F10.239
;;^UTILITY(U,$J,358.3,5822,2)
;;=^5003089
;;^UTILITY(U,$J,358.3,5823,0)
;;=F10.24^^47^372^3
;;^UTILITY(U,$J,358.3,5823,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5823,1,3,0)
;;=3^Alcohol Dependence,Mod/Sev w/ Alcohol-Induced Mood D/O
;;^UTILITY(U,$J,358.3,5823,1,4,0)
;;=4^F10.24
;;^UTILITY(U,$J,358.3,5823,2)
;;=^5003090
;;^UTILITY(U,$J,358.3,5824,0)
;;=F10.288^^47^372^4
;;^UTILITY(U,$J,358.3,5824,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5824,1,3,0)
;;=3^Alcohol Dependence,Mod/Sev w/ Oth Alcohol-Induced D/O
;;^UTILITY(U,$J,358.3,5824,1,4,0)
;;=4^F10.288
;;^UTILITY(U,$J,358.3,5824,2)
;;=^5003099
;;^UTILITY(U,$J,358.3,5825,0)
;;=F10.94^^47^372^9
;;^UTILITY(U,$J,358.3,5825,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5825,1,3,0)
;;=3^Alcohol Induced Mood D/O w/ Unspec Alcohol Use
;;^UTILITY(U,$J,358.3,5825,1,4,0)
;;=4^F10.94
;;^UTILITY(U,$J,358.3,5825,2)
;;=^5003104
;;^UTILITY(U,$J,358.3,5826,0)
;;=F11.20^^47^372^16
;;^UTILITY(U,$J,358.3,5826,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5826,1,3,0)
;;=3^Opioid Dependence,Mod/Sev,Uncomplicated
;;^UTILITY(U,$J,358.3,5826,1,4,0)
;;=4^F11.20
;;^UTILITY(U,$J,358.3,5826,2)
;;=^5003127
;;^UTILITY(U,$J,358.3,5827,0)
;;=F12.20^^47^372^10
;;^UTILITY(U,$J,358.3,5827,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5827,1,3,0)
;;=3^Cannabis Dependence,Mod/Sev,Uncomplicated
;;^UTILITY(U,$J,358.3,5827,1,4,0)
;;=4^F12.20
;;^UTILITY(U,$J,358.3,5827,2)
;;=^5003166
;;^UTILITY(U,$J,358.3,5828,0)
;;=F14.188^^47^372^11
;;^UTILITY(U,$J,358.3,5828,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5828,1,3,0)
;;=3^Cocaine Abuse,Mild w/ Oth Cocaine-Induced D/O
;;^UTILITY(U,$J,358.3,5828,1,4,0)
;;=4^F14.188
;;^UTILITY(U,$J,358.3,5828,2)
;;=^5003251
;;^UTILITY(U,$J,358.3,5829,0)
;;=F14.20^^47^372^12
;;^UTILITY(U,$J,358.3,5829,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5829,1,3,0)
;;=3^Cocaine Dependence,Mod/Sev,Uncomplicated
;;^UTILITY(U,$J,358.3,5829,1,4,0)
;;=4^F14.20
;;^UTILITY(U,$J,358.3,5829,2)
;;=^5003253
;;^UTILITY(U,$J,358.3,5830,0)
;;=F15.10^^47^372^21
;;^UTILITY(U,$J,358.3,5830,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5830,1,3,0)
;;=3^Stimulant Abuse,Mild,Uncomplicated,Oth
;;^UTILITY(U,$J,358.3,5830,1,4,0)
;;=4^F15.10
;;^UTILITY(U,$J,358.3,5830,2)
;;=^5003282
;;^UTILITY(U,$J,358.3,5831,0)
;;=F15.20^^47^372^22
;;^UTILITY(U,$J,358.3,5831,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5831,1,3,0)
;;=3^Stimulant Depend,Mod/Sev,Uncomplicated,Oth
;;^UTILITY(U,$J,358.3,5831,1,4,0)
;;=4^F15.20
;;^UTILITY(U,$J,358.3,5831,2)
;;=^5003295
;;^UTILITY(U,$J,358.3,5832,0)
;;=F17.210^^47^372^15
;;^UTILITY(U,$J,358.3,5832,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5832,1,3,0)
;;=3^Nicotine Dependence,Cigarettes,Uncomplicated
;;^UTILITY(U,$J,358.3,5832,1,4,0)
;;=4^F17.210
;;^UTILITY(U,$J,358.3,5832,2)
;;=^5003365
;;^UTILITY(U,$J,358.3,5833,0)
;;=F17.211^^47^372^14
;;^UTILITY(U,$J,358.3,5833,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5833,1,3,0)
;;=3^Nicotine Dependence,Cigarettes,In Remission
;;^UTILITY(U,$J,358.3,5833,1,4,0)
;;=4^F17.211
;;^UTILITY(U,$J,358.3,5833,2)
;;=^5003366
;;^UTILITY(U,$J,358.3,5834,0)
;;=F17.293^^47^372^13
;;^UTILITY(U,$J,358.3,5834,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5834,1,3,0)
;;=3^Nicotine Dependence w/ Withdrawal,Other Tobacco Product
;;^UTILITY(U,$J,358.3,5834,1,4,0)
;;=4^F17.293
;;^UTILITY(U,$J,358.3,5834,2)
;;=^5003377
;;^UTILITY(U,$J,358.3,5835,0)
;;=F19.10^^47^372^18
;;^UTILITY(U,$J,358.3,5835,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5835,1,3,0)
;;=3^Psychoactive Subs Abuse,Mild,Uncomplicated,Oth
;;^UTILITY(U,$J,358.3,5835,1,4,0)
;;=4^F19.10
;;^UTILITY(U,$J,358.3,5835,2)
;;=^5003416
;;^UTILITY(U,$J,358.3,5836,0)
;;=F19.20^^47^372^19
;;^UTILITY(U,$J,358.3,5836,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5836,1,3,0)
;;=3^Psychoactive Substance Dependence,Uncomplicated,Other
;;^UTILITY(U,$J,358.3,5836,1,4,0)
;;=4^F19.20
;;^UTILITY(U,$J,358.3,5836,2)
;;=^5003431
;;^UTILITY(U,$J,358.3,5837,0)
;;=F10.11^^47^372^1
;;^UTILITY(U,$J,358.3,5837,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5837,1,3,0)
;;=3^Alcohol Abuse,Mild,In Remission
;;^UTILITY(U,$J,358.3,5837,1,4,0)
;;=4^F10.11
;;^UTILITY(U,$J,358.3,5837,2)
;;=^268230
;;^UTILITY(U,$J,358.3,5838,0)
;;=F19.11^^47^372^17
;;^UTILITY(U,$J,358.3,5838,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5838,1,3,0)
;;=3^Psychoactive Subs Abuse,Mild,Oth,In Remission
;;^UTILITY(U,$J,358.3,5838,1,4,0)
;;=4^F19.11
;;^UTILITY(U,$J,358.3,5838,2)
;;=^5151306
;;^UTILITY(U,$J,358.3,5839,0)
;;=F15.11^^47^372^20
;;^UTILITY(U,$J,358.3,5839,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5839,1,3,0)
;;=3^Stimulant Abuse,Mild,Oth,In Remission
;;^UTILITY(U,$J,358.3,5839,1,4,0)
;;=4^F15.11
;;^UTILITY(U,$J,358.3,5839,2)
;;=^5151304
;;^UTILITY(U,$J,358.3,5840,0)
;;=E66.01^^47^373^27
;;^UTILITY(U,$J,358.3,5840,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5840,1,3,0)
;;=3^Morbid Obesity
;;^UTILITY(U,$J,358.3,5840,1,4,0)
;;=4^E66.01
;;^UTILITY(U,$J,358.3,5840,2)
;;=^5002826
;;^UTILITY(U,$J,358.3,5841,0)
;;=E66.9^^47^373^28
;;^UTILITY(U,$J,358.3,5841,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5841,1,3,0)
;;=3^Obesity,Unspec
;;^UTILITY(U,$J,358.3,5841,1,4,0)
;;=4^E66.9
;;^UTILITY(U,$J,358.3,5841,2)
;;=^5002832
;;^UTILITY(U,$J,358.3,5842,0)
;;=E66.3^^47^373^29
;;^UTILITY(U,$J,358.3,5842,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5842,1,3,0)
;;=3^Overweight
;;^UTILITY(U,$J,358.3,5842,1,4,0)
;;=4^E66.3
;;^UTILITY(U,$J,358.3,5842,2)
;;=^5002830
;;^UTILITY(U,$J,358.3,5843,0)
;;=Z68.20^^47^373^1
;;^UTILITY(U,$J,358.3,5843,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5843,1,3,0)
;;=3^BMI 20.0-20.9
;;^UTILITY(U,$J,358.3,5843,1,4,0)
;;=4^Z68.20
;;^UTILITY(U,$J,358.3,5843,2)
;;=^5063199
;;^UTILITY(U,$J,358.3,5844,0)
;;=Z68.21^^47^373^2
;;^UTILITY(U,$J,358.3,5844,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5844,1,3,0)
;;=3^BMI 21.0-21.9
;;^UTILITY(U,$J,358.3,5844,1,4,0)
;;=4^Z68.21
;;^UTILITY(U,$J,358.3,5844,2)
;;=^5063200
;;^UTILITY(U,$J,358.3,5845,0)
;;=Z68.22^^47^373^3
;;^UTILITY(U,$J,358.3,5845,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5845,1,3,0)
;;=3^BMI 22.0-22.9
;;^UTILITY(U,$J,358.3,5845,1,4,0)
;;=4^Z68.22
;;^UTILITY(U,$J,358.3,5845,2)
;;=^5063201
;;^UTILITY(U,$J,358.3,5846,0)
;;=Z68.23^^47^373^4
;;^UTILITY(U,$J,358.3,5846,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5846,1,3,0)
;;=3^BMI 23.0-23.9
;;^UTILITY(U,$J,358.3,5846,1,4,0)
;;=4^Z68.23
;;^UTILITY(U,$J,358.3,5846,2)
;;=^5063202
;;^UTILITY(U,$J,358.3,5847,0)
;;=Z68.24^^47^373^5
;;^UTILITY(U,$J,358.3,5847,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5847,1,3,0)
;;=3^BMI 24.0-24.9
;;^UTILITY(U,$J,358.3,5847,1,4,0)
;;=4^Z68.24
;;^UTILITY(U,$J,358.3,5847,2)
;;=^5063203
;;^UTILITY(U,$J,358.3,5848,0)
;;=Z68.25^^47^373^6
;;^UTILITY(U,$J,358.3,5848,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5848,1,3,0)
;;=3^BMI 25.0-25.9
;;^UTILITY(U,$J,358.3,5848,1,4,0)
;;=4^Z68.25
;;^UTILITY(U,$J,358.3,5848,2)
;;=^5063204
;;^UTILITY(U,$J,358.3,5849,0)
;;=Z68.26^^47^373^7
;;^UTILITY(U,$J,358.3,5849,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5849,1,3,0)
;;=3^BMI 26.0-26.9
;;^UTILITY(U,$J,358.3,5849,1,4,0)
;;=4^Z68.26
;;^UTILITY(U,$J,358.3,5849,2)
;;=^5063205
;;^UTILITY(U,$J,358.3,5850,0)
;;=Z68.27^^47^373^8
;;^UTILITY(U,$J,358.3,5850,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5850,1,3,0)
;;=3^BMI 27.0-279
;;^UTILITY(U,$J,358.3,5850,1,4,0)
;;=4^Z68.27
;;^UTILITY(U,$J,358.3,5850,2)
;;=^5063206
;;^UTILITY(U,$J,358.3,5851,0)
;;=Z68.28^^47^373^9
;;^UTILITY(U,$J,358.3,5851,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5851,1,3,0)
;;=3^BMI 28.0-28.9
;;^UTILITY(U,$J,358.3,5851,1,4,0)
;;=4^Z68.28
;;^UTILITY(U,$J,358.3,5851,2)
;;=^5063207
;;^UTILITY(U,$J,358.3,5852,0)
;;=Z68.29^^47^373^10
;;^UTILITY(U,$J,358.3,5852,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5852,1,3,0)
;;=3^BMI 29.0-29.9
;;^UTILITY(U,$J,358.3,5852,1,4,0)
;;=4^Z68.29
;;^UTILITY(U,$J,358.3,5852,2)
;;=^5063208
;;^UTILITY(U,$J,358.3,5853,0)
;;=Z68.30^^47^373^11
;;^UTILITY(U,$J,358.3,5853,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5853,1,3,0)
;;=3^BMI 30.0-30.9
;;^UTILITY(U,$J,358.3,5853,1,4,0)
;;=4^Z68.30
;;^UTILITY(U,$J,358.3,5853,2)
;;=^5063209
;;^UTILITY(U,$J,358.3,5854,0)
;;=Z68.31^^47^373^12
;;^UTILITY(U,$J,358.3,5854,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5854,1,3,0)
;;=3^BMI 31.0-31.9
;;^UTILITY(U,$J,358.3,5854,1,4,0)
;;=4^Z68.31
;;^UTILITY(U,$J,358.3,5854,2)
;;=^5063210
;;^UTILITY(U,$J,358.3,5855,0)
;;=Z68.32^^47^373^13
;;^UTILITY(U,$J,358.3,5855,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5855,1,3,0)
;;=3^BMI 32.0-32.9
;;^UTILITY(U,$J,358.3,5855,1,4,0)
;;=4^Z68.32
;;^UTILITY(U,$J,358.3,5855,2)
;;=^5063211
;;^UTILITY(U,$J,358.3,5856,0)
;;=Z68.33^^47^373^14
;;^UTILITY(U,$J,358.3,5856,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5856,1,3,0)
;;=3^BMI 33.0-33.9
;;^UTILITY(U,$J,358.3,5856,1,4,0)
;;=4^Z68.33
;;^UTILITY(U,$J,358.3,5856,2)
;;=^5063212
;;^UTILITY(U,$J,358.3,5857,0)
;;=Z68.34^^47^373^15
;;^UTILITY(U,$J,358.3,5857,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5857,1,3,0)
;;=3^BMI 34.0-34.9
;;^UTILITY(U,$J,358.3,5857,1,4,0)
;;=4^Z68.34
;;^UTILITY(U,$J,358.3,5857,2)
;;=^5063213
;;^UTILITY(U,$J,358.3,5858,0)
;;=Z68.35^^47^373^16
;;^UTILITY(U,$J,358.3,5858,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5858,1,3,0)
;;=3^BMI 35.0-35.9
;;^UTILITY(U,$J,358.3,5858,1,4,0)
;;=4^Z68.35
;;^UTILITY(U,$J,358.3,5858,2)
;;=^5063214
;;^UTILITY(U,$J,358.3,5859,0)
;;=Z68.36^^47^373^17
;;^UTILITY(U,$J,358.3,5859,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5859,1,3,0)
;;=3^BMI 36.0-36.9
;;^UTILITY(U,$J,358.3,5859,1,4,0)
;;=4^Z68.36
;;^UTILITY(U,$J,358.3,5859,2)
;;=^5063215
;;^UTILITY(U,$J,358.3,5860,0)
;;=Z68.37^^47^373^18
;;^UTILITY(U,$J,358.3,5860,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5860,1,3,0)
;;=3^BMI 37.0-37.9
;;^UTILITY(U,$J,358.3,5860,1,4,0)
;;=4^Z68.37
;;^UTILITY(U,$J,358.3,5860,2)
;;=^5063216
;;^UTILITY(U,$J,358.3,5861,0)
;;=Z68.38^^47^373^19
;;^UTILITY(U,$J,358.3,5861,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5861,1,3,0)
;;=3^BMI 38.0-38.9
;;^UTILITY(U,$J,358.3,5861,1,4,0)
;;=4^Z68.38
;;^UTILITY(U,$J,358.3,5861,2)
;;=^5063217
;;^UTILITY(U,$J,358.3,5862,0)
;;=Z68.39^^47^373^20
;;^UTILITY(U,$J,358.3,5862,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5862,1,3,0)
;;=3^BMI 39.0-39.9
;;^UTILITY(U,$J,358.3,5862,1,4,0)
;;=4^Z68.39
;;^UTILITY(U,$J,358.3,5862,2)
;;=^5063218
;;^UTILITY(U,$J,358.3,5863,0)
;;=Z68.41^^47^373^21
;;^UTILITY(U,$J,358.3,5863,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5863,1,3,0)
;;=3^BMI 40.0-44.9
;;^UTILITY(U,$J,358.3,5863,1,4,0)
;;=4^Z68.41
;;^UTILITY(U,$J,358.3,5863,2)
;;=^5063219
;;^UTILITY(U,$J,358.3,5864,0)
;;=Z68.42^^47^373^22
;;^UTILITY(U,$J,358.3,5864,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5864,1,3,0)
;;=3^BMI 45.0-49.9
;;^UTILITY(U,$J,358.3,5864,1,4,0)
;;=4^Z68.42
;;^UTILITY(U,$J,358.3,5864,2)
;;=^5063220
;;^UTILITY(U,$J,358.3,5865,0)
;;=Z68.43^^47^373^23
;;^UTILITY(U,$J,358.3,5865,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5865,1,3,0)
;;=3^BMI 50.0-59.9
;;^UTILITY(U,$J,358.3,5865,1,4,0)
;;=4^Z68.43
;;^UTILITY(U,$J,358.3,5865,2)
;;=^5063221
;;^UTILITY(U,$J,358.3,5866,0)
;;=Z68.44^^47^373^24
;;^UTILITY(U,$J,358.3,5866,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5866,1,3,0)
;;=3^BMI 60.0-69.9
;;^UTILITY(U,$J,358.3,5866,1,4,0)
;;=4^Z68.44
;;^UTILITY(U,$J,358.3,5866,2)
;;=^5063222
;;^UTILITY(U,$J,358.3,5867,0)
;;=Z68.45^^47^373^25
;;^UTILITY(U,$J,358.3,5867,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5867,1,3,0)
;;=3^BMI 70 or Over
;;^UTILITY(U,$J,358.3,5867,1,4,0)
;;=4^Z68.45
;;^UTILITY(U,$J,358.3,5867,2)
;;=^5063223
;;^UTILITY(U,$J,358.3,5868,0)
;;=Z71.82^^47^373^26
;;^UTILITY(U,$J,358.3,5868,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5868,1,3,0)
;;=3^Exercise Counseling
;;^UTILITY(U,$J,358.3,5868,1,4,0)
;;=4^Z71.82
;;^UTILITY(U,$J,358.3,5868,2)
;;=^303466
;;^UTILITY(U,$J,358.3,5869,0)
;;=F20.3^^47^374^31
;;^UTILITY(U,$J,358.3,5869,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5869,1,3,0)
;;=3^Undifferentiated/Atypical Schizophrenia
;;^UTILITY(U,$J,358.3,5869,1,4,0)
;;=4^F20.3
;;^UTILITY(U,$J,358.3,5869,2)
;;=^5003472
;;^UTILITY(U,$J,358.3,5870,0)
;;=F20.9^^47^374^27
;;^UTILITY(U,$J,358.3,5870,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5870,1,3,0)
;;=3^Schizophrenia,Unspec
;;^UTILITY(U,$J,358.3,5870,1,4,0)
;;=4^F20.9
;;^UTILITY(U,$J,358.3,5870,2)
;;=^5003476
;;^UTILITY(U,$J,358.3,5871,0)
;;=F31.9^^47^374^6
;;^UTILITY(U,$J,358.3,5871,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5871,1,3,0)
;;=3^Bipolar Disorder,Unspec
;;^UTILITY(U,$J,358.3,5871,1,4,0)
;;=4^F31.9
;;^UTILITY(U,$J,358.3,5871,2)
;;=^331892
;;^UTILITY(U,$J,358.3,5872,0)
;;=F31.72^^47^374^7
;;^UTILITY(U,$J,358.3,5872,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5872,1,3,0)
;;=3^Bipolr Disorder,Full Remis,Most Recent Episode Hypomanic
;;^UTILITY(U,$J,358.3,5872,1,4,0)
;;=4^F31.72
;;^UTILITY(U,$J,358.3,5872,2)
;;=^5003512
;;^UTILITY(U,$J,358.3,5873,0)
;;=F31.71^^47^374^5
;;^UTILITY(U,$J,358.3,5873,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5873,1,3,0)
;;=3^Bipolar Disorder,Part Remis,Most Recent Episode Hypomanic
;;^UTILITY(U,$J,358.3,5873,1,4,0)
;;=4^F31.71
;;^UTILITY(U,$J,358.3,5873,2)
;;=^5003511
;;^UTILITY(U,$J,358.3,5874,0)
;;=F31.70^^47^374^4
;;^UTILITY(U,$J,358.3,5874,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5874,1,3,0)
;;=3^Bipolar Disorder,In Remis,Most Recent Episode Unspec
;;^UTILITY(U,$J,358.3,5874,1,4,0)
;;=4^F31.70
;;^UTILITY(U,$J,358.3,5874,2)
;;=^5003510
;;^UTILITY(U,$J,358.3,5875,0)
;;=F29.^^47^374^25
;;^UTILITY(U,$J,358.3,5875,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5875,1,3,0)
;;=3^Psychosis not d/t Substance/Known Physiol Cond,Unspec
;;^UTILITY(U,$J,358.3,5875,1,4,0)
;;=4^F29.
;;^UTILITY(U,$J,358.3,5875,2)
;;=^5003484
;;^UTILITY(U,$J,358.3,5876,0)
;;=F28.^^47^374^26
;;^UTILITY(U,$J,358.3,5876,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5876,1,3,0)
;;=3^Psychosis not d/t Substance/Known Physiol Cond NEC
;;^UTILITY(U,$J,358.3,5876,1,4,0)
;;=4^F28.
;;^UTILITY(U,$J,358.3,5876,2)
;;=^5003483
;;^UTILITY(U,$J,358.3,5877,0)
;;=F41.9^^47^374^3
;;^UTILITY(U,$J,358.3,5877,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5877,1,3,0)
;;=3^Anxiety Disorder,Unspec
;;^UTILITY(U,$J,358.3,5877,1,4,0)
;;=4^F41.9
;;^UTILITY(U,$J,358.3,5877,2)
;;=^5003567
;;^UTILITY(U,$J,358.3,5878,0)
;;=F45.0^^47^374^29
;;^UTILITY(U,$J,358.3,5878,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,5878,1,3,0)
;;=3^Somatization Disorder
;;^UTILITY(U,$J,358.3,5878,1,4,0)
;;=4^F45.0
;;^UTILITY(U,$J,358.3,5878,2)
;;=^112280
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI02M 19758 printed Jan 14, 2021@17:13:10 Page 2
IBDEI02M ; ; 28-OCT-2020
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;OCT 28, 2020
+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,5808,0)
+2 ;;=R20.2^^47^371^17
+3 ;;^UTILITY(U,$J,358.3,5808,1,0)
+4 ;;=^358.31IA^4^2
+5 ;;^UTILITY(U,$J,358.3,5808,1,3,0)
+6 ;;=3^Paresthesia of Skin
+7 ;;^UTILITY(U,$J,358.3,5808,1,4,0)
+8 ;;=4^R20.2
+9 ;;^UTILITY(U,$J,358.3,5808,2)
+10 ;;=^5019280
+11 ;;^UTILITY(U,$J,358.3,5809,0)
+12 ;;=R26.89^^47^371^7
+13 ;;^UTILITY(U,$J,358.3,5809,1,0)
+14 ;;=^358.31IA^4^2
+15 ;;^UTILITY(U,$J,358.3,5809,1,3,0)
+16 ;;=3^Gait/Mobility Abnormalities
+17 ;;^UTILITY(U,$J,358.3,5809,1,4,0)
+18 ;;=4^R26.89
+19 ;;^UTILITY(U,$J,358.3,5809,2)
+20 ;;=^5019308
+21 ;;^UTILITY(U,$J,358.3,5810,0)
+22 ;;=R42.^^47^371^5
+23 ;;^UTILITY(U,$J,358.3,5810,1,0)
+24 ;;=^358.31IA^4^2
+25 ;;^UTILITY(U,$J,358.3,5810,1,3,0)
+26 ;;=3^Dizziness and Giddiness
+27 ;;^UTILITY(U,$J,358.3,5810,1,4,0)
+28 ;;=4^R42.
+29 ;;^UTILITY(U,$J,358.3,5810,2)
+30 ;;=^5019450
+31 ;;^UTILITY(U,$J,358.3,5811,0)
+32 ;;=R45.4^^47^371^10
+33 ;;^UTILITY(U,$J,358.3,5811,1,0)
+34 ;;=^358.31IA^4^2
+35 ;;^UTILITY(U,$J,358.3,5811,1,3,0)
+36 ;;=3^Irritability and Anger
+37 ;;^UTILITY(U,$J,358.3,5811,1,4,0)
+38 ;;=4^R45.4
+39 ;;^UTILITY(U,$J,358.3,5811,2)
+40 ;;=^5019465
+41 ;;^UTILITY(U,$J,358.3,5812,0)
+42 ;;=R45.851^^47^371^23
+43 ;;^UTILITY(U,$J,358.3,5812,1,0)
+44 ;;=^358.31IA^4^2
+45 ;;^UTILITY(U,$J,358.3,5812,1,3,0)
+46 ;;=3^Suicidal Ideations
+47 ;;^UTILITY(U,$J,358.3,5812,1,4,0)
+48 ;;=4^R45.851
+49 ;;^UTILITY(U,$J,358.3,5812,2)
+50 ;;=^5019474
+51 ;;^UTILITY(U,$J,358.3,5813,0)
+52 ;;=R52.^^47^371^16
+53 ;;^UTILITY(U,$J,358.3,5813,1,0)
+54 ;;=^358.31IA^4^2
+55 ;;^UTILITY(U,$J,358.3,5813,1,3,0)
+56 ;;=3^Pain,Unspec
+57 ;;^UTILITY(U,$J,358.3,5813,1,4,0)
+58 ;;=4^R52.
+59 ;;^UTILITY(U,$J,358.3,5813,2)
+60 ;;=^5019514
+61 ;;^UTILITY(U,$J,358.3,5814,0)
+62 ;;=R53.82^^47^371^4
+63 ;;^UTILITY(U,$J,358.3,5814,1,0)
+64 ;;=^358.31IA^4^2
+65 ;;^UTILITY(U,$J,358.3,5814,1,3,0)
+66 ;;=3^Chronic Fatigue,Unspec
+67 ;;^UTILITY(U,$J,358.3,5814,1,4,0)
+68 ;;=4^R53.82
+69 ;;^UTILITY(U,$J,358.3,5814,2)
+70 ;;=^5019519
+71 ;;^UTILITY(U,$J,358.3,5815,0)
+72 ;;=R68.84^^47^371^11
+73 ;;^UTILITY(U,$J,358.3,5815,1,0)
+74 ;;=^358.31IA^4^2
+75 ;;^UTILITY(U,$J,358.3,5815,1,3,0)
+76 ;;=3^Jaw Pain
+77 ;;^UTILITY(U,$J,358.3,5815,1,4,0)
+78 ;;=4^R68.84
+79 ;;^UTILITY(U,$J,358.3,5815,2)
+80 ;;=^5019556
+81 ;;^UTILITY(U,$J,358.3,5816,0)
+82 ;;=R51.0^^47^371^8
+83 ;;^UTILITY(U,$J,358.3,5816,1,0)
+84 ;;=^358.31IA^4^2
+85 ;;^UTILITY(U,$J,358.3,5816,1,3,0)
+86 ;;=3^Headache w/ Orthostatic Component,NEC
+87 ;;^UTILITY(U,$J,358.3,5816,1,4,0)
+88 ;;=4^R51.0
+89 ;;^UTILITY(U,$J,358.3,5816,2)
+90 ;;=^5159305
+91 ;;^UTILITY(U,$J,358.3,5817,0)
+92 ;;=R51.9^^47^371^9
+93 ;;^UTILITY(U,$J,358.3,5817,1,0)
+94 ;;=^358.31IA^4^2
+95 ;;^UTILITY(U,$J,358.3,5817,1,3,0)
+96 ;;=3^Headache,Unspecified
+97 ;;^UTILITY(U,$J,358.3,5817,1,4,0)
+98 ;;=4^R51.9
+99 ;;^UTILITY(U,$J,358.3,5817,2)
+100 ;;=^5159306
+101 ;;^UTILITY(U,$J,358.3,5818,0)
+102 ;;=F10.10^^47^372^2
+103 ;;^UTILITY(U,$J,358.3,5818,1,0)
+104 ;;=^358.31IA^4^2
+105 ;;^UTILITY(U,$J,358.3,5818,1,3,0)
+106 ;;=3^Alcohol Abuse,Mild,Uncomplicated
+107 ;;^UTILITY(U,$J,358.3,5818,1,4,0)
+108 ;;=4^F10.10
+109 ;;^UTILITY(U,$J,358.3,5818,2)
+110 ;;=^5003068
+111 ;;^UTILITY(U,$J,358.3,5819,0)
+112 ;;=F10.14^^47^372^8
+113 ;;^UTILITY(U,$J,358.3,5819,1,0)
+114 ;;=^358.31IA^4^2
+115 ;;^UTILITY(U,$J,358.3,5819,1,3,0)
+116 ;;=3^Alcohol Induced Mood D/O w/ Mild Use D/O
+117 ;;^UTILITY(U,$J,358.3,5819,1,4,0)
+118 ;;=4^F10.14
+119 ;;^UTILITY(U,$J,358.3,5819,2)
+120 ;;=^5003072
+121 ;;^UTILITY(U,$J,358.3,5820,0)
+122 ;;=F10.20^^47^372^7
+123 ;;^UTILITY(U,$J,358.3,5820,1,0)
+124 ;;=^358.31IA^4^2
+125 ;;^UTILITY(U,$J,358.3,5820,1,3,0)
+126 ;;=3^Alcohol Dependence,Mod/Sev,Uncomplicated
+127 ;;^UTILITY(U,$J,358.3,5820,1,4,0)
+128 ;;=4^F10.20
+129 ;;^UTILITY(U,$J,358.3,5820,2)
+130 ;;=^5003081
+131 ;;^UTILITY(U,$J,358.3,5821,0)
+132 ;;=F10.230^^47^372^5
+133 ;;^UTILITY(U,$J,358.3,5821,1,0)
+134 ;;=^358.31IA^4^2
+135 ;;^UTILITY(U,$J,358.3,5821,1,3,0)
+136 ;;=3^Alcohol Dependence,Mod/Sev w/ Withdrawal,Uncomplicated
+137 ;;^UTILITY(U,$J,358.3,5821,1,4,0)
+138 ;;=4^F10.230
+139 ;;^UTILITY(U,$J,358.3,5821,2)
+140 ;;=^5003086
+141 ;;^UTILITY(U,$J,358.3,5822,0)
+142 ;;=F10.239^^47^372^6
+143 ;;^UTILITY(U,$J,358.3,5822,1,0)
+144 ;;=^358.31IA^4^2
+145 ;;^UTILITY(U,$J,358.3,5822,1,3,0)
+146 ;;=3^Alcohol Dependence,Mod/Sev w/ Withdrawal,Unspec
+147 ;;^UTILITY(U,$J,358.3,5822,1,4,0)
+148 ;;=4^F10.239
+149 ;;^UTILITY(U,$J,358.3,5822,2)
+150 ;;=^5003089
+151 ;;^UTILITY(U,$J,358.3,5823,0)
+152 ;;=F10.24^^47^372^3
+153 ;;^UTILITY(U,$J,358.3,5823,1,0)
+154 ;;=^358.31IA^4^2
+155 ;;^UTILITY(U,$J,358.3,5823,1,3,0)
+156 ;;=3^Alcohol Dependence,Mod/Sev w/ Alcohol-Induced Mood D/O
+157 ;;^UTILITY(U,$J,358.3,5823,1,4,0)
+158 ;;=4^F10.24
+159 ;;^UTILITY(U,$J,358.3,5823,2)
+160 ;;=^5003090
+161 ;;^UTILITY(U,$J,358.3,5824,0)
+162 ;;=F10.288^^47^372^4
+163 ;;^UTILITY(U,$J,358.3,5824,1,0)
+164 ;;=^358.31IA^4^2
+165 ;;^UTILITY(U,$J,358.3,5824,1,3,0)
+166 ;;=3^Alcohol Dependence,Mod/Sev w/ Oth Alcohol-Induced D/O
+167 ;;^UTILITY(U,$J,358.3,5824,1,4,0)
+168 ;;=4^F10.288
+169 ;;^UTILITY(U,$J,358.3,5824,2)
+170 ;;=^5003099
+171 ;;^UTILITY(U,$J,358.3,5825,0)
+172 ;;=F10.94^^47^372^9
+173 ;;^UTILITY(U,$J,358.3,5825,1,0)
+174 ;;=^358.31IA^4^2
+175 ;;^UTILITY(U,$J,358.3,5825,1,3,0)
+176 ;;=3^Alcohol Induced Mood D/O w/ Unspec Alcohol Use
+177 ;;^UTILITY(U,$J,358.3,5825,1,4,0)
+178 ;;=4^F10.94
+179 ;;^UTILITY(U,$J,358.3,5825,2)
+180 ;;=^5003104
+181 ;;^UTILITY(U,$J,358.3,5826,0)
+182 ;;=F11.20^^47^372^16
+183 ;;^UTILITY(U,$J,358.3,5826,1,0)
+184 ;;=^358.31IA^4^2
+185 ;;^UTILITY(U,$J,358.3,5826,1,3,0)
+186 ;;=3^Opioid Dependence,Mod/Sev,Uncomplicated
+187 ;;^UTILITY(U,$J,358.3,5826,1,4,0)
+188 ;;=4^F11.20
+189 ;;^UTILITY(U,$J,358.3,5826,2)
+190 ;;=^5003127
+191 ;;^UTILITY(U,$J,358.3,5827,0)
+192 ;;=F12.20^^47^372^10
+193 ;;^UTILITY(U,$J,358.3,5827,1,0)
+194 ;;=^358.31IA^4^2
+195 ;;^UTILITY(U,$J,358.3,5827,1,3,0)
+196 ;;=3^Cannabis Dependence,Mod/Sev,Uncomplicated
+197 ;;^UTILITY(U,$J,358.3,5827,1,4,0)
+198 ;;=4^F12.20
+199 ;;^UTILITY(U,$J,358.3,5827,2)
+200 ;;=^5003166
+201 ;;^UTILITY(U,$J,358.3,5828,0)
+202 ;;=F14.188^^47^372^11
+203 ;;^UTILITY(U,$J,358.3,5828,1,0)
+204 ;;=^358.31IA^4^2
+205 ;;^UTILITY(U,$J,358.3,5828,1,3,0)
+206 ;;=3^Cocaine Abuse,Mild w/ Oth Cocaine-Induced D/O
+207 ;;^UTILITY(U,$J,358.3,5828,1,4,0)
+208 ;;=4^F14.188
+209 ;;^UTILITY(U,$J,358.3,5828,2)
+210 ;;=^5003251
+211 ;;^UTILITY(U,$J,358.3,5829,0)
+212 ;;=F14.20^^47^372^12
+213 ;;^UTILITY(U,$J,358.3,5829,1,0)
+214 ;;=^358.31IA^4^2
+215 ;;^UTILITY(U,$J,358.3,5829,1,3,0)
+216 ;;=3^Cocaine Dependence,Mod/Sev,Uncomplicated
+217 ;;^UTILITY(U,$J,358.3,5829,1,4,0)
+218 ;;=4^F14.20
+219 ;;^UTILITY(U,$J,358.3,5829,2)
+220 ;;=^5003253
+221 ;;^UTILITY(U,$J,358.3,5830,0)
+222 ;;=F15.10^^47^372^21
+223 ;;^UTILITY(U,$J,358.3,5830,1,0)
+224 ;;=^358.31IA^4^2
+225 ;;^UTILITY(U,$J,358.3,5830,1,3,0)
+226 ;;=3^Stimulant Abuse,Mild,Uncomplicated,Oth
+227 ;;^UTILITY(U,$J,358.3,5830,1,4,0)
+228 ;;=4^F15.10
+229 ;;^UTILITY(U,$J,358.3,5830,2)
+230 ;;=^5003282
+231 ;;^UTILITY(U,$J,358.3,5831,0)
+232 ;;=F15.20^^47^372^22
+233 ;;^UTILITY(U,$J,358.3,5831,1,0)
+234 ;;=^358.31IA^4^2
+235 ;;^UTILITY(U,$J,358.3,5831,1,3,0)
+236 ;;=3^Stimulant Depend,Mod/Sev,Uncomplicated,Oth
+237 ;;^UTILITY(U,$J,358.3,5831,1,4,0)
+238 ;;=4^F15.20
+239 ;;^UTILITY(U,$J,358.3,5831,2)
+240 ;;=^5003295
+241 ;;^UTILITY(U,$J,358.3,5832,0)
+242 ;;=F17.210^^47^372^15
+243 ;;^UTILITY(U,$J,358.3,5832,1,0)
+244 ;;=^358.31IA^4^2
+245 ;;^UTILITY(U,$J,358.3,5832,1,3,0)
+246 ;;=3^Nicotine Dependence,Cigarettes,Uncomplicated
+247 ;;^UTILITY(U,$J,358.3,5832,1,4,0)
+248 ;;=4^F17.210
+249 ;;^UTILITY(U,$J,358.3,5832,2)
+250 ;;=^5003365
+251 ;;^UTILITY(U,$J,358.3,5833,0)
+252 ;;=F17.211^^47^372^14
+253 ;;^UTILITY(U,$J,358.3,5833,1,0)
+254 ;;=^358.31IA^4^2
+255 ;;^UTILITY(U,$J,358.3,5833,1,3,0)
+256 ;;=3^Nicotine Dependence,Cigarettes,In Remission
+257 ;;^UTILITY(U,$J,358.3,5833,1,4,0)
+258 ;;=4^F17.211
+259 ;;^UTILITY(U,$J,358.3,5833,2)
+260 ;;=^5003366
+261 ;;^UTILITY(U,$J,358.3,5834,0)
+262 ;;=F17.293^^47^372^13
+263 ;;^UTILITY(U,$J,358.3,5834,1,0)
+264 ;;=^358.31IA^4^2
+265 ;;^UTILITY(U,$J,358.3,5834,1,3,0)
+266 ;;=3^Nicotine Dependence w/ Withdrawal,Other Tobacco Product
+267 ;;^UTILITY(U,$J,358.3,5834,1,4,0)
+268 ;;=4^F17.293
+269 ;;^UTILITY(U,$J,358.3,5834,2)
+270 ;;=^5003377
+271 ;;^UTILITY(U,$J,358.3,5835,0)
+272 ;;=F19.10^^47^372^18
+273 ;;^UTILITY(U,$J,358.3,5835,1,0)
+274 ;;=^358.31IA^4^2
+275 ;;^UTILITY(U,$J,358.3,5835,1,3,0)
+276 ;;=3^Psychoactive Subs Abuse,Mild,Uncomplicated,Oth
+277 ;;^UTILITY(U,$J,358.3,5835,1,4,0)
+278 ;;=4^F19.10
+279 ;;^UTILITY(U,$J,358.3,5835,2)
+280 ;;=^5003416
+281 ;;^UTILITY(U,$J,358.3,5836,0)
+282 ;;=F19.20^^47^372^19
+283 ;;^UTILITY(U,$J,358.3,5836,1,0)
+284 ;;=^358.31IA^4^2
+285 ;;^UTILITY(U,$J,358.3,5836,1,3,0)
+286 ;;=3^Psychoactive Substance Dependence,Uncomplicated,Other
+287 ;;^UTILITY(U,$J,358.3,5836,1,4,0)
+288 ;;=4^F19.20
+289 ;;^UTILITY(U,$J,358.3,5836,2)
+290 ;;=^5003431
+291 ;;^UTILITY(U,$J,358.3,5837,0)
+292 ;;=F10.11^^47^372^1
+293 ;;^UTILITY(U,$J,358.3,5837,1,0)
+294 ;;=^358.31IA^4^2
+295 ;;^UTILITY(U,$J,358.3,5837,1,3,0)
+296 ;;=3^Alcohol Abuse,Mild,In Remission
+297 ;;^UTILITY(U,$J,358.3,5837,1,4,0)
+298 ;;=4^F10.11
+299 ;;^UTILITY(U,$J,358.3,5837,2)
+300 ;;=^268230
+301 ;;^UTILITY(U,$J,358.3,5838,0)
+302 ;;=F19.11^^47^372^17
+303 ;;^UTILITY(U,$J,358.3,5838,1,0)
+304 ;;=^358.31IA^4^2
+305 ;;^UTILITY(U,$J,358.3,5838,1,3,0)
+306 ;;=3^Psychoactive Subs Abuse,Mild,Oth,In Remission
+307 ;;^UTILITY(U,$J,358.3,5838,1,4,0)
+308 ;;=4^F19.11
+309 ;;^UTILITY(U,$J,358.3,5838,2)
+310 ;;=^5151306
+311 ;;^UTILITY(U,$J,358.3,5839,0)
+312 ;;=F15.11^^47^372^20
+313 ;;^UTILITY(U,$J,358.3,5839,1,0)
+314 ;;=^358.31IA^4^2
+315 ;;^UTILITY(U,$J,358.3,5839,1,3,0)
+316 ;;=3^Stimulant Abuse,Mild,Oth,In Remission
+317 ;;^UTILITY(U,$J,358.3,5839,1,4,0)
+318 ;;=4^F15.11
+319 ;;^UTILITY(U,$J,358.3,5839,2)
+320 ;;=^5151304
+321 ;;^UTILITY(U,$J,358.3,5840,0)
+322 ;;=E66.01^^47^373^27
+323 ;;^UTILITY(U,$J,358.3,5840,1,0)
+324 ;;=^358.31IA^4^2
+325 ;;^UTILITY(U,$J,358.3,5840,1,3,0)
+326 ;;=3^Morbid Obesity
+327 ;;^UTILITY(U,$J,358.3,5840,1,4,0)
+328 ;;=4^E66.01
+329 ;;^UTILITY(U,$J,358.3,5840,2)
+330 ;;=^5002826
+331 ;;^UTILITY(U,$J,358.3,5841,0)
+332 ;;=E66.9^^47^373^28
+333 ;;^UTILITY(U,$J,358.3,5841,1,0)
+334 ;;=^358.31IA^4^2
+335 ;;^UTILITY(U,$J,358.3,5841,1,3,0)
+336 ;;=3^Obesity,Unspec
+337 ;;^UTILITY(U,$J,358.3,5841,1,4,0)
+338 ;;=4^E66.9
+339 ;;^UTILITY(U,$J,358.3,5841,2)
+340 ;;=^5002832
+341 ;;^UTILITY(U,$J,358.3,5842,0)
+342 ;;=E66.3^^47^373^29
+343 ;;^UTILITY(U,$J,358.3,5842,1,0)
+344 ;;=^358.31IA^4^2
+345 ;;^UTILITY(U,$J,358.3,5842,1,3,0)
+346 ;;=3^Overweight
+347 ;;^UTILITY(U,$J,358.3,5842,1,4,0)
+348 ;;=4^E66.3
+349 ;;^UTILITY(U,$J,358.3,5842,2)
+350 ;;=^5002830
+351 ;;^UTILITY(U,$J,358.3,5843,0)
+352 ;;=Z68.20^^47^373^1
+353 ;;^UTILITY(U,$J,358.3,5843,1,0)
+354 ;;=^358.31IA^4^2
+355 ;;^UTILITY(U,$J,358.3,5843,1,3,0)
+356 ;;=3^BMI 20.0-20.9
+357 ;;^UTILITY(U,$J,358.3,5843,1,4,0)
+358 ;;=4^Z68.20
+359 ;;^UTILITY(U,$J,358.3,5843,2)
+360 ;;=^5063199
+361 ;;^UTILITY(U,$J,358.3,5844,0)
+362 ;;=Z68.21^^47^373^2
+363 ;;^UTILITY(U,$J,358.3,5844,1,0)
+364 ;;=^358.31IA^4^2
+365 ;;^UTILITY(U,$J,358.3,5844,1,3,0)
+366 ;;=3^BMI 21.0-21.9
+367 ;;^UTILITY(U,$J,358.3,5844,1,4,0)
+368 ;;=4^Z68.21
+369 ;;^UTILITY(U,$J,358.3,5844,2)
+370 ;;=^5063200
+371 ;;^UTILITY(U,$J,358.3,5845,0)
+372 ;;=Z68.22^^47^373^3
+373 ;;^UTILITY(U,$J,358.3,5845,1,0)
+374 ;;=^358.31IA^4^2
+375 ;;^UTILITY(U,$J,358.3,5845,1,3,0)
+376 ;;=3^BMI 22.0-22.9
+377 ;;^UTILITY(U,$J,358.3,5845,1,4,0)
+378 ;;=4^Z68.22
+379 ;;^UTILITY(U,$J,358.3,5845,2)
+380 ;;=^5063201
+381 ;;^UTILITY(U,$J,358.3,5846,0)
+382 ;;=Z68.23^^47^373^4
+383 ;;^UTILITY(U,$J,358.3,5846,1,0)
+384 ;;=^358.31IA^4^2
+385 ;;^UTILITY(U,$J,358.3,5846,1,3,0)
+386 ;;=3^BMI 23.0-23.9
+387 ;;^UTILITY(U,$J,358.3,5846,1,4,0)
+388 ;;=4^Z68.23
+389 ;;^UTILITY(U,$J,358.3,5846,2)
+390 ;;=^5063202
+391 ;;^UTILITY(U,$J,358.3,5847,0)
+392 ;;=Z68.24^^47^373^5
+393 ;;^UTILITY(U,$J,358.3,5847,1,0)
+394 ;;=^358.31IA^4^2
+395 ;;^UTILITY(U,$J,358.3,5847,1,3,0)
+396 ;;=3^BMI 24.0-24.9
+397 ;;^UTILITY(U,$J,358.3,5847,1,4,0)
+398 ;;=4^Z68.24
+399 ;;^UTILITY(U,$J,358.3,5847,2)
+400 ;;=^5063203
+401 ;;^UTILITY(U,$J,358.3,5848,0)
+402 ;;=Z68.25^^47^373^6
+403 ;;^UTILITY(U,$J,358.3,5848,1,0)
+404 ;;=^358.31IA^4^2
+405 ;;^UTILITY(U,$J,358.3,5848,1,3,0)
+406 ;;=3^BMI 25.0-25.9
+407 ;;^UTILITY(U,$J,358.3,5848,1,4,0)
+408 ;;=4^Z68.25
+409 ;;^UTILITY(U,$J,358.3,5848,2)
+410 ;;=^5063204
+411 ;;^UTILITY(U,$J,358.3,5849,0)
+412 ;;=Z68.26^^47^373^7
+413 ;;^UTILITY(U,$J,358.3,5849,1,0)
+414 ;;=^358.31IA^4^2
+415 ;;^UTILITY(U,$J,358.3,5849,1,3,0)
+416 ;;=3^BMI 26.0-26.9
+417 ;;^UTILITY(U,$J,358.3,5849,1,4,0)
+418 ;;=4^Z68.26
+419 ;;^UTILITY(U,$J,358.3,5849,2)
+420 ;;=^5063205
+421 ;;^UTILITY(U,$J,358.3,5850,0)
+422 ;;=Z68.27^^47^373^8
+423 ;;^UTILITY(U,$J,358.3,5850,1,0)
+424 ;;=^358.31IA^4^2
+425 ;;^UTILITY(U,$J,358.3,5850,1,3,0)
+426 ;;=3^BMI 27.0-279
+427 ;;^UTILITY(U,$J,358.3,5850,1,4,0)
+428 ;;=4^Z68.27
+429 ;;^UTILITY(U,$J,358.3,5850,2)
+430 ;;=^5063206
+431 ;;^UTILITY(U,$J,358.3,5851,0)
+432 ;;=Z68.28^^47^373^9
+433 ;;^UTILITY(U,$J,358.3,5851,1,0)
+434 ;;=^358.31IA^4^2
+435 ;;^UTILITY(U,$J,358.3,5851,1,3,0)
+436 ;;=3^BMI 28.0-28.9
+437 ;;^UTILITY(U,$J,358.3,5851,1,4,0)
+438 ;;=4^Z68.28
+439 ;;^UTILITY(U,$J,358.3,5851,2)
+440 ;;=^5063207
+441 ;;^UTILITY(U,$J,358.3,5852,0)
+442 ;;=Z68.29^^47^373^10
+443 ;;^UTILITY(U,$J,358.3,5852,1,0)
+444 ;;=^358.31IA^4^2
+445 ;;^UTILITY(U,$J,358.3,5852,1,3,0)
+446 ;;=3^BMI 29.0-29.9
+447 ;;^UTILITY(U,$J,358.3,5852,1,4,0)
+448 ;;=4^Z68.29
+449 ;;^UTILITY(U,$J,358.3,5852,2)
+450 ;;=^5063208
+451 ;;^UTILITY(U,$J,358.3,5853,0)
+452 ;;=Z68.30^^47^373^11
+453 ;;^UTILITY(U,$J,358.3,5853,1,0)
+454 ;;=^358.31IA^4^2
+455 ;;^UTILITY(U,$J,358.3,5853,1,3,0)
+456 ;;=3^BMI 30.0-30.9
+457 ;;^UTILITY(U,$J,358.3,5853,1,4,0)
+458 ;;=4^Z68.30
+459 ;;^UTILITY(U,$J,358.3,5853,2)
+460 ;;=^5063209
+461 ;;^UTILITY(U,$J,358.3,5854,0)
+462 ;;=Z68.31^^47^373^12
+463 ;;^UTILITY(U,$J,358.3,5854,1,0)
+464 ;;=^358.31IA^4^2
+465 ;;^UTILITY(U,$J,358.3,5854,1,3,0)
+466 ;;=3^BMI 31.0-31.9
+467 ;;^UTILITY(U,$J,358.3,5854,1,4,0)
+468 ;;=4^Z68.31
+469 ;;^UTILITY(U,$J,358.3,5854,2)
+470 ;;=^5063210
+471 ;;^UTILITY(U,$J,358.3,5855,0)
+472 ;;=Z68.32^^47^373^13
+473 ;;^UTILITY(U,$J,358.3,5855,1,0)
+474 ;;=^358.31IA^4^2
+475 ;;^UTILITY(U,$J,358.3,5855,1,3,0)
+476 ;;=3^BMI 32.0-32.9
+477 ;;^UTILITY(U,$J,358.3,5855,1,4,0)
+478 ;;=4^Z68.32
+479 ;;^UTILITY(U,$J,358.3,5855,2)
+480 ;;=^5063211
+481 ;;^UTILITY(U,$J,358.3,5856,0)
+482 ;;=Z68.33^^47^373^14
+483 ;;^UTILITY(U,$J,358.3,5856,1,0)
+484 ;;=^358.31IA^4^2
+485 ;;^UTILITY(U,$J,358.3,5856,1,3,0)
+486 ;;=3^BMI 33.0-33.9
+487 ;;^UTILITY(U,$J,358.3,5856,1,4,0)
+488 ;;=4^Z68.33
+489 ;;^UTILITY(U,$J,358.3,5856,2)
+490 ;;=^5063212
+491 ;;^UTILITY(U,$J,358.3,5857,0)
+492 ;;=Z68.34^^47^373^15
+493 ;;^UTILITY(U,$J,358.3,5857,1,0)
+494 ;;=^358.31IA^4^2
+495 ;;^UTILITY(U,$J,358.3,5857,1,3,0)
+496 ;;=3^BMI 34.0-34.9
+497 ;;^UTILITY(U,$J,358.3,5857,1,4,0)
+498 ;;=4^Z68.34
+499 ;;^UTILITY(U,$J,358.3,5857,2)
+500 ;;=^5063213
+501 ;;^UTILITY(U,$J,358.3,5858,0)
+502 ;;=Z68.35^^47^373^16
+503 ;;^UTILITY(U,$J,358.3,5858,1,0)
+504 ;;=^358.31IA^4^2
+505 ;;^UTILITY(U,$J,358.3,5858,1,3,0)
+506 ;;=3^BMI 35.0-35.9
+507 ;;^UTILITY(U,$J,358.3,5858,1,4,0)
+508 ;;=4^Z68.35
+509 ;;^UTILITY(U,$J,358.3,5858,2)
+510 ;;=^5063214
+511 ;;^UTILITY(U,$J,358.3,5859,0)
+512 ;;=Z68.36^^47^373^17
+513 ;;^UTILITY(U,$J,358.3,5859,1,0)
+514 ;;=^358.31IA^4^2
+515 ;;^UTILITY(U,$J,358.3,5859,1,3,0)
+516 ;;=3^BMI 36.0-36.9
+517 ;;^UTILITY(U,$J,358.3,5859,1,4,0)
+518 ;;=4^Z68.36
+519 ;;^UTILITY(U,$J,358.3,5859,2)
+520 ;;=^5063215
+521 ;;^UTILITY(U,$J,358.3,5860,0)
+522 ;;=Z68.37^^47^373^18
+523 ;;^UTILITY(U,$J,358.3,5860,1,0)
+524 ;;=^358.31IA^4^2
+525 ;;^UTILITY(U,$J,358.3,5860,1,3,0)
+526 ;;=3^BMI 37.0-37.9
+527 ;;^UTILITY(U,$J,358.3,5860,1,4,0)
+528 ;;=4^Z68.37
+529 ;;^UTILITY(U,$J,358.3,5860,2)
+530 ;;=^5063216
+531 ;;^UTILITY(U,$J,358.3,5861,0)
+532 ;;=Z68.38^^47^373^19
+533 ;;^UTILITY(U,$J,358.3,5861,1,0)
+534 ;;=^358.31IA^4^2
+535 ;;^UTILITY(U,$J,358.3,5861,1,3,0)
+536 ;;=3^BMI 38.0-38.9
+537 ;;^UTILITY(U,$J,358.3,5861,1,4,0)
+538 ;;=4^Z68.38
+539 ;;^UTILITY(U,$J,358.3,5861,2)
+540 ;;=^5063217
+541 ;;^UTILITY(U,$J,358.3,5862,0)
+542 ;;=Z68.39^^47^373^20
+543 ;;^UTILITY(U,$J,358.3,5862,1,0)
+544 ;;=^358.31IA^4^2
+545 ;;^UTILITY(U,$J,358.3,5862,1,3,0)
+546 ;;=3^BMI 39.0-39.9
+547 ;;^UTILITY(U,$J,358.3,5862,1,4,0)
+548 ;;=4^Z68.39
+549 ;;^UTILITY(U,$J,358.3,5862,2)
+550 ;;=^5063218
+551 ;;^UTILITY(U,$J,358.3,5863,0)
+552 ;;=Z68.41^^47^373^21
+553 ;;^UTILITY(U,$J,358.3,5863,1,0)
+554 ;;=^358.31IA^4^2
+555 ;;^UTILITY(U,$J,358.3,5863,1,3,0)
+556 ;;=3^BMI 40.0-44.9
+557 ;;^UTILITY(U,$J,358.3,5863,1,4,0)
+558 ;;=4^Z68.41
+559 ;;^UTILITY(U,$J,358.3,5863,2)
+560 ;;=^5063219
+561 ;;^UTILITY(U,$J,358.3,5864,0)
+562 ;;=Z68.42^^47^373^22
+563 ;;^UTILITY(U,$J,358.3,5864,1,0)
+564 ;;=^358.31IA^4^2
+565 ;;^UTILITY(U,$J,358.3,5864,1,3,0)
+566 ;;=3^BMI 45.0-49.9
+567 ;;^UTILITY(U,$J,358.3,5864,1,4,0)
+568 ;;=4^Z68.42
+569 ;;^UTILITY(U,$J,358.3,5864,2)
+570 ;;=^5063220
+571 ;;^UTILITY(U,$J,358.3,5865,0)
+572 ;;=Z68.43^^47^373^23
+573 ;;^UTILITY(U,$J,358.3,5865,1,0)
+574 ;;=^358.31IA^4^2
+575 ;;^UTILITY(U,$J,358.3,5865,1,3,0)
+576 ;;=3^BMI 50.0-59.9
+577 ;;^UTILITY(U,$J,358.3,5865,1,4,0)
+578 ;;=4^Z68.43
+579 ;;^UTILITY(U,$J,358.3,5865,2)
+580 ;;=^5063221
+581 ;;^UTILITY(U,$J,358.3,5866,0)
+582 ;;=Z68.44^^47^373^24
+583 ;;^UTILITY(U,$J,358.3,5866,1,0)
+584 ;;=^358.31IA^4^2
+585 ;;^UTILITY(U,$J,358.3,5866,1,3,0)
+586 ;;=3^BMI 60.0-69.9
+587 ;;^UTILITY(U,$J,358.3,5866,1,4,0)
+588 ;;=4^Z68.44
+589 ;;^UTILITY(U,$J,358.3,5866,2)
+590 ;;=^5063222
+591 ;;^UTILITY(U,$J,358.3,5867,0)
+592 ;;=Z68.45^^47^373^25
+593 ;;^UTILITY(U,$J,358.3,5867,1,0)
+594 ;;=^358.31IA^4^2
+595 ;;^UTILITY(U,$J,358.3,5867,1,3,0)
+596 ;;=3^BMI 70 or Over
+597 ;;^UTILITY(U,$J,358.3,5867,1,4,0)
+598 ;;=4^Z68.45
+599 ;;^UTILITY(U,$J,358.3,5867,2)
+600 ;;=^5063223
+601 ;;^UTILITY(U,$J,358.3,5868,0)
+602 ;;=Z71.82^^47^373^26
+603 ;;^UTILITY(U,$J,358.3,5868,1,0)
+604 ;;=^358.31IA^4^2
+605 ;;^UTILITY(U,$J,358.3,5868,1,3,0)
+606 ;;=3^Exercise Counseling
+607 ;;^UTILITY(U,$J,358.3,5868,1,4,0)
+608 ;;=4^Z71.82
+609 ;;^UTILITY(U,$J,358.3,5868,2)
+610 ;;=^303466
+611 ;;^UTILITY(U,$J,358.3,5869,0)
+612 ;;=F20.3^^47^374^31
+613 ;;^UTILITY(U,$J,358.3,5869,1,0)
+614 ;;=^358.31IA^4^2
+615 ;;^UTILITY(U,$J,358.3,5869,1,3,0)
+616 ;;=3^Undifferentiated/Atypical Schizophrenia
+617 ;;^UTILITY(U,$J,358.3,5869,1,4,0)
+618 ;;=4^F20.3
+619 ;;^UTILITY(U,$J,358.3,5869,2)
+620 ;;=^5003472
+621 ;;^UTILITY(U,$J,358.3,5870,0)
+622 ;;=F20.9^^47^374^27
+623 ;;^UTILITY(U,$J,358.3,5870,1,0)
+624 ;;=^358.31IA^4^2
+625 ;;^UTILITY(U,$J,358.3,5870,1,3,0)
+626 ;;=3^Schizophrenia,Unspec
+627 ;;^UTILITY(U,$J,358.3,5870,1,4,0)
+628 ;;=4^F20.9
+629 ;;^UTILITY(U,$J,358.3,5870,2)
+630 ;;=^5003476
+631 ;;^UTILITY(U,$J,358.3,5871,0)
+632 ;;=F31.9^^47^374^6
+633 ;;^UTILITY(U,$J,358.3,5871,1,0)
+634 ;;=^358.31IA^4^2
+635 ;;^UTILITY(U,$J,358.3,5871,1,3,0)
+636 ;;=3^Bipolar Disorder,Unspec
+637 ;;^UTILITY(U,$J,358.3,5871,1,4,0)
+638 ;;=4^F31.9
+639 ;;^UTILITY(U,$J,358.3,5871,2)
+640 ;;=^331892
+641 ;;^UTILITY(U,$J,358.3,5872,0)
+642 ;;=F31.72^^47^374^7
+643 ;;^UTILITY(U,$J,358.3,5872,1,0)
+644 ;;=^358.31IA^4^2
+645 ;;^UTILITY(U,$J,358.3,5872,1,3,0)
+646 ;;=3^Bipolr Disorder,Full Remis,Most Recent Episode Hypomanic
+647 ;;^UTILITY(U,$J,358.3,5872,1,4,0)
+648 ;;=4^F31.72
+649 ;;^UTILITY(U,$J,358.3,5872,2)
+650 ;;=^5003512
+651 ;;^UTILITY(U,$J,358.3,5873,0)
+652 ;;=F31.71^^47^374^5
+653 ;;^UTILITY(U,$J,358.3,5873,1,0)
+654 ;;=^358.31IA^4^2
+655 ;;^UTILITY(U,$J,358.3,5873,1,3,0)
+656 ;;=3^Bipolar Disorder,Part Remis,Most Recent Episode Hypomanic
+657 ;;^UTILITY(U,$J,358.3,5873,1,4,0)
+658 ;;=4^F31.71
+659 ;;^UTILITY(U,$J,358.3,5873,2)
+660 ;;=^5003511
+661 ;;^UTILITY(U,$J,358.3,5874,0)
+662 ;;=F31.70^^47^374^4
+663 ;;^UTILITY(U,$J,358.3,5874,1,0)
+664 ;;=^358.31IA^4^2
+665 ;;^UTILITY(U,$J,358.3,5874,1,3,0)
+666 ;;=3^Bipolar Disorder,In Remis,Most Recent Episode Unspec
+667 ;;^UTILITY(U,$J,358.3,5874,1,4,0)
+668 ;;=4^F31.70
+669 ;;^UTILITY(U,$J,358.3,5874,2)
+670 ;;=^5003510
+671 ;;^UTILITY(U,$J,358.3,5875,0)
+672 ;;=F29.^^47^374^25
+673 ;;^UTILITY(U,$J,358.3,5875,1,0)
+674 ;;=^358.31IA^4^2
+675 ;;^UTILITY(U,$J,358.3,5875,1,3,0)
+676 ;;=3^Psychosis not d/t Substance/Known Physiol Cond,Unspec
+677 ;;^UTILITY(U,$J,358.3,5875,1,4,0)
+678 ;;=4^F29.
+679 ;;^UTILITY(U,$J,358.3,5875,2)
+680 ;;=^5003484
+681 ;;^UTILITY(U,$J,358.3,5876,0)
+682 ;;=F28.^^47^374^26
+683 ;;^UTILITY(U,$J,358.3,5876,1,0)
+684 ;;=^358.31IA^4^2
+685 ;;^UTILITY(U,$J,358.3,5876,1,3,0)
+686 ;;=3^Psychosis not d/t Substance/Known Physiol Cond NEC
+687 ;;^UTILITY(U,$J,358.3,5876,1,4,0)
+688 ;;=4^F28.
+689 ;;^UTILITY(U,$J,358.3,5876,2)
+690 ;;=^5003483
+691 ;;^UTILITY(U,$J,358.3,5877,0)
+692 ;;=F41.9^^47^374^3
+693 ;;^UTILITY(U,$J,358.3,5877,1,0)
+694 ;;=^358.31IA^4^2
+695 ;;^UTILITY(U,$J,358.3,5877,1,3,0)
+696 ;;=3^Anxiety Disorder,Unspec
+697 ;;^UTILITY(U,$J,358.3,5877,1,4,0)
+698 ;;=4^F41.9
+699 ;;^UTILITY(U,$J,358.3,5877,2)
+700 ;;=^5003567
+701 ;;^UTILITY(U,$J,358.3,5878,0)
+702 ;;=F45.0^^47^374^29
+703 ;;^UTILITY(U,$J,358.3,5878,1,0)
+704 ;;=^358.31IA^4^2
+705 ;;^UTILITY(U,$J,358.3,5878,1,3,0)
+706 ;;=3^Somatization Disorder
+707 ;;^UTILITY(U,$J,358.3,5878,1,4,0)
+708 ;;=4^F45.0
+709 ;;^UTILITY(U,$J,358.3,5878,2)
+710 ;;=^112280
