IBDEI036 ; ; 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,7526,1,4,0)
;;=4^K31.82
;;^UTILITY(U,$J,358.3,7526,2)
;;=^328530
;;^UTILITY(U,$J,358.3,7527,0)
;;=K52.81^^42^389^8
;;^UTILITY(U,$J,358.3,7527,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7527,1,3,0)
;;=3^Eosinophilic gastritis or gastroenteritis
;;^UTILITY(U,$J,358.3,7527,1,4,0)
;;=4^K52.81
;;^UTILITY(U,$J,358.3,7527,2)
;;=^5008702
;;^UTILITY(U,$J,358.3,7528,0)
;;=K31.6^^42^389^9
;;^UTILITY(U,$J,358.3,7528,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7528,1,3,0)
;;=3^Fistula of Stomach
;;^UTILITY(U,$J,358.3,7528,1,4,0)
;;=4^K31.6
;;^UTILITY(U,$J,358.3,7528,2)
;;=^5008565
;;^UTILITY(U,$J,358.3,7529,0)
;;=T18.2XXA^^42^389^10
;;^UTILITY(U,$J,358.3,7529,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7529,1,3,0)
;;=3^Foreign body in Stomach,Initial
;;^UTILITY(U,$J,358.3,7529,1,4,0)
;;=4^T18.2XXA
;;^UTILITY(U,$J,358.3,7529,2)
;;=^5046603
;;^UTILITY(U,$J,358.3,7530,0)
;;=T18.2XXD^^42^389^12
;;^UTILITY(U,$J,358.3,7530,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7530,1,3,0)
;;=3^Foreign body in Stomach,Subsequent
;;^UTILITY(U,$J,358.3,7530,1,4,0)
;;=4^T18.2XXD
;;^UTILITY(U,$J,358.3,7530,2)
;;=^5046604
;;^UTILITY(U,$J,358.3,7531,0)
;;=T18.2XXS^^42^389^11
;;^UTILITY(U,$J,358.3,7531,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7531,1,3,0)
;;=3^Foreign body in Stomach,Sequela
;;^UTILITY(U,$J,358.3,7531,1,4,0)
;;=4^T18.2XXS
;;^UTILITY(U,$J,358.3,7531,2)
;;=^5046605
;;^UTILITY(U,$J,358.3,7532,0)
;;=K29.01^^42^389^16
;;^UTILITY(U,$J,358.3,7532,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7532,1,3,0)
;;=3^Gastritis,Acute w/ Bleeding
;;^UTILITY(U,$J,358.3,7532,1,4,0)
;;=4^K29.01
;;^UTILITY(U,$J,358.3,7532,2)
;;=^5008543
;;^UTILITY(U,$J,358.3,7533,0)
;;=K29.00^^42^389^17
;;^UTILITY(U,$J,358.3,7533,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7533,1,3,0)
;;=3^Gastritis,Acute w/o Bleeding
;;^UTILITY(U,$J,358.3,7533,1,4,0)
;;=4^K29.00
;;^UTILITY(U,$J,358.3,7533,2)
;;=^5008542
;;^UTILITY(U,$J,358.3,7534,0)
;;=K29.21^^42^389^18
;;^UTILITY(U,$J,358.3,7534,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7534,1,3,0)
;;=3^Gastritis,Alcoholic w/ Bleeding
;;^UTILITY(U,$J,358.3,7534,1,4,0)
;;=4^K29.21
;;^UTILITY(U,$J,358.3,7534,2)
;;=^5008545
;;^UTILITY(U,$J,358.3,7535,0)
;;=K29.41^^42^389^20
;;^UTILITY(U,$J,358.3,7535,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7535,1,3,0)
;;=3^Gastritis,Chronic Atrophic w/ Bleeding
;;^UTILITY(U,$J,358.3,7535,1,4,0)
;;=4^K29.41
;;^UTILITY(U,$J,358.3,7535,2)
;;=^5008549
;;^UTILITY(U,$J,358.3,7536,0)
;;=K29.40^^42^389^21
;;^UTILITY(U,$J,358.3,7536,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7536,1,3,0)
;;=3^Gastritis,Chronic Atrophic w/o Bleeding
;;^UTILITY(U,$J,358.3,7536,1,4,0)
;;=4^K29.40
;;^UTILITY(U,$J,358.3,7536,2)
;;=^5008548
;;^UTILITY(U,$J,358.3,7537,0)
;;=C49.A2^^42^389^25
;;^UTILITY(U,$J,358.3,7537,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7537,1,3,0)
;;=3^Gastrointestinal stromal tumor of Stomach
;;^UTILITY(U,$J,358.3,7537,1,4,0)
;;=4^C49.A2
;;^UTILITY(U,$J,358.3,7537,2)
;;=^8148063
;;^UTILITY(U,$J,358.3,7538,0)
;;=K31.84^^42^389^26
;;^UTILITY(U,$J,358.3,7538,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7538,1,3,0)
;;=3^Gastroparesis
;;^UTILITY(U,$J,358.3,7538,1,4,0)
;;=4^K31.84
;;^UTILITY(U,$J,358.3,7538,2)
;;=^264447
;;^UTILITY(U,$J,358.3,7539,0)
;;=E16.4^^42^389^28
;;^UTILITY(U,$J,358.3,7539,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7539,1,3,0)
;;=3^Hypergastrinemia
;;^UTILITY(U,$J,358.3,7539,1,4,0)
;;=4^E16.4
;;^UTILITY(U,$J,358.3,7539,2)
;;=^5002710
;;^UTILITY(U,$J,358.3,7540,0)
;;=C16.2^^42^389^29
;;^UTILITY(U,$J,358.3,7540,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7540,1,3,0)
;;=3^Malignant neoplasm,Body
;;^UTILITY(U,$J,358.3,7540,1,4,0)
;;=4^C16.2
;;^UTILITY(U,$J,358.3,7540,2)
;;=^267067
;;^UTILITY(U,$J,358.3,7541,0)
;;=C16.5^^42^389^32
;;^UTILITY(U,$J,358.3,7541,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7541,1,3,0)
;;=3^Malignant neoplasm,Lesser curve
;;^UTILITY(U,$J,358.3,7541,1,4,0)
;;=4^C16.5
;;^UTILITY(U,$J,358.3,7541,2)
;;=^5000920
;;^UTILITY(U,$J,358.3,7542,0)
;;=C16.8^^42^389^33
;;^UTILITY(U,$J,358.3,7542,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7542,1,3,0)
;;=3^Malignant neoplasm,Overlapping sites
;;^UTILITY(U,$J,358.3,7542,1,4,0)
;;=4^C16.8
;;^UTILITY(U,$J,358.3,7542,2)
;;=^5000922
;;^UTILITY(U,$J,358.3,7543,0)
;;=K31.1^^42^389^35
;;^UTILITY(U,$J,358.3,7543,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7543,1,3,0)
;;=3^Obstruction of Pylorus
;;^UTILITY(U,$J,358.3,7543,1,4,0)
;;=4^K31.1
;;^UTILITY(U,$J,358.3,7543,2)
;;=^5008560
;;^UTILITY(U,$J,358.3,7544,0)
;;=K31.7^^42^389^36
;;^UTILITY(U,$J,358.3,7544,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7544,1,3,0)
;;=3^Polyp of Stomach
;;^UTILITY(U,$J,358.3,7544,1,4,0)
;;=4^K31.7
;;^UTILITY(U,$J,358.3,7544,2)
;;=^5008566
;;^UTILITY(U,$J,358.3,7545,0)
;;=K25.7^^42^389^45
;;^UTILITY(U,$J,358.3,7545,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7545,1,3,0)
;;=3^Ulcer,Stomach,Chronic w/o Bleed or Perf
;;^UTILITY(U,$J,358.3,7545,1,4,0)
;;=4^K25.7
;;^UTILITY(U,$J,358.3,7545,2)
;;=^5008521
;;^UTILITY(U,$J,358.3,7546,0)
;;=K56.2^^42^389^46
;;^UTILITY(U,$J,358.3,7546,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7546,1,3,0)
;;=3^Volvulus
;;^UTILITY(U,$J,358.3,7546,1,4,0)
;;=4^K56.2
;;^UTILITY(U,$J,358.3,7546,2)
;;=^5008711
;;^UTILITY(U,$J,358.3,7547,0)
;;=K31.9^^42^389^7
;;^UTILITY(U,$J,358.3,7547,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7547,1,3,0)
;;=3^Disease of Stomach,Unsp
;;^UTILITY(U,$J,358.3,7547,1,4,0)
;;=4^K31.9
;;^UTILITY(U,$J,358.3,7547,2)
;;=^5008570
;;^UTILITY(U,$J,358.3,7548,0)
;;=C16.1^^42^389^30
;;^UTILITY(U,$J,358.3,7548,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7548,1,3,0)
;;=3^Malignant neoplasm,Fundus
;;^UTILITY(U,$J,358.3,7548,1,4,0)
;;=4^C16.1
;;^UTILITY(U,$J,358.3,7548,2)
;;=^267066
;;^UTILITY(U,$J,358.3,7549,0)
;;=C16.6^^42^389^31
;;^UTILITY(U,$J,358.3,7549,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7549,1,3,0)
;;=3^Malignant neoplasm,Greater curve
;;^UTILITY(U,$J,358.3,7549,1,4,0)
;;=4^C16.6
;;^UTILITY(U,$J,358.3,7549,2)
;;=^5000921
;;^UTILITY(U,$J,358.3,7550,0)
;;=K31.811^^42^389^13
;;^UTILITY(U,$J,358.3,7550,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7550,1,3,0)
;;=3^Gastric antral vascular ectasia w/ bleeding
;;^UTILITY(U,$J,358.3,7550,1,4,0)
;;=4^K31.811
;;^UTILITY(U,$J,358.3,7550,2)
;;=^5008567
;;^UTILITY(U,$J,358.3,7551,0)
;;=K31.819^^42^389^14
;;^UTILITY(U,$J,358.3,7551,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7551,1,3,0)
;;=3^Gastric antral vascular ectasia w/o bleeding
;;^UTILITY(U,$J,358.3,7551,1,4,0)
;;=4^K31.819
;;^UTILITY(U,$J,358.3,7551,2)
;;=^5008568
;;^UTILITY(U,$J,358.3,7552,0)
;;=K29.71^^42^389^23
;;^UTILITY(U,$J,358.3,7552,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7552,1,3,0)
;;=3^Gastritis,Unspec w/ Bleeding
;;^UTILITY(U,$J,358.3,7552,1,4,0)
;;=4^K29.71
;;^UTILITY(U,$J,358.3,7552,2)
;;=^5008553
;;^UTILITY(U,$J,358.3,7553,0)
;;=K29.70^^42^389^24
;;^UTILITY(U,$J,358.3,7553,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7553,1,3,0)
;;=3^Gastritis,Unspec w/o Bleeding
;;^UTILITY(U,$J,358.3,7553,1,4,0)
;;=4^K29.70
;;^UTILITY(U,$J,358.3,7553,2)
;;=^5008552
;;^UTILITY(U,$J,358.3,7554,0)
;;=D00.2^^42^389^5
;;^UTILITY(U,$J,358.3,7554,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7554,1,3,0)
;;=3^Carcinoma in Situ of Stomach
;;^UTILITY(U,$J,358.3,7554,1,4,0)
;;=4^D00.2
;;^UTILITY(U,$J,358.3,7554,2)
;;=^267711
;;^UTILITY(U,$J,358.3,7555,0)
;;=K91.1^^42^390^14
;;^UTILITY(U,$J,358.3,7555,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7555,1,3,0)
;;=3^Postgastric surgery syndromes incl. Dumping syndrome
;;^UTILITY(U,$J,358.3,7555,1,4,0)
;;=4^K91.1
;;^UTILITY(U,$J,358.3,7555,2)
;;=^5008900
;;^UTILITY(U,$J,358.3,7556,0)
;;=Z93.1^^42^390^10
;;^UTILITY(U,$J,358.3,7556,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7556,1,3,0)
;;=3^Gastrostomy status
;;^UTILITY(U,$J,358.3,7556,1,4,0)
;;=4^Z93.1
;;^UTILITY(U,$J,358.3,7556,2)
;;=^5063643
;;^UTILITY(U,$J,358.3,7557,0)
;;=Z90.3^^42^390^4
;;^UTILITY(U,$J,358.3,7557,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7557,1,3,0)
;;=3^Acquired absence of Stomach
;;^UTILITY(U,$J,358.3,7557,1,4,0)
;;=4^Z90.3
;;^UTILITY(U,$J,358.3,7557,2)
;;=^5063586
;;^UTILITY(U,$J,358.3,7558,0)
;;=Z90.49^^42^390^1
;;^UTILITY(U,$J,358.3,7558,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7558,1,3,0)
;;=3^Acquired absence of (specified) Digestive tract
;;^UTILITY(U,$J,358.3,7558,1,4,0)
;;=4^Z90.49
;;^UTILITY(U,$J,358.3,7558,2)
;;=^5063589
;;^UTILITY(U,$J,358.3,7559,0)
;;=Z90.411^^42^390^2
;;^UTILITY(U,$J,358.3,7559,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7559,1,3,0)
;;=3^Acquired absence of Pancreas,Partial
;;^UTILITY(U,$J,358.3,7559,1,4,0)
;;=4^Z90.411
;;^UTILITY(U,$J,358.3,7559,2)
;;=^5063588
;;^UTILITY(U,$J,358.3,7560,0)
;;=Z90.410^^42^390^3
;;^UTILITY(U,$J,358.3,7560,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7560,1,3,0)
;;=3^Acquired absence of Pancreas,Total
;;^UTILITY(U,$J,358.3,7560,1,4,0)
;;=4^Z90.410
;;^UTILITY(U,$J,358.3,7560,2)
;;=^5063587
;;^UTILITY(U,$J,358.3,7561,0)
;;=Z98.84^^42^390^5
;;^UTILITY(U,$J,358.3,7561,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7561,1,3,0)
;;=3^Bariatric surgery status
;;^UTILITY(U,$J,358.3,7561,1,4,0)
;;=4^Z98.84
;;^UTILITY(U,$J,358.3,7561,2)
;;=^5063749
;;^UTILITY(U,$J,358.3,7562,0)
;;=Z93.3^^42^390^6
;;^UTILITY(U,$J,358.3,7562,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7562,1,3,0)
;;=3^Colostomy status
;;^UTILITY(U,$J,358.3,7562,1,4,0)
;;=4^Z93.3
;;^UTILITY(U,$J,358.3,7562,2)
;;=^5063645
;;^UTILITY(U,$J,358.3,7563,0)
;;=K94.21^^42^390^8
;;^UTILITY(U,$J,358.3,7563,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7563,1,3,0)
;;=3^Gastrostomy hemorrhage
;;^UTILITY(U,$J,358.3,7563,1,4,0)
;;=4^K94.21
;;^UTILITY(U,$J,358.3,7563,2)
;;=^5008929
;;^UTILITY(U,$J,358.3,7564,0)
;;=K94.23^^42^390^9
;;^UTILITY(U,$J,358.3,7564,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7564,1,3,0)
;;=3^Gastrostomy malfunction
;;^UTILITY(U,$J,358.3,7564,1,4,0)
;;=4^K94.23
;;^UTILITY(U,$J,358.3,7564,2)
;;=^5008931
;;^UTILITY(U,$J,358.3,7565,0)
;;=Z93.2^^42^390^11
;;^UTILITY(U,$J,358.3,7565,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7565,1,3,0)
;;=3^Ileostomy status
;;^UTILITY(U,$J,358.3,7565,1,4,0)
;;=4^Z93.2
;;^UTILITY(U,$J,358.3,7565,2)
;;=^5063644
;;^UTILITY(U,$J,358.3,7566,0)
;;=Z93.4^^42^390^13
;;^UTILITY(U,$J,358.3,7566,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7566,1,3,0)
;;=3^Jejunostomy status
;;^UTILITY(U,$J,358.3,7566,1,4,0)
;;=4^Z93.4
;;^UTILITY(U,$J,358.3,7566,2)
;;=^5063646
;;^UTILITY(U,$J,358.3,7567,0)
;;=K94.29^^42^390^7
;;^UTILITY(U,$J,358.3,7567,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7567,1,3,0)
;;=3^Gastrostomy Complications,Other
;;^UTILITY(U,$J,358.3,7567,1,4,0)
;;=4^K94.29
;;^UTILITY(U,$J,358.3,7567,2)
;;=^5008932
;;^UTILITY(U,$J,358.3,7568,0)
;;=K91.858^^42^390^12
;;^UTILITY(U,$J,358.3,7568,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7568,1,3,0)
;;=3^Intestinal Pouch Complications,Other
;;^UTILITY(U,$J,358.3,7568,1,4,0)
;;=4^K91.858
;;^UTILITY(U,$J,358.3,7568,2)
;;=^338262
;;^UTILITY(U,$J,358.3,7569,0)
;;=K91.2^^42^390^15
;;^UTILITY(U,$J,358.3,7569,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7569,1,3,0)
;;=3^Postsurgical malabsorption incl. Short bowel syndrome
;;^UTILITY(U,$J,358.3,7569,1,4,0)
;;=4^K91.2
;;^UTILITY(U,$J,358.3,7569,2)
;;=^5008901
;;^UTILITY(U,$J,358.3,7570,0)
;;=K91.850^^42^390^16
;;^UTILITY(U,$J,358.3,7570,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7570,1,3,0)
;;=3^Pouchitis
;;^UTILITY(U,$J,358.3,7570,1,4,0)
;;=4^K91.850
;;^UTILITY(U,$J,358.3,7570,2)
;;=^338261
;;^UTILITY(U,$J,358.3,7571,0)
;;=K91.89^^42^390^17
;;^UTILITY(U,$J,358.3,7571,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7571,1,3,0)
;;=3^Stricture,Postprocedural incl. radiation
;;^UTILITY(U,$J,358.3,7571,1,4,0)
;;=4^K91.89
;;^UTILITY(U,$J,358.3,7571,2)
;;=^5008912
;;^UTILITY(U,$J,358.3,7572,0)
;;=K28.0^^42^390^19
;;^UTILITY(U,$J,358.3,7572,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7572,1,3,0)
;;=3^Ulcer,Gastrojejunal,Acute w/ Bleeding
;;^UTILITY(U,$J,358.3,7572,1,4,0)
;;=4^K28.0
;;^UTILITY(U,$J,358.3,7572,2)
;;=^270141
;;^UTILITY(U,$J,358.3,7573,0)
;;=K28.1^^42^390^20
;;^UTILITY(U,$J,358.3,7573,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7573,1,3,0)
;;=3^Ulcer,Gastrojejunal,Acute w/ Perforation
;;^UTILITY(U,$J,358.3,7573,1,4,0)
;;=4^K28.1
;;^UTILITY(U,$J,358.3,7573,2)
;;=^270144
;;^UTILITY(U,$J,358.3,7574,0)
;;=K28.2^^42^390^18
;;^UTILITY(U,$J,358.3,7574,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7574,1,3,0)
;;=3^Ulcer,Gastrojejunal,Acute w/ Bleed & Perf
;;^UTILITY(U,$J,358.3,7574,1,4,0)
;;=4^K28.2
;;^UTILITY(U,$J,358.3,7574,2)
;;=^5008537
;;^UTILITY(U,$J,358.3,7575,0)
;;=K28.3^^42^390^21
;;^UTILITY(U,$J,358.3,7575,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7575,1,3,0)
;;=3^Ulcer,Gastrojejunal,Acute w/o Bleed or Perf
;;^UTILITY(U,$J,358.3,7575,1,4,0)
;;=4^K28.3
;;^UTILITY(U,$J,358.3,7575,2)
;;=^5008538
;;^UTILITY(U,$J,358.3,7576,0)
;;=K28.4^^42^390^23
;;^UTILITY(U,$J,358.3,7576,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7576,1,3,0)
;;=3^Ulcer,Gastrojejunal,Chronic w/ Bleeding
;;^UTILITY(U,$J,358.3,7576,1,4,0)
;;=4^K28.4
;;^UTILITY(U,$J,358.3,7576,2)
;;=^270153
;;^UTILITY(U,$J,358.3,7577,0)
;;=K28.5^^42^390^24
;;^UTILITY(U,$J,358.3,7577,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7577,1,3,0)
;;=3^Ulcer,Gastrojejunal,Chronic w/ Perforation
;;^UTILITY(U,$J,358.3,7577,1,4,0)
;;=4^K28.5
;;^UTILITY(U,$J,358.3,7577,2)
;;=^270156
;;^UTILITY(U,$J,358.3,7578,0)
;;=K28.6^^42^390^22
;;^UTILITY(U,$J,358.3,7578,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7578,1,3,0)
;;=3^Ulcer,Gastrojejunal,Chronic w/ Bleed & Perf
;;^UTILITY(U,$J,358.3,7578,1,4,0)
;;=4^K28.6
;;^UTILITY(U,$J,358.3,7578,2)
;;=^5008539
;;^UTILITY(U,$J,358.3,7579,0)
;;=K28.7^^42^390^25
;;^UTILITY(U,$J,358.3,7579,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7579,1,3,0)
;;=3^Ulcer,Gastrojejunal,Chronic w/o Bleed or Perf
;;^UTILITY(U,$J,358.3,7579,1,4,0)
;;=4^K28.7
;;^UTILITY(U,$J,358.3,7579,2)
;;=^5008540
;;^UTILITY(U,$J,358.3,7580,0)
;;=K92.0^^42^391^41
;;^UTILITY(U,$J,358.3,7580,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7580,1,3,0)
;;=3^Hematemesis
;;^UTILITY(U,$J,358.3,7580,1,4,0)
;;=4^K92.0
;;^UTILITY(U,$J,358.3,7580,2)
;;=^5008913
;;^UTILITY(U,$J,358.3,7581,0)
;;=K92.1^^42^391^53
;;^UTILITY(U,$J,358.3,7581,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7581,1,3,0)
;;=3^Melena
;;^UTILITY(U,$J,358.3,7581,1,4,0)
;;=4^K92.1
;;^UTILITY(U,$J,358.3,7581,2)
;;=^5008914
;;^UTILITY(U,$J,358.3,7582,0)
;;=K92.2^^42^391^37
;;^UTILITY(U,$J,358.3,7582,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7582,1,3,0)
;;=3^Gastrointestinal hemorrhage,Unsp
;;^UTILITY(U,$J,358.3,7582,1,4,0)
;;=4^K92.2
;;^UTILITY(U,$J,358.3,7582,2)
;;=^5008915
;;^UTILITY(U,$J,358.3,7583,0)
;;=R11.2^^42^391^55
;;^UTILITY(U,$J,358.3,7583,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7583,1,3,0)
;;=3^Nausea w/ Vomiting
;;^UTILITY(U,$J,358.3,7583,1,4,0)
;;=4^R11.2
;;^UTILITY(U,$J,358.3,7583,2)
;;=^5019237
;;^UTILITY(U,$J,358.3,7584,0)
;;=R11.0^^42^391^54
;;^UTILITY(U,$J,358.3,7584,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7584,1,3,0)
;;=3^Nausea
;;^UTILITY(U,$J,358.3,7584,1,4,0)
;;=4^R11.0
;;^UTILITY(U,$J,358.3,7584,2)
;;=^5019231
;;^UTILITY(U,$J,358.3,7585,0)
;;=R11.11^^42^391^56
;;^UTILITY(U,$J,358.3,7585,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7585,1,3,0)
;;=3^Vomitin w/o Nausea
;;^UTILITY(U,$J,358.3,7585,1,4,0)
;;=4^R11.11
;;^UTILITY(U,$J,358.3,7585,2)
;;=^5019233
;;^UTILITY(U,$J,358.3,7586,0)
;;=R11.10^^42^391^62
;;^UTILITY(U,$J,358.3,7586,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7586,1,3,0)
;;=3^Vomiting,Unsp
;;^UTILITY(U,$J,358.3,7586,1,4,0)
;;=4^R11.10
;;^UTILITY(U,$J,358.3,7586,2)
;;=^5019232
;;^UTILITY(U,$J,358.3,7587,0)
;;=R13.12^^42^391^25
;;^UTILITY(U,$J,358.3,7587,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7587,1,3,0)
;;=3^Dysphagia,Oropharyngeal
;;^UTILITY(U,$J,358.3,7587,1,4,0)
;;=4^R13.12
;;^UTILITY(U,$J,358.3,7587,2)
;;=^335277
;;^UTILITY(U,$J,358.3,7588,0)
;;=R13.14^^42^391^26
;;^UTILITY(U,$J,358.3,7588,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7588,1,3,0)
;;=3^Dysphagia,Pharyngoesophageal
;;^UTILITY(U,$J,358.3,7588,1,4,0)
;;=4^R13.14
;;^UTILITY(U,$J,358.3,7588,2)
;;=^335279
;;^UTILITY(U,$J,358.3,7589,0)
;;=R13.19^^42^391^23
;;^UTILITY(U,$J,358.3,7589,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7589,1,3,0)
;;=3^Dysphagia,Cervical or Neurogenic
;;^UTILITY(U,$J,358.3,7589,1,4,0)
;;=4^R13.19
;;^UTILITY(U,$J,358.3,7589,2)
;;=^335280
;;^UTILITY(U,$J,358.3,7590,0)
;;=R14.3^^42^391^34
;;^UTILITY(U,$J,358.3,7590,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7590,1,3,0)
;;=3^Flatulence
;;^UTILITY(U,$J,358.3,7590,1,4,0)
;;=4^R14.3
;;^UTILITY(U,$J,358.3,7590,2)
;;=^5019243
;;^UTILITY(U,$J,358.3,7591,0)
;;=R14.2^^42^391^28
;;^UTILITY(U,$J,358.3,7591,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7591,1,3,0)
;;=3^Eructation
;;^UTILITY(U,$J,358.3,7591,1,4,0)
;;=4^R14.2
;;^UTILITY(U,$J,358.3,7591,2)
;;=^5019242
;;^UTILITY(U,$J,358.3,7592,0)
;;=R14.1^^42^391^36
;;^UTILITY(U,$J,358.3,7592,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7592,1,3,0)
;;=3^Gas pain
;;^UTILITY(U,$J,358.3,7592,1,4,0)
;;=4^R14.1
;;^UTILITY(U,$J,358.3,7592,2)
;;=^5019241
;;^UTILITY(U,$J,358.3,7593,0)
;;=R14.0^^42^391^12
;;^UTILITY(U,$J,358.3,7593,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7593,1,3,0)
;;=3^Bloating
;;^UTILITY(U,$J,358.3,7593,1,4,0)
;;=4^R14.0
;;^UTILITY(U,$J,358.3,7593,2)
;;=^5019240
;;^UTILITY(U,$J,358.3,7594,0)
;;=R19.7^^42^391^22
;;^UTILITY(U,$J,358.3,7594,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7594,1,3,0)
;;=3^Diarrhea,Unsp
;;^UTILITY(U,$J,358.3,7594,1,4,0)
;;=4^R19.7
;;^UTILITY(U,$J,358.3,7594,2)
;;=^5019276
;;^UTILITY(U,$J,358.3,7595,0)
;;=R19.4^^42^391^13
;;^UTILITY(U,$J,358.3,7595,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7595,1,3,0)
;;=3^Change in bowel habit
;;^UTILITY(U,$J,358.3,7595,1,4,0)
;;=4^R19.4
;;^UTILITY(U,$J,358.3,7595,2)
;;=^5019273
;;^UTILITY(U,$J,358.3,7596,0)
;;=R10.11^^42^391^8
;;^UTILITY(U,$J,358.3,7596,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7596,1,3,0)
;;=3^Abdominal pain,Right upper quadrant
;;^UTILITY(U,$J,358.3,7596,1,4,0)
;;=4^R10.11
;;^UTILITY(U,$J,358.3,7596,2)
;;=^5019206
;;^UTILITY(U,$J,358.3,7597,0)
;;=R10.12^^42^391^6
;;^UTILITY(U,$J,358.3,7597,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7597,1,3,0)
;;=3^Abdominal pain,Left upper quadrant
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI036 19754 printed Sep 23, 2025@19:16:42 Page 2
IBDEI036 ; ; 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,7526,1,4,0)
+2 ;;=4^K31.82
+3 ;;^UTILITY(U,$J,358.3,7526,2)
+4 ;;=^328530
+5 ;;^UTILITY(U,$J,358.3,7527,0)
+6 ;;=K52.81^^42^389^8
+7 ;;^UTILITY(U,$J,358.3,7527,1,0)
+8 ;;=^358.31IA^4^2
+9 ;;^UTILITY(U,$J,358.3,7527,1,3,0)
+10 ;;=3^Eosinophilic gastritis or gastroenteritis
+11 ;;^UTILITY(U,$J,358.3,7527,1,4,0)
+12 ;;=4^K52.81
+13 ;;^UTILITY(U,$J,358.3,7527,2)
+14 ;;=^5008702
+15 ;;^UTILITY(U,$J,358.3,7528,0)
+16 ;;=K31.6^^42^389^9
+17 ;;^UTILITY(U,$J,358.3,7528,1,0)
+18 ;;=^358.31IA^4^2
+19 ;;^UTILITY(U,$J,358.3,7528,1,3,0)
+20 ;;=3^Fistula of Stomach
+21 ;;^UTILITY(U,$J,358.3,7528,1,4,0)
+22 ;;=4^K31.6
+23 ;;^UTILITY(U,$J,358.3,7528,2)
+24 ;;=^5008565
+25 ;;^UTILITY(U,$J,358.3,7529,0)
+26 ;;=T18.2XXA^^42^389^10
+27 ;;^UTILITY(U,$J,358.3,7529,1,0)
+28 ;;=^358.31IA^4^2
+29 ;;^UTILITY(U,$J,358.3,7529,1,3,0)
+30 ;;=3^Foreign body in Stomach,Initial
+31 ;;^UTILITY(U,$J,358.3,7529,1,4,0)
+32 ;;=4^T18.2XXA
+33 ;;^UTILITY(U,$J,358.3,7529,2)
+34 ;;=^5046603
+35 ;;^UTILITY(U,$J,358.3,7530,0)
+36 ;;=T18.2XXD^^42^389^12
+37 ;;^UTILITY(U,$J,358.3,7530,1,0)
+38 ;;=^358.31IA^4^2
+39 ;;^UTILITY(U,$J,358.3,7530,1,3,0)
+40 ;;=3^Foreign body in Stomach,Subsequent
+41 ;;^UTILITY(U,$J,358.3,7530,1,4,0)
+42 ;;=4^T18.2XXD
+43 ;;^UTILITY(U,$J,358.3,7530,2)
+44 ;;=^5046604
+45 ;;^UTILITY(U,$J,358.3,7531,0)
+46 ;;=T18.2XXS^^42^389^11
+47 ;;^UTILITY(U,$J,358.3,7531,1,0)
+48 ;;=^358.31IA^4^2
+49 ;;^UTILITY(U,$J,358.3,7531,1,3,0)
+50 ;;=3^Foreign body in Stomach,Sequela
+51 ;;^UTILITY(U,$J,358.3,7531,1,4,0)
+52 ;;=4^T18.2XXS
+53 ;;^UTILITY(U,$J,358.3,7531,2)
+54 ;;=^5046605
+55 ;;^UTILITY(U,$J,358.3,7532,0)
+56 ;;=K29.01^^42^389^16
+57 ;;^UTILITY(U,$J,358.3,7532,1,0)
+58 ;;=^358.31IA^4^2
+59 ;;^UTILITY(U,$J,358.3,7532,1,3,0)
+60 ;;=3^Gastritis,Acute w/ Bleeding
+61 ;;^UTILITY(U,$J,358.3,7532,1,4,0)
+62 ;;=4^K29.01
+63 ;;^UTILITY(U,$J,358.3,7532,2)
+64 ;;=^5008543
+65 ;;^UTILITY(U,$J,358.3,7533,0)
+66 ;;=K29.00^^42^389^17
+67 ;;^UTILITY(U,$J,358.3,7533,1,0)
+68 ;;=^358.31IA^4^2
+69 ;;^UTILITY(U,$J,358.3,7533,1,3,0)
+70 ;;=3^Gastritis,Acute w/o Bleeding
+71 ;;^UTILITY(U,$J,358.3,7533,1,4,0)
+72 ;;=4^K29.00
+73 ;;^UTILITY(U,$J,358.3,7533,2)
+74 ;;=^5008542
+75 ;;^UTILITY(U,$J,358.3,7534,0)
+76 ;;=K29.21^^42^389^18
+77 ;;^UTILITY(U,$J,358.3,7534,1,0)
+78 ;;=^358.31IA^4^2
+79 ;;^UTILITY(U,$J,358.3,7534,1,3,0)
+80 ;;=3^Gastritis,Alcoholic w/ Bleeding
+81 ;;^UTILITY(U,$J,358.3,7534,1,4,0)
+82 ;;=4^K29.21
+83 ;;^UTILITY(U,$J,358.3,7534,2)
+84 ;;=^5008545
+85 ;;^UTILITY(U,$J,358.3,7535,0)
+86 ;;=K29.41^^42^389^20
+87 ;;^UTILITY(U,$J,358.3,7535,1,0)
+88 ;;=^358.31IA^4^2
+89 ;;^UTILITY(U,$J,358.3,7535,1,3,0)
+90 ;;=3^Gastritis,Chronic Atrophic w/ Bleeding
+91 ;;^UTILITY(U,$J,358.3,7535,1,4,0)
+92 ;;=4^K29.41
+93 ;;^UTILITY(U,$J,358.3,7535,2)
+94 ;;=^5008549
+95 ;;^UTILITY(U,$J,358.3,7536,0)
+96 ;;=K29.40^^42^389^21
+97 ;;^UTILITY(U,$J,358.3,7536,1,0)
+98 ;;=^358.31IA^4^2
+99 ;;^UTILITY(U,$J,358.3,7536,1,3,0)
+100 ;;=3^Gastritis,Chronic Atrophic w/o Bleeding
+101 ;;^UTILITY(U,$J,358.3,7536,1,4,0)
+102 ;;=4^K29.40
+103 ;;^UTILITY(U,$J,358.3,7536,2)
+104 ;;=^5008548
+105 ;;^UTILITY(U,$J,358.3,7537,0)
+106 ;;=C49.A2^^42^389^25
+107 ;;^UTILITY(U,$J,358.3,7537,1,0)
+108 ;;=^358.31IA^4^2
+109 ;;^UTILITY(U,$J,358.3,7537,1,3,0)
+110 ;;=3^Gastrointestinal stromal tumor of Stomach
+111 ;;^UTILITY(U,$J,358.3,7537,1,4,0)
+112 ;;=4^C49.A2
+113 ;;^UTILITY(U,$J,358.3,7537,2)
+114 ;;=^8148063
+115 ;;^UTILITY(U,$J,358.3,7538,0)
+116 ;;=K31.84^^42^389^26
+117 ;;^UTILITY(U,$J,358.3,7538,1,0)
+118 ;;=^358.31IA^4^2
+119 ;;^UTILITY(U,$J,358.3,7538,1,3,0)
+120 ;;=3^Gastroparesis
+121 ;;^UTILITY(U,$J,358.3,7538,1,4,0)
+122 ;;=4^K31.84
+123 ;;^UTILITY(U,$J,358.3,7538,2)
+124 ;;=^264447
+125 ;;^UTILITY(U,$J,358.3,7539,0)
+126 ;;=E16.4^^42^389^28
+127 ;;^UTILITY(U,$J,358.3,7539,1,0)
+128 ;;=^358.31IA^4^2
+129 ;;^UTILITY(U,$J,358.3,7539,1,3,0)
+130 ;;=3^Hypergastrinemia
+131 ;;^UTILITY(U,$J,358.3,7539,1,4,0)
+132 ;;=4^E16.4
+133 ;;^UTILITY(U,$J,358.3,7539,2)
+134 ;;=^5002710
+135 ;;^UTILITY(U,$J,358.3,7540,0)
+136 ;;=C16.2^^42^389^29
+137 ;;^UTILITY(U,$J,358.3,7540,1,0)
+138 ;;=^358.31IA^4^2
+139 ;;^UTILITY(U,$J,358.3,7540,1,3,0)
+140 ;;=3^Malignant neoplasm,Body
+141 ;;^UTILITY(U,$J,358.3,7540,1,4,0)
+142 ;;=4^C16.2
+143 ;;^UTILITY(U,$J,358.3,7540,2)
+144 ;;=^267067
+145 ;;^UTILITY(U,$J,358.3,7541,0)
+146 ;;=C16.5^^42^389^32
+147 ;;^UTILITY(U,$J,358.3,7541,1,0)
+148 ;;=^358.31IA^4^2
+149 ;;^UTILITY(U,$J,358.3,7541,1,3,0)
+150 ;;=3^Malignant neoplasm,Lesser curve
+151 ;;^UTILITY(U,$J,358.3,7541,1,4,0)
+152 ;;=4^C16.5
+153 ;;^UTILITY(U,$J,358.3,7541,2)
+154 ;;=^5000920
+155 ;;^UTILITY(U,$J,358.3,7542,0)
+156 ;;=C16.8^^42^389^33
+157 ;;^UTILITY(U,$J,358.3,7542,1,0)
+158 ;;=^358.31IA^4^2
+159 ;;^UTILITY(U,$J,358.3,7542,1,3,0)
+160 ;;=3^Malignant neoplasm,Overlapping sites
+161 ;;^UTILITY(U,$J,358.3,7542,1,4,0)
+162 ;;=4^C16.8
+163 ;;^UTILITY(U,$J,358.3,7542,2)
+164 ;;=^5000922
+165 ;;^UTILITY(U,$J,358.3,7543,0)
+166 ;;=K31.1^^42^389^35
+167 ;;^UTILITY(U,$J,358.3,7543,1,0)
+168 ;;=^358.31IA^4^2
+169 ;;^UTILITY(U,$J,358.3,7543,1,3,0)
+170 ;;=3^Obstruction of Pylorus
+171 ;;^UTILITY(U,$J,358.3,7543,1,4,0)
+172 ;;=4^K31.1
+173 ;;^UTILITY(U,$J,358.3,7543,2)
+174 ;;=^5008560
+175 ;;^UTILITY(U,$J,358.3,7544,0)
+176 ;;=K31.7^^42^389^36
+177 ;;^UTILITY(U,$J,358.3,7544,1,0)
+178 ;;=^358.31IA^4^2
+179 ;;^UTILITY(U,$J,358.3,7544,1,3,0)
+180 ;;=3^Polyp of Stomach
+181 ;;^UTILITY(U,$J,358.3,7544,1,4,0)
+182 ;;=4^K31.7
+183 ;;^UTILITY(U,$J,358.3,7544,2)
+184 ;;=^5008566
+185 ;;^UTILITY(U,$J,358.3,7545,0)
+186 ;;=K25.7^^42^389^45
+187 ;;^UTILITY(U,$J,358.3,7545,1,0)
+188 ;;=^358.31IA^4^2
+189 ;;^UTILITY(U,$J,358.3,7545,1,3,0)
+190 ;;=3^Ulcer,Stomach,Chronic w/o Bleed or Perf
+191 ;;^UTILITY(U,$J,358.3,7545,1,4,0)
+192 ;;=4^K25.7
+193 ;;^UTILITY(U,$J,358.3,7545,2)
+194 ;;=^5008521
+195 ;;^UTILITY(U,$J,358.3,7546,0)
+196 ;;=K56.2^^42^389^46
+197 ;;^UTILITY(U,$J,358.3,7546,1,0)
+198 ;;=^358.31IA^4^2
+199 ;;^UTILITY(U,$J,358.3,7546,1,3,0)
+200 ;;=3^Volvulus
+201 ;;^UTILITY(U,$J,358.3,7546,1,4,0)
+202 ;;=4^K56.2
+203 ;;^UTILITY(U,$J,358.3,7546,2)
+204 ;;=^5008711
+205 ;;^UTILITY(U,$J,358.3,7547,0)
+206 ;;=K31.9^^42^389^7
+207 ;;^UTILITY(U,$J,358.3,7547,1,0)
+208 ;;=^358.31IA^4^2
+209 ;;^UTILITY(U,$J,358.3,7547,1,3,0)
+210 ;;=3^Disease of Stomach,Unsp
+211 ;;^UTILITY(U,$J,358.3,7547,1,4,0)
+212 ;;=4^K31.9
+213 ;;^UTILITY(U,$J,358.3,7547,2)
+214 ;;=^5008570
+215 ;;^UTILITY(U,$J,358.3,7548,0)
+216 ;;=C16.1^^42^389^30
+217 ;;^UTILITY(U,$J,358.3,7548,1,0)
+218 ;;=^358.31IA^4^2
+219 ;;^UTILITY(U,$J,358.3,7548,1,3,0)
+220 ;;=3^Malignant neoplasm,Fundus
+221 ;;^UTILITY(U,$J,358.3,7548,1,4,0)
+222 ;;=4^C16.1
+223 ;;^UTILITY(U,$J,358.3,7548,2)
+224 ;;=^267066
+225 ;;^UTILITY(U,$J,358.3,7549,0)
+226 ;;=C16.6^^42^389^31
+227 ;;^UTILITY(U,$J,358.3,7549,1,0)
+228 ;;=^358.31IA^4^2
+229 ;;^UTILITY(U,$J,358.3,7549,1,3,0)
+230 ;;=3^Malignant neoplasm,Greater curve
+231 ;;^UTILITY(U,$J,358.3,7549,1,4,0)
+232 ;;=4^C16.6
+233 ;;^UTILITY(U,$J,358.3,7549,2)
+234 ;;=^5000921
+235 ;;^UTILITY(U,$J,358.3,7550,0)
+236 ;;=K31.811^^42^389^13
+237 ;;^UTILITY(U,$J,358.3,7550,1,0)
+238 ;;=^358.31IA^4^2
+239 ;;^UTILITY(U,$J,358.3,7550,1,3,0)
+240 ;;=3^Gastric antral vascular ectasia w/ bleeding
+241 ;;^UTILITY(U,$J,358.3,7550,1,4,0)
+242 ;;=4^K31.811
+243 ;;^UTILITY(U,$J,358.3,7550,2)
+244 ;;=^5008567
+245 ;;^UTILITY(U,$J,358.3,7551,0)
+246 ;;=K31.819^^42^389^14
+247 ;;^UTILITY(U,$J,358.3,7551,1,0)
+248 ;;=^358.31IA^4^2
+249 ;;^UTILITY(U,$J,358.3,7551,1,3,0)
+250 ;;=3^Gastric antral vascular ectasia w/o bleeding
+251 ;;^UTILITY(U,$J,358.3,7551,1,4,0)
+252 ;;=4^K31.819
+253 ;;^UTILITY(U,$J,358.3,7551,2)
+254 ;;=^5008568
+255 ;;^UTILITY(U,$J,358.3,7552,0)
+256 ;;=K29.71^^42^389^23
+257 ;;^UTILITY(U,$J,358.3,7552,1,0)
+258 ;;=^358.31IA^4^2
+259 ;;^UTILITY(U,$J,358.3,7552,1,3,0)
+260 ;;=3^Gastritis,Unspec w/ Bleeding
+261 ;;^UTILITY(U,$J,358.3,7552,1,4,0)
+262 ;;=4^K29.71
+263 ;;^UTILITY(U,$J,358.3,7552,2)
+264 ;;=^5008553
+265 ;;^UTILITY(U,$J,358.3,7553,0)
+266 ;;=K29.70^^42^389^24
+267 ;;^UTILITY(U,$J,358.3,7553,1,0)
+268 ;;=^358.31IA^4^2
+269 ;;^UTILITY(U,$J,358.3,7553,1,3,0)
+270 ;;=3^Gastritis,Unspec w/o Bleeding
+271 ;;^UTILITY(U,$J,358.3,7553,1,4,0)
+272 ;;=4^K29.70
+273 ;;^UTILITY(U,$J,358.3,7553,2)
+274 ;;=^5008552
+275 ;;^UTILITY(U,$J,358.3,7554,0)
+276 ;;=D00.2^^42^389^5
+277 ;;^UTILITY(U,$J,358.3,7554,1,0)
+278 ;;=^358.31IA^4^2
+279 ;;^UTILITY(U,$J,358.3,7554,1,3,0)
+280 ;;=3^Carcinoma in Situ of Stomach
+281 ;;^UTILITY(U,$J,358.3,7554,1,4,0)
+282 ;;=4^D00.2
+283 ;;^UTILITY(U,$J,358.3,7554,2)
+284 ;;=^267711
+285 ;;^UTILITY(U,$J,358.3,7555,0)
+286 ;;=K91.1^^42^390^14
+287 ;;^UTILITY(U,$J,358.3,7555,1,0)
+288 ;;=^358.31IA^4^2
+289 ;;^UTILITY(U,$J,358.3,7555,1,3,0)
+290 ;;=3^Postgastric surgery syndromes incl. Dumping syndrome
+291 ;;^UTILITY(U,$J,358.3,7555,1,4,0)
+292 ;;=4^K91.1
+293 ;;^UTILITY(U,$J,358.3,7555,2)
+294 ;;=^5008900
+295 ;;^UTILITY(U,$J,358.3,7556,0)
+296 ;;=Z93.1^^42^390^10
+297 ;;^UTILITY(U,$J,358.3,7556,1,0)
+298 ;;=^358.31IA^4^2
+299 ;;^UTILITY(U,$J,358.3,7556,1,3,0)
+300 ;;=3^Gastrostomy status
+301 ;;^UTILITY(U,$J,358.3,7556,1,4,0)
+302 ;;=4^Z93.1
+303 ;;^UTILITY(U,$J,358.3,7556,2)
+304 ;;=^5063643
+305 ;;^UTILITY(U,$J,358.3,7557,0)
+306 ;;=Z90.3^^42^390^4
+307 ;;^UTILITY(U,$J,358.3,7557,1,0)
+308 ;;=^358.31IA^4^2
+309 ;;^UTILITY(U,$J,358.3,7557,1,3,0)
+310 ;;=3^Acquired absence of Stomach
+311 ;;^UTILITY(U,$J,358.3,7557,1,4,0)
+312 ;;=4^Z90.3
+313 ;;^UTILITY(U,$J,358.3,7557,2)
+314 ;;=^5063586
+315 ;;^UTILITY(U,$J,358.3,7558,0)
+316 ;;=Z90.49^^42^390^1
+317 ;;^UTILITY(U,$J,358.3,7558,1,0)
+318 ;;=^358.31IA^4^2
+319 ;;^UTILITY(U,$J,358.3,7558,1,3,0)
+320 ;;=3^Acquired absence of (specified) Digestive tract
+321 ;;^UTILITY(U,$J,358.3,7558,1,4,0)
+322 ;;=4^Z90.49
+323 ;;^UTILITY(U,$J,358.3,7558,2)
+324 ;;=^5063589
+325 ;;^UTILITY(U,$J,358.3,7559,0)
+326 ;;=Z90.411^^42^390^2
+327 ;;^UTILITY(U,$J,358.3,7559,1,0)
+328 ;;=^358.31IA^4^2
+329 ;;^UTILITY(U,$J,358.3,7559,1,3,0)
+330 ;;=3^Acquired absence of Pancreas,Partial
+331 ;;^UTILITY(U,$J,358.3,7559,1,4,0)
+332 ;;=4^Z90.411
+333 ;;^UTILITY(U,$J,358.3,7559,2)
+334 ;;=^5063588
+335 ;;^UTILITY(U,$J,358.3,7560,0)
+336 ;;=Z90.410^^42^390^3
+337 ;;^UTILITY(U,$J,358.3,7560,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,7560,1,3,0)
+340 ;;=3^Acquired absence of Pancreas,Total
+341 ;;^UTILITY(U,$J,358.3,7560,1,4,0)
+342 ;;=4^Z90.410
+343 ;;^UTILITY(U,$J,358.3,7560,2)
+344 ;;=^5063587
+345 ;;^UTILITY(U,$J,358.3,7561,0)
+346 ;;=Z98.84^^42^390^5
+347 ;;^UTILITY(U,$J,358.3,7561,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,7561,1,3,0)
+350 ;;=3^Bariatric surgery status
+351 ;;^UTILITY(U,$J,358.3,7561,1,4,0)
+352 ;;=4^Z98.84
+353 ;;^UTILITY(U,$J,358.3,7561,2)
+354 ;;=^5063749
+355 ;;^UTILITY(U,$J,358.3,7562,0)
+356 ;;=Z93.3^^42^390^6
+357 ;;^UTILITY(U,$J,358.3,7562,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,7562,1,3,0)
+360 ;;=3^Colostomy status
+361 ;;^UTILITY(U,$J,358.3,7562,1,4,0)
+362 ;;=4^Z93.3
+363 ;;^UTILITY(U,$J,358.3,7562,2)
+364 ;;=^5063645
+365 ;;^UTILITY(U,$J,358.3,7563,0)
+366 ;;=K94.21^^42^390^8
+367 ;;^UTILITY(U,$J,358.3,7563,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,7563,1,3,0)
+370 ;;=3^Gastrostomy hemorrhage
+371 ;;^UTILITY(U,$J,358.3,7563,1,4,0)
+372 ;;=4^K94.21
+373 ;;^UTILITY(U,$J,358.3,7563,2)
+374 ;;=^5008929
+375 ;;^UTILITY(U,$J,358.3,7564,0)
+376 ;;=K94.23^^42^390^9
+377 ;;^UTILITY(U,$J,358.3,7564,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,7564,1,3,0)
+380 ;;=3^Gastrostomy malfunction
+381 ;;^UTILITY(U,$J,358.3,7564,1,4,0)
+382 ;;=4^K94.23
+383 ;;^UTILITY(U,$J,358.3,7564,2)
+384 ;;=^5008931
+385 ;;^UTILITY(U,$J,358.3,7565,0)
+386 ;;=Z93.2^^42^390^11
+387 ;;^UTILITY(U,$J,358.3,7565,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,7565,1,3,0)
+390 ;;=3^Ileostomy status
+391 ;;^UTILITY(U,$J,358.3,7565,1,4,0)
+392 ;;=4^Z93.2
+393 ;;^UTILITY(U,$J,358.3,7565,2)
+394 ;;=^5063644
+395 ;;^UTILITY(U,$J,358.3,7566,0)
+396 ;;=Z93.4^^42^390^13
+397 ;;^UTILITY(U,$J,358.3,7566,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,7566,1,3,0)
+400 ;;=3^Jejunostomy status
+401 ;;^UTILITY(U,$J,358.3,7566,1,4,0)
+402 ;;=4^Z93.4
+403 ;;^UTILITY(U,$J,358.3,7566,2)
+404 ;;=^5063646
+405 ;;^UTILITY(U,$J,358.3,7567,0)
+406 ;;=K94.29^^42^390^7
+407 ;;^UTILITY(U,$J,358.3,7567,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,7567,1,3,0)
+410 ;;=3^Gastrostomy Complications,Other
+411 ;;^UTILITY(U,$J,358.3,7567,1,4,0)
+412 ;;=4^K94.29
+413 ;;^UTILITY(U,$J,358.3,7567,2)
+414 ;;=^5008932
+415 ;;^UTILITY(U,$J,358.3,7568,0)
+416 ;;=K91.858^^42^390^12
+417 ;;^UTILITY(U,$J,358.3,7568,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,7568,1,3,0)
+420 ;;=3^Intestinal Pouch Complications,Other
+421 ;;^UTILITY(U,$J,358.3,7568,1,4,0)
+422 ;;=4^K91.858
+423 ;;^UTILITY(U,$J,358.3,7568,2)
+424 ;;=^338262
+425 ;;^UTILITY(U,$J,358.3,7569,0)
+426 ;;=K91.2^^42^390^15
+427 ;;^UTILITY(U,$J,358.3,7569,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,7569,1,3,0)
+430 ;;=3^Postsurgical malabsorption incl. Short bowel syndrome
+431 ;;^UTILITY(U,$J,358.3,7569,1,4,0)
+432 ;;=4^K91.2
+433 ;;^UTILITY(U,$J,358.3,7569,2)
+434 ;;=^5008901
+435 ;;^UTILITY(U,$J,358.3,7570,0)
+436 ;;=K91.850^^42^390^16
+437 ;;^UTILITY(U,$J,358.3,7570,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,7570,1,3,0)
+440 ;;=3^Pouchitis
+441 ;;^UTILITY(U,$J,358.3,7570,1,4,0)
+442 ;;=4^K91.850
+443 ;;^UTILITY(U,$J,358.3,7570,2)
+444 ;;=^338261
+445 ;;^UTILITY(U,$J,358.3,7571,0)
+446 ;;=K91.89^^42^390^17
+447 ;;^UTILITY(U,$J,358.3,7571,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,7571,1,3,0)
+450 ;;=3^Stricture,Postprocedural incl. radiation
+451 ;;^UTILITY(U,$J,358.3,7571,1,4,0)
+452 ;;=4^K91.89
+453 ;;^UTILITY(U,$J,358.3,7571,2)
+454 ;;=^5008912
+455 ;;^UTILITY(U,$J,358.3,7572,0)
+456 ;;=K28.0^^42^390^19
+457 ;;^UTILITY(U,$J,358.3,7572,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,7572,1,3,0)
+460 ;;=3^Ulcer,Gastrojejunal,Acute w/ Bleeding
+461 ;;^UTILITY(U,$J,358.3,7572,1,4,0)
+462 ;;=4^K28.0
+463 ;;^UTILITY(U,$J,358.3,7572,2)
+464 ;;=^270141
+465 ;;^UTILITY(U,$J,358.3,7573,0)
+466 ;;=K28.1^^42^390^20
+467 ;;^UTILITY(U,$J,358.3,7573,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,7573,1,3,0)
+470 ;;=3^Ulcer,Gastrojejunal,Acute w/ Perforation
+471 ;;^UTILITY(U,$J,358.3,7573,1,4,0)
+472 ;;=4^K28.1
+473 ;;^UTILITY(U,$J,358.3,7573,2)
+474 ;;=^270144
+475 ;;^UTILITY(U,$J,358.3,7574,0)
+476 ;;=K28.2^^42^390^18
+477 ;;^UTILITY(U,$J,358.3,7574,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,7574,1,3,0)
+480 ;;=3^Ulcer,Gastrojejunal,Acute w/ Bleed & Perf
+481 ;;^UTILITY(U,$J,358.3,7574,1,4,0)
+482 ;;=4^K28.2
+483 ;;^UTILITY(U,$J,358.3,7574,2)
+484 ;;=^5008537
+485 ;;^UTILITY(U,$J,358.3,7575,0)
+486 ;;=K28.3^^42^390^21
+487 ;;^UTILITY(U,$J,358.3,7575,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,7575,1,3,0)
+490 ;;=3^Ulcer,Gastrojejunal,Acute w/o Bleed or Perf
+491 ;;^UTILITY(U,$J,358.3,7575,1,4,0)
+492 ;;=4^K28.3
+493 ;;^UTILITY(U,$J,358.3,7575,2)
+494 ;;=^5008538
+495 ;;^UTILITY(U,$J,358.3,7576,0)
+496 ;;=K28.4^^42^390^23
+497 ;;^UTILITY(U,$J,358.3,7576,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,7576,1,3,0)
+500 ;;=3^Ulcer,Gastrojejunal,Chronic w/ Bleeding
+501 ;;^UTILITY(U,$J,358.3,7576,1,4,0)
+502 ;;=4^K28.4
+503 ;;^UTILITY(U,$J,358.3,7576,2)
+504 ;;=^270153
+505 ;;^UTILITY(U,$J,358.3,7577,0)
+506 ;;=K28.5^^42^390^24
+507 ;;^UTILITY(U,$J,358.3,7577,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,7577,1,3,0)
+510 ;;=3^Ulcer,Gastrojejunal,Chronic w/ Perforation
+511 ;;^UTILITY(U,$J,358.3,7577,1,4,0)
+512 ;;=4^K28.5
+513 ;;^UTILITY(U,$J,358.3,7577,2)
+514 ;;=^270156
+515 ;;^UTILITY(U,$J,358.3,7578,0)
+516 ;;=K28.6^^42^390^22
+517 ;;^UTILITY(U,$J,358.3,7578,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,7578,1,3,0)
+520 ;;=3^Ulcer,Gastrojejunal,Chronic w/ Bleed & Perf
+521 ;;^UTILITY(U,$J,358.3,7578,1,4,0)
+522 ;;=4^K28.6
+523 ;;^UTILITY(U,$J,358.3,7578,2)
+524 ;;=^5008539
+525 ;;^UTILITY(U,$J,358.3,7579,0)
+526 ;;=K28.7^^42^390^25
+527 ;;^UTILITY(U,$J,358.3,7579,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,7579,1,3,0)
+530 ;;=3^Ulcer,Gastrojejunal,Chronic w/o Bleed or Perf
+531 ;;^UTILITY(U,$J,358.3,7579,1,4,0)
+532 ;;=4^K28.7
+533 ;;^UTILITY(U,$J,358.3,7579,2)
+534 ;;=^5008540
+535 ;;^UTILITY(U,$J,358.3,7580,0)
+536 ;;=K92.0^^42^391^41
+537 ;;^UTILITY(U,$J,358.3,7580,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,7580,1,3,0)
+540 ;;=3^Hematemesis
+541 ;;^UTILITY(U,$J,358.3,7580,1,4,0)
+542 ;;=4^K92.0
+543 ;;^UTILITY(U,$J,358.3,7580,2)
+544 ;;=^5008913
+545 ;;^UTILITY(U,$J,358.3,7581,0)
+546 ;;=K92.1^^42^391^53
+547 ;;^UTILITY(U,$J,358.3,7581,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,7581,1,3,0)
+550 ;;=3^Melena
+551 ;;^UTILITY(U,$J,358.3,7581,1,4,0)
+552 ;;=4^K92.1
+553 ;;^UTILITY(U,$J,358.3,7581,2)
+554 ;;=^5008914
+555 ;;^UTILITY(U,$J,358.3,7582,0)
+556 ;;=K92.2^^42^391^37
+557 ;;^UTILITY(U,$J,358.3,7582,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,7582,1,3,0)
+560 ;;=3^Gastrointestinal hemorrhage,Unsp
+561 ;;^UTILITY(U,$J,358.3,7582,1,4,0)
+562 ;;=4^K92.2
+563 ;;^UTILITY(U,$J,358.3,7582,2)
+564 ;;=^5008915
+565 ;;^UTILITY(U,$J,358.3,7583,0)
+566 ;;=R11.2^^42^391^55
+567 ;;^UTILITY(U,$J,358.3,7583,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,7583,1,3,0)
+570 ;;=3^Nausea w/ Vomiting
+571 ;;^UTILITY(U,$J,358.3,7583,1,4,0)
+572 ;;=4^R11.2
+573 ;;^UTILITY(U,$J,358.3,7583,2)
+574 ;;=^5019237
+575 ;;^UTILITY(U,$J,358.3,7584,0)
+576 ;;=R11.0^^42^391^54
+577 ;;^UTILITY(U,$J,358.3,7584,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,7584,1,3,0)
+580 ;;=3^Nausea
+581 ;;^UTILITY(U,$J,358.3,7584,1,4,0)
+582 ;;=4^R11.0
+583 ;;^UTILITY(U,$J,358.3,7584,2)
+584 ;;=^5019231
+585 ;;^UTILITY(U,$J,358.3,7585,0)
+586 ;;=R11.11^^42^391^56
+587 ;;^UTILITY(U,$J,358.3,7585,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,7585,1,3,0)
+590 ;;=3^Vomitin w/o Nausea
+591 ;;^UTILITY(U,$J,358.3,7585,1,4,0)
+592 ;;=4^R11.11
+593 ;;^UTILITY(U,$J,358.3,7585,2)
+594 ;;=^5019233
+595 ;;^UTILITY(U,$J,358.3,7586,0)
+596 ;;=R11.10^^42^391^62
+597 ;;^UTILITY(U,$J,358.3,7586,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,7586,1,3,0)
+600 ;;=3^Vomiting,Unsp
+601 ;;^UTILITY(U,$J,358.3,7586,1,4,0)
+602 ;;=4^R11.10
+603 ;;^UTILITY(U,$J,358.3,7586,2)
+604 ;;=^5019232
+605 ;;^UTILITY(U,$J,358.3,7587,0)
+606 ;;=R13.12^^42^391^25
+607 ;;^UTILITY(U,$J,358.3,7587,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,7587,1,3,0)
+610 ;;=3^Dysphagia,Oropharyngeal
+611 ;;^UTILITY(U,$J,358.3,7587,1,4,0)
+612 ;;=4^R13.12
+613 ;;^UTILITY(U,$J,358.3,7587,2)
+614 ;;=^335277
+615 ;;^UTILITY(U,$J,358.3,7588,0)
+616 ;;=R13.14^^42^391^26
+617 ;;^UTILITY(U,$J,358.3,7588,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,7588,1,3,0)
+620 ;;=3^Dysphagia,Pharyngoesophageal
+621 ;;^UTILITY(U,$J,358.3,7588,1,4,0)
+622 ;;=4^R13.14
+623 ;;^UTILITY(U,$J,358.3,7588,2)
+624 ;;=^335279
+625 ;;^UTILITY(U,$J,358.3,7589,0)
+626 ;;=R13.19^^42^391^23
+627 ;;^UTILITY(U,$J,358.3,7589,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,7589,1,3,0)
+630 ;;=3^Dysphagia,Cervical or Neurogenic
+631 ;;^UTILITY(U,$J,358.3,7589,1,4,0)
+632 ;;=4^R13.19
+633 ;;^UTILITY(U,$J,358.3,7589,2)
+634 ;;=^335280
+635 ;;^UTILITY(U,$J,358.3,7590,0)
+636 ;;=R14.3^^42^391^34
+637 ;;^UTILITY(U,$J,358.3,7590,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,7590,1,3,0)
+640 ;;=3^Flatulence
+641 ;;^UTILITY(U,$J,358.3,7590,1,4,0)
+642 ;;=4^R14.3
+643 ;;^UTILITY(U,$J,358.3,7590,2)
+644 ;;=^5019243
+645 ;;^UTILITY(U,$J,358.3,7591,0)
+646 ;;=R14.2^^42^391^28
+647 ;;^UTILITY(U,$J,358.3,7591,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,7591,1,3,0)
+650 ;;=3^Eructation
+651 ;;^UTILITY(U,$J,358.3,7591,1,4,0)
+652 ;;=4^R14.2
+653 ;;^UTILITY(U,$J,358.3,7591,2)
+654 ;;=^5019242
+655 ;;^UTILITY(U,$J,358.3,7592,0)
+656 ;;=R14.1^^42^391^36
+657 ;;^UTILITY(U,$J,358.3,7592,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,7592,1,3,0)
+660 ;;=3^Gas pain
+661 ;;^UTILITY(U,$J,358.3,7592,1,4,0)
+662 ;;=4^R14.1
+663 ;;^UTILITY(U,$J,358.3,7592,2)
+664 ;;=^5019241
+665 ;;^UTILITY(U,$J,358.3,7593,0)
+666 ;;=R14.0^^42^391^12
+667 ;;^UTILITY(U,$J,358.3,7593,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,7593,1,3,0)
+670 ;;=3^Bloating
+671 ;;^UTILITY(U,$J,358.3,7593,1,4,0)
+672 ;;=4^R14.0
+673 ;;^UTILITY(U,$J,358.3,7593,2)
+674 ;;=^5019240
+675 ;;^UTILITY(U,$J,358.3,7594,0)
+676 ;;=R19.7^^42^391^22
+677 ;;^UTILITY(U,$J,358.3,7594,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,7594,1,3,0)
+680 ;;=3^Diarrhea,Unsp
+681 ;;^UTILITY(U,$J,358.3,7594,1,4,0)
+682 ;;=4^R19.7
+683 ;;^UTILITY(U,$J,358.3,7594,2)
+684 ;;=^5019276
+685 ;;^UTILITY(U,$J,358.3,7595,0)
+686 ;;=R19.4^^42^391^13
+687 ;;^UTILITY(U,$J,358.3,7595,1,0)
+688 ;;=^358.31IA^4^2
+689 ;;^UTILITY(U,$J,358.3,7595,1,3,0)
+690 ;;=3^Change in bowel habit
+691 ;;^UTILITY(U,$J,358.3,7595,1,4,0)
+692 ;;=4^R19.4
+693 ;;^UTILITY(U,$J,358.3,7595,2)
+694 ;;=^5019273
+695 ;;^UTILITY(U,$J,358.3,7596,0)
+696 ;;=R10.11^^42^391^8
+697 ;;^UTILITY(U,$J,358.3,7596,1,0)
+698 ;;=^358.31IA^4^2
+699 ;;^UTILITY(U,$J,358.3,7596,1,3,0)
+700 ;;=3^Abdominal pain,Right upper quadrant
+701 ;;^UTILITY(U,$J,358.3,7596,1,4,0)
+702 ;;=4^R10.11
+703 ;;^UTILITY(U,$J,358.3,7596,2)
+704 ;;=^5019206
+705 ;;^UTILITY(U,$J,358.3,7597,0)
+706 ;;=R10.12^^42^391^6
+707 ;;^UTILITY(U,$J,358.3,7597,1,0)
+708 ;;=^358.31IA^4^2
+709 ;;^UTILITY(U,$J,358.3,7597,1,3,0)
+710 ;;=3^Abdominal pain,Left upper quadrant
