IBDEI0E1 ; ; 03-MAY-2022
;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 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,35180,1,4,0)
;;=4^J47.9
;;^UTILITY(U,$J,358.3,35180,2)
;;=^5008260
;;^UTILITY(U,$J,358.3,35181,0)
;;=J47.1^^105^1443^7
;;^UTILITY(U,$J,358.3,35181,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35181,1,3,0)
;;=3^Bronchiectasis w/ Acute Exacerbation
;;^UTILITY(U,$J,358.3,35181,1,4,0)
;;=4^J47.1
;;^UTILITY(U,$J,358.3,35181,2)
;;=^5008259
;;^UTILITY(U,$J,358.3,35182,0)
;;=J47.0^^105^1443^8
;;^UTILITY(U,$J,358.3,35182,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35182,1,3,0)
;;=3^Bronchiectasis w/ Acute Lower Respiratory Infection
;;^UTILITY(U,$J,358.3,35182,1,4,0)
;;=4^J47.0
;;^UTILITY(U,$J,358.3,35182,2)
;;=^5008258
;;^UTILITY(U,$J,358.3,35183,0)
;;=R09.1^^105^1443^37
;;^UTILITY(U,$J,358.3,35183,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35183,1,3,0)
;;=3^Pleurisy
;;^UTILITY(U,$J,358.3,35183,1,4,0)
;;=4^R09.1
;;^UTILITY(U,$J,358.3,35183,2)
;;=^95428
;;^UTILITY(U,$J,358.3,35184,0)
;;=J94.9^^105^1443^33
;;^UTILITY(U,$J,358.3,35184,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35184,1,3,0)
;;=3^Pleural Condition,Unspec
;;^UTILITY(U,$J,358.3,35184,1,4,0)
;;=4^J94.9
;;^UTILITY(U,$J,358.3,35184,2)
;;=^5008320
;;^UTILITY(U,$J,358.3,35185,0)
;;=J92.9^^105^1443^36
;;^UTILITY(U,$J,358.3,35185,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35185,1,3,0)
;;=3^Pleural Plaque w/o Asbestos
;;^UTILITY(U,$J,358.3,35185,1,4,0)
;;=4^J92.9
;;^UTILITY(U,$J,358.3,35185,2)
;;=^5008313
;;^UTILITY(U,$J,358.3,35186,0)
;;=J94.8^^105^1443^34
;;^UTILITY(U,$J,358.3,35186,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35186,1,3,0)
;;=3^Pleural Conditions,Other Spec
;;^UTILITY(U,$J,358.3,35186,1,4,0)
;;=4^J94.8
;;^UTILITY(U,$J,358.3,35186,2)
;;=^5008319
;;^UTILITY(U,$J,358.3,35187,0)
;;=J86.9^^105^1443^38
;;^UTILITY(U,$J,358.3,35187,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35187,1,3,0)
;;=3^Pyothorax w/o Fistula
;;^UTILITY(U,$J,358.3,35187,1,4,0)
;;=4^J86.9
;;^UTILITY(U,$J,358.3,35187,2)
;;=^5008309
;;^UTILITY(U,$J,358.3,35188,0)
;;=J91.8^^105^1443^35
;;^UTILITY(U,$J,358.3,35188,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35188,1,3,0)
;;=3^Pleural Effusion in Other Conditions
;;^UTILITY(U,$J,358.3,35188,1,4,0)
;;=4^J91.8
;;^UTILITY(U,$J,358.3,35188,2)
;;=^5008311
;;^UTILITY(U,$J,358.3,35189,0)
;;=J84.9^^105^1443^29
;;^UTILITY(U,$J,358.3,35189,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35189,1,3,0)
;;=3^Interstitial Pulmonary Disease/Pneumonia,Unspec
;;^UTILITY(U,$J,358.3,35189,1,4,0)
;;=4^J84.9
;;^UTILITY(U,$J,358.3,35189,2)
;;=^5008304
;;^UTILITY(U,$J,358.3,35190,0)
;;=J98.01^^105^1443^11
;;^UTILITY(U,$J,358.3,35190,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35190,1,3,0)
;;=3^Bronchospasm,Acute
;;^UTILITY(U,$J,358.3,35190,1,4,0)
;;=4^J98.01
;;^UTILITY(U,$J,358.3,35190,2)
;;=^334092
;;^UTILITY(U,$J,358.3,35191,0)
;;=G47.30^^105^1443^53
;;^UTILITY(U,$J,358.3,35191,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35191,1,3,0)
;;=3^Sleep Apnea,Unspec
;;^UTILITY(U,$J,358.3,35191,1,4,0)
;;=4^G47.30
;;^UTILITY(U,$J,358.3,35191,2)
;;=^5003977
;;^UTILITY(U,$J,358.3,35192,0)
;;=R06.02^^105^1443^52
;;^UTILITY(U,$J,358.3,35192,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35192,1,3,0)
;;=3^Shortness of Breath
;;^UTILITY(U,$J,358.3,35192,1,4,0)
;;=4^R06.02
;;^UTILITY(U,$J,358.3,35192,2)
;;=^5019181
;;^UTILITY(U,$J,358.3,35193,0)
;;=R06.09^^105^1443^17
;;^UTILITY(U,$J,358.3,35193,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35193,1,3,0)
;;=3^Dyspnea,Other Forms
;;^UTILITY(U,$J,358.3,35193,1,4,0)
;;=4^R06.09
;;^UTILITY(U,$J,358.3,35193,2)
;;=^5019182
;;^UTILITY(U,$J,358.3,35194,0)
;;=R06.00^^105^1443^18
;;^UTILITY(U,$J,358.3,35194,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35194,1,3,0)
;;=3^Dyspnea,Unspec
;;^UTILITY(U,$J,358.3,35194,1,4,0)
;;=4^R06.00
;;^UTILITY(U,$J,358.3,35194,2)
;;=^5019180
;;^UTILITY(U,$J,358.3,35195,0)
;;=R06.89^^105^1443^6
;;^UTILITY(U,$J,358.3,35195,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35195,1,3,0)
;;=3^Breathing Abnormalities,Other
;;^UTILITY(U,$J,358.3,35195,1,4,0)
;;=4^R06.89
;;^UTILITY(U,$J,358.3,35195,2)
;;=^5019193
;;^UTILITY(U,$J,358.3,35196,0)
;;=R06.83^^105^1443^54
;;^UTILITY(U,$J,358.3,35196,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35196,1,3,0)
;;=3^Snoring
;;^UTILITY(U,$J,358.3,35196,1,4,0)
;;=4^R06.83
;;^UTILITY(U,$J,358.3,35196,2)
;;=^5019192
;;^UTILITY(U,$J,358.3,35197,0)
;;=R06.3^^105^1443^32
;;^UTILITY(U,$J,358.3,35197,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35197,1,3,0)
;;=3^Periodic Breathing
;;^UTILITY(U,$J,358.3,35197,1,4,0)
;;=4^R06.3
;;^UTILITY(U,$J,358.3,35197,2)
;;=^5019185
;;^UTILITY(U,$J,358.3,35198,0)
;;=R06.1^^105^1443^56
;;^UTILITY(U,$J,358.3,35198,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35198,1,3,0)
;;=3^Stridor
;;^UTILITY(U,$J,358.3,35198,1,4,0)
;;=4^R06.1
;;^UTILITY(U,$J,358.3,35198,2)
;;=^5019183
;;^UTILITY(U,$J,358.3,35199,0)
;;=R04.2^^105^1443^24
;;^UTILITY(U,$J,358.3,35199,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35199,1,3,0)
;;=3^Hemoptysis
;;^UTILITY(U,$J,358.3,35199,1,4,0)
;;=4^R04.2
;;^UTILITY(U,$J,358.3,35199,2)
;;=^5019175
;;^UTILITY(U,$J,358.3,35200,0)
;;=R91.8^^105^1443^1
;;^UTILITY(U,$J,358.3,35200,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35200,1,3,0)
;;=3^Abnormal Finding of Lung Field,Other Nonspecific
;;^UTILITY(U,$J,358.3,35200,1,4,0)
;;=4^R91.8
;;^UTILITY(U,$J,358.3,35200,2)
;;=^5019708
;;^UTILITY(U,$J,358.3,35201,0)
;;=R06.2^^105^1443^57
;;^UTILITY(U,$J,358.3,35201,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35201,1,3,0)
;;=3^Wheezing
;;^UTILITY(U,$J,358.3,35201,1,4,0)
;;=4^R06.2
;;^UTILITY(U,$J,358.3,35201,2)
;;=^5019184
;;^UTILITY(U,$J,358.3,35202,0)
;;=J44.0^^105^1443^12
;;^UTILITY(U,$J,358.3,35202,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35202,1,3,0)
;;=3^COPD w/ (Acute) Lower Respiratory Infection
;;^UTILITY(U,$J,358.3,35202,1,4,0)
;;=4^J44.0
;;^UTILITY(U,$J,358.3,35202,2)
;;=^5008239
;;^UTILITY(U,$J,358.3,35203,0)
;;=J94.1^^105^1443^23
;;^UTILITY(U,$J,358.3,35203,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35203,1,3,0)
;;=3^Fibrothorax
;;^UTILITY(U,$J,358.3,35203,1,4,0)
;;=4^J94.1
;;^UTILITY(U,$J,358.3,35203,2)
;;=^5008317
;;^UTILITY(U,$J,358.3,35204,0)
;;=G47.33^^105^1443^31
;;^UTILITY(U,$J,358.3,35204,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35204,1,3,0)
;;=3^Obstructive Sleep Apnea
;;^UTILITY(U,$J,358.3,35204,1,4,0)
;;=4^G47.33
;;^UTILITY(U,$J,358.3,35204,2)
;;=^332763
;;^UTILITY(U,$J,358.3,35205,0)
;;=R91.1^^105^1443^55
;;^UTILITY(U,$J,358.3,35205,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35205,1,3,0)
;;=3^Solitary Pulmonary Nodule
;;^UTILITY(U,$J,358.3,35205,1,4,0)
;;=4^R91.1
;;^UTILITY(U,$J,358.3,35205,2)
;;=^5019707
;;^UTILITY(U,$J,358.3,35206,0)
;;=R05.9^^105^1443^15
;;^UTILITY(U,$J,358.3,35206,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35206,1,3,0)
;;=3^Cough,Unspec
;;^UTILITY(U,$J,358.3,35206,1,4,0)
;;=4^R05.9
;;^UTILITY(U,$J,358.3,35206,2)
;;=^5161232
;;^UTILITY(U,$J,358.3,35207,0)
;;=T74.21XA^^105^1444^7
;;^UTILITY(U,$J,358.3,35207,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35207,1,3,0)
;;=3^Adult Sexual Abuse,Confirmed,Init Encntr
;;^UTILITY(U,$J,358.3,35207,1,4,0)
;;=4^T74.21XA
;;^UTILITY(U,$J,358.3,35207,2)
;;=^5054152
;;^UTILITY(U,$J,358.3,35208,0)
;;=T76.21XA^^105^1444^10
;;^UTILITY(U,$J,358.3,35208,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35208,1,3,0)
;;=3^Adult Sexual Abuse,Suspected,Init Encntr
;;^UTILITY(U,$J,358.3,35208,1,4,0)
;;=4^T76.21XA
;;^UTILITY(U,$J,358.3,35208,2)
;;=^5054227
;;^UTILITY(U,$J,358.3,35209,0)
;;=Y07.9^^105^1444^15
;;^UTILITY(U,$J,358.3,35209,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35209,1,3,0)
;;=3^Perpetrator of Maltreatment/Neglect,Unspec
;;^UTILITY(U,$J,358.3,35209,1,4,0)
;;=4^Y07.9
;;^UTILITY(U,$J,358.3,35209,2)
;;=^5061209
;;^UTILITY(U,$J,358.3,35210,0)
;;=T74.21XD^^105^1444^8
;;^UTILITY(U,$J,358.3,35210,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35210,1,3,0)
;;=3^Adult Sexual Abuse,Confirmed,Sub Encntr
;;^UTILITY(U,$J,358.3,35210,1,4,0)
;;=4^T74.21XD
;;^UTILITY(U,$J,358.3,35210,2)
;;=^5054153
;;^UTILITY(U,$J,358.3,35211,0)
;;=T74.21XS^^105^1444^9
;;^UTILITY(U,$J,358.3,35211,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35211,1,3,0)
;;=3^Adult Sexual Abuse,Confirmed,Sequela
;;^UTILITY(U,$J,358.3,35211,1,4,0)
;;=4^T74.21XS
;;^UTILITY(U,$J,358.3,35211,2)
;;=^5054154
;;^UTILITY(U,$J,358.3,35212,0)
;;=T76.21XD^^105^1444^11
;;^UTILITY(U,$J,358.3,35212,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35212,1,3,0)
;;=3^Adult Sexual Abuse,Suspected,Sub Encntr
;;^UTILITY(U,$J,358.3,35212,1,4,0)
;;=4^T76.21XD
;;^UTILITY(U,$J,358.3,35212,2)
;;=^5054228
;;^UTILITY(U,$J,358.3,35213,0)
;;=T76.21XS^^105^1444^12
;;^UTILITY(U,$J,358.3,35213,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35213,1,3,0)
;;=3^Adult Sexual Abuse,Suspected,Sequela
;;^UTILITY(U,$J,358.3,35213,1,4,0)
;;=4^T76.21XS
;;^UTILITY(U,$J,358.3,35213,2)
;;=^5054229
;;^UTILITY(U,$J,358.3,35214,0)
;;=Y07.53^^105^1444^13
;;^UTILITY(U,$J,358.3,35214,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35214,1,3,0)
;;=3^Instructor,Perpetrator of MST
;;^UTILITY(U,$J,358.3,35214,1,4,0)
;;=4^Y07.53
;;^UTILITY(U,$J,358.3,35214,2)
;;=^5061207
;;^UTILITY(U,$J,358.3,35215,0)
;;=Y07.59^^105^1444^14
;;^UTILITY(U,$J,358.3,35215,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35215,1,3,0)
;;=3^Non-Family Member,Perpetrator of MST/Abuse NEC
;;^UTILITY(U,$J,358.3,35215,1,4,0)
;;=4^Y07.59
;;^UTILITY(U,$J,358.3,35215,2)
;;=^5061208
;;^UTILITY(U,$J,358.3,35216,0)
;;=T74.51XA^^105^1444^1
;;^UTILITY(U,$J,358.3,35216,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35216,1,3,0)
;;=3^Adult Forced Sexual Exploit,Confirmed,Init enctr
;;^UTILITY(U,$J,358.3,35216,1,4,0)
;;=4^T74.51XA
;;^UTILITY(U,$J,358.3,35216,2)
;;=^5157560
;;^UTILITY(U,$J,358.3,35217,0)
;;=T74.51XD^^105^1444^2
;;^UTILITY(U,$J,358.3,35217,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35217,1,3,0)
;;=3^Adult Forced Sexual Exploit,Confirmed,Subs
;;^UTILITY(U,$J,358.3,35217,1,4,0)
;;=4^T74.51XD
;;^UTILITY(U,$J,358.3,35217,2)
;;=^5157561
;;^UTILITY(U,$J,358.3,35218,0)
;;=T74.51XS^^105^1444^3
;;^UTILITY(U,$J,358.3,35218,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35218,1,3,0)
;;=3^Adult Forced Sexual Exploit,Confirmed,Sequela
;;^UTILITY(U,$J,358.3,35218,1,4,0)
;;=4^T74.51XS
;;^UTILITY(U,$J,358.3,35218,2)
;;=^5157562
;;^UTILITY(U,$J,358.3,35219,0)
;;=T76.51XA^^105^1444^4
;;^UTILITY(U,$J,358.3,35219,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35219,1,3,0)
;;=3^Adult Forced Sexual Exploit,Suspected,Init
;;^UTILITY(U,$J,358.3,35219,1,4,0)
;;=4^T76.51XA
;;^UTILITY(U,$J,358.3,35219,2)
;;=^5157572
;;^UTILITY(U,$J,358.3,35220,0)
;;=T76.51XD^^105^1444^5
;;^UTILITY(U,$J,358.3,35220,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35220,1,3,0)
;;=3^Adult Forced Sexual Exploit,Suspected,Subs
;;^UTILITY(U,$J,358.3,35220,1,4,0)
;;=4^T76.51XD
;;^UTILITY(U,$J,358.3,35220,2)
;;=^5157573
;;^UTILITY(U,$J,358.3,35221,0)
;;=T76.51XS^^105^1444^6
;;^UTILITY(U,$J,358.3,35221,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35221,1,3,0)
;;=3^Adult Forced Sexual Exploit,Suspected,Sequela
;;^UTILITY(U,$J,358.3,35221,1,4,0)
;;=4^T76.51XS
;;^UTILITY(U,$J,358.3,35221,2)
;;=^5157574
;;^UTILITY(U,$J,358.3,35222,0)
;;=E66.01^^105^1445^124
;;^UTILITY(U,$J,358.3,35222,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35222,1,3,0)
;;=3^Morbid Obesity
;;^UTILITY(U,$J,358.3,35222,1,4,0)
;;=4^E66.01
;;^UTILITY(U,$J,358.3,35222,2)
;;=^5002826
;;^UTILITY(U,$J,358.3,35223,0)
;;=F18.10^^105^1445^99
;;^UTILITY(U,$J,358.3,35223,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35223,1,3,0)
;;=3^Inhalant Abuse,Uncomplicated
;;^UTILITY(U,$J,358.3,35223,1,4,0)
;;=4^F18.10
;;^UTILITY(U,$J,358.3,35223,2)
;;=^5003380
;;^UTILITY(U,$J,358.3,35224,0)
;;=F55.0^^105^1445^41
;;^UTILITY(U,$J,358.3,35224,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35224,1,3,0)
;;=3^Antacid Abuse
;;^UTILITY(U,$J,358.3,35224,1,4,0)
;;=4^F55.0
;;^UTILITY(U,$J,358.3,35224,2)
;;=^5003628
;;^UTILITY(U,$J,358.3,35225,0)
;;=F18.90^^105^1445^100
;;^UTILITY(U,$J,358.3,35225,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35225,1,3,0)
;;=3^Inhalant Use Uncomplicated,Unspec
;;^UTILITY(U,$J,358.3,35225,1,4,0)
;;=4^F18.90
;;^UTILITY(U,$J,358.3,35225,2)
;;=^5003405
;;^UTILITY(U,$J,358.3,35226,0)
;;=F55.2^^105^1445^106
;;^UTILITY(U,$J,358.3,35226,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35226,1,3,0)
;;=3^Laxative Abuse
;;^UTILITY(U,$J,358.3,35226,1,4,0)
;;=4^F55.2
;;^UTILITY(U,$J,358.3,35226,2)
;;=^5003630
;;^UTILITY(U,$J,358.3,35227,0)
;;=F55.1^^105^1445^85
;;^UTILITY(U,$J,358.3,35227,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35227,1,3,0)
;;=3^Herbal/Folk Remedy Abuse
;;^UTILITY(U,$J,358.3,35227,1,4,0)
;;=4^F55.1
;;^UTILITY(U,$J,358.3,35227,2)
;;=^5003629
;;^UTILITY(U,$J,358.3,35228,0)
;;=F55.8^^105^1445^128
;;^UTILITY(U,$J,358.3,35228,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35228,1,3,0)
;;=3^Non-Psychoactive Substance Abuse
;;^UTILITY(U,$J,358.3,35228,1,4,0)
;;=4^F55.8
;;^UTILITY(U,$J,358.3,35228,2)
;;=^5003633
;;^UTILITY(U,$J,358.3,35229,0)
;;=F55.4^^105^1445^167
;;^UTILITY(U,$J,358.3,35229,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35229,1,3,0)
;;=3^Vitamin Abuse
;;^UTILITY(U,$J,358.3,35229,1,4,0)
;;=4^F55.4
;;^UTILITY(U,$J,358.3,35229,2)
;;=^5003632
;;^UTILITY(U,$J,358.3,35230,0)
;;=F55.3^^105^1445^157
;;^UTILITY(U,$J,358.3,35230,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35230,1,3,0)
;;=3^Steroid/Hormone Abuse
;;^UTILITY(U,$J,358.3,35230,1,4,0)
;;=4^F55.3
;;^UTILITY(U,$J,358.3,35230,2)
;;=^5003631
;;^UTILITY(U,$J,358.3,35231,0)
;;=F51.09^^105^1445^101
;;^UTILITY(U,$J,358.3,35231,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35231,1,3,0)
;;=3^Insomnia not d/t Substance/Known Physiol Condition
;;^UTILITY(U,$J,358.3,35231,1,4,0)
;;=4^F51.09
;;^UTILITY(U,$J,358.3,35231,2)
;;=^5003608
;;^UTILITY(U,$J,358.3,35232,0)
;;=H53.9^^105^1445^165
;;^UTILITY(U,$J,358.3,35232,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35232,1,3,0)
;;=3^Visual Disturbance,Unspec
;;^UTILITY(U,$J,358.3,35232,1,4,0)
;;=4^H53.9
;;^UTILITY(U,$J,358.3,35232,2)
;;=^124001
;;^UTILITY(U,$J,358.3,35233,0)
;;=I89.0^^105^1445^117
;;^UTILITY(U,$J,358.3,35233,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35233,1,3,0)
;;=3^Lymphedema NEC
;;^UTILITY(U,$J,358.3,35233,1,4,0)
;;=4^I89.0
;;^UTILITY(U,$J,358.3,35233,2)
;;=^5008073
;;^UTILITY(U,$J,358.3,35234,0)
;;=I87.1^^105^1445^164
;;^UTILITY(U,$J,358.3,35234,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35234,1,3,0)
;;=3^Vein Compression
;;^UTILITY(U,$J,358.3,35234,1,4,0)
;;=4^I87.1
;;^UTILITY(U,$J,358.3,35234,2)
;;=^269850
;;^UTILITY(U,$J,358.3,35235,0)
;;=N39.3^^105^1445^158
;;^UTILITY(U,$J,358.3,35235,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35235,1,3,0)
;;=3^Stress Incontinence (Female/Male)
;;^UTILITY(U,$J,358.3,35235,1,4,0)
;;=4^N39.3
;;^UTILITY(U,$J,358.3,35235,2)
;;=^5015679
;;^UTILITY(U,$J,358.3,35236,0)
;;=R26.2^^105^1445^61
;;^UTILITY(U,$J,358.3,35236,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35236,1,3,0)
;;=3^Difficulty in Walking NEC
;;^UTILITY(U,$J,358.3,35236,1,4,0)
;;=4^R26.2
;;^UTILITY(U,$J,358.3,35236,2)
;;=^5019306
;;^UTILITY(U,$J,358.3,35237,0)
;;=M54.6^^105^1445^160
;;^UTILITY(U,$J,358.3,35237,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35237,1,3,0)
;;=3^Thoracic Spine Pain
;;^UTILITY(U,$J,358.3,35237,1,4,0)
;;=4^M54.6
;;^UTILITY(U,$J,358.3,35237,2)
;;=^272507
;;^UTILITY(U,$J,358.3,35238,0)
;;=E66.8^^105^1445^129
;;^UTILITY(U,$J,358.3,35238,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35238,1,3,0)
;;=3^Obesity NEC
;;^UTILITY(U,$J,358.3,35238,1,4,0)
;;=4^E66.8
;;^UTILITY(U,$J,358.3,35238,2)
;;=^5002831
;;^UTILITY(U,$J,358.3,35239,0)
;;=E66.9^^105^1445^130
;;^UTILITY(U,$J,358.3,35239,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35239,1,3,0)
;;=3^Obesity,Unspec
;;^UTILITY(U,$J,358.3,35239,1,4,0)
;;=4^E66.9
;;^UTILITY(U,$J,358.3,35239,2)
;;=^5002832
;;^UTILITY(U,$J,358.3,35240,0)
;;=F18.120^^105^1445^98
;;^UTILITY(U,$J,358.3,35240,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35240,1,3,0)
;;=3^Inhalant Abuse w/ Intoxication,Uncomplicated
;;^UTILITY(U,$J,358.3,35240,1,4,0)
;;=4^F18.120
;;^UTILITY(U,$J,358.3,35240,2)
;;=^5003381
;;^UTILITY(U,$J,358.3,35241,0)
;;=G44.1^^105^1445^163
;;^UTILITY(U,$J,358.3,35241,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35241,1,3,0)
;;=3^Vascular Headache NEC
;;^UTILITY(U,$J,358.3,35241,1,4,0)
;;=4^G44.1
;;^UTILITY(U,$J,358.3,35241,2)
;;=^5003934
;;^UTILITY(U,$J,358.3,35242,0)
;;=G93.3^^105^1445^148
;;^UTILITY(U,$J,358.3,35242,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35242,1,3,0)
;;=3^Postviral Fatigue Syndrome
;;^UTILITY(U,$J,358.3,35242,1,4,0)
;;=4^G93.3
;;^UTILITY(U,$J,358.3,35242,2)
;;=^5004181
;;^UTILITY(U,$J,358.3,35243,0)
;;=K08.101^^105^1445^55
;;^UTILITY(U,$J,358.3,35243,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35243,1,3,0)
;;=3^Complete Loss of Teeth,Unspec,Class I
;;^UTILITY(U,$J,358.3,35243,1,4,0)
;;=4^K08.101
;;^UTILITY(U,$J,358.3,35243,2)
;;=^5008406
;;^UTILITY(U,$J,358.3,35244,0)
;;=K08.102^^105^1445^56
;;^UTILITY(U,$J,358.3,35244,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35244,1,3,0)
;;=3^Complete Loss of Teeth,Unspec,Class II
;;^UTILITY(U,$J,358.3,35244,1,4,0)
;;=4^K08.102
;;^UTILITY(U,$J,358.3,35244,2)
;;=^5008407
;;^UTILITY(U,$J,358.3,35245,0)
;;=K08.103^^105^1445^57
;;^UTILITY(U,$J,358.3,35245,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35245,1,3,0)
;;=3^Complete Loss of Teeth,Unspec,Class III
;;^UTILITY(U,$J,358.3,35245,1,4,0)
;;=4^K08.103
;;^UTILITY(U,$J,358.3,35245,2)
;;=^5008408
;;^UTILITY(U,$J,358.3,35246,0)
;;=K08.104^^105^1445^58
;;^UTILITY(U,$J,358.3,35246,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35246,1,3,0)
;;=3^Complete Loss of Teeth,Unspec,Class IV
;;^UTILITY(U,$J,358.3,35246,1,4,0)
;;=4^K08.104
;;^UTILITY(U,$J,358.3,35246,2)
;;=^5008409
;;^UTILITY(U,$J,358.3,35247,0)
;;=K08.109^^105^1445^59
;;^UTILITY(U,$J,358.3,35247,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35247,1,3,0)
;;=3^Complete Loss of Teeth,Unspec,Class Unspec
;;^UTILITY(U,$J,358.3,35247,1,4,0)
;;=4^K08.109
;;^UTILITY(U,$J,358.3,35247,2)
;;=^5008410
;;^UTILITY(U,$J,358.3,35248,0)
;;=K08.401^^105^1445^137
;;^UTILITY(U,$J,358.3,35248,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35248,1,3,0)
;;=3^Partial Loss of Teeth,Unspec,Class I
;;^UTILITY(U,$J,358.3,35248,1,4,0)
;;=4^K08.401
;;^UTILITY(U,$J,358.3,35248,2)
;;=^5008432
;;^UTILITY(U,$J,358.3,35249,0)
;;=K08.402^^105^1445^138
;;^UTILITY(U,$J,358.3,35249,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,35249,1,3,0)
;;=3^Partial Loss of Teeth,Unspec,Class II
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI0E1 19818 printed Nov 22, 2024@16:57:03 Page 2
IBDEI0E1 ; ; 03-MAY-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;MAY 03, 2022
+2 if 'DIFQR(358.3)
QUIT
FOR I=1:2
SET X=$TEXT(Q+I)
if X=""
QUIT
SET Y=$EXTRACT($TEXT(Q+I+1),4,999)
SET X=$EXTRACT(X,4,999)
if $ASCII(Y)=126
SET I=I+1
SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)
if $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,358.3,35180,1,4,0)
+2 ;;=4^J47.9
+3 ;;^UTILITY(U,$J,358.3,35180,2)
+4 ;;=^5008260
+5 ;;^UTILITY(U,$J,358.3,35181,0)
+6 ;;=J47.1^^105^1443^7
+7 ;;^UTILITY(U,$J,358.3,35181,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,35181,1,3,0)
+10 ;;=3^Bronchiectasis w/ Acute Exacerbation
+11 ;;^UTILITY(U,$J,358.3,35181,1,4,0)
+12 ;;=4^J47.1
+13 ;;^UTILITY(U,$J,358.3,35181,2)
+14 ;;=^5008259
+15 ;;^UTILITY(U,$J,358.3,35182,0)
+16 ;;=J47.0^^105^1443^8
+17 ;;^UTILITY(U,$J,358.3,35182,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,35182,1,3,0)
+20 ;;=3^Bronchiectasis w/ Acute Lower Respiratory Infection
+21 ;;^UTILITY(U,$J,358.3,35182,1,4,0)
+22 ;;=4^J47.0
+23 ;;^UTILITY(U,$J,358.3,35182,2)
+24 ;;=^5008258
+25 ;;^UTILITY(U,$J,358.3,35183,0)
+26 ;;=R09.1^^105^1443^37
+27 ;;^UTILITY(U,$J,358.3,35183,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,35183,1,3,0)
+30 ;;=3^Pleurisy
+31 ;;^UTILITY(U,$J,358.3,35183,1,4,0)
+32 ;;=4^R09.1
+33 ;;^UTILITY(U,$J,358.3,35183,2)
+34 ;;=^95428
+35 ;;^UTILITY(U,$J,358.3,35184,0)
+36 ;;=J94.9^^105^1443^33
+37 ;;^UTILITY(U,$J,358.3,35184,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,35184,1,3,0)
+40 ;;=3^Pleural Condition,Unspec
+41 ;;^UTILITY(U,$J,358.3,35184,1,4,0)
+42 ;;=4^J94.9
+43 ;;^UTILITY(U,$J,358.3,35184,2)
+44 ;;=^5008320
+45 ;;^UTILITY(U,$J,358.3,35185,0)
+46 ;;=J92.9^^105^1443^36
+47 ;;^UTILITY(U,$J,358.3,35185,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,35185,1,3,0)
+50 ;;=3^Pleural Plaque w/o Asbestos
+51 ;;^UTILITY(U,$J,358.3,35185,1,4,0)
+52 ;;=4^J92.9
+53 ;;^UTILITY(U,$J,358.3,35185,2)
+54 ;;=^5008313
+55 ;;^UTILITY(U,$J,358.3,35186,0)
+56 ;;=J94.8^^105^1443^34
+57 ;;^UTILITY(U,$J,358.3,35186,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,35186,1,3,0)
+60 ;;=3^Pleural Conditions,Other Spec
+61 ;;^UTILITY(U,$J,358.3,35186,1,4,0)
+62 ;;=4^J94.8
+63 ;;^UTILITY(U,$J,358.3,35186,2)
+64 ;;=^5008319
+65 ;;^UTILITY(U,$J,358.3,35187,0)
+66 ;;=J86.9^^105^1443^38
+67 ;;^UTILITY(U,$J,358.3,35187,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,35187,1,3,0)
+70 ;;=3^Pyothorax w/o Fistula
+71 ;;^UTILITY(U,$J,358.3,35187,1,4,0)
+72 ;;=4^J86.9
+73 ;;^UTILITY(U,$J,358.3,35187,2)
+74 ;;=^5008309
+75 ;;^UTILITY(U,$J,358.3,35188,0)
+76 ;;=J91.8^^105^1443^35
+77 ;;^UTILITY(U,$J,358.3,35188,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,35188,1,3,0)
+80 ;;=3^Pleural Effusion in Other Conditions
+81 ;;^UTILITY(U,$J,358.3,35188,1,4,0)
+82 ;;=4^J91.8
+83 ;;^UTILITY(U,$J,358.3,35188,2)
+84 ;;=^5008311
+85 ;;^UTILITY(U,$J,358.3,35189,0)
+86 ;;=J84.9^^105^1443^29
+87 ;;^UTILITY(U,$J,358.3,35189,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,35189,1,3,0)
+90 ;;=3^Interstitial Pulmonary Disease/Pneumonia,Unspec
+91 ;;^UTILITY(U,$J,358.3,35189,1,4,0)
+92 ;;=4^J84.9
+93 ;;^UTILITY(U,$J,358.3,35189,2)
+94 ;;=^5008304
+95 ;;^UTILITY(U,$J,358.3,35190,0)
+96 ;;=J98.01^^105^1443^11
+97 ;;^UTILITY(U,$J,358.3,35190,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,35190,1,3,0)
+100 ;;=3^Bronchospasm,Acute
+101 ;;^UTILITY(U,$J,358.3,35190,1,4,0)
+102 ;;=4^J98.01
+103 ;;^UTILITY(U,$J,358.3,35190,2)
+104 ;;=^334092
+105 ;;^UTILITY(U,$J,358.3,35191,0)
+106 ;;=G47.30^^105^1443^53
+107 ;;^UTILITY(U,$J,358.3,35191,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,35191,1,3,0)
+110 ;;=3^Sleep Apnea,Unspec
+111 ;;^UTILITY(U,$J,358.3,35191,1,4,0)
+112 ;;=4^G47.30
+113 ;;^UTILITY(U,$J,358.3,35191,2)
+114 ;;=^5003977
+115 ;;^UTILITY(U,$J,358.3,35192,0)
+116 ;;=R06.02^^105^1443^52
+117 ;;^UTILITY(U,$J,358.3,35192,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,35192,1,3,0)
+120 ;;=3^Shortness of Breath
+121 ;;^UTILITY(U,$J,358.3,35192,1,4,0)
+122 ;;=4^R06.02
+123 ;;^UTILITY(U,$J,358.3,35192,2)
+124 ;;=^5019181
+125 ;;^UTILITY(U,$J,358.3,35193,0)
+126 ;;=R06.09^^105^1443^17
+127 ;;^UTILITY(U,$J,358.3,35193,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,35193,1,3,0)
+130 ;;=3^Dyspnea,Other Forms
+131 ;;^UTILITY(U,$J,358.3,35193,1,4,0)
+132 ;;=4^R06.09
+133 ;;^UTILITY(U,$J,358.3,35193,2)
+134 ;;=^5019182
+135 ;;^UTILITY(U,$J,358.3,35194,0)
+136 ;;=R06.00^^105^1443^18
+137 ;;^UTILITY(U,$J,358.3,35194,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,35194,1,3,0)
+140 ;;=3^Dyspnea,Unspec
+141 ;;^UTILITY(U,$J,358.3,35194,1,4,0)
+142 ;;=4^R06.00
+143 ;;^UTILITY(U,$J,358.3,35194,2)
+144 ;;=^5019180
+145 ;;^UTILITY(U,$J,358.3,35195,0)
+146 ;;=R06.89^^105^1443^6
+147 ;;^UTILITY(U,$J,358.3,35195,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,35195,1,3,0)
+150 ;;=3^Breathing Abnormalities,Other
+151 ;;^UTILITY(U,$J,358.3,35195,1,4,0)
+152 ;;=4^R06.89
+153 ;;^UTILITY(U,$J,358.3,35195,2)
+154 ;;=^5019193
+155 ;;^UTILITY(U,$J,358.3,35196,0)
+156 ;;=R06.83^^105^1443^54
+157 ;;^UTILITY(U,$J,358.3,35196,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,35196,1,3,0)
+160 ;;=3^Snoring
+161 ;;^UTILITY(U,$J,358.3,35196,1,4,0)
+162 ;;=4^R06.83
+163 ;;^UTILITY(U,$J,358.3,35196,2)
+164 ;;=^5019192
+165 ;;^UTILITY(U,$J,358.3,35197,0)
+166 ;;=R06.3^^105^1443^32
+167 ;;^UTILITY(U,$J,358.3,35197,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,35197,1,3,0)
+170 ;;=3^Periodic Breathing
+171 ;;^UTILITY(U,$J,358.3,35197,1,4,0)
+172 ;;=4^R06.3
+173 ;;^UTILITY(U,$J,358.3,35197,2)
+174 ;;=^5019185
+175 ;;^UTILITY(U,$J,358.3,35198,0)
+176 ;;=R06.1^^105^1443^56
+177 ;;^UTILITY(U,$J,358.3,35198,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,35198,1,3,0)
+180 ;;=3^Stridor
+181 ;;^UTILITY(U,$J,358.3,35198,1,4,0)
+182 ;;=4^R06.1
+183 ;;^UTILITY(U,$J,358.3,35198,2)
+184 ;;=^5019183
+185 ;;^UTILITY(U,$J,358.3,35199,0)
+186 ;;=R04.2^^105^1443^24
+187 ;;^UTILITY(U,$J,358.3,35199,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,35199,1,3,0)
+190 ;;=3^Hemoptysis
+191 ;;^UTILITY(U,$J,358.3,35199,1,4,0)
+192 ;;=4^R04.2
+193 ;;^UTILITY(U,$J,358.3,35199,2)
+194 ;;=^5019175
+195 ;;^UTILITY(U,$J,358.3,35200,0)
+196 ;;=R91.8^^105^1443^1
+197 ;;^UTILITY(U,$J,358.3,35200,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,35200,1,3,0)
+200 ;;=3^Abnormal Finding of Lung Field,Other Nonspecific
+201 ;;^UTILITY(U,$J,358.3,35200,1,4,0)
+202 ;;=4^R91.8
+203 ;;^UTILITY(U,$J,358.3,35200,2)
+204 ;;=^5019708
+205 ;;^UTILITY(U,$J,358.3,35201,0)
+206 ;;=R06.2^^105^1443^57
+207 ;;^UTILITY(U,$J,358.3,35201,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,35201,1,3,0)
+210 ;;=3^Wheezing
+211 ;;^UTILITY(U,$J,358.3,35201,1,4,0)
+212 ;;=4^R06.2
+213 ;;^UTILITY(U,$J,358.3,35201,2)
+214 ;;=^5019184
+215 ;;^UTILITY(U,$J,358.3,35202,0)
+216 ;;=J44.0^^105^1443^12
+217 ;;^UTILITY(U,$J,358.3,35202,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,35202,1,3,0)
+220 ;;=3^COPD w/ (Acute) Lower Respiratory Infection
+221 ;;^UTILITY(U,$J,358.3,35202,1,4,0)
+222 ;;=4^J44.0
+223 ;;^UTILITY(U,$J,358.3,35202,2)
+224 ;;=^5008239
+225 ;;^UTILITY(U,$J,358.3,35203,0)
+226 ;;=J94.1^^105^1443^23
+227 ;;^UTILITY(U,$J,358.3,35203,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,35203,1,3,0)
+230 ;;=3^Fibrothorax
+231 ;;^UTILITY(U,$J,358.3,35203,1,4,0)
+232 ;;=4^J94.1
+233 ;;^UTILITY(U,$J,358.3,35203,2)
+234 ;;=^5008317
+235 ;;^UTILITY(U,$J,358.3,35204,0)
+236 ;;=G47.33^^105^1443^31
+237 ;;^UTILITY(U,$J,358.3,35204,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,35204,1,3,0)
+240 ;;=3^Obstructive Sleep Apnea
+241 ;;^UTILITY(U,$J,358.3,35204,1,4,0)
+242 ;;=4^G47.33
+243 ;;^UTILITY(U,$J,358.3,35204,2)
+244 ;;=^332763
+245 ;;^UTILITY(U,$J,358.3,35205,0)
+246 ;;=R91.1^^105^1443^55
+247 ;;^UTILITY(U,$J,358.3,35205,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,35205,1,3,0)
+250 ;;=3^Solitary Pulmonary Nodule
+251 ;;^UTILITY(U,$J,358.3,35205,1,4,0)
+252 ;;=4^R91.1
+253 ;;^UTILITY(U,$J,358.3,35205,2)
+254 ;;=^5019707
+255 ;;^UTILITY(U,$J,358.3,35206,0)
+256 ;;=R05.9^^105^1443^15
+257 ;;^UTILITY(U,$J,358.3,35206,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,35206,1,3,0)
+260 ;;=3^Cough,Unspec
+261 ;;^UTILITY(U,$J,358.3,35206,1,4,0)
+262 ;;=4^R05.9
+263 ;;^UTILITY(U,$J,358.3,35206,2)
+264 ;;=^5161232
+265 ;;^UTILITY(U,$J,358.3,35207,0)
+266 ;;=T74.21XA^^105^1444^7
+267 ;;^UTILITY(U,$J,358.3,35207,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,35207,1,3,0)
+270 ;;=3^Adult Sexual Abuse,Confirmed,Init Encntr
+271 ;;^UTILITY(U,$J,358.3,35207,1,4,0)
+272 ;;=4^T74.21XA
+273 ;;^UTILITY(U,$J,358.3,35207,2)
+274 ;;=^5054152
+275 ;;^UTILITY(U,$J,358.3,35208,0)
+276 ;;=T76.21XA^^105^1444^10
+277 ;;^UTILITY(U,$J,358.3,35208,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,35208,1,3,0)
+280 ;;=3^Adult Sexual Abuse,Suspected,Init Encntr
+281 ;;^UTILITY(U,$J,358.3,35208,1,4,0)
+282 ;;=4^T76.21XA
+283 ;;^UTILITY(U,$J,358.3,35208,2)
+284 ;;=^5054227
+285 ;;^UTILITY(U,$J,358.3,35209,0)
+286 ;;=Y07.9^^105^1444^15
+287 ;;^UTILITY(U,$J,358.3,35209,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,35209,1,3,0)
+290 ;;=3^Perpetrator of Maltreatment/Neglect,Unspec
+291 ;;^UTILITY(U,$J,358.3,35209,1,4,0)
+292 ;;=4^Y07.9
+293 ;;^UTILITY(U,$J,358.3,35209,2)
+294 ;;=^5061209
+295 ;;^UTILITY(U,$J,358.3,35210,0)
+296 ;;=T74.21XD^^105^1444^8
+297 ;;^UTILITY(U,$J,358.3,35210,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,35210,1,3,0)
+300 ;;=3^Adult Sexual Abuse,Confirmed,Sub Encntr
+301 ;;^UTILITY(U,$J,358.3,35210,1,4,0)
+302 ;;=4^T74.21XD
+303 ;;^UTILITY(U,$J,358.3,35210,2)
+304 ;;=^5054153
+305 ;;^UTILITY(U,$J,358.3,35211,0)
+306 ;;=T74.21XS^^105^1444^9
+307 ;;^UTILITY(U,$J,358.3,35211,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,35211,1,3,0)
+310 ;;=3^Adult Sexual Abuse,Confirmed,Sequela
+311 ;;^UTILITY(U,$J,358.3,35211,1,4,0)
+312 ;;=4^T74.21XS
+313 ;;^UTILITY(U,$J,358.3,35211,2)
+314 ;;=^5054154
+315 ;;^UTILITY(U,$J,358.3,35212,0)
+316 ;;=T76.21XD^^105^1444^11
+317 ;;^UTILITY(U,$J,358.3,35212,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,35212,1,3,0)
+320 ;;=3^Adult Sexual Abuse,Suspected,Sub Encntr
+321 ;;^UTILITY(U,$J,358.3,35212,1,4,0)
+322 ;;=4^T76.21XD
+323 ;;^UTILITY(U,$J,358.3,35212,2)
+324 ;;=^5054228
+325 ;;^UTILITY(U,$J,358.3,35213,0)
+326 ;;=T76.21XS^^105^1444^12
+327 ;;^UTILITY(U,$J,358.3,35213,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,35213,1,3,0)
+330 ;;=3^Adult Sexual Abuse,Suspected,Sequela
+331 ;;^UTILITY(U,$J,358.3,35213,1,4,0)
+332 ;;=4^T76.21XS
+333 ;;^UTILITY(U,$J,358.3,35213,2)
+334 ;;=^5054229
+335 ;;^UTILITY(U,$J,358.3,35214,0)
+336 ;;=Y07.53^^105^1444^13
+337 ;;^UTILITY(U,$J,358.3,35214,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,35214,1,3,0)
+340 ;;=3^Instructor,Perpetrator of MST
+341 ;;^UTILITY(U,$J,358.3,35214,1,4,0)
+342 ;;=4^Y07.53
+343 ;;^UTILITY(U,$J,358.3,35214,2)
+344 ;;=^5061207
+345 ;;^UTILITY(U,$J,358.3,35215,0)
+346 ;;=Y07.59^^105^1444^14
+347 ;;^UTILITY(U,$J,358.3,35215,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,35215,1,3,0)
+350 ;;=3^Non-Family Member,Perpetrator of MST/Abuse NEC
+351 ;;^UTILITY(U,$J,358.3,35215,1,4,0)
+352 ;;=4^Y07.59
+353 ;;^UTILITY(U,$J,358.3,35215,2)
+354 ;;=^5061208
+355 ;;^UTILITY(U,$J,358.3,35216,0)
+356 ;;=T74.51XA^^105^1444^1
+357 ;;^UTILITY(U,$J,358.3,35216,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,35216,1,3,0)
+360 ;;=3^Adult Forced Sexual Exploit,Confirmed,Init enctr
+361 ;;^UTILITY(U,$J,358.3,35216,1,4,0)
+362 ;;=4^T74.51XA
+363 ;;^UTILITY(U,$J,358.3,35216,2)
+364 ;;=^5157560
+365 ;;^UTILITY(U,$J,358.3,35217,0)
+366 ;;=T74.51XD^^105^1444^2
+367 ;;^UTILITY(U,$J,358.3,35217,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,35217,1,3,0)
+370 ;;=3^Adult Forced Sexual Exploit,Confirmed,Subs
+371 ;;^UTILITY(U,$J,358.3,35217,1,4,0)
+372 ;;=4^T74.51XD
+373 ;;^UTILITY(U,$J,358.3,35217,2)
+374 ;;=^5157561
+375 ;;^UTILITY(U,$J,358.3,35218,0)
+376 ;;=T74.51XS^^105^1444^3
+377 ;;^UTILITY(U,$J,358.3,35218,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,35218,1,3,0)
+380 ;;=3^Adult Forced Sexual Exploit,Confirmed,Sequela
+381 ;;^UTILITY(U,$J,358.3,35218,1,4,0)
+382 ;;=4^T74.51XS
+383 ;;^UTILITY(U,$J,358.3,35218,2)
+384 ;;=^5157562
+385 ;;^UTILITY(U,$J,358.3,35219,0)
+386 ;;=T76.51XA^^105^1444^4
+387 ;;^UTILITY(U,$J,358.3,35219,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,35219,1,3,0)
+390 ;;=3^Adult Forced Sexual Exploit,Suspected,Init
+391 ;;^UTILITY(U,$J,358.3,35219,1,4,0)
+392 ;;=4^T76.51XA
+393 ;;^UTILITY(U,$J,358.3,35219,2)
+394 ;;=^5157572
+395 ;;^UTILITY(U,$J,358.3,35220,0)
+396 ;;=T76.51XD^^105^1444^5
+397 ;;^UTILITY(U,$J,358.3,35220,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,35220,1,3,0)
+400 ;;=3^Adult Forced Sexual Exploit,Suspected,Subs
+401 ;;^UTILITY(U,$J,358.3,35220,1,4,0)
+402 ;;=4^T76.51XD
+403 ;;^UTILITY(U,$J,358.3,35220,2)
+404 ;;=^5157573
+405 ;;^UTILITY(U,$J,358.3,35221,0)
+406 ;;=T76.51XS^^105^1444^6
+407 ;;^UTILITY(U,$J,358.3,35221,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,35221,1,3,0)
+410 ;;=3^Adult Forced Sexual Exploit,Suspected,Sequela
+411 ;;^UTILITY(U,$J,358.3,35221,1,4,0)
+412 ;;=4^T76.51XS
+413 ;;^UTILITY(U,$J,358.3,35221,2)
+414 ;;=^5157574
+415 ;;^UTILITY(U,$J,358.3,35222,0)
+416 ;;=E66.01^^105^1445^124
+417 ;;^UTILITY(U,$J,358.3,35222,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,35222,1,3,0)
+420 ;;=3^Morbid Obesity
+421 ;;^UTILITY(U,$J,358.3,35222,1,4,0)
+422 ;;=4^E66.01
+423 ;;^UTILITY(U,$J,358.3,35222,2)
+424 ;;=^5002826
+425 ;;^UTILITY(U,$J,358.3,35223,0)
+426 ;;=F18.10^^105^1445^99
+427 ;;^UTILITY(U,$J,358.3,35223,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,35223,1,3,0)
+430 ;;=3^Inhalant Abuse,Uncomplicated
+431 ;;^UTILITY(U,$J,358.3,35223,1,4,0)
+432 ;;=4^F18.10
+433 ;;^UTILITY(U,$J,358.3,35223,2)
+434 ;;=^5003380
+435 ;;^UTILITY(U,$J,358.3,35224,0)
+436 ;;=F55.0^^105^1445^41
+437 ;;^UTILITY(U,$J,358.3,35224,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,35224,1,3,0)
+440 ;;=3^Antacid Abuse
+441 ;;^UTILITY(U,$J,358.3,35224,1,4,0)
+442 ;;=4^F55.0
+443 ;;^UTILITY(U,$J,358.3,35224,2)
+444 ;;=^5003628
+445 ;;^UTILITY(U,$J,358.3,35225,0)
+446 ;;=F18.90^^105^1445^100
+447 ;;^UTILITY(U,$J,358.3,35225,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,35225,1,3,0)
+450 ;;=3^Inhalant Use Uncomplicated,Unspec
+451 ;;^UTILITY(U,$J,358.3,35225,1,4,0)
+452 ;;=4^F18.90
+453 ;;^UTILITY(U,$J,358.3,35225,2)
+454 ;;=^5003405
+455 ;;^UTILITY(U,$J,358.3,35226,0)
+456 ;;=F55.2^^105^1445^106
+457 ;;^UTILITY(U,$J,358.3,35226,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,35226,1,3,0)
+460 ;;=3^Laxative Abuse
+461 ;;^UTILITY(U,$J,358.3,35226,1,4,0)
+462 ;;=4^F55.2
+463 ;;^UTILITY(U,$J,358.3,35226,2)
+464 ;;=^5003630
+465 ;;^UTILITY(U,$J,358.3,35227,0)
+466 ;;=F55.1^^105^1445^85
+467 ;;^UTILITY(U,$J,358.3,35227,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,35227,1,3,0)
+470 ;;=3^Herbal/Folk Remedy Abuse
+471 ;;^UTILITY(U,$J,358.3,35227,1,4,0)
+472 ;;=4^F55.1
+473 ;;^UTILITY(U,$J,358.3,35227,2)
+474 ;;=^5003629
+475 ;;^UTILITY(U,$J,358.3,35228,0)
+476 ;;=F55.8^^105^1445^128
+477 ;;^UTILITY(U,$J,358.3,35228,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,35228,1,3,0)
+480 ;;=3^Non-Psychoactive Substance Abuse
+481 ;;^UTILITY(U,$J,358.3,35228,1,4,0)
+482 ;;=4^F55.8
+483 ;;^UTILITY(U,$J,358.3,35228,2)
+484 ;;=^5003633
+485 ;;^UTILITY(U,$J,358.3,35229,0)
+486 ;;=F55.4^^105^1445^167
+487 ;;^UTILITY(U,$J,358.3,35229,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,35229,1,3,0)
+490 ;;=3^Vitamin Abuse
+491 ;;^UTILITY(U,$J,358.3,35229,1,4,0)
+492 ;;=4^F55.4
+493 ;;^UTILITY(U,$J,358.3,35229,2)
+494 ;;=^5003632
+495 ;;^UTILITY(U,$J,358.3,35230,0)
+496 ;;=F55.3^^105^1445^157
+497 ;;^UTILITY(U,$J,358.3,35230,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,35230,1,3,0)
+500 ;;=3^Steroid/Hormone Abuse
+501 ;;^UTILITY(U,$J,358.3,35230,1,4,0)
+502 ;;=4^F55.3
+503 ;;^UTILITY(U,$J,358.3,35230,2)
+504 ;;=^5003631
+505 ;;^UTILITY(U,$J,358.3,35231,0)
+506 ;;=F51.09^^105^1445^101
+507 ;;^UTILITY(U,$J,358.3,35231,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,35231,1,3,0)
+510 ;;=3^Insomnia not d/t Substance/Known Physiol Condition
+511 ;;^UTILITY(U,$J,358.3,35231,1,4,0)
+512 ;;=4^F51.09
+513 ;;^UTILITY(U,$J,358.3,35231,2)
+514 ;;=^5003608
+515 ;;^UTILITY(U,$J,358.3,35232,0)
+516 ;;=H53.9^^105^1445^165
+517 ;;^UTILITY(U,$J,358.3,35232,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,35232,1,3,0)
+520 ;;=3^Visual Disturbance,Unspec
+521 ;;^UTILITY(U,$J,358.3,35232,1,4,0)
+522 ;;=4^H53.9
+523 ;;^UTILITY(U,$J,358.3,35232,2)
+524 ;;=^124001
+525 ;;^UTILITY(U,$J,358.3,35233,0)
+526 ;;=I89.0^^105^1445^117
+527 ;;^UTILITY(U,$J,358.3,35233,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,35233,1,3,0)
+530 ;;=3^Lymphedema NEC
+531 ;;^UTILITY(U,$J,358.3,35233,1,4,0)
+532 ;;=4^I89.0
+533 ;;^UTILITY(U,$J,358.3,35233,2)
+534 ;;=^5008073
+535 ;;^UTILITY(U,$J,358.3,35234,0)
+536 ;;=I87.1^^105^1445^164
+537 ;;^UTILITY(U,$J,358.3,35234,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,35234,1,3,0)
+540 ;;=3^Vein Compression
+541 ;;^UTILITY(U,$J,358.3,35234,1,4,0)
+542 ;;=4^I87.1
+543 ;;^UTILITY(U,$J,358.3,35234,2)
+544 ;;=^269850
+545 ;;^UTILITY(U,$J,358.3,35235,0)
+546 ;;=N39.3^^105^1445^158
+547 ;;^UTILITY(U,$J,358.3,35235,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,35235,1,3,0)
+550 ;;=3^Stress Incontinence (Female/Male)
+551 ;;^UTILITY(U,$J,358.3,35235,1,4,0)
+552 ;;=4^N39.3
+553 ;;^UTILITY(U,$J,358.3,35235,2)
+554 ;;=^5015679
+555 ;;^UTILITY(U,$J,358.3,35236,0)
+556 ;;=R26.2^^105^1445^61
+557 ;;^UTILITY(U,$J,358.3,35236,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,35236,1,3,0)
+560 ;;=3^Difficulty in Walking NEC
+561 ;;^UTILITY(U,$J,358.3,35236,1,4,0)
+562 ;;=4^R26.2
+563 ;;^UTILITY(U,$J,358.3,35236,2)
+564 ;;=^5019306
+565 ;;^UTILITY(U,$J,358.3,35237,0)
+566 ;;=M54.6^^105^1445^160
+567 ;;^UTILITY(U,$J,358.3,35237,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,35237,1,3,0)
+570 ;;=3^Thoracic Spine Pain
+571 ;;^UTILITY(U,$J,358.3,35237,1,4,0)
+572 ;;=4^M54.6
+573 ;;^UTILITY(U,$J,358.3,35237,2)
+574 ;;=^272507
+575 ;;^UTILITY(U,$J,358.3,35238,0)
+576 ;;=E66.8^^105^1445^129
+577 ;;^UTILITY(U,$J,358.3,35238,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,35238,1,3,0)
+580 ;;=3^Obesity NEC
+581 ;;^UTILITY(U,$J,358.3,35238,1,4,0)
+582 ;;=4^E66.8
+583 ;;^UTILITY(U,$J,358.3,35238,2)
+584 ;;=^5002831
+585 ;;^UTILITY(U,$J,358.3,35239,0)
+586 ;;=E66.9^^105^1445^130
+587 ;;^UTILITY(U,$J,358.3,35239,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,35239,1,3,0)
+590 ;;=3^Obesity,Unspec
+591 ;;^UTILITY(U,$J,358.3,35239,1,4,0)
+592 ;;=4^E66.9
+593 ;;^UTILITY(U,$J,358.3,35239,2)
+594 ;;=^5002832
+595 ;;^UTILITY(U,$J,358.3,35240,0)
+596 ;;=F18.120^^105^1445^98
+597 ;;^UTILITY(U,$J,358.3,35240,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,35240,1,3,0)
+600 ;;=3^Inhalant Abuse w/ Intoxication,Uncomplicated
+601 ;;^UTILITY(U,$J,358.3,35240,1,4,0)
+602 ;;=4^F18.120
+603 ;;^UTILITY(U,$J,358.3,35240,2)
+604 ;;=^5003381
+605 ;;^UTILITY(U,$J,358.3,35241,0)
+606 ;;=G44.1^^105^1445^163
+607 ;;^UTILITY(U,$J,358.3,35241,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,35241,1,3,0)
+610 ;;=3^Vascular Headache NEC
+611 ;;^UTILITY(U,$J,358.3,35241,1,4,0)
+612 ;;=4^G44.1
+613 ;;^UTILITY(U,$J,358.3,35241,2)
+614 ;;=^5003934
+615 ;;^UTILITY(U,$J,358.3,35242,0)
+616 ;;=G93.3^^105^1445^148
+617 ;;^UTILITY(U,$J,358.3,35242,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,35242,1,3,0)
+620 ;;=3^Postviral Fatigue Syndrome
+621 ;;^UTILITY(U,$J,358.3,35242,1,4,0)
+622 ;;=4^G93.3
+623 ;;^UTILITY(U,$J,358.3,35242,2)
+624 ;;=^5004181
+625 ;;^UTILITY(U,$J,358.3,35243,0)
+626 ;;=K08.101^^105^1445^55
+627 ;;^UTILITY(U,$J,358.3,35243,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,35243,1,3,0)
+630 ;;=3^Complete Loss of Teeth,Unspec,Class I
+631 ;;^UTILITY(U,$J,358.3,35243,1,4,0)
+632 ;;=4^K08.101
+633 ;;^UTILITY(U,$J,358.3,35243,2)
+634 ;;=^5008406
+635 ;;^UTILITY(U,$J,358.3,35244,0)
+636 ;;=K08.102^^105^1445^56
+637 ;;^UTILITY(U,$J,358.3,35244,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,35244,1,3,0)
+640 ;;=3^Complete Loss of Teeth,Unspec,Class II
+641 ;;^UTILITY(U,$J,358.3,35244,1,4,0)
+642 ;;=4^K08.102
+643 ;;^UTILITY(U,$J,358.3,35244,2)
+644 ;;=^5008407
+645 ;;^UTILITY(U,$J,358.3,35245,0)
+646 ;;=K08.103^^105^1445^57
+647 ;;^UTILITY(U,$J,358.3,35245,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,35245,1,3,0)
+650 ;;=3^Complete Loss of Teeth,Unspec,Class III
+651 ;;^UTILITY(U,$J,358.3,35245,1,4,0)
+652 ;;=4^K08.103
+653 ;;^UTILITY(U,$J,358.3,35245,2)
+654 ;;=^5008408
+655 ;;^UTILITY(U,$J,358.3,35246,0)
+656 ;;=K08.104^^105^1445^58
+657 ;;^UTILITY(U,$J,358.3,35246,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,35246,1,3,0)
+660 ;;=3^Complete Loss of Teeth,Unspec,Class IV
+661 ;;^UTILITY(U,$J,358.3,35246,1,4,0)
+662 ;;=4^K08.104
+663 ;;^UTILITY(U,$J,358.3,35246,2)
+664 ;;=^5008409
+665 ;;^UTILITY(U,$J,358.3,35247,0)
+666 ;;=K08.109^^105^1445^59
+667 ;;^UTILITY(U,$J,358.3,35247,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,35247,1,3,0)
+670 ;;=3^Complete Loss of Teeth,Unspec,Class Unspec
+671 ;;^UTILITY(U,$J,358.3,35247,1,4,0)
+672 ;;=4^K08.109
+673 ;;^UTILITY(U,$J,358.3,35247,2)
+674 ;;=^5008410
+675 ;;^UTILITY(U,$J,358.3,35248,0)
+676 ;;=K08.401^^105^1445^137
+677 ;;^UTILITY(U,$J,358.3,35248,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,35248,1,3,0)
+680 ;;=3^Partial Loss of Teeth,Unspec,Class I
+681 ;;^UTILITY(U,$J,358.3,35248,1,4,0)
+682 ;;=4^K08.401
+683 ;;^UTILITY(U,$J,358.3,35248,2)
+684 ;;=^5008432
+685 ;;^UTILITY(U,$J,358.3,35249,0)
+686 ;;=K08.402^^105^1445^138
+687 ;;^UTILITY(U,$J,358.3,35249,1,0)
+688 ;;=^358.31IA^4^2
+689 ;;^UTILITY(U,$J,358.3,35249,1,3,0)
+690 ;;=3^Partial Loss of Teeth,Unspec,Class II