IBDEI031 ; ; 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,7171,2)
;;=^5138332
;;^UTILITY(U,$J,358.3,7172,0)
;;=E11.3291^^40^379^5
;;^UTILITY(U,$J,358.3,7172,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7172,1,3,0)
;;=3^DM Type 2 w/ Mild NPDR w/o Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7172,1,4,0)
;;=4^E11.3291
;;^UTILITY(U,$J,358.3,7172,2)
;;=^5138335
;;^UTILITY(U,$J,358.3,7173,0)
;;=E11.3292^^40^379^13
;;^UTILITY(U,$J,358.3,7173,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7173,1,3,0)
;;=3^DM Type 2 w/ Mild NPDR w/o Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7173,1,4,0)
;;=4^E11.3292
;;^UTILITY(U,$J,358.3,7173,2)
;;=^5138336
;;^UTILITY(U,$J,358.3,7174,0)
;;=E11.3311^^40^379^6
;;^UTILITY(U,$J,358.3,7174,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7174,1,3,0)
;;=3^DM Type 2 w/ Mod NPDR w/ Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7174,1,4,0)
;;=4^E11.3311
;;^UTILITY(U,$J,358.3,7174,2)
;;=^5138339
;;^UTILITY(U,$J,358.3,7175,0)
;;=E11.3312^^40^379^14
;;^UTILITY(U,$J,358.3,7175,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7175,1,3,0)
;;=3^DM Type 2 w/ Mod NPDR w/ Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7175,1,4,0)
;;=4^E11.3312
;;^UTILITY(U,$J,358.3,7175,2)
;;=^5138340
;;^UTILITY(U,$J,358.3,7176,0)
;;=E11.3391^^40^379^7
;;^UTILITY(U,$J,358.3,7176,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7176,1,3,0)
;;=3^DM Type 2 w/ Mod NPDR w/o Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7176,1,4,0)
;;=4^E11.3391
;;^UTILITY(U,$J,358.3,7176,2)
;;=^5138343
;;^UTILITY(U,$J,358.3,7177,0)
;;=E11.3392^^40^379^15
;;^UTILITY(U,$J,358.3,7177,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7177,1,3,0)
;;=3^DM Type 2 w/ Mod NPDR w/o Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7177,1,4,0)
;;=4^E11.3392
;;^UTILITY(U,$J,358.3,7177,2)
;;=^5138344
;;^UTILITY(U,$J,358.3,7178,0)
;;=E11.3411^^40^379^8
;;^UTILITY(U,$J,358.3,7178,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7178,1,3,0)
;;=3^DM Type 2 w/ Severe NPDR w/ Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7178,1,4,0)
;;=4^E11.3411
;;^UTILITY(U,$J,358.3,7178,2)
;;=^5138347
;;^UTILITY(U,$J,358.3,7179,0)
;;=E11.3412^^40^379^16
;;^UTILITY(U,$J,358.3,7179,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7179,1,3,0)
;;=3^DM Type 2 w/ Severe NPDR w/ Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7179,1,4,0)
;;=4^E11.3412
;;^UTILITY(U,$J,358.3,7179,2)
;;=^5138348
;;^UTILITY(U,$J,358.3,7180,0)
;;=E11.3491^^40^379^9
;;^UTILITY(U,$J,358.3,7180,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7180,1,3,0)
;;=3^DM Type 2 w/ Severe NPDR w/o Macula Edema,Right Eye
;;^UTILITY(U,$J,358.3,7180,1,4,0)
;;=4^E11.3491
;;^UTILITY(U,$J,358.3,7180,2)
;;=^5138351
;;^UTILITY(U,$J,358.3,7181,0)
;;=E11.3492^^40^379^17
;;^UTILITY(U,$J,358.3,7181,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7181,1,3,0)
;;=3^DM Type 2 w/ Severe NPDR w/o Macula Edema,Left Eye
;;^UTILITY(U,$J,358.3,7181,1,4,0)
;;=4^E11.3492
;;^UTILITY(U,$J,358.3,7181,2)
;;=^5138352
;;^UTILITY(U,$J,358.3,7182,0)
;;=E11.3511^^40^379^10
;;^UTILITY(U,$J,358.3,7182,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7182,1,3,0)
;;=3^DM Type 2 w/ PDR w/ Macular Edema,Right Eye
;;^UTILITY(U,$J,358.3,7182,1,4,0)
;;=4^E11.3511
;;^UTILITY(U,$J,358.3,7182,2)
;;=^5138355
;;^UTILITY(U,$J,358.3,7183,0)
;;=E11.3512^^40^379^18
;;^UTILITY(U,$J,358.3,7183,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7183,1,3,0)
;;=3^DM Type 2 w/ PDR w/ Macular Edema,Left Eye
;;^UTILITY(U,$J,358.3,7183,1,4,0)
;;=4^E11.3512
;;^UTILITY(U,$J,358.3,7183,2)
;;=^5138356
;;^UTILITY(U,$J,358.3,7184,0)
;;=E11.3591^^40^379^11
;;^UTILITY(U,$J,358.3,7184,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7184,1,3,0)
;;=3^DM Type 2 w/ PDR w/o Macular Edema,Right Eye
;;^UTILITY(U,$J,358.3,7184,1,4,0)
;;=4^E11.3591
;;^UTILITY(U,$J,358.3,7184,2)
;;=^5138375
;;^UTILITY(U,$J,358.3,7185,0)
;;=E11.3592^^40^379^19
;;^UTILITY(U,$J,358.3,7185,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7185,1,3,0)
;;=3^DM Type 2 w/ PDR w/o Macular Edema,Left Eye
;;^UTILITY(U,$J,358.3,7185,1,4,0)
;;=4^E11.3592
;;^UTILITY(U,$J,358.3,7185,2)
;;=^5138376
;;^UTILITY(U,$J,358.3,7186,0)
;;=H35.81^^40^379^3
;;^UTILITY(U,$J,358.3,7186,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7186,1,3,0)
;;=3^Retinal Edema/CME Other Etiology
;;^UTILITY(U,$J,358.3,7186,1,4,0)
;;=4^H35.81
;;^UTILITY(U,$J,358.3,7186,2)
;;=^5005715
;;^UTILITY(U,$J,358.3,7187,0)
;;=U07.1^^40^380^1
;;^UTILITY(U,$J,358.3,7187,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7187,1,3,0)
;;=3^COVID-19
;;^UTILITY(U,$J,358.3,7187,1,4,0)
;;=4^U07.1
;;^UTILITY(U,$J,358.3,7187,2)
;;=^5159070
;;^UTILITY(U,$J,358.3,7188,0)
;;=Z20.828^^40^380^2
;;^UTILITY(U,$J,358.3,7188,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7188,1,3,0)
;;=3^Contact/Exposure to Oth Viral Communicable Diseases
;;^UTILITY(U,$J,358.3,7188,1,4,0)
;;=4^Z20.828
;;^UTILITY(U,$J,358.3,7188,2)
;;=^5062774
;;^UTILITY(U,$J,358.3,7189,0)
;;=R05.9^^40^380^3
;;^UTILITY(U,$J,358.3,7189,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7189,1,3,0)
;;=3^Cough
;;^UTILITY(U,$J,358.3,7189,1,4,0)
;;=4^R05.9
;;^UTILITY(U,$J,358.3,7189,2)
;;=^5161232
;;^UTILITY(U,$J,358.3,7190,0)
;;=R50.9^^40^380^4
;;^UTILITY(U,$J,358.3,7190,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7190,1,3,0)
;;=3^Fever,Unspec
;;^UTILITY(U,$J,358.3,7190,1,4,0)
;;=4^R50.9
;;^UTILITY(U,$J,358.3,7190,2)
;;=^5019512
;;^UTILITY(U,$J,358.3,7191,0)
;;=Z03.818^^40^380^5
;;^UTILITY(U,$J,358.3,7191,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7191,1,3,0)
;;=3^Observation of Suspected Expsr to Bio Agents Ruled Out
;;^UTILITY(U,$J,358.3,7191,1,4,0)
;;=4^Z03.818
;;^UTILITY(U,$J,358.3,7191,2)
;;=^5062655
;;^UTILITY(U,$J,358.3,7192,0)
;;=Z11.59^^40^380^6
;;^UTILITY(U,$J,358.3,7192,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7192,1,3,0)
;;=3^Screening for Oth Viral Diseases
;;^UTILITY(U,$J,358.3,7192,1,4,0)
;;=4^Z11.59
;;^UTILITY(U,$J,358.3,7192,2)
;;=^5062675
;;^UTILITY(U,$J,358.3,7193,0)
;;=R06.02^^40^380^7
;;^UTILITY(U,$J,358.3,7193,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7193,1,3,0)
;;=3^Shortness of Breath
;;^UTILITY(U,$J,358.3,7193,1,4,0)
;;=4^R06.02
;;^UTILITY(U,$J,358.3,7193,2)
;;=^5019181
;;^UTILITY(U,$J,358.3,7194,0)
;;=99202^^41^381^1
;;^UTILITY(U,$J,358.3,7194,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7194,1,1,0)
;;=1^SF MDM or 15-29 min
;;^UTILITY(U,$J,358.3,7194,1,2,0)
;;=2^99202
;;^UTILITY(U,$J,358.3,7195,0)
;;=99203^^41^381^2
;;^UTILITY(U,$J,358.3,7195,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7195,1,1,0)
;;=1^Low Complex MDM or 30-44 min
;;^UTILITY(U,$J,358.3,7195,1,2,0)
;;=2^99203
;;^UTILITY(U,$J,358.3,7196,0)
;;=99204^^41^381^3
;;^UTILITY(U,$J,358.3,7196,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7196,1,1,0)
;;=1^Mod Complex MDM or 45-59 min
;;^UTILITY(U,$J,358.3,7196,1,2,0)
;;=2^99204
;;^UTILITY(U,$J,358.3,7197,0)
;;=99205^^41^381^4
;;^UTILITY(U,$J,358.3,7197,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7197,1,1,0)
;;=1^High Complex MDM or 60-74 min
;;^UTILITY(U,$J,358.3,7197,1,2,0)
;;=2^99205
;;^UTILITY(U,$J,358.3,7198,0)
;;=99211^^41^382^1
;;^UTILITY(U,$J,358.3,7198,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7198,1,1,0)
;;=1^Brief (no MD seen)
;;^UTILITY(U,$J,358.3,7198,1,2,0)
;;=2^99211
;;^UTILITY(U,$J,358.3,7199,0)
;;=99212^^41^382^2
;;^UTILITY(U,$J,358.3,7199,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7199,1,1,0)
;;=1^SF MDM or 10-19 min
;;^UTILITY(U,$J,358.3,7199,1,2,0)
;;=2^99212
;;^UTILITY(U,$J,358.3,7200,0)
;;=99213^^41^382^3
;;^UTILITY(U,$J,358.3,7200,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7200,1,1,0)
;;=1^Low Complex MDM or 20-29 min
;;^UTILITY(U,$J,358.3,7200,1,2,0)
;;=2^99213
;;^UTILITY(U,$J,358.3,7201,0)
;;=99214^^41^382^4
;;^UTILITY(U,$J,358.3,7201,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7201,1,1,0)
;;=1^Mod Complex MDM or 30-39 min
;;^UTILITY(U,$J,358.3,7201,1,2,0)
;;=2^99214
;;^UTILITY(U,$J,358.3,7202,0)
;;=99215^^41^382^5
;;^UTILITY(U,$J,358.3,7202,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7202,1,1,0)
;;=1^High Complex MDM or 40-54 min
;;^UTILITY(U,$J,358.3,7202,1,2,0)
;;=2^99215
;;^UTILITY(U,$J,358.3,7203,0)
;;=99241^^41^383^1
;;^UTILITY(U,$J,358.3,7203,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7203,1,1,0)
;;=1^Problem Focused
;;^UTILITY(U,$J,358.3,7203,1,2,0)
;;=2^99241
;;^UTILITY(U,$J,358.3,7204,0)
;;=99242^^41^383^2
;;^UTILITY(U,$J,358.3,7204,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7204,1,1,0)
;;=1^Expanded Problem Focus
;;^UTILITY(U,$J,358.3,7204,1,2,0)
;;=2^99242
;;^UTILITY(U,$J,358.3,7205,0)
;;=99243^^41^383^3
;;^UTILITY(U,$J,358.3,7205,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7205,1,1,0)
;;=1^Detailed
;;^UTILITY(U,$J,358.3,7205,1,2,0)
;;=2^99243
;;^UTILITY(U,$J,358.3,7206,0)
;;=99244^^41^383^4
;;^UTILITY(U,$J,358.3,7206,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7206,1,1,0)
;;=1^Comprehensive, Moderate
;;^UTILITY(U,$J,358.3,7206,1,2,0)
;;=2^99244
;;^UTILITY(U,$J,358.3,7207,0)
;;=99245^^41^383^5
;;^UTILITY(U,$J,358.3,7207,1,0)
;;=^358.31IA^2^2
;;^UTILITY(U,$J,358.3,7207,1,1,0)
;;=1^Comprehensive, High
;;^UTILITY(U,$J,358.3,7207,1,2,0)
;;=2^99245
;;^UTILITY(U,$J,358.3,7208,0)
;;=B37.81^^42^384^6
;;^UTILITY(U,$J,358.3,7208,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7208,1,3,0)
;;=3^Candidal esophagitis
;;^UTILITY(U,$J,358.3,7208,1,4,0)
;;=4^B37.81
;;^UTILITY(U,$J,358.3,7208,2)
;;=^5000620
;;^UTILITY(U,$J,358.3,7209,0)
;;=I85.01^^42^384^13
;;^UTILITY(U,$J,358.3,7209,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7209,1,3,0)
;;=3^Esophageal varices w/ Bleeding
;;^UTILITY(U,$J,358.3,7209,1,4,0)
;;=4^I85.01
;;^UTILITY(U,$J,358.3,7209,2)
;;=^269835
;;^UTILITY(U,$J,358.3,7210,0)
;;=I85.00^^42^384^14
;;^UTILITY(U,$J,358.3,7210,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7210,1,3,0)
;;=3^Esophageal varices w/o Bleeding
;;^UTILITY(U,$J,358.3,7210,1,4,0)
;;=4^I85.00
;;^UTILITY(U,$J,358.3,7210,2)
;;=^5008023
;;^UTILITY(U,$J,358.3,7211,0)
;;=K22.0^^42^384^2
;;^UTILITY(U,$J,358.3,7211,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7211,1,3,0)
;;=3^Achalasia
;;^UTILITY(U,$J,358.3,7211,1,4,0)
;;=4^K22.0
;;^UTILITY(U,$J,358.3,7211,2)
;;=^5008506
;;^UTILITY(U,$J,358.3,7212,0)
;;=K20.0^^42^384^12
;;^UTILITY(U,$J,358.3,7212,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7212,1,3,0)
;;=3^Eosinophilic esophagitis
;;^UTILITY(U,$J,358.3,7212,1,4,0)
;;=4^K20.0
;;^UTILITY(U,$J,358.3,7212,2)
;;=^336605
;;^UTILITY(U,$J,358.3,7213,0)
;;=K22.10^^42^384^43
;;^UTILITY(U,$J,358.3,7213,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7213,1,3,0)
;;=3^Ulcer of Esophagus w/o Bleeding
;;^UTILITY(U,$J,358.3,7213,1,4,0)
;;=4^K22.10
;;^UTILITY(U,$J,358.3,7213,2)
;;=^329929
;;^UTILITY(U,$J,358.3,7214,0)
;;=K22.5^^42^384^10
;;^UTILITY(U,$J,358.3,7214,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7214,1,3,0)
;;=3^Diverticulum of esophagus, acquired
;;^UTILITY(U,$J,358.3,7214,1,4,0)
;;=4^K22.5
;;^UTILITY(U,$J,358.3,7214,2)
;;=^5008509
;;^UTILITY(U,$J,358.3,7215,0)
;;=K22.6^^42^384^27
;;^UTILITY(U,$J,358.3,7215,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7215,1,3,0)
;;=3^Gastro-esophageal laceration-hemorrhage syndrome
;;^UTILITY(U,$J,358.3,7215,1,4,0)
;;=4^K22.6
;;^UTILITY(U,$J,358.3,7215,2)
;;=^5008510
;;^UTILITY(U,$J,358.3,7216,0)
;;=K21.9^^42^384^26
;;^UTILITY(U,$J,358.3,7216,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7216,1,3,0)
;;=3^GERD w/o Esophagitis
;;^UTILITY(U,$J,358.3,7216,1,4,0)
;;=4^K21.9
;;^UTILITY(U,$J,358.3,7216,2)
;;=^5008505
;;^UTILITY(U,$J,358.3,7217,0)
;;=K22.70^^42^384^5
;;^UTILITY(U,$J,358.3,7217,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7217,1,3,0)
;;=3^Barrett's esophagus w/o dysplasia
;;^UTILITY(U,$J,358.3,7217,1,4,0)
;;=4^K22.70
;;^UTILITY(U,$J,358.3,7217,2)
;;=^5008511
;;^UTILITY(U,$J,358.3,7218,0)
;;=K22.710^^42^384^4
;;^UTILITY(U,$J,358.3,7218,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7218,1,3,0)
;;=3^Barrett's esophagus w/ low grade dysplasia
;;^UTILITY(U,$J,358.3,7218,1,4,0)
;;=4^K22.710
;;^UTILITY(U,$J,358.3,7218,2)
;;=^5008512
;;^UTILITY(U,$J,358.3,7219,0)
;;=K22.711^^42^384^3
;;^UTILITY(U,$J,358.3,7219,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7219,1,3,0)
;;=3^Barrett's esophagus w/ high grade dysplasia
;;^UTILITY(U,$J,358.3,7219,1,4,0)
;;=4^K22.711
;;^UTILITY(U,$J,358.3,7219,2)
;;=^5008513
;;^UTILITY(U,$J,358.3,7220,0)
;;=K44.9^^42^384^8
;;^UTILITY(U,$J,358.3,7220,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7220,1,3,0)
;;=3^Diaphragmatic (Hiatal) hernia
;;^UTILITY(U,$J,358.3,7220,1,4,0)
;;=4^K44.9
;;^UTILITY(U,$J,358.3,7220,2)
;;=^5008617
;;^UTILITY(U,$J,358.3,7221,0)
;;=Q39.4^^42^384^15
;;^UTILITY(U,$J,358.3,7221,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7221,1,3,0)
;;=3^Esophageal web
;;^UTILITY(U,$J,358.3,7221,1,4,0)
;;=4^Q39.4
;;^UTILITY(U,$J,358.3,7221,2)
;;=^5018659
;;^UTILITY(U,$J,358.3,7222,0)
;;=T18.128A^^42^384^18
;;^UTILITY(U,$J,358.3,7222,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7222,1,3,0)
;;=3^Food in Esophagus,Initial
;;^UTILITY(U,$J,358.3,7222,1,4,0)
;;=4^T18.128A
;;^UTILITY(U,$J,358.3,7222,2)
;;=^5046594
;;^UTILITY(U,$J,358.3,7223,0)
;;=T18.198A^^42^384^21
;;^UTILITY(U,$J,358.3,7223,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7223,1,3,0)
;;=3^Foreign body in Esophagus,Initial
;;^UTILITY(U,$J,358.3,7223,1,4,0)
;;=4^T18.198A
;;^UTILITY(U,$J,358.3,7223,2)
;;=^5046600
;;^UTILITY(U,$J,358.3,7224,0)
;;=R93.3^^42^384^1
;;^UTILITY(U,$J,358.3,7224,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7224,1,3,0)
;;=3^Abnormal imaging Digestive tract
;;^UTILITY(U,$J,358.3,7224,1,4,0)
;;=4^R93.3
;;^UTILITY(U,$J,358.3,7224,2)
;;=^5019716
;;^UTILITY(U,$J,358.3,7225,0)
;;=K22.4^^42^384^11
;;^UTILITY(U,$J,358.3,7225,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7225,1,3,0)
;;=3^Dyskinesia of Esophagus
;;^UTILITY(U,$J,358.3,7225,1,4,0)
;;=4^K22.4
;;^UTILITY(U,$J,358.3,7225,2)
;;=^37546
;;^UTILITY(U,$J,358.3,7226,0)
;;=T18.128D^^42^384^20
;;^UTILITY(U,$J,358.3,7226,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7226,1,3,0)
;;=3^Food in Esophagus,Subsequent
;;^UTILITY(U,$J,358.3,7226,1,4,0)
;;=4^T18.128D
;;^UTILITY(U,$J,358.3,7226,2)
;;=^5046595
;;^UTILITY(U,$J,358.3,7227,0)
;;=T18.128S^^42^384^19
;;^UTILITY(U,$J,358.3,7227,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7227,1,3,0)
;;=3^Food in Esophagus,Sequela
;;^UTILITY(U,$J,358.3,7227,1,4,0)
;;=4^T18.128S
;;^UTILITY(U,$J,358.3,7227,2)
;;=^5046596
;;^UTILITY(U,$J,358.3,7228,0)
;;=T18.198D^^42^384^23
;;^UTILITY(U,$J,358.3,7228,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7228,1,3,0)
;;=3^Foreign body in Esophagus,Subsequent
;;^UTILITY(U,$J,358.3,7228,1,4,0)
;;=4^T18.198D
;;^UTILITY(U,$J,358.3,7228,2)
;;=^5046601
;;^UTILITY(U,$J,358.3,7229,0)
;;=T18.198S^^42^384^22
;;^UTILITY(U,$J,358.3,7229,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7229,1,3,0)
;;=3^Foreign body in Esophagus,Sequela
;;^UTILITY(U,$J,358.3,7229,1,4,0)
;;=4^T18.198S
;;^UTILITY(U,$J,358.3,7229,2)
;;=^5046602
;;^UTILITY(U,$J,358.3,7230,0)
;;=C15.3^^42^384^33
;;^UTILITY(U,$J,358.3,7230,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7230,1,3,0)
;;=3^Malignant Neop,Esophagus,Upper Third
;;^UTILITY(U,$J,358.3,7230,1,4,0)
;;=4^C15.3
;;^UTILITY(U,$J,358.3,7230,2)
;;=^267059
;;^UTILITY(U,$J,358.3,7231,0)
;;=C15.4^^42^384^30
;;^UTILITY(U,$J,358.3,7231,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7231,1,3,0)
;;=3^Malignant Neop,Esophagus,Middle Third
;;^UTILITY(U,$J,358.3,7231,1,4,0)
;;=4^C15.4
;;^UTILITY(U,$J,358.3,7231,2)
;;=^267060
;;^UTILITY(U,$J,358.3,7232,0)
;;=C15.5^^42^384^29
;;^UTILITY(U,$J,358.3,7232,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7232,1,3,0)
;;=3^Malignant Neop,Esophagus,Lower Third
;;^UTILITY(U,$J,358.3,7232,1,4,0)
;;=4^C15.5
;;^UTILITY(U,$J,358.3,7232,2)
;;=^267061
;;^UTILITY(U,$J,358.3,7233,0)
;;=C15.8^^42^384^31
;;^UTILITY(U,$J,358.3,7233,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7233,1,3,0)
;;=3^Malignant Neop,Esophagus,Overlapping Sites
;;^UTILITY(U,$J,358.3,7233,1,4,0)
;;=4^C15.8
;;^UTILITY(U,$J,358.3,7233,2)
;;=^5000918
;;^UTILITY(U,$J,358.3,7234,0)
;;=C15.9^^42^384^32
;;^UTILITY(U,$J,358.3,7234,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7234,1,3,0)
;;=3^Malignant Neop,Esophagus,Unspec
;;^UTILITY(U,$J,358.3,7234,1,4,0)
;;=4^C15.9
;;^UTILITY(U,$J,358.3,7234,2)
;;=^5000919
;;^UTILITY(U,$J,358.3,7235,0)
;;=K22.2^^42^384^34
;;^UTILITY(U,$J,358.3,7235,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7235,1,3,0)
;;=3^Obstruction of Esophagus
;;^UTILITY(U,$J,358.3,7235,1,4,0)
;;=4^K22.2
;;^UTILITY(U,$J,358.3,7235,2)
;;=^5008507
;;^UTILITY(U,$J,358.3,7236,0)
;;=K22.3^^42^384^35
;;^UTILITY(U,$J,358.3,7236,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7236,1,3,0)
;;=3^Perforation of Esophagus
;;^UTILITY(U,$J,358.3,7236,1,4,0)
;;=4^K22.3
;;^UTILITY(U,$J,358.3,7236,2)
;;=^5008508
;;^UTILITY(U,$J,358.3,7237,0)
;;=T54.3X1A^^42^384^39
;;^UTILITY(U,$J,358.3,7237,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7237,1,3,0)
;;=3^Toxic Alkali Injury,Accidental,Initial
;;^UTILITY(U,$J,358.3,7237,1,4,0)
;;=4^T54.3X1A
;;^UTILITY(U,$J,358.3,7237,2)
;;=^5052610
;;^UTILITY(U,$J,358.3,7238,0)
;;=T54.3X1D^^42^384^41
;;^UTILITY(U,$J,358.3,7238,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7238,1,3,0)
;;=3^Toxic Alkali Injury,Accidental,Subsequent
;;^UTILITY(U,$J,358.3,7238,1,4,0)
;;=4^T54.3X1D
;;^UTILITY(U,$J,358.3,7238,2)
;;=^5052611
;;^UTILITY(U,$J,358.3,7239,0)
;;=T54.3X1S^^42^384^40
;;^UTILITY(U,$J,358.3,7239,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7239,1,3,0)
;;=3^Toxic Alkali Injury,Accidental,Sequela
;;^UTILITY(U,$J,358.3,7239,1,4,0)
;;=4^T54.3X1S
;;^UTILITY(U,$J,358.3,7239,2)
;;=^5052612
;;^UTILITY(U,$J,358.3,7240,0)
;;=T54.2X1A^^42^384^36
;;^UTILITY(U,$J,358.3,7240,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7240,1,3,0)
;;=3^Toxic Acid Injury,Accidental,Initial
;;^UTILITY(U,$J,358.3,7240,1,4,0)
;;=4^T54.2X1A
;;^UTILITY(U,$J,358.3,7240,2)
;;=^5052598
;;^UTILITY(U,$J,358.3,7241,0)
;;=T54.2X1D^^42^384^38
;;^UTILITY(U,$J,358.3,7241,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7241,1,3,0)
;;=3^Toxic Acid Injury,Accidental,Subsequent
;;^UTILITY(U,$J,358.3,7241,1,4,0)
;;=4^T54.2X1D
;;^UTILITY(U,$J,358.3,7241,2)
;;=^5052599
;;^UTILITY(U,$J,358.3,7242,0)
;;=T54.2X1S^^42^384^37
;;^UTILITY(U,$J,358.3,7242,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7242,1,3,0)
;;=3^Toxic Acid Injury,Accidental,Sequela
;;^UTILITY(U,$J,358.3,7242,1,4,0)
;;=4^T54.2X1S
;;^UTILITY(U,$J,358.3,7242,2)
;;=^5052600
;;^UTILITY(U,$J,358.3,7243,0)
;;=K22.11^^42^384^42
;;^UTILITY(U,$J,358.3,7243,1,0)
;;=^358.31IA^4^2
;;^UTILITY(U,$J,358.3,7243,1,3,0)
;;=3^Ulcer of Esophagus w/ Bleeding
;;^UTILITY(U,$J,358.3,7243,1,4,0)
;;=4^K22.11
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HIBDEI031 19787 printed Sep 23, 2025@19:16:37 Page 2
IBDEI031 ; ; 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,7171,2)
+2 ;;=^5138332
+3 ;;^UTILITY(U,$J,358.3,7172,0)
+4 ;;=E11.3291^^40^379^5
+5 ;;^UTILITY(U,$J,358.3,7172,1,0)
+6 ;;=^358.31IA^4^2
+7 ;;^UTILITY(U,$J,358.3,7172,1,3,0)
+8 ;;=3^DM Type 2 w/ Mild NPDR w/o Macula Edema,Right Eye
+9 ;;^UTILITY(U,$J,358.3,7172,1,4,0)
+10 ;;=4^E11.3291
+11 ;;^UTILITY(U,$J,358.3,7172,2)
+12 ;;=^5138335
+13 ;;^UTILITY(U,$J,358.3,7173,0)
+14 ;;=E11.3292^^40^379^13
+15 ;;^UTILITY(U,$J,358.3,7173,1,0)
+16 ;;=^358.31IA^4^2
+17 ;;^UTILITY(U,$J,358.3,7173,1,3,0)
+18 ;;=3^DM Type 2 w/ Mild NPDR w/o Macula Edema,Left Eye
+19 ;;^UTILITY(U,$J,358.3,7173,1,4,0)
+20 ;;=4^E11.3292
+21 ;;^UTILITY(U,$J,358.3,7173,2)
+22 ;;=^5138336
+23 ;;^UTILITY(U,$J,358.3,7174,0)
+24 ;;=E11.3311^^40^379^6
+25 ;;^UTILITY(U,$J,358.3,7174,1,0)
+26 ;;=^358.31IA^4^2
+27 ;;^UTILITY(U,$J,358.3,7174,1,3,0)
+28 ;;=3^DM Type 2 w/ Mod NPDR w/ Macula Edema,Right Eye
+29 ;;^UTILITY(U,$J,358.3,7174,1,4,0)
+30 ;;=4^E11.3311
+31 ;;^UTILITY(U,$J,358.3,7174,2)
+32 ;;=^5138339
+33 ;;^UTILITY(U,$J,358.3,7175,0)
+34 ;;=E11.3312^^40^379^14
+35 ;;^UTILITY(U,$J,358.3,7175,1,0)
+36 ;;=^358.31IA^4^2
+37 ;;^UTILITY(U,$J,358.3,7175,1,3,0)
+38 ;;=3^DM Type 2 w/ Mod NPDR w/ Macula Edema,Left Eye
+39 ;;^UTILITY(U,$J,358.3,7175,1,4,0)
+40 ;;=4^E11.3312
+41 ;;^UTILITY(U,$J,358.3,7175,2)
+42 ;;=^5138340
+43 ;;^UTILITY(U,$J,358.3,7176,0)
+44 ;;=E11.3391^^40^379^7
+45 ;;^UTILITY(U,$J,358.3,7176,1,0)
+46 ;;=^358.31IA^4^2
+47 ;;^UTILITY(U,$J,358.3,7176,1,3,0)
+48 ;;=3^DM Type 2 w/ Mod NPDR w/o Macula Edema,Right Eye
+49 ;;^UTILITY(U,$J,358.3,7176,1,4,0)
+50 ;;=4^E11.3391
+51 ;;^UTILITY(U,$J,358.3,7176,2)
+52 ;;=^5138343
+53 ;;^UTILITY(U,$J,358.3,7177,0)
+54 ;;=E11.3392^^40^379^15
+55 ;;^UTILITY(U,$J,358.3,7177,1,0)
+56 ;;=^358.31IA^4^2
+57 ;;^UTILITY(U,$J,358.3,7177,1,3,0)
+58 ;;=3^DM Type 2 w/ Mod NPDR w/o Macula Edema,Left Eye
+59 ;;^UTILITY(U,$J,358.3,7177,1,4,0)
+60 ;;=4^E11.3392
+61 ;;^UTILITY(U,$J,358.3,7177,2)
+62 ;;=^5138344
+63 ;;^UTILITY(U,$J,358.3,7178,0)
+64 ;;=E11.3411^^40^379^8
+65 ;;^UTILITY(U,$J,358.3,7178,1,0)
+66 ;;=^358.31IA^4^2
+67 ;;^UTILITY(U,$J,358.3,7178,1,3,0)
+68 ;;=3^DM Type 2 w/ Severe NPDR w/ Macula Edema,Right Eye
+69 ;;^UTILITY(U,$J,358.3,7178,1,4,0)
+70 ;;=4^E11.3411
+71 ;;^UTILITY(U,$J,358.3,7178,2)
+72 ;;=^5138347
+73 ;;^UTILITY(U,$J,358.3,7179,0)
+74 ;;=E11.3412^^40^379^16
+75 ;;^UTILITY(U,$J,358.3,7179,1,0)
+76 ;;=^358.31IA^4^2
+77 ;;^UTILITY(U,$J,358.3,7179,1,3,0)
+78 ;;=3^DM Type 2 w/ Severe NPDR w/ Macula Edema,Left Eye
+79 ;;^UTILITY(U,$J,358.3,7179,1,4,0)
+80 ;;=4^E11.3412
+81 ;;^UTILITY(U,$J,358.3,7179,2)
+82 ;;=^5138348
+83 ;;^UTILITY(U,$J,358.3,7180,0)
+84 ;;=E11.3491^^40^379^9
+85 ;;^UTILITY(U,$J,358.3,7180,1,0)
+86 ;;=^358.31IA^4^2
+87 ;;^UTILITY(U,$J,358.3,7180,1,3,0)
+88 ;;=3^DM Type 2 w/ Severe NPDR w/o Macula Edema,Right Eye
+89 ;;^UTILITY(U,$J,358.3,7180,1,4,0)
+90 ;;=4^E11.3491
+91 ;;^UTILITY(U,$J,358.3,7180,2)
+92 ;;=^5138351
+93 ;;^UTILITY(U,$J,358.3,7181,0)
+94 ;;=E11.3492^^40^379^17
+95 ;;^UTILITY(U,$J,358.3,7181,1,0)
+96 ;;=^358.31IA^4^2
+97 ;;^UTILITY(U,$J,358.3,7181,1,3,0)
+98 ;;=3^DM Type 2 w/ Severe NPDR w/o Macula Edema,Left Eye
+99 ;;^UTILITY(U,$J,358.3,7181,1,4,0)
+100 ;;=4^E11.3492
+101 ;;^UTILITY(U,$J,358.3,7181,2)
+102 ;;=^5138352
+103 ;;^UTILITY(U,$J,358.3,7182,0)
+104 ;;=E11.3511^^40^379^10
+105 ;;^UTILITY(U,$J,358.3,7182,1,0)
+106 ;;=^358.31IA^4^2
+107 ;;^UTILITY(U,$J,358.3,7182,1,3,0)
+108 ;;=3^DM Type 2 w/ PDR w/ Macular Edema,Right Eye
+109 ;;^UTILITY(U,$J,358.3,7182,1,4,0)
+110 ;;=4^E11.3511
+111 ;;^UTILITY(U,$J,358.3,7182,2)
+112 ;;=^5138355
+113 ;;^UTILITY(U,$J,358.3,7183,0)
+114 ;;=E11.3512^^40^379^18
+115 ;;^UTILITY(U,$J,358.3,7183,1,0)
+116 ;;=^358.31IA^4^2
+117 ;;^UTILITY(U,$J,358.3,7183,1,3,0)
+118 ;;=3^DM Type 2 w/ PDR w/ Macular Edema,Left Eye
+119 ;;^UTILITY(U,$J,358.3,7183,1,4,0)
+120 ;;=4^E11.3512
+121 ;;^UTILITY(U,$J,358.3,7183,2)
+122 ;;=^5138356
+123 ;;^UTILITY(U,$J,358.3,7184,0)
+124 ;;=E11.3591^^40^379^11
+125 ;;^UTILITY(U,$J,358.3,7184,1,0)
+126 ;;=^358.31IA^4^2
+127 ;;^UTILITY(U,$J,358.3,7184,1,3,0)
+128 ;;=3^DM Type 2 w/ PDR w/o Macular Edema,Right Eye
+129 ;;^UTILITY(U,$J,358.3,7184,1,4,0)
+130 ;;=4^E11.3591
+131 ;;^UTILITY(U,$J,358.3,7184,2)
+132 ;;=^5138375
+133 ;;^UTILITY(U,$J,358.3,7185,0)
+134 ;;=E11.3592^^40^379^19
+135 ;;^UTILITY(U,$J,358.3,7185,1,0)
+136 ;;=^358.31IA^4^2
+137 ;;^UTILITY(U,$J,358.3,7185,1,3,0)
+138 ;;=3^DM Type 2 w/ PDR w/o Macular Edema,Left Eye
+139 ;;^UTILITY(U,$J,358.3,7185,1,4,0)
+140 ;;=4^E11.3592
+141 ;;^UTILITY(U,$J,358.3,7185,2)
+142 ;;=^5138376
+143 ;;^UTILITY(U,$J,358.3,7186,0)
+144 ;;=H35.81^^40^379^3
+145 ;;^UTILITY(U,$J,358.3,7186,1,0)
+146 ;;=^358.31IA^4^2
+147 ;;^UTILITY(U,$J,358.3,7186,1,3,0)
+148 ;;=3^Retinal Edema/CME Other Etiology
+149 ;;^UTILITY(U,$J,358.3,7186,1,4,0)
+150 ;;=4^H35.81
+151 ;;^UTILITY(U,$J,358.3,7186,2)
+152 ;;=^5005715
+153 ;;^UTILITY(U,$J,358.3,7187,0)
+154 ;;=U07.1^^40^380^1
+155 ;;^UTILITY(U,$J,358.3,7187,1,0)
+156 ;;=^358.31IA^4^2
+157 ;;^UTILITY(U,$J,358.3,7187,1,3,0)
+158 ;;=3^COVID-19
+159 ;;^UTILITY(U,$J,358.3,7187,1,4,0)
+160 ;;=4^U07.1
+161 ;;^UTILITY(U,$J,358.3,7187,2)
+162 ;;=^5159070
+163 ;;^UTILITY(U,$J,358.3,7188,0)
+164 ;;=Z20.828^^40^380^2
+165 ;;^UTILITY(U,$J,358.3,7188,1,0)
+166 ;;=^358.31IA^4^2
+167 ;;^UTILITY(U,$J,358.3,7188,1,3,0)
+168 ;;=3^Contact/Exposure to Oth Viral Communicable Diseases
+169 ;;^UTILITY(U,$J,358.3,7188,1,4,0)
+170 ;;=4^Z20.828
+171 ;;^UTILITY(U,$J,358.3,7188,2)
+172 ;;=^5062774
+173 ;;^UTILITY(U,$J,358.3,7189,0)
+174 ;;=R05.9^^40^380^3
+175 ;;^UTILITY(U,$J,358.3,7189,1,0)
+176 ;;=^358.31IA^4^2
+177 ;;^UTILITY(U,$J,358.3,7189,1,3,0)
+178 ;;=3^Cough
+179 ;;^UTILITY(U,$J,358.3,7189,1,4,0)
+180 ;;=4^R05.9
+181 ;;^UTILITY(U,$J,358.3,7189,2)
+182 ;;=^5161232
+183 ;;^UTILITY(U,$J,358.3,7190,0)
+184 ;;=R50.9^^40^380^4
+185 ;;^UTILITY(U,$J,358.3,7190,1,0)
+186 ;;=^358.31IA^4^2
+187 ;;^UTILITY(U,$J,358.3,7190,1,3,0)
+188 ;;=3^Fever,Unspec
+189 ;;^UTILITY(U,$J,358.3,7190,1,4,0)
+190 ;;=4^R50.9
+191 ;;^UTILITY(U,$J,358.3,7190,2)
+192 ;;=^5019512
+193 ;;^UTILITY(U,$J,358.3,7191,0)
+194 ;;=Z03.818^^40^380^5
+195 ;;^UTILITY(U,$J,358.3,7191,1,0)
+196 ;;=^358.31IA^4^2
+197 ;;^UTILITY(U,$J,358.3,7191,1,3,0)
+198 ;;=3^Observation of Suspected Expsr to Bio Agents Ruled Out
+199 ;;^UTILITY(U,$J,358.3,7191,1,4,0)
+200 ;;=4^Z03.818
+201 ;;^UTILITY(U,$J,358.3,7191,2)
+202 ;;=^5062655
+203 ;;^UTILITY(U,$J,358.3,7192,0)
+204 ;;=Z11.59^^40^380^6
+205 ;;^UTILITY(U,$J,358.3,7192,1,0)
+206 ;;=^358.31IA^4^2
+207 ;;^UTILITY(U,$J,358.3,7192,1,3,0)
+208 ;;=3^Screening for Oth Viral Diseases
+209 ;;^UTILITY(U,$J,358.3,7192,1,4,0)
+210 ;;=4^Z11.59
+211 ;;^UTILITY(U,$J,358.3,7192,2)
+212 ;;=^5062675
+213 ;;^UTILITY(U,$J,358.3,7193,0)
+214 ;;=R06.02^^40^380^7
+215 ;;^UTILITY(U,$J,358.3,7193,1,0)
+216 ;;=^358.31IA^4^2
+217 ;;^UTILITY(U,$J,358.3,7193,1,3,0)
+218 ;;=3^Shortness of Breath
+219 ;;^UTILITY(U,$J,358.3,7193,1,4,0)
+220 ;;=4^R06.02
+221 ;;^UTILITY(U,$J,358.3,7193,2)
+222 ;;=^5019181
+223 ;;^UTILITY(U,$J,358.3,7194,0)
+224 ;;=99202^^41^381^1
+225 ;;^UTILITY(U,$J,358.3,7194,1,0)
+226 ;;=^358.31IA^2^2
+227 ;;^UTILITY(U,$J,358.3,7194,1,1,0)
+228 ;;=1^SF MDM or 15-29 min
+229 ;;^UTILITY(U,$J,358.3,7194,1,2,0)
+230 ;;=2^99202
+231 ;;^UTILITY(U,$J,358.3,7195,0)
+232 ;;=99203^^41^381^2
+233 ;;^UTILITY(U,$J,358.3,7195,1,0)
+234 ;;=^358.31IA^2^2
+235 ;;^UTILITY(U,$J,358.3,7195,1,1,0)
+236 ;;=1^Low Complex MDM or 30-44 min
+237 ;;^UTILITY(U,$J,358.3,7195,1,2,0)
+238 ;;=2^99203
+239 ;;^UTILITY(U,$J,358.3,7196,0)
+240 ;;=99204^^41^381^3
+241 ;;^UTILITY(U,$J,358.3,7196,1,0)
+242 ;;=^358.31IA^2^2
+243 ;;^UTILITY(U,$J,358.3,7196,1,1,0)
+244 ;;=1^Mod Complex MDM or 45-59 min
+245 ;;^UTILITY(U,$J,358.3,7196,1,2,0)
+246 ;;=2^99204
+247 ;;^UTILITY(U,$J,358.3,7197,0)
+248 ;;=99205^^41^381^4
+249 ;;^UTILITY(U,$J,358.3,7197,1,0)
+250 ;;=^358.31IA^2^2
+251 ;;^UTILITY(U,$J,358.3,7197,1,1,0)
+252 ;;=1^High Complex MDM or 60-74 min
+253 ;;^UTILITY(U,$J,358.3,7197,1,2,0)
+254 ;;=2^99205
+255 ;;^UTILITY(U,$J,358.3,7198,0)
+256 ;;=99211^^41^382^1
+257 ;;^UTILITY(U,$J,358.3,7198,1,0)
+258 ;;=^358.31IA^2^2
+259 ;;^UTILITY(U,$J,358.3,7198,1,1,0)
+260 ;;=1^Brief (no MD seen)
+261 ;;^UTILITY(U,$J,358.3,7198,1,2,0)
+262 ;;=2^99211
+263 ;;^UTILITY(U,$J,358.3,7199,0)
+264 ;;=99212^^41^382^2
+265 ;;^UTILITY(U,$J,358.3,7199,1,0)
+266 ;;=^358.31IA^2^2
+267 ;;^UTILITY(U,$J,358.3,7199,1,1,0)
+268 ;;=1^SF MDM or 10-19 min
+269 ;;^UTILITY(U,$J,358.3,7199,1,2,0)
+270 ;;=2^99212
+271 ;;^UTILITY(U,$J,358.3,7200,0)
+272 ;;=99213^^41^382^3
+273 ;;^UTILITY(U,$J,358.3,7200,1,0)
+274 ;;=^358.31IA^2^2
+275 ;;^UTILITY(U,$J,358.3,7200,1,1,0)
+276 ;;=1^Low Complex MDM or 20-29 min
+277 ;;^UTILITY(U,$J,358.3,7200,1,2,0)
+278 ;;=2^99213
+279 ;;^UTILITY(U,$J,358.3,7201,0)
+280 ;;=99214^^41^382^4
+281 ;;^UTILITY(U,$J,358.3,7201,1,0)
+282 ;;=^358.31IA^2^2
+283 ;;^UTILITY(U,$J,358.3,7201,1,1,0)
+284 ;;=1^Mod Complex MDM or 30-39 min
+285 ;;^UTILITY(U,$J,358.3,7201,1,2,0)
+286 ;;=2^99214
+287 ;;^UTILITY(U,$J,358.3,7202,0)
+288 ;;=99215^^41^382^5
+289 ;;^UTILITY(U,$J,358.3,7202,1,0)
+290 ;;=^358.31IA^2^2
+291 ;;^UTILITY(U,$J,358.3,7202,1,1,0)
+292 ;;=1^High Complex MDM or 40-54 min
+293 ;;^UTILITY(U,$J,358.3,7202,1,2,0)
+294 ;;=2^99215
+295 ;;^UTILITY(U,$J,358.3,7203,0)
+296 ;;=99241^^41^383^1
+297 ;;^UTILITY(U,$J,358.3,7203,1,0)
+298 ;;=^358.31IA^2^2
+299 ;;^UTILITY(U,$J,358.3,7203,1,1,0)
+300 ;;=1^Problem Focused
+301 ;;^UTILITY(U,$J,358.3,7203,1,2,0)
+302 ;;=2^99241
+303 ;;^UTILITY(U,$J,358.3,7204,0)
+304 ;;=99242^^41^383^2
+305 ;;^UTILITY(U,$J,358.3,7204,1,0)
+306 ;;=^358.31IA^2^2
+307 ;;^UTILITY(U,$J,358.3,7204,1,1,0)
+308 ;;=1^Expanded Problem Focus
+309 ;;^UTILITY(U,$J,358.3,7204,1,2,0)
+310 ;;=2^99242
+311 ;;^UTILITY(U,$J,358.3,7205,0)
+312 ;;=99243^^41^383^3
+313 ;;^UTILITY(U,$J,358.3,7205,1,0)
+314 ;;=^358.31IA^2^2
+315 ;;^UTILITY(U,$J,358.3,7205,1,1,0)
+316 ;;=1^Detailed
+317 ;;^UTILITY(U,$J,358.3,7205,1,2,0)
+318 ;;=2^99243
+319 ;;^UTILITY(U,$J,358.3,7206,0)
+320 ;;=99244^^41^383^4
+321 ;;^UTILITY(U,$J,358.3,7206,1,0)
+322 ;;=^358.31IA^2^2
+323 ;;^UTILITY(U,$J,358.3,7206,1,1,0)
+324 ;;=1^Comprehensive, Moderate
+325 ;;^UTILITY(U,$J,358.3,7206,1,2,0)
+326 ;;=2^99244
+327 ;;^UTILITY(U,$J,358.3,7207,0)
+328 ;;=99245^^41^383^5
+329 ;;^UTILITY(U,$J,358.3,7207,1,0)
+330 ;;=^358.31IA^2^2
+331 ;;^UTILITY(U,$J,358.3,7207,1,1,0)
+332 ;;=1^Comprehensive, High
+333 ;;^UTILITY(U,$J,358.3,7207,1,2,0)
+334 ;;=2^99245
+335 ;;^UTILITY(U,$J,358.3,7208,0)
+336 ;;=B37.81^^42^384^6
+337 ;;^UTILITY(U,$J,358.3,7208,1,0)
+338 ;;=^358.31IA^4^2
+339 ;;^UTILITY(U,$J,358.3,7208,1,3,0)
+340 ;;=3^Candidal esophagitis
+341 ;;^UTILITY(U,$J,358.3,7208,1,4,0)
+342 ;;=4^B37.81
+343 ;;^UTILITY(U,$J,358.3,7208,2)
+344 ;;=^5000620
+345 ;;^UTILITY(U,$J,358.3,7209,0)
+346 ;;=I85.01^^42^384^13
+347 ;;^UTILITY(U,$J,358.3,7209,1,0)
+348 ;;=^358.31IA^4^2
+349 ;;^UTILITY(U,$J,358.3,7209,1,3,0)
+350 ;;=3^Esophageal varices w/ Bleeding
+351 ;;^UTILITY(U,$J,358.3,7209,1,4,0)
+352 ;;=4^I85.01
+353 ;;^UTILITY(U,$J,358.3,7209,2)
+354 ;;=^269835
+355 ;;^UTILITY(U,$J,358.3,7210,0)
+356 ;;=I85.00^^42^384^14
+357 ;;^UTILITY(U,$J,358.3,7210,1,0)
+358 ;;=^358.31IA^4^2
+359 ;;^UTILITY(U,$J,358.3,7210,1,3,0)
+360 ;;=3^Esophageal varices w/o Bleeding
+361 ;;^UTILITY(U,$J,358.3,7210,1,4,0)
+362 ;;=4^I85.00
+363 ;;^UTILITY(U,$J,358.3,7210,2)
+364 ;;=^5008023
+365 ;;^UTILITY(U,$J,358.3,7211,0)
+366 ;;=K22.0^^42^384^2
+367 ;;^UTILITY(U,$J,358.3,7211,1,0)
+368 ;;=^358.31IA^4^2
+369 ;;^UTILITY(U,$J,358.3,7211,1,3,0)
+370 ;;=3^Achalasia
+371 ;;^UTILITY(U,$J,358.3,7211,1,4,0)
+372 ;;=4^K22.0
+373 ;;^UTILITY(U,$J,358.3,7211,2)
+374 ;;=^5008506
+375 ;;^UTILITY(U,$J,358.3,7212,0)
+376 ;;=K20.0^^42^384^12
+377 ;;^UTILITY(U,$J,358.3,7212,1,0)
+378 ;;=^358.31IA^4^2
+379 ;;^UTILITY(U,$J,358.3,7212,1,3,0)
+380 ;;=3^Eosinophilic esophagitis
+381 ;;^UTILITY(U,$J,358.3,7212,1,4,0)
+382 ;;=4^K20.0
+383 ;;^UTILITY(U,$J,358.3,7212,2)
+384 ;;=^336605
+385 ;;^UTILITY(U,$J,358.3,7213,0)
+386 ;;=K22.10^^42^384^43
+387 ;;^UTILITY(U,$J,358.3,7213,1,0)
+388 ;;=^358.31IA^4^2
+389 ;;^UTILITY(U,$J,358.3,7213,1,3,0)
+390 ;;=3^Ulcer of Esophagus w/o Bleeding
+391 ;;^UTILITY(U,$J,358.3,7213,1,4,0)
+392 ;;=4^K22.10
+393 ;;^UTILITY(U,$J,358.3,7213,2)
+394 ;;=^329929
+395 ;;^UTILITY(U,$J,358.3,7214,0)
+396 ;;=K22.5^^42^384^10
+397 ;;^UTILITY(U,$J,358.3,7214,1,0)
+398 ;;=^358.31IA^4^2
+399 ;;^UTILITY(U,$J,358.3,7214,1,3,0)
+400 ;;=3^Diverticulum of esophagus, acquired
+401 ;;^UTILITY(U,$J,358.3,7214,1,4,0)
+402 ;;=4^K22.5
+403 ;;^UTILITY(U,$J,358.3,7214,2)
+404 ;;=^5008509
+405 ;;^UTILITY(U,$J,358.3,7215,0)
+406 ;;=K22.6^^42^384^27
+407 ;;^UTILITY(U,$J,358.3,7215,1,0)
+408 ;;=^358.31IA^4^2
+409 ;;^UTILITY(U,$J,358.3,7215,1,3,0)
+410 ;;=3^Gastro-esophageal laceration-hemorrhage syndrome
+411 ;;^UTILITY(U,$J,358.3,7215,1,4,0)
+412 ;;=4^K22.6
+413 ;;^UTILITY(U,$J,358.3,7215,2)
+414 ;;=^5008510
+415 ;;^UTILITY(U,$J,358.3,7216,0)
+416 ;;=K21.9^^42^384^26
+417 ;;^UTILITY(U,$J,358.3,7216,1,0)
+418 ;;=^358.31IA^4^2
+419 ;;^UTILITY(U,$J,358.3,7216,1,3,0)
+420 ;;=3^GERD w/o Esophagitis
+421 ;;^UTILITY(U,$J,358.3,7216,1,4,0)
+422 ;;=4^K21.9
+423 ;;^UTILITY(U,$J,358.3,7216,2)
+424 ;;=^5008505
+425 ;;^UTILITY(U,$J,358.3,7217,0)
+426 ;;=K22.70^^42^384^5
+427 ;;^UTILITY(U,$J,358.3,7217,1,0)
+428 ;;=^358.31IA^4^2
+429 ;;^UTILITY(U,$J,358.3,7217,1,3,0)
+430 ;;=3^Barrett's esophagus w/o dysplasia
+431 ;;^UTILITY(U,$J,358.3,7217,1,4,0)
+432 ;;=4^K22.70
+433 ;;^UTILITY(U,$J,358.3,7217,2)
+434 ;;=^5008511
+435 ;;^UTILITY(U,$J,358.3,7218,0)
+436 ;;=K22.710^^42^384^4
+437 ;;^UTILITY(U,$J,358.3,7218,1,0)
+438 ;;=^358.31IA^4^2
+439 ;;^UTILITY(U,$J,358.3,7218,1,3,0)
+440 ;;=3^Barrett's esophagus w/ low grade dysplasia
+441 ;;^UTILITY(U,$J,358.3,7218,1,4,0)
+442 ;;=4^K22.710
+443 ;;^UTILITY(U,$J,358.3,7218,2)
+444 ;;=^5008512
+445 ;;^UTILITY(U,$J,358.3,7219,0)
+446 ;;=K22.711^^42^384^3
+447 ;;^UTILITY(U,$J,358.3,7219,1,0)
+448 ;;=^358.31IA^4^2
+449 ;;^UTILITY(U,$J,358.3,7219,1,3,0)
+450 ;;=3^Barrett's esophagus w/ high grade dysplasia
+451 ;;^UTILITY(U,$J,358.3,7219,1,4,0)
+452 ;;=4^K22.711
+453 ;;^UTILITY(U,$J,358.3,7219,2)
+454 ;;=^5008513
+455 ;;^UTILITY(U,$J,358.3,7220,0)
+456 ;;=K44.9^^42^384^8
+457 ;;^UTILITY(U,$J,358.3,7220,1,0)
+458 ;;=^358.31IA^4^2
+459 ;;^UTILITY(U,$J,358.3,7220,1,3,0)
+460 ;;=3^Diaphragmatic (Hiatal) hernia
+461 ;;^UTILITY(U,$J,358.3,7220,1,4,0)
+462 ;;=4^K44.9
+463 ;;^UTILITY(U,$J,358.3,7220,2)
+464 ;;=^5008617
+465 ;;^UTILITY(U,$J,358.3,7221,0)
+466 ;;=Q39.4^^42^384^15
+467 ;;^UTILITY(U,$J,358.3,7221,1,0)
+468 ;;=^358.31IA^4^2
+469 ;;^UTILITY(U,$J,358.3,7221,1,3,0)
+470 ;;=3^Esophageal web
+471 ;;^UTILITY(U,$J,358.3,7221,1,4,0)
+472 ;;=4^Q39.4
+473 ;;^UTILITY(U,$J,358.3,7221,2)
+474 ;;=^5018659
+475 ;;^UTILITY(U,$J,358.3,7222,0)
+476 ;;=T18.128A^^42^384^18
+477 ;;^UTILITY(U,$J,358.3,7222,1,0)
+478 ;;=^358.31IA^4^2
+479 ;;^UTILITY(U,$J,358.3,7222,1,3,0)
+480 ;;=3^Food in Esophagus,Initial
+481 ;;^UTILITY(U,$J,358.3,7222,1,4,0)
+482 ;;=4^T18.128A
+483 ;;^UTILITY(U,$J,358.3,7222,2)
+484 ;;=^5046594
+485 ;;^UTILITY(U,$J,358.3,7223,0)
+486 ;;=T18.198A^^42^384^21
+487 ;;^UTILITY(U,$J,358.3,7223,1,0)
+488 ;;=^358.31IA^4^2
+489 ;;^UTILITY(U,$J,358.3,7223,1,3,0)
+490 ;;=3^Foreign body in Esophagus,Initial
+491 ;;^UTILITY(U,$J,358.3,7223,1,4,0)
+492 ;;=4^T18.198A
+493 ;;^UTILITY(U,$J,358.3,7223,2)
+494 ;;=^5046600
+495 ;;^UTILITY(U,$J,358.3,7224,0)
+496 ;;=R93.3^^42^384^1
+497 ;;^UTILITY(U,$J,358.3,7224,1,0)
+498 ;;=^358.31IA^4^2
+499 ;;^UTILITY(U,$J,358.3,7224,1,3,0)
+500 ;;=3^Abnormal imaging Digestive tract
+501 ;;^UTILITY(U,$J,358.3,7224,1,4,0)
+502 ;;=4^R93.3
+503 ;;^UTILITY(U,$J,358.3,7224,2)
+504 ;;=^5019716
+505 ;;^UTILITY(U,$J,358.3,7225,0)
+506 ;;=K22.4^^42^384^11
+507 ;;^UTILITY(U,$J,358.3,7225,1,0)
+508 ;;=^358.31IA^4^2
+509 ;;^UTILITY(U,$J,358.3,7225,1,3,0)
+510 ;;=3^Dyskinesia of Esophagus
+511 ;;^UTILITY(U,$J,358.3,7225,1,4,0)
+512 ;;=4^K22.4
+513 ;;^UTILITY(U,$J,358.3,7225,2)
+514 ;;=^37546
+515 ;;^UTILITY(U,$J,358.3,7226,0)
+516 ;;=T18.128D^^42^384^20
+517 ;;^UTILITY(U,$J,358.3,7226,1,0)
+518 ;;=^358.31IA^4^2
+519 ;;^UTILITY(U,$J,358.3,7226,1,3,0)
+520 ;;=3^Food in Esophagus,Subsequent
+521 ;;^UTILITY(U,$J,358.3,7226,1,4,0)
+522 ;;=4^T18.128D
+523 ;;^UTILITY(U,$J,358.3,7226,2)
+524 ;;=^5046595
+525 ;;^UTILITY(U,$J,358.3,7227,0)
+526 ;;=T18.128S^^42^384^19
+527 ;;^UTILITY(U,$J,358.3,7227,1,0)
+528 ;;=^358.31IA^4^2
+529 ;;^UTILITY(U,$J,358.3,7227,1,3,0)
+530 ;;=3^Food in Esophagus,Sequela
+531 ;;^UTILITY(U,$J,358.3,7227,1,4,0)
+532 ;;=4^T18.128S
+533 ;;^UTILITY(U,$J,358.3,7227,2)
+534 ;;=^5046596
+535 ;;^UTILITY(U,$J,358.3,7228,0)
+536 ;;=T18.198D^^42^384^23
+537 ;;^UTILITY(U,$J,358.3,7228,1,0)
+538 ;;=^358.31IA^4^2
+539 ;;^UTILITY(U,$J,358.3,7228,1,3,0)
+540 ;;=3^Foreign body in Esophagus,Subsequent
+541 ;;^UTILITY(U,$J,358.3,7228,1,4,0)
+542 ;;=4^T18.198D
+543 ;;^UTILITY(U,$J,358.3,7228,2)
+544 ;;=^5046601
+545 ;;^UTILITY(U,$J,358.3,7229,0)
+546 ;;=T18.198S^^42^384^22
+547 ;;^UTILITY(U,$J,358.3,7229,1,0)
+548 ;;=^358.31IA^4^2
+549 ;;^UTILITY(U,$J,358.3,7229,1,3,0)
+550 ;;=3^Foreign body in Esophagus,Sequela
+551 ;;^UTILITY(U,$J,358.3,7229,1,4,0)
+552 ;;=4^T18.198S
+553 ;;^UTILITY(U,$J,358.3,7229,2)
+554 ;;=^5046602
+555 ;;^UTILITY(U,$J,358.3,7230,0)
+556 ;;=C15.3^^42^384^33
+557 ;;^UTILITY(U,$J,358.3,7230,1,0)
+558 ;;=^358.31IA^4^2
+559 ;;^UTILITY(U,$J,358.3,7230,1,3,0)
+560 ;;=3^Malignant Neop,Esophagus,Upper Third
+561 ;;^UTILITY(U,$J,358.3,7230,1,4,0)
+562 ;;=4^C15.3
+563 ;;^UTILITY(U,$J,358.3,7230,2)
+564 ;;=^267059
+565 ;;^UTILITY(U,$J,358.3,7231,0)
+566 ;;=C15.4^^42^384^30
+567 ;;^UTILITY(U,$J,358.3,7231,1,0)
+568 ;;=^358.31IA^4^2
+569 ;;^UTILITY(U,$J,358.3,7231,1,3,0)
+570 ;;=3^Malignant Neop,Esophagus,Middle Third
+571 ;;^UTILITY(U,$J,358.3,7231,1,4,0)
+572 ;;=4^C15.4
+573 ;;^UTILITY(U,$J,358.3,7231,2)
+574 ;;=^267060
+575 ;;^UTILITY(U,$J,358.3,7232,0)
+576 ;;=C15.5^^42^384^29
+577 ;;^UTILITY(U,$J,358.3,7232,1,0)
+578 ;;=^358.31IA^4^2
+579 ;;^UTILITY(U,$J,358.3,7232,1,3,0)
+580 ;;=3^Malignant Neop,Esophagus,Lower Third
+581 ;;^UTILITY(U,$J,358.3,7232,1,4,0)
+582 ;;=4^C15.5
+583 ;;^UTILITY(U,$J,358.3,7232,2)
+584 ;;=^267061
+585 ;;^UTILITY(U,$J,358.3,7233,0)
+586 ;;=C15.8^^42^384^31
+587 ;;^UTILITY(U,$J,358.3,7233,1,0)
+588 ;;=^358.31IA^4^2
+589 ;;^UTILITY(U,$J,358.3,7233,1,3,0)
+590 ;;=3^Malignant Neop,Esophagus,Overlapping Sites
+591 ;;^UTILITY(U,$J,358.3,7233,1,4,0)
+592 ;;=4^C15.8
+593 ;;^UTILITY(U,$J,358.3,7233,2)
+594 ;;=^5000918
+595 ;;^UTILITY(U,$J,358.3,7234,0)
+596 ;;=C15.9^^42^384^32
+597 ;;^UTILITY(U,$J,358.3,7234,1,0)
+598 ;;=^358.31IA^4^2
+599 ;;^UTILITY(U,$J,358.3,7234,1,3,0)
+600 ;;=3^Malignant Neop,Esophagus,Unspec
+601 ;;^UTILITY(U,$J,358.3,7234,1,4,0)
+602 ;;=4^C15.9
+603 ;;^UTILITY(U,$J,358.3,7234,2)
+604 ;;=^5000919
+605 ;;^UTILITY(U,$J,358.3,7235,0)
+606 ;;=K22.2^^42^384^34
+607 ;;^UTILITY(U,$J,358.3,7235,1,0)
+608 ;;=^358.31IA^4^2
+609 ;;^UTILITY(U,$J,358.3,7235,1,3,0)
+610 ;;=3^Obstruction of Esophagus
+611 ;;^UTILITY(U,$J,358.3,7235,1,4,0)
+612 ;;=4^K22.2
+613 ;;^UTILITY(U,$J,358.3,7235,2)
+614 ;;=^5008507
+615 ;;^UTILITY(U,$J,358.3,7236,0)
+616 ;;=K22.3^^42^384^35
+617 ;;^UTILITY(U,$J,358.3,7236,1,0)
+618 ;;=^358.31IA^4^2
+619 ;;^UTILITY(U,$J,358.3,7236,1,3,0)
+620 ;;=3^Perforation of Esophagus
+621 ;;^UTILITY(U,$J,358.3,7236,1,4,0)
+622 ;;=4^K22.3
+623 ;;^UTILITY(U,$J,358.3,7236,2)
+624 ;;=^5008508
+625 ;;^UTILITY(U,$J,358.3,7237,0)
+626 ;;=T54.3X1A^^42^384^39
+627 ;;^UTILITY(U,$J,358.3,7237,1,0)
+628 ;;=^358.31IA^4^2
+629 ;;^UTILITY(U,$J,358.3,7237,1,3,0)
+630 ;;=3^Toxic Alkali Injury,Accidental,Initial
+631 ;;^UTILITY(U,$J,358.3,7237,1,4,0)
+632 ;;=4^T54.3X1A
+633 ;;^UTILITY(U,$J,358.3,7237,2)
+634 ;;=^5052610
+635 ;;^UTILITY(U,$J,358.3,7238,0)
+636 ;;=T54.3X1D^^42^384^41
+637 ;;^UTILITY(U,$J,358.3,7238,1,0)
+638 ;;=^358.31IA^4^2
+639 ;;^UTILITY(U,$J,358.3,7238,1,3,0)
+640 ;;=3^Toxic Alkali Injury,Accidental,Subsequent
+641 ;;^UTILITY(U,$J,358.3,7238,1,4,0)
+642 ;;=4^T54.3X1D
+643 ;;^UTILITY(U,$J,358.3,7238,2)
+644 ;;=^5052611
+645 ;;^UTILITY(U,$J,358.3,7239,0)
+646 ;;=T54.3X1S^^42^384^40
+647 ;;^UTILITY(U,$J,358.3,7239,1,0)
+648 ;;=^358.31IA^4^2
+649 ;;^UTILITY(U,$J,358.3,7239,1,3,0)
+650 ;;=3^Toxic Alkali Injury,Accidental,Sequela
+651 ;;^UTILITY(U,$J,358.3,7239,1,4,0)
+652 ;;=4^T54.3X1S
+653 ;;^UTILITY(U,$J,358.3,7239,2)
+654 ;;=^5052612
+655 ;;^UTILITY(U,$J,358.3,7240,0)
+656 ;;=T54.2X1A^^42^384^36
+657 ;;^UTILITY(U,$J,358.3,7240,1,0)
+658 ;;=^358.31IA^4^2
+659 ;;^UTILITY(U,$J,358.3,7240,1,3,0)
+660 ;;=3^Toxic Acid Injury,Accidental,Initial
+661 ;;^UTILITY(U,$J,358.3,7240,1,4,0)
+662 ;;=4^T54.2X1A
+663 ;;^UTILITY(U,$J,358.3,7240,2)
+664 ;;=^5052598
+665 ;;^UTILITY(U,$J,358.3,7241,0)
+666 ;;=T54.2X1D^^42^384^38
+667 ;;^UTILITY(U,$J,358.3,7241,1,0)
+668 ;;=^358.31IA^4^2
+669 ;;^UTILITY(U,$J,358.3,7241,1,3,0)
+670 ;;=3^Toxic Acid Injury,Accidental,Subsequent
+671 ;;^UTILITY(U,$J,358.3,7241,1,4,0)
+672 ;;=4^T54.2X1D
+673 ;;^UTILITY(U,$J,358.3,7241,2)
+674 ;;=^5052599
+675 ;;^UTILITY(U,$J,358.3,7242,0)
+676 ;;=T54.2X1S^^42^384^37
+677 ;;^UTILITY(U,$J,358.3,7242,1,0)
+678 ;;=^358.31IA^4^2
+679 ;;^UTILITY(U,$J,358.3,7242,1,3,0)
+680 ;;=3^Toxic Acid Injury,Accidental,Sequela
+681 ;;^UTILITY(U,$J,358.3,7242,1,4,0)
+682 ;;=4^T54.2X1S
+683 ;;^UTILITY(U,$J,358.3,7242,2)
+684 ;;=^5052600
+685 ;;^UTILITY(U,$J,358.3,7243,0)
+686 ;;=K22.11^^42^384^42
+687 ;;^UTILITY(U,$J,358.3,7243,1,0)
+688 ;;=^358.31IA^4^2
+689 ;;^UTILITY(U,$J,358.3,7243,1,3,0)
+690 ;;=3^Ulcer of Esophagus w/ Bleeding
+691 ;;^UTILITY(U,$J,358.3,7243,1,4,0)
+692 ;;=4^K22.11
