IBDEI037 ; ; 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,7597,1,4,0)
;;=4^R10.12
;;^UTILITY(U,$J,358.3,7597,2)
;;=^5019207
;;^UTILITY(U,$J,358.3,7598,0)
;;=R10.31^^42^391^7
;;^UTILITY(U,$J,358.3,7598,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7598,1,3,0)
;;=3^Abdominal pain,Right lower quadrant
;;^UTILITY(U,$J,358.3,7598,1,4,0)
;;=4^R10.31
;;^UTILITY(U,$J,358.3,7598,2)
;;=^5019211
;;^UTILITY(U,$J,358.3,7599,0)
;;=R10.32^^42^391^5
;;^UTILITY(U,$J,358.3,7599,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7599,1,3,0)
;;=3^Abdominal pain,Left lower quadrant
;;^UTILITY(U,$J,358.3,7599,1,4,0)
;;=4^R10.32
;;^UTILITY(U,$J,358.3,7599,2)
;;=^5019212
;;^UTILITY(U,$J,358.3,7600,0)
;;=R10.84^^42^391^4
;;^UTILITY(U,$J,358.3,7600,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7600,1,3,0)
;;=3^Abdominal pain,Generalized
;;^UTILITY(U,$J,358.3,7600,1,4,0)
;;=4^R10.84
;;^UTILITY(U,$J,358.3,7600,2)
;;=^5019229
;;^UTILITY(U,$J,358.3,7601,0)
;;=R19.5^^42^391^33
;;^UTILITY(U,$J,358.3,7601,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7601,1,3,0)
;;=3^Fecal occult blood positive
;;^UTILITY(U,$J,358.3,7601,1,4,0)
;;=4^R19.5
;;^UTILITY(U,$J,358.3,7601,2)
;;=^5019274
;;^UTILITY(U,$J,358.3,7602,0)
;;=R07.9^^42^391^15
;;^UTILITY(U,$J,358.3,7602,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7602,1,3,0)
;;=3^Chest pain,Unsp
;;^UTILITY(U,$J,358.3,7602,1,4,0)
;;=4^R07.9
;;^UTILITY(U,$J,358.3,7602,2)
;;=^5019201
;;^UTILITY(U,$J,358.3,7603,0)
;;=R12.^^42^391^40
;;^UTILITY(U,$J,358.3,7603,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7603,1,3,0)
;;=3^Heartburn
;;^UTILITY(U,$J,358.3,7603,1,4,0)
;;=4^R12.
;;^UTILITY(U,$J,358.3,7603,2)
;;=^5019238
;;^UTILITY(U,$J,358.3,7604,0)
;;=R10.13^^42^391^3
;;^UTILITY(U,$J,358.3,7604,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7604,1,3,0)
;;=3^Abdominal pain,Epigastric
;;^UTILITY(U,$J,358.3,7604,1,4,0)
;;=4^R10.13
;;^UTILITY(U,$J,358.3,7604,2)
;;=^5019208
;;^UTILITY(U,$J,358.3,7605,0)
;;=K62.5^^42^391^42
;;^UTILITY(U,$J,358.3,7605,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7605,1,3,0)
;;=3^Hemorrhage of Anus/Rectum
;;^UTILITY(U,$J,358.3,7605,1,4,0)
;;=4^K62.5
;;^UTILITY(U,$J,358.3,7605,2)
;;=^5008755
;;^UTILITY(U,$J,358.3,7606,0)
;;=G43.D1^^42^391^1
;;^UTILITY(U,$J,358.3,7606,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7606,1,3,0)
;;=3^Abdominal migraine,Intractable
;;^UTILITY(U,$J,358.3,7606,1,4,0)
;;=4^G43.D1
;;^UTILITY(U,$J,358.3,7606,2)
;;=^5003919
;;^UTILITY(U,$J,358.3,7607,0)
;;=G43.D0^^42^391^2
;;^UTILITY(U,$J,358.3,7607,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7607,1,3,0)
;;=3^Abdominal migraine,Not Intractable
;;^UTILITY(U,$J,358.3,7607,1,4,0)
;;=4^G43.D0
;;^UTILITY(U,$J,358.3,7607,2)
;;=^5003918
;;^UTILITY(U,$J,358.3,7608,0)
;;=D51.3^^42^391^9
;;^UTILITY(U,$J,358.3,7608,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7608,1,3,0)
;;=3^B12 Deficiency Anemia,Dietary
;;^UTILITY(U,$J,358.3,7608,1,4,0)
;;=4^D51.3
;;^UTILITY(U,$J,358.3,7608,2)
;;=^5002287
;;^UTILITY(U,$J,358.3,7609,0)
;;=D51.0^^42^391^10
;;^UTILITY(U,$J,358.3,7609,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7609,1,3,0)
;;=3^B12 Deficiency Anemia,Intrisic Factor Deficiency
;;^UTILITY(U,$J,358.3,7609,1,4,0)
;;=4^D51.0
;;^UTILITY(U,$J,358.3,7609,2)
;;=^5002284
;;^UTILITY(U,$J,358.3,7610,0)
;;=D51.8^^42^391^11
;;^UTILITY(U,$J,358.3,7610,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7610,1,3,0)
;;=3^B12 Deficiency Anemia,Other
;;^UTILITY(U,$J,358.3,7610,1,4,0)
;;=4^D51.8
;;^UTILITY(U,$J,358.3,7610,2)
;;=^5002288
;;^UTILITY(U,$J,358.3,7611,0)
;;=R07.89^^42^391^14
;;^UTILITY(U,$J,358.3,7611,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7611,1,3,0)
;;=3^Chest pain,Atypical
;;^UTILITY(U,$J,358.3,7611,1,4,0)
;;=4^R07.89
;;^UTILITY(U,$J,358.3,7611,2)
;;=^5019200
;;^UTILITY(U,$J,358.3,7612,0)
;;=K59.04^^42^391^16
;;^UTILITY(U,$J,358.3,7612,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7612,1,3,0)
;;=3^Constipation,Functional
;;^UTILITY(U,$J,358.3,7612,1,4,0)
;;=4^K59.04
;;^UTILITY(U,$J,358.3,7612,2)
;;=^7148177
;;^UTILITY(U,$J,358.3,7613,0)
;;=K59.03^^42^391^17
;;^UTILITY(U,$J,358.3,7613,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7613,1,3,0)
;;=3^Constipation,Medication induced
;;^UTILITY(U,$J,358.3,7613,1,4,0)
;;=4^K59.03
;;^UTILITY(U,$J,358.3,7613,2)
;;=^5138744
;;^UTILITY(U,$J,358.3,7614,0)
;;=K59.09^^42^391^18
;;^UTILITY(U,$J,358.3,7614,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7614,1,3,0)
;;=3^Constipation,Opioid induced
;;^UTILITY(U,$J,358.3,7614,1,4,0)
;;=4^K59.09
;;^UTILITY(U,$J,358.3,7614,2)
;;=^323540
;;^UTILITY(U,$J,358.3,7615,0)
;;=K59.02^^42^391^19
;;^UTILITY(U,$J,358.3,7615,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7615,1,3,0)
;;=3^Constipation,Outlet dysfunction
;;^UTILITY(U,$J,358.3,7615,1,4,0)
;;=4^K59.02
;;^UTILITY(U,$J,358.3,7615,2)
;;=^323539
;;^UTILITY(U,$J,358.3,7616,0)
;;=K59.01^^42^391^20
;;^UTILITY(U,$J,358.3,7616,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7616,1,3,0)
;;=3^Constipation,Slow transit
;;^UTILITY(U,$J,358.3,7616,1,4,0)
;;=4^K59.01
;;^UTILITY(U,$J,358.3,7616,2)
;;=^323538
;;^UTILITY(U,$J,358.3,7617,0)
;;=K59.1^^42^391^21
;;^UTILITY(U,$J,358.3,7617,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7617,1,3,0)
;;=3^Diarrhea,Functional
;;^UTILITY(U,$J,358.3,7617,1,4,0)
;;=4^K59.1
;;^UTILITY(U,$J,358.3,7617,2)
;;=^270281
;;^UTILITY(U,$J,358.3,7618,0)
;;=I69.991^^42^391^24
;;^UTILITY(U,$J,358.3,7618,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7618,1,3,0)
;;=3^Dysphagia,Following cerebrovascular disease
;;^UTILITY(U,$J,358.3,7618,1,4,0)
;;=4^I69.991
;;^UTILITY(U,$J,358.3,7618,2)
;;=^5007569
;;^UTILITY(U,$J,358.3,7619,0)
;;=R15.9^^42^391^29
;;^UTILITY(U,$J,358.3,7619,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7619,1,3,0)
;;=3^Fecal incontinence,Full
;;^UTILITY(U,$J,358.3,7619,1,4,0)
;;=4^R15.9
;;^UTILITY(U,$J,358.3,7619,2)
;;=^5019247
;;^UTILITY(U,$J,358.3,7620,0)
;;=R15.0^^42^391^30
;;^UTILITY(U,$J,358.3,7620,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7620,1,3,0)
;;=3^Fecal incontinence,Incomplete defecation
;;^UTILITY(U,$J,358.3,7620,1,4,0)
;;=4^R15.0
;;^UTILITY(U,$J,358.3,7620,2)
;;=^5019244
;;^UTILITY(U,$J,358.3,7621,0)
;;=R15.1^^42^391^31
;;^UTILITY(U,$J,358.3,7621,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7621,1,3,0)
;;=3^Fecal incontinence,Soiling
;;^UTILITY(U,$J,358.3,7621,1,4,0)
;;=4^R15.1
;;^UTILITY(U,$J,358.3,7621,2)
;;=^5019245
;;^UTILITY(U,$J,358.3,7622,0)
;;=R15.2^^42^391^32
;;^UTILITY(U,$J,358.3,7622,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7622,1,3,0)
;;=3^Fecal incontinence,Urgency
;;^UTILITY(U,$J,358.3,7622,1,4,0)
;;=4^R15.2
;;^UTILITY(U,$J,358.3,7622,2)
;;=^5019246
;;^UTILITY(U,$J,358.3,7623,0)
;;=K30.^^42^391^35
;;^UTILITY(U,$J,358.3,7623,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7623,1,3,0)
;;=3^Functional dyspepsia
;;^UTILITY(U,$J,358.3,7623,1,4,0)
;;=4^K30.
;;^UTILITY(U,$J,358.3,7623,2)
;;=^5008558
;;^UTILITY(U,$J,358.3,7624,0)
;;=R19.8^^42^391^38
;;^UTILITY(U,$J,358.3,7624,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7624,1,3,0)
;;=3^Globus sensation
;;^UTILITY(U,$J,358.3,7624,1,4,0)
;;=4^R19.8
;;^UTILITY(U,$J,358.3,7624,2)
;;=^5019277
;;^UTILITY(U,$J,358.3,7625,0)
;;=K90.41^^42^391^39
;;^UTILITY(U,$J,358.3,7625,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7625,1,3,0)
;;=3^Gluten sensitivity (non-celiac)
;;^UTILITY(U,$J,358.3,7625,1,4,0)
;;=4^K90.41
;;^UTILITY(U,$J,358.3,7625,2)
;;=^8130335
;;^UTILITY(U,$J,358.3,7626,0)
;;=K58.1^^42^391^47
;;^UTILITY(U,$J,358.3,7626,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7626,1,3,0)
;;=3^Irritable bowel syndrome w/ Constipation
;;^UTILITY(U,$J,358.3,7626,1,4,0)
;;=4^K58.1
;;^UTILITY(U,$J,358.3,7626,2)
;;=^5138741
;;^UTILITY(U,$J,358.3,7627,0)
;;=K58.0^^42^391^48
;;^UTILITY(U,$J,358.3,7627,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7627,1,3,0)
;;=3^Irritable bowel syndrome w/ Diarrhea
;;^UTILITY(U,$J,358.3,7627,1,4,0)
;;=4^K58.0
;;^UTILITY(U,$J,358.3,7627,2)
;;=^5008739
;;^UTILITY(U,$J,358.3,7628,0)
;;=K58.2^^42^391^49
;;^UTILITY(U,$J,358.3,7628,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7628,1,3,0)
;;=3^Irritable bowel syndrome w/ Mixed
;;^UTILITY(U,$J,358.3,7628,1,4,0)
;;=4^K58.2
;;^UTILITY(U,$J,358.3,7628,2)
;;=^5138742
;;^UTILITY(U,$J,358.3,7629,0)
;;=K58.8^^42^391^50
;;^UTILITY(U,$J,358.3,7629,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7629,1,3,0)
;;=3^Irritable bowel syndrome,Other
;;^UTILITY(U,$J,358.3,7629,1,4,0)
;;=4^K58.8
;;^UTILITY(U,$J,358.3,7629,2)
;;=^5138743
;;^UTILITY(U,$J,358.3,7630,0)
;;=E61.1^^42^391^43
;;^UTILITY(U,$J,358.3,7630,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7630,1,3,0)
;;=3^Iron deficiency
;;^UTILITY(U,$J,358.3,7630,1,4,0)
;;=4^E61.1
;;^UTILITY(U,$J,358.3,7630,2)
;;=^5002808
;;^UTILITY(U,$J,358.3,7631,0)
;;=D50.0^^42^391^44
;;^UTILITY(U,$J,358.3,7631,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7631,1,3,0)
;;=3^Iron deficiency anemia,Blood loss
;;^UTILITY(U,$J,358.3,7631,1,4,0)
;;=4^D50.0
;;^UTILITY(U,$J,358.3,7631,2)
;;=^267971
;;^UTILITY(U,$J,358.3,7632,0)
;;=D50.8^^42^391^45
;;^UTILITY(U,$J,358.3,7632,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7632,1,3,0)
;;=3^Iron deficiency anemia,Other
;;^UTILITY(U,$J,358.3,7632,1,4,0)
;;=4^D50.8
;;^UTILITY(U,$J,358.3,7632,2)
;;=^5002282
;;^UTILITY(U,$J,358.3,7633,0)
;;=D50.9^^42^391^46
;;^UTILITY(U,$J,358.3,7633,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7633,1,3,0)
;;=3^Iron deficiency anemia,Unsp
;;^UTILITY(U,$J,358.3,7633,1,4,0)
;;=4^D50.9
;;^UTILITY(U,$J,358.3,7633,2)
;;=^5002283
;;^UTILITY(U,$J,358.3,7634,0)
;;=E73.8^^42^391^51
;;^UTILITY(U,$J,358.3,7634,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7634,1,3,0)
;;=3^Lactose Intolerance,Other
;;^UTILITY(U,$J,358.3,7634,1,4,0)
;;=4^E73.8
;;^UTILITY(U,$J,358.3,7634,2)
;;=^5002913
;;^UTILITY(U,$J,358.3,7635,0)
;;=G43.A1^^42^391^57
;;^UTILITY(U,$J,358.3,7635,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7635,1,3,0)
;;=3^Vomiting,Cyclical Intractable w/ Migraine
;;^UTILITY(U,$J,358.3,7635,1,4,0)
;;=4^G43.A1
;;^UTILITY(U,$J,358.3,7635,2)
;;=^5003913
;;^UTILITY(U,$J,358.3,7636,0)
;;=G43.A0^^42^391^58
;;^UTILITY(U,$J,358.3,7636,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7636,1,3,0)
;;=3^Vomiting,Cyclical Not Intractable w/ Migraine
;;^UTILITY(U,$J,358.3,7636,1,4,0)
;;=4^G43.A0
;;^UTILITY(U,$J,358.3,7636,2)
;;=^5003912
;;^UTILITY(U,$J,358.3,7637,0)
;;=R11.13^^42^391^59
;;^UTILITY(U,$J,358.3,7637,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7637,1,3,0)
;;=3^Vomiting,Feculant
;;^UTILITY(U,$J,358.3,7637,1,4,0)
;;=4^R11.13
;;^UTILITY(U,$J,358.3,7637,2)
;;=^5019235
;;^UTILITY(U,$J,358.3,7638,0)
;;=K91.0^^42^391^60
;;^UTILITY(U,$J,358.3,7638,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7638,1,3,0)
;;=3^Vomiting,Following GI surgery
;;^UTILITY(U,$J,358.3,7638,1,4,0)
;;=4^K91.0
;;^UTILITY(U,$J,358.3,7638,2)
;;=^270278
;;^UTILITY(U,$J,358.3,7639,0)
;;=R11.12^^42^391^61
;;^UTILITY(U,$J,358.3,7639,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7639,1,3,0)
;;=3^Vomiting,Projectile
;;^UTILITY(U,$J,358.3,7639,1,4,0)
;;=4^R11.12
;;^UTILITY(U,$J,358.3,7639,2)
;;=^5019234
;;^UTILITY(U,$J,358.3,7640,0)
;;=R68.81^^42^391^27
;;^UTILITY(U,$J,358.3,7640,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7640,1,3,0)
;;=3^Early Satiety
;;^UTILITY(U,$J,358.3,7640,1,4,0)
;;=4^R68.81
;;^UTILITY(U,$J,358.3,7640,2)
;;=^5019554
;;^UTILITY(U,$J,358.3,7641,0)
;;=R63.4^^42^391^63
;;^UTILITY(U,$J,358.3,7641,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7641,1,3,0)
;;=3^Weight loss (Abnormal)
;;^UTILITY(U,$J,358.3,7641,1,4,0)
;;=4^R63.4
;;^UTILITY(U,$J,358.3,7641,2)
;;=^5019542
;;^UTILITY(U,$J,358.3,7642,0)
;;=E73.9^^42^391^52
;;^UTILITY(U,$J,358.3,7642,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7642,1,3,0)
;;=3^Lactose Intolerance,Unspec
;;^UTILITY(U,$J,358.3,7642,1,4,0)
;;=4^E73.9
;;^UTILITY(U,$J,358.3,7642,2)
;;=^5002914
;;^UTILITY(U,$J,358.3,7643,0)
;;=R93.3^^42^392^1
;;^UTILITY(U,$J,358.3,7643,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7643,1,3,0)
;;=3^Abnormal imaging Digestive tract
;;^UTILITY(U,$J,358.3,7643,1,4,0)
;;=4^R93.3
;;^UTILITY(U,$J,358.3,7643,2)
;;=^5019716
;;^UTILITY(U,$J,358.3,7644,0)
;;=Z85.038^^42^392^7
;;^UTILITY(U,$J,358.3,7644,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7644,1,3,0)
;;=3^Personal Hx malignancy,Colon
;;^UTILITY(U,$J,358.3,7644,1,4,0)
;;=4^Z85.038
;;^UTILITY(U,$J,358.3,7644,2)
;;=^5063399
;;^UTILITY(U,$J,358.3,7645,0)
;;=Z86.010^^42^392^13
;;^UTILITY(U,$J,358.3,7645,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7645,1,3,0)
;;=3^Personal Hx of Colonic polyps
;;^UTILITY(U,$J,358.3,7645,1,4,0)
;;=4^Z86.010
;;^UTILITY(U,$J,358.3,7645,2)
;;=^5063456
;;^UTILITY(U,$J,358.3,7646,0)
;;=Z80.0^^42^392^3
;;^UTILITY(U,$J,358.3,7646,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7646,1,3,0)
;;=3^Family Hx malignancy,Digestive organs
;;^UTILITY(U,$J,358.3,7646,1,4,0)
;;=4^Z80.0
;;^UTILITY(U,$J,358.3,7646,2)
;;=^5063344
;;^UTILITY(U,$J,358.3,7647,0)
;;=Z12.11^^42^392^14
;;^UTILITY(U,$J,358.3,7647,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7647,1,3,0)
;;=3^Screening for Colorectal Cancer
;;^UTILITY(U,$J,358.3,7647,1,4,0)
;;=4^Z12.11
;;^UTILITY(U,$J,358.3,7647,2)
;;=^5062681
;;^UTILITY(U,$J,358.3,7648,0)
;;=Z76.82^^42^392^2
;;^UTILITY(U,$J,358.3,7648,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7648,1,3,0)
;;=3^Awaiting Organ Transplant
;;^UTILITY(U,$J,358.3,7648,1,4,0)
;;=4^Z76.82
;;^UTILITY(U,$J,358.3,7648,2)
;;=^331582
;;^UTILITY(U,$J,358.3,7649,0)
;;=Z85.07^^42^392^10
;;^UTILITY(U,$J,358.3,7649,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7649,1,3,0)
;;=3^Personal Hx malignancy,Pancreas
;;^UTILITY(U,$J,358.3,7649,1,4,0)
;;=4^Z85.07
;;^UTILITY(U,$J,358.3,7649,2)
;;=^5063405
;;^UTILITY(U,$J,358.3,7650,0)
;;=Z85.01^^42^392^8
;;^UTILITY(U,$J,358.3,7650,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7650,1,3,0)
;;=3^Personal Hx malignancy,Esophagus
;;^UTILITY(U,$J,358.3,7650,1,4,0)
;;=4^Z85.01
;;^UTILITY(U,$J,358.3,7650,2)
;;=^5063395
;;^UTILITY(U,$J,358.3,7651,0)
;;=Z85.028^^42^392^12
;;^UTILITY(U,$J,358.3,7651,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7651,1,3,0)
;;=3^Personal Hx malignancy,Stomach
;;^UTILITY(U,$J,358.3,7651,1,4,0)
;;=4^Z85.028
;;^UTILITY(U,$J,358.3,7651,2)
;;=^5063397
;;^UTILITY(U,$J,358.3,7652,0)
;;=R19.5^^42^392^4
;;^UTILITY(U,$J,358.3,7652,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7652,1,3,0)
;;=3^Fecal occult blood positive
;;^UTILITY(U,$J,358.3,7652,1,4,0)
;;=4^R19.5
;;^UTILITY(U,$J,358.3,7652,2)
;;=^5019274
;;^UTILITY(U,$J,358.3,7653,0)
;;=Z85.068^^42^392^11
;;^UTILITY(U,$J,358.3,7653,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7653,1,3,0)
;;=3^Personal Hx malignancy,Sm Int
;;^UTILITY(U,$J,358.3,7653,1,4,0)
;;=4^Z85.068
;;^UTILITY(U,$J,358.3,7653,2)
;;=^5063404
;;^UTILITY(U,$J,358.3,7654,0)
;;=Z85.048^^42^392^5
;;^UTILITY(U,$J,358.3,7654,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7654,1,3,0)
;;=3^Personal Hx malignancy,Anus,Rectum,Rectosigmoid
;;^UTILITY(U,$J,358.3,7654,1,4,0)
;;=4^Z85.048
;;^UTILITY(U,$J,358.3,7654,2)
;;=^5063401
;;^UTILITY(U,$J,358.3,7655,0)
;;=Z85.09^^42^392^6
;;^UTILITY(U,$J,358.3,7655,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7655,1,3,0)
;;=3^Personal Hx malignancy,Biliary tract & Gallbladder
;;^UTILITY(U,$J,358.3,7655,1,4,0)
;;=4^Z85.09
;;^UTILITY(U,$J,358.3,7655,2)
;;=^5063406
;;^UTILITY(U,$J,358.3,7656,0)
;;=Z85.05^^42^392^9
;;^UTILITY(U,$J,358.3,7656,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7656,1,3,0)
;;=3^Personal Hx malignancy,Liver
;;^UTILITY(U,$J,358.3,7656,1,4,0)
;;=4^Z85.05
;;^UTILITY(U,$J,358.3,7656,2)
;;=^5063402
;;^UTILITY(U,$J,358.3,7657,0)
;;=Z12.0^^42^392^15
;;^UTILITY(U,$J,358.3,7657,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7657,1,3,0)
;;=3^Screening for Gastric Cancer
;;^UTILITY(U,$J,358.3,7657,1,4,0)
;;=4^Z12.0
;;^UTILITY(U,$J,358.3,7657,2)
;;=^5062679
;;^UTILITY(U,$J,358.3,7658,0)
;;=Z13.811^^42^392^16
;;^UTILITY(U,$J,358.3,7658,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7658,1,3,0)
;;=3^Screening for Lower Gastrointestinal Disorder(s)
;;^UTILITY(U,$J,358.3,7658,1,4,0)
;;=4^Z13.811
;;^UTILITY(U,$J,358.3,7658,2)
;;=^5062711
;;^UTILITY(U,$J,358.3,7659,0)
;;=Z13.810^^42^392^17
;;^UTILITY(U,$J,358.3,7659,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7659,1,3,0)
;;=3^Screening for Upper Gastrointestinal Disorder(s)
;;^UTILITY(U,$J,358.3,7659,1,4,0)
;;=4^Z13.810
;;^UTILITY(U,$J,358.3,7659,2)
;;=^5062710
;;^UTILITY(U,$J,358.3,7660,0)
;;=Z11.0^^42^392^18
;;^UTILITY(U,$J,358.3,7660,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7660,1,3,0)
;;=3^Screening for Viral Intestinal Diseases
;;^UTILITY(U,$J,358.3,7660,1,4,0)
;;=4^Z11.0
;;^UTILITY(U,$J,358.3,7660,2)
;;=^5062669
;;^UTILITY(U,$J,358.3,7661,0)
;;=K82.4^^42^393^30
;;^UTILITY(U,$J,358.3,7661,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7661,1,3,0)
;;=3^Polyp of Gallbladder
;;^UTILITY(U,$J,358.3,7661,1,4,0)
;;=4^K82.4
;;^UTILITY(U,$J,358.3,7661,2)
;;=^265888
;;^UTILITY(U,$J,358.3,7662,0)
;;=C23.^^42^393^27
;;^UTILITY(U,$J,358.3,7662,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7662,1,3,0)
;;=3^Malignant neoplasm,Gallbladder
;;^UTILITY(U,$J,358.3,7662,1,4,0)
;;=4^C23.
;;^UTILITY(U,$J,358.3,7662,2)
;;=^267098
;;^UTILITY(U,$J,358.3,7663,0)
;;=K82.8^^42^393^21
;;^UTILITY(U,$J,358.3,7663,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7663,1,3,0)
;;=3^Gallbladder dyskinesia
;;^UTILITY(U,$J,358.3,7663,1,4,0)
;;=4^K82.8
;;^UTILITY(U,$J,358.3,7663,2)
;;=^5008874
;;^UTILITY(U,$J,358.3,7664,0)
;;=R17.^^42^393^24
;;^UTILITY(U,$J,358.3,7664,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7664,1,3,0)
;;=3^Jaundice
;;^UTILITY(U,$J,358.3,7664,1,4,0)
;;=4^R17.
;;^UTILITY(U,$J,358.3,7664,2)
;;=^5019251
;;^UTILITY(U,$J,358.3,7665,0)
;;=C24.0^^42^393^26
;;^UTILITY(U,$J,358.3,7665,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7665,1,3,0)
;;=3^Malignant neoplasm,Extrahepatic bile duct
;;^UTILITY(U,$J,358.3,7665,1,4,0)
;;=4^C24.0
;;^UTILITY(U,$J,358.3,7665,2)
;;=^5000940
;;^UTILITY(U,$J,358.3,7666,0)
;;=K83.9^^42^393^19
;;^UTILITY(U,$J,358.3,7666,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7666,1,3,0)
;;=3^Disease of Biliary tract,unspec
;;^UTILITY(U,$J,358.3,7666,1,4,0)
;;=4^K83.9
;;^UTILITY(U,$J,358.3,7666,2)
;;=^5008881
;;^UTILITY(U,$J,358.3,7667,0)
;;=K80.33^^42^393^4
;;^UTILITY(U,$J,358.3,7667,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7667,1,3,0)
;;=3^Calculus,Bile Duct w/ Acute Cholangitis w/ Obstruction
;;^UTILITY(U,$J,358.3,7667,1,4,0)
;;=4^K80.33
;;^UTILITY(U,$J,358.3,7667,2)
;;=^5008851
;;^UTILITY(U,$J,358.3,7668,0)
;;=K80.01^^42^393^10
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI037 19744 printed Apr 09, 2024@21:46:50 Page 2
IBDEI037 ; ; 01-AUG-2022
+1 ;;3.0;IB ENCOUNTER FORM IMP/EXP;;AUG 01, 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,7597,1,4,0)
+2 ;;=4^R10.12
+3 ;;^UTILITY(U,$J,358.3,7597,2)
+4 ;;=^5019207
+5 ;;^UTILITY(U,$J,358.3,7598,0)
+6 ;;=R10.31^^42^391^7
+7 ;;^UTILITY(U,$J,358.3,7598,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,7598,1,3,0)
+10 ;;=3^Abdominal pain,Right lower quadrant
+11 ;;^UTILITY(U,$J,358.3,7598,1,4,0)
+12 ;;=4^R10.31
+13 ;;^UTILITY(U,$J,358.3,7598,2)
+14 ;;=^5019211
+15 ;;^UTILITY(U,$J,358.3,7599,0)
+16 ;;=R10.32^^42^391^5
+17 ;;^UTILITY(U,$J,358.3,7599,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,7599,1,3,0)
+20 ;;=3^Abdominal pain,Left lower quadrant
+21 ;;^UTILITY(U,$J,358.3,7599,1,4,0)
+22 ;;=4^R10.32
+23 ;;^UTILITY(U,$J,358.3,7599,2)
+24 ;;=^5019212
+25 ;;^UTILITY(U,$J,358.3,7600,0)
+26 ;;=R10.84^^42^391^4
+27 ;;^UTILITY(U,$J,358.3,7600,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,7600,1,3,0)
+30 ;;=3^Abdominal pain,Generalized
+31 ;;^UTILITY(U,$J,358.3,7600,1,4,0)
+32 ;;=4^R10.84
+33 ;;^UTILITY(U,$J,358.3,7600,2)
+34 ;;=^5019229
+35 ;;^UTILITY(U,$J,358.3,7601,0)
+36 ;;=R19.5^^42^391^33
+37 ;;^UTILITY(U,$J,358.3,7601,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,7601,1,3,0)
+40 ;;=3^Fecal occult blood positive
+41 ;;^UTILITY(U,$J,358.3,7601,1,4,0)
+42 ;;=4^R19.5
+43 ;;^UTILITY(U,$J,358.3,7601,2)
+44 ;;=^5019274
+45 ;;^UTILITY(U,$J,358.3,7602,0)
+46 ;;=R07.9^^42^391^15
+47 ;;^UTILITY(U,$J,358.3,7602,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,7602,1,3,0)
+50 ;;=3^Chest pain,Unsp
+51 ;;^UTILITY(U,$J,358.3,7602,1,4,0)
+52 ;;=4^R07.9
+53 ;;^UTILITY(U,$J,358.3,7602,2)
+54 ;;=^5019201
+55 ;;^UTILITY(U,$J,358.3,7603,0)
+56 ;;=R12.^^42^391^40
+57 ;;^UTILITY(U,$J,358.3,7603,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,7603,1,3,0)
+60 ;;=3^Heartburn
+61 ;;^UTILITY(U,$J,358.3,7603,1,4,0)
+62 ;;=4^R12.
+63 ;;^UTILITY(U,$J,358.3,7603,2)
+64 ;;=^5019238
+65 ;;^UTILITY(U,$J,358.3,7604,0)
+66 ;;=R10.13^^42^391^3
+67 ;;^UTILITY(U,$J,358.3,7604,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,7604,1,3,0)
+70 ;;=3^Abdominal pain,Epigastric
+71 ;;^UTILITY(U,$J,358.3,7604,1,4,0)
+72 ;;=4^R10.13
+73 ;;^UTILITY(U,$J,358.3,7604,2)
+74 ;;=^5019208
+75 ;;^UTILITY(U,$J,358.3,7605,0)
+76 ;;=K62.5^^42^391^42
+77 ;;^UTILITY(U,$J,358.3,7605,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,7605,1,3,0)
+80 ;;=3^Hemorrhage of Anus/Rectum
+81 ;;^UTILITY(U,$J,358.3,7605,1,4,0)
+82 ;;=4^K62.5
+83 ;;^UTILITY(U,$J,358.3,7605,2)
+84 ;;=^5008755
+85 ;;^UTILITY(U,$J,358.3,7606,0)
+86 ;;=G43.D1^^42^391^1
+87 ;;^UTILITY(U,$J,358.3,7606,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,7606,1,3,0)
+90 ;;=3^Abdominal migraine,Intractable
+91 ;;^UTILITY(U,$J,358.3,7606,1,4,0)
+92 ;;=4^G43.D1
+93 ;;^UTILITY(U,$J,358.3,7606,2)
+94 ;;=^5003919
+95 ;;^UTILITY(U,$J,358.3,7607,0)
+96 ;;=G43.D0^^42^391^2
+97 ;;^UTILITY(U,$J,358.3,7607,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,7607,1,3,0)
+100 ;;=3^Abdominal migraine,Not Intractable
+101 ;;^UTILITY(U,$J,358.3,7607,1,4,0)
+102 ;;=4^G43.D0
+103 ;;^UTILITY(U,$J,358.3,7607,2)
+104 ;;=^5003918
+105 ;;^UTILITY(U,$J,358.3,7608,0)
+106 ;;=D51.3^^42^391^9
+107 ;;^UTILITY(U,$J,358.3,7608,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,7608,1,3,0)
+110 ;;=3^B12 Deficiency Anemia,Dietary
+111 ;;^UTILITY(U,$J,358.3,7608,1,4,0)
+112 ;;=4^D51.3
+113 ;;^UTILITY(U,$J,358.3,7608,2)
+114 ;;=^5002287
+115 ;;^UTILITY(U,$J,358.3,7609,0)
+116 ;;=D51.0^^42^391^10
+117 ;;^UTILITY(U,$J,358.3,7609,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,7609,1,3,0)
+120 ;;=3^B12 Deficiency Anemia,Intrisic Factor Deficiency
+121 ;;^UTILITY(U,$J,358.3,7609,1,4,0)
+122 ;;=4^D51.0
+123 ;;^UTILITY(U,$J,358.3,7609,2)
+124 ;;=^5002284
+125 ;;^UTILITY(U,$J,358.3,7610,0)
+126 ;;=D51.8^^42^391^11
+127 ;;^UTILITY(U,$J,358.3,7610,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,7610,1,3,0)
+130 ;;=3^B12 Deficiency Anemia,Other
+131 ;;^UTILITY(U,$J,358.3,7610,1,4,0)
+132 ;;=4^D51.8
+133 ;;^UTILITY(U,$J,358.3,7610,2)
+134 ;;=^5002288
+135 ;;^UTILITY(U,$J,358.3,7611,0)
+136 ;;=R07.89^^42^391^14
+137 ;;^UTILITY(U,$J,358.3,7611,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,7611,1,3,0)
+140 ;;=3^Chest pain,Atypical
+141 ;;^UTILITY(U,$J,358.3,7611,1,4,0)
+142 ;;=4^R07.89
+143 ;;^UTILITY(U,$J,358.3,7611,2)
+144 ;;=^5019200
+145 ;;^UTILITY(U,$J,358.3,7612,0)
+146 ;;=K59.04^^42^391^16
+147 ;;^UTILITY(U,$J,358.3,7612,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,7612,1,3,0)
+150 ;;=3^Constipation,Functional
+151 ;;^UTILITY(U,$J,358.3,7612,1,4,0)
+152 ;;=4^K59.04
+153 ;;^UTILITY(U,$J,358.3,7612,2)
+154 ;;=^7148177
+155 ;;^UTILITY(U,$J,358.3,7613,0)
+156 ;;=K59.03^^42^391^17
+157 ;;^UTILITY(U,$J,358.3,7613,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,7613,1,3,0)
+160 ;;=3^Constipation,Medication induced
+161 ;;^UTILITY(U,$J,358.3,7613,1,4,0)
+162 ;;=4^K59.03
+163 ;;^UTILITY(U,$J,358.3,7613,2)
+164 ;;=^5138744
+165 ;;^UTILITY(U,$J,358.3,7614,0)
+166 ;;=K59.09^^42^391^18
+167 ;;^UTILITY(U,$J,358.3,7614,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,7614,1,3,0)
+170 ;;=3^Constipation,Opioid induced
+171 ;;^UTILITY(U,$J,358.3,7614,1,4,0)
+172 ;;=4^K59.09
+173 ;;^UTILITY(U,$J,358.3,7614,2)
+174 ;;=^323540
+175 ;;^UTILITY(U,$J,358.3,7615,0)
+176 ;;=K59.02^^42^391^19
+177 ;;^UTILITY(U,$J,358.3,7615,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,7615,1,3,0)
+180 ;;=3^Constipation,Outlet dysfunction
+181 ;;^UTILITY(U,$J,358.3,7615,1,4,0)
+182 ;;=4^K59.02
+183 ;;^UTILITY(U,$J,358.3,7615,2)
+184 ;;=^323539
+185 ;;^UTILITY(U,$J,358.3,7616,0)
+186 ;;=K59.01^^42^391^20
+187 ;;^UTILITY(U,$J,358.3,7616,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,7616,1,3,0)
+190 ;;=3^Constipation,Slow transit
+191 ;;^UTILITY(U,$J,358.3,7616,1,4,0)
+192 ;;=4^K59.01
+193 ;;^UTILITY(U,$J,358.3,7616,2)
+194 ;;=^323538
+195 ;;^UTILITY(U,$J,358.3,7617,0)
+196 ;;=K59.1^^42^391^21
+197 ;;^UTILITY(U,$J,358.3,7617,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,7617,1,3,0)
+200 ;;=3^Diarrhea,Functional
+201 ;;^UTILITY(U,$J,358.3,7617,1,4,0)
+202 ;;=4^K59.1
+203 ;;^UTILITY(U,$J,358.3,7617,2)
+204 ;;=^270281
+205 ;;^UTILITY(U,$J,358.3,7618,0)
+206 ;;=I69.991^^42^391^24
+207 ;;^UTILITY(U,$J,358.3,7618,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,7618,1,3,0)
+210 ;;=3^Dysphagia,Following cerebrovascular disease
+211 ;;^UTILITY(U,$J,358.3,7618,1,4,0)
+212 ;;=4^I69.991
+213 ;;^UTILITY(U,$J,358.3,7618,2)
+214 ;;=^5007569
+215 ;;^UTILITY(U,$J,358.3,7619,0)
+216 ;;=R15.9^^42^391^29
+217 ;;^UTILITY(U,$J,358.3,7619,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,7619,1,3,0)
+220 ;;=3^Fecal incontinence,Full
+221 ;;^UTILITY(U,$J,358.3,7619,1,4,0)
+222 ;;=4^R15.9
+223 ;;^UTILITY(U,$J,358.3,7619,2)
+224 ;;=^5019247
+225 ;;^UTILITY(U,$J,358.3,7620,0)
+226 ;;=R15.0^^42^391^30
+227 ;;^UTILITY(U,$J,358.3,7620,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,7620,1,3,0)
+230 ;;=3^Fecal incontinence,Incomplete defecation
+231 ;;^UTILITY(U,$J,358.3,7620,1,4,0)
+232 ;;=4^R15.0
+233 ;;^UTILITY(U,$J,358.3,7620,2)
+234 ;;=^5019244
+235 ;;^UTILITY(U,$J,358.3,7621,0)
+236 ;;=R15.1^^42^391^31
+237 ;;^UTILITY(U,$J,358.3,7621,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,7621,1,3,0)
+240 ;;=3^Fecal incontinence,Soiling
+241 ;;^UTILITY(U,$J,358.3,7621,1,4,0)
+242 ;;=4^R15.1
+243 ;;^UTILITY(U,$J,358.3,7621,2)
+244 ;;=^5019245
+245 ;;^UTILITY(U,$J,358.3,7622,0)
+246 ;;=R15.2^^42^391^32
+247 ;;^UTILITY(U,$J,358.3,7622,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,7622,1,3,0)
+250 ;;=3^Fecal incontinence,Urgency
+251 ;;^UTILITY(U,$J,358.3,7622,1,4,0)
+252 ;;=4^R15.2
+253 ;;^UTILITY(U,$J,358.3,7622,2)
+254 ;;=^5019246
+255 ;;^UTILITY(U,$J,358.3,7623,0)
+256 ;;=K30.^^42^391^35
+257 ;;^UTILITY(U,$J,358.3,7623,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,7623,1,3,0)
+260 ;;=3^Functional dyspepsia
+261 ;;^UTILITY(U,$J,358.3,7623,1,4,0)
+262 ;;=4^K30.
+263 ;;^UTILITY(U,$J,358.3,7623,2)
+264 ;;=^5008558
+265 ;;^UTILITY(U,$J,358.3,7624,0)
+266 ;;=R19.8^^42^391^38
+267 ;;^UTILITY(U,$J,358.3,7624,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,7624,1,3,0)
+270 ;;=3^Globus sensation
+271 ;;^UTILITY(U,$J,358.3,7624,1,4,0)
+272 ;;=4^R19.8
+273 ;;^UTILITY(U,$J,358.3,7624,2)
+274 ;;=^5019277
+275 ;;^UTILITY(U,$J,358.3,7625,0)
+276 ;;=K90.41^^42^391^39
+277 ;;^UTILITY(U,$J,358.3,7625,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,7625,1,3,0)
+280 ;;=3^Gluten sensitivity (non-celiac)
+281 ;;^UTILITY(U,$J,358.3,7625,1,4,0)
+282 ;;=4^K90.41
+283 ;;^UTILITY(U,$J,358.3,7625,2)
+284 ;;=^8130335
+285 ;;^UTILITY(U,$J,358.3,7626,0)
+286 ;;=K58.1^^42^391^47
+287 ;;^UTILITY(U,$J,358.3,7626,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,7626,1,3,0)
+290 ;;=3^Irritable bowel syndrome w/ Constipation
+291 ;;^UTILITY(U,$J,358.3,7626,1,4,0)
+292 ;;=4^K58.1
+293 ;;^UTILITY(U,$J,358.3,7626,2)
+294 ;;=^5138741
+295 ;;^UTILITY(U,$J,358.3,7627,0)
+296 ;;=K58.0^^42^391^48
+297 ;;^UTILITY(U,$J,358.3,7627,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,7627,1,3,0)
+300 ;;=3^Irritable bowel syndrome w/ Diarrhea
+301 ;;^UTILITY(U,$J,358.3,7627,1,4,0)
+302 ;;=4^K58.0
+303 ;;^UTILITY(U,$J,358.3,7627,2)
+304 ;;=^5008739
+305 ;;^UTILITY(U,$J,358.3,7628,0)
+306 ;;=K58.2^^42^391^49
+307 ;;^UTILITY(U,$J,358.3,7628,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,7628,1,3,0)
+310 ;;=3^Irritable bowel syndrome w/ Mixed
+311 ;;^UTILITY(U,$J,358.3,7628,1,4,0)
+312 ;;=4^K58.2
+313 ;;^UTILITY(U,$J,358.3,7628,2)
+314 ;;=^5138742
+315 ;;^UTILITY(U,$J,358.3,7629,0)
+316 ;;=K58.8^^42^391^50
+317 ;;^UTILITY(U,$J,358.3,7629,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,7629,1,3,0)
+320 ;;=3^Irritable bowel syndrome,Other
+321 ;;^UTILITY(U,$J,358.3,7629,1,4,0)
+322 ;;=4^K58.8
+323 ;;^UTILITY(U,$J,358.3,7629,2)
+324 ;;=^5138743
+325 ;;^UTILITY(U,$J,358.3,7630,0)
+326 ;;=E61.1^^42^391^43
+327 ;;^UTILITY(U,$J,358.3,7630,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,7630,1,3,0)
+330 ;;=3^Iron deficiency
+331 ;;^UTILITY(U,$J,358.3,7630,1,4,0)
+332 ;;=4^E61.1
+333 ;;^UTILITY(U,$J,358.3,7630,2)
+334 ;;=^5002808
+335 ;;^UTILITY(U,$J,358.3,7631,0)
+336 ;;=D50.0^^42^391^44
+337 ;;^UTILITY(U,$J,358.3,7631,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,7631,1,3,0)
+340 ;;=3^Iron deficiency anemia,Blood loss
+341 ;;^UTILITY(U,$J,358.3,7631,1,4,0)
+342 ;;=4^D50.0
+343 ;;^UTILITY(U,$J,358.3,7631,2)
+344 ;;=^267971
+345 ;;^UTILITY(U,$J,358.3,7632,0)
+346 ;;=D50.8^^42^391^45
+347 ;;^UTILITY(U,$J,358.3,7632,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,7632,1,3,0)
+350 ;;=3^Iron deficiency anemia,Other
+351 ;;^UTILITY(U,$J,358.3,7632,1,4,0)
+352 ;;=4^D50.8
+353 ;;^UTILITY(U,$J,358.3,7632,2)
+354 ;;=^5002282
+355 ;;^UTILITY(U,$J,358.3,7633,0)
+356 ;;=D50.9^^42^391^46
+357 ;;^UTILITY(U,$J,358.3,7633,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,7633,1,3,0)
+360 ;;=3^Iron deficiency anemia,Unsp
+361 ;;^UTILITY(U,$J,358.3,7633,1,4,0)
+362 ;;=4^D50.9
+363 ;;^UTILITY(U,$J,358.3,7633,2)
+364 ;;=^5002283
+365 ;;^UTILITY(U,$J,358.3,7634,0)
+366 ;;=E73.8^^42^391^51
+367 ;;^UTILITY(U,$J,358.3,7634,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,7634,1,3,0)
+370 ;;=3^Lactose Intolerance,Other
+371 ;;^UTILITY(U,$J,358.3,7634,1,4,0)
+372 ;;=4^E73.8
+373 ;;^UTILITY(U,$J,358.3,7634,2)
+374 ;;=^5002913
+375 ;;^UTILITY(U,$J,358.3,7635,0)
+376 ;;=G43.A1^^42^391^57
+377 ;;^UTILITY(U,$J,358.3,7635,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,7635,1,3,0)
+380 ;;=3^Vomiting,Cyclical Intractable w/ Migraine
+381 ;;^UTILITY(U,$J,358.3,7635,1,4,0)
+382 ;;=4^G43.A1
+383 ;;^UTILITY(U,$J,358.3,7635,2)
+384 ;;=^5003913
+385 ;;^UTILITY(U,$J,358.3,7636,0)
+386 ;;=G43.A0^^42^391^58
+387 ;;^UTILITY(U,$J,358.3,7636,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,7636,1,3,0)
+390 ;;=3^Vomiting,Cyclical Not Intractable w/ Migraine
+391 ;;^UTILITY(U,$J,358.3,7636,1,4,0)
+392 ;;=4^G43.A0
+393 ;;^UTILITY(U,$J,358.3,7636,2)
+394 ;;=^5003912
+395 ;;^UTILITY(U,$J,358.3,7637,0)
+396 ;;=R11.13^^42^391^59
+397 ;;^UTILITY(U,$J,358.3,7637,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,7637,1,3,0)
+400 ;;=3^Vomiting,Feculant
+401 ;;^UTILITY(U,$J,358.3,7637,1,4,0)
+402 ;;=4^R11.13
+403 ;;^UTILITY(U,$J,358.3,7637,2)
+404 ;;=^5019235
+405 ;;^UTILITY(U,$J,358.3,7638,0)
+406 ;;=K91.0^^42^391^60
+407 ;;^UTILITY(U,$J,358.3,7638,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,7638,1,3,0)
+410 ;;=3^Vomiting,Following GI surgery
+411 ;;^UTILITY(U,$J,358.3,7638,1,4,0)
+412 ;;=4^K91.0
+413 ;;^UTILITY(U,$J,358.3,7638,2)
+414 ;;=^270278
+415 ;;^UTILITY(U,$J,358.3,7639,0)
+416 ;;=R11.12^^42^391^61
+417 ;;^UTILITY(U,$J,358.3,7639,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,7639,1,3,0)
+420 ;;=3^Vomiting,Projectile
+421 ;;^UTILITY(U,$J,358.3,7639,1,4,0)
+422 ;;=4^R11.12
+423 ;;^UTILITY(U,$J,358.3,7639,2)
+424 ;;=^5019234
+425 ;;^UTILITY(U,$J,358.3,7640,0)
+426 ;;=R68.81^^42^391^27
+427 ;;^UTILITY(U,$J,358.3,7640,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,7640,1,3,0)
+430 ;;=3^Early Satiety
+431 ;;^UTILITY(U,$J,358.3,7640,1,4,0)
+432 ;;=4^R68.81
+433 ;;^UTILITY(U,$J,358.3,7640,2)
+434 ;;=^5019554
+435 ;;^UTILITY(U,$J,358.3,7641,0)
+436 ;;=R63.4^^42^391^63
+437 ;;^UTILITY(U,$J,358.3,7641,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,7641,1,3,0)
+440 ;;=3^Weight loss (Abnormal)
+441 ;;^UTILITY(U,$J,358.3,7641,1,4,0)
+442 ;;=4^R63.4
+443 ;;^UTILITY(U,$J,358.3,7641,2)
+444 ;;=^5019542
+445 ;;^UTILITY(U,$J,358.3,7642,0)
+446 ;;=E73.9^^42^391^52
+447 ;;^UTILITY(U,$J,358.3,7642,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,7642,1,3,0)
+450 ;;=3^Lactose Intolerance,Unspec
+451 ;;^UTILITY(U,$J,358.3,7642,1,4,0)
+452 ;;=4^E73.9
+453 ;;^UTILITY(U,$J,358.3,7642,2)
+454 ;;=^5002914
+455 ;;^UTILITY(U,$J,358.3,7643,0)
+456 ;;=R93.3^^42^392^1
+457 ;;^UTILITY(U,$J,358.3,7643,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,7643,1,3,0)
+460 ;;=3^Abnormal imaging Digestive tract
+461 ;;^UTILITY(U,$J,358.3,7643,1,4,0)
+462 ;;=4^R93.3
+463 ;;^UTILITY(U,$J,358.3,7643,2)
+464 ;;=^5019716
+465 ;;^UTILITY(U,$J,358.3,7644,0)
+466 ;;=Z85.038^^42^392^7
+467 ;;^UTILITY(U,$J,358.3,7644,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,7644,1,3,0)
+470 ;;=3^Personal Hx malignancy,Colon
+471 ;;^UTILITY(U,$J,358.3,7644,1,4,0)
+472 ;;=4^Z85.038
+473 ;;^UTILITY(U,$J,358.3,7644,2)
+474 ;;=^5063399
+475 ;;^UTILITY(U,$J,358.3,7645,0)
+476 ;;=Z86.010^^42^392^13
+477 ;;^UTILITY(U,$J,358.3,7645,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,7645,1,3,0)
+480 ;;=3^Personal Hx of Colonic polyps
+481 ;;^UTILITY(U,$J,358.3,7645,1,4,0)
+482 ;;=4^Z86.010
+483 ;;^UTILITY(U,$J,358.3,7645,2)
+484 ;;=^5063456
+485 ;;^UTILITY(U,$J,358.3,7646,0)
+486 ;;=Z80.0^^42^392^3
+487 ;;^UTILITY(U,$J,358.3,7646,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,7646,1,3,0)
+490 ;;=3^Family Hx malignancy,Digestive organs
+491 ;;^UTILITY(U,$J,358.3,7646,1,4,0)
+492 ;;=4^Z80.0
+493 ;;^UTILITY(U,$J,358.3,7646,2)
+494 ;;=^5063344
+495 ;;^UTILITY(U,$J,358.3,7647,0)
+496 ;;=Z12.11^^42^392^14
+497 ;;^UTILITY(U,$J,358.3,7647,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,7647,1,3,0)
+500 ;;=3^Screening for Colorectal Cancer
+501 ;;^UTILITY(U,$J,358.3,7647,1,4,0)
+502 ;;=4^Z12.11
+503 ;;^UTILITY(U,$J,358.3,7647,2)
+504 ;;=^5062681
+505 ;;^UTILITY(U,$J,358.3,7648,0)
+506 ;;=Z76.82^^42^392^2
+507 ;;^UTILITY(U,$J,358.3,7648,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,7648,1,3,0)
+510 ;;=3^Awaiting Organ Transplant
+511 ;;^UTILITY(U,$J,358.3,7648,1,4,0)
+512 ;;=4^Z76.82
+513 ;;^UTILITY(U,$J,358.3,7648,2)
+514 ;;=^331582
+515 ;;^UTILITY(U,$J,358.3,7649,0)
+516 ;;=Z85.07^^42^392^10
+517 ;;^UTILITY(U,$J,358.3,7649,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,7649,1,3,0)
+520 ;;=3^Personal Hx malignancy,Pancreas
+521 ;;^UTILITY(U,$J,358.3,7649,1,4,0)
+522 ;;=4^Z85.07
+523 ;;^UTILITY(U,$J,358.3,7649,2)
+524 ;;=^5063405
+525 ;;^UTILITY(U,$J,358.3,7650,0)
+526 ;;=Z85.01^^42^392^8
+527 ;;^UTILITY(U,$J,358.3,7650,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,7650,1,3,0)
+530 ;;=3^Personal Hx malignancy,Esophagus
+531 ;;^UTILITY(U,$J,358.3,7650,1,4,0)
+532 ;;=4^Z85.01
+533 ;;^UTILITY(U,$J,358.3,7650,2)
+534 ;;=^5063395
+535 ;;^UTILITY(U,$J,358.3,7651,0)
+536 ;;=Z85.028^^42^392^12
+537 ;;^UTILITY(U,$J,358.3,7651,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,7651,1,3,0)
+540 ;;=3^Personal Hx malignancy,Stomach
+541 ;;^UTILITY(U,$J,358.3,7651,1,4,0)
+542 ;;=4^Z85.028
+543 ;;^UTILITY(U,$J,358.3,7651,2)
+544 ;;=^5063397
+545 ;;^UTILITY(U,$J,358.3,7652,0)
+546 ;;=R19.5^^42^392^4
+547 ;;^UTILITY(U,$J,358.3,7652,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,7652,1,3,0)
+550 ;;=3^Fecal occult blood positive
+551 ;;^UTILITY(U,$J,358.3,7652,1,4,0)
+552 ;;=4^R19.5
+553 ;;^UTILITY(U,$J,358.3,7652,2)
+554 ;;=^5019274
+555 ;;^UTILITY(U,$J,358.3,7653,0)
+556 ;;=Z85.068^^42^392^11
+557 ;;^UTILITY(U,$J,358.3,7653,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,7653,1,3,0)
+560 ;;=3^Personal Hx malignancy,Sm Int
+561 ;;^UTILITY(U,$J,358.3,7653,1,4,0)
+562 ;;=4^Z85.068
+563 ;;^UTILITY(U,$J,358.3,7653,2)
+564 ;;=^5063404
+565 ;;^UTILITY(U,$J,358.3,7654,0)
+566 ;;=Z85.048^^42^392^5
+567 ;;^UTILITY(U,$J,358.3,7654,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,7654,1,3,0)
+570 ;;=3^Personal Hx malignancy,Anus,Rectum,Rectosigmoid
+571 ;;^UTILITY(U,$J,358.3,7654,1,4,0)
+572 ;;=4^Z85.048
+573 ;;^UTILITY(U,$J,358.3,7654,2)
+574 ;;=^5063401
+575 ;;^UTILITY(U,$J,358.3,7655,0)
+576 ;;=Z85.09^^42^392^6
+577 ;;^UTILITY(U,$J,358.3,7655,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,7655,1,3,0)
+580 ;;=3^Personal Hx malignancy,Biliary tract & Gallbladder
+581 ;;^UTILITY(U,$J,358.3,7655,1,4,0)
+582 ;;=4^Z85.09
+583 ;;^UTILITY(U,$J,358.3,7655,2)
+584 ;;=^5063406
+585 ;;^UTILITY(U,$J,358.3,7656,0)
+586 ;;=Z85.05^^42^392^9
+587 ;;^UTILITY(U,$J,358.3,7656,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,7656,1,3,0)
+590 ;;=3^Personal Hx malignancy,Liver
+591 ;;^UTILITY(U,$J,358.3,7656,1,4,0)
+592 ;;=4^Z85.05
+593 ;;^UTILITY(U,$J,358.3,7656,2)
+594 ;;=^5063402
+595 ;;^UTILITY(U,$J,358.3,7657,0)
+596 ;;=Z12.0^^42^392^15
+597 ;;^UTILITY(U,$J,358.3,7657,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,7657,1,3,0)
+600 ;;=3^Screening for Gastric Cancer
+601 ;;^UTILITY(U,$J,358.3,7657,1,4,0)
+602 ;;=4^Z12.0
+603 ;;^UTILITY(U,$J,358.3,7657,2)
+604 ;;=^5062679
+605 ;;^UTILITY(U,$J,358.3,7658,0)
+606 ;;=Z13.811^^42^392^16
+607 ;;^UTILITY(U,$J,358.3,7658,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,7658,1,3,0)
+610 ;;=3^Screening for Lower Gastrointestinal Disorder(s)
+611 ;;^UTILITY(U,$J,358.3,7658,1,4,0)
+612 ;;=4^Z13.811
+613 ;;^UTILITY(U,$J,358.3,7658,2)
+614 ;;=^5062711
+615 ;;^UTILITY(U,$J,358.3,7659,0)
+616 ;;=Z13.810^^42^392^17
+617 ;;^UTILITY(U,$J,358.3,7659,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,7659,1,3,0)
+620 ;;=3^Screening for Upper Gastrointestinal Disorder(s)
+621 ;;^UTILITY(U,$J,358.3,7659,1,4,0)
+622 ;;=4^Z13.810
+623 ;;^UTILITY(U,$J,358.3,7659,2)
+624 ;;=^5062710
+625 ;;^UTILITY(U,$J,358.3,7660,0)
+626 ;;=Z11.0^^42^392^18
+627 ;;^UTILITY(U,$J,358.3,7660,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,7660,1,3,0)
+630 ;;=3^Screening for Viral Intestinal Diseases
+631 ;;^UTILITY(U,$J,358.3,7660,1,4,0)
+632 ;;=4^Z11.0
+633 ;;^UTILITY(U,$J,358.3,7660,2)
+634 ;;=^5062669
+635 ;;^UTILITY(U,$J,358.3,7661,0)
+636 ;;=K82.4^^42^393^30
+637 ;;^UTILITY(U,$J,358.3,7661,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,7661,1,3,0)
+640 ;;=3^Polyp of Gallbladder
+641 ;;^UTILITY(U,$J,358.3,7661,1,4,0)
+642 ;;=4^K82.4
+643 ;;^UTILITY(U,$J,358.3,7661,2)
+644 ;;=^265888
+645 ;;^UTILITY(U,$J,358.3,7662,0)
+646 ;;=C23.^^42^393^27
+647 ;;^UTILITY(U,$J,358.3,7662,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,7662,1,3,0)
+650 ;;=3^Malignant neoplasm,Gallbladder
+651 ;;^UTILITY(U,$J,358.3,7662,1,4,0)
+652 ;;=4^C23.
+653 ;;^UTILITY(U,$J,358.3,7662,2)
+654 ;;=^267098
+655 ;;^UTILITY(U,$J,358.3,7663,0)
+656 ;;=K82.8^^42^393^21
+657 ;;^UTILITY(U,$J,358.3,7663,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,7663,1,3,0)
+660 ;;=3^Gallbladder dyskinesia
+661 ;;^UTILITY(U,$J,358.3,7663,1,4,0)
+662 ;;=4^K82.8
+663 ;;^UTILITY(U,$J,358.3,7663,2)
+664 ;;=^5008874
+665 ;;^UTILITY(U,$J,358.3,7664,0)
+666 ;;=R17.^^42^393^24
+667 ;;^UTILITY(U,$J,358.3,7664,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,7664,1,3,0)
+670 ;;=3^Jaundice
+671 ;;^UTILITY(U,$J,358.3,7664,1,4,0)
+672 ;;=4^R17.
+673 ;;^UTILITY(U,$J,358.3,7664,2)
+674 ;;=^5019251
+675 ;;^UTILITY(U,$J,358.3,7665,0)
+676 ;;=C24.0^^42^393^26
+677 ;;^UTILITY(U,$J,358.3,7665,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,7665,1,3,0)
+680 ;;=3^Malignant neoplasm,Extrahepatic bile duct
+681 ;;^UTILITY(U,$J,358.3,7665,1,4,0)
+682 ;;=4^C24.0
+683 ;;^UTILITY(U,$J,358.3,7665,2)
+684 ;;=^5000940
+685 ;;^UTILITY(U,$J,358.3,7666,0)
+686 ;;=K83.9^^42^393^19
+687 ;;^UTILITY(U,$J,358.3,7666,1,0)
+688 ;;=^358.31IA^4^2
+689 ;;^UTILITY(U,$J,358.3,7666,1,3,0)
+690 ;;=3^Disease of Biliary tract,unspec
+691 ;;^UTILITY(U,$J,358.3,7666,1,4,0)
+692 ;;=4^K83.9
+693 ;;^UTILITY(U,$J,358.3,7666,2)
+694 ;;=^5008881
+695 ;;^UTILITY(U,$J,358.3,7667,0)
+696 ;;=K80.33^^42^393^4
+697 ;;^UTILITY(U,$J,358.3,7667,1,0)
+698 ;;=^358.31IA^4^2
+699 ;;^UTILITY(U,$J,358.3,7667,1,3,0)
+700 ;;=3^Calculus,Bile Duct w/ Acute Cholangitis w/ Obstruction
+701 ;;^UTILITY(U,$J,358.3,7667,1,4,0)
+702 ;;=4^K80.33
+703 ;;^UTILITY(U,$J,358.3,7667,2)
+704 ;;=^5008851
+705 ;;^UTILITY(U,$J,358.3,7668,0)
+706 ;;=K80.01^^42^393^10
